Return to getidprom.s CVS log

Up to [Research Unix] / researchv9 / sys / boot / stand

Annotation of researchv9/sys/boot/stand/getidprom.s, revision 1.1.1.1

1.1       root        1: |
                      2: |      @(#)getidprom.s 1.1 86/02/03 Copyright (c) 1985 by Sun Microsystems, Inc.
                      3: |
                      4: #ifdef SUN2
                      5: #define        FC_MAP          3
                      6: #define        BYTESPERPG      0x800
                      7: #define        IDPROMOFF       8
                      8: #endif
                      9: #ifdef SUN3
                     10: #define        FC_MAP          3
                     11: #define        BYTESPERPG      0x2000
                     12: #define        IDPROMOFF       0
                     13: #endif
                     14: 
                     15: 
                     16: |
                     17: | getidprom(addr, size)
                     18: |
                     19: | Read back <size> bytes of the ID prom and store them at <addr>.
                     20: | Typical use:  getidprom(&idprom_struct, sizeof(idprom_struct));
                     21: |
                     22:        .globl  _getidprom
                     23: _getidprom:
                     24:        movl    sp@(4),a0       | address to move ID prom bytes to
                     25:        movl    sp@(8),d1       | How many bytes to move
                     26:        movl    d2,sp@-         | save a reg
                     27:        movc    sfc,d0          | save source func code
                     28:        movl    #FC_MAP,d2
                     29:        movc    d2,sfc          | set space 3
                     30:        lea     IDPROMOFF,a1    | select id prom
                     31:        jra     2$              | Enter loop at bottom as usual for dbra
                     32: 1$:    movsb   a1@+,d2         | get a byte
                     33:        movb    d2,a0@+         | save it
                     34: #ifdef SUN2
                     35:        addw    #BYTESPERPG-1,a1 | address next byte (in next page)
                     36: #endif SUN2
                     37: 2$:    dbra    d1,1$           | and loop
                     38:        movc    d0,sfc          | restore sfc
                     39:        movl    sp@+,d2         | restore d2
                     40:        rts

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