1 1.3 tsutsui /* $NetBSD: sdb00t.ahdi.S,v 1.3 2022/06/26 14:14:46 tsutsui Exp $ */ 2 1.1 he 3 1.1 he /* 4 1.1 he * Copyright (c) 1995 Waldi Ravens 5 1.1 he * All rights reserved. 6 1.1 he * 7 1.1 he * Redistribution and use in source and binary forms, with or without 8 1.1 he * modification, are permitted provided that the following conditions 9 1.1 he * are met: 10 1.1 he * 1. Redistributions of source code must retain the above copyright 11 1.1 he * notice, this list of conditions and the following disclaimer. 12 1.1 he * 2. Redistributions in binary form must reproduce the above copyright 13 1.1 he * notice, this list of conditions and the following disclaimer in the 14 1.1 he * documentation and/or other materials provided with the distribution. 15 1.1 he * 3. All advertising materials mentioning features or use of this software 16 1.1 he * must display the following acknowledgement: 17 1.1 he * This product includes software developed by Waldi Ravens. 18 1.1 he * 4. The name of the author may not be used to endorse or promote products 19 1.1 he * derived from this software without specific prior written permission 20 1.1 he * 21 1.1 he * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 22 1.1 he * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 23 1.1 he * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 24 1.1 he * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 25 1.1 he * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 26 1.1 he * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 1.1 he * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 1.1 he * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 1.1 he * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 30 1.1 he * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 1.1 he */ 32 1.1 he 33 1.1 he #include "xxboot.h" 34 1.1 he 35 1.1 he .globl _start, main, fill 36 1.1 he 37 1.1 he .text 38 1.1 he 39 1.1 he _start: bras main 40 1.1 he bra rds0 41 1.1 he 42 1.1 he main: bclr #2,(_drvbits+3):w 43 1.1 he clrl pun_ptr:w 44 1.1 he movml %d3/%d5,%sp@- 45 1.1 he movw #-1,%sp@- 46 1.1 he movw #Kbshift,%sp@- 47 1.1 he trap #BIOS 48 1.1 he addql #4,%sp 49 1.1 he btst #3,%d0 | Alternate? 50 1.1 he bnes exit 51 1.1 he movq #3,%d0 52 1.1 he lea %pc@(p0_dsc),%a0 53 1.1 he cmpl #0x444d4172,%d3 | SCSI bootdev? 54 1.1 he beqs 0f 55 1.1 he movq #-1,%d4 | no, ACSI 56 1.1 he movq #0,%d5 57 1.1 he 0: movb %d5,%d1 | NVRAM bootpref 58 1.1 he bnes 1f 59 1.1 he 60 1.1 he | The Hades bios does not provide a bootprev. In case 61 1.1 he | of doubt, we fetch it ourselves. 62 1.1 he moveml %d0-%d2/%a0-%a2,%sp@- 63 1.1 he pea bpref 64 1.1 he movw #1, %sp@- 65 1.1 he movw #1, %sp@- 66 1.1 he movw #0, %sp@- 67 1.1 he movw #NVMaccess, %sp@- 68 1.1 he trap #XBIOS 69 1.1 he lea %sp@(12),%sp 70 1.1 he moveml %sp@+,%d0-%d2/%a0-%a2 71 1.1 he movb bpref:w,%d1 72 1.1 he bnes 1f 73 1.1 he movq #-8,%d1 | bootpref = any 74 1.1 he 75 1.1 he 1: movb %a0@,%d2 | bootflags 76 1.1 he btst #0,%d2 77 1.1 he beqs 2f 78 1.1 he andb %d1,%d2 79 1.1 he bnes boot 80 1.1 he 2: lea %a0@(12),%a0 81 1.1 he dbra %d0,1b 82 1.1 he 83 1.1 he exit: movml %sp@+,%d3/%d5 84 1.1 he tostst: clrw _bootdev:w 85 1.1 he movl _sysbase:w,%a0 86 1.1 he movl %a0@(24),%d0 87 1.1 he swap %d0 88 1.1 he cmpl #0x19870422,%d0 | old TOS? 89 1.1 he bccs 0f | no 90 1.1 he movw #0xe0,%d7 91 1.1 he 0: rts 92 1.1 he 93 1.1 he boot: movl %a0@(4),%d6 94 1.1 he movq #1,%d5 95 1.1 he lea %pc@(end),%a4 96 1.1 he bsrs rds0 97 1.1 he tstw %d0 98 1.1 he bnes exit 99 1.1 he movl %a4,%a0 100 1.1 he movw #0xff,%d0 101 1.1 he movq #0,%d1 102 1.1 he 0: addw %a0@+,%d1 103 1.1 he dbra %d0,0b 104 1.1 he cmpw #0x1234,%d1 105 1.1 he bnes exit 106 1.1 he lea %pc@(rds0),%a3 107 1.1 he lea %pc@(tostst),%a5 108 1.1 he movml %sp@+,%d3/%d5 109 1.1 he jmp %a4@ | start bootsector code 110 1.1 he /* 111 1.1 he * in: d4/d7 (target) d5 (count), d6 (offset), a4 (buffer) 112 1.1 he * out: d0 (<= 0) 113 1.1 he * mod: d0, d1, d2, a0, a1, a5, a6 114 1.1 he */ 115 1.1 he rds0: tstl %d4 116 1.1 he bmis 0f 117 1.1 he movw %d4,%sp@- | device 118 1.1 he pea %a4@ | buffer 119 1.1 he movw %d5,%sp@- | count 120 1.1 he movl %d6,%sp@- | offset 121 1.1 he movw #DMAread,%sp@- 122 1.1 he trap #XBIOS 123 1.1 he lea %sp@(14),%sp 124 1.1 he rts 125 1.1 he 126 1.1 he 0: st flock:w 127 1.1 he movl _hz_200:w,%d0 128 1.1 he addql #2,%d0 129 1.1 he 1: cmpl _hz_200:w,%d0 130 1.1 he bccs 1b 131 1.1 he movml %d6/%a4,%sp@- 132 1.1 he lea dmahi:w,%a6 133 1.1 he movb %sp@(7),%a6@(4) 134 1.1 he movb %sp@(6),%a6@(2) 135 1.1 he movb %sp@(5),%a6@ 136 1.1 he lea %pc@(r0com),%a6 137 1.1 he movb %sp@(1),%a6@(1) 138 1.1 he movb %sp@(2),%a6@(5) 139 1.1 he movb %sp@(3),%a6@(9) 140 1.1 he movb %d5,%a6@(13) 141 1.1 he addql #8,%sp 142 1.1 he lea dmodus:w,%a6 143 1.1 he lea daccess:w,%a5 144 1.1 he movw #0x198,%a6@ 145 1.1 he movw #0x098,%a6@ 146 1.1 he movw %d5,%a5@ 147 1.1 he movw #0x88,%a6@ 148 1.1 he movq #0,%d0 149 1.1 he movb %d7,%d0 150 1.1 he orb #0x08,%d0 151 1.1 he swap %d0 152 1.1 he movw #0x8a,%d0 153 1.1 he bsrs shake 154 1.1 he lea %pc@(r0com),%a0 155 1.1 he movq #3,%d2 156 1.1 he 2: movl %a0@+,%d0 157 1.1 he bsrs shake 158 1.1 he dbra %d2,2b 159 1.1 he movq #0x0a,%d0 160 1.1 he movl %d0,%a5@ 161 1.1 he movl #0x190,%d1 162 1.1 he bsrs wait 163 1.1 he movw #0x8a,%a6@ 164 1.1 he movw %a5@,%d0 165 1.1 he andw #0xff,%d0 166 1.1 he beqs 0f 167 1.1 he r0err: movq #-1,%d0 168 1.1 he 0: movw #0x80,%a6@ 169 1.1 he clrb flock:w 170 1.1 he r0ret: rts 171 1.1 he 172 1.1 he shake: movl %d0,%a5@ 173 1.1 he movq #0x0a,%d1 174 1.1 he wait: addl _hz_200:w,%d1 175 1.1 he 0: btst #5,gpip:w 176 1.1 he beqs r0ret 177 1.1 he cmpl _hz_200:w,%d1 178 1.1 he bccs 0b 179 1.1 he addql #4,%sp 180 1.1 he bras r0err 181 1.1 he 182 1.1 he r0com: .long 0x0000008a 183 1.1 he .long 0x0000008a 184 1.1 he .long 0x0000008a 185 1.1 he .long 0x0001008a 186 1.1 he bpref: .word 0 187 1.1 he 188 1.1 he fill: .space 16 189 1.1 he 190 1.1 he .ascii "NetBSD" 191 1.1 he hd_siz: .long 0 192 1.1 he p0_dsc: .long 0, 0, 0 193 1.1 he p1_dsc: .long 0, 0, 0 194 1.1 he p2_dsc: .long 0, 0, 0 195 1.1 he p3_dsc: .long 0, 0, 0 196 1.1 he bsl_st: .long 0 197 1.1 he bsl_sz: .long 0 198 1.1 he .word 0 199 1.1 he end: 200