ite.c revision 1.9.66.1 1 /* $NetBSD: ite.c,v 1.9.66.1 2011/03/05 20:50:25 rmind Exp $ */
2
3 /*
4 * Copyright (c) 1988 University of Utah.
5 * Copyright (c) 1990, 1993
6 * The Regents of the University of California. All rights reserved.
7 *
8 * This code is derived from software contributed to Berkeley by
9 * the Systems Programming Group of the University of Utah Computer
10 * Science Department.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 *
36 * from: Utah $Hdr: ite.c 1.24 93/06/25$
37 *
38 * @(#)ite.c 8.1 (Berkeley) 7/8/93
39 */
40
41 /*
42 * Standalone Internal Terminal Emulator (CRT and keyboard)
43 */
44
45 #ifdef ITECONSOLE
46
47 #include <sys/param.h>
48 #include <dev/cons.h>
49
50 #include <hp300/stand/common/grfreg.h>
51 #include <hp300/dev/intioreg.h>
52
53 #include <hp300/stand/common/device.h>
54 #include <hp300/stand/common/itevar.h>
55 #include <hp300/stand/common/kbdvar.h>
56 #include <hp300/stand/common/consdefs.h>
57 #include <hp300/stand/common/samachdep.h>
58
59 static void iteconfig(void);
60 static void ite_clrtoeol(struct ite_data *, struct itesw *, int, int);
61 static void itecheckwrap(struct ite_data *, struct itesw *);
62
63 struct itesw itesw[] = {
64 { GID_TOPCAT,
65 topcat_init, ite_dio_clear, ite_dio_putc8bpp,
66 ite_dio_cursor, ite_dio_scroll },
67
68 { GID_GATORBOX,
69 gbox_init, ite_dio_clear, ite_dio_putc8bpp,
70 ite_dio_cursor, gbox_scroll },
71
72 { GID_RENAISSANCE,
73 rbox_init, ite_dio_clear, ite_dio_putc8bpp,
74 ite_dio_cursor, ite_dio_scroll },
75
76 { GID_LRCATSEYE,
77 topcat_init, ite_dio_clear, ite_dio_putc8bpp,
78 ite_dio_cursor, ite_dio_scroll },
79
80 { GID_HRCCATSEYE,
81 topcat_init, ite_dio_clear, ite_dio_putc8bpp,
82 ite_dio_cursor, ite_dio_scroll },
83
84 { GID_HRMCATSEYE,
85 topcat_init, ite_dio_clear, ite_dio_putc8bpp,
86 ite_dio_cursor, ite_dio_scroll },
87
88 { GID_DAVINCI,
89 dvbox_init, ite_dio_clear, ite_dio_putc8bpp,
90 ite_dio_cursor, ite_dio_scroll },
91
92 { GID_HYPERION,
93 hyper_init, ite_dio_clear, ite_dio_putc1bpp,
94 ite_dio_cursor, ite_dio_scroll },
95
96 { GID_TIGER,
97 tvrx_init, ite_dio_clear, ite_dio_putc1bpp,
98 ite_dio_cursor, ite_dio_scroll },
99
100 { GID_A1474MID,
101 dumb_init, dumb_clear, dumb_putc,
102 dumb_cursor, dumb_scroll },
103
104 { GID_A147xVGA,
105 dumb_init, dumb_clear, dumb_putc,
106 dumb_cursor, dumb_scroll },
107 };
108 int nitesw = sizeof(itesw) / sizeof(itesw[0]);
109
110 /* these guys need to be in initialized data */
111 int itecons = -1;
112 struct ite_data ite_data[NITE] = { { 0 } };
113 int ite_scode[NITE] = { 0 };
114
115 /*
116 * Locate all bitmapped displays
117 */
118 static void
119 iteconfig(void)
120 {
121 int dtype, fboff, i;
122 struct hp_hw *hw;
123 struct grfreg *gr;
124 struct ite_data *ip;
125
126 i = 0;
127 for (hw = sc_table; hw < &sc_table[MAXCTLRS]; hw++) {
128 if (!HW_ISDEV(hw, D_BITMAP))
129 continue;
130 gr = (struct grfreg *) hw->hw_kva;
131 /* XXX: redundent but safe */
132 if (badaddr((void *)gr) || gr->gr_id != GRFHWID)
133 continue;
134 for (dtype = 0; dtype < nitesw; dtype++)
135 if (itesw[dtype].ite_hwid == gr->gr_id2)
136 break;
137 if (dtype == nitesw)
138 continue;
139 if (i >= NITE)
140 break;
141 ite_scode[i] = hw->hw_sc;
142 ip = &ite_data[i];
143 ip->isw = &itesw[dtype];
144 ip->regbase = (void *) gr;
145 fboff = (gr->gr_fbomsb << 8) | gr->gr_fbolsb;
146 ip->fbbase = (void *)(*((u_char *)ip->regbase + fboff) << 16);
147 /* DIO II: FB offset is relative to select code space */
148 if (ip->regbase >= (void *)DIOIIBASE)
149 ip->fbbase = (char*)ip->fbbase + (int)ip->regbase;
150 ip->fbwidth = gr->gr_fbwidth_h << 8 | gr->gr_fbwidth_l;
151 ip->fbheight = gr->gr_fbheight_h << 8 | gr->gr_fbheight_l;
152 ip->dwidth = gr->gr_dwidth_h << 8 | gr->gr_dwidth_l;
153 ip->dheight = gr->gr_dheight_h << 8 | gr->gr_dheight_l;
154 /*
155 * XXX some displays (e.g. the davinci) appear
156 * to return a display height greater than the
157 * returned FB height. Guess we should go back
158 * to getting the display dimensions from the
159 * fontrom...
160 */
161 if (ip->dwidth > ip->fbwidth)
162 ip->dwidth = ip->fbwidth;
163 if (ip->dheight > ip->fbheight)
164 ip->dheight = ip->fbheight;
165 ip->alive = 1;
166 i++;
167 }
168 }
169
170 #ifdef CONSDEBUG
171 /*
172 * Allows us to cycle through all possible consoles (NITE ites and serial port)
173 * by using SHIFT-RESET on the keyboard.
174 */
175 int whichconsole = -1;
176 #endif
177
178 void
179 iteprobe(struct consdev *cp)
180 {
181 int ite;
182 struct ite_data *ip;
183 int unit, pri;
184
185 #ifdef CONSDEBUG
186 whichconsole = ++whichconsole % (NITE+1);
187 #endif
188
189 if (itecons != -1)
190 return;
191
192 iteconfig();
193 unit = -1;
194 pri = CN_DEAD;
195 for (ite = 0; ite < NITE; ite++) {
196 #ifdef CONSDEBUG
197 if (ite < whichconsole)
198 continue;
199 #endif
200 ip = &ite_data[ite];
201 if (ip->alive == 0)
202 continue;
203 if ((int)ip->regbase == INTIOBASE + FB_BASE) {
204 pri = CN_INTERNAL;
205 unit = ite;
206 } else if (unit < 0) {
207 pri = CN_NORMAL;
208 unit = ite;
209 }
210 }
211 curcons_scode = ite_scode[unit];
212 cp->cn_dev = unit;
213 cp->cn_pri = pri;
214 }
215
216 void
217 iteinit(struct consdev *cp)
218 {
219 int ite = cp->cn_dev;
220 struct ite_data *ip;
221
222 if (itecons != -1)
223 return;
224
225 ip = &ite_data[ite];
226
227 ip->curx = 0;
228 ip->cury = 0;
229 ip->cursorx = 0;
230 ip->cursory = 0;
231
232 (*ip->isw->ite_init)(ip);
233 (*ip->isw->ite_cursor)(ip, DRAW_CURSOR);
234
235 itecons = ite;
236 kbdinit();
237 }
238
239 /* ARGSUSED */
240 void
241 iteputchar(dev_t dev, int c)
242 {
243 struct ite_data *ip = &ite_data[itecons];
244 struct itesw *sp = ip->isw;
245
246 c &= 0x7F;
247 switch (c) {
248
249 case '\n':
250 if (++ip->cury == ip->rows) {
251 ip->cury--;
252 (*sp->ite_scroll)(ip);
253 ite_clrtoeol(ip, sp, ip->cury, 0);
254 }
255 else
256 (*sp->ite_cursor)(ip, MOVE_CURSOR);
257 break;
258
259 case '\r':
260 ip->curx = 0;
261 (*sp->ite_cursor)(ip, MOVE_CURSOR);
262 break;
263
264 case '\b':
265 if (--ip->curx < 0)
266 ip->curx = 0;
267 else
268 (*sp->ite_cursor)(ip, MOVE_CURSOR);
269 break;
270
271 default:
272 if (c < ' ' || c == 0177)
273 break;
274 (*sp->ite_putc)(ip, c, ip->cury, ip->curx);
275 (*sp->ite_cursor)(ip, DRAW_CURSOR);
276 itecheckwrap(ip, sp);
277 break;
278 }
279 }
280
281 static void
282 itecheckwrap(struct ite_data *ip, struct itesw *sp)
283 {
284 if (++ip->curx == ip->cols) {
285 ip->curx = 0;
286 if (++ip->cury == ip->rows) {
287 --ip->cury;
288 (*sp->ite_scroll)(ip);
289 ite_clrtoeol(ip, sp, ip->cury, 0);
290 return;
291 }
292 }
293 (*sp->ite_cursor)(ip, MOVE_CURSOR);
294 }
295
296 static void
297 ite_clrtoeol(struct ite_data *ip, struct itesw *sp, int y, int x)
298 {
299
300 (*sp->ite_clear)(ip, y, x, 1, ip->cols - x);
301 (*sp->ite_cursor)(ip, DRAW_CURSOR);
302 }
303
304 /* ARGSUSED */
305 int
306 itegetchar(dev_t dev)
307 {
308
309 #ifdef SMALL
310 return 0;
311 #else
312 return kbdgetc();
313 #endif
314 }
315 #endif
316