1 /* $Id: console.c,v 1.9 1997/10/29 07:41:43 ecd Exp $
2 * console.c: Routines that deal with sending and receiving IO
3 * to/from the current console device using the PROM.
4 *
5 * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
6 * Copyright (C) 1996,1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
7 */
8
9 #include <linux/types.h>
10 #include <linux/kernel.h>
11 #include <linux/sched.h>
12 #include <asm/openprom.h>
13 #include <asm/oplib.h>
14 #include <asm/system.h>
15 #include <linux/string.h>
16
17 extern int prom_stdin, prom_stdout;
18
19 /* Non blocking get character from console input device, returns -1
20 * if no input was taken. This can be used for polling.
21 */
22 __inline__ int
prom_nbgetchar(void)23 prom_nbgetchar(void)
24 {
25 char inc;
26
27 if (p1275_cmd("read", P1275_ARG(1,P1275_ARG_OUT_BUF)|
28 P1275_INOUT(3,1),
29 prom_stdin, &inc, P1275_SIZE(1)) == 1)
30 return inc;
31 else
32 return -1;
33 }
34
35 /* Non blocking put character to console device, returns -1 if
36 * unsuccessful.
37 */
38 __inline__ int
prom_nbputchar(char c)39 prom_nbputchar(char c)
40 {
41 char outc;
42
43 outc = c;
44 if (p1275_cmd("write", P1275_ARG(1,P1275_ARG_IN_BUF)|
45 P1275_INOUT(3,1),
46 prom_stdout, &outc, P1275_SIZE(1)) == 1)
47 return 0;
48 else
49 return -1;
50 }
51
52 /* Blocking version of get character routine above. */
53 char
prom_getchar(void)54 prom_getchar(void)
55 {
56 int character;
57 while((character = prom_nbgetchar()) == -1) ;
58 return (char) character;
59 }
60
61 /* Blocking version of put character routine above. */
62 void
prom_putchar(char c)63 prom_putchar(char c)
64 {
65 prom_nbputchar(c);
66 return;
67 }
68
69 void
prom_puts(char * s,int len)70 prom_puts(char *s, int len)
71 {
72 p1275_cmd("write", P1275_ARG(1,P1275_ARG_IN_BUF)|
73 P1275_INOUT(3,1),
74 prom_stdout, s, P1275_SIZE(len));
75 }
76
77 /* Query for input device type */
78 enum prom_input_device
prom_query_input_device()79 prom_query_input_device()
80 {
81 int st_p;
82 char propb[64];
83
84 st_p = prom_inst2pkg(prom_stdin);
85 if(prom_node_has_property(st_p, "keyboard"))
86 return PROMDEV_IKBD;
87 prom_getproperty(st_p, "device_type", propb, sizeof(propb));
88 if(strncmp(propb, "serial", 6))
89 return PROMDEV_I_UNK;
90 /* FIXME: Is there any better way how to find out? */
91 memset(propb, 0, sizeof(propb));
92 st_p = prom_finddevice ("/options");
93 prom_getproperty(st_p, "input-device", propb, sizeof(propb));
94
95 /*
96 * If we get here with propb == 'keyboard', we are on ttya, as
97 * the PROM defaulted to this due to 'no input device'.
98 */
99 if (!strncmp(propb, "keyboard", 8))
100 return PROMDEV_ITTYA;
101
102 if (strncmp (propb, "tty", 3) || !propb[3])
103 return PROMDEV_I_UNK;
104 switch (propb[3]) {
105 case 'a': return PROMDEV_ITTYA;
106 case 'b': return PROMDEV_ITTYB;
107 default: return PROMDEV_I_UNK;
108 }
109 }
110
111 /* Query for output device type */
112
113 enum prom_output_device
prom_query_output_device()114 prom_query_output_device()
115 {
116 int st_p;
117 char propb[64];
118 int propl;
119
120 st_p = prom_inst2pkg(prom_stdout);
121 propl = prom_getproperty(st_p, "device_type", propb, sizeof(propb));
122 if (propl >= 0 && propl == sizeof("display") &&
123 strncmp("display", propb, sizeof("display")) == 0)
124 return PROMDEV_OSCREEN;
125 if(strncmp("serial", propb, 6))
126 return PROMDEV_O_UNK;
127 /* FIXME: Is there any better way how to find out? */
128 memset(propb, 0, sizeof(propb));
129 st_p = prom_finddevice ("/options");
130 prom_getproperty(st_p, "output-device", propb, sizeof(propb));
131
132 /*
133 * If we get here with propb == 'screen', we are on ttya, as
134 * the PROM defaulted to this due to 'no input device'.
135 */
136 if (!strncmp(propb, "screen", 6))
137 return PROMDEV_OTTYA;
138
139 if (strncmp (propb, "tty", 3) || !propb[3])
140 return PROMDEV_O_UNK;
141 switch (propb[3]) {
142 case 'a': return PROMDEV_OTTYA;
143 case 'b': return PROMDEV_OTTYB;
144 default: return PROMDEV_O_UNK;
145 }
146 }
147