slitaz-base-files view rootfs/lib/libtaz.sh @ rev 309

libtaz.sh: confirm(): handle '--noconfirm'.
author Aleksej Bobylev <al.bobylev@gmail.com>
date Fri Jul 22 09:37:14 2016 +0300 (2016-07-22)
parents a5e6aa408742
children 5829aa52b9ee
line source
1 #!/bin/sh
2 #
3 # SliTaz Base functions.
4 # Documentation: `man libtaz` or /usr/share/doc/slitaz/libtaz.txt
5 #
6 # Copyright (C) 2012-2015 SliTaz GNU/Linux - BSD License
7 #
8
9 . /usr/bin/gettext.sh
10 alias sed="busybox sed"
11
12 # Internal
13 lgettext() { gettext -d 'slitaz-base' "$@"; }
14 translate_query() {
15 case $1 in
16 y) lgettext "y";;
17 Y) lgettext "Y";;
18 n) lgettext "n";;
19 N) lgettext "N";;
20 # Support other cases but keep them untranslated.
21 *) echo "$1" ;;
22 esac
23 }
24 okmsg="$(lgettext 'Done')"
25 ermsg="$(lgettext 'Failed')"
26 : ${okcolor=32}
27 : ${ercolor=31}
28 : ${decolor=36}
29
30 # Parse cmdline options and store values in a variable.
31 for opt in "$@"; do
32 opt_name="${opt%%=*}"; opt_name="$(echo -n "${opt_name#--}" | tr -c 'a-zA-Z0-9' '_')"
33 case "$opt" in
34 --[0-9]*=*) export _$opt_name="${opt#*=}" ;;
35 --[0-9]*) export _$opt_name=yes ;;
36 --*=*) export $opt_name="${opt#*=}" ;;
37 --*) export $opt_name=yes ;;
38 esac
39 done
40 [ "$HTTP_REFERER" ] && output='html'
41
42
43
44
45 # i18n functions
46 _() { local T="$1"; shift; printf "$(eval_gettext "$T")" "$@"; echo; }
47 _n() { local T="$1"; shift; printf "$(eval_gettext "$T")" "$@"; }
48 _p() { local S="$1" P="$2" N="$3"; shift 3; printf "$(ngettext "$S" "$P" "$N")" "$@"; }
49
50 # Get terminal columns
51 get_cols() { stty size 2>/dev/null | awk -vc=$cols 'END{print c?c:($2 && $2<80)?$2:80}'; }
52
53 # Last command status
54 status() {
55 local ret_code=$?
56 [ -n "$quiet" -a "$ret_code" -eq 0 ] && return
57 [ -n "$quiet" ] && action "$saved_action" no-quiet
58
59 case $ret_code in
60 0) local msg="$okmsg" color="$okcolor";;
61 *) local msg="$ermsg" color="$ercolor";;
62 esac
63 case $output in
64 raw|gtk) echo " $msg";;
65 html) echo " <span class=\"float-right color$color\">$msg</span>";;
66 *) echo -e "[ \\033[1;${color}m$msg\\033[0;39m ]";;
67 esac
68 }
69
70 # Line separator
71 separator() {
72 [ -n "$quiet" ] && return
73 case $output in
74 gtk) echo '--------';;
75 html) echo -n '<hr/>';;
76 *) printf "%$(get_cols)s\n" | tr ' ' "${1:-=}";;
77 esac
78 }
79
80 # New line
81 newline() {
82 [ -z "$quiet" ] && echo
83 }
84
85 # Display a bold message
86 boldify() {
87 [ -n "$quiet" ] && return
88 case $output in
89 raw) echo "$@" ;;
90 gtk) echo "<b>$@</b>" ;;
91 html) echo "<strong>$@</strong>" ;;
92 *) echo -e "\\033[1m$@\\033[0m" ;;
93 esac
94 }
95
96 # Colorize message
97 colorize() {
98 [ -n "$quiet" ] && return
99 : ${color=$1}
100 shift
101 case $output in
102 raw|gtk) echo "$@";;
103 html) echo -n "<span class=\"color$color\">$@</span>";;
104 *) case $color in
105 0*) echo -e "\\033[${color:-38}m$@\\033[39m";;
106 *) echo -e "\\033[1;${color:-38}m$@\\033[0;39m";;
107 esac;;
108 esac
109 unset color
110 }
111
112 # Indent text
113 indent() {
114 [ -n "$quiet" ] && return
115 local in="$1"
116 shift
117 echo -e "\033["$in"G $@";
118 }
119
120 # Extended MeSsaGe output
121 emsg() {
122 [ -n "$quiet" ] && return
123 local sep="\n$(separator)\n"
124 case $output in
125 raw)
126 echo "$@" | sed -e 's|<b>||g; s|</b>||g; s|<c [0-9]*>||g; \
127 s|</c>||g; s|<->|'$sep'|g; s|<n>|\n|g; s|<i [0-9]*>| |g' ;;
128 gtk)
129 echo "$@" | sed -e 's|<c [0-9]*>||g; s|</c>||g; s|<->|'$sep'|g; \
130 s|<n>|\n|g; s|<i [0-9]*>| |g' ;;
131 html)
132 echo "$@" | sed -e 's|<b>|<strong>|g; s|</b>|</strong>|g; \
133 s|<c \([0-9]*\)>|<span class="color\1">|g; s|</c>|</span>|g; \
134 s|<n>|<br/>|g; s|<->|<hr/>|g; s|<i [0-9]*>| |g' ;;
135 *)
136 echo -en "$(echo "$@" | sed -e 's|<b>|\\033[1m|g; s|</b>|\\033[0m|g;
137 s|<c 0\([0-9]*\)>|\\033[\1m|g; s|<c \([1-9][0-9]*\)>|\\033[1;\1m|g;
138 s|</c>|\\033[0;39m|g; s|<n>|\n|g;
139 s|<->|'$sep'|g; s|<i \([0-9]*\)>|\\033[\1G|g')"
140 [ "$1" != "-n" ] && echo
141 ;;
142 esac
143 }
144
145 # Check if user is logged as root
146 check_root() {
147 if [ $(id -u) -ne 0 ]; then
148 lgettext "You must be root to execute:"; echo " $(basename $0) $@"
149 exit 1
150 fi
151 }
152
153 # Display debug info when --debug is used.
154 debug() {
155 [ -n "$debug" ] && echo "$(colorize $decolor 'DEBUG:') $1"
156 }
157
158 # Confirmation
159 confirm() {
160 local answer=''
161 # Check auto-answer, if any
162 [ -n "$yes" ] && answer='y'
163 [ -n "$noconfirm" ] && answer='n'
164 # Print question
165 if [ -n "$1" ]; then
166 echo -n "$1 "
167 else
168 echo -n " ($(translate_query y)/$(translate_query N)) ? "
169 fi
170 # Is it auto-answer?
171 if [ -z "$answer" ]; then
172 read answer
173 else
174 translate_query "$answer"; echo ' (auto)'
175 fi
176 # Return true/false to use in conditions
177 [ "$answer" == "$(translate_query y)" ]
178 }
179
180 # Log activities
181 log() {
182 echo "$(date '+%F %R') : $@" >> ${activity:-/var/log/slitaz/libtaz.log}
183 }
184
185 # Print two-column list of options with descriptions
186 optlist() {
187 [ -n "$quiet" ] && return
188 local in="$(echo "$1" | sed 's| *| |g')" w=$(get_cols) col1=1 line
189 IFS=$'\n'
190 for line in $in; do
191 col=$(echo -n "$line" | cut -f1 | wc -m)
192 [ $col -gt $col1 ] && col1=$col
193 done
194 echo "$in" | sed 's|\t|&\n|' | fold -sw$((w - col1 - 4)) | \
195 sed "/\t/!{s|^.*$|[$((col1 + 4))G&|g}" | sed "/\t$/{N;s|.*| &|;s|\t\n||}"
196 }
197
198 # Wrap words in long terminal message
199 longline() {
200 [ -n "$quiet" ] && return
201 local w=$(get_cols)
202 echo -e "$@" | fold -sw$w
203 }
204
205 # Print localized title
206 title() {
207 [ -n "$quiet" ] && return
208 case $output in
209 html) echo "<section><header>$(_ "$@")</header><pre class=\"scroll\">";;
210 *) newline; boldify "$(_ "$@")"; separator;;
211 esac
212 }
213
214 # Print footer
215 footer() {
216 [ -n "$quiet" ] && return
217 case $output in
218 html) echo "</pre><footer>$1</footer></section>";;
219 *) separator; echo "$1"; [ -n "$1" ] && newline;;
220 esac
221 }
222
223 # Print current action
224 saved_action=''
225 action() {
226 saved_action="$1"
227 [ -n "$quiet" -a -z "$2" ] && return
228 local w c scol msg chars
229 # Translators: 'w' is the width the wider translated message ('[ Done ]' or '[ Failed ]') takes in a terminal; place here the number
230 w=$(_ 'w'); w=${w/w/10}
231 c=$(get_cols)
232 scol=$(( $c - $w ))
233 msg="$(_n "$@" | fold -sw$scol)"
234 chars=$(echo -n "$msg" | tail -n1 | wc -m)
235 msg="$(printf '%s%'$(( $scol - $chars ))'s' "$msg" '')"
236
237 case $output in
238 raw|gtk|html) echo -n "$msg";;
239 *) echo -ne "\033[0;33m$msg\033[0m";;
240 esac
241 }
242
243 # Print long line as list item
244 itemize() {
245 [ -n "$quiet" ] && return
246 case $output in
247 gtk) echo "$@";;
248 *)
249 local inp="$@" w=$(get_cols) first offset
250 first="$(echo -e "$inp" | fold -sw$w | head -n1)"
251 echo "$first"
252 cols1="$(echo "${first:1}" | wc -c)"
253 offset=$(echo "$first" | sed -n 's|^\([^:\*-]*[:\*-]\).*$|\1|p' | wc -m)
254 echo "${inp:$cols1}" | fold -sw$((w - offset)) | awk \
255 '($0){printf "%'$offset's%s\n","",$0}'
256 ;;
257 esac
258 }