![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to fnkey.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [MW Coherent from dump] / coherent / b / etc / Build_401|
Return to fnkey.c CVS log | Up to [MW Coherent from dump] / coherent / b / etc / Build_401 |
1.1 ! root 1: /* ! 2: * fnkey.c ! 3: * 06/30/92 ! 4: * Usage: fnkey [ n [ string ] ] ! 5: * Sets/prints IBM AT console function keys. ! 6: * Revised for COHERENT 4.0 ! 7: */ ! 8: #include <stdio.h> ! 9: #include <sgtty.h> ! 10: #include <ctype.h> ! 11: #include <sys/kb.h> ! 12: #include <errno.h> ! 13: ! 14: #define VERSION "4.0" /* version number */ ! 15: ! 16: /* ! 17: * The following constants were hard coded into the original kb.c driver ! 18: * and have to be duplicated here to support both drivers on demand. ! 19: */ ! 20: #define NFKEY 20 /* kb: number of function keys */ ! 21: #define NFCHAR 150 /* kb: function key storage */ ! 22: #define NFBUF (2*NFKEY+NFCHAR+1) /* kb: total buffer size */ ! 23: ! 24: FNKEY *okeys; /* old key bindings */ ! 25: FNKEY *nkeys; /* new key bindings */ ! 26: int old; /* true: kb driver, false: nkb */ ! 27: KBTBL kbt[MAX_KEYS]; /* key mapping table for TIOCGETKBT */ ! 28: ! 29: main(argc, argv) ! 30: int argc; ! 31: char **argv; ! 32: { ! 33: unsigned c; ! 34: register int i; ! 35: register unsigned char *cp, *ncp; ! 36: int n, fd, max_fchar, max_fkeys; ! 37: ! 38: fd = open("/dev/tty", 2); ! 39: if (fd == -1) ! 40: fatal("cannot open /dev/tty"); ! 41: okeys = (FNKEY *) malloc(sizeof(FNKEY) + MAX_FCHAR); ! 42: nkeys = (FNKEY *) malloc(sizeof(FNKEY) + MAX_FCHAR); ! 43: if (okeys == (FNKEY *)0 || nkeys == (FNKEY *)0) ! 44: fatal("out of memory"); ! 45: cp = &okeys->k_fnval[0]; ! 46: ncp = &nkeys->k_fnval[0]; ! 47: ! 48: /* Print version number if -V. */ ! 49: if (*++argv != NULL && strcmp(*argv, "-V") == 0) { ! 50: --argc; ! 51: ++argv; ! 52: fprintf(stderr, "fnkey: V%s\n", VERSION); ! 53: } ! 54: if (argc > 3) ! 55: usage(); ! 56: ! 57: ioctl(fd, TIOCGETKBT, kbt); /* See if nkb driver present */ ! 58: if (errno) ! 59: ++old; /* No, kb assumed */ ! 60: ! 61: errno = 0; ! 62: if (old) { /* get current key bindings */ ! 63: ioctl(fd, TIOCGETF, okeys->k_fnval); /* kb */ ! 64: max_fchar = NFBUF; ! 65: max_fkeys = NFKEY; ! 66: } else { ! 67: ioctl(fd, TIOCGETF, okeys); /* nkb */ ! 68: max_fchar = MAX_FCHAR; ! 69: max_fkeys = MAX_FKEYS; ! 70: } ! 71: if (errno) { ! 72: /* ! 73: * Couldn't read current function key settings ! 74: */ ! 75: fatal("not on console"); ! 76: } ! 77: /* Print current values if no args, then exit */ ! 78: if (*argv == NULL ) { ! 79: if (old) ! 80: kb_print(); ! 81: else ! 82: nkb_print(); ! 83: exit(0); ! 84: } ! 85: ! 86: /* First arg must be digit. */ ! 87: if (!isdigit(**argv)) ! 88: usage(); ! 89: n = atoi(*argv++); ! 90: if ((old && n > NFKEY) || (!old && n >= MAX_FKEYS)) ! 91: usage(); ! 92: if (old) ! 93: --n; ! 94: /* Set Fn to given value. */ ! 95: for (i = 0; i < max_fkeys; i++) { ! 96: if (i == n) { ! 97: if (*argv != NULL) ! 98: while (c = *(*argv)++) ! 99: if (ncp < &nkeys->k_fnval[max_fchar]-1) ! 100: *ncp++ = c; ! 101: while ((c = *cp++)!=DELIM && cp < &okeys->k_fnval[max_fchar]) ! 102: ; ! 103: } else { ! 104: while ((c = *cp++)!=DELIM && cp < &okeys->k_fnval[max_fchar]) ! 105: if (ncp < &nkeys->k_fnval[max_fchar]-1) ! 106: *ncp++ = c; ! 107: } ! 108: *ncp++ = DELIM; ! 109: if (ncp >= &nkeys->k_fnval[max_fchar]) ! 110: break; ! 111: } ! 112: if (old) { ! 113: ioctl(fd, TIOCSETF, nkeys->k_fnval); /* kb */ ! 114: } else { ! 115: nkeys->k_nfkeys = i; ! 116: ioctl(fd, TIOCSETF, nkeys); /* nkb */ ! 117: } ! 118: if (errno) ! 119: fatal("couldn't set function keys or not on console"); ! 120: ! 121: exit(0); ! 122: } ! 123: ! 124: printchar(c) ! 125: register unsigned c; ! 126: { ! 127: if (c == '\\') ! 128: printf("\\\\"); ! 129: else if ((c >= ' ' && c <= '~') || c >= 0200) ! 130: putchar(c); ! 131: else switch (c) { ! 132: case '\n': printf("\\n"); ! 133: break; ! 134: case '\t': printf("\\t"); ! 135: break; ! 136: case '\b': printf("\\b"); ! 137: break; ! 138: case '\r': printf("\\r"); ! 139: break; ! 140: default: printf("\\%03o", c); ! 141: break; ! 142: } ! 143: } ! 144: ! 145: usage() ! 146: { ! 147: fprintf(stderr, "Usage: fnkey [ n [ string ] ]\n"); ! 148: exit(1); ! 149: } ! 150: ! 151: fatal(arg) ! 152: char *arg; ! 153: { ! 154: fprintf(stderr, "fnkey:\t%r\n", &arg); ! 155: exit(1); ! 156: } ! 157: ! 158: /* ! 159: * Print out current settings of function key bindings. ! 160: * We do this two ways to support kb and nkb. ! 161: */ ! 162: kb_print() ! 163: { ! 164: int i; ! 165: unsigned c; ! 166: unsigned char *cp; ! 167: ! 168: cp = &okeys->k_fnval[0]; ! 169: for (i = 1; i <= NFKEY && cp < &okeys->k_fnval[NFBUF]; i++) { ! 170: if ((c = *cp) == DELIM) { ! 171: cp++; ! 172: continue; ! 173: } ! 174: printf ("F%d: ", i); ! 175: while ((c = *cp++) != DELIM && cp < &okeys->k_fnval[NFBUF]) ! 176: printchar(c); ! 177: putchar('\n'); ! 178: } ! 179: } ! 180: ! 181: nkb_print() ! 182: { ! 183: int i; ! 184: unsigned c; ! 185: unsigned char *cp; ! 186: ! 187: cp = &okeys->k_fnval[0]; ! 188: for (i = 0; i<okeys->k_nfkeys && cp<&okeys->k_fnval[MAX_FCHAR]; i++) { ! 189: if ((c = *cp) == DELIM) { ! 190: cp++; ! 191: continue; ! 192: } ! 193: printf ("F%d: ", i); ! 194: while ((c = *cp++)!=DELIM && cp<&okeys->k_fnval[MAX_FCHAR]) ! 195: printchar(c); ! 196: putchar('\n'); ! 197: } ! 198: } ! 199: /* end of fnkey.c */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.