Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

file 281 lines (262 sloc) 10.34 kb
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 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281
#!/usr/bin/env mksh
# $Id$
# $miros: src/sys/arch/i386/stand/bootxx/mkbxinst.sh,v 1.28 2010/11/12 21:20:35 tg Exp $
# $miros: src/sys/arch/i386/stand/bootxx/bootxx.S,v 1.26 2010/12/01 19:56:58 tg Exp $ +t:GRUB +s:MBR
#-
# Copyright (c) 2007, 2008, 2009, 2010
# Thorsten Glaser <tg@mirbsd.org>
#
# Provided that these terms and disclaimer and all copyright notices
# are retained or reproduced in an accompanying document, permission
# is granted to deal in this work without restriction, including un‐
# limited rights to use, publicly perform, distribute, sell, modify,
# merge, give away, or sublicence.
#
# This work is provided “AS IS” and WITHOUT WARRANTY of any kind, to
# the utmost extent permitted by applicable law, neither express nor
# implied; without malicious intent or gross negligence. In no event
# may a licensor, author or contributor be held liable for indirect,
# direct, other damage, loss, or other issues arising in any way out
# of dealing in the work, even if advised of the possibility of such
# damage or existence of a defect, except proven that it results out
# of said person’s immediate fault when using the work as intended.
#-
# Self-installing 32-bit x86 boot blocks for GNU GRUB2 on i386-pc
# Reads a list of extents (firstblock lastblock) from standard input
# and writes bootxx to standard output, which can subsequentially be
# stored as partition boot record (or floppy boot sector) on disc.

set -A thecode 0x66 0x31 0xC9 0x8E 0xD1 0xBC 0xFC 0x7B 0x66 0x51 0x66 0x9D 0x8E 0xC1 0xBE 0x00 0x7C 0x8E 0xD9 0xBB 0x00 0x08 0x53 0x53 0x8E 0xC3 0xBF 0x00 0xFE 0xB5 0x02 0xF3 0xA4 0x1F 0x68 0x6B 0xFE 0xCB 0x30 0x41 0x41 0x44 0x20 0x4C 0x6F 0x61 0x64 0x69 0x6E 0x67 0x20 0x00 0x20 0x65 0x72 0x72 0x6F 0x72 0x0D 0x0A 0x00 0x96 0x02 0x00 0x12 0x00 0x00 0x80 0x65 0xFF 0xB4 0x0E 0xBB 0x07 0x00 0xCD 0x10 0xAC 0x08 0xC0 0x75 0xF4 0xC3 0xE8 0xF7 0xFF 0xB8 0x41 0xFF 0x87 0x06 0x44 0xFE 0x3D 0x41 0xFF 0x75 0x19 0x31 0xC0 0xCD 0x16 0xEA 0xF0 0xFF 0x00 0xF0 0xFB 0x88 0x16 0x43 0xFE 0xBE 0x26 0xFE 0x80 0xFA 0x80 0x72 0xDB 0xE8 0xD2 0xFF 0x31 0xDB 0xBE 0x68 0xFF 0x0F 0xB6 0x2E 0x3D 0xFE 0xAC 0x0F 0xB6 0xC8 0xC0 0xE9 0x05 0x83 0xE0 0x1F 0x40 0x41 0x50 0xBF 0x10 0xFE 0xB8 0x10 0x00 0xAB 0xB0 0x01 0xAB 0x89 0xD8 0xAB 0x8C 0xC8 0xAB 0xF3 0xA4 0x31 0xC0 0xAB 0xAB 0xAB 0xAB 0x5F 0x55 0x56 0xBE 0x10 0xFE 0xFF 0x16 0x44 0xFE 0xBD 0x04 0x00 0x8A 0x16 0x43 0xFE 0x60 0xF9 0xCD 0x13 0x9C 0xB8 0x2E 0x0E 0xBB 0x07 0x00 0xCD 0x10 0x9D 0xFB 0x61 0x73 0x1C 0x4D 0x60 0x9C 0x31 0xC0 0xCD 0x13 0x9D 0xBE 0x34 0xFE 0x0F 0x84 0x77 0xFF 0xB8 0x30 0x0E 0x01 0xE8 0xBB 0x07 0x00 0xCD 0x10 0x61 0xEB 0xD2 0xB4 0x02 0x00 0xE7 0x89 0x5C 0x04 0x00 0xFC 0x72 0x14 0x66 0x83 0x44 0x08 0x01 0x66 0x83 0x54 0x0C 0x00 0x4F 0x75 0xAC 0x5E 0x5D 0x4D 0x0F 0x85 0x7D 0xFF 0xBE 0x3A 0xFE 0xE8 0x3F 0xFF 0x66 0x31 0xD2 0x52 0x66 0x4A 0x8A 0x16 0x43 0xFE 0xB8 0x00 0x82 0x50 0xFA 0xCB 0x60 0x06 0xB4 0x08 0x8A 0x16 0x43 0xFE 0xF9 0xCD 0x13 0xFB 0x07 0xBE 0x34 0xFE 0x0F 0x82 0x21 0xFF 0x80 0xE1 0x3F 0x88 0x0E 0x40 0xFE 0x0F 0xB6 0xC6 0x40 0xA3 0x3E 0xFE 0x61 0x8B 0x0E 0x40 0xFE 0xE3 0xD7 0x8B 0x44 0x08 0x8B 0x54 0x0A 0xF7 0xF1 0x42 0x31 0xC9 0x87 0xD1 0xF7 0x36 0x3E 0xFE 0xC0 0xE4 0x06 0x86 0xC4 0x09 0xC1 0x88 0xD6 0xB8 0x01 0x02 0xC3 0xB4 0x42 0xC3
typeset -i ofs_bkcnt=61
typeset -i ofs_geomh=62
typeset -i ofs_geoms=64
typeset -i ofs_partp=66
typeset -i ofs_secsz=234
typeset -i begptr=360
typeset -Uui8 thecode

typeset -Uui16 curptr=begptr
typeset -i wnum=0 wofs=0 wrec=0 bkend=0x1FE

function do_record {
typeset -Ui blk=$1 cnt=$2 n
typeset -Uui16 x=blk y

(( blk && cnt )) || return

print -u2 "$wrec @0x${curptr#16#}: $cnt @$blk (0x${x#16#})"

while (( cnt )); do
let wrec++
(( n = blk < 0x00000100 ? 0 :
blk < 0x00010000 ? 1 :
blk < 0x01000000 ? 2 : 3 ))
(( x = cnt < 33 ? cnt : 32 ))
(( y = blk ))
print -u2 " - 0x${curptr#16#}: $((x)) (0x${x#16#}) @ $blk" \
"(0x${y#16#})"
(( thecode[curptr++] = (n++ << 5) | (x - 1) ))
(( blk += x ))
(( cnt -= x ))
while (( n-- )); do
(( thecode[curptr++] = y & 0xFF ))
(( y >>= 8 ))
done
done
}

function record_block {
typeset -Ui blk=$1

if (( !blk || (wofs && blk != (wofs + wnum)) )); then
# flush the blocks from the cache
(( wnum )) && do_record $wofs $wnum
wofs=0
wnum=0
fi
if (( blk )); then
# record some new block into the cache
(( wofs )) || let wofs=blk
(( wnum += 1 << sscale ))
fi
}

typeset -i partp=0 numheads=0 numsecs=0 sscale=0 bsh=9 mbrpno=0 mbrptp=0 pofs=0
set -A g_code 0 0 0

while getopts ":0:1AB:g:h:M:O:p:S:s:" ch; do
case $ch {
(0) ;;
(1) ;;
(A) numheads=0
numsecs=99
;;
(B) if (( (bsh = OPTARG) < 9 || OPTARG > 15 )); then
print -u2 Error: invalid block size "2^'$OPTARG'"
exit 1
fi
;;
(g) if [[ $OPTARG != +([0-9]):+([0-9]):+([0-9]) ]]; then
print -u2 Error: invalid geometry code "'$OPTARG'"
exit 1
fi
saveIFS=$IFS
IFS=:
set -A g_code -- $OPTARG
IFS=$saveIFS ;;
(h) if (( (numheads = OPTARG) < 1 || OPTARG > 256 )); then
print -u2 Warning: invalid head count "'$OPTARG'"
numheads=0
fi ;;
(M) if [[ $OPTARG != +([0-9])?(:?(0[Xx])+([0-9])) ]]; then
print -u2 Warning: invalid partition info "'$OPTARG'"
mbrpno=0
mbrptp=0
else
saveIFS=$IFS
IFS=:
set -A mbr_code -- $OPTARG
IFS=$saveIFS
(( mbrpno = mbr_code[0] ))
(( mbrptp = mbr_code[1] ))
if (( mbrpno < 1 || mbrpno > 4 )); then
print -u2 Warning: invalid partition \
number "'$OPTARG'"
mbrpno=0
fi
if (( mbrptp < 1 || mbrptp > 255 )); then
print -u2 Warning: invalid partition \
type "'$OPTARG'"
mbrptp=0
fi
fi ;;
(O) if [[ $OPTARG != +([0-9]) ]]; then
print -u2 Warning: invalid partition offset "'$OPTARG'"
else
pofs=$OPTARG
fi ;;
(p) if (( (partp = OPTARG) < 1 || OPTARG > 255 )); then
print -u2 Warning: invalid partition type "'$OPTARG'"
partp=0
fi ;;
(S) if (( (sscale = OPTARG) < 0 || OPTARG > 24 )); then
print -u2 Error: invalid input scale "'$OPTARG'"
exit 1
fi ;;
(s) if (( (numsecs = OPTARG) < 1 || OPTARG > 63 )); then
print -u2 Warning: invalid sector count "'$OPTARG'"
numsecs=0
fi ;;
(*) print -u2 'Syntax:
bxinst [-1A] [-B blocksize] [-g C:H:S] [-h heads] [-M pno(1..4)[:typ]]
[-O partitionofs] [-p type] [-S scale] [-s secs] <sectorlist | \\
dd of=image conv=notrunc
Default values: blocksize=9 heads=16 sectors=63 part.ofs=0 type=0x27 scale=0
    partno=4 if -g (create MBR partition) is given; -A = auto boot geometry'
exit 1 ;;
}
done
shift $((OPTIND - 1))

typeset -Ui psz=0 # must be unsigned
if (( g_code[0] )); then
# bounds check partition table values, calculate total sectors
if (( g_code[0] < 1 || g_code[1] < 1 || g_code[1] > 256 ||
g_code[2] < 1 || g_code[2] > 63 )); then
print -u2 Invalid geometry, values out of bounds.
elif [[ $(print "(${g_code[0]} * ${g_code[1]} * ${g_code[2]})" \
"> 4294967295" | bc) = 1 ]]; then
print -u2 Invalid geometry, more than 2 TiB of data.
else
# we know it's <= 2^32-1
(( psz = g_code[0] * g_code[1] * g_code[2] ))
fi
fi
if (( psz )); then
print -u2 geometry is $psz sectors \($(print \
"$psz * $((1 << bsh))" | bc) bytes\) in ${g_code[0]} cylinders, \
${g_code[1]} heads, ${g_code[2]} sectors per track
if (( numsecs == 0 || (numsecs != 99 && numheads == 0) )); then
print -u2 Warning: using these values for C/H/S boot
numheads=${g_code[1]}
numsecs=${g_code[2]}
fi
(( mbrpno )) || mbrpno=4 # default partition number
fi
if (( mbrpno )); then
bkend=0x1BE
(( psz )) || print -u2 Warning: no geometry given, will not \
create an MBR partition table entry
fi

if (( numsecs == 99 )); then
numheads=0
numsecs=0
else
if (( !numheads )); then
print -u2 Warning: using default value of 16 heads
numheads=16
fi

if (( !numsecs )); then
print -u2 Warning: using default value of 63 sectors
numsecs=63
fi
fi

# read in the extents
while read firstblock lastblock junk; do
while (( firstblock <= lastblock )); do
record_block $((firstblock++ << sscale))
done
done
record_block 0 # just flush
print -u2 "using $wrec blocks, $((curptr-begptr)) bytes ($((bkend-curptr)) free)"

# fill the block table
if (( curptr-- > bkend )); then
print -u2 Error: too many blocks
exit 1
fi
while (( ++curptr < bkend )); do
(( thecode[curptr] = (curptr & 0xFCF) == 0x1C2 ? 0 : RANDOM & 0xFF ))
# ensure the “active” flag is never set to 0x00 or 0x80
if (( ((curptr + 2) & 0xFCF) == 0x01C0 )); then
(( thecode[curptr] & 0x7F )) || let --curptr
fi
done
thecode[510]=0x55
thecode[511]=0xAA

# fill in other data
(( thecode[ofs_bkcnt] = wrec ))
(( thecode[ofs_geomh] = numheads & 0xFF ))
(( thecode[ofs_geomh + 1] = numheads >> 8 ))
(( thecode[ofs_geoms] = numsecs ))
(( thecode[ofs_partp] = partp ))
print -u2 "using sectors of 2^$bsh = $((1 << bsh)) bytes"
(( thecode[ofs_secsz] = (1 << (bsh - 8)) ))

# create an MBR partition if desired
if (( psz )); then
(( mbrpno = 0x1BE + ((mbrpno - 1) * 16) ))
set -A o_code # g_code equivalent for partition offset
(( o_code[2] = pofs % g_code[2] + 1 ))
(( o_code[1] = pofs / g_code[2] ))
(( o_code[0] = o_code[1] / g_code[1] + 1 ))
(( o_code[1] = o_code[1] % g_code[1] + 1 ))
# boot flag; C/H/S offset
thecode[mbrpno++]=0x80
(( thecode[mbrpno++] = o_code[1] - 1 ))
(( cylno = o_code[0] > 1024 ? 1023 : o_code[0] - 1 ))
(( thecode[mbrpno++] = o_code[2] | ((cylno & 0x0300) >> 2) ))
(( thecode[mbrpno++] = cylno & 0x00FF ))
# partition type; C/H/S end
(( thecode[mbrpno++] = (mbrptp ? mbrptp : partp ? partp : 0x27) ))
(( thecode[mbrpno++] = g_code[1] - 1 ))
(( cylno = g_code[0] > 1024 ? 1023 : g_code[0] - 1 ))
(( thecode[mbrpno++] = g_code[2] | ((cylno & 0x0300) >> 2) ))
(( thecode[mbrpno++] = cylno & 0x00FF ))
# partition offset, size (LBA)
(( thecode[mbrpno++] = pofs & 0xFF ))
(( thecode[mbrpno++] = (pofs >> 8) & 0xFF ))
(( thecode[mbrpno++] = (pofs >> 16) & 0xFF ))
(( thecode[mbrpno++] = (pofs >> 24) & 0xFF ))
(( pssz = psz - pofs ))
(( thecode[mbrpno++] = pssz & 0xFF ))
(( thecode[mbrpno++] = (pssz >> 8) & 0xFF ))
(( thecode[mbrpno++] = (pssz >> 16) & 0xFF ))
(( thecode[mbrpno++] = (pssz >> 24) & 0xFF ))
fi

# create the output string
ostr=
curptr=0
while (( curptr < 512 )); do
ostr=$ostr\\0${thecode[curptr++]#8#}
done

# over and out
print -n "$ostr"
exit 0
Something went wrong with that request. Please try again.