003 File Manager
Current Path:
/usr/share/bsdconfig
usr
/
share
/
bsdconfig
/
📁
..
📄
common.subr
(28.45 KB)
📄
device.subr
(42.79 KB)
📄
dialog.subr
(75.99 KB)
📄
geom.subr
(12.65 KB)
📄
keymap.subr
(7.81 KB)
📁
media
📄
mustberoot.subr
(12.21 KB)
📁
networking
📁
packages
📁
password
📄
script.subr
(6.95 KB)
📁
startup
📄
strings.subr
(14.81 KB)
📄
struct.subr
(7.13 KB)
📄
sysrc.subr
(20.15 KB)
📁
timezone
📁
usermgmt
📄
variable.subr
(9.88 KB)
Editing: common.subr
if [ ! "$_COMMON_SUBR" ]; then _COMMON_SUBR=1 # # Copyright (c) 2012 Ron McDowell # Copyright (c) 2012-2016 Devin Teske # All rights reserved. # # Redistribution and use in source and binary forms, with or without # modification, are permitted provided that the following conditions # are met: # 1. Redistributions of source code must retain the above copyright # notice, this list of conditions and the following disclaimer. # 2. Redistributions in binary form must reproduce the above copyright # notice, this list of conditions and the following disclaimer in the # documentation and/or other materials provided with the distribution. # # THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE # ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF # SUCH DAMAGE. # # $FreeBSD$ # ############################################################ CONFIGURATION # # Default file descriptors to link to stdout/stderr for passthru allowing # redirection within a sub-shell to bypass directly to the terminal. # : ${TERMINAL_STDOUT_PASSTHRU:=3} : ${TERMINAL_STDERR_PASSTHRU:=4} ############################################################ GLOBALS # # Program name # pgm="${0##*/}" # # Program arguments # ARGC="$#" ARGV="$@" # # Global exit status variables # SUCCESS=0 FAILURE=1 # # Operating environment details # export UNAME_S="$( uname -s )" # Operating System (i.e. FreeBSD) export UNAME_P="$( uname -p )" # Processor Architecture (i.e. i386) export UNAME_M="$( uname -m )" # Machine platform (i.e. i386) export UNAME_R="$( uname -r )" # Release Level (i.e. X.Y-RELEASE) # # Default behavior is to call f_debug_init() automatically when loaded. # : ${DEBUG_SELF_INITIALIZE=1} # # Default behavior of f_debug_init() is to truncate $debugFile (set to NULL to # disable truncating the debug file when initializing). To get child processes # to append to the same log file, export this variarable (with a NULL value) # and also export debugFile with the desired value. # : ${DEBUG_INITIALIZE_FILE=1} # # Define standard optstring arguments that should be supported by all programs # using this include (unless DEBUG_SELF_INITIALIZE is set to NULL to prevent # f_debug_init() from autamatically processing "$@" for the below arguments): # # d Sets $debug to 1 # D: Sets $debugFile to $OPTARG # GETOPTS_STDARGS="dD:" # # The getopts builtin will return 1 either when the end of "$@" or the first # invalid flag is reached. This makes it impossible to determine if you've # processed all the arguments or simply have hit an invalid flag. In the cases # where we want to tolerate invalid flags (f_debug_init() for example), the # following variable can be appended to your optstring argument to getopts, # preventing it from prematurely returning 1 before the end of the arguments. # # NOTE: This assumes that all unknown flags are argument-less. # GETOPTS_ALLFLAGS="abcdefghijklmnopqrstuvwxyz" GETOPTS_ALLFLAGS="${GETOPTS_ALLFLAGS}ABCDEFGHIJKLMNOPQRSTUVWXYZ" GETOPTS_ALLFLAGS="${GETOPTS_ALLFLAGS}0123456789" # # When we get included, f_debug_init() will fire (unless $DEBUG_SELF_INITIALIZE # is set to disable automatic initialization) and process "$@" for a few global # options such as `-d' and/or `-D file'. However, if your program takes custom # flags that take arguments, this automatic processing may fail unexpectedly. # # The solution to this problem is to pre-define (before including this file) # the following variable (which defaults to NULL) to indicate that there are # extra flags that should be considered when performing automatic processing of # globally persistent flags. # : ${GETOPTS_EXTRA:=} ############################################################ FUNCTIONS # f_dprintf $format [$arguments ...] # # Sensible debug function. Override in ~/.bsdconfigrc if desired. # See /usr/share/examples/bsdconfig/bsdconfigrc for example. # # If $debug is set and non-NULL, prints DEBUG info using printf(1) syntax: # + To $debugFile, if set and non-NULL # + To standard output if $debugFile is either NULL or unset # + To both if $debugFile begins with a single plus-sign (`+') # f_dprintf() { [ "$debug" ] || return $SUCCESS local fmt="$1"; shift case "$debugFile" in ""|+*) printf "DEBUG: $fmt${fmt:+\n}" "$@" >&${TERMINAL_STDOUT_PASSTHRU:-1} esac [ "${debugFile#+}" ] && printf "DEBUG: $fmt${fmt:+\n}" "$@" >> "${debugFile#+}" return $SUCCESS } # f_debug_init # # Initialize debugging. Truncates $debugFile to zero bytes if set. # f_debug_init() { # # Process stored command-line arguments # set -- $ARGV local OPTIND OPTARG flag f_dprintf "f_debug_init: ARGV=[%s] GETOPTS_STDARGS=[%s]" \ "$ARGV" "$GETOPTS_STDARGS" while getopts "$GETOPTS_STDARGS$GETOPTS_EXTRA$GETOPTS_ALLFLAGS" flag \ > /dev/null; do case "$flag" in d) debug=1 ;; D) debugFile="$OPTARG" ;; esac done shift $(( $OPTIND - 1 )) f_dprintf "f_debug_init: debug=[%s] debugFile=[%s]" \ "$debug" "$debugFile" # # Automagically enable debugging if debugFile is set (and non-NULL) # [ "$debugFile" ] && { [ "${debug+set}" ] || debug=1; } # # Make debugging persistent if set # [ "$debug" ] && export debug [ "$debugFile" ] && export debugFile # # Truncate debug file unless requested otherwise. Note that we will # trim a leading plus (`+') from the value of debugFile to support # persistent meaning that f_dprintf() should print both to standard # output and $debugFile (minus the leading plus, of course). # local _debug_file="${debugFile#+}" if [ "$_debug_file" -a "$DEBUG_INITIALIZE_FILE" ]; then if ( umask 022 && :> "$_debug_file" ); then f_dprintf "Successfully initialized debugFile \`%s'" \ "$_debug_file" f_isset debug || debug=1 # turn debugging on if not set else unset debugFile f_dprintf "Unable to initialize debugFile \`%s'" \ "$_debug_file" fi fi } # f_err $format [$arguments ...] # # Print a message to stderr (fd=2). # f_err() { printf "$@" >&2 } # f_quietly $command [$arguments ...] # # Run a command quietly (quell any output to stdout or stderr) # f_quietly() { "$@" > /dev/null 2>&1 } # f_have $anything ... # # A wrapper to the `type' built-in. Returns true if argument is a valid shell # built-in, keyword, or externally-tracked binary, otherwise false. # f_have() { f_quietly type "$@" } # setvar $var_to_set [$value] # # Implement setvar for shells unlike FreeBSD sh(1). # if ! f_have setvar; then setvar() { [ $# -gt 0 ] || return $SUCCESS local __setvar_var_to_set="$1" __setvar_right="$2" __setvar_left= case $# in 1) unset "$__setvar_var_to_set" return $? ;; 2) : fall through ;; *) f_err "setvar: too many arguments\n" return $FAILURE esac case "$__setvar_var_to_set" in *[!0-9A-Za-z_]*) f_err "setvar: %s: bad variable name\n" "$__setvar_var_to_set" return 2 esac while case "$__setvar_r" in *\'*) : ;; *) false ; esac do __setvar_left="$__setvar_left${__setvar_right%%\'*}'\\''" __setvar_right="${__setvar_right#*\'}" done __setvar_left="$__setvar_left${__setvar_right#*\'}" eval "$__setvar_var_to_set='$__setvar_left'" } fi # f_which $anything [$var_to_set] # # A fast built-in replacement for syntaxes such as foo=$( which bar ). In a # comparison of 10,000 runs of this function versus which, this function # completed in under 3 seconds, while `which' took almost a full minute. # # If $var_to_set is missing or NULL, output is (like which) to standard out. # Returns success if a match was found, failure otherwise. # f_which() { local __name="$1" __var_to_set="$2" case "$__name" in */*|'') return $FAILURE; esac local __p __exec IFS=":" __found= for __p in $PATH; do __exec="$__p/$__name" [ -f "$__exec" -a -x "$__exec" ] && __found=1 break done if [ "$__found" ]; then if [ "$__var_to_set" ]; then setvar "$__var_to_set" "$__exec" else echo "$__exec" fi return $SUCCESS fi return $FAILURE } # f_getvar $var_to_get [$var_to_set] # # Utility function designed to go along with the already-builtin setvar. # Allows clean variable name indirection without forking or sub-shells. # # Returns error status if the requested variable ($var_to_get) is not set. # # If $var_to_set is missing or NULL, the value of $var_to_get is printed to # standard output for capturing in a sub-shell (which is less-recommended # because of performance degredation; for example, when called in a loop). # f_getvar() { local __var_to_get="$1" __var_to_set="$2" [ "$__var_to_set" ] || local value eval [ \"\${$__var_to_get+set}\" ] local __retval=$? eval ${__var_to_set:-value}=\"\${$__var_to_get}\" eval f_dprintf '"f_getvar: var=[%s] value=[%s] r=%u"' \ \"\$__var_to_get\" \"\$${__var_to_set:-value}\" \$__retval [ "$__var_to_set" ] || { [ "$value" ] && echo "$value"; } return $__retval } # f_isset $var # # Check if variable $var is set. Returns success if variable is set, otherwise # returns failure. # f_isset() { eval [ \"\${${1%%[$IFS]*}+set}\" ] } # f_die [$status [$format [$arguments ...]]] # # Abruptly terminate due to an error optionally displaying a message in a # dialog box using printf(1) syntax. # f_die() { local status=$FAILURE # If there is at least one argument, take it as the status if [ $# -gt 0 ]; then status=$1 shift 1 # status fi # If there are still arguments left, pass them to f_show_msg [ $# -gt 0 ] && f_show_msg "$@" # Optionally call f_clean_up() function if it exists f_have f_clean_up && f_clean_up exit $status } # f_interrupt # # Interrupt handler. # f_interrupt() { exec 2>&1 # fix sh(1) bug where stderr gets lost within async-trap f_die } # f_show_info $format [$arguments ...] # # Display a message in a dialog infobox using printf(1) syntax. # f_show_info() { local msg msg=$( printf "$@" ) # # Use f_dialog_infobox from dialog.subr if possible, otherwise fall # back to dialog(1) (without options, making it obvious when using # un-aided system dialog). # if f_have f_dialog_info; then f_dialog_info "$msg" else dialog --infobox "$msg" 0 0 fi } # f_show_msg $format [$arguments ...] # # Display a message in a dialog box using printf(1) syntax. # f_show_msg() { local msg msg=$( printf "$@" ) # # Use f_dialog_msgbox from dialog.subr if possible, otherwise fall # back to dialog(1) (without options, making it obvious when using # un-aided system dialog). # if f_have f_dialog_msgbox; then f_dialog_msgbox "$msg" else dialog --msgbox "$msg" 0 0 fi } # f_show_err $format [$arguments ...] # # Display a message in a dialog box with ``Error'' i18n title (overridden by # setting msg_error) using printf(1) syntax. # f_show_err() { local msg msg=$( printf "$@" ) : ${msg:=${msg_an_unknown_error_occurred:-An unknown error occurred}} if [ "$_DIALOG_SUBR" ]; then f_dialog_title "${msg_error:-Error}" f_dialog_msgbox "$msg" f_dialog_title_restore else dialog --title "${msg_error:-Error}" --msgbox "$msg" 0 0 fi return $SUCCESS } # f_yesno $format [$arguments ...] # # Display a message in a dialog yes/no box using printf(1) syntax. # f_yesno() { local msg msg=$( printf "$@" ) # # Use f_dialog_yesno from dialog.subr if possible, otherwise fall # back to dialog(1) (without options, making it obvious when using # un-aided system dialog). # if f_have f_dialog_yesno; then f_dialog_yesno "$msg" else dialog --yesno "$msg" 0 0 fi } # f_noyes $format [$arguments ...] # # Display a message in a dialog yes/no box using printf(1) syntax. # NOTE: THis is just like the f_yesno function except "No" is default. # f_noyes() { local msg msg=$( printf "$@" ) # # Use f_dialog_noyes from dialog.subr if possible, otherwise fall # back to dialog(1) (without options, making it obvious when using # un-aided system dialog). # if f_have f_dialog_noyes; then f_dialog_noyes "$msg" else dialog --defaultno --yesno "$msg" 0 0 fi } # f_show_help $file # # Display a language help-file. Automatically takes $LANG and $LC_ALL into # consideration when displaying $file (suffix ".$LC_ALL" or ".$LANG" will # automatically be added prior to loading the language help-file). # # If a language has been requested by setting either $LANG or $LC_ALL in the # environment and the language-specific help-file does not exist we will fall # back to $file without-suffix. # # If the language help-file does not exist, an error is displayed instead. # f_show_help() { local file="$1" local lang="${LANG:-$LC_ALL}" [ -f "$file.$lang" ] && file="$file.$lang" # # Use f_dialog_textbox from dialog.subr if possible, otherwise fall # back to dialog(1) (without options, making it obvious when using # un-aided system dialog). # if f_have f_dialog_textbox; then f_dialog_textbox "$file" else dialog --msgbox "$( cat "$file" 2>&1 )" 0 0 fi } # f_include $file # # Include a shell subroutine file. # # If the subroutine file exists but returns error status during loading, exit # is called and execution is prematurely terminated with the same error status. # f_include() { local file="$1" f_dprintf "f_include: file=[%s]" "$file" . "$file" || exit $? } # f_include_lang $file # # Include a language file. Automatically takes $LANG and $LC_ALL into # consideration when including $file (suffix ".$LC_ALL" or ".$LANG" will # automatically by added prior to loading the language file). # # No error is produced if (a) a language has been requested (by setting either # $LANG or $LC_ALL in the environment) and (b) the language file does not # exist -- in which case we will fall back to loading $file without-suffix. # # If the language file exists but returns error status during loading, exit # is called and execution is prematurely terminated with the same error status. # f_include_lang() { local file="$1" local lang="${LANG:-$LC_ALL}" f_dprintf "f_include_lang: file=[%s] lang=[%s]" "$file" "$lang" if [ -f "$file.$lang" ]; then . "$file.$lang" || exit $? else . "$file" || exit $? fi } # f_usage $file [$key1 $value1 ...] # # Display USAGE file with optional pre-processor macro definitions. The first # argument is the template file containing the usage text to be displayed. If # $LANG or $LC_ALL (in order of preference, respectively) is set, ".encoding" # will automatically be appended as a suffix to the provided $file pathname. # # When processing $file, output begins at the first line containing that is # (a) not a comment, (b) not empty, and (c) is not pure-whitespace. All lines # appearing after this first-line are output, including (a) comments (b) empty # lines, and (c) lines that are purely whitespace-only. # # If additional arguments appear after $file, substitutions are made while # printing the contents of the USAGE file. The pre-processor macro syntax is in # the style of autoconf(1), for example: # # f_usage $file "FOO" "BAR" # # Will cause instances of "@FOO@" appearing in $file to be replaced with the # text "BAR" before being printed to the screen. # # This function is a two-parter. Below is the awk(1) portion of the function, # afterward is the sh(1) function which utilizes the below awk script. # f_usage_awk=' BEGIN { found = 0 } { if ( !found && $0 ~ /^[[:space:]]*($|#)/ ) next found = 1 print } ' f_usage() { local file="$1" local lang="${LANG:-$LC_ALL}" f_dprintf "f_usage: file=[%s] lang=[%s]" "$file" "$lang" shift 1 # file local usage if [ -f "$file.$lang" ]; then usage=$( awk "$f_usage_awk" "$file.$lang" ) || exit $FAILURE else usage=$( awk "$f_usage_awk" "$file" ) || exit $FAILURE fi while [ $# -gt 0 ]; do local key="$1" export value="$2" usage=$( echo "$usage" | awk \ "{ gsub(/@$key@/, ENVIRON[\"value\"]); print }" ) shift 2 done f_err "%s\n" "$usage" exit $FAILURE } # f_index_file $keyword [$var_to_set] # # Process all INDEX files known to bsdconfig and return the path to first file # containing a menu_selection line with a keyword portion matching $keyword. # # If $LANG or $LC_ALL (in order of preference, respectively) is set, # "INDEX.encoding" files will be searched first. # # If no file is found, error status is returned along with the NULL string. # # If $var_to_set is NULL or missing, output is printed to stdout (which is less # recommended due to performance degradation; in a loop for example). # # This function is a two-parter. Below is the awk(1) portion of the function, # afterward is the sh(1) function which utilizes the below awk script. # f_index_file_awk=' # Variables that should be defined on the invocation line: # -v keyword="keyword" BEGIN { found = 0 } ( $0 ~ "^menu_selection=\"" keyword "\\|" ) { print FILENAME found++ exit } END { exit ! found } ' f_index_file() { local __keyword="$1" __var_to_set="$2" local __lang="${LANG:-$LC_ALL}" local __indexes="$BSDCFG_LIBE${BSDCFG_LIBE:+/}*/INDEX" f_dprintf "f_index_file: keyword=[%s] lang=[%s]" "$__keyword" "$__lang" if [ "$__lang" ]; then if [ "$__var_to_set" ]; then eval "$__var_to_set"='"$( awk -v keyword="$__keyword" \ "$f_index_file_awk" $__indexes.$__lang )"' && return $SUCCESS else awk -v keyword="$__keyword" "$f_index_file_awk" \ $__indexes.$__lang && return $SUCCESS fi # No match, fall-thru to non-i18n sources fi if [ "$__var_to_set" ]; then eval "$__var_to_set"='"$( awk -v keyword="$__keyword" \ "$f_index_file_awk" $__indexes )"' && return $SUCCESS else awk -v keyword="$__keyword" "$f_index_file_awk" $__indexes && return $SUCCESS fi # No match? Fall-thru to `local' libexec sources (add-on modules) [ "$BSDCFG_LOCAL_LIBE" ] || return $FAILURE __indexes="$BSDCFG_LOCAL_LIBE/*/INDEX" if [ "$__lang" ]; then if [ "$__var_to_set" ]; then eval "$__var_to_set"='"$( awk -v keyword="$__keyword" \ "$f_index_file_awk" $__indexes.$__lang )"' && return $SUCCESS else awk -v keyword="$__keyword" "$f_index_file_awk" \ $__indexes.$__lang && return $SUCCESS fi # No match, fall-thru to non-i18n sources fi if [ "$__var_to_set" ]; then eval "$__var_to_set"='$( awk -v keyword="$__keyword" \ "$f_index_file_awk" $__indexes )"' else awk -v keyword="$__keyword" "$f_index_file_awk" $__indexes fi } # f_index_menusel_keyword $indexfile $pgm [$var_to_set] # # Process $indexfile and return only the keyword portion of the menu_selection # line with a command portion matching $pgm. # # This function is for internationalization (i18n) mapping of the on-disk # scriptname ($pgm) into the localized language (given language-specific # $indexfile). If $LANG or $LC_ALL (in orderder of preference, respectively) is # set, ".encoding" will automatically be appended as a suffix to the provided # $indexfile pathname. # # If, within $indexfile, multiple $menu_selection values map to $pgm, only the # first one will be returned. If no mapping can be made, the NULL string is # returned. # # If $indexfile does not exist, error status is returned with NULL. # # If $var_to_set is NULL or missing, output is printed to stdout (which is less # recommended due to performance degradation; in a loop for example). # # This function is a two-parter. Below is the awk(1) portion of the function, # afterward is the sh(1) function which utilizes the below awk script. # f_index_menusel_keyword_awk=' # Variables that should be defined on the invocation line: # -v pgm="program_name" # BEGIN { prefix = "menu_selection=\"" plen = length(prefix) found = 0 } { if (!match($0, "^" prefix ".*\\|.*\"")) next keyword = command = substr($0, plen + 1, RLENGTH - plen - 1) sub(/^.*\|/, "", command) sub(/\|.*$/, "", keyword) if ( command == pgm ) { print keyword found++ exit } } END { exit ! found } ' f_index_menusel_keyword() { local __indexfile="$1" __pgm="$2" __var_to_set="$3" local __lang="${LANG:-$LC_ALL}" __file="$__indexfile" [ -f "$__indexfile.$__lang" ] && __file="$__indexfile.$__lang" f_dprintf "f_index_menusel_keyword: index=[%s] pgm=[%s] lang=[%s]" \ "$__file" "$__pgm" "$__lang" if [ "$__var_to_set" ]; then setvar "$__var_to_set" "$( awk \ -v pgm="$__pgm" "$f_index_menusel_keyword_awk" "$__file" )" else awk -v pgm="$__pgm" "$f_index_menusel_keyword_awk" "$__file" fi } # f_index_menusel_command $indexfile $keyword [$var_to_set] # # Process $indexfile and return only the command portion of the menu_selection # line with a keyword portion matching $keyword. # # This function is for mapping [possibly international] keywords into the # command to be executed. If $LANG or $LC_ALL (order of preference) is set, # ".encoding" will automatically be appended as a suffix to the provided # $indexfile pathname. # # If, within $indexfile, multiple $menu_selection values map to $keyword, only # the first one will be returned. If no mapping can be made, the NULL string is # returned. # # If $indexfile doesn't exist, error status is returned with NULL. # # If $var_to_set is NULL or missing, output is printed to stdout (which is less # recommended due to performance degradation; in a loop for example). # # This function is a two-parter. Below is the awk(1) portion of the function, # afterward is the sh(1) function which utilizes the below awk script. # f_index_menusel_command_awk=' # Variables that should be defined on the invocation line: # -v key="keyword" # BEGIN { prefix = "menu_selection=\"" plen = length(prefix) found = 0 } { if (!match($0, "^" prefix ".*\\|.*\"")) next keyword = command = substr($0, plen + 1, RLENGTH - plen - 1) sub(/^.*\|/, "", command) sub(/\|.*$/, "", keyword) if ( keyword == key ) { print command found++ exit } } END { exit ! found } ' f_index_menusel_command() { local __indexfile="$1" __keyword="$2" __var_to_set="$3" __command local __lang="${LANG:-$LC_ALL}" __file="$__indexfile" [ -f "$__indexfile.$__lang" ] && __file="$__indexfile.$__lang" f_dprintf "f_index_menusel_command: index=[%s] key=[%s] lang=[%s]" \ "$__file" "$__keyword" "$__lang" [ -f "$__file" ] || return $FAILURE __command=$( awk -v key="$__keyword" \ "$f_index_menusel_command_awk" "$__file" ) || return $FAILURE # # If the command pathname is not fully qualified fix-up/force to be # relative to the $indexfile directory. # case "$__command" in /*) : already fully qualified ;; *) local __indexdir="${__indexfile%/*}" [ "$__indexdir" != "$__indexfile" ] || __indexdir="." __command="$__indexdir/$__command" esac if [ "$__var_to_set" ]; then setvar "$__var_to_set" "$__command" else echo "$__command" fi } # f_running_as_init # # Returns true if running as init(1). # f_running_as_init() { # # When a custom init(8) performs an exec(3) to invoke a shell script, # PID 1 becomes sh(1) and $PPID is set to 1 in the executed script. # [ ${PPID:-0} -eq 1 ] # Return status } # f_mounted $local_directory # f_mounted -b $device # # Return success if a filesystem is mounted on a particular directory. If `-b' # is present, instead check that the block device (or a partition thereof) is # mounted. # f_mounted() { local OPTIND OPTARG flag use_device= while getopts b flag; do case "$flag" in b) use_device=1 ;; esac done shift $(( $OPTIND - 1 )) if [ "$use_device" ]; then local device="$1" mount | grep -Eq \ "^$device([[:space:]]|p[0-9]|s[0-9]|\.nop|\.eli)" else [ -d "$dir" ] || return $FAILURE mount | grep -Eq " on $dir \([^)]+\)$" fi # Return status is that of last grep(1) } # f_eval_catch [-de] [-k $var_to_set] $funcname $utility \ # $format [$arguments ...] # # Silently evaluate a command in a sub-shell and test for error. If debugging # is enabled a copy of the command and its output is sent to debug (either # stdout or file depending on environment). If an error occurs, output of the # command is displayed in a dialog(1) msgbox using the [above] f_show_err() # function (unless optional `-d' flag is given, then no dialog). # # The $funcname argument is sent to debugging while the $utility argument is # used in the title of the dialog box. The command that is executed as well as # sent to debugging with $funcname is the product of the printf(1) syntax # produced by $format with optional $arguments. # # The following options are supported: # # -d Do not use dialog(1). # -e Produce error text from failed command on stderr. # -k var Save output from the command in var. # # Example 1: # # debug=1 # f_eval_catch myfunc echo 'echo "%s"' "Hello, World!" # # Produces the following debug output: # # DEBUG: myfunc: echo "Hello, World!" # DEBUG: myfunc: retval=0 <output below> # Hello, World! # # Example 2: # # debug=1 # f_eval_catch -k contents myfunc cat 'cat "%s"' /some/file # # dialog(1) Error ``cat: /some/file: No such file or directory'' # # contents=[cat: /some/file: No such file or directory] # # Produces the following debug output: # # DEBUG: myfunc: cat "/some/file" # DEBUG: myfunc: retval=1 <output below> # cat: /some/file: No such file or directory # # Example 3: # # debug=1 # echo 123 | f_eval_catch myfunc rev rev # # Produces the following debug output: # # DEBUG: myfunc: rev # DEBUG: myfunc: retval=0 <output below> # 321 # # Example 4: # # debug=1 # f_eval_catch myfunc true true # # Produces the following debug output: # # DEBUG: myfunc: true # DEBUG: myfunc: retval=0 <no output> # # Example 5: # # f_eval_catch -de myfunc ls 'ls "%s"' /some/dir # # Output on stderr ``ls: /some/dir: No such file or directory'' # # Example 6: # # f_eval_catch -dek contents myfunc ls 'ls "%s"' /etc # # Output from `ls' sent to stderr and also saved in $contents # f_eval_catch() { local __no_dialog= __show_err= __var_to_set= # # Process local function arguments # local OPTIND OPTARG __flag while getopts "dek:" __flag > /dev/null; do case "$__flag" in d) __no_dialog=1 ;; e) __show_err=1 ;; k) __var_to_set="$OPTARG" ;; esac done shift $(( $OPTIND - 1 )) local __funcname="$1" __utility="$2"; shift 2 local __cmd __output __retval __cmd=$( printf -- "$@" ) f_dprintf "%s: %s" "$__funcname" "$__cmd" # Log command *before* eval __output=$( exec 2>&1; eval "$__cmd" ) __retval=$? if [ "$__output" ]; then [ "$__show_err" ] && echo "$__output" >&2 f_dprintf "%s: retval=%i <output below>\n%s" "$__funcname" \ $__retval "$__output" else f_dprintf "%s: retval=%i <no output>" "$__funcname" $__retval fi ! [ "$__no_dialog" -o "$nonInteractive" -o $__retval -eq $SUCCESS ] && msg_error="${msg_error:-Error}${__utility:+: $__utility}" \ f_show_err "%s" "$__output" # NB: f_show_err will handle NULL output appropriately [ "$__var_to_set" ] && setvar "$__var_to_set" "$__output" return $__retval } # f_count $var_to_set arguments ... # # Sets $var_to_set to the number of arguments minus one (the effective number # of arguments following $var_to_set). # # Example: # f_count count dog house # count=[2] # f_count() { setvar "$1" $(( $# - 1 )) } # f_count_ifs $var_to_set string ... # # Sets $var_to_set to the number of words (split by the internal field # separator, IFS) following $var_to_set. # # Example 1: # # string="word1 word2 word3" # f_count_ifs count "$string" # count=[3] # f_count_ifs count $string # count=[3] # # Example 2: # # IFS=. f_count_ifs count www.freebsd.org # count=[3] # # NB: Make sure to use double-quotes if you are using a custom value for IFS # and you don't want the current value to effect the result. See example 3. # # Example 3: # # string="a-b c-d" # IFS=- f_count_ifs count "$string" # count=[3] # IFS=- f_count_ifs count $string # count=[4] # f_count_ifs() { local __var_to_set="$1" shift 1 set -- $* setvar "$__var_to_set" $# } ############################################################ MAIN # # Trap signals so we can recover gracefully # trap 'f_interrupt' INT trap 'f_die' TERM PIPE XCPU XFSZ FPE TRAP ABRT SEGV trap '' ALRM PROF USR1 USR2 HUP VTALRM # # Clone terminal stdout/stderr so we can redirect to it from within sub-shells # eval exec $TERMINAL_STDOUT_PASSTHRU\>\&1 eval exec $TERMINAL_STDERR_PASSTHRU\>\&2 # # Self-initialize unless requested otherwise # f_dprintf "%s: DEBUG_SELF_INITIALIZE=[%s]" \ dialog.subr "$DEBUG_SELF_INITIALIZE" case "$DEBUG_SELF_INITIALIZE" in ""|0|[Nn][Oo]|[Oo][Ff][Ff]|[Ff][Aa][Ll][Ss][Ee]) : do nothing ;; *) f_debug_init esac # # Log our operating environment for debugging purposes # f_dprintf "UNAME_S=[%s] UNAME_P=[%s] UNAME_R=[%s]" \ "$UNAME_S" "$UNAME_P" "$UNAME_R" f_dprintf "%s: Successfully loaded." common.subr fi # ! $_COMMON_SUBR
Upload File
Create Folder