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