ttyin.c revision 1.3 1 1.3 christos /* $NetBSD: ttyin.c,v 1.3 1998/02/04 11:09:13 christos Exp $ */
2 1.2 perry
3 1.1 cjs /*
4 1.1 cjs * Copyright (c) 1988 Mark Nudleman
5 1.1 cjs * Copyright (c) 1988, 1993
6 1.1 cjs * The Regents of the University of California. All rights reserved.
7 1.1 cjs *
8 1.1 cjs * Redistribution and use in source and binary forms, with or without
9 1.1 cjs * modification, are permitted provided that the following conditions
10 1.1 cjs * are met:
11 1.1 cjs * 1. Redistributions of source code must retain the above copyright
12 1.1 cjs * notice, this list of conditions and the following disclaimer.
13 1.1 cjs * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 cjs * notice, this list of conditions and the following disclaimer in the
15 1.1 cjs * documentation and/or other materials provided with the distribution.
16 1.1 cjs * 3. All advertising materials mentioning features or use of this software
17 1.1 cjs * must display the following acknowledgement:
18 1.1 cjs * This product includes software developed by the University of
19 1.1 cjs * California, Berkeley and its contributors.
20 1.1 cjs * 4. Neither the name of the University nor the names of its contributors
21 1.1 cjs * may be used to endorse or promote products derived from this software
22 1.1 cjs * without specific prior written permission.
23 1.1 cjs *
24 1.1 cjs * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 1.1 cjs * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 1.1 cjs * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 1.1 cjs * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 1.1 cjs * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 1.1 cjs * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 1.1 cjs * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 1.1 cjs * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 1.1 cjs * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 1.1 cjs * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 1.1 cjs * SUCH DAMAGE.
35 1.1 cjs */
36 1.1 cjs
37 1.3 christos #include <sys/cdefs.h>
38 1.1 cjs #ifndef lint
39 1.3 christos #if 0
40 1.1 cjs static char sccsid[] = "@(#)ttyin.c 8.1 (Berkeley) 6/6/93";
41 1.3 christos #else
42 1.3 christos __RCSID("$NetBSD: ttyin.c,v 1.3 1998/02/04 11:09:13 christos Exp $");
43 1.3 christos #endif
44 1.1 cjs #endif /* not lint */
45 1.1 cjs
46 1.1 cjs /*
47 1.1 cjs * Routines dealing with getting input from the keyboard (i.e. from the user).
48 1.1 cjs */
49 1.1 cjs
50 1.3 christos #include <sys/types.h>
51 1.3 christos
52 1.3 christos #include "less.h"
53 1.3 christos #include "extern.h"
54 1.1 cjs
55 1.1 cjs static int tty;
56 1.1 cjs
57 1.1 cjs /*
58 1.1 cjs * Open keyboard for input.
59 1.1 cjs * (Just use file descriptor 2.)
60 1.1 cjs */
61 1.3 christos void
62 1.1 cjs open_getchr()
63 1.1 cjs {
64 1.1 cjs tty = 2;
65 1.1 cjs }
66 1.1 cjs
67 1.1 cjs /*
68 1.1 cjs * Get a character from the keyboard.
69 1.1 cjs */
70 1.3 christos int
71 1.1 cjs getchr()
72 1.1 cjs {
73 1.1 cjs char c;
74 1.1 cjs int result;
75 1.1 cjs
76 1.1 cjs do
77 1.1 cjs {
78 1.1 cjs result = iread(tty, &c, 1);
79 1.1 cjs if (result == READ_INTR)
80 1.1 cjs return (READ_INTR);
81 1.1 cjs if (result < 0)
82 1.1 cjs {
83 1.1 cjs /*
84 1.1 cjs * Don't call error() here,
85 1.1 cjs * because error calls getchr!
86 1.1 cjs */
87 1.1 cjs quit();
88 1.1 cjs }
89 1.1 cjs } while (result != 1);
90 1.1 cjs return (c & 0177);
91 1.1 cjs }
92