slitaz-base-files annotate rootfs/lib/libtaz.sh @ rev 167
Add colorize() to libtaz.sh
author | Christophe Lincoln <pankso@slitaz.org> |
---|---|
date | Tue May 15 15:48:14 2012 +0200 (2012-05-15) |
parents | 581ddfa0d620 |
children | 3a6613021c40 |
rev | line source |
---|---|
pankso@125 | 1 #!/bin/sh |
pankso@125 | 2 # |
pankso@125 | 3 # SliTaz Base functions used from boot scripts to end user tools. Use |
pankso@125 | 4 # gettext and not echo for messages. Keep output suitable for GTK boxes |
pankso@125 | 5 # and Ncurses dialog. LibTaz should not depend on any configuration file. |
paul@166 | 6 # No bloated code here, functions must be used by at least 3-4 tools. |
pankso@139 | 7 # |
pankso@139 | 8 # Documentation: man libtaz or /usr/share/doc/slitaz/libtaz.txt |
pankso@125 | 9 # |
pankso@125 | 10 # Copyright (C) 2012 SliTaz GNU/Linux - BSD License |
pankso@125 | 11 # |
pankso@125 | 12 |
pankso@125 | 13 # Internationalization. |
pankso@125 | 14 . /usr/bin/gettext.sh |
pankso@125 | 15 TEXTDOMAIN='slitaz-base' |
pankso@125 | 16 export TEXTDOMAIN |
pankso@125 | 17 |
pankso@125 | 18 # Internal variables. |
pankso@125 | 19 okmsg="$(gettext "Done")" |
pankso@125 | 20 ermsg="$(gettext "Failed")" |
pankso@125 | 21 okcolor=32 |
pankso@125 | 22 ercolor=31 |
pankso@125 | 23 |
pankso@137 | 24 # Parse cmdline options and store values in a variable. |
pankso@125 | 25 for opt in "$@" |
pankso@125 | 26 do |
pankso@125 | 27 case "$opt" in |
pankso@137 | 28 --*=*) export ${opt#--} ;; |
pankso@137 | 29 --*) export ${opt#--}="yes" ;; |
pankso@125 | 30 esac |
pankso@125 | 31 done |
pankso@131 | 32 [ "$HTTP_REFERER" ] && output="html" |
pankso@125 | 33 |
pankso@125 | 34 # Return command status. Default to colored console output. |
pankso@125 | 35 status() { |
pankso@125 | 36 local check=$? |
pankso@131 | 37 case $output in |
pankso@161 | 38 raw|gtk) |
pankso@161 | 39 done=" $okmsg" |
pankso@131 | 40 error=" $ermsg" ;; |
pankso@131 | 41 html) |
pankso@167 | 42 done=" <span style='color: $okcolor;'>$okmsg</span>" |
pankso@167 | 43 error=" <span style='color: $ercolor;'>$ermsg</span>" ;; |
pankso@136 | 44 *) |
pankso@141 | 45 cols=$(stty -a -F /dev/tty | head -n 1 | cut -d ";" -f 3 | awk '{print $2}') |
pankso@131 | 46 local scol=$(($cols - 10)) |
pankso@131 | 47 done="\\033[${scol}G[ \\033[1;${okcolor}m${okmsg}\\033[0;39m ]" |
pankso@131 | 48 error="\\033[${scol}G[ \\033[1;${ercolor}m${ermsg}\\033[0;39m ]" ;; |
pankso@131 | 49 esac |
pankso@125 | 50 if [ $check = 0 ]; then |
pankso@125 | 51 echo -e "$done" |
pankso@125 | 52 else |
pankso@125 | 53 echo -e "$error" |
pankso@125 | 54 fi |
pankso@125 | 55 } |
pankso@125 | 56 |
pankso@125 | 57 # Line separator. |
pankso@125 | 58 separator() { |
pankso@132 | 59 local sepchar="=" |
pankso@132 | 60 [ "$HTTP_REFERER" ] && local sepchar="<hr />" |
pankso@132 | 61 case $output in |
pankso@132 | 62 raw|gtk) local sepchar="-" && local cols="8" ;; |
pankso@132 | 63 html) local sepchar="<hr />" ;; |
pankso@141 | 64 *) local cols=$(stty -a -F /dev/tty | head -n 1 | cut -d ";" -f 3 | awk '{print $2}') ;; |
pankso@132 | 65 esac |
pankso@125 | 66 for c in $(seq 1 $cols); do |
pankso@131 | 67 echo -n "$sepchar" |
pankso@125 | 68 done && echo "" |
pankso@125 | 69 } |
pankso@125 | 70 |
pankso@164 | 71 # New line for echo -n or gettext. |
pankso@164 | 72 newline() { |
pankso@164 | 73 echo "" |
pankso@164 | 74 } |
pankso@164 | 75 |
pankso@125 | 76 # Display a bold message. GTK Yad: Works only in --text="" |
pankso@125 | 77 boldify() { |
pankso@125 | 78 case $output in |
meshca@149 | 79 raw) echo "$@" ;; |
meshca@149 | 80 gtk) echo "<b>$@</b>" ;; |
meshca@149 | 81 html) echo "<strong>$@</strong>" ;; |
meshca@149 | 82 *) echo -e "\\033[1m$@\\033[0m" ;; |
pankso@125 | 83 esac |
pankso@125 | 84 } |
pankso@125 | 85 |
pankso@167 | 86 # Usage: colorize "Message" colorNB or use --color=NB option |
pankso@167 | 87 # when running a tool. Default to white/38 and no html or gtk. |
pankso@167 | 88 colorize() { |
pankso@167 | 89 : ${color=$2} |
pankso@167 | 90 case $output in |
pankso@167 | 91 raw|gtk|html) echo "$1" ;; |
pankso@167 | 92 *) |
pankso@167 | 93 : ${color=38} |
pankso@167 | 94 echo -e "\\033[1;${color}m${1}\\033[0;39m" ;; |
pankso@167 | 95 esac |
pankso@167 | 96 unset color |
pankso@167 | 97 } |
pankso@167 | 98 |
meshca@158 | 99 # Indent text $1 spaces |
pankso@161 | 100 indent() { |
meshca@158 | 101 local in="$1" |
meshca@158 | 102 shift |
pankso@161 | 103 echo -e "\033["$in"G $@"; |
meshca@158 | 104 } |
meshca@158 | 105 |
pankso@125 | 106 # Check if user is logged as root. |
pankso@125 | 107 check_root() { |
pankso@125 | 108 if [ $(id -u) != 0 ]; then |
pankso@125 | 109 gettext "You must be root to execute:" && echo " $(basename $0) $@" |
pankso@125 | 110 exit 1 |
pankso@125 | 111 fi |
pankso@125 | 112 } |
meshca@158 | 113 |
pankso@161 | 114 # Gettextize yes/no. |
meshca@158 | 115 translate_query() { |
meshca@158 | 116 case $1 in |
meshca@158 | 117 y) gettext "y" ;; |
meshca@158 | 118 Y) gettext "Y" ;; |
meshca@158 | 119 n) gettext "n" ;; |
meshca@158 | 120 N) gettext "N" ;; |
meshca@158 | 121 # Support other cases but keep them untranslated. |
meshca@158 | 122 *) echo "$1" ;; |
meshca@158 | 123 esac |
meshca@158 | 124 } |
meshca@160 | 125 |
pankso@161 | 126 # Usage: echo -n "The question" && confirm |
pankso@161 | 127 confirm() { |
pankso@161 | 128 [ "$yes" ] && true |
pankso@161 | 129 echo -n " ($(translate_query y)/$(translate_query N)) ? " |
pankso@161 | 130 read answer |
pankso@161 | 131 [ "$answer" == "$(translate_query y)" ] |
meshca@160 | 132 } |
pankso@161 | 133 |
pankso@164 | 134 # Log activities. $activity should be set by the script. The log format |
pankso@164 | 135 # is suitable for web interfaces like cook. Usage: log "String" |
pankso@162 | 136 log() { |
pankso@163 | 137 [ "$activity" ] || activity=/var/log/slitaz/libtaz.log |
pankso@164 | 138 echo "$(date '+%Y-%m-%d %H:%M') : $@" >> $activity |
pankso@162 | 139 } |