ite_gb.c revision 1.8 1 /* $NetBSD: ite_gb.c,v 1.8 2011/02/08 20:20:14 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_gb.c 1.9 92/01/20$
37 *
38 * @(#)ite_gb.c 8.1 (Berkeley) 6/10/93
39 */
40
41 #ifdef ITECONSOLE
42
43 #include <sys/param.h>
44
45 #include <hp300/stand/common/itereg.h>
46 #include <hp300/stand/common/grf_gbreg.h>
47
48 #include <hp300/stand/common/samachdep.h>
49 #include <hp300/stand/common/itevar.h>
50
51 #define WINDOWMOVER gbox_windowmove
52
53 void gbox_windowmove(struct ite_data *, int, int, int, int, int, int, int);
54
55 void
56 gbox_init(struct ite_data *ip)
57 {
58 struct gboxfb *regbase = (void *)ip->regbase;
59
60 regbase->write_protect = 0x0;
61 regbase->interrupt = 0x4;
62 regbase->rep_rule = RR_COPY;
63 regbase->blink1 = 0xff;
64 regbase->blink2 = 0xff;
65 regbase->sec_interrupt = 0x01;
66
67 /*
68 * Set up the color map entries. We use three entries in the
69 * color map. The first, is for black, the second is for
70 * white, and the very last entry is for the inverted cursor.
71 */
72 regbase->creg_select = 0x00;
73 regbase->cmap_red = 0x00;
74 regbase->cmap_grn = 0x00;
75 regbase->cmap_blu = 0x00;
76 regbase->cmap_write = 0x00;
77 gbcm_waitbusy(regbase);
78
79 regbase->creg_select = 0x01;
80 regbase->cmap_red = 0xFF;
81 regbase->cmap_grn = 0xFF;
82 regbase->cmap_blu = 0xFF;
83 regbase->cmap_write = 0x01;
84 gbcm_waitbusy(regbase);
85
86 regbase->creg_select = 0xFF;
87 regbase->cmap_red = 0xFF;
88 regbase->cmap_grn = 0xFF;
89 regbase->cmap_blu = 0xFF;
90 regbase->cmap_write = 0x01;
91 gbcm_waitbusy(regbase);
92
93 ite_fontinfo(ip);
94 ite_fontinit(ip);
95
96 /*
97 * Clear the display. This used to be before the font unpacking
98 * but it crashes. Figure it out later.
99 */
100 gbox_windowmove(ip, 0, 0, 0, 0, ip->dheight, ip->dwidth, RR_CLEAR);
101 tile_mover_waitbusy(regbase);
102
103 /*
104 * Stash the inverted cursor.
105 */
106 gbox_windowmove(ip, charY(ip, ' '), charX(ip, ' '),
107 ip->cblanky, ip->cblankx, ip->ftheight,
108 ip->ftwidth, RR_COPYINVERTED);
109 }
110
111 void
112 gbox_putc(struct ite_data *ip, int c, int dy, int dx, int mode)
113 {
114
115 gbox_windowmove(ip, charY(ip, c), charX(ip, c),
116 dy * ip->ftheight, dx * ip->ftwidth,
117 ip->ftheight, ip->ftwidth, RR_COPY);
118 }
119
120 void
121 gbox_cursor(struct ite_data *ip, int flag)
122 {
123
124 if (flag == DRAW_CURSOR)
125 draw_cursor(ip)
126 else if (flag == MOVE_CURSOR) {
127 erase_cursor(ip)
128 draw_cursor(ip)
129 } else
130 erase_cursor(ip)
131 }
132
133 void
134 gbox_clear(struct ite_data *ip, int sy, int sx, int h, int w)
135 {
136
137 gbox_windowmove(ip, sy * ip->ftheight, sx * ip->ftwidth,
138 sy * ip->ftheight, sx * ip->ftwidth,
139 h * ip->ftheight, w * ip->ftwidth,
140 RR_CLEAR);
141 }
142
143 #define gbox_blockmove(ip, sy, sx, dy, dx, h, w) \
144 gbox_windowmove((ip), \
145 (sy) * ip->ftheight, \
146 (sx) * ip->ftwidth, \
147 (dy) * ip->ftheight, \
148 (dx) * ip->ftwidth, \
149 (h) * ip->ftheight, \
150 (w) * ip->ftwidth, \
151 RR_COPY)
152
153 void
154 gbox_scroll(struct ite_data *ip, int sy, int sx, int count, int dir)
155 {
156 struct gboxfb *regbase = (void *)ip->regbase;
157 int height, dy, i;
158
159 tile_mover_waitbusy(regbase);
160 regbase->write_protect = 0x0;
161
162 gbox_cursor(ip, ERASE_CURSOR);
163
164 dy = sy - count;
165 height = ip->rows - sy;
166 for (i = 0; i < height; i++)
167 gbox_blockmove(ip, sy + i, sx, dy + i, 0, 1, ip->cols);
168 }
169
170 void
171 gbox_windowmove(struct ite_data *ip, int sy, int sx, int dy, int dx, int h,
172 int w, int mask)
173 {
174 struct gboxfb *regbase = (void *)ip->regbase;
175 int src, dest;
176
177 src = (sy * 1024) + sx; /* upper left corner in pixels */
178 dest = (dy * 1024) + dx;
179
180 tile_mover_waitbusy(regbase);
181 regbase->width = -(w / 4);
182 regbase->height = -(h / 4);
183 if (src < dest)
184 regbase->rep_rule = MOVE_DOWN_RIGHT|mask;
185 else {
186 regbase->rep_rule = MOVE_UP_LEFT|mask;
187 /*
188 * Adjust to top of lower right tile of the block.
189 */
190 src = src + ((h - 4) * 1024) + (w - 4);
191 dest= dest + ((h - 4) * 1024) + (w - 4);
192 }
193 FBBASE[dest] = FBBASE[src];
194 }
195 #endif
196