Return to machstar.c CVS log

Up to [Research Unix] / researchv10dc / sys / md

Annotation of researchv10dc/sys/md/machstar.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * machine-specific hardware routines,
        !             3:  * these for VAX-11/780 & 785
        !             4:  */
        !             5: 
        !             6: #include "sys/mtpr.h"
        !             7: 
        !             8: int delayfact = 2;             /* factor for DELAY macro */
        !             9: 
        !            10: /*
        !            11:  * adjust physical top of memory to useful top of memory
        !            12:  * (some vaxes put important console stuff there)
        !            13:  * called with mapping off
        !            14:  */
        !            15: machmem(hi)
        !            16: int hi;
        !            17: {
        !            18:        return (hi);
        !            19: }
        !            20: 
        !            21: /*
        !            22:  * miscellaneous machine-dependent initialization
        !            23:  * called just after mapping turned on
        !            24:  */
        !            25: 
        !            26: machinit()
        !            27: {
        !            28:        machreset();            /* clear error latches */
        !            29:        mcrinit();
        !            30: }
        !            31: 
        !            32: /*
        !            33:  * stray interrupt handling:
        !            34:  * just decrypt it and return
        !            35:  */
        !            36: strayintr(v)
        !            37: int v;
        !            38: {
        !            39:        if (v < 0x200)
        !            40:                printf("stray interrupt at 0x%x\n", v);
        !            41:        else
        !            42:                printf("stray intr unibus %d 0%o\n", (v >> 9)-1, v & 0777);
        !            43: }
        !            44: 
        !            45: /*
        !            46:  * fetch and set the time-of-year clock
        !            47:  */
        !            48: gettodr()
        !            49: {
        !            50:        return (mfpr(TODR));
        !            51: }
        !            52: 
        !            53: settodr(t)
        !            54: unsigned t;
        !            55: {
        !            56:        mtpr(TODR, t);
        !            57: }

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