translate_emulated

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