123154Smckusick /* 229329Smckusick * Copyright (c) 1980, 1986 Regents of the University of California. 323154Smckusick * All rights reserved. The Berkeley software License Agreement 423154Smckusick * specifies the terms and conditions for redistribution. 523154Smckusick */ 611100Ssam 7*30544Skarels /* "@(#)upboot.c 7.3 (Berkeley) 02/21/87" */ 829801Skarels #include <sys/disklabel.h> 923154Smckusick 1026885Skarels .set MAJOR,2 /* major("/dev/up0a") */ 1126885Skarels 1211100Ssam /* 1311100Ssam * UP 1st level boot program: loads next 7.5Kbytes from 1411100Ssam * boot sector of file system and sets it up to run. 1511100Ssam * Always reads from drive 0. 1611100Ssam */ 1711100Ssam .set BOOTSIZE,15 /* size of boot in sectors */ 1811100Ssam .set RELOC,0x50000 1911100Ssam .set UPBPSECT,512 /* bytes per sector */ 2011100Ssam /* UBA registers */ 2111100Ssam .set UBA_CNFGR,0 /* UBA configuration register */ 2211100Ssam .set UBA_CR,4 /* UBA control register offset */ 2311100Ssam .set UBA_MAP,0x800 /* UBA offset to map reg's */ 2411100Ssam /* UP registers and bits */ 2526885Skarels .set UP_cs1,0 /* control and status */ 2626885Skarels .set UP_wc,2 /* word count */ 2726885Skarels .set UP_ba,4 /* bus address */ 2826885Skarels .set UP_da,6 /* disk address */ 2926885Skarels .set UP_cs2,010 /* cs2 register */ 3026885Skarels .set UP_of,032 /* offset register */ 3126885Skarels .set UP_dc,034 /* desired cylinder */ 3226885Skarels .set UP_hr,036 /* holding register */ 3311100Ssam .set UP_GO,1 /* go bit */ 3411100Ssam .set UP_PACK,022 /* pack acknowledge */ 3511100Ssam .set UP_DCLR,010 /* drive clear */ 3611100Ssam .set UP_PRESET,020 /* read-in-preset */ 3711100Ssam .set UP_RCOM,070 /* read command */ 3811100Ssam .set UPCS2_CLR,040 3911100Ssam .set UP_pRDY,7 /* position of ready bit */ 4011100Ssam .set UP_pERR,15 /* position of error bit */ 4111100Ssam .set UP_FMT22,010000 4211100Ssam 4311100Ssam init: 4426885Skarels /* r9 UBA address */ 4526885Skarels /* r8 UP addr */ 4611100Ssam .word 0 /* entry mask for dec monitor */ 4711100Ssam nop;nop;nop;nop;nop;nop;nop;nop /* some no-ops for 750 boot to skip */ 4811100Ssam nop;nop; 4926885Skarels movl $MAJOR,r10 /* major("/dev/xx0a") */ 5026885Skarels extzv $18,$1,r1,r9 /* get UBA number from R1 */ 5126885Skarels xorb2 $0x01,r9 /* complement bit */ 5226885Skarels insv r9,$24,$8,r10 /* set UBA number */ 5326885Skarels insv r3,$16,$8,r10 /* drive number */ 5426885Skarels extzv $12,$4,r5,r4 /* get partition from r5 */ 5526885Skarels bicw2 $0xf000,r5 /* remove from r5 */ 5626885Skarels insv r4,$8,$8,r10 /* set partition */ 5726885Skarels movl r5,r11 /* boot flags */ 5829801Skarels 59*30544Skarels movl r2,r8 /* boot device CSR */ 6029801Skarels brw start0 6129801Skarels 6229801Skarels /* 6329801Skarels * Leave space for pack label. 6429801Skarels */ 6529801Skarels pad: 6629801Skarels .space LABELOFFSET - (pad - init) 6729801Skarels packlabel: 6829801Skarels .space d_end_ 6929801Skarels 7029801Skarels start0: 7126885Skarels movl physUBA[r9],r9 /* UNIBUS adaptor address */ 7226885Skarels movl r3,r7 /* unit number */ 7326885Skarels movl $RELOC,sp 7426885Skarels moval init,r4 7526885Skarels movc3 $end,(r4),(sp) 7626885Skarels /* init up, set vv in drive; if any errors, give up */ 77*30544Skarels /* probably unneeded: rom should have already done this */ 7826885Skarels bisw3 r7,$UPCS2_CLR,UP_cs2(r8) 7926885Skarels movw $UP_DCLR+UP_GO,UP_cs1(r8) 8026885Skarels movw $UP_PRESET+UP_GO,UP_cs1(r8) 8126885Skarels movw $UP_FMT22,UP_of(r8) 8211100Ssam 1: 8326885Skarels movw UP_cs1(r8),r0 8411100Ssam bbc $UP_pRDY,r0,1b 8511100Ssam /* relocate to high core */ 8611100Ssam start: 8711100Ssam movl $RELOC,sp 8811100Ssam moval init,r6 8911100Ssam movc3 $end,(r6),(sp) 9011100Ssam jmp *$RELOC+start2 9111100Ssam /* now running relocated */ 9211100Ssam .set PROGSIZE,(BOOTSIZE*UPBPSECT) 9311100Ssam start2: 9426885Skarels movw $0,UP_dc(r8) 9526885Skarels movw $1,UP_da(r8) 9626885Skarels movw $-PROGSIZE/2,UP_wc(r8) 9711100Ssam clrl r0 9811100Ssam 1: 9911100Ssam bisl3 $0x80000000,r0,UBA_MAP(r9) 10011100Ssam addl2 $4,r9 10111100Ssam aobleq $BOOTSIZE,r0,1b 10226885Skarels clrw UP_ba(r8) 10326885Skarels movw $UP_RCOM+UP_GO,UP_cs1(r8) 10411100Ssam uprdy: 10526885Skarels movw UP_cs1(r8),r0 10611100Ssam bbc $UP_pRDY,r0,uprdy 10711100Ssam clear: 10811100Ssam movl $PROGSIZE,r3 10911100Ssam clrcor: 11011100Ssam clrq (r3) 11111100Ssam acbl $RELOC,$8,r3,clrcor 11211100Ssam /* run loaded program */ 11311100Ssam calls $0,*$0 11411100Ssam brw start2 11511100Ssam physUBA: 11626885Skarels .long 0xf30000 /* uba0 */ 11726885Skarels .long 0xf32000 /* uba1 */ 11811100Ssam end: 119