getline.c revision 1.2.6.3 1 1.2.6.2 tls /* $NetBSD: getline.c,v 1.2.6.3 2014/08/20 00:03:10 tls Exp $ */
2 1.2.6.2 tls
3 1.2.6.2 tls /*
4 1.2.6.2 tls * Copyright (c) 1992 OMRON Corporation.
5 1.2.6.2 tls *
6 1.2.6.2 tls * This code is derived from software contributed to Berkeley by
7 1.2.6.2 tls * OMRON Corporation.
8 1.2.6.2 tls *
9 1.2.6.2 tls * Redistribution and use in source and binary forms, with or without
10 1.2.6.2 tls * modification, are permitted provided that the following conditions
11 1.2.6.2 tls * are met:
12 1.2.6.2 tls * 1. Redistributions of source code must retain the above copyright
13 1.2.6.2 tls * notice, this list of conditions and the following disclaimer.
14 1.2.6.2 tls * 2. Redistributions in binary form must reproduce the above copyright
15 1.2.6.2 tls * notice, this list of conditions and the following disclaimer in the
16 1.2.6.2 tls * documentation and/or other materials provided with the distribution.
17 1.2.6.2 tls * 3. All advertising materials mentioning features or use of this software
18 1.2.6.2 tls * must display the following acknowledgement:
19 1.2.6.2 tls * This product includes software developed by the University of
20 1.2.6.2 tls * California, Berkeley and its contributors.
21 1.2.6.2 tls * 4. Neither the name of the University nor the names of its contributors
22 1.2.6.2 tls * may be used to endorse or promote products derived from this software
23 1.2.6.2 tls * without specific prior written permission.
24 1.2.6.2 tls *
25 1.2.6.2 tls * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 1.2.6.2 tls * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 1.2.6.2 tls * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 1.2.6.2 tls * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 1.2.6.2 tls * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 1.2.6.2 tls * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 1.2.6.2 tls * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 1.2.6.2 tls * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 1.2.6.2 tls * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 1.2.6.2 tls * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 1.2.6.2 tls * SUCH DAMAGE.
36 1.2.6.2 tls *
37 1.2.6.2 tls * @(#)getline.c 8.1 (Berkeley) 6/10/93
38 1.2.6.2 tls */
39 1.2.6.2 tls /*
40 1.2.6.2 tls * Copyright (c) 1992, 1993
41 1.2.6.2 tls * The Regents of the University of California. All rights reserved.
42 1.2.6.2 tls *
43 1.2.6.2 tls * This code is derived from software contributed to Berkeley by
44 1.2.6.2 tls * OMRON Corporation.
45 1.2.6.2 tls *
46 1.2.6.2 tls * Redistribution and use in source and binary forms, with or without
47 1.2.6.2 tls * modification, are permitted provided that the following conditions
48 1.2.6.2 tls * are met:
49 1.2.6.2 tls * 1. Redistributions of source code must retain the above copyright
50 1.2.6.2 tls * notice, this list of conditions and the following disclaimer.
51 1.2.6.2 tls * 2. Redistributions in binary form must reproduce the above copyright
52 1.2.6.2 tls * notice, this list of conditions and the following disclaimer in the
53 1.2.6.2 tls * documentation and/or other materials provided with the distribution.
54 1.2.6.2 tls * 3. Neither the name of the University nor the names of its contributors
55 1.2.6.2 tls * may be used to endorse or promote products derived from this software
56 1.2.6.2 tls * without specific prior written permission.
57 1.2.6.2 tls *
58 1.2.6.2 tls * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
59 1.2.6.2 tls * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
60 1.2.6.2 tls * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
61 1.2.6.2 tls * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
62 1.2.6.2 tls * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
63 1.2.6.2 tls * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
64 1.2.6.2 tls * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
65 1.2.6.2 tls * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
66 1.2.6.2 tls * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
67 1.2.6.2 tls * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
68 1.2.6.2 tls * SUCH DAMAGE.
69 1.2.6.2 tls *
70 1.2.6.2 tls * @(#)getline.c 8.1 (Berkeley) 6/10/93
71 1.2.6.2 tls */
72 1.2.6.2 tls
73 1.2.6.2 tls /*
74 1.2.6.2 tls * getline -- simple getline function
75 1.2.6.3 tls * by A.Fujita, Dec-11-1992
76 1.2.6.2 tls */
77 1.2.6.2 tls
78 1.2.6.2 tls #include <lib/libkern/libkern.h>
79 1.2.6.2 tls #include <luna68k/stand/boot/samachdep.h>
80 1.2.6.2 tls
81 1.2.6.2 tls int
82 1.2.6.3 tls getline(const char *prompt, char *buff)
83 1.2.6.2 tls {
84 1.2.6.2 tls int c;
85 1.2.6.3 tls char *p, *lp = buff;
86 1.2.6.2 tls
87 1.2.6.2 tls printf("%s", prompt);
88 1.2.6.2 tls
89 1.2.6.3 tls for (;;) {
90 1.2.6.3 tls c = getchar() & 0x7f;
91 1.2.6.2 tls
92 1.2.6.2 tls switch (c) {
93 1.2.6.3 tls case '\n':
94 1.2.6.3 tls case '\r':
95 1.2.6.3 tls *lp = '\0';
96 1.2.6.2 tls putchar('\n');
97 1.2.6.2 tls goto outloop;
98 1.2.6.2 tls
99 1.2.6.3 tls case '\b':
100 1.2.6.2 tls case 0x7f:
101 1.2.6.3 tls if (lp > buff) {
102 1.2.6.3 tls lp--;
103 1.2.6.3 tls putchar('\b');
104 1.2.6.2 tls putchar(' ');
105 1.2.6.3 tls putchar('\b');
106 1.2.6.2 tls }
107 1.2.6.2 tls break;
108 1.2.6.2 tls
109 1.2.6.3 tls case 'r' & 0x1f:
110 1.2.6.3 tls putchar('\n');
111 1.2.6.3 tls printf("%s", prompt);
112 1.2.6.3 tls for (p = buff; p < lp; ++p)
113 1.2.6.3 tls putchar(*p);
114 1.2.6.3 tls break;
115 1.2.6.3 tls
116 1.2.6.3 tls case 'u' & 0x1f:
117 1.2.6.3 tls case 'w' & 0x1f:
118 1.2.6.3 tls lp = buff;
119 1.2.6.3 tls printf("\n%s", prompt);
120 1.2.6.3 tls break;
121 1.2.6.3 tls
122 1.2.6.2 tls default:
123 1.2.6.3 tls *lp++ = c;
124 1.2.6.2 tls putchar(c);
125 1.2.6.2 tls break;
126 1.2.6.2 tls }
127 1.2.6.2 tls }
128 1.2.6.2 tls
129 1.2.6.2 tls outloop:
130 1.2.6.3 tls *lp = '\0';
131 1.2.6.3 tls return lp - buff;
132 1.2.6.2 tls }
133