fixup to wait for UBIC other minor longterm botches (mba access, core clearing)

SCCS-vsn: sys/vax/stand/srt0.c 1.5

diff --git a/usr/src/sys/vax/stand/srt0.c b/usr/src/sys/vax/stand/srt0.c
index 2a68de8..5dbbc08 100644 (file)
--- a/usr/src/sys/vax/stand/srt0.c
+++ b/usr/src/sys/vax/stand/srt0.c
@@ -1,28 +1,30 @@
-#      srt0.c  1.4     %G%
+#      srt0.c  1.5     %G%

 
 # Startup code for standalone system
 # Non-relocating version -- for programs which are loaded by boot
 
 
 # Startup code for standalone system
 # Non-relocating version -- for programs which are loaded by boot
 

-       .globl  _end
+       .globl  _edata

        .globl  _main
        .globl  __rtt
        .globl  _main
        .globl  __rtt

-       .globl  _edata

 
        .set    PHYSUBA,0x20006000      # uba 0
 
        .set    PHYSUBA,0x20006000      # uba 0

-       .set    PHYSUMEM,0x2013e000     # unibus memory

 
        .set    HIGH,31         # mask for total disable
 
        .word   0x0
        mtpr    $HIGH,$IPL              # just in case
 
        .set    HIGH,31         # mask for total disable
 
        .word   0x0
        mtpr    $HIGH,$IPL              # just in case

+       movl    $RELOC-0x2000,sp

        movl    $1,PHYSUBA+4            # init
        movl    $1,PHYSUBA+4            # init

-       movab   _end,r0
+ubic:
+       movl    *$PHYSUBA,r0            # while ((up->uba_cnfgr & UBIC) == 0)
+       bitl    $0x10000,r0             #       continue;
+       jeql    wait
+       movab   _edata,r0

 clr:
        clrl    (r0)+
        cmpl    r0,sp
        jlss    clr
 start:
 clr:
        clrl    (r0)+
        cmpl    r0,sp
        jlss    clr
 start:

-       movl    $RELOC-0x2000,sp

        calls   $0,_main
        jmp     start
 
        calls   $0,_main
        jmp     start