Return to dlcoin.c CVS log

Up to [XINU] / xinu / sys

Annotation of xinu/sys/dlcoin.c, revision 1.1

1.1     ! root        1: /* dlcoin.c - dlcoin */
        !             2: 
        !             3: #include <conf.h>
        !             4: #include <kernel.h>
        !             5: #include <slu11.h>
        !             6: #include <proc.h>
        !             7: #include <sleep.h>
        !             8: #include <dlc.h>
        !             9: 
        !            10: /*------------------------------------------------------------------------
        !            11:  *  dlcoin  --  dlc output interrupt handler
        !            12:  *------------------------------------------------------------------------
        !            13:  */
        !            14: INTPROC        dlcoin(dptr)
        !            15: register struct        dlblk   *dptr;
        !            16: {
        !            17:        struct  csr     *cptr;
        !            18:        char    ch;
        !            19: 
        !            20:        cptr = dptr->dioaddr;
        !            21: 
        !            22:        switch (dptr->dostate) {
        !            23: 
        !            24:        case DLOINIT:                           /* non-blockmode output */
        !            25:                        if (dptr->dovalid) {
        !            26:                                cptr->ctbuf = dptr->dochar;
        !            27:                                dptr->dovalid = FALSE;
        !            28:                        } else
        !            29:                                cptr->ctstat = SLUDISABLE;
        !            30:                        return;
        !            31: 
        !            32:        case DLOREADY:                          /* ready to write block */
        !            33:                        cptr->ctbuf = DLSTART;
        !            34:                        dptr->dostate = DLOSTALL;
        !            35:                        dptr->dostall = DLNSTALL;
        !            36:                        dptr->doesc = FALSE;
        !            37:                        return;
        !            38: 
        !            39:        case DLOSTALL:                          /* stalling a while     */
        !            40:                        cptr->ctstat = SLUDISABLE;
        !            41:                        cptr->ctstat = SLUENABLE;
        !            42:                        if (dptr->dostall-- > 0)
        !            43:                                return;
        !            44:                        dptr->dostate = DLOWRITE;
        !            45:                        return;
        !            46: 
        !            47:        case DLOWRITE:                          /* writing a block      */
        !            48:                        if (dptr->docount-- <= 0) {
        !            49:                                dptr->dostate = DLODONE;
        !            50:                                cptr->ctbuf = DLEOB;
        !            51:                                return;
        !            52:                        }
        !            53:                        if (((ch= *dptr->donext++)&DLESCMASK)==DLESCPED){
        !            54:                                if (dptr->doesc) {
        !            55:                                        dptr->doesc = FALSE;
        !            56:                                        cptr->ctbuf = ch & DLEBMASK;
        !            57:                                } else {
        !            58:                                        dptr->donext--;
        !            59:                                        dptr->docount++;
        !            60:                                        dptr->doesc = TRUE;
        !            61:                                        cptr->ctbuf = DLESC;
        !            62:                                }
        !            63:                                return;
        !            64:                        }
        !            65:                        cptr->ctbuf = ch;
        !            66:                        return;
        !            67: 
        !            68:        case DLODONE:                           /* finished writing     */
        !            69:                        if (dptr->docount < 0) {
        !            70:                                ready(dptr->doproc, RESCHYES);
        !            71:                                dptr->docount = 0;
        !            72:                        }
        !            73:                        cptr->ctstat = SLUDISABLE;
        !            74:                        return;
        !            75: 
        !            76:        case DLORESTART:                        /* restart transmission */
        !            77:                        dptr->dostate = DLOREADY;
        !            78:                        dptr->donext = dptr->dostart;
        !            79:                        dptr->docount = dptr->dotot;
        !            80:                        cptr->ctstat = SLUDISABLE;
        !            81:                        cptr->ctstat = SLUENABLE;
        !            82:                        return;
        !            83: 
        !            84:        default:
        !            85:                        panic("impossible dlc output state");
        !            86:        }
        !            87: }

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