1 1.3 tsutsui /* $NetBSD: wdb00t.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 movb %d5,%d1 | NVRAM bootpref 54 1.1 he bnes 0f 55 1.1 he 56 1.1 he | The Hades bios does not provide a bootprev. In case 57 1.1 he | of doubt, we fetch it ourselves. 58 1.1 he movb #BOOTPREF,rtcrnr:w 59 1.1 he movb rtcdat:w,%d1 60 1.1 he bnes 0f 61 1.1 he movq #-8,%d1 | bootpref = any 62 1.1 he 63 1.1 he 0: movb %a0@,%d2 | bootflags 64 1.1 he btst #0,%d2 65 1.1 he beqs 1f 66 1.1 he andb %d1,%d2 67 1.1 he bnes boot 68 1.1 he 1: lea %a0@(12),%a0 69 1.1 he dbra %d0,0b 70 1.1 he 71 1.1 he exit: movml %sp@+,%d3/%d5 72 1.1 he tostst: clrw _bootdev:w 73 1.1 he movl _sysbase:w,%a0 74 1.1 he movl %a0@(24),%d0 75 1.1 he swap %d0 76 1.1 he cmpl #0x19870422,%d0 | old TOS? 77 1.1 he bccs 0f | no 78 1.1 he movw #0xe0,%d7 79 1.1 he 0: rts 80 1.1 he 81 1.1 he boot: movl %a0@(4),%d6 82 1.1 he movq #1,%d5 83 1.1 he lea %pc@(end),%a4 84 1.1 he bsrs rds0 85 1.1 he tstw %d0 86 1.1 he bnes exit 87 1.1 he movl %a4,%a0 88 1.1 he movw #0xff,%d0 89 1.1 he movq #0,%d1 90 1.1 he 0: addw %a0@+,%d1 91 1.1 he dbra %d0,0b 92 1.1 he cmpw #0x1234,%d1 93 1.1 he bnes exit 94 1.1 he lea %pc@(rds0),%a3 95 1.1 he lea %pc@(tostst),%a5 96 1.1 he movml %sp@+,%d3/%d5 97 1.1 he jmp %a4@ | start bootsector code 98 1.1 he /* 99 1.1 he * in: d4 (target) d5 (count), d6 (offset), a4 (buffer) 100 1.1 he * out: d0 (<= 0) 101 1.1 he * mod: d0, d1, d2, a0, a1, a5, a6 102 1.1 he */ 103 1.1 he rds0: lea %pc@(dpar),%a6 104 1.1 he tstb %a6@ 105 1.1 he bnes 0f 106 1.1 he movb %d4,%d0 107 1.1 he andb #1,%d0 108 1.1 he aslb #4,%d0 109 1.1 he orb #0xa0,%d0 110 1.1 he movb %d0,idesdh:l 111 1.1 he movl %a4,%a0 112 1.1 he movq #0,%d1 113 1.1 he movb #0,idedor:l 114 1.1 he movb #0xec,idecr:l | IDENTIFY DRIVE 115 1.1 he bsrs wait 116 1.1 he bnes err 117 1.1 he movb %a4@(7),%a6@ | tracks/cylinder 118 1.1 he movb %a4@(13),%a6@(1) | sectors/track 119 1.1 he 0: movl %d6,%d1 120 1.1 he movq #0,%d0 121 1.1 he movb %a6@(1),%d0 122 1.1 he movq #0,%d2 123 1.1 he movb %a6@,%d2 124 1.1 he mulu %d0,%d2 125 1.1 he divu %d2,%d1 126 1.1 he movb %d1,idecl:l 127 1.1 he lsrl #8,%d1 128 1.1 he movb %d1,idech:l 129 1.1 he lsrl #8,%d1 130 1.1 he divu %d0,%d1 131 1.1 he movb %d4,%d0 132 1.1 he andb #1,%d0 133 1.1 he aslb #4,%d0 134 1.1 he orb %d0,%d1 135 1.1 he orb #0xa0,%d1 136 1.1 he movb %d1,idesdh:l 137 1.1 he swap %d1 138 1.1 he addqw #1,%d1 139 1.1 he movb %d1,idesn:l 140 1.1 he movl %a4,%a0 141 1.1 he movb %d5,idesc:l 142 1.1 he movw %d5,%d1 143 1.1 he subqw #1,%d1 144 1.1 he movb #0,idedor:l 145 1.1 he movb #0x20,idecr:l 146 1.1 he wait: movl #0x7d0,%d0 147 1.1 he addl _hz_200:w,%d0 148 1.1 he 2: btst #5,gpip:w 149 1.1 he beqs 3f 150 1.1 he cmpl _hz_200:w,%d0 151 1.1 he bhis 2b 152 1.1 he err: movq #-1,%d0 153 1.1 he rts 154 1.1 he 3: movb idesr:l,%d0 155 1.1 he btst #0,%d0 156 1.1 he bnes err 157 1.1 he btst #3,%d0 158 1.1 he beqs err 159 1.1 he movq #63,%d0 160 1.1 he lea idedr:l,%a1 161 1.1 he 4: movw %a1@,%a0@+ 162 1.1 he movw %a1@,%a0@+ 163 1.1 he movw %a1@,%a0@+ 164 1.1 he movw %a1@,%a0@+ 165 1.1 he dbra %d0,4b 166 1.1 he dbra %d1,wait 167 1.1 he movq #0,%d0 168 1.1 he rts 169 1.1 he 170 1.1 he fill: .space 52 171 1.1 he 172 1.1 he dpar: .byte 0 | tracks/cylinder 173 1.1 he .byte 0 | sectors/track 174 1.1 he .ascii "NetBSD" 175 1.1 he hd_siz: .long 0 176 1.1 he p0_dsc: .long 0, 0, 0 177 1.1 he p1_dsc: .long 0, 0, 0 178 1.1 he p2_dsc: .long 0, 0, 0 179 1.1 he p3_dsc: .long 0, 0, 0 180 1.1 he bsl_st: .long 0 181 1.1 he bsl_sz: .long 0 182 1.1 he .word 0 183 1.1 he end: 184