Return to srt0.c CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / sys / stand

Annotation of cci/sys/stand/srt0.c, revision 1.1.1.1

1.1       root        1: /*     srt0.c  4.8     81/04/03        */
                      2: /*  Tahoe version.     82/11/09        */
                      3: 
                      4: #include "../machine/mtpr.h"
                      5: #define        LOCORE
                      6: 
                      7: /*
                      8:  * Startup code for standalone system
                      9:  */
                     10: 
                     11:        .globl  _end
                     12:        .globl  _edata
                     13:        .globl  _main
                     14:        .globl  __rtt
                     15:        .globl  _openfirst
                     16:        .globl  _start
                     17: 
                     18:        .set    HIGH,31         # mask for total disable
                     19: 
                     20: #ifndef        REL
                     21:        .word   0x00                    # 'call' by relsrt0.
                     22: #endif
                     23: _start:
                     24:        mtpr    $HIGH,$IPL              # just in case
                     25:        movl    $(RELOC),sp
                     26:        movl    $RELOC,r0
                     27:        subl2   aedata,r0
                     28:        shar    $2,r0,r0
                     29:        clrl    r1              /* used to clear the memory */
                     30: clr:
                     31:        pushl   r1
                     32:        decl    r0              /* decrement counter */
                     33:        jgeq    clr             /* more to clear */
                     34: 
                     35:        movl    $RELOC,sp
                     36:        movl    $0x800,r0       /* source address to copy from */
                     37:        movl    $RELOC,r1       /* destination address */
                     38:        movl    aend,r2         /* length */
                     39:        subl2   $0x800,r2
                     40:  #     movblk
                     41:  # simple loop replaces movblk - until hardware people are ready
                     42: mvloop:
                     43:        movb    (r0),(r1)
                     44:        incl    r0
                     45:        incl    r1
                     46:        decl    r2
                     47:        bneq    mvloop
                     48:        .globl  goup
                     49:        mtpr    $0,$PACC
                     50: jumphigh:
                     51:        .set    goup,jumphigh+0x800-RELOC
                     52:        jmp     *abegin
                     53: begin:
                     54:        movl    $1,_openfirst
                     55:        callf   $4,_main
                     56:        jmp     begin
                     57: 
                     58: __rtt:
                     59:        .word   0x0
                     60:        jmp     begin
                     61: 
                     62:        .data
                     63: abegin:        .long   begin
                     64: aend:  .long   _end-RELOC+0x800
                     65: aedata:        .long   _edata-RELOC+0x800
                     66:        .globl  _entry
                     67:        .set    _entry,0x800

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.