/* raboot.c 6.1 83/07/29 */
* UDA50 1st level boot program: loads next 7.5Kbytes from
* boot sector of file system and sets it up to run.
.set BOOTLAST
,15 /* last boot sector */
.set RABPSECT
,512 /* bytes per sector */
.word
0 /* entry mask for dec monitor */
nop
;nop
;nop
;nop
;nop
;nop
;nop
;nop
/* some no-ops for 750 boot to skip */
movl r1
,r7
/* UNIBUS I/O page address */
movl r2
,r8
/* boot device CSR */
movl r3
,r9
/* unit number */
movl r5
,r11
/* boot flags */
movl r7
,r1
/* UNIBUS I/O page address */
movl r8
,r2
/* boot device CSR */
movl r9
,r3
/* unit number */
/* now running relocated */
/* bring in the boot program */
start2
: /* running relocated */
pushr $
0xffff /* BEGIN FIREWALL */
movl $
1,r4
/* first boot sector */
clrl r5
/* transfer address */
clrl
-(sp
) /* transfer address */
movl r4
,r8
/* requested sector # */
jsb (r6
) /* call ROM-based driver */
addl2 $RABPSECT
,r5
/* bump address */
.set PROGSIZE
,((BOOTLAST
-1)*RABPSECT
)
tstl (sp
)+ /* pop address */
popr $
0xffff /* END FIREWALL */
/* start loaded program */
movl $
9,r10
/* major("/dev/ra0a") */