pcio.c revision 1.18 1 /* $NetBSD: pcio.c,v 1.18 2004/08/15 22:04:45 dsl Exp $ */
2
3 /*
4 * Copyright (c) 1996, 1997
5 * Matthias Drochner. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 *
27 */
28
29 /*
30 * console I/O
31 * needs lowlevel routines from conio.S and comio.S
32 */
33
34 #include <lib/libsa/stand.h>
35 #include <lib/libkern/libkern.h>
36 #include <sys/bootblock.h>
37
38 #include "libi386.h"
39 #include "bootinfo.h"
40
41 extern void conputc __P((int));
42 extern int congetc __P((void));
43 extern int coniskey __P((void));
44 extern struct x86_boot_params boot_params;
45
46 struct btinfo_console btinfo_console;
47
48 #ifdef SUPPORT_SERIAL
49 static int iodev;
50
51 #ifdef DIRECT_SERIAL
52 #include "comio_direct.h"
53
54 #define cominit_x() cominit_d(btinfo_console.addr, btinfo_console.speed)
55 #define computc_x(ch) computc_d(ch, btinfo_console.addr)
56 #define comgetc_x() comgetc_d(btinfo_console.addr)
57 #define comstatus_x() comstatus_d(btinfo_console.addr)
58
59 #else
60 #define cominit_x() cominit(iodev - CONSDEV_COM0)
61 #define computc_x(ch) computc(ch, iodev - CONSDEV_COM0)
62 #define comgetc_x() comgetc(iodev - CONSDEV_COM0)
63 #define comstatus_x() comstatus(iodev - CONSDEV_COM0)
64
65 #endif /* DIRECT_SERIAL */
66
67 static int getcomaddr __P((int));
68 #endif /* SUPPORT_SERIAL */
69
70 #define POLL_FREQ 10
71
72 #ifdef SUPPORT_SERIAL
73 static int
74 getcomaddr(idx)
75 int idx;
76 {
77 short addr;
78 #ifdef CONSADDR
79 if (CONSADDR != 0)
80 return CONSADDR;
81 #endif
82 /* read in BIOS data area */
83 pvbcopy((void *)(0x400 + 2 * idx), &addr, 2);
84 return(addr);
85 }
86 #endif
87
88 void
89 initio(dev)
90 int dev;
91 {
92 #ifdef SUPPORT_SERIAL
93 int i;
94
95 #if defined(DIRECT_SERIAL) && defined(CONSPEED)
96 btinfo_console.speed = CONSPEED;
97 #else
98 btinfo_console.speed = 9600;
99 #endif
100
101 switch (dev) {
102 case CONSDEV_AUTO:
103 for(i = 0; i < 3; i++) {
104 iodev = CONSDEV_COM0 + i;
105 btinfo_console.addr = getcomaddr(i);
106 if(!btinfo_console.addr)
107 break;
108 conputc('0' + i); /* to tell user what happens */
109 cominit_x();
110 #ifdef DIRECT_SERIAL
111 /* check for:
112 * 1. successful output
113 * 2. optionally, keypress within 7s
114 */
115 if ( computc_x(':') &&
116 computc_x('-') &&
117 computc_x('(')
118 #ifdef COMCONS_KEYPRESS
119 && awaitkey(7, 0)
120 #endif
121 )
122 goto ok;
123 #else /* ! DIRECT_SERIAL */
124 /*
125 * serial console must have hardware handshake!
126 * check:
127 * 1. character output without error
128 * 2. status bits for modem ready set
129 * (status seems only useful after character output)
130 * 3. optionally, keypress within 7s
131 */
132 if (!(computc_x('@') & 0x80)
133 && (comstatus_x() & 0x00b0)
134 #ifdef COMCONS_KEYPRESS
135 && awaitkey(7, 0)
136 #endif
137 )
138 goto ok;
139 #endif /* DIRECT_SERIAL */
140 }
141 iodev = CONSDEV_PC;
142 ok:
143 break;
144 case CONSDEV_COM0:
145 case CONSDEV_COM1:
146 case CONSDEV_COM2:
147 case CONSDEV_COM3:
148 iodev = dev;
149 btinfo_console.addr = getcomaddr(iodev - CONSDEV_COM0);
150 if(!btinfo_console.addr)
151 goto nocom;
152 cominit_x();
153 break;
154 case CONSDEV_COM0KBD:
155 case CONSDEV_COM1KBD:
156 case CONSDEV_COM2KBD:
157 case CONSDEV_COM3KBD:
158 iodev = dev - CONSDEV_COM0KBD + CONSDEV_COM0;
159 i = iodev - CONSDEV_COM0;
160 btinfo_console.addr = getcomaddr(i);
161 if(!btinfo_console.addr)
162 goto nocom;
163 conputc('0' + i); /* to tell user what happens */
164 cominit_x();
165 #ifdef DIRECT_SERIAL
166 /* check for:
167 * 1. successful output
168 * 2. optionally, keypress within 7s
169 */
170 if ( computc_x(':') &&
171 computc_x('-') &&
172 computc_x('(')
173 #ifdef COMCONS_KEYPRESS
174 && awaitkey(7, 0)
175 #endif
176 )
177 break;
178 #else /* ! DIRECT_SERIAL */
179 /*
180 * serial console must have hardware handshake!
181 * check:
182 * 1. character output without error
183 * 2. status bits for modem ready set
184 * (status seems only useful after character output)
185 * 3. optionally, keypress within 7s
186 */
187 if (!(computc_x('@') & 0x80)
188 && (comstatus_x() & 0x00b0)
189 #ifdef COMCONS_KEYPRESS
190 && awaitkey(7, 0)
191 #endif
192 )
193 break;
194 #endif /* DIRECT_SERIAL */
195 default:
196 nocom:
197 iodev = CONSDEV_PC;
198 break;
199 }
200 conputc('\015');
201 conputc('\n');
202 strncpy(btinfo_console.devname, iodev == CONSDEV_PC ? "pc" : "com", 16);
203 #else /* !SUPPORT_SERIAL */
204 btinfo_console.devname[0] = 'p';
205 btinfo_console.devname[1] = 'c';
206 btinfo_console.devname[2] = 0;
207 #endif /* SUPPORT_SERIAL */
208 }
209
210 static inline void internal_putchar __P((int));
211
212 static inline void
213 internal_putchar(c)
214 int c;
215 {
216 #ifdef SUPPORT_SERIAL
217 switch (iodev) {
218 case CONSDEV_PC:
219 #endif
220 conputc(c);
221 #ifdef SUPPORT_SERIAL
222 break;
223 case CONSDEV_COM0:
224 case CONSDEV_COM1:
225 case CONSDEV_COM2:
226 case CONSDEV_COM3:
227 computc_x(c);
228 break;
229 }
230 #endif
231 }
232
233 void
234 putchar(c)
235 int c;
236 {
237 if (c == '\n')
238 internal_putchar('\r');
239 internal_putchar(c);
240 }
241
242 int
243 getchar()
244 {
245 int c;
246 #ifdef SUPPORT_SERIAL
247 switch (iodev) {
248 default: /* to make gcc -Wall happy... */
249 case CONSDEV_PC:
250 #endif
251 c = congetc();
252 #ifdef CONSOLE_KEYMAP
253 {
254 char *cp = strchr(CONSOLE_KEYMAP, c);
255 if (cp != 0 && cp[1] != 0)
256 c = cp[1];
257 }
258 #endif
259 return c;
260 #ifdef SUPPORT_SERIAL
261 case CONSDEV_COM0:
262 case CONSDEV_COM1:
263 case CONSDEV_COM2:
264 case CONSDEV_COM3:
265 #ifdef DIRECT_SERIAL
266 c = comgetc_x();
267 #else
268 do {
269 c = comgetc_x();
270 } while ((c >> 8) == 0xe0); /* catch timeout */
271 #ifdef COMDEBUG
272 if (c & 0x8000) {
273 printf("com input %x, status %x\n",
274 c, comstatus_x());
275 }
276 #endif
277 c &= 0xff;
278 #endif /* DIRECT_SERIAL */
279 return (c);
280 }
281 #endif /* SUPPORT_SERIAL */
282 }
283
284 int
285 iskey()
286 {
287 #ifdef SUPPORT_SERIAL
288 switch (iodev) {
289 default: /* to make gcc -Wall happy... */
290 case CONSDEV_PC:
291 #endif
292 return (coniskey());
293 #ifdef SUPPORT_SERIAL
294 case CONSDEV_COM0:
295 case CONSDEV_COM1:
296 case CONSDEV_COM2:
297 case CONSDEV_COM3:
298 #ifdef DIRECT_SERIAL
299 return(!!comstatus_x());
300 #else
301 return (!!(comstatus_x() & 0x0100));
302 #endif
303 }
304 #endif /* SUPPORT_SERIAL */
305 }
306
307 char
308 awaitkey(timeout, tell)
309 int timeout, tell;
310 {
311 int i;
312 char c = 0;
313
314 i = timeout * POLL_FREQ;
315
316 while (i) {
317 if (tell && (i % POLL_FREQ) == 0) {
318 char numbuf[20];
319 int len, j;
320
321 sprintf(numbuf, "%d ", i/POLL_FREQ);
322 len = strlen(numbuf);
323 for (j = 0; j < len; j++)
324 numbuf[len + j] = '\b';
325 numbuf[len + j] = '\0';
326 printf(numbuf);
327 }
328 if (iskey()) {
329 /* flush input buffer */
330 while (iskey())
331 c = getchar();
332 if (c == 0)
333 c = -1;
334 goto out;
335 }
336 delay(1000000 / POLL_FREQ);
337 i--;
338 }
339
340 out:
341 if (tell)
342 printf("0 \n");
343
344 return(c);
345 }
346