#!/bin/bash
-# (C) 2006-2011 Andre Noll
+# Copyright (C) 2006 Andre Noll
+# Licensed under the LGPL, version 3. See COPYING and COPYING.LESSER.
-if [[ $(type -t gsu_is_a_number) != "function" ]]; then
- GSU_DIR=${GSU_DIR:=${HOME-}/.gsu}
- . $GSU_DIR/common || exit 1
+if [[ "$(type -t _gsu_setup)" != "function" ]]; then
+ gsu_dir=${gsu_dir:-${BASH_SOURCE[0]%/*}}
+ . $gsu_dir/common || exit 1
+ _gsu_setup
fi
_gsu_usage()
# exactly one parenthesized subexpression for matching the command name.
_gsu_get_command_regex()
{
- local cmd="${1:-[-a-zA-Z_0-9]+}"
+ local cmd="${1:-[-a-zA-Z_0-9]{1,\}}"
result="^com_($cmd)\(\)"
}
}
_gsu_print_available_commands()
-{(
- local i count=0
- gsu_short_msg "Available commands:"
- for i in $gsu_cmds; do
- printf "$i"
- count=$(($count + 1))
- if test $(($count % 4)) -eq 0; then
- echo
+{
+ local cmd cmds
+ local -i count=0
+
+ _gsu_available_commands
+ cmds="$result"
+ printf 'Available commands:\n'
+ for cmd in $cmds; do
+ printf '%s' "$cmd"
+ let ++count
+ if (($count % 4)); then
+ printf '\t'
+ ((${#cmd} < 8)) && printf '\t'
else
- printf "\t"
- if test ${#i} -lt 8; then
- printf "\t"
- fi
+ printf '\n'
fi
done
- echo
-) 2>&1
+ printf '\n'
}
+# Print all options of the given optstring to stdout if the word in the current
+# command line begins with a hyphen character.
gsu_complete_options()
{
local opts="$1" cword="$2" cur opt
done
}
+com_prefs_options='e'
+
export gsu_prefs_txt="
Print the current preferences.
Usage: prefs [-e]
-If -e is given, the config file is opened with the default editor. Without
-options, the command prints out a list of all cmt config variables, together
-with their current value and the default value."
-_com_prefs()
+If -e is given, the config file is opened with the default editor.
+Without options, the command prints out a list of all config variables,
+together with their current value and the default value.
+"
+
+com_prefs()
{
local i conf="${gsu_config_file:=${HOME:-}/.$gsu_name.rc}"
- gsu_getopts "e"
+ gsu_getopts "$com_prefs_options"
eval "$result"
(($ret < 0)) && return
gsu_check_arg_count $# 0 0
ret=-$E_GSU_MKDIR
result="${conf%/*}"
mkdir -p "$result"
- [[ $? -ne 0 ]] && return
+ (($? != 0)) && return
ret=-$E_GSU_EDITOR
result="${EDITOR:-vi}"
"$result" "$conf"
- [[ $? -ne 0 ]] && return
+ (($? != 0)) && return
ret=$GSU_SUCCESS
return
fi
complete_prefs()
{
- gsu_complete_options "e" "$@"
+ gsu_complete_options "$com_prefs_options" "$@"
}
export gsu_man_txt="
Usage: man"
-_com_man()
+
+com_man()
{
local equal_signs="=================================================="
local minus_signs="--------------------------------------------------"
- local com num
+ local com num
echo "$gsu_name (_${gsu_banner_txt}_) manual"
echo "${equal_signs:0:${#gsu_name} + ${#gsu_banner_txt} + 16}"
echo
- sed -e '1,/^#\{70,\}/d' -e '/^#\{70,\}/,$d' $0 -e 's/^# *//'
+ sed -e '1,/^#\{70,\}/d' -e '/^#\{70,\}/,$d' $0 -e 's/^# *//'
echo "----"
- echo
+ echo
echo "$gsu_name usage"
echo "${minus_signs:0:${#gsu_name} + 6}"
printf "\t"
echo "Available commands:"
_gsu_available_commands
- for com in $result; do
+ for com in $result; do
num=${#com}
- if test $num -lt 4; then
- num=4
- fi
- echo "${minus_signs:0:$num}"
- echo "$com"
- echo "${minus_signs:0:$num}"
- $0 help $com
+ (($num < 4)) && num=4
+ echo "${minus_signs:0:$num}"
+ echo "$com"
+ echo "${minus_signs:0:$num}"
+ $0 help $com
echo
- done
- ret=$GSU_SUCCESS
+ done
+ ret=$GSU_SUCCESS
}
export gsu_help_txt="
the subcommand.
"
-_com_help()
+com_help()
{
local a b ere tab=' '
# Aborts on programming errors such as missing or invalid option string. On
# success $result contains shell code that can be eval'ed. For each defined
# option x, the local variable o_x will be created when calling eval "$result".
-# o_x contains true/false for options without argument and either the emtpy
+# o_x contains true/false for options without argument and either the empty
# string or the given argument for options that take an argument.
#
# Example:
'
gsu_check_arg_count $# 1 1
- if [[ $ret -lt 0 ]]; then
+ if (($ret < 0)); then
gsu_err_msg
exit 1
fi
ret=$GSU_SUCCESS
}
-_com_complete()
+com_complete()
{
local cmd n cword
local -a words
gsu()
{
local i
- _gsu_setup
- _gsu_available_commands
- gsu_cmds="$result"
- if test $# -eq 0; then
+
+ if (($# == 0)); then
_gsu_usage
_gsu_print_available_commands
exit 1
fi
arg="$1"
shift
- # check internal commands
- if [[ "$arg" = "help" || "$arg" = "man" || "$arg" = "prefs" || "$arg" = "complete" ]]; then
- _com_$arg "$@"
- if [[ "$ret" -lt 0 ]]; then
+ if [[ "$(type -t com_$arg)" == 'function' ]]; then
+ com_$arg "$@"
+ if (("$ret" < 0)); then
gsu_err_msg
exit 1
fi
exit 0
fi
-
- # external commands
- for i in $gsu_cmds; do
- if test "$arg" = "$i"; then
- com_$arg "$@"
- if [[ "$ret" -lt 0 ]]; then
- gsu_err_msg
- exit 1
- fi
- exit 0
- fi
- done
-
ret=-$E_GSU_BAD_COMMAND
result="$arg"
gsu_err_msg
# 0 0 no argument allowed
# 1 1 exactly one argument required
# 0 2 at most two arguments admissible
-# 2 at least two arguments reqired
-#
+# 2 at least two arguments required
gsu_check_arg_count()
{
ret=-$E_GSU_BAD_ARG_COUNT
- if [[ $# -eq 2 ]]; then # only num1 is given
+ if (($# == 2)); then # only num1 is given
result="at least $2 args required, $1 given"
- [[ $1 -lt $2 ]] && return
+ (($1 < $2)) && return
ret=$GSU_SUCCESS
return
fi
# num1 and num2 given
result="need at least $2 args, $1 given"
- [[ $1 -lt $2 ]] && return
+ (($1 < $2)) && return
result="need at most $3 args, $1 given"
- [[ $1 -gt $3 ]] && return
+ (($1 > $3)) && return
ret=$GSU_SUCCESS
}