console.c revision 1.6 1 1.6 tsutsui /* $NetBSD: console.c,v 1.6 2008/01/12 09:54:33 tsutsui Exp $ */
2 1.3 perry
3 1.1 chuck /*
4 1.1 chuck *
5 1.1 chuck * Copyright (c) 1995 Charles D. Cranor and Seth Widoff
6 1.1 chuck * All rights reserved.
7 1.1 chuck *
8 1.1 chuck * Redistribution and use in source and binary forms, with or without
9 1.1 chuck * modification, are permitted provided that the following conditions
10 1.1 chuck * are met:
11 1.1 chuck * 1. Redistributions of source code must retain the above copyright
12 1.1 chuck * notice, this list of conditions and the following disclaimer.
13 1.1 chuck * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 chuck * notice, this list of conditions and the following disclaimer in the
15 1.1 chuck * documentation and/or other materials provided with the distribution.
16 1.1 chuck * 3. All advertising materials mentioning features or use of this software
17 1.1 chuck * must display the following acknowledgement:
18 1.1 chuck * This product includes software developed by Charles D. Cranor
19 1.1 chuck * and Seth Widoff.
20 1.1 chuck * 4. The name of the author may not be used to endorse or promote products
21 1.1 chuck * derived from this software without specific prior written permission.
22 1.1 chuck *
23 1.1 chuck * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
24 1.1 chuck * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
25 1.1 chuck * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
26 1.1 chuck * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
27 1.1 chuck * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
28 1.1 chuck * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
29 1.1 chuck * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
30 1.1 chuck * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
31 1.1 chuck * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
32 1.1 chuck * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33 1.1 chuck */
34 1.1 chuck /*
35 1.1 chuck * console i/o
36 1.1 chuck */
37 1.1 chuck
38 1.1 chuck #include "sboot.h"
39 1.1 chuck
40 1.1 chuck /*
41 1.1 chuck * hardware
42 1.1 chuck */
43 1.1 chuck
44 1.1 chuck struct zs_hw {
45 1.6 tsutsui volatile u_char ctl;
46 1.6 tsutsui volatile u_char data;
47 1.1 chuck };
48 1.1 chuck
49 1.1 chuck struct zs_hw *zs = (struct zs_hw *)CONS_ZS_ADDR;
50 1.1 chuck
51 1.1 chuck /*
52 1.1 chuck * consinit: init console
53 1.1 chuck */
54 1.1 chuck
55 1.5 jdolecek void
56 1.6 tsutsui consinit(void)
57 1.1 chuck {
58 1.6 tsutsui int mark = time();
59 1.6 tsutsui int rr1;
60 1.6 tsutsui for (;;) {
61 1.6 tsutsui if (time() > mark + 5) break;
62 1.6 tsutsui zs->ctl = 1; rr1 = zs->ctl;
63 1.6 tsutsui zs->ctl = 0;
64 1.6 tsutsui if ((rr1 & 0x1) == 1 && (zs->ctl & 0x4) == 4)
65 1.6 tsutsui break; /* zs_drain! */
66 1.6 tsutsui }
67 1.6 tsutsui zs->ctl = 9;
68 1.6 tsutsui zs->ctl = 0x00; /* clear interrupt */
69 1.6 tsutsui zs->ctl = 4;
70 1.6 tsutsui zs->ctl = 0x44; /* 16x clk, 1 stop bit */
71 1.6 tsutsui zs->ctl = 5;
72 1.6 tsutsui zs->ctl = 0xea; /* DTR on, 8 bit xmit, xmit on, RTS on */
73 1.6 tsutsui zs->ctl = 3;
74 1.6 tsutsui zs->ctl = 0xc1; /* 8 bit recv, auto cd_cts, recv on */
75 1.6 tsutsui zs->ctl = 1;
76 1.6 tsutsui zs->ctl = 0x00; /* no intrs */
77 1.6 tsutsui zs->ctl = 2;
78 1.6 tsutsui zs->ctl = 0x00; /* no vector */
79 1.6 tsutsui zs->ctl = 10;
80 1.6 tsutsui zs->ctl = 0x00; /* */
81 1.6 tsutsui zs->ctl = 11;
82 1.6 tsutsui zs->ctl = 0x50; /* clocking options */
83 1.6 tsutsui zs->ctl = 12;
84 1.6 tsutsui zs->ctl = 0x0e; /* 9600 baud, part 1 */
85 1.6 tsutsui zs->ctl = 13;
86 1.6 tsutsui zs->ctl = 0x00; /* 9600 baud, part 2 */
87 1.6 tsutsui zs->ctl = 14;
88 1.6 tsutsui zs->ctl = 0x03; /* more clocking options */
89 1.6 tsutsui zs->ctl = 15;
90 1.6 tsutsui zs->ctl = 0x00; /* clear intrs */
91 1.1 chuck }
92 1.1 chuck
93 1.1 chuck /*
94 1.1 chuck * putchar: put char to console
95 1.1 chuck */
96 1.1 chuck
97 1.5 jdolecek void putchar(int c)
98 1.1 chuck {
99 1.6 tsutsui if (c == '\n')
100 1.6 tsutsui putchar('\r'); /* avoid the need for \r\n in printf */
101 1.6 tsutsui zs->ctl = 0;
102 1.6 tsutsui while ((zs->ctl & 0x04) == 0) {
103 1.6 tsutsui zs->ctl = 0;
104 1.6 tsutsui }
105 1.6 tsutsui zs->ctl = 8;
106 1.6 tsutsui zs->ctl = (char)c;
107 1.1 chuck }
108 1.1 chuck
109 1.1 chuck /*
110 1.1 chuck * cngetc: get 1 char from console
111 1.1 chuck */
112 1.1 chuck
113 1.6 tsutsui char cngetc(void)
114 1.1 chuck {
115 1.6 tsutsui
116 1.6 tsutsui zs->ctl = 0;
117 1.6 tsutsui while ((zs->ctl & 0x1) == 0) {
118 1.6 tsutsui zs->ctl = 0;
119 1.6 tsutsui }
120 1.6 tsutsui zs->ctl = 8;
121 1.6 tsutsui return zs->ctl;
122 1.1 chuck }
123 1.1 chuck
124 1.1 chuck /*
125 1.1 chuck * puts: put string to console
126 1.1 chuck */
127 1.1 chuck
128 1.6 tsutsui void
129 1.6 tsutsui puts(char *str)
130 1.1 chuck {
131 1.6 tsutsui
132 1.6 tsutsui while (*str != '\0') {
133 1.6 tsutsui putchar(*str);
134 1.6 tsutsui str++;
135 1.6 tsutsui }
136 1.1 chuck }
137 1.1 chuck
138 1.1 chuck /*
139 1.1 chuck * ngets: get string from console
140 1.1 chuck */
141 1.1 chuck
142 1.6 tsutsui char *
143 1.6 tsutsui ngets(char *str, int size)
144 1.1 chuck {
145 1.6 tsutsui
146 1.6 tsutsui int i = 0;
147 1.6 tsutsui while ((i < size - 1) && (str[i] = cngetc()) != '\r') {
148 1.6 tsutsui if (str[i] == '\b' || str[i] == 0x7F) {
149 1.6 tsutsui if (i == 0)
150 1.6 tsutsui continue;
151 1.6 tsutsui i--;
152 1.6 tsutsui puts("\b \b");
153 1.6 tsutsui continue;
154 1.6 tsutsui }
155 1.6 tsutsui putchar(str[i]);
156 1.6 tsutsui i++;
157 1.6 tsutsui }
158 1.6 tsutsui puts("\n");
159 1.6 tsutsui str[i] = '\0';
160 1.6 tsutsui return &str[i];
161 1.1 chuck }
162