rev |
line source |
pascal@13691
|
1 #!/bin/sh
|
pascal@13691
|
2
|
pascal@13691
|
3 ddq()
|
pascal@13691
|
4 {
|
pascal@13691
|
5 dd $@ 2> /dev/null
|
pascal@13691
|
6 }
|
pascal@13691
|
7
|
pascal@13691
|
8 store()
|
pascal@13691
|
9 {
|
pascal@13691
|
10 n=$2; for i in $(seq 8 8 ${4:-16}); do
|
pascal@13691
|
11 printf '\\\\x%02X' $(($n & 255))
|
pascal@13691
|
12 n=$(($n >> 8))
|
pascal@13691
|
13 done | xargs echo -en | ddq bs=1 conv=notrunc of=$3 seek=$(($1))
|
pascal@13691
|
14 }
|
pascal@13691
|
15
|
pascal@13972
|
16 get()
|
pascal@13972
|
17 {
|
pascal@13972
|
18 echo $(od -j $(($1)) -N ${3:-2} -t u${3:-2} -An $2)
|
pascal@13972
|
19 }
|
pascal@13972
|
20
|
pascal@17476
|
21 compress()
|
pascal@17476
|
22 {
|
pascal@17489
|
23 if [ "$1" ]; then
|
pascal@17489
|
24 gzip -9 > $1
|
pascal@17489
|
25 [ "$(which advdef 2> /dev/null)" ] &&
|
pascal@17489
|
26 advdef -z4 $1 > /dev/null
|
pascal@17489
|
27 elif [ "$(which xz 2> /dev/null)" ]; then
|
pascal@17476
|
28 xz -z -e --format=lzma --lzma1=mode=normal --stdout
|
pascal@17476
|
29 else
|
pascal@17476
|
30 lzma e -si -so
|
pascal@17476
|
31 fi 2> /dev/null
|
pascal@17476
|
32 }
|
pascal@17476
|
33
|
pascal@14150
|
34 add_rootfs()
|
pascal@13691
|
35 {
|
pascal@13691
|
36 TMP=/tmp/iso2exe$$
|
pascal@13713
|
37 mkdir -p $TMP/bin $TMP/dev
|
pascal@17477
|
38 cp -a /dev/?d?* /dev/tty /dev/tty0 $TMP/dev
|
pascal@13691
|
39 $0 --get init > $TMP/init.exe
|
pascal@17489
|
40 # mount -o loop,ro $1 $TMP
|
pascal@17489
|
41 # oldslitaz="$(ls $TMP/boot/isolinux/splash.lss 2> /dev/null)"
|
pascal@17489
|
42 # umount -d $TMP
|
pascal@17489
|
43 # [ "$oldslitaz" ] && # for SliTaz <= 3.0 only...
|
pascal@17489
|
44 # grep -q mount.posixovl.iso2exe $TMP/init.exe &&
|
pascal@17489
|
45 # cp /usr/sbin/mount.posixovl $TMP/bin/mount.posixovl.iso2exe \
|
pascal@17489
|
46 # 2> /dev/null && echo "Store mount.posixovl ($(wc -c \
|
pascal@17489
|
47 # < /usr/sbin/mount.posixovl) bytes) ..."
|
pascal@17252
|
48 find $TMP -type f -print0 | xargs -0 chmod +x
|
pascal@17489
|
49 ( cd $TMP ; find * | cpio -o -H newc ) | compress $TMP/rootfs.gz
|
pascal@13691
|
50 SIZE=$(wc -c < $TMP/rootfs.gz)
|
pascal@13972
|
51 store 24 $SIZE $1
|
pascal@14261
|
52 OFS=$(( $OFS - $SIZE ))
|
pascal@17454
|
53 printf "Adding rootfs.gz file at %04X (%d bytes) ...\n" $OFS $SIZE
|
pascal@13691
|
54 cat $TMP/rootfs.gz | ddq of=$1 bs=1 seek=$OFS conv=notrunc
|
pascal@13691
|
55 rm -rf $TMP
|
pascal@14150
|
56 }
|
pascal@14150
|
57
|
pascal@14261
|
58 add_dosexe()
|
pascal@14261
|
59 {
|
pascal@17492
|
60 TMP=/tmp/bootiso$$
|
pascal@17492
|
61 $0 --get bootiso.bin > $TMP 2> /dev/null
|
pascal@17492
|
62 OFS=$(($(get 20 $TMP) - 0xC0))
|
pascal@17492
|
63 printf "Adding DOS/EXE stub at %04X (%d bytes) ...\n" $OFS $((0x8000 - $OFS))
|
pascal@17492
|
64 ddq if=$TMP bs=1 skip=$OFS of=$1 seek=$OFS conv=notrunc
|
pascal@17492
|
65 rm -f $TMP
|
pascal@14261
|
66 }
|
pascal@14261
|
67
|
pascal@14150
|
68 add_doscom()
|
pascal@14150
|
69 {
|
pascal@13972
|
70 SIZE=$($0 --get boot.com | wc -c)
|
pascal@13691
|
71 OFS=$(( $OFS - $SIZE ))
|
pascal@17454
|
72 printf "Adding DOS boot file at %04X (%d bytes) ...\n" $OFS $SIZE
|
pascal@13972
|
73 $0 --get boot.com | ddq of=$1 bs=1 seek=$OFS conv=notrunc
|
pascal@17810
|
74 store 64 $(($OFS+0xC0)) $1
|
pascal@14150
|
75 }
|
pascal@14150
|
76
|
pascal@18062
|
77 add_tazlito_info()
|
pascal@18062
|
78 {
|
pascal@18062
|
79 HOLE=$OFS
|
pascal@18062
|
80 [ $(get 0 $2) -eq 35615 ] || return
|
pascal@18062
|
81 zcat $2 | gzip -9 > /tmp/rezipped$$.gz
|
pascal@18062
|
82 [ "$(which advdef 2> /dev/null)" ] &&
|
pascal@18062
|
83 advdef -z4 /tmp/rezipped$$.gz > /dev/null
|
pascal@18062
|
84 n=$(stat -c %s /tmp/rezipped$$.gz)
|
pascal@18062
|
85 printf "Moving tazlito data record at %04X ($n bytes) ...\n" $OFS
|
pascal@18062
|
86 ddq if=/tmp/rezipped$$.gz bs=1 of=$1 seek=$OFS conv=notrunc
|
pascal@18062
|
87 HOLE=$(($HOLE+$n))
|
pascal@18062
|
88 rm -f /tmp/rezipped$$.gz
|
pascal@18062
|
89 }
|
pascal@18062
|
90
|
pascal@14150
|
91 add_win32exe()
|
pascal@14150
|
92 {
|
pascal@13974
|
93 SIZE=$($0 --get win32.exe 2> /dev/null | tee /tmp/exe$$ | wc -c)
|
pascal@17454
|
94 printf "Adding WIN32 file at %04X (%d bytes) ...\n" 0 $SIZE
|
pascal@14261
|
95 ddq if=/tmp/exe$$ of=$1 conv=notrunc
|
pascal@14261
|
96 printf "Adding bootiso head at %04X...\n" 0
|
pascal@14261
|
97 $0 --get bootiso.bin 2> /dev/null > /tmp/exe$$
|
pascal@14261
|
98 ddq if=/tmp/exe$$ of=$1 bs=128 count=1 conv=notrunc
|
pascal@14266
|
99 store $((0x94)) $((0xE0 - 12*8)) $1
|
pascal@14266
|
100 store $((0xF4)) $((16 - 12)) $1
|
pascal@14267
|
101 ddq if=$1 of=/tmp/coff$$ bs=1 skip=$((0x178)) count=$((0x88))
|
pascal@14267
|
102 ddq if=/tmp/coff$$ of=$1 conv=notrunc bs=1 seek=$((0x178 - 12*8))
|
pascal@17810
|
103 ddq if=/tmp/exe$$ of=$1 bs=1 count=24 seek=$((0x1A0)) skip=$((0x1A0)) conv=notrunc
|
pascal@17810
|
104 ddq if=$2 bs=1 skip=$((0x1B8)) seek=$((0x1B8)) count=72 of=$1 conv=notrunc
|
pascal@17810
|
105 store 417 $(($SIZE/512)) $1 8
|
pascal@14261
|
106 store 510 $((0xAA55)) $1
|
pascal@14267
|
107 rm -f /tmp/exe$$ /tmp/coff$$
|
pascal@17454
|
108 printf "Moving syslinux hybrid boot record at %04X (512 bytes) ...\n" $SIZE
|
pascal@14261
|
109 ddq if=$2 bs=1 count=512 of=$1 seek=$SIZE conv=notrunc
|
pascal@14261
|
110 OFS=$(($SIZE+512))
|
pascal@14257
|
111 }
|
pascal@14257
|
112
|
pascal@14257
|
113 add_fdbootstrap()
|
pascal@14257
|
114 {
|
pascal@14268
|
115 SIZE=$($0 --get bootfd.bin 2> /dev/null | wc -c)
|
pascal@14257
|
116 if [ $SIZE -ne 0 ]; then
|
pascal@17454
|
117 SIZE=$(( $SIZE - 512 )) # sector 2 is data
|
pascal@17454
|
118 OFS=$(( $OFS - $SIZE ))
|
pascal@17454
|
119 printf "Adding floppy bootstrap file at %04X (%d bytes) ...\n" $OFS $SIZE
|
pascal@14268
|
120 $0 --get bootfd.bin | \
|
pascal@14268
|
121 ddq of=$1 bs=1 count=512 seek=$OFS conv=notrunc
|
pascal@14268
|
122 $0 --get bootfd.bin | \
|
pascal@14268
|
123 ddq of=$1 bs=1 skip=1024 seek=$((512 + $OFS)) conv=notrunc
|
pascal@17810
|
124 store 26 $(($SIZE/512)) $1 8
|
pascal@14257
|
125 fi
|
pascal@14150
|
126 }
|
pascal@14150
|
127 case "$1" in
|
pascal@14150
|
128 --build)
|
pascal@14150
|
129 shift
|
pascal@14261
|
130 ls -l $@
|
pascal@14150
|
131 cat >> $0 <<EOM
|
pascal@17476
|
132 $(tar cf - $@ | compress | uuencode -m -)
|
pascal@14150
|
133 EOT
|
pascal@14150
|
134 EOM
|
pascal@14150
|
135 sed -i '/^case/,/^esac/d' $0
|
pascal@14150
|
136 exit ;;
|
pascal@14150
|
137 --get)
|
pascal@14150
|
138 cat $2
|
pascal@14150
|
139 exit ;;
|
pascal@14150
|
140 --array)
|
pascal@14150
|
141 DATA=/tmp/dataiso$$
|
pascal@14150
|
142 ddq if=/dev/zero bs=32k count=1 of=$DATA
|
pascal@14261
|
143 add_win32exe $DATA $2 > /dev/null
|
pascal@14261
|
144 HSZ=$OFS
|
pascal@14261
|
145 add_dosexe $DATA > /dev/null
|
pascal@14150
|
146 add_rootfs $DATA > /dev/null
|
pascal@14150
|
147 add_doscom $DATA > /dev/null
|
pascal@14257
|
148 add_fdbootstrap $DATA > /dev/null
|
pascal@14257
|
149 name=${3:-bootiso}
|
pascal@17451
|
150 BOOTISOSZ=$((0x8000 - $OFS + $HSZ))
|
pascal@14150
|
151 cat <<EOT
|
pascal@14150
|
152
|
pascal@17451
|
153 #define $(echo $name | tr '[a-z]' '[A-Z]')SZ $BOOTISOSZ
|
pascal@14150
|
154
|
pascal@14150
|
155 #ifdef WIN32
|
pascal@14257
|
156 static char $name[] = {
|
pascal@17591
|
157 /* head */
|
pascal@14261
|
158 $(hexdump -v -n $HSZ -e '" " 16/1 "0x%02X, "' -e '" // %04.4_ax |" 16/1 "%_p" "| \n"' $DATA | sed 's/ 0x ,/ /g')
|
pascal@17591
|
159 /* tail */
|
pascal@14150
|
160 $(hexdump -v -s $OFS -e '" " 16/1 "0x%02X, "' -e '" // %04.4_ax |" 16/1 "%_p" "| \n"' $DATA | sed 's/ 0x ,/ /g')
|
pascal@17591
|
161
|
pascal@17591
|
162 /* These strange constants are defined in RFC 1321 as
|
pascal@17591
|
163 T[i] = (int)(4294967296.0 * fabs(sin(i))), i=1..64
|
pascal@17591
|
164 */
|
pascal@17591
|
165 /* static const uint32_t C_array[64] */
|
pascal@17591
|
166 EOT
|
pascal@17591
|
167 while read a b c d; do
|
pascal@17591
|
168 for i in $a $b $c $d; do
|
pascal@17591
|
169 echo $i | sed 's/0x\(..\)\(..\)\(..\)\(..\),/0x\4, 0x\3, 0x\2, 0x\1, /'
|
pascal@17591
|
170 done
|
pascal@17591
|
171 done <<EOT
|
pascal@17591
|
172 0xd76aa478, 0xe8c7b756, 0x242070db, 0xc1bdceee,
|
pascal@17591
|
173 0xf57c0faf, 0x4787c62a, 0xa8304613, 0xfd469501,
|
pascal@17591
|
174 0x698098d8, 0x8b44f7af, 0xffff5bb1, 0x895cd7be,
|
pascal@17591
|
175 0x6b901122, 0xfd987193, 0xa679438e, 0x49b40821,
|
pascal@17591
|
176 0xf61e2562, 0xc040b340, 0x265e5a51, 0xe9b6c7aa,
|
pascal@17591
|
177 0xd62f105d, 0x02441453, 0xd8a1e681, 0xe7d3fbc8,
|
pascal@17591
|
178 0x21e1cde6, 0xc33707d6, 0xf4d50d87, 0x455a14ed,
|
pascal@17591
|
179 0xa9e3e905, 0xfcefa3f8, 0x676f02d9, 0x8d2a4c8a,
|
pascal@17591
|
180 0xfffa3942, 0x8771f681, 0x6d9d6122, 0xfde5380c,
|
pascal@17591
|
181 0xa4beea44, 0x4bdecfa9, 0xf6bb4b60, 0xbebfbc70,
|
pascal@17591
|
182 0x289b7ec6, 0xeaa127fa, 0xd4ef3085, 0x04881d05,
|
pascal@17591
|
183 0xd9d4d039, 0xe6db99e5, 0x1fa27cf8, 0xc4ac5665,
|
pascal@17591
|
184 0xf4292244, 0x432aff97, 0xab9423a7, 0xfc93a039,
|
pascal@17591
|
185 0x655b59c3, 0x8f0ccc92, 0xffeff47d, 0x85845dd1,
|
pascal@17591
|
186 0x6fa87e4f, 0xfe2ce6e0, 0xa3014314, 0x4e0811a1,
|
pascal@17591
|
187 0xf7537e82, 0xbd3af235, 0x2ad7d2bb, 0xeb86d391,
|
pascal@17591
|
188 EOT
|
pascal@17591
|
189 cat <<EOT
|
pascal@17591
|
190 /* static const char P_array[64] */
|
pascal@17591
|
191 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, /* 1 */
|
pascal@17591
|
192 1, 6, 11, 0, 5, 10, 15, 4, 9, 14, 3, 8, 13, 2, 7, 12, /* 2 */
|
pascal@17591
|
193 5, 8, 11, 14, 1, 4, 7, 10, 13, 0, 3, 6, 9, 12, 15, 2, /* 3 */
|
pascal@17591
|
194 0, 7, 14, 5, 12, 3, 10, 1, 8, 15, 6, 13, 4, 11, 2, 9, /* 4 */
|
pascal@17591
|
195 /* static const char S_array[16] */
|
pascal@17591
|
196 7, 12, 17, 22,
|
pascal@17591
|
197 5, 9, 14, 20,
|
pascal@17591
|
198 4, 11, 16, 23,
|
pascal@17591
|
199 6, 10, 15, 21,
|
pascal@17451
|
200 EOT
|
pascal@17451
|
201
|
pascal@17451
|
202 for mode in data offset ; do
|
pascal@17451
|
203 ofs=0
|
pascal@17451
|
204 while read tag str; do
|
pascal@17451
|
205 if [ "$mode" == "data" ]; then
|
pascal@17451
|
206 echo -en "$str\0" | hexdump -v -e '" " 16/1 "0x%02X, "' \
|
pascal@17451
|
207 -e '" // %04.4_ax |" 16/1 "%_p" "| \n"' | \
|
pascal@17451
|
208 sed 's/ 0x ,/ /g'
|
pascal@17451
|
209 else
|
pascal@17451
|
210 if [ $ofs -eq 0 ]; then
|
pascal@17451
|
211 cat <<EOT
|
pascal@14150
|
212 };
|
pascal@17451
|
213 #else
|
pascal@17451
|
214 static char *$name;
|
pascal@14150
|
215 #endif
|
pascal@17591
|
216
|
pascal@17591
|
217 #define C_array (uint32_t *) ($name + $(($BOOTISOSZ)))
|
pascal@17591
|
218 #define P_array (char *) ($name + $(($BOOTISOSZ+(64*4))))
|
pascal@17591
|
219 #define S_array (char *) ($name + $(($BOOTISOSZ+(64*4)+64)))
|
pascal@17451
|
220 #define ELTORITOOFS 3
|
pascal@14150
|
221 EOT
|
pascal@17451
|
222 fi
|
pascal@17591
|
223 echo "#define $tag $(($BOOTISOSZ+(64*4)+64+16+$ofs))"
|
pascal@17451
|
224 ofs=$(($(echo -en "$str\0" | wc -c)+$ofs))
|
pascal@17451
|
225 fi
|
pascal@17451
|
226 done <<EOT
|
pascal@17451
|
227 READSECTORERR Read sector failure.
|
pascal@17810
|
228 USAGE Usage: isohybrid.exe file.iso [--forced|--undo|--quick]
|
pascal@17451
|
229 OPENERR Can't open r/w the iso file.
|
pascal@17451
|
230 ELTORITOERR No EL TORITO SPECIFICATION signature.
|
pascal@17451
|
231 CATALOGERR Invalid boot catalog.
|
pascal@17451
|
232 HYBRIDERR No isolinux.bin hybrid signature.
|
paul@17671
|
233 SUCCESSMSG Now you can create a USB key with your .iso file.\\\\nSimply rename it to an .exe file and run it.
|
pascal@17451
|
234 FORCEMSG You can add --forced to proceed anyway.
|
pascal@17591
|
235 MD5MSG Computing md5sum...
|
pascal@17591
|
236 UNINSTALLMSG Uninstall done.
|
pascal@17451
|
237 EOT
|
pascal@17451
|
238 done
|
pascal@14150
|
239 rm -rf $DATA
|
pascal@14150
|
240 exit ;;
|
pascal@14150
|
241 --exe)
|
pascal@14150
|
242 # --exe mvcom.bin x.com y.exe > xy.exe
|
pascal@14150
|
243 cat $4 $3 > /tmp/exe$$
|
pascal@14150
|
244 S=$(stat -c %s /tmp/exe$$)
|
pascal@14150
|
245 store 2 $(($S%512)) /tmp/exe$$
|
pascal@14150
|
246 store 4 $((($S+511)/512)) /tmp/exe$$
|
pascal@14150
|
247 store 14 -16 /tmp/exe$$
|
pascal@14150
|
248 store 16 -2 /tmp/exe$$
|
pascal@14150
|
249 store 20 256 /tmp/exe$$
|
pascal@14150
|
250 store 22 -16 /tmp/exe$$
|
pascal@14150
|
251 ddq if=$2 bs=1 seek=64 of=/tmp/exe$$ conv=notrunc
|
pascal@14150
|
252 store 65 $(stat -c %s $3) /tmp/exe$$
|
pascal@14150
|
253 store 68 $((0x100-0x40+$(stat -c %s $4))) /tmp/exe$$
|
pascal@14150
|
254 cat /tmp/exe$$
|
pascal@14150
|
255 rm -f /tmp/exe$$
|
pascal@14150
|
256 exit ;;
|
pascal@14150
|
257 esac
|
pascal@14150
|
258
|
pascal@14150
|
259 main()
|
pascal@14150
|
260 {
|
pascal@14257
|
261 [ $(id -u) -ne 0 ] && exec su -c "$0 $@" < /dev/tty
|
pascal@17451
|
262 case "${1/--/-}" in
|
pascal@17451
|
263 -get) shift
|
pascal@14150
|
264 uudecode | unlzma | tar xOf - $@
|
pascal@14150
|
265 exit ;;
|
pascal@14150
|
266 *) cat > /dev/null
|
pascal@14150
|
267 esac
|
pascal@14150
|
268
|
pascal@17562
|
269 [ ! -s "$1" ] &&
|
pascal@17562
|
270 echo "usage: $0 image.iso [--undo|\"DOS help message\"]" 1>&2 && exit 1
|
pascal@17451
|
271 case "${2/--/-}" in
|
pascal@17451
|
272 -u*|-r*|-w*)
|
pascal@17451
|
273 case "$(get 0 $1)" in
|
pascal@17451
|
274 23117)
|
pascal@18063
|
275 b=$(get 417 $1 1)
|
pascal@18063
|
276 n=$(($(get 64 $1) + 0xC0 - ($(get 26 $1 1)*512) - ($b+1)*512))
|
pascal@18063
|
277 ddq if=$1 bs=512 count=1 skip=$b of=$1 conv=notrunc
|
pascal@18063
|
278 ddq if=/dev/zero bs=512 seek=1 count=1 of=$1 conv=notrunc
|
pascal@18063
|
279 ddq if=$1 bs=512 seek=2 count=30 skip=$(($b+1)) of=$1 conv=notrunc
|
pascal@18063
|
280 ddq if=/dev/zero bs=1 seek=$n count=$((0x8000 - $n)) of=$1 conv=notrunc ;;
|
pascal@17451
|
281 *) ddq if=/dev/zero bs=1k count=32 of=$1 conv=notrunc ;;
|
pascal@17451
|
282 esac
|
pascal@17451
|
283 exit 0
|
pascal@17451
|
284 esac
|
pascal@14150
|
285 case "$(get 0 $1)" in
|
pascal@14150
|
286 23117) echo "The file $1 is already an EXE file." 1>&2 && exit 1;;
|
pascal@17812
|
287 0) [ -x /usr/bin/isohybrid ] && isohybrid $1;;
|
pascal@14150
|
288 esac
|
pascal@14150
|
289
|
pascal@14261
|
290 echo "Read hybrid & tazlito data..."
|
pascal@14261
|
291 ddq if=$1 bs=512 count=1 of=/tmp/hybrid$$
|
pascal@14261
|
292 ddq if=$1 bs=512 skip=2 count=20 of=/tmp/tazlito$$
|
pascal@14261
|
293 add_win32exe $1 /tmp/hybrid$$
|
pascal@18062
|
294 add_tazlito_info $1 /tmp/tazlito$$
|
pascal@14261
|
295 rm -f /tmp/tazlito$$ /tmp/hybrid$$
|
pascal@14150
|
296
|
pascal@14150
|
297 # keep the largest room for the tazlito info file
|
pascal@14261
|
298 add_dosexe $1
|
pascal@14150
|
299 add_rootfs $1
|
pascal@14150
|
300 add_doscom $1
|
pascal@14257
|
301 add_fdbootstrap $1
|
pascal@17454
|
302 printf "%d free bytes in %04X..%04X\n" $(($OFS-$HOLE)) $HOLE $OFS
|
pascal@17810
|
303 store 440 $(date +%s) $1 32
|
pascal@17562
|
304 [ "$2" ] && echo "$2 " | \
|
pascal@17562
|
305 ddq bs=1 seek=$((0x7FDE)) count=15 conv=notrunc of=$1
|
pascal@17562
|
306 if [ $(stat -c %s $1) -gt 34816 ]; then
|
pascal@17562
|
307 echo "Adding ISO image md5 at 7FF0 (16 bytes) ..."
|
pascal@17591
|
308 echo -en "$(ddq if=$1 bs=2k skip=16 count=$(get 32848 $1 4) | \
|
pascal@17562
|
309 md5sum | cut -c-32 | sed 's/\(..\)/\\x\1/g')" | \
|
pascal@17562
|
310 ddq bs=16 seek=2047 conv=notrunc of=$1
|
pascal@17496
|
311 fi
|
pascal@17496
|
312 echo -n "Adding boot checksum..."
|
pascal@17496
|
313 if [ $(stat -c %s $1) -gt 32768 ]; then
|
pascal@17496
|
314 n=$(($(get 2 $1) - 1 + ($(get 4 $1) - 1)*512))
|
pascal@17496
|
315 n=$(($(od -v -N $n -t u2 -w2 -An $1 | \
|
pascal@17496
|
316 awk '{ i+= $0 } END { print (i % 65536) }') \
|
pascal@17496
|
317 + $(get $(($n+1)) $1 1)))
|
pascal@17496
|
318 store 18 $(( (-$n -1) % 65536 )) $1
|
pascal@17496
|
319 fi
|
pascal@13697
|
320 echo " done."
|
pascal@13691
|
321 }
|
pascal@13691
|
322
|
pascal@13691
|
323 main $@ <<EOT
|