tgets.c revision 1.1.4.2
1 1.1.4.2 rmind /* $NetBSD: tgets.c,v 1.1.4.2 2011/03/05 20:51:16 rmind Exp $ */ 2 1.1.4.2 rmind 3 1.1.4.2 rmind /*- 4 1.1.4.2 rmind * Copyright (c) 1993 5 1.1.4.2 rmind * The Regents of the University of California. All rights reserved. 6 1.1.4.2 rmind * 7 1.1.4.2 rmind * Redistribution and use in source and binary forms, with or without 8 1.1.4.2 rmind * modification, are permitted provided that the following conditions 9 1.1.4.2 rmind * are met: 10 1.1.4.2 rmind * 1. Redistributions of source code must retain the above copyright 11 1.1.4.2 rmind * notice, this list of conditions and the following disclaimer. 12 1.1.4.2 rmind * 2. Redistributions in binary form must reproduce the above copyright 13 1.1.4.2 rmind * notice, this list of conditions and the following disclaimer in the 14 1.1.4.2 rmind * documentation and/or other materials provided with the distribution. 15 1.1.4.2 rmind * 3. Neither the name of the University nor the names of its contributors 16 1.1.4.2 rmind * may be used to endorse or promote products derived from this software 17 1.1.4.2 rmind * without specific prior written permission. 18 1.1.4.2 rmind * 19 1.1.4.2 rmind * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 1.1.4.2 rmind * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 1.1.4.2 rmind * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 1.1.4.2 rmind * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 1.1.4.2 rmind * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 1.1.4.2 rmind * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 1.1.4.2 rmind * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 1.1.4.2 rmind * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 1.1.4.2 rmind * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 1.1.4.2 rmind * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 1.1.4.2 rmind * SUCH DAMAGE. 30 1.1.4.2 rmind * 31 1.1.4.2 rmind * @(#)gets.c 8.1 (Berkeley) 6/11/93 32 1.1.4.2 rmind */ 33 1.1.4.2 rmind 34 1.1.4.2 rmind #include <lib/libsa/stand.h> 35 1.1.4.2 rmind #include "boot.h" 36 1.1.4.2 rmind 37 1.1.4.2 rmind #define USE_SCAN 38 1.1.4.2 rmind 39 1.1.4.2 rmind int 40 1.1.4.2 rmind tgets(char *buf) 41 1.1.4.2 rmind { 42 1.1.4.2 rmind int c; 43 1.1.4.2 rmind char *lp; 44 1.1.4.2 rmind 45 1.1.4.2 rmind #ifdef USE_SCAN 46 1.1.4.2 rmind int i; 47 1.1.4.2 rmind 48 1.1.4.2 rmind #define SCANWAIT 10000 49 1.1.4.2 rmind #define PWAIT 500 50 1.1.4.2 rmind for (i = 0; i < PWAIT; i++) { 51 1.1.4.2 rmind if ((c = cnscan()) != -1) 52 1.1.4.2 rmind goto next; 53 1.1.4.2 rmind delay(SCANWAIT); 54 1.1.4.2 rmind } 55 1.1.4.2 rmind return -1; 56 1.1.4.2 rmind next: 57 1.1.4.2 rmind #else 58 1.1.4.2 rmind c = getchar(); 59 1.1.4.2 rmind #endif 60 1.1.4.2 rmind for (lp = buf;; c = getchar()) { 61 1.1.4.2 rmind switch (c & 0177) { 62 1.1.4.2 rmind case '\n': 63 1.1.4.2 rmind case '\r': 64 1.1.4.2 rmind *lp = '\0'; 65 1.1.4.2 rmind putchar('\n'); 66 1.1.4.2 rmind return 0; 67 1.1.4.2 rmind case '\b': 68 1.1.4.2 rmind case '\177': 69 1.1.4.2 rmind if (lp > buf) { 70 1.1.4.2 rmind lp--; 71 1.1.4.2 rmind putchar('\b'); 72 1.1.4.2 rmind putchar(' '); 73 1.1.4.2 rmind putchar('\b'); 74 1.1.4.2 rmind } 75 1.1.4.2 rmind break; 76 1.1.4.2 rmind case 'r' & 037: { 77 1.1.4.2 rmind char *p; 78 1.1.4.2 rmind 79 1.1.4.2 rmind putchar('\n'); 80 1.1.4.2 rmind for (p = buf; p < lp; ++p) 81 1.1.4.2 rmind putchar(*p); 82 1.1.4.2 rmind break; 83 1.1.4.2 rmind } 84 1.1.4.2 rmind case 'u' & 037: 85 1.1.4.2 rmind case 'w' & 037: 86 1.1.4.2 rmind lp = buf; 87 1.1.4.2 rmind putchar('\n'); 88 1.1.4.2 rmind break; 89 1.1.4.2 rmind default: 90 1.1.4.2 rmind *lp++ = c; 91 1.1.4.2 rmind putchar(c); 92 1.1.4.2 rmind } 93 1.1.4.2 rmind } 94 1.1.4.2 rmind } 95
Indexes created Thu Oct 30 16:09:53 GMT 2025