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