blob: 43c7d9542d4a1baddf0e997c38339fd7cbd99150 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
|
#!/bin/sh
# Translate SubX files to a bootable disk image.
#
# This script uses emulation, so it does not require x86 or Linux. However it
# is slow.
#
# A couple of gotchas:
# * Many phases here have no error-checking. Perhaps I should use a
# version of translate_subx_debug for baremetal.
# * Don't pass in numbered .subx files without translated .mu files. Our test
# harness is in test.mu, and only Mu programs can run tests in baremetal.
#
# The top level is in general not as rigorous about avoiding dependency cycles
# as the lower-level tools in linux/
set -e
set -v
cat $* |linux/bootstrap/bootstrap run linux/braces > a.braces
cat a.braces |linux/bootstrap/bootstrap run linux/calls > a.calls
cat a.calls |linux/bootstrap/bootstrap run linux/sigils > a.sigils
cat a.sigils |linux/bootstrap/bootstrap run linux/tests > a.tests
# no assort since baremetal SubX doesn't have segments yet
cat a.tests |linux/bootstrap/bootstrap run linux/dquotes > a.dquotes
cat a.dquotes |linux/bootstrap/bootstrap run linux/pack > a.pack
cat a.pack |linux/bootstrap/bootstrap linux/survey_baremetal > labels
cat a.pack |linux/bootstrap/bootstrap linux/labels_baremetal labels > a.survey
cat a.survey |linux/bootstrap/bootstrap run linux/hex > a.bin
# Create code.img containing a.bin
dd if=/dev/zero of=code.img count=20160 # 20*16*63 512-byte sectors = almost 10MB
dd if=a.bin of=code.img conv=notrunc
if [ `stat --printf="%s" a.bin` -ge 322560 ] # 10 tracks * 63 sectors per track * 512 bytes per sector (keep this sync'd with boot.subx)
then
echo "a.bin won't all be loaded on boot"
exit 1
fi
# Latter half of disk is for debug info.
dd if=labels of=code.img seek=10080 conv=notrunc # keep this sync'd with abort.subx
if [ `stat --printf="%s" labels` -ge 524288 ] # 4 reads * 256 sectors * 512 bytes per sector
then
echo "labels won't all be loaded on abort"
exit 1
fi
if [ `wc -l < labels` -gt 16384 ] # 0x4000 stream capacity in abort.subx
then
echo "abort will go into infinite regress"
exit 1
fi
|