Return to vtkb.c CVS log

Up to [MW Coherent from dump] / coherent / b / kernel / io.386

Annotation of coherent/b/kernel/io.386/vtkb.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Keyboard/display driver.
        !             3:  * Coherent, IBM PC/XT/AT.
        !             4:  */
        !             5: #include <sys/coherent.h>
        !             6: #ifdef _I386
        !             7: #include <sys/reg.h>
        !             8: #else
        !             9: #include <sys/i8086.h>
        !            10: #endif
        !            11: #include <sys/con.h>
        !            12: #include <sys/devices.h>
        !            13: #include <errno.h>
        !            14: #include <sys/stat.h>
        !            15: #include <sys/tty.h>
        !            16: #include <signal.h>
        !            17: #include <sys/sched.h>
        !            18: #include <sys/silo.h>
        !            19: #include <sys/kb.h>
        !            20: #include <sys/vt.h>
        !            21: 
        !            22: #define        ISVEC           1               /* Keyboard interrupt vector */
        !            23: #define        DEBUG           0
        !            24: 
        !            25: #define        SPC     0376                    /* Special encoding */
        !            26: #define XXX    0377                    /* Non-character */
        !            27: #define        KBDATA  0x60                    /* Keyboard data */
        !            28: #define        KBCTRL  0x61                    /* Keyboard control */
        !            29: #define        KBFLAG  0x80                    /* Keyboard reset flag */
        !            30: #define        LEDCMD  0xED                    /* status indicator command */
        !            31: #define        KBACK   0xFA                    /* status indicator acknowledge */
        !            32: #define        EXTENDED1 0xE1                  /* extended key seq initiator */
        !            33: 
        !            34: #define        KEYUP   0x80                    /* Key up change */
        !            35: #define        KEYSC   0x7F                    /* Key scan code mask */
        !            36: #define        LSHIFT  0x2A-1                  /* Left shift key */
        !            37: #define LSHIFTA 0x2B-1                 /* Alternate left-shift key */
        !            38: #define        RSHIFT  0x36-1                  /* Right shift key */
        !            39: #define        CTRLkb  0x1D-1                  /* Control key */
        !            40: /*-- #define   CAPLOCK 0x1D-1  --*/            /* Control key */
        !            41: #define        ALTkb   0x38-1                  /* Alt key */
        !            42: #define        CAPLOCK 0x3A-1                  /* Caps lock key */
        !            43: /*-- #define   CTRL    0x3A-1  --*/            /* Caps lock key */
        !            44: #define        NUMLOCK 0x45-1                  /* Numeric lock key */
        !            45: #define        DELETE  0x53-1                  /* Del, as in CTRL-ALT-DEL */
        !            46: #define BACKSP 0x0E-1                  /* Back space */
        !            47: #define SCRLOCK        0x46-1                  /* Scroll lock */
        !            48: 
        !            49: /* Shift flags */
        !            50: #define        SRS     0x01                    /* Right shift key on */
        !            51: #define        SLS     0x02                    /* Left shift key on */
        !            52: #define CTS    0x04                    /* Ctrl key on */
        !            53: #define ALS    0x08                    /* Alt key on */
        !            54: #define CPLS   0x10                    /* Caps lock on */
        !            55: #define NMLS   0x20                    /* Num lock on */
        !            56: #define AKPS   0x40                    /* Alternate keypad shift */
        !            57: #define SHFT   0x80                    /* Shift key flag */
        !            58: 
        !            59: /*
        !            60:  * patchable params for non-standard keyboards
        !            61:  */
        !            62: int    KBTIMEOUT = 10000;              /* shouldn't need this much */
        !            63: int    KBSTS_CMD = 0x64;               /* Keyboard status/command */
        !            64: 
        !            65: /* Function key information */
        !            66: #define        NFKEY   20                      /* Number of settable functions */
        !            67: #define        NFCHAR  150                     /* Number of characters settable */
        !            68: #define        NFBUF   (NFKEY*2+NFCHAR+1)      /* Size of buffer */
        !            69: /*
        !            70:  * Functions.
        !            71:  */
        !            72: int    isrint();
        !            73: int    istime();
        !            74: void   isbatch();
        !            75: int    mmstart();
        !            76: int    isopen();
        !            77: int    isclose();
        !            78: int    isread();
        !            79: int    mmwrite();
        !            80: int    isioctl();
        !            81: void   mmwatch();
        !            82: int    isload();
        !            83: int    isuload();
        !            84: int    ispoll();
        !            85: int    nulldev();
        !            86: int    nonedev();
        !            87: 
        !            88: /*
        !            89:  * Configuration table.
        !            90:  */
        !            91: CON iscon ={
        !            92:        DFCHR|DFPOL,                    /* Flags */
        !            93:        KB_MAJOR,                       /* Major index */
        !            94:        isopen,                         /* Open */
        !            95:        isclose,                        /* Close */
        !            96:        nulldev,                        /* Block */
        !            97:        isread,                         /* Read */
        !            98:        mmwrite,                        /* Write */
        !            99:        isioctl,                        /* Ioctl */
        !           100:        nulldev,                        /* Powerfail */
        !           101:        mmwatch,                        /* Timeout */
        !           102:        isload,                         /* Load */
        !           103:        isuload,                        /* Unload */
        !           104:        ispoll                          /* Poll */
        !           105: };
        !           106: 
        !           107: /*
        !           108:  * Flag indicating turbo machine.
        !           109:  */
        !           110: int isturbo = 0;
        !           111: 
        !           112: 
        !           113: /*
        !           114: ==============================================================================
        !           115: ==============================================================================
        !           116: */
        !           117: /* constants for vtdata[] */
        !           118: #define VT_VGAPORT     0x3D4
        !           119: #define VT_MONOPORT    0x3B4
        !           120: 
        !           121: #ifdef _I386
        !           122: #define VT_MONOBASE    SEG_VIDEOa
        !           123: #define VT_VGABASE     SEG_VIDEOb
        !           124: #else
        !           125: #define VT_MONOBASE    0xB000
        !           126: #define VT_VGABASE     0xB800
        !           127: #endif
        !           128: 
        !           129: /*
        !           130:        Patchable table entrys,
        !           131:        we go indirect in order to produce a label which can be addressed
        !           132: */
        !           133: HWentry        VTVGA =         { 4, 0, VT_VGAPORT, { 0, VT_VGABASE }, { 25, 80 } };
        !           134: HWentry        VTMONO =        { 4, 0, VT_MONOPORT, { 0, VT_MONOBASE }, { 25, 80 } };
        !           135: 
        !           136: HWentry        *vtHWtable[] = {
        !           137:        VTVGA,          /* VGA followed by MONO is compatible to DOS */
        !           138:        VTMONO,
        !           139:        0               /* MUST STAY AS LAST ELEMENT !!! */
        !           140: };
        !           141: 
        !           142: extern int     mminit();
        !           143: static VTDATA  const_vtdata    = {
        !           144:        mminit, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 23, 24, 0, 0, 0, 23, 0, 0, 1
        !           145: };
        !           146: 
        !           147: /* later this should be dynamic */
        !           148: VTDATA *vtconsole, **vtdata;
        !           149: 
        !           150: int    vtcount, vtmax;
        !           151: extern int     vtactive;
        !           152: int    vt_verbose = { 0 };
        !           153: int    vt_opened = { 0 };
        !           154: 
        !           155: /* Terminal structure. */
        !           156: TTY    **vttty;
        !           157: 
        !           158: /*
        !           159: ==============================================================================
        !           160: ==============================================================================
        !           161: */
        !           162: 
        !           163: static silo_t in_silo;
        !           164: 
        !           165: /*
        !           166:  * State variables.
        !           167:  */
        !           168: int            islock;                 /* Keyboard locked flag */
        !           169: int            isbusy;                 /* Raw input conversion busy */
        !           170: static unsigned shift;                 /* Overall shift state */
        !           171: static char    scrollkb;               /* Scroll lock state */
        !           172: static  char   lshiftkb = LSHIFT;      /* Left shift alternate state */
        !           173: static char    isfbuf[NFBUF];          /* Function key values */
        !           174: static char    *isfval[NFKEY];         /* Function key string pointers */
        !           175: static int     ledcmd;                 /* LED update command flag */
        !           176: static int     extended;               /* extended key scan count */
        !           177: static char    fk_loaded;              /* true == funcion keys resident */
        !           178: 
        !           179: /*
        !           180:  * Tables for converting key code to ASCII.
        !           181:  * lmaptab specifies unshifted conversion,
        !           182:  * umaptab specifies shifted conversion,
        !           183:  * smaptab specifies the shift states which are active.
        !           184:  * An entry of XXX says the key is dead.
        !           185:  * An entry of SPC requires further processing.
        !           186:  *
        !           187:  * Key codes:
        !           188:  *     ESC .. <- == 1 .. 14
        !           189:  *     -> .. \n == 15 .. 28
        !           190:  *     CTRL .. ` == 29 .. 41
        !           191:  *     ^Shift .. PrtSc == 42 .. 55
        !           192:  *     ALT .. CapsLock == 56 .. 58
        !           193:  *     F1 .. F10 == 59 .. 68
        !           194:  *     NumLock .. Del == 69 .. 83
        !           195:  */
        !           196: static unsigned char lmaptab[] ={
        !           197:             '\33',  '1',  '2',  '3',  '4',  '5',  '6',         /* 1 - 7 */
        !           198:         '7',  '8',  '9',  '0',  '-',  '=', '\b', '\t',         /* 8 - 15 */
        !           199:         'q',  'w',  'e',  'r',  't',  'y',  'u',  'i',         /* 16 - 23 */
        !           200:         'o',  'p',  '[',  ']', '\r',  XXX,  'a',  's',         /* 24 - 31 */
        !           201:         'd',  'f',  'g',  'h',  'j',  'k',  'l',  ';',         /* 32 - 39 */
        !           202:         '\'', '`',  XXX,  '\\',  'z',  'x',  'c',  'v',        /* 40 - 47 */
        !           203:         'b',  'n',  'm',  ',',  '.',  '/',  XXX,  '*',         /* 48 - 55 */
        !           204:         XXX,  ' ',  XXX,  SPC,  SPC,  SPC,  SPC,  SPC,         /* 56 - 63 */
        !           205:         SPC,  SPC,  SPC,  SPC,  SPC,  SPC,  SPC,  SPC,         /* 64 - 71 */
        !           206:         SPC,  SPC,  '-',  SPC,  SPC,  SPC,  '+',  SPC,         /* 72 - 79 */
        !           207:         SPC,  SPC,  SPC,  SPC                                  /* 80 - 83 */
        !           208: };
        !           209: 
        !           210: static unsigned char umaptab[] ={
        !           211:             '\33',  '!',  '@',  '#',  '$',  '%',  '^',         /* 1 - 7 */
        !           212:         '&',  '*',  '(',  ')',  '_',  '+', '\b', SPC,          /* 8 - 15 */
        !           213:         'Q',  'W',  'E',  'R',  'T',  'Y',  'U',  'I',         /* 16 - 23 */
        !           214:         'O',  'P',  '{',  '}', '\r',  XXX,  'A',  'S',         /* 24 - 31 */
        !           215:         'D',  'F',  'G',  'H',  'J',  'K',  'L',  ':',         /* 32 - 39 */
        !           216:         '"',  '~',  XXX,  '|',  'Z',  'X',  'C',  'V',         /* 40 - 47 */
        !           217:         'B',  'N',  'M',  '<',  '>',  '?',  XXX,  '*',         /* 48 - 55 */
        !           218:         XXX,  ' ',  XXX,  SPC,  SPC,  SPC,  SPC,  SPC,         /* 56 - 63 */
        !           219:         SPC,  SPC,  SPC,  SPC,  SPC,  SPC,  SPC,  SPC,         /* 64 - 71 */
        !           220:         SPC,  SPC,  '-',  SPC,  SPC,  SPC,  '+',  SPC,         /* 72 - 79 */
        !           221:         SPC,  SPC,  SPC,  SPC                                  /* 80 - 83 */
        !           222: };
        !           223: 
        !           224: #define SS0    0                       /* No shift */
        !           225: #define SS1    (SLS|SRS|CTS)           /* Shift, Ctrl */
        !           226: #define SES    (SLS|SRS)               /* Shift */
        !           227: #define LET    (SLS|SRS|CPLS|CTS)      /* Shift, Caps, Ctrl */
        !           228: #define KEY    (SLS|SRS|NMLS|AKPS)     /* Shift, Num, Alt keypad */
        !           229: 
        !           230: static unsigned char smaptab[] ={
        !           231:               SS0,  SES,  SS1,  SES,  SES,  SES,  SS1,         /* 1 - 7 */
        !           232:         SES,  SES,  SES,  SES,  SS1,  SES,  CTS,  SES,         /* 8 - 15 */
        !           233:         LET,  LET,  LET,  LET,  LET,  LET,  LET,  LET,         /* 16 - 23 */
        !           234:         LET,  LET,  SS1,  SS1,  CTS, SHFT,  LET,  LET,         /* 24 - 31 */
        !           235:         LET,  LET,  LET,  LET,  LET,  LET,  LET,  SES,         /* 32 - 39 */
        !           236:         SES,  SS1, SHFT,  SS1,  LET,  LET,  LET,  LET,         /* 40 - 47 */
        !           237:         LET,  LET,  LET,  SES,  SES,  SES, SHFT,  SES,         /* 48 - 55 */
        !           238:        SHFT,  SS1, SHFT,  SS0,  SS0,  SS0,  SS0,  SS0,         /* 56 - 63 */
        !           239:         SS0,  SS0,  SS0,  SS0,  SS0, SHFT,  KEY,  KEY,         /* 64 - 71 */
        !           240:         KEY,  KEY,  SS0,  KEY,  KEY,  KEY,  SS0,  KEY,         /* 72 - 79 */
        !           241:         KEY,  KEY,  KEY,  KEY                                  /* 80 - 83 */
        !           242: };
        !           243: 
        !           244: /*
        !           245:  * Load entry point.
        !           246:  *  Do reset the keyboard because it gets terribly munged
        !           247:  *  if you type during the boot.
        !           248:  */
        !           249: isload()
        !           250: {
        !           251:        register short          i;      /* was: int i */
        !           252:        register HWentry        **hw;
        !           253:        register VTDATA         *vp;
        !           254: 
        !           255:        /*
        !           256:         * Reset keyboard if NOT an XT turbo.
        !           257:         */
        !           258:        if ( ! isturbo ) {
        !           259:                outb(KBCTRL, 0x0C);             /* Clock low */
        !           260:                for (i = 10582; --i >= 0; );    /* For 20ms */
        !           261:                outb(KBCTRL, 0xCC);             /* Clock high */
        !           262:                for (i = 0; --i != 0; )
        !           263:                        ;
        !           264:                i = inb(KBDATA);
        !           265:                outb(KBCTRL, 0xCC);                     /* Clear keyboard */
        !           266:                outb(KBCTRL, 0x4D);                     /* Enable keyboard */
        !           267:        }
        !           268:        PRINTV("vtload:\n");
        !           269:        fk_loaded = 0;
        !           270: 
        !           271:        /* figure out what our current max is */
        !           272:        for( vtmax = 0, hw = vtHWtable; *hw; ++hw ) {
        !           273:                vtmax += (*hw)->count;
        !           274:                (*hw)->found = 0;       /* assume non-exist */
        !           275:        }
        !           276:        PRINTV( "vtload: %d screens possible\n", vtmax );
        !           277: 
        !           278:        vtdata = (VTDATA **) kalloc( vtmax * sizeof( *vtdata ) );
        !           279:        if( vtdata == NULL ) {
        !           280:                printf( "vtload: unable to obtain vtdata[%d]\n", vtmax );
        !           281:                u.u_error = -1;
        !           282:                return;
        !           283:        }
        !           284:        PRINTV( "vtload: obtained vtdata[%d] @%x\n", vtmax, vtdata );
        !           285: 
        !           286:        vttty = (TTY **) kalloc( vtmax * sizeof( *vttty ) );
        !           287:        if( vttty == NULL ) {
        !           288:                printf( "vtload: unable to obtain vttty[%d]\n", vtmax );
        !           289:                u.u_error = -1;
        !           290:                return;
        !           291:        }
        !           292:        PRINTV( "vtload: obtained vttty[%d] @%x\n", vtmax, vttty );
        !           293: 
        !           294:        /* determine which video adaptors are present */
        !           295:        for( vtcount = 0, hw = vtHWtable; *hw; ++hw ) {
        !           296:                /* remember our logical start */
        !           297:                (*hw)->start = vtcount;
        !           298:                PRINTV( ", start %d\n", vtcount );
        !           299: 
        !           300:                /* allocate the necessary memory */
        !           301:                for ( i = 0; i < (*hw)->count; ++i ) {
        !           302:                        vp = vtdata[vtcount] = kalloc( sizeof(VTDATA) );
        !           303:                        PRINTV( "     vtdata[%d] = @%x\n", vtcount, vp );
        !           304:                        if( vp == NULL || !VTttyinit(vtcount) ) {
        !           305:                                printf("not enough memory for VTDATA\n" );
        !           306:                                break;
        !           307:                        }
        !           308: 
        !           309:                        /* fill in appropriately */
        !           310:                        *vp = const_vtdata;
        !           311:                        vp->vmm_port = (*hw)->port;
        !           312:                        vp->vmm_vseg = (*hw)->vidmemory.seg;
        !           313:                        vp->vmm_voff = (*hw)->vidmemory.off;
        !           314: 
        !           315:                        vp->vt_ind = vtcount;
        !           316:                        vtdatainit(vp);
        !           317:                        if (i == 0 ) {
        !           318:                                vp->vmm_visible = VNKB_TRUE;
        !           319:                                vp->vmm_seg = vp->vmm_vseg;
        !           320:                                vp->vmm_off = vp->vmm_voff;
        !           321:                                updscreen(vtcount);
        !           322:                        }
        !           323:                        (*hw)->found++;
        !           324:                        vtcount++;
        !           325:                }
        !           326:        }
        !           327: 
        !           328:        /*
        !           329:         * initialize vtconsole
        !           330:         */
        !           331:        vtconsole = vtdata[vtactive = 0];
        !           332:        vtconsole->vmm_invis = 0;               /* vtconsole cursor visible */
        !           333: 
        !           334:        /*
        !           335:         * Seize keyboard interrupt.
        !           336:         */
        !           337: #ifdef _I386
        !           338:        setivec(ISVEC, isrint);
        !           339: #else
        !           340: #if    VT_MAJOR == KB_MAJOR
        !           341:        setivec(1, isrint);
        !           342: #else
        !           343: 
        !           344:        /*
        !           345:         * Map table and vector to us
        !           346:         */
        !           347:        i = sphi();
        !           348:        PRINTV( "VTload: unload old vector\n" );
        !           349:        kcall( Kclrivec, 1 );
        !           350:        setivec(1, isrint);
        !           351:        spl( i );
        !           352: #endif
        !           353: #endif /* _I386 */
        !           354: 
        !           355:        /*
        !           356:         * Enable mmwatch() invocation every second.
        !           357:         */
        !           358:        drvl[VT_MAJOR].d_time = 1;
        !           359: 
        !           360:        /*
        !           361:         * Initialize video display.
        !           362:         */
        !           363:        for ( i = 0; i < vtcount; ++i )
        !           364:                mmstart( vttty[i] );
        !           365: }
        !           366: 
        !           367: /*
        !           368:  * Unload entry point.
        !           369:  */
        !           370: isuload()
        !           371: {
        !           372:        register int i;
        !           373:        register level = sphi();
        !           374: 
        !           375:        clrivec(ISVEC);
        !           376: #ifndef        _I386
        !           377: #if    VT_MAJOR != KB_MAJOR
        !           378:        kcall( Ksetivec, ISVEC, &Kisrint );
        !           379: #endif
        !           380: #endif
        !           381:        spl( level );
        !           382: 
        !           383:        /* Restore pointers to original state. */
        !           384:        vtconsole = vtdata[0];
        !           385:        vtconsole->vmm_invis = 0;
        !           386:        vtconsole->vmm_visible = VNKB_TRUE;
        !           387: 
        !           388:        if( vt_opened )
        !           389:                printf( "VTclose with %d open screens\n", vt_opened );
        !           390: 
        !           391: #ifndef        _I386
        !           392:        for( i = 0; i < vtcount; ++i ) {
        !           393:                PRINTV( "VTuload: free far %x:%x, tty %x\n",
        !           394:                        vttty[i]->t_buffer->s_faddr, vttty[i] );
        !           395:                sfree( vttty[i]->t_buffer );
        !           396:                kfree( vttty[i] );
        !           397:                sfree( vtdata[i].vt_buffer );
        !           398:        }
        !           399: #endif
        !           400: }
        !           401: 
        !           402: /*
        !           403:  * Default function key strings (terminated by -1 [\377])
        !           404:  */
        !           405: static char *deffuncs[] = {
        !           406:        "\33[1x\377",   /* F1 */
        !           407:        "\33[2x\377",   /* F2 */
        !           408:        "\33[3x\377",   /* F3 */
        !           409:        "\33[4x\377",   /* F4 */
        !           410:        "\33[5x\377",   /* F5 */
        !           411:        "\33[6x\377",   /* F6 */
        !           412:        "\33[7x\377",   /* F7 */
        !           413:        "\33[8x\377",   /* F8 */
        !           414:        "\33[9x\377",   /* F9 */
        !           415:        "\33[0x\377",   /* F10 - historical value */
        !           416:        "\33[1y\377",   /* F11 */
        !           417:        "\33[2y\377",   /* F12 */
        !           418:        "\33[3y\377",   /* F13 */
        !           419:        "\33[4y\377",   /* F14 */
        !           420:        "\33[5y\377",   /* F15 */
        !           421:        "\33[6y\377",   /* F16 */
        !           422:        "\33[7y\377",   /* F17 */
        !           423:        "\33[8y\377",   /* F18 */
        !           424:        "\33[9y\377",   /* F19 */
        !           425:        "\33[0y\377"    /* F20 */
        !           426: };
        !           427: 
        !           428: /*
        !           429:  * Open routine.
        !           430:  */
        !           431: isopen(dev, mode)
        !           432: dev_t dev;
        !           433: unsigned int mode;
        !           434: {
        !           435:        register int s;
        !           436:        register TTY *tp;
        !           437:        int     index = vtindex(dev);
        !           438: 
        !           439:        PRINTV("isopen: %x\n", dev);
        !           440:        if (index < 0 || index >= vtcount) {
        !           441:                u.u_error = ENXIO;
        !           442:                return;
        !           443:        }
        !           444: 
        !           445:        tp = vttty[index];
        !           446:        if ((tp->t_flags&T_EXCL) != 0 && !super()) {
        !           447:                u.u_error = ENODEV;
        !           448:                return;
        !           449:        }
        !           450:        ttsetgrp(tp, dev, mode);
        !           451: 
        !           452:        s = sphi();
        !           453:        if (tp->t_open++ == 0) {
        !           454:                initkeys();             /* init function keys */
        !           455:                tp->t_flags = T_CARR;  /* indicate "carrier" */
        !           456:                ttopen(tp);
        !           457:        }
        !           458:        spl(s);
        !           459: #if 0
        !           460:        updleds();                      /* update keyboard status LEDS */
        !           461: #endif
        !           462: }
        !           463: 
        !           464: /* Init function keys */
        !           465: initkeys()
        !           466: {      register int i;
        !           467:        register char *cp1, *cp2;
        !           468: 
        !           469:        for (i=0; i < NFKEY; i++)
        !           470:                isfval[i] = 0;          /* clear function key buffer */
        !           471:        cp2 = isfbuf;                   /* pointer to key buffer */
        !           472:        for (i=0; i < NFKEY; i++) {
        !           473:                isfval[i] = cp2;        /* save pointer to key string */
        !           474:                cp1 = deffuncs[i];      /* get init string pointer */
        !           475:           while ((*cp2++ = *cp1++) != -1)      /* copy key data */
        !           476:                if (cp2 >= &isfbuf[NFBUF-3])    /* overflow? */
        !           477:                        return;
        !           478:        }
        !           479: }
        !           480: 
        !           481: void isvtswitch();     /* deferred virtual terminal switch */
        !           482: 
        !           483: /*
        !           484:  * Close a tty.
        !           485:  */
        !           486: isclose(dev)
        !           487: {
        !           488:        register int s;
        !           489:        int     index = vtindex(dev);
        !           490:        register TTY *tp = vttty[index];
        !           491: 
        !           492:        if (--tp->t_open == 0)
        !           493:                ttclose(tp);
        !           494: }
        !           495: 
        !           496: 
        !           497: /*
        !           498:  * Read routine.
        !           499:  */
        !           500: isread(dev, iop)
        !           501: dev_t dev;
        !           502: IO *iop;
        !           503: {
        !           504:        int     index = vtindex(dev);
        !           505:        register TTY *tp = vttty[index];
        !           506: 
        !           507:        ttread(tp, iop, 0);
        !           508:        if (tp->t_oq.cq_cc)
        !           509:                mmtime(tp);
        !           510: }
        !           511: 
        !           512: /*
        !           513:  * Ioctl routine.
        !           514:  */
        !           515: isioctl(dev, com, vec)
        !           516: dev_t dev;
        !           517: struct sgttyb *vec;
        !           518: {
        !           519:        register int s;
        !           520: 
        !           521:        switch(com) {
        !           522:        case TIOCSETF:
        !           523:        case TIOCGETF:
        !           524:                isfunction(com, (char *)vec);
        !           525:                break;
        !           526:        case TIOCSHIFT:   /* switch left-SHIFT and "\" */
        !           527:                lshiftkb = LSHIFTA;    /* alternate values */
        !           528:                lmaptab[41] = '\\';
        !           529:                lmaptab[42] = XXX;
        !           530:                umaptab[41] = '|';
        !           531:                umaptab[42] = XXX;
        !           532:                smaptab[41] = SS1;
        !           533:                smaptab[42] = SHFT;
        !           534:                break;
        !           535:        case TIOCCSHIFT:  /* normal (default) left-SHIFT and "\" */
        !           536:                lshiftkb = LSHIFT;     /* normal values */
        !           537:                lmaptab[41] = XXX;
        !           538:                lmaptab[42] = '\\';
        !           539:                umaptab[41] = XXX;
        !           540:                umaptab[42] = '|';
        !           541:                smaptab[41] = SHFT;
        !           542:                smaptab[42] = SS1;
        !           543:                break;
        !           544:        default:
        !           545:                s = sphi();
        !           546:                ttioctl(vttty[vtindex(dev)], com, vec);
        !           547:                spl(s);
        !           548:                break;
        !           549:        }
        !           550: }
        !           551: 
        !           552: /*
        !           553:  * Set and receive the function keys.
        !           554:  */
        !           555: isfunction(c, v)
        !           556: int c;
        !           557: char *v;
        !           558: {
        !           559:        register char *cp;
        !           560:        register int i;
        !           561: 
        !           562:        if (c == TIOCGETF) {
        !           563:                for (cp = isfbuf; cp < &isfbuf[NFBUF]; cp++)
        !           564:                    putubd(v++, *cp);
        !           565:        } else {
        !           566:                for (i=0; i < NFKEY; i++)       /* zap current settings */
        !           567:                        isfval[i] = 0;
        !           568:                cp = isfbuf;                    /* pointer to key buffer */
        !           569:                for (i=0; i<NFKEY; i++) {
        !           570:                        isfval[i] = cp;         /* save pointer to key string */
        !           571:                        while ((*cp++ = getubd(v++)) != -1)  /* copy key data */
        !           572:                                if (cp >= &isfbuf[NFBUF-3])  /* overflow? */
        !           573:                                        return;
        !           574:                }
        !           575:        }
        !           576: }
        !           577: 
        !           578: 
        !           579: /*
        !           580:  * Poll routine.
        !           581:  */
        !           582: ispoll( dev, ev, msec )
        !           583: dev_t dev;
        !           584: int ev;
        !           585: int msec;
        !           586: {
        !           587:        register TTY *tp = vttty[vtindex(dev)];
        !           588: 
        !           589:        return ttpoll(tp, ev, msec);
        !           590: }
        !           591: 
        !           592: /*
        !           593:  * Receive interrupt.
        !           594:  */
        !           595: isrint()
        !           596: {
        !           597:        register int    c;
        !           598:        register int    s;
        !           599:        register int    r;
        !           600:        int             savests;
        !           601:        int             update_leds = 0;
        !           602: 
        !           603:        /*
        !           604:         * Schedule raw input handler if not already active.
        !           605:         */
        !           606:        if ( isbusy == 0 ) {
        !           607:                isbusy = 1;
        !           608:                defer(isbatch,  vttty[vtactive]);
        !           609:        } 
        !           610: 
        !           611:        /*
        !           612:         * Pull character from the data
        !           613:         * port. Pulse the KBFLAG in the control
        !           614:         * port to reset the data buffer.
        !           615:         */
        !           616:        r = inb(KBDATA) & 0xFF;
        !           617:        c = inb(KBCTRL);
        !           618:        outb(KBCTRL, c|KBFLAG);
        !           619:        outb(KBCTRL, c);
        !           620: #if    KBDEBUG
        !           621:        printf("kbd: %d\n", r);                 /* print scan code/direction */
        !           622: #endif
        !           623:        if (ledcmd) {
        !           624:                ledcmd = 0;
        !           625:                if (r == KBACK) {               /* output to status LEDS */
        !           626:                        c = scrollkb & 1;
        !           627:                        if (shift & NMLS)
        !           628:                                c |= 2;
        !           629:                        if (shift & CPLS)
        !           630:                                c |= 4;
        !           631:                        outb(KBDATA, c);
        !           632:                }
        !           633:                return;
        !           634:        }
        !           635:        if (extended > 0) {                     /* if multi-character seq, */
        !           636:                --extended;                     /* ... ignore this char */
        !           637:                return;
        !           638:        }
        !           639:        if (r == EXTENDED1) {                   /* ignore extended sequences */
        !           640:                extended = 5;
        !           641:                return;
        !           642:        }
        !           643:        if (r == 0xFF)
        !           644:                return; /* Overrun */
        !           645:        c = (r & KEYSC) - 1;
        !           646:        /*
        !           647:         * Check for reset.
        !           648:         */
        !           649:        if ((r&KEYUP) == 0 && c == DELETE && (shift&(CTS|ALS)) == (CTS|ALS))
        !           650:                boot();
        !           651: 
        !           652:        /*
        !           653:         * Track "shift" keys.
        !           654:         */
        !           655:        s = smaptab[c];
        !           656:        if (s & SHFT) {
        !           657:                if (r & KEYUP) {                /* "shift" released */
        !           658:                        if (c == RSHIFT)
        !           659:                                shift &= ~SRS;
        !           660:                        else if (c == lshiftkb)
        !           661:                                shift &= ~SLS;
        !           662:                        else if (c == CTRLkb)
        !           663:                                shift &= ~CTS;
        !           664:                        else if (c == ALTkb)
        !           665:                                shift &= ~ALS;
        !           666:                } else {                        /* "shift" pressed */
        !           667:                        if (c == lshiftkb)
        !           668:                                shift |= SLS;
        !           669:                        else if (c == RSHIFT)
        !           670:                                shift |= SRS;
        !           671:                        else if (c == CTRLkb)
        !           672:                                shift |= CTS;
        !           673:                        else if (c == ALTkb) 
        !           674:                                shift |= ALS;
        !           675:                        else if (c == CAPLOCK) {
        !           676:                                shift ^= CPLS;  /* toggle cap lock */
        !           677:                                updleds();
        !           678:                        } else if (c == NUMLOCK) {
        !           679:                                shift ^= NMLS;  /* toggle num lock */
        !           680:                                updleds();
        !           681:                        }
        !           682:                }
        !           683:                return;
        !           684:        }
        !           685: 
        !           686:        /*
        !           687:         * No other key up codes of interest.
        !           688:         */
        !           689:        if (r & KEYUP)
        !           690:                return;
        !           691: 
        !           692:        /*
        !           693:         * Map character, based on the
        !           694:         * current state of the shift, control,
        !           695:         * meta and lock flags.
        !           696:         */
        !           697:        if (shift & CTS) {
        !           698:                if (s == CTS)                   /* Map Ctrl (BS | NL) */
        !           699:                        c = (c == BACKSP) ? 0x7F : 0x0A;
        !           700:                else if (s==SS1 || s==LET)      /* Normal Ctrl map */
        !           701:                        c = umaptab[c]&0x1F;    /* Clear bits 5-6 */
        !           702:                else { if (s==KEY || s==SS0) 
        !           703:                                vtnumeric(r);
        !           704:                        return;                 /* Ignore this char */
        !           705:                }
        !           706:        } else if (s &= shift) {
        !           707:                if (shift & SES) {               /* if shift on */
        !           708:                        if (s & (CPLS|NMLS))     /* if caps/num lock */
        !           709:                                c = lmaptab[c];  /* use unshifted */
        !           710:                        else
        !           711:                                c = umaptab[c];  /* use shifted */
        !           712:                } else {                         /* if shift not on */
        !           713:                        if (s & (CPLS|NMLS))     /* if caps/num lock */
        !           714:                                c = umaptab[c];  /* use shifted */
        !           715:                        else
        !           716:                                c = lmaptab[c];  /* use unshifted */
        !           717:                }
        !           718:        } else
        !           719:                c = lmaptab[c];                  /* use unshifted */
        !           720: 
        !           721:        /*
        !           722:         * Act on character.
        !           723:         */
        !           724:        if (c == XXX)
        !           725:                return;                          /* char to ignore */
        !           726: 
        !           727:        if (c != SPC) {                  /* not special char? */
        !           728:                if (shift & ALS)         /* ALT (meta bit)? */
        !           729:                        c |= 0x80;       /* set meta */
        !           730:                isin(c);                 /* send the char */
        !           731:        } else
        !           732:                update_leds += isspecial(r);     /* special chars */
        !           733:        if (update_leds) {
        !           734:                savests = sphi();
        !           735:                outb(KBDATA, LEDCMD);
        !           736:                ledcmd = 1;
        !           737:                spl(savests);
        !           738:        }
        !           739: }
        !           740: 
        !           741: /*
        !           742:  * Process numeric keypad for virtual terminals.
        !           743:  */
        !           744: vtnumeric(c)
        !           745: int    c;
        !           746: {
        !           747:        switch (c) {
        !           748:        case 71: case 72: case 73:      /* ctrl 7/8/9 (vt7, vt8, vt9) */
        !           749:                defer(isvtswitch, c + 16);
        !           750:                break;
        !           751:        case 74:                        /* ctrl - */
        !           752:                defer(isvtswitch, vtp);
        !           753:                break;
        !           754:        case 75: case 76: case 77:      /* ctrl 4/5/6 (vt5, vt6, vt7) */
        !           755:                defer(isvtswitch, c + 10);
        !           756:                break;
        !           757:        case 78:                        /* ctrl + */
        !           758:                defer(isvtswitch, vtn);
        !           759:                break;
        !           760:        case 79: case 80: case 81:      /* ctrl 1/2/3 */
        !           761:                defer(isvtswitch, c + 2);
        !           762:                break;
        !           763:        case 82:                        /* ctrl 0  (vt0) */
        !           764:                defer(isvtswitch, vt0);
        !           765:                break;
        !           766:        case 83:                        /* ctrl del (toggle) */
        !           767:                c = vtt;
        !           768:                defer(isvtswitch, vtt);
        !           769:                break;
        !           770:        }
        !           771: }
        !           772: 
        !           773: /*
        !           774:  * Handle special input sequences.
        !           775:  * The character passed is the key number.
        !           776:  *
        !           777:  * The keypad is translated by the following table,
        !           778:  * the first entry is the normal sequence, the second the shifted,
        !           779:  * and the third the alternate keypad sequence.
        !           780:  */
        !           781: static char *keypad[][3] = {
        !           782:        { "\33[H",  "7", "\33?w" },     /* 71 */
        !           783:        { "\33[A",  "8", "\33?x" },     /* 72 */
        !           784:        { "\33[V",  "9", "\33?y" },     /* 73 */
        !           785:        { "\33[D",  "4", "\33?t" },     /* 75 */
        !           786:        { "\0337",  "5", "\33?u" },     /* 76 */
        !           787:        { "\33[C",  "6", "\33?v" },     /* 77 */
        !           788:        { "\33[24H","1", "\33?q" },     /* 79 */
        !           789:        { "\33[B",  "2", "\33?r" },     /* 80 */
        !           790:        { "\33[U",  "3", "\33?s" },     /* 81 */
        !           791:        { "\33[@",  "0", "\33?p" },     /* 82 */
        !           792:        { "\33[P", ".",  "\33?n" }      /* 83 */
        !           793: };
        !           794: 
        !           795: isspecial(c)
        !           796: int c;
        !           797: {
        !           798:        register char *cp;
        !           799:        register int s;
        !           800:        int     update_leds = 0;
        !           801: 
        !           802:        cp = 0;
        !           803: 
        !           804:        switch (c) {
        !           805:        case 15:                                        /* cursor back tab */
        !           806:                cp = "\033[Z";
        !           807:                break;
        !           808:        case 59: case 60: case 61: case 62: case 63:    /* Function keys */
        !           809:        case 64: case 65: case 66: 
        !           810:                /* offset to function string */
        !           811:                /* Magic numbers 21 and 61 to mach vtnkb constants */
        !           812:                if ( shift & ALS ) 
        !           813:                        defer(isvtswitch, c + 21);
        !           814:                else
        !           815:                        cp = isfval[c-59];
        !           816:                break;
        !           817:        case 67: case 68:
        !           818:                /* offset to function string */
        !           819:                if ( shift & ALS ) 
        !           820:                        defer(isvtswitch, c + 61);
        !           821:                else
        !           822:                        cp = isfval[c-59];
        !           823:                break;
        !           824:        case 70:                /* Scroll Lock -- stop/start output */
        !           825:        {
        !           826:                static char cbuf[2];
        !           827: 
        !           828:                cp = &cbuf[0];  /* working buffer */
        !           829:                if (!(vttty[vtactive]->t_sgttyb.sg_flags
        !           830:                                & RAWIN)) {     /* not if in RAW mode */
        !           831:                        ++update_leds;
        !           832:                        if (vttty[vtactive]->t_flags&T_STOP){/* output stopped? */
        !           833:                           /* start it */
        !           834:                           cbuf[0] = vttty[vtactive]->t_tchars.t_startc;  
        !           835:                           scrollkb = 0;
        !           836:                        } else {        /* stop output */
        !           837:                           cbuf[0] = vttty[vtactive]->t_tchars.t_stopc;   
        !           838:                           scrollkb = 1;
        !           839:                        }
        !           840:                }
        !           841:                break;
        !           842:        }
        !           843: 
        !           844:        case 79:                /* 1/End */
        !           845:        case 80:                /* 2/DOWN */
        !           846:        case 81:                /* 3/PgDn */
        !           847:        case 82:                /* 0/Ins */
        !           848:        case 83:                /* ./Del */
        !           849:                --c;            /* adjust code */
        !           850:        case 75:                /* 4/LEFT */
        !           851:        case 76:                /* 5 */
        !           852:        case 77:                /* 6/RIGHT */
        !           853:                --c;            /* adjust code */
        !           854:        case 71:                /* 7/Home/Clear */
        !           855:        case 72:                /* 8/UP */
        !           856:        case 73:                /* 9/PgUp */
        !           857:                s = 0;                  /* start off with normal keypad */
        !           858:                if (shift&NMLS)         /* num lock? */
        !           859:                        s = 1;          /* set shift pad */
        !           860:                if (shift&SES)          /* shift? */
        !           861:                        s ^= 1;         /* toggle shift pad */
        !           862:                if (shift&AKPS)         /* alternate pad? */
        !           863:                        s = 2;          /* set alternate pad */
        !           864:                cp = keypad[c-71][s];   /* get keypad value */
        !           865:                break;
        !           866:        }
        !           867:        if (cp)                                 /* send string */
        !           868:                while ((*cp != 0) && (*cp != -1))
        !           869:                        isin( *cp++ & 0377 );
        !           870:        return update_leds;
        !           871: }
        !           872: 
        !           873: /**
        !           874:  *
        !           875:  * void
        !           876:  * ismmfunc( c )       -- process keyboard related output escape sequences
        !           877:  * char c;
        !           878:  */
        !           879: void
        !           880: ismmfunc(c)
        !           881: register int c;
        !           882: {
        !           883:        switch (c) {
        !           884:        case 't':       /* Enter numlock */
        !           885:                shift |= NMLS;
        !           886:                updleds();                      /* update LED status */
        !           887:                break;
        !           888:        case 'u':       /* Leave numlock */
        !           889:                shift &= ~NMLS;
        !           890:                updleds();                      /* update LED status */
        !           891:                break;
        !           892:        case '=':       /* Enter alternate keypad */
        !           893:                shift |= AKPS;
        !           894:                break;
        !           895:        case '>':       /* Exit alternate keypad */
        !           896:                shift &= ~AKPS;
        !           897:                break;
        !           898:        case 'c':       /* Reset terminal */
        !           899:                islock = 0;
        !           900:                shift  = 0;
        !           901:                initkeys();
        !           902:                updleds();                      /* update LED status */
        !           903:                break;
        !           904:        }
        !           905: }
        !           906: 
        !           907: /**
        !           908:  *
        !           909:  * void
        !           910:  * isin( c )   -- append character to raw input silo
        !           911:  * char c;
        !           912:  */
        !           913: static
        !           914: isin( c )
        !           915: register int c;
        !           916: {
        !           917:        int cache_it = 1;
        !           918:        TTY * tp = vttty[vtactive];
        !           919: 
        !           920:        /*
        !           921:         * If using software incoming flow control, process and
        !           922:         * discard t_stopc and t_startc.
        !           923:         */
        !           924:        if (ISIXON) {
        !           925: #if _I386
        !           926:                if (ISSTART || (ISIXANY && ISXSTOP)) {
        !           927:                        tp->t_flags &= ~(T_STOP | T_XSTOP);
        !           928:                        ttstart(tp);
        !           929:                        cache_it = 0;
        !           930:                } else if (ISSTOP) {
        !           931:                        if ((tp->t_flags&T_STOP) == 0)
        !           932:                                tp->t_flags |= (T_STOP | T_XSTOP);
        !           933:                        cache_it = 0;
        !           934:                }
        !           935: #else
        !           936:                if (ISSTOP) {
        !           937:                        if ((tp->t_flags&T_STOP) == 0)
        !           938:                                tp->t_flags |= T_STOP;
        !           939:                        cache_it = 0;
        !           940:                }
        !           941:                if (ISSTART) {
        !           942:                        tp->t_flags &= ~T_STOP;
        !           943:                        ttstart(tp);
        !           944:                        cache_it = 0;
        !           945:                }
        !           946: #endif
        !           947:        }
        !           948: 
        !           949:        /*
        !           950:         * If the tty is not open the character is
        !           951:         * just tossed away.
        !           952:         */
        !           953:        if (vttty[vtactive]->t_open == 0)
        !           954:                return;
        !           955: 
        !           956:        /*
        !           957:         * Cache received character.
        !           958:         */
        !           959:        if (cache_it) {
        !           960:                in_silo.si_buf[ in_silo.si_ix ] = c;
        !           961: 
        !           962:                if ( ++in_silo.si_ix >= sizeof(in_silo.si_buf) )
        !           963:                        in_silo.si_ix = 0;
        !           964:        }
        !           965: }
        !           966: 
        !           967: /**
        !           968:  *
        !           969:  * void
        !           970:  * isbatch()   -- raw input conversion routine
        !           971:  *
        !           972:  *     Action: Enable the video display.
        !           973:  *             Canonize the raw input silo.
        !           974:  *
        !           975:  *     Notes:  isbatch() was scheduled as a deferred process by isrint().
        !           976:  */
        !           977: static void
        !           978: isbatch( tp )
        !           979: register TTY * tp;
        !           980: {
        !           981:        register int c;
        !           982:        static int lastc;
        !           983:        VTDATA          *vp = tp->t_ddp;
        !           984: 
        !           985:        /*
        !           986:         * Ensure video display is enabled.
        !           987:         */
        !           988:        if (vp->vmm_visible)
        !           989:                mm_von(vp);
        !           990: 
        !           991:        isbusy = 0;
        !           992: 
        !           993:        /*
        !           994:         * Process all cached characters.
        !           995:         */
        !           996:        while ( in_silo.si_ix != in_silo.si_ox ) {
        !           997:                /*
        !           998:                 * Get next cached char.
        !           999:                 */
        !          1000:                c = in_silo.si_buf[ in_silo.si_ox ];
        !          1001: 
        !          1002:                if ( in_silo.si_ox >= sizeof(in_silo.si_buf) - 1 )
        !          1003:                        in_silo.si_ox = 0;
        !          1004:                else
        !          1005:                        in_silo.si_ox++;
        !          1006: 
        !          1007:                if ( (islock == 0) || ISINTR || ISQUIT ) {
        !          1008:                        ttin( tp, c );
        !          1009:                }
        !          1010: 
        !          1011:                else if ( (c == 'b') && (lastc == '\033') ) {
        !          1012:                        islock = 0;
        !          1013:                        ttin( tp, lastc );
        !          1014:                        ttin( tp, c );
        !          1015:                }
        !          1016: 
        !          1017:                else if ( (c == 'c') && (lastc == '\033') ) {
        !          1018:                        ttin( tp, lastc );
        !          1019:                        ttin( tp, c );
        !          1020:                }
        !          1021: 
        !          1022:                else
        !          1023:                        putchar('\007');
        !          1024: 
        !          1025:                lastc = c;
        !          1026:        }
        !          1027: }
        !          1028: 
        !          1029: /*
        !          1030:  * update the keyboard status LEDS
        !          1031:  */
        !          1032: updleds()
        !          1033: {
        !          1034:        int     s;
        !          1035: 
        !          1036:        s = sphi();
        !          1037:        outb(KBDATA, LEDCMD);
        !          1038:        ledcmd = 1;
        !          1039:        spl(s);
        !          1040: }
        !          1041: 
        !          1042: /*
        !          1043:  * unlock the scroll in case an interrupt character is received
        !          1044:  */
        !          1045: kbunscroll()
        !          1046: {
        !          1047:        scrollkb = 0;
        !          1048:        updleds();
        !          1049: }
        !          1050: 
        !          1051: int
        !          1052: VTttyinit(i)
        !          1053: int i;
        !          1054: {
        !          1055:        TTY *tp;
        !          1056: 
        !          1057:        /*
        !          1058:         * get pointer to TTY structure from kernal memory space
        !          1059:         */
        !          1060:        if( (tp = vttty[i] = (TTY *)kalloc(sizeof (TTY))) == NULL )
        !          1061:                return(0);
        !          1062:        PRINTV( "     vttty[%d]: @%x, ", i, tp );
        !          1063: 
        !          1064: #if    FAR_TTY
        !          1065:        /*
        !          1066:         * get pointers to the buffers pointed to by the TTY structure 
        !          1067:         * from user memory space
        !          1068:         */
        !          1069:        tp->t_buffer = salloc( (fsize_t)NCIB+2*SI_BUFSIZ, SFSYST|SFNSWP );
        !          1070:        tp->t_ib = 0;
        !          1071:        tp->t_rawin.si_buf = NCIB;
        !          1072:        tp->t_rawout.si_buf = NCIB+SI_BUFSIZ;
        !          1073: #endif
        !          1074:        tp->t_param = NULL;
        !          1075:        tp->t_start = &mmstart;
        !          1076: 
        !          1077: #ifndef        _I386
        !          1078: #if    VT_MAJOR == KB_MAJOR
        !          1079:        tp->t_cs_sel = 0;
        !          1080: #else
        !          1081:        tp->t_cs_sel = cs_sel();
        !          1082: #endif
        !          1083: #endif
        !          1084:        tp->t_ddp = vtdata[i];
        !          1085:        PRINTV( "data @%lx\n", tp->t_ddp );
        !          1086:        return(1);
        !          1087: }
        !          1088: 
        !          1089: vtdatainit(vp)
        !          1090: VTDATA *vp;
        !          1091: {
        !          1092: #ifndef        _I386
        !          1093:        VT_FARSEG       vt_farseg;
        !          1094: #endif
        !          1095:        /*
        !          1096:         * vtdata init - vmm part
        !          1097:         */
        !          1098:        vp->vmm_invis = -1;                     /* cursor invisible */
        !          1099: 
        !          1100: #ifdef _I386
        !          1101:        vp->vt_buffer = kalloc( TEXTBLOCK );
        !          1102:        vp->vmm_seg = vp->vmm_mseg = ds_sel();
        !          1103:        vp->vmm_off = vp->vmm_moff = vp->vt_buffer;
        !          1104: #else
        !          1105:        vp->vt_buffer = salloc ( (fsize_t)TEXTBLOCK, SFSYST|SFNSWP|SFHIGH );
        !          1106:        vp->vmm_seg = vp->vmm_mseg = FP_SEG( vp->vt_buffer->vt_faddr );
        !          1107:        vp->vmm_off = vp->vmm_moff = FP_OFF( vp->vt_buffer->vt_faddr );
        !          1108: #endif
        !          1109:        PRINTV( "vt@%x init index %d,%d), seg %x, off %x\n",
        !          1110:                vp, vp->vt_ind, vp->vmm_mseg, vp->vmm_moff );
        !          1111:        /*
        !          1112:         * vtdata init - vnkb part
        !          1113:         */
        !          1114:        /* Make the first memory block active, if present */ 
        !          1115:        vp->vnkb_lastc = 0;
        !          1116:        vp->vnkb_fnkeys = 0;    
        !          1117:        vp->vnkb_funkeyp = 0;   
        !          1118:        vp->vnkb_fk_loaded = 0;                 /* no Fn keys yet */
        !          1119: }
        !          1120: 
        !          1121: /*
        !          1122:  * Given device number, return index for vtdata[], vttty[], etc.
        !          1123:  *
        !          1124:  * Major number must be VT_MAJOR for CPU to get here.
        !          1125:  *
        !          1126:  *      Minor Number   Index Value
        !          1127:  *     ----- ------    ----- -----  
        !          1128:  *     0000  0000      vtactive ... device (2,0) is the active screen
        !          1129:  *     0000  0001      0
        !          1130:  *     0000  0010      1
        !          1131:  *     0000  0011      2
        !          1132:  *        ....
        !          1133:  *     0000  1111      14
        !          1134:  *
        !          1135:  *     0100  xxxx      xxxx ... color devices only
        !          1136:  *     0101  xxxx      xxxx - (# of color devices found) ... monochrome only
        !          1137:  *
        !          1138:  * Return value is in range 0 to vtcount-1 for valid minor numbers,
        !          1139:  * -1 for invalid minor numbers.
        !          1140:  */
        !          1141: int
        !          1142: vtindex( dev )
        !          1143: dev_t dev;
        !          1144: {
        !          1145:        register int    ret = -1;
        !          1146: 
        !          1147:        if ( dev & VT_PHYSICAL ) {
        !          1148:                int     hw = ( dev >> 4 ) & 3;
        !          1149:                int     hw_index = dev & 0x0F;
        !          1150: 
        !          1151:                if( hw_index < vtHWtable[hw]->found )
        !          1152:                        ret = vtHWtable[hw]->start + hw_index;
        !          1153:        } else {
        !          1154:                int     lg_index = dev & 0x0F;
        !          1155: 
        !          1156:                if (lg_index == 0)
        !          1157:                        ret = vtactive;
        !          1158:                if (lg_index > 0 && lg_index <= vtcount ) 
        !          1159:                        ret = lg_index-1;
        !          1160:        }
        !          1161:        if (ret >= 0)
        !          1162:                ret %= vtcount;
        !          1163:        else
        !          1164:                PRINTV( "vtindex: (%x) %d. invalid !\n", dev, ret );
        !          1165:        return ret;
        !          1166: }
        !          1167: 
        !          1168: /*
        !          1169:  *
        !          1170:  * void
        !          1171:  * isvtswitch()        -- deferred virtual terminal switch
        !          1172:  *
        !          1173:  *     Action: - save current shift key status
        !          1174:  *             - determine new active virtual terminal
        !          1175:  *             - deactivate shift key status of the current virtual terminal
        !          1176:  *             - deactivate current virtual terminal
        !          1177:  *             - activate shift key status of the new virtual terminal with 
        !          1178:  *               the previously saved shift key status
        !          1179:  *             - activate new virtual terminal 
        !          1180:  *
        !          1181:  *     Notes:  isvtswitch() was scheduled as a deferred process by 
        !          1182:  *     process_key() which is a function called by isrint().
        !          1183:  */
        !          1184: void
        !          1185: isvtswitch(key_val)
        !          1186: {
        !          1187:        register int    new_index, i;
        !          1188:        unsigned        lockshift, nolockshift; 
        !          1189:        VTDATA          *vp = vtdata[vtactive];
        !          1190:        VTDATA          *vp_old, *vp_new;
        !          1191:        static int      vtprevious;
        !          1192: 
        !          1193:        lockshift = shift & (CPLS | NMLS);
        !          1194:        nolockshift = shift & ~(CPLS | NMLS);
        !          1195:        PRINTV( "F%d: %d", key_val, vtactive );
        !          1196: 
        !          1197:        switch (key_val) {
        !          1198:        case VTKEY_HOME:
        !          1199:                new_index = 0;
        !          1200:                break;
        !          1201:        case VTKEY_NEXT:
        !          1202:                new_index = vtactive;
        !          1203:                for( i = 0; i < vtcount; ++i ) {
        !          1204:                        new_index = ++new_index % vtcount;
        !          1205:                        if( vttty[new_index]->t_open )
        !          1206:                                break;
        !          1207:                }
        !          1208:                break;
        !          1209:        case VTKEY_PREV:
        !          1210:                new_index = vtactive;
        !          1211:                for( i = 0; i < vtcount; ++i ) {
        !          1212:                        new_index = (--new_index+vtcount) % vtcount;
        !          1213:                        if( vttty[new_index]->t_open )
        !          1214:                                break;
        !          1215:                }
        !          1216:                break;
        !          1217:        case VTKEY_TOGL:
        !          1218:                new_index = vtprevious;
        !          1219:                break;
        !          1220:        default:
        !          1221:                new_index = vtindex(vtkey_to_dev(key_val));
        !          1222:                if( new_index < 0) {
        !          1223:                        putchar( '\007' );
        !          1224:                        return;
        !          1225:                }
        !          1226:        }
        !          1227: 
        !          1228:        T_CON(8, printf("%d->%d ", vtactive, new_index));
        !          1229:        if( new_index == vtactive )
        !          1230:                return;
        !          1231: 
        !          1232:        /* Save which locking shift states are in effect. */
        !          1233: 
        !          1234:        vp_old = vtdata[vtactive];
        !          1235:        vp_new = vtdata[new_index];
        !          1236: 
        !          1237:        vp_old->vnkb_shift = lockshift;
        !          1238:        vtdeactivate(vp_new, vp_old);   /* deactivate old virtual terminal */
        !          1239: 
        !          1240:        /* Restore shift lock state, append current momentary shift state. */
        !          1241:        shift = vp_new->vnkb_shift | nolockshift;
        !          1242: 
        !          1243:        vtactivate(vp_new);             /* activate new virtual terminal */
        !          1244:        updterminal(new_index);
        !          1245:        vtprevious = vtactive;
        !          1246:        vtactive = new_index;           /* update vtactive */
        !          1247: }
        !          1248: 
        !          1249: vtdeactivate(vp_new, vp_old)
        !          1250: register VTDATA        *vp_new, *vp_old;
        !          1251: {
        !          1252:        register i;
        !          1253:        VTDATA  *vpi;
        !          1254: 
        !          1255:        /* store old screen contents in memory segment */
        !          1256:        FFCOPY( vp_old->vmm_voff, vp_old->vmm_vseg,
        !          1257:                vp_old->vmm_moff, vp_old->vmm_mseg, TEXTBLOCK );
        !          1258: 
        !          1259:        /*
        !          1260:         * if changing to another screen on same video board
        !          1261:         *      for all screens on same board as new screen
        !          1262:         *              deactivate, but don't update
        !          1263:         * else - changing to a screen on different board
        !          1264:         *      for all screens NOT on same board as new screen
        !          1265:         *              deactivate, but don't update
        !          1266:         */
        !          1267:        if ( vp_old->vmm_port == vp_new->vmm_port ) {
        !          1268:                T_CON(8, printf("deactivate on %x ", vp_new->vmm_port));
        !          1269:                for (i = 0; i < vtcount; ++i) {
        !          1270:                        vpi = vtdata[i];
        !          1271:                        if ( vpi->vmm_port == vp_new->vmm_port ) {
        !          1272:                                /* deactivate, but don't update */
        !          1273:                                vpi->vmm_invis = ~0; 
        !          1274:                                vpi->vmm_visible = VNKB_FALSE;
        !          1275:                                vpi->vmm_seg = vpi->vmm_mseg;
        !          1276:                                vpi->vmm_off = vpi->vmm_moff;
        !          1277:                                if( vpi->vmm_seg == 0 )
        !          1278:                                        printf( "[1]vpi->vmm_seg = 0\n" );
        !          1279:                                PRINTV( "vt.back %d. seg %x off %x\n", i,
        !          1280:                                        vpi->vmm_seg, vpi->vmm_off );
        !          1281:                        }
        !          1282:                }
        !          1283:        } else {
        !          1284:                T_CON(8, printf("deactivate %x->%x ",
        !          1285:                  vp_old->vmm_port, vp_new->vmm_port));
        !          1286:                for (i = 0; i < vtcount; ++i) {
        !          1287:                        vpi = vtdata[i];
        !          1288:                        if ( (vpi->vmm_port != vp_new->vmm_port) 
        !          1289:                          && (vpi->vmm_invis == 0) ) {
        !          1290:                                /* update, but don't deactivate */
        !          1291:                                vpi->vmm_invis = ~0; 
        !          1292:                                updscreen(i);
        !          1293:                        }
        !          1294:                }
        !          1295:        }
        !          1296: }
        !          1297: 
        !          1298: vtactivate(vp)
        !          1299: VTDATA *vp;
        !          1300: {
        !          1301:        register VTDATA *vpi;
        !          1302:        register i;
        !          1303: 
        !          1304:        /* 
        !          1305:         * copy from screen contents from heap segment to video memory 
        !          1306:         * only if necessary
        !          1307:         */
        !          1308:        if ( vp->vmm_visible == VNKB_FALSE )
        !          1309:                FFCOPY( vp->vmm_moff, vp->vmm_mseg,
        !          1310:                        vp->vmm_voff, vp->vmm_vseg, TEXTBLOCK );
        !          1311: 
        !          1312:        for (i = 0; i < vtcount; ++i) {
        !          1313:                vpi = vtdata[i];
        !          1314:                if (vpi->vmm_port == vp->vmm_port) {
        !          1315:                        vpi->vmm_invis = -1;
        !          1316:                        vpi->vmm_visible = VNKB_FALSE;
        !          1317:                        vpi->vmm_seg = vpi->vmm_mseg;
        !          1318:                        vpi->vmm_off = vpi->vmm_moff;
        !          1319:                        if( vpi->vmm_seg == 0 )
        !          1320:                                printf( "[2]vpi->vmm_seg = 0\n" );
        !          1321:                        PRINTV( "vt.back seg %x off %x\n",
        !          1322:                                vpi->vmm_seg, vpi->vmm_off );
        !          1323:                }               
        !          1324:        }
        !          1325:        /*
        !          1326:         * Set new active terminal
        !          1327:         */
        !          1328:        vp->vmm_invis = 0;      
        !          1329:        vp->vmm_visible = VNKB_TRUE;
        !          1330:        vp->vmm_seg = vp->vmm_vseg;
        !          1331:        vp->vmm_off = vp->vmm_voff;
        !          1332:        if( vp->vmm_seg == 0 )
        !          1333:                printf( "vp->vmm_seg = 0\n" );
        !          1334: }
        !          1335: 
        !          1336: /*
        !          1337:  * update the terminal to match vtactive
        !          1338:  */
        !          1339: updterminal(index)
        !          1340: int index;
        !          1341: {
        !          1342:        updscreen(index);
        !          1343:        updleds();
        !          1344: }
        !          1345: 
        !          1346: #undef si
        !          1347: asmdump( cs, ds, es, di, si, bp, sp, bx, dx, cx, i, ip, ax )
        !          1348: int    cs, ds, es, di, si, bp, sp, bx, dx, cx, i, ip, ax;
        !          1349: {
        !          1350:        if( vt_verbose < 2 )
        !          1351:                return;
        !          1352: 
        !          1353:        printf( "asmdump %d: es %x, ds %x, cs:ip %x:%x\n", i, es, ds, cs, ip );
        !          1354:        printf( "   ax %x, bx %x, cx %x, dx %x\n", ax, bx, cx, dx );
        !          1355:        printf( "   di %x, si %x, bp %x, sp %d\n", di, si, bp, sp );
        !          1356: #if    USING_RS232
        !          1357:        if( vt_verbose > 2 )
        !          1358:                getchar();
        !          1359: #endif
        !          1360: }
        !          1361: 
        !          1362: vtdataprint( vp )
        !          1363: register VTDATA *vp;
        !          1364: {
        !          1365:        if( vt_verbose < 2 )
        !          1366:                return;
        !          1367: 
        !          1368:        printf( "VTDATA:    @%x, esc %x, func %x()\n",
        !          1369:                vp, vp->vmm_esc, vp->vmm_func );
        !          1370:        printf( "       hw: port %x, seg %x, off %x\n",
        !          1371:                vp->vmm_port, vp->vmm_vseg, vp->vmm_voff );
        !          1372:        printf( "   memory: size %x, seg %x, off %x\n",
        !          1373:                0/*vp->vmm_size*/, vp->vmm_mseg, vp->vmm_moff );
        !          1374:        printf( "   cursor: seg %x, off %x, visible %d\n",
        !          1375:                vp->vmm_seg, vp->vmm_off, !vp->vmm_invis );
        !          1376:        printf( "           row %d, col %d = offset %d.\n",
        !          1377:                vp->vmm_rowl, vp->vmm_col, vp->vmm_pos );
        !          1378:        printf( "     saved row %d, col %d\n",
        !          1379:                vp->vmm_srow, vp->vmm_scol );
        !          1380:        printf( "   screen: visible %d, attr %x, wrap %d, slow %d\n",
        !          1381:                vp->vmm_visible, vp->vmm_attr, vp->vmm_wrap, vp->vmm_slow );
        !          1382:        printf( "           row base %d, end %d, limit %d\n",
        !          1383:                vp->vmm_brow, vp->vmm_erow, vp->vmm_lrow ); 
        !          1384:        printf( "           row initial base %d, initial end %d\n",
        !          1385:                vp->vmm_ibrow, vp->vmm_ierow ); 
        !          1386: #if    USING_RS232
        !          1387:        if( vt_verbose > 2 )
        !          1388:                getchar();
        !          1389: #endif
        !          1390: }
        !          1391: 
        !          1392: FFCOPY( src_off, src_seg, dst_off, dst_seg, count )
        !          1393: {
        !          1394:        register i;
        !          1395: 
        !          1396: #if    0
        !          1397:        i = ffcopy( src_off, src_seg, dst_off, dst_seg, count );
        !          1398: #else
        !          1399:        for( i = 0; i < count; i += 2 ) {
        !          1400:                register word = ffword( src_off, src_seg );
        !          1401:                sfword( dst_off, dst_seg, word );
        !          1402:                src_off += 2;
        !          1403:                dst_off += 2;
        !          1404:        }
        !          1405: #endif
        !          1406:        return i;       
        !          1407: }
        !          1408: 
        !          1409: /*
        !          1410:  * Given a function key number (e.g. vt0),
        !          1411:  * return the corresponding minor device number.
        !          1412:  *
        !          1413:  * Assume valid key number (VTKEY(fnum) is true) by the time we get here.
        !          1414:  */
        !          1415: int
        !          1416: vtkey_to_dev(fnum)
        !          1417: int fnum;
        !          1418: {
        !          1419:        if (fnum >=vt0 && fnum <= vt15)
        !          1420:                return fnum-vt0+1;
        !          1421:        if (fnum >=color0 && fnum <= color15)
        !          1422:                return (fnum-color0)|(VT_PHYSICAL|VT_HW_COLOR);
        !          1423:        if (fnum >=mono0 && fnum <= mono15)
        !          1424:                return (fnum-mono0)|(VT_PHYSICAL|VT_HW_MONO);
        !          1425:        printf("vtkey_to_dev(%d)! ", fnum);
        !          1426:        return 0;
        !          1427: }
        !          1428: /* End of vtkb.c */

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