Return to cp.c CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / d / event

Annotation of cci/d/event/cp.c, revision 1.1.1.1

1.1       root        1: /*     Console Processor Interface     */
                      2: /*     Tahoe version, Nov. 1982        */
                      3: 
                      4: /****************************************/
                      5: /*                                     */
                      6: /*     Reduced DCB layout for byte     */
                      7: /*     communication.                  */
                      8: /*                                     */
                      9: /****************************************/
                     10: 
                     11: asm(".set CPMDCB,21");
                     12: asm(".set DC_OFF,2");
                     13: asm(".set DC_ON,1");
                     14: asm(".set MME,9");
                     15: asm(".set DCR,27");
                     16: asm(".set PDCS,28");
                     17: asm(".set CTL_SW,0x41b");  /* Addr of switches to turn on Cache, MME, Fault */
                     18: long tmp_lw;
                     19: 
                     20: 
                     21: #define        CPBUFLEN 200            /* Output buffer length */
                     22: struct cphdr
                     23: {
                     24:        char    cp_unit;        /* Done bit & unit # */
                     25:        char    cp_comm;        /* Command */
                     26:        short   cp_count;       /* Counter (when relevant) */
                     27: };
                     28: 
                     29: struct cpdcb_o                 /* Output structure */
                     30: {
                     31:        struct  cphdr   cp_hdr;
                     32:        char    cp_buf[CPBUFLEN]; /* Buffer for output or 'stty' */
                     33: };
                     34: 
                     35: struct cpdcb_i                 /* Structure for input */
                     36: {
                     37:        struct  cphdr   cp_hdr;
                     38:        char    cpi_buf[4];     /* Buffer for input */
                     39: };
                     40: 
                     41: #define        CPDONE  0x80            /* 'Done' bit in cp_unit */
                     42: #define        CPTAKE  0x40            /* CP 'ack' to this cpdcb */
                     43: 
                     44:                /* Values for 'unit' */
                     45: #define        CPUNIT  0               /* The CP itself */
                     46: #define        CPCONS  1               /* Console line */
                     47: #define        CPREMOT 2               /* Remote line */
                     48: 
                     49:                /* Values for 'command' */
                     50: #define        CPRESET 0
                     51: #define        CPWRITE 1
                     52: #define        CPREAD  2
                     53: #define        CPSTTY  3
                     54: #define        CPBOOT  4
                     55: 
                     56: 
                     57: /*     Put a char to CPU2 console */
                     58: 
                     59: #define NCHAR  1
                     60: 
                     61: long cpbuf_sz = 1;             /* Buffer size   */
                     62: long charcnt = 0;
                     63: 
                     64: asm(".set HISR,0x410");
                     65: 
                     66: putstr(str)
                     67: char *str;
                     68: {      long c_cnt;
                     69:        struct cpdcb_o cpout;                   /* DCB for output */
                     70: 
                     71:        cpout.cp_hdr.cp_unit = CPCONS;          /* Reset done bit */
                     72:        cpout.cp_hdr.cp_comm = CPWRITE;         /* Set command */
                     73:        for(c_cnt=0;;c_cnt++) {
                     74:                cpout.cp_buf[c_cnt] = *str++;
                     75:                if (cpout.cp_buf[c_cnt]=='\n') {
                     76:                         c_cnt++;
                     77:                         cpout.cp_buf[c_cnt]='\r';
                     78:                         }
                     79:                if (cpout.cp_buf[c_cnt]=='\0') break;
                     80:        }
                     81:        if (c_cnt) {
                     82:                cpout.cp_hdr.cp_count = c_cnt;
                     83:                cp_poll(&cpout,'\0');
                     84:                /* cp_poll('\0'); */ }
                     85: }
                     86: 
                     87: putchar(c)
                     88: {
                     89:        struct cpdcb_o cpout;                   /* DCB for output */
                     90: 
                     91:        cpout.cp_hdr.cp_unit = CPCONS;          /* Reset done bit */
                     92:        cpout.cp_hdr.cp_comm = CPWRITE;         /* Set command */
                     93:        cpout.cp_buf[charcnt] = c;
                     94:        cpout.cp_hdr.cp_count = 1;
                     95:        cp_poll(&cpout,c);
                     96:        /* cp_poll(c); */
                     97: }
                     98: 
                     99: cp_poll(cpout,c)
                    100: struct cpdcb_o *cpout;
                    101: char c;
                    102: {      register long time, r11, r10;
                    103: 
                    104:        time = 0x1ff0000;
                    105:        r10 = (long)cpout;
                    106:        r10 &= 0xffffff;
                    107:        asm("mtpr r10,$CPMDCB");
                    108:        tmp_lw = (long)(&cpout->cp_hdr.cp_unit);
                    109: 
                    110:        r11 = (long)(&cpout->cp_hdr.cp_unit);
                    111:        while (time-- && !(cpout->cp_hdr.cp_unit & CPDONE)) { 
                    112:                asm("mtpr r11,$0x1c");                  /* mtpr r11,$PDCS */
                    113:                }
                    114:        if (!(cpout->cp_hdr.cp_unit & CPDONE)) cp_hlt();        /* Time out */
                    115:        if (c== '\n') putchar('\r');
                    116: }
                    117: 
                    118: cp_hlt()
                    119: {
                    120:        asm("movl $0xeeeeeeee,r0");
                    121:        asm("movl $0xeeeeeeee,r1");
                    122:        asm("movl $0xeeeeeeee,r2");
                    123:        asm("halt");
                    124: }
                    125: 

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