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

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