src/functions/functions.util

   1 #!/bin/bash
   2 ###############################################################################
   3 #                                                                             #
   4 # IPFire.org - A linux based firewall                                         #
   5 # Copyright (C) 2010  Michael Tremer & Christian Schmidt                      #
   6 #                                                                             #
   7 # This program is free software: you can redistribute it and/or modify        #
   8 # it under the terms of the GNU General Public License as published by        #
   9 # the Free Software Foundation, either version 3 of the License, or           #
  10 # (at your option) any later version.                                         #
  11 #                                                                             #
  12 # This program is distributed in the hope that it will be useful,             #
  13 # but WITHOUT ANY WARRANTY; without even the implied warranty of              #
  14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the               #
  15 # GNU General Public License for more details.                                #
  16 #                                                                             #
  17 # You should have received a copy of the GNU General Public License           #
  18 # along with this program.  If not, see <http://www.gnu.org/licenses/>.       #
  19 #                                                                             #
  20 ###############################################################################
  21
  22 # A simple print statement
  23 print() {
  24         local fmt=${1}; shift
  25
  26         printf -- "${fmt}\n" "$@"
  27 }
  28
  29 # The args() function takes a number of arguments like
  30 #   var1="abc d" var2="abc" var3="abcd e"
  31 # and splits them into several arguments, devided by newline
  32 args() {
  33         echo "$@" | xargs printf "%s\n"
  34 }
  35
  36 unquote() {
  37         local var="$@"
  38
  39         if [ "${var:0:1}" = "\"" ]; then
  40                 var=${var:1}
  41         fi
  42
  43         local last=$(( ${#var} - 1 ))
  44         if [ ${last} -ge 0 ] && [ "${var:${last}:1}" = "\"" ]; then
  45                 var=${var:0:${last}}
  46         fi
  47
  48         print "${var}"
  49 }
  50
  51 quote() {
  52         print "\"%s\"" "$@"
  53 }
  54
  55 strip() {
  56         local value="$@"
  57
  58         # remove leading whitespace characters
  59         value="${value#"${value%%[![:space:]]*}"}"
  60
  61         # remove trailing whitespace characters
  62         value="${value%"${value##*[![:space:]]}"}"
  63
  64         print "${value}"
  65 }
  66
  67 # Print a pretty error message
  68 error() {
  69         echo -e " ${CLR_RED_B}ERROR${CLR_RESET}  : $@" >&2
  70 }
  71
  72 error_log() {
  73         log ERROR "$@"
  74 }
  75
  76 # Print a pretty warn message
  77 warning() {
  78         echo -e " ${CLR_YELLOW_B}WARNING${CLR_RESET}: $@" >&2
  79 }
  80
  81 warning_log() {
  82         log WARNING "$@"
  83 }
  84
  85 # The next three functions are kept for backwards
  86 # compatibility. The need to be dropped at some time.
  87 listsort() {
  88         list_sort $@
  89 }
  90
  91 listmatch() {
  92         list_match $@
  93 }
  94
  95 listlength() {
  96         list_length $@
  97 }
  98
  99 # Speedup function to avoid a call of the basename binary
 100 basename() {
 101         echo "${1##*/}"
 102 }
 103
 104 format() {
 105         local key=${1}
 106         assert isset key
 107
 108         local format=${2}
 109         assert isset format
 110
 111         shift 2
 112
 113         printf -v "${key}" "${format}" "$@"
 114 }
 115
 116 assign() {
 117         local key=${1}
 118         assert isset key
 119         shift
 120
 121         format "${key}" "%s" "$@"
 122 }
 123
 124 fread() {
 125         local file=${1}
 126         assert isset file
 127
 128         [ -r "${file}" ] || return ${EXIT_ERROR}
 129
 130         print "$(<${file})"
 131 }
 132
 133 fwrite() {
 134         local file=${1}
 135         assert isset file
 136         shift
 137
 138         if [ ! -w "${file}" ]; then
 139                 log ERROR "${file}: No such file"
 140                 return ${EXIT_ERROR}
 141         fi
 142
 143         print "%s" "$@" >> ${file} 2>/dev/null
 144 }
 145
 146 make_parent_dir() {
 147         local path="${1}"
 148
 149         local dirname="$(dirname "${path}")"
 150         mkdir -p "${dirname}"
 151 }
 152
 153 enabled() {
 154         local param=${1}
 155
 156         list_match "${!param}" yes on true 1
 157 }
 158
 159 mac_generate() {
 160         local b="$(random 12)"
 161
 162         # Remove multicast bit
 163         # and set address is software assigned
 164         local first_byte=$(( 0x${b:0:2} & 0xfe ))
 165         first_byte=$(( ${first_byte} | 0x02 ))
 166
 167         local output
 168         printf -v output "%02x" "${first_byte}"
 169
 170         output="${output}:${b:2:2}:${b:4:2}:${b:6:2}:${b:8:2}:${b:10:2}"
 171
 172         # Check if output is valid
 173         assert mac_is_valid "${output}"
 174
 175         echo "${output}"
 176 }
 177
 178 mac_format() {
 179         local mac=${1}
 180         assert isset mac
 181
 182         # Remove all colons and make the rest lowercase.
 183         mac=${mac//:/}
 184         mac=${mac,,}
 185
 186         local output
 187         if [ "${#mac}" = "12" ]; then
 188                 # Add colons (:) to mac address
 189                 output=${mac:0:2}
 190                 local i
 191                 for i in 2 4 6 8 10; do
 192                         output="${output}:${mac:${i}:2}"
 193                 done
 194         else
 195                 output=${mac}
 196         fi
 197
 198         assert mac_is_valid ${output}
 199
 200         print "${output}"
 201 }
 202
 203 mac_is_valid() {
 204         local mac=${1}
 205
 206         [[ ${mac} =~ ^([0-9a-f]{2}\:){5}[0-9a-f]{2}$ ]]
 207 }
 208
 209 uuid() {
 210         echo $(</proc/sys/kernel/random/uuid)
 211 }
 212
 213 rand() {
 214         local uuid="$(uuid)"
 215         echo "${uuid//-/}"
 216 }
 217
 218 random() {
 219         local length="${1:-8}"
 220
 221         local random
 222         while [ ${#random} -lt ${length} ]; do
 223                 random="${random}$(rand)"
 224         done
 225
 226         echo "${random:0:${length}}"
 227 }
 228
 229 isset() {
 230         local var=${1}
 231
 232         [ -n "${!var}" ]
 233 }
 234
 235 isoneof() {
 236         local var=${!1}
 237         shift
 238
 239         list_match "${var}" "$@"
 240 }
 241
 242 isbool() {
 243         local var=${1}
 244
 245         isoneof ${var} 0 1 no yes on off
 246 }
 247
 248 isinteger() {
 249         local var=${!1}
 250
 251         [[ ${var} =~ ^[0-9]+$ ]]
 252 }
 253
 254 ismac() {
 255         local mac=${!1}
 256
 257         mac_is_valid ${mac}
 258 }
 259
 260 isipaddress() {
 261         local addr=${!1}
 262
 263         ip_is_valid ${addr}
 264 }
 265
 266 backtrace() {
 267         local start=1
 268
 269         echo # Empty line
 270         error_log "Backtrace (most recent call in first line):"
 271
 272         local i source
 273         for i in $(seq ${start} ${#BASH_SOURCE[*]}); do
 274                 [ -z "${FUNCNAME[${i}]}" ] && continue
 275
 276                 # Print called binary with arguments.
 277                 if [ "${FUNCNAME[${i}]}" == "main" ]; then
 278                         local args="$(list_reverse ${BASH_ARGV[*]})"
 279                         printf -v source "%20s" "$0"
 280                         error_log "  ${source} ${args}"
 281                         continue
 282                 fi
 283
 284                 source=${BASH_SOURCE[$(( ${i} + 1 ))]}
 285                 error_log "  $(printf "%20s" "'${FUNCNAME[${i}]}'") called from ${source:-<shell>}:${BASH_LINENO[${i}]}"
 286         done
 287 }
 288
 289 assert() {
 290         local assertion="$@"
 291
 292         if ! ${assertion}; then
 293                 error_log "Assertion '${assertion}' failed."
 294                 backtrace
 295                 exit ${EXIT_ERROR_ASSERT}
 296         fi
 297
 298         return ${EXIT_OK}
 299 }
 300
 301 # This function checks, if the given argument is an assert error
 302 # exit code. If this is the case, the script will halt immediately.
 303 assert_check_retval() {
 304         local ret=${1}
 305
 306         if [ ${ret} -eq ${EXIT_ERROR_ASSERT} ]; then
 307                 exit ${EXIT_ERROR_ASSERT}
 308         fi
 309
 310         return ${ret}
 311 }
 312
 313 exec_cmd() {
 314         local cmd=$@
 315
 316         log DEBUG "Running command: ${cmd}"
 317
 318         DEBUG=${DEBUG} \
 319         LOG_DISABLE_STDOUT="${LOG_DISABLE_STDOUT}" \
 320         LOG_FACILITY="${LOG_FACILITY}" \
 321                 ${SHELL} ${cmd}
 322         local ret=$?
 323
 324         #log DEBUG "Returned with code '${ret}'"
 325
 326         if [ ${ret} -eq ${EXIT_ERROR_ASSERT} ]; then
 327                 error_log "Stopping parent process due to assertion error in child process: ${cmd}"
 328                 exit ${EXIT_ERROR_ASSERT}
 329         fi
 330
 331         return ${ret}
 332 }
 333
 334 cmd() {
 335         local cmd=$@
 336
 337         log DEBUG "Running command: ${cmd}"
 338
 339         ${cmd}
 340         local ret=$?
 341
 342         log DEBUG "Returned with code '${ret}'"
 343
 344         return ${ret}
 345 }
 346
 347 cmd_quiet() {
 348         cmd $@ &>/dev/null
 349 }
 350
 351 cmd_exec() {
 352         local cmd=$@
 353
 354         log DEBUG "Exec'ing command: ${cmd}"
 355
 356         exec ${cmd}
 357
 358         log ERROR "Could not exec-ute: ${cmd}"
 359         exit ${EXIT_ERROR}
 360 }
 361
 362 cmd_not_implemented() {
 363         assert false "not implemented"
 364 }
 365
 366 # Runs a command in a clean environment so that no confidential information
 367 # is leaked to any untrusted commands.
 368 cmd_clean_environment() {
 369         local cmd=$@
 370
 371         log DEBUG "Running command in a clean environment: ${cmd}"
 372         env -i -- ${cmd}
 373         local ret=${?}
 374
 375         log DEBUG "Returned with code '${ret}'"
 376         return ${ret}
 377 }
 378
 379 # Increase security of the read command
 380 read() {
 381         builtin read -r $@
 382 }
 383
 384 seq() {
 385         if [ $# -eq 2 ]; then
 386                 eval echo {${1}..${2}}
 387         elif [ $# -eq 3 ]; then
 388                 eval echo {${1}..${3}..${2}}
 389         fi
 390 }
 391
 392 which() {
 393         type -P $@
 394 }
 395
 396 # Prints the number of seconds since epoch.
 397 timestamp() {
 398         date -u "+%s"
 399 }
 400
 401 beautify_time() {
 402         local value=${1}
 403
 404         local unit
 405         local limit
 406         for unit in s m h d w; do
 407                 case "${unit}" in
 408                         s|m|h)
 409                                 limit=60
 410                                 ;;
 411                         d)
 412                                 limit=24
 413                                 ;;
 414                         w)
 415                                 limit=7
 416                                 ;;
 417                 esac
 418
 419                 [ ${value} -lt ${limit} ] && break
 420
 421                 value=$(( ${value} / ${limit} ))
 422         done
 423
 424         echo "${value}${unit}"
 425 }
 426
 427 beautify_bytes() {
 428         local value=${1}
 429
 430         local unit
 431         local limit=1024
 432         for unit in B k M G T; do
 433                 [ ${value} -lt ${limit} ] && break
 434                 value=$(( ${value} / ${limit} ))
 435         done
 436
 437         echo "${value}${unit}"
 438 }
 439
 440 module_load() {
 441         local module=${1}
 442
 443         if ! grep -q "^${module}" /proc/modules; then
 444                 log DEBUG "Loading module '${module}'."
 445                 modprobe ${module}
 446         fi
 447 }
 448
 449 binary_exists() {
 450         local binary=${1}
 451
 452         if [ -n "$(type -p ${binary})" ]; then
 453                 return ${EXIT_OK}
 454         fi
 455
 456         return ${EXIT_ERROR}
 457 }
 458
 459 function_exists() {
 460         local function="${1}"
 461
 462         if [ "$(type -t "${function}")" = "function" ]; then
 463                 return ${EXIT_TRUE}
 464         fi
 465
 466         return ${EXIT_FALSE}
 467 }
 468
 469 process_kill() {
 470         local process=${1}
 471
 472         if ! isinteger process; then
 473                 process=$(pidof ${process})
 474         fi
 475
 476         local pid
 477         local sig
 478         for pid in ${process}; do
 479                 for sig in 15 9; do
 480                         [ -d "/proc/${pid}" ] || break
 481
 482                         kill -${sig} ${pid}
 483                         sleep 1
 484                 done
 485         done
 486 }
 487
 488 dec() {
 489         local hex=${1}
 490
 491         if [ "${hex:0:2}" != "0x" ]; then
 492                 hex="0x${hex}"
 493         fi
 494
 495         printf "%d\n" "${hex}"
 496 }
 497
 498 chr() {
 499         local char="${1}"
 500
 501         [ ${char} -lt 256 ] || return ${EXIT_ERROR}
 502
 503         printf "\\$(( ${char} / 64 * 100 + ${char} % 64 / 8 * 10 + ${char} % 8 ))\n"
 504 }
 505
 506 ord() {
 507         LC_CTYPE="C" printf "%d\n" "'${1}"
 508 }
 509
 510 hex() {
 511         printf "%X\n" "${1}"
 512 }
 513
 514 network_is_running() {
 515         # Check, if the network service is running.
 516         service_is_active network
 517 }
 518
 519 contains_spaces() {
 520         local var="$@"
 521
 522         # Eliminate spaces.
 523         local var2=${var// /}
 524
 525         if [ ${#var} -ne ${#var2} ]; then
 526                 return ${EXIT_TRUE}
 527         fi
 528
 529         return ${EXIT_FALSE}
 530 }
 531
 532 string_split() {
 533         local string="$@"
 534
 535         local pos=0
 536         while [ ${pos} -lt ${#string} ]; do
 537                 print "${string:${pos}:1}"
 538                 pos=$(( ${pos} + 1 ))
 539         done
 540
 541         return ${EXIT_OK}
 542 }
 543
 544 string_reverse() {
 545         local string="$@"
 546
 547         local output
 548         local pos=0
 549         while [ ${pos} -lt ${#string} ]; do
 550                 output="${string:${pos}:1}${output}"
 551                 pos=$(( ${pos} + 1 ))
 552         done
 553
 554         print "${output}"
 555         return ${EXIT_OK}
 556 }
 557
 558 dec2bin() {
 559         local number="${1}"
 560
 561         local output
 562
 563         local i div
 564         for i in 7 6 5 4 3 2 1; do
 565                 div=$(( 2 ** ${i} ))
 566
 567                 if [ $(( ${number} / ${div} )) -eq 1 ]; then
 568                         output="${output}1"
 569                 else
 570                         output="${output}0"
 571                 fi
 572                 number="$(( ${number} % ${div} ))"
 573         done
 574
 575         if [ $(( ${number} % 2 )) -eq 1 ]; then
 576                 output="${output}1"
 577         else
 578                 output="${output}0"
 579         fi
 580
 581         print "${output}"
 582 }
 583
 584 bin2dec() {
 585         local string="${1}"
 586         local number=0
 587
 588         local pos=0 char
 589         while [ ${pos} -lt ${#string} ]; do
 590                 char="${string:${pos}:1}"
 591                 pos=$(( ${pos} + 1 ))
 592
 593                 number=$(( ${number} << 1 ))
 594
 595                 case "${char}" in
 596                         0) ;;
 597                         1)
 598                                 number=$(( ${number} + 1 ))
 599                                 ;;
 600                         *)
 601                                 assert false "Invalid character: ${char}"
 602                                 ;;
 603                 esac
 604         done
 605
 606         print "${number}"
 607         return ${EXIT_OK}
 608 }
 609
 610 char2bin() {
 611         local dec="$(ord "${1}")"
 612
 613         dec2bin "${dec}"
 614 }
 615
 616 bin2char() {
 617         local dec="$(bin2dec "$@")"
 618
 619         chr "${dec}"
 620 }
 621
 622 bin2hex() {
 623         local dec="$(bin2dec "$@")"
 624
 625         dec2hex "${dec}"
 626 }
 627
 628 hex2bin() {
 629         local dec="$(hex2dec "$@")"
 630
 631         dec2bin "${dec}"
 632 }
 633
 634 hex2dec() {
 635         local hex="${1}"
 636
 637         # Prepend 0x if necessary.
 638         [ "${hex:0:2}" = "0x" ] || hex="0x${hex}"
 639
 640         printf "%d\n" "${hex}"
 641 }
 642
 643 dec2hex() {
 644         printf "%02x\n" "${1}"
 645 }