![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to cr_tty.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / usr.lib / libcurses|
Return to cr_tty.c CVS log | Up to [CSRG BSD Unix] / 43BSD / usr.lib / libcurses |
1.1 ! root 1: /* ! 2: * Copyright (c) 1980 Regents of the University of California. ! 3: * All rights reserved. The Berkeley software License Agreement ! 4: * specifies the terms and conditions for redistribution. ! 5: */ ! 6: ! 7: #ifndef lint ! 8: static char sccsid[] = "@(#)cr_tty.c 5.2 (Berkeley) 11/8/85"; ! 9: #endif not lint ! 10: ! 11: /* ! 12: * Terminal initialization routines. ! 13: * ! 14: */ ! 15: ! 16: # include "curses.ext" ! 17: ! 18: static bool *sflags[] = { ! 19: &AM, &BS, &DA, &DB, &EO, &HC, &HZ, &IN, &MI, ! 20: &MS, &NC, &NS, &OS, &UL, &XB, &XN, &XT, &XS, ! 21: &XX ! 22: }; ! 23: ! 24: static char *_PC, ! 25: **sstrs[] = { ! 26: &AL, &BC, &BT, &CD, &CE, &CL, &CM, &CR, &CS, ! 27: &DC, &DL, &DM, &DO, &ED, &EI, &K0, &K1, &K2, ! 28: &K3, &K4, &K5, &K6, &K7, &K8, &K9, &HO, &IC, ! 29: &IM, &IP, &KD, &KE, &KH, &KL, &KR, &KS, &KU, ! 30: &LL, &MA, &ND, &NL, &_PC, &RC, &SC, &SE, &SF, ! 31: &SO, &SR, &TA, &TE, &TI, &UC, &UE, &UP, &US, ! 32: &VB, &VS, &VE, &AL_PARM, &DL_PARM, &UP_PARM, ! 33: &DOWN_PARM, &LEFT_PARM, &RIGHT_PARM, ! 34: }, ! 35: *tgoto(); ! 36: ! 37: char _tspace[2048]; /* Space for capability strings */ ! 38: ! 39: static char *aoftspace; /* Address of _tspace for relocation */ ! 40: ! 41: static int destcol, destline; ! 42: ! 43: /* ! 44: * This routine does terminal type initialization routines, and ! 45: * calculation of flags at entry. It is almost entirely stolen from ! 46: * Bill Joy's ex version 2.6. ! 47: */ ! 48: short ospeed = -1; ! 49: ! 50: gettmode() { ! 51: ! 52: if (gtty(_tty_ch, &_tty) < 0) ! 53: return; ! 54: savetty(); ! 55: if (stty(_tty_ch, &_tty) < 0) ! 56: _tty.sg_flags = _res_flg; ! 57: ospeed = _tty.sg_ospeed; ! 58: _res_flg = _tty.sg_flags; ! 59: UPPERCASE = (_tty.sg_flags & LCASE) != 0; ! 60: GT = ((_tty.sg_flags & XTABS) == 0); ! 61: NONL = ((_tty.sg_flags & CRMOD) == 0); ! 62: _tty.sg_flags &= ~XTABS; ! 63: stty(_tty_ch, &_tty); ! 64: # ifdef DEBUG ! 65: fprintf(outf, "GETTMODE: UPPERCASE = %s\n", UPPERCASE ? "TRUE":"FALSE"); ! 66: fprintf(outf, "GETTMODE: GT = %s\n", GT ? "TRUE" : "FALSE"); ! 67: fprintf(outf, "GETTMODE: NONL = %s\n", NONL ? "TRUE" : "FALSE"); ! 68: fprintf(outf, "GETTMODE: ospeed = %d\n", ospeed); ! 69: # endif ! 70: } ! 71: ! 72: setterm(type) ! 73: reg char *type; { ! 74: ! 75: reg int unknown; ! 76: static char genbuf[1024]; ! 77: # ifdef TIOCGWINSZ ! 78: struct winsize win; ! 79: # endif ! 80: ! 81: # ifdef DEBUG ! 82: fprintf(outf, "SETTERM(\"%s\")\n", type); ! 83: fprintf(outf, "SETTERM: LINES = %d, COLS = %d\n", LINES, COLS); ! 84: # endif ! 85: if (type[0] == '\0') ! 86: type = "xx"; ! 87: unknown = FALSE; ! 88: if (tgetent(genbuf, type) != 1) { ! 89: unknown++; ! 90: strcpy(genbuf, "xx|dumb:"); ! 91: } ! 92: # ifdef DEBUG ! 93: fprintf(outf, "SETTERM: tty = %s\n", type); ! 94: # endif ! 95: # ifdef TIOCGWINSZ ! 96: if (ioctl(_tty_ch, TIOCGWINSZ, &win) >= 0) { ! 97: if (LINES == 0) ! 98: LINES = win.ws_row; ! 99: if (COLS == 0) ! 100: COLS = win.ws_col; ! 101: } ! 102: # endif ! 103: ! 104: if (LINES == 0) ! 105: LINES = tgetnum("li"); ! 106: if (LINES <= 5) ! 107: LINES = 24; ! 108: ! 109: if (COLS == 0) ! 110: COLS = tgetnum("co"); ! 111: if (COLS <= 4) ! 112: COLS = 80; ! 113: ! 114: # ifdef DEBUG ! 115: fprintf(outf, "SETTERM: LINES = %d, COLS = %d\n", LINES, COLS); ! 116: # endif ! 117: aoftspace = _tspace; ! 118: zap(); /* get terminal description */ ! 119: ! 120: /* ! 121: * Handle funny termcap capabilities ! 122: */ ! 123: if (CS && SC && RC) AL=DL=""; ! 124: if (AL_PARM && AL==NULL) AL=""; ! 125: if (DL_PARM && DL==NULL) DL=""; ! 126: if (IC && IM==NULL) IM=""; ! 127: if (IC && EI==NULL) EI=""; ! 128: if (!GT) BT=NULL; /* If we can't tab, we can't backtab either */ ! 129: ! 130: if (tgoto(CM, destcol, destline)[0] == 'O') ! 131: CA = FALSE, CM = 0; ! 132: else ! 133: CA = TRUE; ! 134: ! 135: PC = _PC ? _PC[0] : FALSE; ! 136: aoftspace = _tspace; ! 137: strncpy(ttytype, longname(genbuf, type), sizeof(ttytype) - 1); ! 138: ttytype[sizeof(ttytype) - 1] = '\0'; ! 139: if (unknown) ! 140: return ERR; ! 141: return OK; ! 142: } ! 143: ! 144: /* ! 145: * This routine gets all the terminal flags from the termcap database ! 146: */ ! 147: ! 148: zap() ! 149: { ! 150: register char *namp; ! 151: register bool **fp; ! 152: register char ***sp; ! 153: #ifdef DEBUG ! 154: register char *cp; ! 155: #endif ! 156: extern char *tgetstr(); ! 157: ! 158: namp = "ambsdadbeohchzinmimsncnsosulxbxnxtxsxx"; ! 159: fp = sflags; ! 160: do { ! 161: *(*fp++) = tgetflag(namp); ! 162: #ifdef DEBUG ! 163: fprintf(outf, "%2.2s = %s\n", namp, *fp[-1] ? "TRUE" : "FALSE"); ! 164: #endif ! 165: namp += 2; ! 166: } while (*namp); ! 167: namp = "albcbtcdceclcmcrcsdcdldmdoedeik0k1k2k3k4k5k6k7k8k9hoicimipkdkekhklkrkskullmandnlpcrcscsesfsosrtatetiucueupusvbvsveALDLUPDOLERI"; ! 168: sp = sstrs; ! 169: do { ! 170: *(*sp++) = tgetstr(namp, &aoftspace); ! 171: #ifdef DEBUG ! 172: fprintf(outf, "%2.2s = %s", namp, *sp[-1] == NULL ? "NULL\n" : "\""); ! 173: if (*sp[-1] != NULL) { ! 174: for (cp = *sp[-1]; *cp; cp++) ! 175: fprintf(outf, "%s", unctrl(*cp)); ! 176: fprintf(outf, "\"\n"); ! 177: } ! 178: #endif ! 179: namp += 2; ! 180: } while (*namp); ! 181: if (XS) ! 182: SO = SE = NULL; ! 183: else { ! 184: if (tgetnum("sg") > 0) ! 185: SO = NULL; ! 186: if (tgetnum("ug") > 0) ! 187: US = NULL; ! 188: if (!SO && US) { ! 189: SO = US; ! 190: SE = UE; ! 191: } ! 192: } ! 193: } ! 194: ! 195: /* ! 196: * return a capability from termcap ! 197: */ ! 198: char * ! 199: getcap(name) ! 200: char *name; ! 201: { ! 202: char *tgetstr(); ! 203: ! 204: return tgetstr(name, &aoftspace); ! 205: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.