d3440b77391ad49eec17b5e5e6c9355ee2604958
[openwrt.git] / target / linux / bcm53xx / base-files / lib / upgrade / platform.sh
1 PART_NAME=firmware
2
3 # $(1): file to read magic from
4 # $(2): offset in bytes
5 get_magic_long_at() {
6         dd if="$1" skip=$2 bs=1 count=4 2>/dev/null | hexdump -v -e '1/1 "%02x"'
7 }
8
9 platform_machine() {
10         cat /proc/device-tree/compatible | tr '\0' '\t' | cut -f 1
11 }
12
13 platform_flash_type() {
14         # On NAND devices "rootfs" is UBI volume, so won't be find in /proc/mtd
15         grep -q "\"rootfs\"" /proc/mtd && {
16                 echo "serial"
17                 return
18         }
19
20         echo "nand"
21 }
22
23 platform_expected_image() {
24         local machine=$(platform_machine)
25
26         case "$machine" in
27                 "netgear,r6250v1")      echo "chk U12H245T00_NETGEAR"; return;;
28                 "netgear,r6300v2")      echo "chk U12H240T00_NETGEAR"; return;;
29                 "netgear,r8000")        echo "chk U12H315T00_NETGEAR"; return;;
30         esac
31 }
32
33 platform_identify() {
34         local magic
35
36         magic=$(get_magic_long "$1")
37         case "$magic" in
38                 "48445230")
39                         echo "trx"
40                         return
41                         ;;
42                 "2a23245e")
43                         echo "chk"
44                         return
45                         ;;
46         esac
47
48         magic=$(get_magic_long_at "$1" 14)
49         [ "$magic" = "55324e44" ] && {
50                 echo "cybertan"
51                 return
52         }
53
54         echo "unknown"
55 }
56
57 platform_check_image() {
58         [ "$#" -gt 1 ] && return 1
59
60         local file_type=$(platform_identify "$1")
61         local magic
62         local error=0
63
64         case "$file_type" in
65                 "chk")
66                         local header_len=$((0x$(get_magic_long_at "$1" 4)))
67                         local board_id_len=$(($header_len - 40))
68                         local board_id=$(dd if="$1" skip=40 bs=1 count=$board_id_len 2>/dev/null | hexdump -v -e '1/1 "%c"')
69                         local dev_board_id=$(platform_expected_image)
70                         echo "Found CHK image with device board_id $board_id"
71
72                         [ -n "$dev_board_id" -a "chk $board_id" != "$dev_board_id" ] && {
73                                 echo "Firmware board_id doesn't match device board_id ($dev_board_id)"
74                                 error=1
75                         }
76
77                         if ! otrx check "$1" -o "$header_len"; then
78                                 echo "No valid TRX firmware in the CHK image"
79                                 error=1
80                         fi
81                 ;;
82                 "cybertan")
83                         local pattern=$(dd if="$1" bs=1 count=4 2>/dev/null | hexdump -v -e '1/1 "%c"')
84                         local dev_pattern=$(platform_expected_image)
85                         echo "Found CyberTAN image with device pattern: $pattern"
86
87                         [ -n "$dev_pattern" -a "cybertan $pattern" != "$dev_pattern" ] && {
88                                 echo "Firmware pattern doesn't match device pattern ($dev_pattern)"
89                                 error=1
90                         }
91
92                         if ! otrx check "$1" -o 32; then
93                                 echo "No valid TRX firmware in the CyberTAN image"
94                                 error=1
95                         fi
96                 ;;
97                 "trx")
98                         if ! otrx check "$1"; then
99                                 echo "Invalid (corrupted?) TRX firmware"
100                                 error=1
101                         fi
102                 ;;
103                 *)
104                         echo "Invalid image type. Please use only .trx files"
105                         error=1
106                 ;;
107         esac
108
109         return $error
110 }
111
112 platform_extract_trx_from_chk() {
113         local header_len=$((0x$(get_magic_long_at "$1" 4)))
114
115         dd if="$1" of="$2" bs=$header_len skip=1
116 }
117
118 platform_extract_trx_from_cybertan() {
119         dd if="$1" of="$2" bs=32 skip=1
120 }
121
122 platform_pre_upgrade() {
123         local file_type=$(platform_identify "$1")
124         local dir="/tmp/sysupgrade-bcm53xx"
125         local trx="$1"
126
127         [ "$(platform_flash_type)" != "nand" ] && return
128
129         # Extract trx
130         case "$file_type" in
131                 "chk")          trx="/tmp/$(basename $1).trx"; platform_extract_trx_from_chk "$1" "$trx";;
132                 "cybertan")     trx="/tmp/$(basename $1).trx"; platform_extract_trx_from_cybertan "$1" "$trx";;
133         esac
134
135         # Extract partitions from trx
136         rm -fR $dir
137         mkdir -p $dir
138         otrx extract "$trx" \
139                 -1 $dir/kernel \
140                 -2 $dir/root
141
142         # Firmwares without UBI image should be flashed "normally"
143         local root_type=$(identify $dir/root)
144         [ "$root_type" != "ubi" ] && return
145
146         # Prepare TRX file with just a kernel that will replace current one
147         local linux_length=$(grep "\"linux\"" /proc/mtd | sed "s/mtd[0-9]*:[ \t]*\([^ \t]*\).*/\1/")
148         [ -z "$linux_length" ] && {
149                 echo "Unable to find \"linux\" partition size"
150                 exit 1
151         }
152         linux_length=$((0x$linux_length + 28))
153         rm -f /tmp/null.bin
154         rm -f /tmp/kernel.trx
155         touch /tmp/null.bin
156         otrx create /tmp/kernel.trx \
157                 -f $dir/kernel -b $linux_length \
158                 -f /tmp/null.bin
159
160         # Prepare UBI image (drop unwanted extra blocks)
161         local ubi_length=0
162         while [ "$(dd if=$dir/root skip=$ubi_length bs=1 count=4 2>/dev/null)" = "UBI#" ]; do
163                 ubi_length=$(($ubi_length + 131072))
164         done
165         echo "ubi_length: $ubi_length"
166         dd if=$dir/root of=/tmp/root.ubi bs=131072 count=$((ubi_length / 131072)) 2>/dev/null
167
168         # Flash
169         mtd write /tmp/kernel.trx firmware
170         nand_do_upgrade /tmp/root.ubi
171 }
172
173 platform_do_upgrade() {
174         local file_type=$(platform_identify "$1")
175         local trx="$1"
176
177         [ "$(platform_flash_type)" == "nand" ] && {
178                 echo "Flashing firmware without UBI for rootfs. All erase counters will be lost."
179         }
180
181         case "$file_type" in
182                 "chk")          trx="/tmp/$(basename $1).trx"; platform_extract_trx_from_chk "$1" "$trx";;
183                 "cybertan")     trx="/tmp/$(basename $1).trx"; platform_extract_trx_from_cybertan "$1" "$trx";;
184         esac
185
186         shift
187         default_do_upgrade "$trx" "$@"
188 }