package/base-files/files/lib/upgrade/common.sh

   1 #!/bin/sh
   2
   3 RAM_ROOT=/tmp/root
   4
   5 [ -x /usr/bin/ldd ] || ldd() { LD_TRACE_LOADED_OBJECTS=1 $*; }
   6 libs() { ldd $* 2>/dev/null | sed -r 's/(.* => )?(.*) .*/\2/'; }
   7
   8 install_file() { # <file> [ <file> ... ]
   9         local target dest dir
  10         for file in "$@"; do
  11                 if [ -L "$file" ]; then
  12                         target="$(readlink -f "$file")"
  13                         dest="$RAM_ROOT/$file"
  14                         [ ! -f "$dest" ] && {
  15                                 dir="$(dirname "$dest")"
  16                                 mkdir -p "$dir"
  17                                 ln -s "$target" "$dest"
  18                         }
  19                         file="$target"
  20                 fi
  21                 dest="$RAM_ROOT/$file"
  22                 [ -f "$file" -a ! -f "$dest" ] && {
  23                         dir="$(dirname "$dest")"
  24                         mkdir -p "$dir"
  25                         cp "$file" "$dest"
  26                 }
  27         done
  28 }
  29
  30 install_bin() {
  31         local src files
  32         src=$1
  33         files=$1
  34         [ -x "$src" ] && files="$src $(libs $src)"
  35         install_file $files
  36 }
  37
  38 run_hooks() {
  39         local arg="$1"; shift
  40         for func in "$@"; do
  41                 eval "$func $arg"
  42         done
  43 }
  44
  45 ask_bool() {
  46         local default="$1"; shift;
  47         local answer="$default"
  48
  49         [ "$INTERACTIVE" -eq 1 ] && {
  50                 case "$default" in
  51                         0) echo -n "$* (y/N): ";;
  52                         *) echo -n "$* (Y/n): ";;
  53                 esac
  54                 read answer
  55                 case "$answer" in
  56                         y*) answer=1;;
  57                         n*) answer=0;;
  58                         *) answer="$default";;
  59                 esac
  60         }
  61         [ "$answer" -gt 0 ]
  62 }
  63
  64 v() {
  65         [ "$VERBOSE" -ge 1 ] && echo "$@"
  66 }
  67
  68 json_string() {
  69         local v="$1"
  70         v="${v//\\/\\\\}"
  71         v="${v//\"/\\\"}"
  72         echo "\"$v\""
  73 }
  74
  75 rootfs_type() {
  76         /bin/mount | awk '($3 ~ /^\/$/) && ($5 !~ /rootfs/) { print $5 }'
  77 }
  78
  79 get_image() { # <source> [ <command> ]
  80         local from="$1"
  81         local cmd="$2"
  82
  83         if [ -z "$cmd" ]; then
  84                 local magic="$(dd if="$from" bs=2 count=1 2>/dev/null | hexdump -n 2 -e '1/1 "%02x"')"
  85                 case "$magic" in
  86                         1f8b) cmd="zcat";;
  87                         425a) cmd="bzcat";;
  88                         *) cmd="cat";;
  89                 esac
  90         fi
  91
  92         cat "$from" 2>/dev/null | $cmd
  93 }
  94
  95 get_magic_word() {
  96         (get_image "$@" | dd bs=2 count=1 | hexdump -v -n 2 -e '1/1 "%02x"') 2>/dev/null
  97 }
  98
  99 get_magic_long() {
 100         (get_image "$@" | dd bs=4 count=1 | hexdump -v -n 4 -e '1/1 "%02x"') 2>/dev/null
 101 }
 102
 103 export_bootdevice() {
 104         local cmdline bootdisk rootpart uuid blockdev uevent line
 105         local MAJOR MINOR DEVNAME DEVTYPE
 106
 107         if read cmdline < /proc/cmdline; then
 108                 case "$cmdline" in
 109                         *block2mtd=*)
 110                                 bootdisk="${cmdline##*block2mtd=}"
 111                                 bootdisk="${bootdisk%%,*}"
 112                         ;;
 113                         *root=*)
 114                                 rootpart="${cmdline##*root=}"
 115                                 rootpart="${rootpart%% *}"
 116                         ;;
 117                 esac
 118
 119                 case "$bootdisk" in
 120                         /dev/*)
 121                                 uevent="/sys/class/block/${bootdisk##*/}/uevent"
 122                         ;;
 123                 esac
 124
 125                 case "$rootpart" in
 126                         PARTUUID=[A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9]-[A-F0-9][A-F0-9][A-F0-9][A-F0-9]-[A-F0-9][A-F0-9][A-F0-9][A-F0-9]-[A-F0-9][A-F0-9][A-F0-9][A-F0-9]-[A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9]0002)
 127                                 uuid="${rootpart#PARTUUID=}"
 128                                 uuid="${uuid%0002}0002"
 129                                 for blockdev in $(find /dev -type b); do
 130                                         set -- $(dd if=$blockdev bs=1 skip=$((2*512+256+128+16)) count=16 2>/dev/null | hexdump -v -e '4/1 "%02x"' | awk '{ \
 131                                                         for(i=1;i<9;i=i+2) first=substr($0,i,1) substr($0,i+1,1) first; \
 132                                                         for(i=9;i<13;i=i+2) second=substr($0,i,1) substr($0,i+1,1) second; \
 133                                                         for(i=13;i<16;i=i+2) third=substr($0,i,1) substr($0,i+1,1) third; \
 134                                                         fourth = substr($0,17,4); \
 135                                                         five = substr($0,21,12); \
 136                                                 } END { print toupper(first"-"second"-"third"-"fourth"-"five) }')
 137                                         if [ "$1" = "$uuid" ]; then
 138                                                 uevent="/sys/class/block/${blockdev##*/}/uevent"
 139                                                 export SAVE_PARTITIONS=0
 140                                                 break
 141                                         fi
 142                                 done
 143                         ;;
 144                         PARTUUID=[a-f0-9][a-f0-9][a-f0-9][a-f0-9][a-f0-9][a-f0-9][a-f0-9][a-f0-9]-[a-f0-9][a-f0-9])
 145                                 uuid="${rootpart#PARTUUID=}"
 146                                 uuid="${uuid%-[a-f0-9][a-f0-9]}"
 147                                 for blockdev in $(find /dev -type b); do
 148                                         set -- $(dd if=$blockdev bs=1 skip=440 count=4 2>/dev/null | hexdump -v -e '4/1 "%02x "')
 149                                         if [ "$4$3$2$1" = "$uuid" ]; then
 150                                                 uevent="/sys/class/block/${blockdev##*/}/uevent"
 151                                                 break
 152                                         fi
 153                                 done
 154                         ;;
 155                         /dev/*)
 156                                 uevent="/sys/class/block/${rootpart##*/}/../uevent"
 157                         ;;
 158                 esac
 159
 160                 if [ -e "$uevent" ]; then
 161                         while read line; do
 162                                 export -n "$line"
 163                         done < "$uevent"
 164                         export BOOTDEV_MAJOR=$MAJOR
 165                         export BOOTDEV_MINOR=$MINOR
 166                         return 0
 167                 fi
 168         fi
 169
 170         return 1
 171 }
 172
 173 export_partdevice() {
 174         local var="$1" offset="$2"
 175         local uevent line MAJOR MINOR DEVNAME DEVTYPE
 176
 177         for uevent in /sys/class/block/*/uevent; do
 178                 while read line; do
 179                         export -n "$line"
 180                 done < "$uevent"
 181                 if [ $BOOTDEV_MAJOR = $MAJOR -a $(($BOOTDEV_MINOR + $offset)) = $MINOR -a -b "/dev/$DEVNAME" ]; then
 182                         export "$var=$DEVNAME"
 183                         return 0
 184                 fi
 185         done
 186
 187         return 1
 188 }
 189
 190 hex_le32_to_cpu() {
 191         [ "$(echo 01 | hexdump -v -n 2 -e '/2 "%x"')" = "3031" ] && {
 192                 echo "${1:0:2}${1:8:2}${1:6:2}${1:4:2}${1:2:2}"
 193                 return
 194         }
 195         echo "$@"
 196 }
 197
 198 get_partitions() { # <device> <filename>
 199         local disk="$1"
 200         local filename="$2"
 201
 202         if [ -b "$disk" -o -f "$disk" ]; then
 203                 v "Reading partition table from $filename..."
 204
 205                 local magic=$(dd if="$disk" bs=2 count=1 skip=255 2>/dev/null)
 206                 if [ "$magic" != $'\x55\xAA' ]; then
 207                         v "Invalid partition table on $disk"
 208                         exit
 209                 fi
 210
 211                 rm -f "/tmp/partmap.$filename"
 212
 213                 local part
 214                 for part in 1 2 3 4; do
 215                         set -- $(hexdump -v -n 12 -s "$((0x1B2 + $part * 16))" -e '3/4 "0x%08X "' "$disk")
 216
 217                         local type="$(( $(hex_le32_to_cpu $1) % 256))"
 218                         local lba="$(( $(hex_le32_to_cpu $2) ))"
 219                         local num="$(( $(hex_le32_to_cpu $3) ))"
 220
 221                         [ $type -gt 0 ] || continue
 222
 223                         printf "%2d %5d %7d\n" $part $lba $num >> "/tmp/partmap.$filename"
 224                 done
 225         fi
 226 }
 227
 228 indicate_upgrade() {
 229         . /etc/diag.sh
 230         set_state upgrade
 231 }
 232
 233 # Flash firmware to MTD partition
 234 #
 235 # $(1): path to image
 236 # $(2): (optional) pipe command to extract firmware, e.g. dd bs=n skip=m
 237 default_do_upgrade() {
 238         sync
 239         if [ "$SAVE_CONFIG" -eq 1 ]; then
 240                 get_image "$1" "$2" | mtd $MTD_ARGS $MTD_CONFIG_ARGS -j "$CONF_TAR" write - "${PART_NAME:-image}"
 241         else
 242                 get_image "$1" "$2" | mtd $MTD_ARGS write - "${PART_NAME:-image}"
 243         fi
 244         [ $? -ne 0 ] && exit 1
 245 }