Annotation of cci/sys/bsc/bsc.c, revision 1.1

1.1     ! root        1: /*     D.L.Buck and Associates, Inc. - 9/4/84
        !             2:  *
        !             3:  *     COPYRIGHT NOTICE:
        !             4:  *             Copyright c 9/4/84 - An unpublished work by 
        !             5:  *             D.L.Buck and Associates, Inc.
        !             6:  *
        !             7:  *     PROPRIETARY RIGHTS NOTICE:
        !             8:  *             All rights reserved. This document and program contains
        !             9:  *             proprietary information of D.L.Buck and Associates,Inc.
        !            10:  *             of San Jose, California, U.S.A., embodying confidential
        !            11:  *             information,  ideas, and expressions,  no part of which
        !            12:  *             may be reproduced, or transmitted in any form or by any
        !            13:  *             means,  electronic,  mechanical,  or otherwise, without
        !            14:  *             the written permission of D.L.Buck and Associates, Inc.
        !            15:  *
        !            16:  * NAME
        !            17:  *     bsc - bisync device driver
        !            18:  *
        !            19:  * DESCRIPTION
        !            20:  *     This file contains the Unix system interface routines, prepared for
        !            21:  *     UNIX Version 7, System III, System V, or BSD 4.2.
        !            22:  *     The entry points are bscopen, bscclose, bscread, bscwrite, and
        !            23:  *     bscioctl.  These routines are meant to be hardware-independent.
        !            24:  */
        !            25: 
        !            26: #ifndef lint
        !            27: static char bsc_c[] = "@(#)bsc.c       1.15 REL";
        !            28: #endif
        !            29: 
        !            30: #include "../bsc/local.h"
        !            31: #include "../bsc/bscio.h"
        !            32: #include "../bsc/bsc.h"
        !            33: 
        !            34: #if defined v7 || defined BSD42
        !            35: #define        delay(x)        sleep((caddr_t)&lbolt, BSCPRI)
        !            36: extern int lbolt;
        !            37: #endif
        !            38: 
        !            39: #if defined BSD42
        !            40: #define ERRRET(x)      return x
        !            41: #define        UCOUNT  uio->uio_resid
        !            42: #else
        !            43: #define        ERRRET(x)       u.u_error = x; return
        !            44: #define        UCOUNT  u.u_count
        !            45: #endif
        !            46: 
        !            47: struct bsc bsc[NVBSC*4];               /* device-specific information */
        !            48: extern struct state states[];          /* state table in bscpsm.c */
        !            49: 
        !            50: /*
        !            51:  *     bscopen -- prepare for BISYNC communications
        !            52:  *             0) check and lock device
        !            53:  *             1) set up defaults for IOCTL-provided parameters
        !            54:  *             2) set up counters and fields returned via IOCTL
        !            55:  *             3) set up everything else related to bsc driver
        !            56:  *             4) do hardware-specific programming and checking
        !            57:  *             5) wait for DSR from modem
        !            58:  */
        !            59: /*VARARGS1*/
        !            60: bscopen (dev)                          /* prepare for BISYNC communication */
        !            61: register dev_t dev;
        !            62: {
        !            63:        register struct bsc *bp;        /* ptr to dev's bsc entry */
        !            64:        int errcode;
        !            65: 
        !            66:        /* 0. Check and lock device. */
        !            67:        dev = minor(dev);
        !            68: /*     if (dev >= NBSC) {     */
        !            69:        if (dev >= MX_NBSC) {       
        !            70:                ERRRET(ENXIO);          /* No such device               */
        !            71:        }
        !            72:        bp = &bsc[dev];
        !            73:        if (bp->b_lock) {               /* Is port locked?              */
        !            74:                ERRRET(EBUSY);          /* Error - port busy            */
        !            75:        }
        !            76:        bp->b_lock = SSLOCK;            /* Special single station lock  */
        !            77: 
        !            78:        /* 1. Set up defaults for ioctl-provided params                 */
        !            79:        bp->b_iocin.b_blks = BSCMBLK;   /* Max block size               */
        !            80:        bp->b_hlflgs = BSCPRIM;         /* Flags: we are primary        */
        !            81:        bp->b_iocin.b_termid[0] = '\0'; /* No terminal id               */
        !            82:        bp->b_iocin.b_hostid[0] = '\0'; /* No host id                   */
        !            83:        bp->b_iocin.b_nbid =            /* Max # bids                   */
        !            84:        bp->b_iocin.b_nnak =            /* Max # naks we will give      */
        !            85:        bp->b_iocin.b_nretry = 15;      /* Max # receive t/o's and naks */
        !            86:                                        /*       we will accept */
        !            87:        bp->b_iocin.b_nttd =            /* Max # ttds we will accept    */
        !            88:        bp->b_iocin.b_nwack = 100;      /* Max # wacks we will accept   */
        !            89:        bp->b_iocin.b_nor = 30;         /* Max seconds to wait on initial rd */
        !            90: 
        !            91:        /* 2. Set up counters and fields returned via ioctl             */
        !            92:        bp->b_iocout.b_blks = 0;        /* # blocks sent/received */
        !            93:        bp->b_iocout.b_flags = 0;       /* Flags: see definition        */
        !            94:        bp->b_iocout.b_termid[0] = '\0';/* No terminal id               */
        !            95:        bp->b_iocout.b_hostid[0] = '\0';/* No host id                   */
        !            96:        bp->b_iocout.b_nbid = 0;        /* No bids so far               */
        !            97:        bp->b_iocout.b_nnak = 0;        /* No naks so far               */
        !            98:        bp->b_iocout.b_nretry = 0;      /* No retry so far              */
        !            99:        bp->b_iocout.b_nttd = 0;        /* No ttds so far               */
        !           100:        bp->b_iocout.b_nwack = 0;       /* No wacks so far              */
        !           101:        bp->b_iocout.b_nor = 0;         /* No overruns so far           */
        !           102: 
        !           103:        /* 3. Set up miscellaneous fields for driver                    */
        !           104:        bp->b_state = 0;                /* Set initial psm state        */
        !           105:        bp->b_mode = BSC_INIT;          /* Initial mode indicates       */
        !           106:                                        /* haven't done any i/o yet     */
        !           107:        bp->b_rxst0 = 0;                /* Reset l/l driver state       */
        !           108:        bp->b_tmperr = 0;               /* No temp. errors yet          */
        !           109:        bp->b_sema = BSC_DDONE;         /* Neither psm nor              */
        !           110:                                        /* driver busy - both done      */
        !           111: 
        !           112:        /* 4. Initialize I/O port */
        !           113:        if (errcode = bsclopn(dev, bp)) {/* device-specific open        */
        !           114:                bp->b_lock = 0;
        !           115:                ERRRET(errcode);
        !           116:        }
        !           117: 
        !           118:        /* 5. wait till DSR shows */
        !           119:        while (bsckdsr(dev,bp), !(bp->b_hlflgs & BSC_DSR) && !u.u_error)
        !           120:                delay(PSMTICK);
        !           121:        if (bp->b_trace)
        !           122:                wakeup(&bp->b_trace);
        !           123:        if (u.u_error) {
        !           124:                bp->b_lock = 0;
        !           125:                bsclcls(dev, bp);
        !           126:        }
        !           127: #if defined BSD42
        !           128:        return 0;
        !           129: #endif
        !           130: }
        !           131: 
        !           132: /*
        !           133:  *     bscclose -- 1) send disconnect message, if we're up and running
        !           134:  *                 2) turn off DTR, RTS and disable the channel
        !           135:  */
        !           136: bscclose(dev)
        !           137: register dev_t dev;
        !           138: {
        !           139:        register struct bsc *bp;
        !           140: 
        !           141:        dev = minor(dev);
        !           142:        bp = &bsc[dev];
        !           143: 
        !           144: /*debug*/printf("bscclose");
        !           145:        /* 1. Terminate PSM processing, kill receive and tracing */
        !           146:        if ( (bp->b_hlflgs & (BSCMPT|BSC_DSR)) != BSC_DSR ||
        !           147:                bp->b_mode == BSC_INIT)
        !           148:                bp->b_mode = BSC_CLOSED;        /* Leave quietly */
        !           149:        else    {                               /* Point-to-point ... */
        !           150:                bp->b_mode = BSC_CL1;           /* Send Disconnect */
        !           151:                while (bp->b_mode != BSC_CLOSED &&
        !           152:                       (bp->b_hlflgs & BSC_DSR))        /* Wait */
        !           153:                        delay(PSMTICK);
        !           154:        }
        !           155:        bp->b_rclptr = (char *)0;               /* terminate receive */
        !           156:        bstclose(dev);                          /* terminate tracing */
        !           157: 
        !           158:        /* 2. Unlock the port */
        !           159: /*debug*/printf("close:unlock");
        !           160:        bp->b_lock = 0;
        !           161: 
        !           162:        /* 3. Turn off DTR */
        !           163:        bsclcls (dev, bp);
        !           164: #if defined BSD42
        !           165:        return 0;
        !           166: #endif
        !           167: }
        !           168: 
        !           169: /*
        !           170:  *     bscread -- read next data block.
        !           171:  *             0) If error latch set or no DSR, EIO!
        !           172:  *             1) if mode = write, EINVAL!
        !           173:  *             2) if mode = init, initialize bsc, mode <- idle
        !           174:  *             3) if mode = idle, sync with psm, set b_nor timeout,
        !           175:  *                mode <- read
        !           176:  *             4) while buffer empty and no errs and not eof, sleep
        !           177:  *             5) Check termination condition:
        !           178:  *                a) If err, set mode<-idle, reset hlflgs, set EIO error.
        !           179:  *                b) If signal caused termination, force rxto & reread.
        !           180:  *                c) If EOF, set mode<-IDLE, reset hlflgs and sema, return.
        !           181:  *                d) Otherwise, full buffer.
        !           182:  *                   If size not zero, copy it out and mark it empty.
        !           183:  */
        !           184: #if defined BSD42
        !           185: bscread(dev,uio)
        !           186: register dev_t dev;
        !           187: struct uio *uio;
        !           188: #else
        !           189: bscread(dev)
        !           190: register dev_t dev;
        !           191: #endif
        !           192: {
        !           193:        register struct bsc *bp;        /* ptr to bsc device info.      */
        !           194:        register int l;                 /* length info.                 */
        !           195:        int x;                          /* prty save area               */
        !           196:        int errcode = 0;                /* Error code upon exit         */
        !           197: 
        !           198:        dev = minor(dev);
        !           199:        bp = &bsc[dev];
        !           200: 
        !           201:        /* 0. Check error latch and DSR                                 */
        !           202:        if (!(bp->b_hlflgs & BSC_DSR) ||        /* No DSR!              */
        !           203:            (bp->b_hlflgs & BSC_ERR)) {         /* Error logged         */
        !           204:                if (!(bp->b_hlflgs & BSC_ERR)) {/* Ensure latched err   */
        !           205:                        bp->b_hlflgs |= BSC_ERR;
        !           206:                        bp->b_iocout.b_flags = BSCNDSR;
        !           207:                }
        !           208:                bp->b_mode = BSC_IDLE;
        !           209:                ERRRET(EIO);
        !           210:        }
        !           211: 
        !           212:        switch (bp->b_mode) {
        !           213:        case BSC_WRITE:                         /* Error!               */
        !           214:                ERRRET(EINVAL);
        !           215: 
        !           216:        case BSC_INIT:                  /* First read or write action   */
        !           217:                bscsetup(dev);          /* Start by initializing        */
        !           218:                bp->b_mode = BSC_IDLE;
        !           219: 
        !           220:        case BSC_IDLE:                  /* Moving from Idle to Write    */
        !           221:                while (!(bp->b_sema & BSC_PDONE) &&
        !           222:                        !(bp->b_hlflgs & BSC_ERR))
        !           223:                        delay(PSMTICK); /* Synchronize                  */
        !           224:                if (bp->b_hlflgs & BSC_ERR) {
        !           225:                        bp->b_mode = BSC_IDLE;
        !           226:                        ERRRET(EIO);
        !           227:                }
        !           228:                /* Set Read Timeout in Ticks                            */
        !           229:                bp->b_rdflag = bp->b_iocin.b_nor*PSMTPS;
        !           230:                bp->b_mode = BSC_READ;  /* Now we're in read state      */
        !           231:                x = spl8();             /* *** protect flags ***        */
        !           232:                bp->b_sema |= BSC_DBUSY;/* Driver now busy              */
        !           233:                bp->b_sema &= ~BSC_DDONE;
        !           234:                splx(x);                /* End protection               */
        !           235: 
        !           236:        case BSC_READ:                  /* Not first read               */
        !           237: forceread:
        !           238:                x = spl8();
        !           239:                /* Test for no-delay mode and not ready                 */
        !           240:                if (bp->b_sema & BSC_SEENBUF) {
        !           241:                        bp->b_hlflgs &= ~BSC_FULL;
        !           242:                        bp->b_sema &= ~BSC_SEENBUF;
        !           243:                        if (states[bp->b_state].s_type == 'd' &&
        !           244:                            bp->b_alenb) {      /* Decision wait?       */
        !           245:                                bp->b_alenb = 0;/* Disable pto          */
        !           246:                                splx(x);
        !           247:                                bscpsm(dev);    /* Wake up PTO          */
        !           248:                        }
        !           249:                }
        !           250:                if ((bp->b_sema & BSC_NDLY) &&
        !           251:                    !(bp->b_hlflgs & (BSC_FULL|BSC_ERR|BSC_XLAST))) {
        !           252:                        splx(x);
        !           253:                        ERRRET(EAGAIN);         /* NO DELAY             */
        !           254:                }
        !           255:                while (!(bp->b_hlflgs & (BSC_FULL|BSC_ERR|BSC_XLAST)))
        !           256:                        sleep (bp->b_buffer, BSCPRI);   /* Take a nap   */
        !           257:                splx(x);
        !           258: 
        !           259:                bp->b_rdflag = 0;               /* Cancel read timeout  */
        !           260: 
        !           261:                if (bp->b_hlflgs & BSC_XLAST) {
        !           262:                        x = spl8();             /* Protect flags        */
        !           263:                        bp->b_mode = BSC_IDLE;
        !           264:                        bp->b_hlflgs &= ~(BSC_XLAST|BSC_XTRN);
        !           265:                        bp->b_sema |= BSC_DDONE;
        !           266:                        bp->b_sema &= ~BSC_DBUSY;
        !           267:                        splx(x);
        !           268:                        goto readexit;          /* EOF!                 */
        !           269:                }
        !           270: 
        !           271:                if (bp->b_hlflgs & BSC_ERR) {   /* Error way out        */
        !           272:                        bp->b_hlflgs &= ~(BSC_XLAST|BSC_XTRN);
        !           273:                        bp->b_hlflgs &= ~BSC_FULL;
        !           274:                        bp->b_sema &= ~BSC_SEENBUF;
        !           275:                        bp->b_mode = BSC_IDLE;
        !           276:                        ERRRET(EIO);
        !           277:                } else {                /* No errors - copy buffer out  */
        !           278:                        l = bp->b_bsize;/* Size of data in buffer       */
        !           279:                        if (l > UCOUNT)
        !           280:                                l = UCOUNT;
        !           281:                        if (l)  /* transfer data */
        !           282: #if defined BSD42
        !           283:                                errcode = uiomove(bp->b_buffer,l,UIO_READ,uio);
        !           284: #else
        !           285:                                if (iomove (bp->b_buffer, l, B_READ))
        !           286:                                        errcode = EFAULT;
        !           287: #endif
        !           288:                }
        !           289: 
        !           290:                /* If FAST-ACKNOWLEDGE mode in effect, ACK on next read */
        !           291:                if (bp->b_sema & BSC_FACK) {
        !           292:                        bp->b_sema |= BSC_SEENBUF;
        !           293:                        goto readret;
        !           294:                } else
        !           295:                        bp->b_hlflgs &= ~BSC_FULL;      /* Mark empty   */
        !           296: readexit:      x = spl8();
        !           297:                if (states[bp->b_state].s_type == 'd' &&
        !           298:                    bp->b_alenb) {              /* Decision wait?       */
        !           299:                        bp->b_alenb = 0;        /* Disable PTO          */
        !           300:                        splx(x);
        !           301:                        bscpsm(dev);            /* Awaken PSM           */
        !           302:                }
        !           303:                else    splx(x);
        !           304:        }
        !           305: readret:
        !           306: #if defined BSD42
        !           307:        return errcode;
        !           308: #else
        !           309:        if (errcode)
        !           310:                u.u_error = errcode;
        !           311: #endif
        !           312: }
        !           313: 
        !           314: /*
        !           315:  *     bscwrite -- 0) if no DSR or error latch set, EIO
        !           316:  *                 1) if length to write zero or > max, EINVAL
        !           317:  *                 2) if mode = read, EINVAL!
        !           318:  *                 3) if mode = init, prime the driver
        !           319:  *                 4) if mode = idle, init, or write,
        !           320:  *                       a) set mode to write,
        !           321:  *                       b) wait till buffer empty,
        !           322:  *                       c) fill the buffer, 
        !           323:  *                       d) set flag to show buffer full.
        !           324:  */
        !           325: #if defined BSD42
        !           326: bscwrite(dev,uio)
        !           327: register dev_t dev;
        !           328: struct uio *uio;
        !           329: #else
        !           330: bscwrite(dev)
        !           331: register dev_t dev;
        !           332: #endif
        !           333: {
        !           334:        register int l;                 /* length given us              */
        !           335:        register struct bsc *bp;        /* ptr to bsc dev info          */
        !           336:        int x;                          /* priority save area           */
        !           337:        int errcode = 0;                /* Error code to be returned    */
        !           338: 
        !           339:        bp = &bsc[dev = minor(dev)];
        !           340: 
        !           341:        /* 0. Check error latch and DSR */
        !           342:        if (bp->b_hlflgs & BSC_ERR && bp->b_iocout.b_flags == BSCRXTO) {
        !           343:                bp->b_hlflgs &= ~BSC_ERR;
        !           344:                bp->b_iocout.b_flags = 0;
        !           345:                bp->b_mode = BSC_IDLE;
        !           346:        }
        !           347:        if (!(bp->b_hlflgs & BSC_DSR) || (bp->b_hlflgs & BSC_ERR)) {
        !           348:                if (!(bp->b_hlflgs & BSC_ERR)) {/* ensure latched err */
        !           349:                        bp->b_hlflgs |= BSC_ERR;
        !           350:                        bp->b_iocout.b_flags = BSCNDSR;
        !           351:                }
        !           352:                bp->b_mode = BSC_IDLE;
        !           353:                ERRRET(EIO);
        !           354:        }
        !           355: 
        !           356:        /* 1. Check length and other errors */
        !           357:        if ( (l = UCOUNT) == 0 || l > bp->b_iocin.b_blks) {     /* bad length */
        !           358:                ERRRET(EINVAL);
        !           359:        }
        !           360: 
        !           361:        /* 2. process according to mode */
        !           362:        switch (bp->b_mode)
        !           363:        {
        !           364:        case BSC_READ:
        !           365:                if ((bp->b_sema & BSC_FACK) && (bp->b_sema & BSC_SEENBUF)) {
        !           366:                        bp->b_hlflgs &= ~BSC_FULL;
        !           367:                        bp->b_sema &= ~BSC_SEENBUF;
        !           368:                        bp->b_mode = BSC_WRITE;
        !           369:                        goto casewrite;
        !           370:                }
        !           371:                if (bp->b_rdflag == 0) {
        !           372:                        ERRRET(EINVAL); /* oops - can't read now! */
        !           373:                } else  {
        !           374:                        bp->b_rdflag = 1;       /* kill read timeout */
        !           375:                        x = spl8();             /* *** protect flags *** */
        !           376:                        bp->b_sema &= ~BSC_DBUSY;
        !           377:                        bp->b_sema |= BSC_DDONE;
        !           378:                        splx(x);                /* end protection */
        !           379:                        /* wait till timeout */
        !           380:                        while (bp->b_mode == BSC_READ &&
        !           381:                               !(bp->b_hlflgs & BSC_ERR))
        !           382:                                delay(PSMTICK);
        !           383:                }
        !           384: 
        !           385:        case BSC_INIT:
        !           386:                bscsetup(dev);          /* set up device */
        !           387:                bp->b_mode = BSC_IDLE;
        !           388: 
        !           389:        case BSC_IDLE:
        !           390:                if (bp->b_hlflgs & BSC_FULL) {
        !           391:                        ERRRET(EINVAL); /* caller needs to read */
        !           392:                }
        !           393:                while (!(bp->b_sema & BSC_PDONE) &&
        !           394:                       !(bp->b_hlflgs & BSC_ERR))
        !           395:                        delay(PSMTICK); /* Synchronize */
        !           396:                if (bp->b_hlflgs & BSC_ERR) {
        !           397:                        bp->b_mode = BSC_IDLE;
        !           398:                        ERRRET(EIO);
        !           399:                }
        !           400: 
        !           401:                bp->b_mode = BSC_WRITE; /* set new mode */
        !           402:                x = spl8();             /* *** protect flags *** */
        !           403:                bp->b_hlflgs &= ~BSC_ERR;       /* reset possible err */
        !           404:                bp->b_sema |= BSC_DBUSY;/* driver now busy */
        !           405:                bp->b_sema &= ~BSC_DDONE;
        !           406:                splx(x);                /* *** end protection *** */
        !           407: 
        !           408: casewrite:
        !           409:        case BSC_WRITE:
        !           410:                x = spl8();
        !           411:                while ((bp->b_hlflgs & BSC_FULL) &&     /* wait til empty */
        !           412:                       !(bp->b_hlflgs & BSC_ERR))       /* and no error */
        !           413:                        sleep (bp->b_buffer, BSCPRI);   /* take a nap */
        !           414:                splx(x);
        !           415: 
        !           416:                if (bp->b_hlflgs & BSC_ERR){    /* if error, EIO */
        !           417:                        bp->b_hlflgs &= ~(BSC_XLAST|BSC_FULL|BSC_XTRN);
        !           418:                        bp->b_mode = BSC_IDLE;
        !           419:                        errcode = EIO;
        !           420:                        break;
        !           421:                }
        !           422:                /* copy data to buffer */
        !           423: #if defined BSD42
        !           424:                errcode = uiomove(bp->b_buffer, l, UIO_WRITE, uio);
        !           425: #else
        !           426:                if (iomove (bp->b_buffer, l, B_WRITE))
        !           427:                        errcode = EFAULT;
        !           428: #endif
        !           429:                bp->b_bsize = l;                        /* save size */
        !           430:                x = spl8();
        !           431:                bp->b_hlflgs |= BSC_FULL;               /* bufr now full */
        !           432:                if (states[bp->b_state].s_type == 'd' &&
        !           433:                    bp->b_alenb) {                      /* decision wait? */
        !           434:                        bp->b_alenb = 0;                /* disable pto */
        !           435:                        splx(x);
        !           436:                        bscpsm(dev);                    /* wake 'em up */
        !           437:                } else  splx(x);
        !           438: 
        !           439:                if (bp->b_hlflgs & BSC_XLAST) { /* if last block, wait*/
        !           440:                        x = spl8();
        !           441:                        while ((bp->b_hlflgs & BSC_FULL) && /* wait til empty */
        !           442:                               !(bp->b_hlflgs & BSC_ERR))   /* and no error */
        !           443:                                sleep (bp->b_buffer, BSCPRI);/* take a nap */
        !           444:                        splx(x);
        !           445:                        if (bp->b_hlflgs & BSC_ERR)     /* if error, EIO */
        !           446:                                errcode = EIO;
        !           447:                        else {
        !           448:                                x = spl8();     /* *** protect flags *** */
        !           449:                                bp->b_sema |= BSC_DDONE;
        !           450:                                bp->b_sema &= ~BSC_DBUSY;
        !           451:                                splx(x);        /* *** end protection *** */
        !           452:                        }
        !           453:                        bp->b_mode = BSC_IDLE;
        !           454:                        x = spl8();     /* *** protect flags *** */
        !           455:                        bp->b_hlflgs &= ~(BSC_XLAST|BSC_FULL|BSC_XTRN);
        !           456:                        splx(x);        /* end protection */
        !           457:                }
        !           458:        }
        !           459: #if defined BSD42
        !           460:        return errcode;
        !           461: #else
        !           462:        if (errcode)
        !           463:                u.u_error = errcode;
        !           464: #endif
        !           465: }
        !           466: 
        !           467: /*     bscioctl -- set options or get counter values
        !           468:  *                 Depending on cmd:
        !           469:  *                 BSCGET   - copy b_iocout to user's area
        !           470:  *                 BSCSET   - copy user's values to b_iocin (set stuff)
        !           471:  *                 BSCTRNSP - set transparent mode flag
        !           472:  *                 BSCNTRNS - reset transparent mode flag
        !           473:  *                 BSCSOH   - set send SOH flag
        !           474:  *                 BSCNSOH  - turn off SOH flag
        !           475:  *                 BSCLAST  - set send last flag
        !           476:  *                 BSCNDLY  - set NO DELAY flag
        !           477:  */
        !           478: /*VARARGS3*/
        !           479: bscioctl(dev, cmd, arg)
        !           480: register dev_t dev;
        !           481: struct bscio *arg; 
        !           482: {
        !           483:        register struct bsc *bp;        /* ptr to dev info */
        !           484:        struct bscio tmp;               /* temp struct for chk'g user params*/
        !           485:        register int x;
        !           486:        int y, errcode = 0;
        !           487: 
        !           488:        bp = &bsc[dev = minor(dev)];
        !           489:        if (cmd != BSCGET && cmd != BSCSET) {   /* if write op, wait on buf */
        !           490:                x = spl8();
        !           491:                while (bp->b_mode == BSC_WRITE && bp->b_hlflgs & BSC_FULL)
        !           492:                        sleep (bp->b_buffer, BSCPRI);
        !           493:                splx(x);
        !           494:        }
        !           495:        switch (cmd) {
        !           496:        case BSCGET:
        !           497:                x = spl8();
        !           498: #if defined BSD42
        !           499:                bcopy(&bp->b_iocout, arg, sizeof bp->b_iocout);
        !           500: #else
        !           501:                if (copyout(&bp->b_iocout, arg, sizeof bp->b_iocout))
        !           502:                        errcode = EFAULT;
        !           503: #endif
        !           504:                bp->b_iocout.b_flags = 0;
        !           505:                if (bp->b_hlflgs & BSC_ERR) {   /* error latch set? */
        !           506:                        bp->b_hlflgs &= ~(BSC_ERR|BSC_XLAST|BSC_FULL|BSC_XTRN);
        !           507:                        bp->b_sema &= ~BSC_DBUSY;
        !           508:                        bp->b_sema |= BSC_DDONE;
        !           509:                }
        !           510:                splx(x);
        !           511:                break;
        !           512: 
        !           513:        case BSCSET:
        !           514:                if (bp->b_mode == BSC_READ || bp->b_mode == BSC_WRITE) {
        !           515:                        ERRRET(EINVAL);
        !           516:                }
        !           517: #if defined BSD42
        !           518:                bcopy(arg, &tmp, sizeof tmp);
        !           519: #else
        !           520:                if (copyin (arg, &tmp, sizeof tmp)) {
        !           521:                        errcode = EFAULT;
        !           522:                        break;
        !           523:                }
        !           524: #endif
        !           525:                if (tmp.b_blks > BSCMBLK) {     /* block size too big? */
        !           526:                        ERRRET(EINVAL);
        !           527:                }
        !           528:                bcopy (/*from*/&tmp, /*to*/&bp->b_iocin, sizeof tmp);
        !           529:                x = spl8();             /* *** protect hlflgs */
        !           530:                bp->b_hlflgs &= ~BSC_UFLAGS;    /* throw out old user flags */
        !           531:                bp->b_hlflgs |= (tmp.b_flags & BSC_UFLAGS);
        !           532:                splx(x);                /* *** end protection */
        !           533:                bscparam(dev);                  /* redo parameters */
        !           534:                break;
        !           535: 
        !           536:        case BSCTRNSP:
        !           537:                x = spl8();             /* *** protect hlflgs */
        !           538:                 bp->b_hlflgs |= BSC_XTRN;      /* set transparent mode */
        !           539:                splx(x);                /* *** end protection */
        !           540:                break;
        !           541: 
        !           542:        case BSCNTRNS:
        !           543:                x = spl8();             /* *** protect hlflgs */
        !           544:                bp->b_hlflgs &= ~BSC_XTRN;      /* reset transp. mode */
        !           545:                splx(x);                /* *** end protection */
        !           546:                break;
        !           547: 
        !           548:        case BSCSOH:
        !           549:                x = spl8();             /* *** protect hlflgs */
        !           550:                bp->b_hlflgs |= BSC_XSOH;       /* set send SOH flag */
        !           551:                splx(x);                /* *** end protection */
        !           552:                break;
        !           553: 
        !           554:        case BSCNSOH:
        !           555:                x = spl8();             /* *** protect hlflgs */
        !           556:                bp->b_hlflgs &= ~BSC_XSOH;      /* clear send SOH flag*/
        !           557:                splx(x);                /* *** end protection */
        !           558:                break;
        !           559: 
        !           560:        case BSCLAST:
        !           561:                x = spl8();             /* *** protect hlflgs */
        !           562:                bp->b_hlflgs |= BSC_XLAST;      /* set send last blk flag */
        !           563:                splx(x);                /* *** end protection */
        !           564:                break;
        !           565: 
        !           566:        case BSCID:
        !           567:                y = (bp->b_iocin.b_flags & BSCASCII)? 0x20 : 0x40;
        !           568: #if defined BSD42
        !           569:                bcopy(&y,arg,sizeof y);
        !           570: #else
        !           571:                copyout(&y,(int *)arg,sizeof y);
        !           572: #endif
        !           573:                break;
        !           574: 
        !           575:        case BSCNDLY:
        !           576:                x = spl8();             /* *** protect flags */
        !           577:                bp->b_sema |= BSC_NDLY;         /* Set NO DELAY flag */
        !           578:                splx(x);                /* *** end protection */
        !           579:                break;
        !           580: 
        !           581:        case BSCFACK:
        !           582:                x = spl8();             /* *** protect flags */
        !           583:                bp->b_sema |= BSC_FACK;         /* Set FAST ACKNOWLEDGE */
        !           584:                splx(x);                /* *** end protection */
        !           585:                break;
        !           586: 
        !           587:        default:
        !           588:                ERRRET(EINVAL);
        !           589:        }
        !           590: #if defined BSD42
        !           591:        return errcode;
        !           592: #else
        !           593:        if (errcode)
        !           594:                u.u_error = errcode;
        !           595: #endif
        !           596: }
        !           597: 
        !           598: /*
        !           599:  *     bscsetup -- start the psm (protocol state machine)
        !           600:  *             1) if state > 0, already started
        !           601:  *             2) invoke the psm
        !           602:  *             3) set timeout for 1 tick for psm
        !           603:  */
        !           604: bscsetup(dev)
        !           605: register dev_t dev;
        !           606: {
        !           607:        void bscpto();
        !           608: 
        !           609:        if (bsc[dev].b_state || bsc[dev].b_mode != BSC_INIT)
        !           610:                return;
        !           611:        bscpsm(dev);
        !           612:        timeout (bscpto, (caddr_t)dev, PSMTICK);
        !           613: }

unix.superglobalmegacorp.com

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