base-files: upgrade: add case to export_bootdevice
[openwrt/staging/rmilecki.git] / 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 -r '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 [ "$VERBOSE" -ge 1 ] && echo "$@"
68 }
69
70 json_string() {
71 local v="$1"
72 v="${v//\\/\\\\}"
73 v="${v//\"/\\\"}"
74 echo "\"$v\""
75 }
76
77 rootfs_type() {
78 /bin/mount | awk '($3 ~ /^\/$/) && ($5 !~ /rootfs/) { print $5 }'
79 }
80
81 get_image() { # <source> [ <command> ]
82 local from="$1"
83 local cmd="$2"
84
85 if [ -z "$cmd" ]; then
86 local magic="$(dd if="$from" bs=2 count=1 2>/dev/null | hexdump -n 2 -e '1/1 "%02x"')"
87 case "$magic" in
88 1f8b) cmd="zcat";;
89 425a) cmd="bzcat";;
90 *) cmd="cat";;
91 esac
92 fi
93
94 cat "$from" 2>/dev/null | $cmd
95 }
96
97 get_magic_word() {
98 (get_image "$@" | dd bs=2 count=1 | hexdump -v -n 2 -e '1/1 "%02x"') 2>/dev/null
99 }
100
101 get_magic_long() {
102 (get_image "$@" | dd bs=4 count=1 | hexdump -v -n 4 -e '1/1 "%02x"') 2>/dev/null
103 }
104
105 export_bootdevice() {
106 local cmdline bootdisk rootpart uuid blockdev uevent line class
107 local MAJOR MINOR DEVNAME DEVTYPE
108
109 if read cmdline < /proc/cmdline; then
110 case "$cmdline" in
111 *block2mtd=*)
112 bootdisk="${cmdline##*block2mtd=}"
113 bootdisk="${bootdisk%%,*}"
114 ;;
115 *root=*)
116 rootpart="${cmdline##*root=}"
117 rootpart="${rootpart%% *}"
118 ;;
119 esac
120
121 case "$bootdisk" in
122 /dev/*)
123 uevent="/sys/class/block/${bootdisk##*/}/uevent"
124 ;;
125 esac
126
127 case "$rootpart" in
128 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])
129 uuid="${rootpart#PARTUUID=}"
130 uuid="${uuid%-[a-f0-9][a-f0-9]}"
131 for blockdev in $(find /dev -type b); do
132 set -- $(dd if=$blockdev bs=1 skip=440 count=4 2>/dev/null | hexdump -v -e '4/1 "%02x "')
133 if [ "$4$3$2$1" = "$uuid" ]; then
134 uevent="/sys/class/block/${blockdev##*/}/uevent"
135 break
136 fi
137 done
138 ;;
139 /dev/*)
140 uevent="/sys/class/block/${rootpart##*/}/../uevent"
141 ;;
142 0x[a-f0-9][a-f0-9][a-f0-9] | 0x[a-f0-9][a-f0-9][a-f0-9][a-f0-9] | \
143 [a-f0-9][a-f0-9][a-f0-9] | [a-f0-9][a-f0-9][a-f0-9][a-f0-9])
144 rootpart=0x${rootpart#0x}
145 for class in /sys/class/block/*; do
146 while read line; do
147 export -n "$line"
148 done < "$class/uevent"
149 if [ $((rootpart/256)) = $MAJOR -a $((rootpart%256)) = $MINOR ]; then
150 uevent="$class/../uevent"
151 fi
152 done
153 ;;
154 esac
155
156 if [ -e "$uevent" ]; then
157 while read line; do
158 export -n "$line"
159 done < "$uevent"
160 export BOOTDEV_MAJOR=$MAJOR
161 export BOOTDEV_MINOR=$MINOR
162 return 0
163 fi
164 fi
165
166 return 1
167 }
168
169 export_partdevice() {
170 local var="$1" offset="$2"
171 local uevent line MAJOR MINOR DEVNAME DEVTYPE
172
173 for uevent in /sys/class/block/*/uevent; do
174 while read line; do
175 export -n "$line"
176 done < "$uevent"
177 if [ $BOOTDEV_MAJOR = $MAJOR -a $(($BOOTDEV_MINOR + $offset)) = $MINOR -a -b "/dev/$DEVNAME" ]; then
178 export "$var=$DEVNAME"
179 return 0
180 fi
181 done
182
183 return 1
184 }
185
186 hex_le32_to_cpu() {
187 [ "$(echo 01 | hexdump -v -n 2 -e '/2 "%x"')" = "3031" ] && {
188 echo "${1:0:2}${1:8:2}${1:6:2}${1:4:2}${1:2:2}"
189 return
190 }
191 echo "$@"
192 }
193
194 get_partitions() { # <device> <filename>
195 local disk="$1"
196 local filename="$2"
197
198 if [ -b "$disk" -o -f "$disk" ]; then
199 v "Reading partition table from $filename..."
200
201 local magic=$(dd if="$disk" bs=2 count=1 skip=255 2>/dev/null)
202 if [ "$magic" != $'\x55\xAA' ]; then
203 v "Invalid partition table on $disk"
204 exit
205 fi
206
207 rm -f "/tmp/partmap.$filename"
208
209 local part
210 for part in 1 2 3 4; do
211 set -- $(hexdump -v -n 12 -s "$((0x1B2 + $part * 16))" -e '3/4 "0x%08X "' "$disk")
212
213 local type="$(( $(hex_le32_to_cpu $1) % 256))"
214 local lba="$(( $(hex_le32_to_cpu $2) ))"
215 local num="$(( $(hex_le32_to_cpu $3) ))"
216
217 [ $type -gt 0 ] || continue
218
219 printf "%2d %5d %7d\n" $part $lba $num >> "/tmp/partmap.$filename"
220 done
221 fi
222 }
223
224 indicate_upgrade() {
225 . /etc/diag.sh
226 set_state upgrade
227 }
228
229 # Flash firmware to MTD partition
230 #
231 # $(1): path to image
232 # $(2): (optional) pipe command to extract firmware, e.g. dd bs=n skip=m
233 default_do_upgrade() {
234 sync
235 if [ -n "$UPGRADE_BACKUP" ]; then
236 get_image "$1" "$2" | mtd $MTD_ARGS $MTD_CONFIG_ARGS -j "$UPGRADE_BACKUP" write - "${PART_NAME:-image}"
237 else
238 get_image "$1" "$2" | mtd $MTD_ARGS write - "${PART_NAME:-image}"
239 fi
240 [ $? -ne 0 ] && exit 1
241 }