Return to get.c CVS log

Up to [Research Unix] / researchv9 / sys / boot / stand

Annotation of researchv9/sys/boot/stand/get.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * @(#)get.c 1.1 86/02/03 Copyright (c) 1985 by Sun Microsystems, Inc.
                      3:  */
                      4: #include "../mon/sunromvec.h"
                      5: 
                      6: getchar()
                      7: {
                      8:        register int c;
                      9: 
                     10:        while ((c = (*romp->v_mayget)()) == -1)
                     11:                ;
                     12:        if (c == '\r')
                     13:                c = '\n';
                     14:        if (c == 0177 || c == '\b') {
                     15:                putchar('\b');
                     16:                putchar(' ');
                     17:                c = '\b';
                     18:        }
                     19:        putchar(c);
                     20:        return (c);
                     21: }
                     22: 
                     23: gets(buf)
                     24:        char *buf;
                     25: {
                     26:        register char *lp;
                     27:        register c;
                     28: 
                     29:        lp = buf;
                     30:        for (;;) {
                     31:                c = getchar() & 0177;
                     32:                switch(c) {
                     33:                case '\n':
                     34:                case '\r':
                     35:                        c = '\n';
                     36:                        *lp++ = '\0';
                     37:                        return;
                     38:                case '\b':
                     39:                        lp--;
                     40:                        if (lp < buf)
                     41:                                lp = buf;
                     42:                        continue;
                     43:                case 'u'&037:                   /* ^U */
                     44:                        lp = buf;
                     45:                        putchar('\n');
                     46:                        continue;
                     47:                default:
                     48:                        *lp++ = c;
                     49:                }
                     50:        }
                     51: }

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