scripts/core-functions.in

   1 # --- T2-COPYRIGHT-NOTE-BEGIN ---
   2 # T2 SDE: scripts/core-functions.in
   3 # Copyright (C) 2004 - 2021 The T2 SDE Project
   4 # Copyright (C) 1998 - 2003 ROCK Linux Project
   5 #
   6 # This Copyright note is generated by scripts/Create-CopyPatch,
   7 # more information can be found in the files COPYING and README.
   8 #
   9 # This program is free software; you can redistribute it and/or modify
  10 # it under the terms of the GNU General Public License version 2.
  11 # --- T2-COPYRIGHT-NOTE-END ---
  12
  13 # mktemp alias if the host-system does require -t
  14 __mktemp=`mktemp 2>/dev/null`
  15 if [ -z "${__mktemp}" ]; then
  16         mktemp() {
  17                 `which mktemp` -t tmp "$@"
  18         }
  19 else
  20         rm -f ${__mktemp}
  21 fi
  22 unset __mktemp
  23
  24 # translates a architecture name as of uname into the verbose t2 name
  25 #
  26 uname2arch()
  27 {
  28         sed -e "s/arm.*/arm/; s/aarch64/arm64/; s/parisc/hppa/; s/ppc/powerpc/" \
  29             -e "s/sh.$/superh/; s/i.86/x86/; s/x86_64/x86-64/"
  30 }
  31
  32 # translates a architecture name os of t2 into the short uname name
  33 #
  34 arch2uname()
  35 {
  36         sed -e s/x86$/i386/ -e s/powerpc/ppc/ -e s/x86-64/x86_64/ \
  37             -e s/blackfin/bfin/ -e s/superh/sh/ -e s/arm64/aarch64/
  38 }
  39
  40 # translate a architecture to the 32bit subset
  41 #
  42 arch2arch32()
  43 {
  44         sed 's/[-_]*64//; s/aarch/arm/; s/x86/i686/'
  45 }
  46
  47 # revert the order of the tokens
  48 get_reverted() {
  49         local queue=
  50         while [ $# -gt 0 ]; do
  51                 queue="$1 $queue"
  52                 shift
  53         done
  54         echo $queue
  55 }
  56
  57 # This functions append, insert or remove values in variables:
  58 #
  59 #       var_append PATH ":" "$HOME/bin"
  60 #       var_insert CC_WRAPPER_INSERT " " "-O3"
  61 #       var_remove CC_WRAPPER_INSERT " " "-O3"
  62 #
  63 #       var_remove_regex CC_WRAPPER_INSERT " " "-O.*"
  64 #
  65 #       var_insert_before_regex patchfiles " " "mypatch.diff" ".*\/foo.diff"
  66 #
  67 # 1st Parameter: Variable Name
  68 # 2nd Parameter: Delimiter Text
  69 # 3rd Parameter: Value (or regex)
  70 # 4th Parameter: regex for insert_before
  71 #
  72 var_append() {
  73         eval "[ \"\$$1\" ] && $1=\"\${$1}$2\"" || true
  74         eval "$1=\"\${$1}\$3\""
  75 }
  76 var_insert() {
  77         eval "[ \"\$$1\" ] && $1=\"$2\$$1\"" || true
  78         eval "$1=\"\$3\$$1\""
  79 }
  80 var_remove() {
  81         local a=${2//\/\\/}
  82         local b=${3//\/\\/}
  83         eval '[ "$'$1'" = "$3" ] && '$1'="" || true'
  84         eval $1'="${'$1'//$a$b$a/$2}"'
  85         eval $1'="${'$1'%$a$b}"'
  86         eval $1'="${'$1'#$b$a}"'
  87 }
  88 var_remove_regex() {
  89         eval "$1=\"\`echo \"\$$1\" | awk -- ' { split(\$0, a, \"$2\"); for (c1=c2=1; c1 in a; c1++) if ( a[c1] !~ /^$3\\\$/ ) b[c2++]=a[c1]; for (c1=1; c1 in b; c1++) printf \"%s%s\", (c1 > 0 ? \"$2\" : \"\"), b[c1]; }'\`\""
  90 }
  91 var_insert_before_regex() {
  92         eval "$1=\"\`echo \"\$$1\" | awk -- '{ split(\$0, a, \"$2\"); for (d=c1=c2=1; c1 in a; c1++) { if ( d && a[c1] ~ /^$4\\\$/ ) { b[c2++]=\"$3\"; d=0; } b[c2++]=a[c1]; } if (d) b[c2++]=\"$3\"; for (c1=1; c1 in b; c1++) printf \"%s%s\", (c1 > 0 ? \"$2\" : \"\"), b[c1]; }'\`\""
  93 }