translate

   1 #!/bin/sh
   2 # Translate a Mu program to a bootable disk image.
   3
   4 set -e
   5
   6 # Map of the Mu code disk
   7 export DISK=20160  # 20*16*63 512-byte sectors = almost 10MB
   8 dd if=/dev/zero of=code.img count=$DISK status=none
   9 # code: sectors 0-8999
  10 # font: sectors 9000-10079  (1080 sectors = space enough for 16k glyphs (1080 * 512 / 34 bytes per glyph))
  11 export FONT=9000  # keep this sync'd with boot.subx
  12 # debug: sector 10080 onwards
  13 export DEBUG=10080
  14
  15 ## Code
  16
  17 cat $* [0-9]*.mu                                          |linux/mu                         > a.subx
  18
  19 cat boot.subx mu-init.subx [0-9]*.subx a.subx             |linux/braces                     > a.braces
  20
  21 cat a.braces                                              |linux/calls                      > a.calls
  22
  23 cat a.calls                                               |linux/sigils                     > a.sigils
  24
  25 cat a.sigils                                              |linux/tests                      > a.tests
  26
  27 # no assort since baremetal SubX doesn't have segments yet
  28
  29 cat a.tests                                               |linux/dquotes                    > a.dquotes
  30
  31 cat a.dquotes                                             |linux/pack                       > a.pack
  32
  33 cat a.pack                                                |linux/survey_baremetal > labels
  34 cat a.pack                                                |linux/labels_baremetal   labels  > a.survey
  35
  36 cat a.survey                                              |linux/hex                        > a.bin
  37
  38 dd if=a.bin of=code.img conv=notrunc status=none
  39
  40 if [ `stat --printf="%s" a.bin` -ge 492544 ]  # 15 tracks * 63 sectors per track * 512 bytes per sector (keep this sync'd with boot.subx)
  41 then
  42   echo "a.bin won't all be loaded on boot"
  43   exit 1
  44 fi
  45
  46 if [ `stat --printf="%s" a.bin` -ge 492544 ]  # 15 tracks * 63 sectors per track * 512 bytes per sector
  47 then
  48   echo "a.bin will overwrite BIOS/Video memory; you'll need to adjust boot.subx to load code to some other non-contiguous area of memory"
  49   exit 1
  50 fi
  51
  52 if [ `stat --printf="%s" a.bin` -ge $(($FONT*512)) ]
  53 then
  54   echo "a.bin will overwrite font in disk"
  55   exit 1
  56 fi
  57
  58 ## Latter half of disk is for debug info
  59
  60 if [ `stat --printf="%s" labels` -ge 1048576 ]  # 8 reads * 256 sectors * 512 bytes per sector
  61 then
  62   echo "labels won't all be loaded on abort"
  63   exit 1
  64 fi
  65
  66 if [ `wc -l < labels` -gt 20480 ]  # 0x5000 stream capacity in abort.subx
  67 then
  68   echo "abort will go into infinite regress"
  69   exit 1
  70 fi
  71
  72 dd if=labels of=code.img seek=$DEBUG conv=notrunc status=none  # keep this sync'd with abort.subx
  73
  74 ## Font data at another well-defined location
  75 cat font.subx   |sed 's,/[^ ]*,,'    |linux/hex    > a.font
  76
  77 if [ `stat --printf="%s" a.font` -ge 262144 ]  # 0x200 sectors * 512 bytes per sector (keep this sync'd with boot.subx)
  78 then
  79   echo "font won't all be loaded on boot"
  80   exit 1
  81 fi
  82
  83 if [ `stat --printf="%s" a.font` -ge 14680064 ]  # 0x00e00000 = 0x00f00000 - 0x00100000
  84 then
  85   echo "font is so large it overlaps the ISA memory hole; see https://wiki.osdev.org/Memory_Map_(x86)"
  86   exit 1
  87 fi
  88
  89 if [ `stat --printf="%s" a.font` -ge $(( ($DEBUG - $FONT) * 512 )) ]
  90 then
  91   echo "font will overwrite debug info in disk"
  92   exit 1
  93 fi
  94
  95 dd if=a.font of=code.img seek=$FONT conv=notrunc status=none