zx.c revision 1.25 1 1.25 tsutsui /* $NetBSD: zx.c,v 1.25 2009/03/27 12:25:41 tsutsui Exp $ */
2 1.1 ad
3 1.1 ad /*
4 1.1 ad * Copyright (c) 2002 The NetBSD Foundation, Inc.
5 1.1 ad * All rights reserved.
6 1.1 ad *
7 1.1 ad * This code is derived from software contributed to The NetBSD Foundation
8 1.1 ad * by Andrew Doran.
9 1.1 ad *
10 1.1 ad * Redistribution and use in source and binary forms, with or without
11 1.1 ad * modification, are permitted provided that the following conditions
12 1.1 ad * are met:
13 1.1 ad * 1. Redistributions of source code must retain the above copyright
14 1.1 ad * notice, this list of conditions and the following disclaimer.
15 1.1 ad * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 ad * notice, this list of conditions and the following disclaimer in the
17 1.1 ad * documentation and/or other materials provided with the distribution.
18 1.1 ad *
19 1.1 ad * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 ad * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 ad * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 ad * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 ad * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 ad * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 ad * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 ad * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 ad * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 ad * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 ad * POSSIBILITY OF SUCH DAMAGE.
30 1.1 ad */
31 1.1 ad
32 1.1 ad /*
33 1.1 ad * Driver for the Sun ZX display adapter. This would be called 'leo', but
34 1.1 ad * NetBSD/amiga already has a driver by that name. The XFree86 and Linux
35 1.1 ad * drivers were used as "living documentation" when writing this; thanks
36 1.1 ad * to the authors.
37 1.1 ad *
38 1.1 ad * Issues (which can be solved with wscons, happily enough):
39 1.1 ad *
40 1.1 ad * o There is lots of unnecessary mucking about rasops in here, primarily
41 1.1 ad * to appease the sparc fb code.
42 1.1 ad *
43 1.1 ad * o RASTERCONSOLE is required. X needs the board set up correctly, and
44 1.1 ad * that's difficult to reconcile with using the PROM for output.
45 1.1 ad */
46 1.1 ad
47 1.1 ad #include <sys/cdefs.h>
48 1.25 tsutsui __KERNEL_RCSID(0, "$NetBSD: zx.c,v 1.25 2009/03/27 12:25:41 tsutsui Exp $");
49 1.1 ad
50 1.1 ad #include <sys/param.h>
51 1.1 ad #include <sys/systm.h>
52 1.1 ad #include <sys/device.h>
53 1.1 ad #include <sys/ioctl.h>
54 1.1 ad #include <sys/malloc.h>
55 1.1 ad #include <sys/mman.h>
56 1.1 ad #include <sys/tty.h>
57 1.1 ad #include <sys/conf.h>
58 1.1 ad #include <sys/syslog.h>
59 1.1 ad #include <sys/buf.h>
60 1.1 ad
61 1.20 ad #include <sys/bus.h>
62 1.1 ad #include <machine/autoconf.h>
63 1.1 ad
64 1.1 ad #include <uvm/uvm_extern.h>
65 1.1 ad
66 1.1 ad #include <dev/sun/fbio.h>
67 1.1 ad #include <dev/sun/fbvar.h>
68 1.1 ad
69 1.1 ad #include <dev/sbus/zxreg.h>
70 1.1 ad #include <dev/sbus/zxvar.h>
71 1.1 ad #include <dev/sbus/sbusvar.h>
72 1.1 ad
73 1.1 ad #include <dev/wscons/wsconsio.h>
74 1.1 ad
75 1.1 ad #ifndef RASTERCONSOLE
76 1.1 ad #error Sorry, this driver needs the RASTERCONSOLE option
77 1.1 ad #endif
78 1.1 ad
79 1.1 ad #define ZX_STD_ROP (ZX_ROP_NEW | ZX_ATTR_WE_ENABLE | \
80 1.1 ad ZX_ATTR_OE_ENABLE | ZX_ATTR_FORCE_WID)
81 1.1 ad
82 1.1 ad void zx_attach(struct device *, struct device *, void *);
83 1.1 ad int zx_match(struct device *, struct cfdata *, void *);
84 1.1 ad
85 1.1 ad void zx_blank(struct device *);
86 1.1 ad int zx_cmap_put(struct zx_softc *);
87 1.1 ad void zx_copyrect(struct rasops_info *, int, int, int, int, int, int);
88 1.1 ad int zx_cross_loadwid(struct zx_softc *, u_int, u_int, u_int);
89 1.1 ad int zx_cross_wait(struct zx_softc *);
90 1.1 ad void zx_fillrect(struct rasops_info *, int, int, int, int, long, int);
91 1.1 ad int zx_intr(void *);
92 1.1 ad void zx_reset(struct zx_softc *);
93 1.1 ad void zx_unblank(struct device *);
94 1.1 ad
95 1.1 ad void zx_cursor_blank(struct zx_softc *);
96 1.1 ad void zx_cursor_color(struct zx_softc *);
97 1.1 ad void zx_cursor_move(struct zx_softc *);
98 1.1 ad void zx_cursor_set(struct zx_softc *);
99 1.1 ad void zx_cursor_unblank(struct zx_softc *);
100 1.1 ad
101 1.1 ad void zx_copycols(void *, int, int, int, int);
102 1.1 ad void zx_copyrows(void *, int, int, int);
103 1.1 ad void zx_cursor(void *, int, int, int);
104 1.1 ad void zx_do_cursor(struct rasops_info *);
105 1.1 ad void zx_erasecols(void *, int, int, int, long);
106 1.1 ad void zx_eraserows(void *, int, int, long);
107 1.1 ad void zx_putchar(void *, int, int, u_int, long);
108 1.1 ad
109 1.1 ad struct zx_mmo {
110 1.1 ad off_t mo_va;
111 1.1 ad off_t mo_pa;
112 1.1 ad off_t mo_size;
113 1.1 ad } static const zx_mmo[] = {
114 1.1 ad { ZX_FB0_VOFF, ZX_OFF_SS0, 0x00800000 },
115 1.1 ad { ZX_LC0_VOFF, ZX_OFF_LC_SS0_USR, 0x00001000 },
116 1.1 ad { ZX_LD0_VOFF, ZX_OFF_LD_SS0, 0x00001000 },
117 1.1 ad { ZX_LX0_CURSOR_VOFF, ZX_OFF_LX_CURSOR, 0x00001000 },
118 1.1 ad { ZX_FB1_VOFF, ZX_OFF_SS1, 0x00800000 },
119 1.1 ad { ZX_LC1_VOFF, ZX_OFF_LC_SS1_USR, 0x00001000 },
120 1.1 ad { ZX_LD1_VOFF, ZX_OFF_LD_SS1, 0x00001000 },
121 1.1 ad { ZX_LX_KRN_VOFF, ZX_OFF_LX_CROSS, 0x00001000 },
122 1.1 ad { ZX_LC0_KRN_VOFF, ZX_OFF_LC_SS0_KRN, 0x00001000 },
123 1.1 ad { ZX_LC1_KRN_VOFF, ZX_OFF_LC_SS1_KRN, 0x00001000 },
124 1.1 ad { ZX_LD_GBL_VOFF, ZX_OFF_LD_GBL, 0x00001000 },
125 1.14 perry };
126 1.1 ad
127 1.4 thorpej CFATTACH_DECL(zx, sizeof(struct zx_softc),
128 1.5 thorpej zx_match, zx_attach, NULL, NULL);
129 1.1 ad
130 1.1 ad extern struct cfdriver zx_cd;
131 1.1 ad
132 1.1 ad dev_type_open(zxopen);
133 1.1 ad dev_type_close(zxclose);
134 1.1 ad dev_type_ioctl(zxioctl);
135 1.1 ad dev_type_mmap(zxmmap);
136 1.1 ad
137 1.1 ad static struct fbdriver zx_fbdriver = {
138 1.1 ad zx_unblank, zxopen, zxclose, zxioctl, nopoll, zxmmap
139 1.1 ad };
140 1.1 ad
141 1.1 ad int
142 1.1 ad zx_match(struct device *parent, struct cfdata *cf, void *aux)
143 1.1 ad {
144 1.1 ad struct sbus_attach_args *sa;
145 1.14 perry
146 1.1 ad sa = (struct sbus_attach_args *)aux;
147 1.1 ad
148 1.1 ad return (strcmp(sa->sa_name, "SUNW,leo") == 0);
149 1.1 ad }
150 1.1 ad
151 1.1 ad void
152 1.1 ad zx_attach(struct device *parent, struct device *self, void *args)
153 1.1 ad {
154 1.1 ad struct zx_softc *sc;
155 1.1 ad struct sbus_attach_args *sa;
156 1.1 ad bus_space_handle_t bh;
157 1.1 ad bus_space_tag_t bt;
158 1.1 ad struct fbdevice *fb;
159 1.1 ad struct rasops_info *ri;
160 1.1 ad int isconsole;
161 1.1 ad
162 1.24 drochner sc = device_private(self);
163 1.1 ad sa = args;
164 1.1 ad fb = &sc->sc_fb;
165 1.1 ad ri = &fb->fb_rinfo;
166 1.1 ad bt = sa->sa_bustag;
167 1.1 ad sc->sc_bt = bt;
168 1.1 ad
169 1.1 ad sc->sc_paddr = sbus_bus_addr(bt, sa->sa_slot, sa->sa_offset);
170 1.1 ad
171 1.1 ad if (sbus_bus_map(bt, sa->sa_slot, sa->sa_offset + ZX_OFF_SS0,
172 1.1 ad 0x800000, BUS_SPACE_MAP_LINEAR, &bh) != 0) {
173 1.21 cegger aprint_error_dev(self, "can't map bits\n");
174 1.1 ad return;
175 1.1 ad }
176 1.19 christos fb->fb_pixels = (void *)bus_space_vaddr(bt, bh);
177 1.1 ad sc->sc_pixels = (u_int32_t *)fb->fb_pixels;
178 1.1 ad
179 1.1 ad if (sbus_bus_map(bt, sa->sa_slot, sa->sa_offset + ZX_OFF_LC_SS0_USR,
180 1.1 ad PAGE_SIZE, BUS_SPACE_MAP_LINEAR, &bh) != 0) {
181 1.21 cegger aprint_error_dev(self, "can't map zc\n");
182 1.1 ad return;
183 1.1 ad }
184 1.25 tsutsui sc->sc_bhzc = bh;
185 1.1 ad
186 1.1 ad if (sbus_bus_map(bt, sa->sa_slot, sa->sa_offset + ZX_OFF_LD_SS0,
187 1.1 ad PAGE_SIZE, BUS_SPACE_MAP_LINEAR, &bh) != 0) {
188 1.21 cegger aprint_error_dev(self, "can't map ld/ss0\n");
189 1.1 ad return;
190 1.1 ad }
191 1.25 tsutsui sc->sc_bhzdss0 = bh;
192 1.1 ad
193 1.1 ad if (sbus_bus_map(bt, sa->sa_slot, sa->sa_offset + ZX_OFF_LD_SS1,
194 1.1 ad PAGE_SIZE, BUS_SPACE_MAP_LINEAR, &bh) != 0) {
195 1.21 cegger aprint_error_dev(self, "can't map ld/ss1\n");
196 1.1 ad return;
197 1.1 ad }
198 1.25 tsutsui sc->sc_bhzdss1 = bh;
199 1.1 ad
200 1.1 ad if (sbus_bus_map(bt, sa->sa_slot, sa->sa_offset + ZX_OFF_LX_CROSS,
201 1.1 ad PAGE_SIZE, BUS_SPACE_MAP_LINEAR, &bh) != 0) {
202 1.21 cegger aprint_error_dev(self, "can't map zx\n");
203 1.1 ad return;
204 1.1 ad }
205 1.25 tsutsui sc->sc_bhzx = bh;
206 1.1 ad
207 1.1 ad if (sbus_bus_map(bt, sa->sa_slot, sa->sa_offset + ZX_OFF_LX_CURSOR,
208 1.1 ad PAGE_SIZE, BUS_SPACE_MAP_LINEAR, &bh) != 0) {
209 1.21 cegger aprint_error_dev(self, "can't map zcu\n");
210 1.1 ad return;
211 1.1 ad }
212 1.25 tsutsui sc->sc_bhzcu = bh;
213 1.1 ad
214 1.1 ad fb->fb_driver = &zx_fbdriver;
215 1.1 ad fb->fb_device = &sc->sc_dv;
216 1.17 thorpej fb->fb_flags = device_cfdata(&sc->sc_dv)->cf_flags & FB_USERMASK;
217 1.1 ad fb->fb_pfour = NULL;
218 1.1 ad fb->fb_linebytes = 8192;
219 1.1 ad
220 1.1 ad fb_setsize_obp(fb, 32, 1280, 1024, sa->sa_node);
221 1.1 ad
222 1.1 ad fb->fb_type.fb_cmsize = 256;
223 1.1 ad fb->fb_type.fb_depth = 32;
224 1.1 ad fb->fb_type.fb_size = fb->fb_type.fb_height * fb->fb_linebytes;
225 1.1 ad fb->fb_type.fb_type = FBTYPE_SUNLEO;
226 1.1 ad
227 1.1 ad printf(": %d x %d", fb->fb_type.fb_width, fb->fb_type.fb_height);
228 1.1 ad isconsole = fb_is_console(sa->sa_node);
229 1.1 ad if (isconsole)
230 1.1 ad printf(" (console)");
231 1.1 ad printf("\n");
232 1.1 ad
233 1.1 ad sbus_establish(&sc->sc_sd, &sc->sc_dv);
234 1.1 ad if (sa->sa_nintr != 0)
235 1.6 pk bus_intr_establish(bt, sa->sa_pri, IPL_NONE, zx_intr, sc);
236 1.1 ad
237 1.1 ad sc->sc_cmap = malloc(768, M_DEVBUF, M_NOWAIT);
238 1.1 ad fb_attach(&sc->sc_fb, isconsole);
239 1.1 ad zx_reset(sc);
240 1.1 ad
241 1.1 ad /*
242 1.1 ad * Attach to rcons. XXX At this point, rasops_do_cursor() will be
243 1.1 ad * called before we get our hooks in place. So, we mask off access
244 1.1 ad * to the framebuffer until it's done.
245 1.1 ad */
246 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_fontt, 1);
247 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_fontmsk, 0);
248 1.1 ad
249 1.1 ad fbrcons_init(&sc->sc_fb);
250 1.1 ad
251 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_fontt, 0);
252 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_fontmsk, 0xffffffff);
253 1.1 ad
254 1.1 ad ri->ri_hw = sc;
255 1.1 ad ri->ri_do_cursor = zx_do_cursor;
256 1.1 ad ri->ri_ops.copycols = zx_copycols;
257 1.1 ad ri->ri_ops.copyrows = zx_copyrows;
258 1.1 ad ri->ri_ops.erasecols = zx_erasecols;
259 1.1 ad ri->ri_ops.eraserows = zx_eraserows;
260 1.1 ad ri->ri_ops.putchar = zx_putchar;
261 1.1 ad
262 1.1 ad sc->sc_fontw = ri->ri_font->fontwidth;
263 1.1 ad sc->sc_fonth = ri->ri_font->fontheight;
264 1.1 ad }
265 1.1 ad
266 1.1 ad int
267 1.16 christos zxopen(dev_t dev, int flags, int mode, struct lwp *l)
268 1.1 ad {
269 1.1 ad
270 1.1 ad if (device_lookup(&zx_cd, minor(dev)) == NULL)
271 1.1 ad return (ENXIO);
272 1.1 ad return (0);
273 1.1 ad }
274 1.1 ad
275 1.1 ad int
276 1.16 christos zxclose(dev_t dev, int flags, int mode, struct lwp *l)
277 1.1 ad {
278 1.1 ad struct zx_softc *sc;
279 1.1 ad
280 1.23 cegger sc = device_lookup_private(&zx_cd, minor(dev));
281 1.1 ad
282 1.1 ad zx_reset(sc);
283 1.1 ad zx_cursor_blank(sc);
284 1.1 ad return (0);
285 1.1 ad }
286 1.1 ad
287 1.1 ad int
288 1.19 christos zxioctl(dev_t dev, u_long cmd, void *data, int flags, struct lwp *l)
289 1.1 ad {
290 1.1 ad struct zx_softc *sc;
291 1.1 ad struct fbcmap *cm;
292 1.1 ad struct fbcursor *cu;
293 1.13 chs uint32_t curbits[2][32];
294 1.1 ad int rv, v, count, i;
295 1.1 ad
296 1.23 cegger sc = device_lookup_private(&zx_cd, minor(dev));
297 1.14 perry
298 1.1 ad switch (cmd) {
299 1.1 ad case FBIOGTYPE:
300 1.1 ad *(struct fbtype *)data = sc->sc_fb.fb_type;
301 1.1 ad break;
302 1.1 ad
303 1.1 ad case FBIOGATTR:
304 1.1 ad #define fba ((struct fbgattr *)data)
305 1.1 ad fba->real_type = sc->sc_fb.fb_type.fb_type;
306 1.1 ad fba->owner = 0; /* XXX ??? */
307 1.1 ad fba->fbtype = sc->sc_fb.fb_type;
308 1.1 ad fba->sattr.flags = 0;
309 1.1 ad fba->sattr.emu_type = sc->sc_fb.fb_type.fb_type;
310 1.1 ad fba->sattr.dev_specific[0] = -1;
311 1.1 ad fba->emu_types[0] = sc->sc_fb.fb_type.fb_type;
312 1.1 ad fba->emu_types[1] = -1;
313 1.1 ad fba->emu_types[2] = -1;
314 1.1 ad #undef fba
315 1.1 ad break;
316 1.1 ad
317 1.1 ad case FBIOGVIDEO:
318 1.1 ad *(int *)data = ((sc->sc_flags & ZX_BLANKED) != 0);
319 1.1 ad break;
320 1.1 ad
321 1.1 ad case FBIOSVIDEO:
322 1.1 ad if (*(int *)data)
323 1.1 ad zx_unblank(&sc->sc_dv);
324 1.1 ad else
325 1.1 ad zx_blank(&sc->sc_dv);
326 1.1 ad break;
327 1.1 ad
328 1.1 ad case FBIOGETCMAP:
329 1.1 ad cm = (struct fbcmap *)data;
330 1.1 ad if (cm->index > 256 || cm->count > 256 - cm->index)
331 1.1 ad return (EINVAL);
332 1.1 ad rv = copyout(sc->sc_cmap + cm->index, cm->red, cm->count);
333 1.2 ad if (rv == 0)
334 1.1 ad rv = copyout(sc->sc_cmap + 256 + cm->index, cm->green,
335 1.1 ad cm->count);
336 1.2 ad if (rv == 0)
337 1.1 ad rv = copyout(sc->sc_cmap + 512 + cm->index, cm->blue,
338 1.1 ad cm->count);
339 1.1 ad return (rv);
340 1.1 ad
341 1.1 ad case FBIOPUTCMAP:
342 1.1 ad cm = (struct fbcmap *)data;
343 1.1 ad if (cm->index > 256 || cm->count > 256 - cm->index)
344 1.1 ad return (EINVAL);
345 1.1 ad rv = copyin(cm->red, sc->sc_cmap + cm->index, cm->count);
346 1.2 ad if (rv == 0)
347 1.1 ad rv = copyin(cm->green, sc->sc_cmap + 256 + cm->index,
348 1.1 ad cm->count);
349 1.2 ad if (rv == 0)
350 1.1 ad rv = copyin(cm->blue, sc->sc_cmap + 512 + cm->index,
351 1.1 ad cm->count);
352 1.1 ad zx_cmap_put(sc);
353 1.1 ad return (rv);
354 1.1 ad
355 1.1 ad case FBIOGCURPOS:
356 1.1 ad *(struct fbcurpos *)data = sc->sc_curpos;
357 1.1 ad break;
358 1.1 ad
359 1.1 ad case FBIOSCURPOS:
360 1.1 ad sc->sc_curpos = *(struct fbcurpos *)data;
361 1.1 ad zx_cursor_move(sc);
362 1.1 ad break;
363 1.1 ad
364 1.1 ad case FBIOGCURMAX:
365 1.1 ad ((struct fbcurpos *)data)->x = 32;
366 1.1 ad ((struct fbcurpos *)data)->y = 32;
367 1.1 ad break;
368 1.1 ad
369 1.1 ad case FBIOSCURSOR:
370 1.1 ad cu = (struct fbcursor *)data;
371 1.1 ad v = cu->set;
372 1.1 ad
373 1.1 ad if ((v & FB_CUR_SETSHAPE) != 0) {
374 1.1 ad if ((u_int)cu->size.x > 32 || (u_int)cu->size.y > 32)
375 1.1 ad return (EINVAL);
376 1.1 ad count = cu->size.y * 4;
377 1.13 chs rv = copyin(cu->mask, curbits[0], count);
378 1.13 chs if (rv)
379 1.13 chs return rv;
380 1.13 chs rv = copyin(cu->image, curbits[1], count);
381 1.13 chs if (rv)
382 1.13 chs return rv;
383 1.1 ad }
384 1.1 ad if ((v & FB_CUR_SETCUR) != 0) {
385 1.1 ad if (cu->enable)
386 1.1 ad zx_cursor_unblank(sc);
387 1.1 ad else
388 1.1 ad zx_cursor_blank(sc);
389 1.1 ad }
390 1.1 ad if ((v & (FB_CUR_SETPOS | FB_CUR_SETHOT)) != 0) {
391 1.1 ad if ((v & FB_CUR_SETPOS) != 0)
392 1.1 ad sc->sc_curpos = cu->pos;
393 1.1 ad if ((v & FB_CUR_SETHOT) != 0)
394 1.1 ad sc->sc_curhot = cu->hot;
395 1.1 ad zx_cursor_move(sc);
396 1.1 ad }
397 1.1 ad if ((v & FB_CUR_SETCMAP) != 0) {
398 1.1 ad if (cu->cmap.index > 2 ||
399 1.1 ad cu->cmap.count > 2 - cu->cmap.index)
400 1.1 ad return (EINVAL);
401 1.1 ad for (i = 0; i < cu->cmap.count; i++) {
402 1.1 ad if ((v = fubyte(&cu->cmap.red[i])) < 0)
403 1.1 ad return (EFAULT);
404 1.1 ad sc->sc_curcmap[i + cu->cmap.index + 0] = v;
405 1.1 ad if ((v = fubyte(&cu->cmap.green[i])) < 0)
406 1.1 ad return (EFAULT);
407 1.1 ad sc->sc_curcmap[i + cu->cmap.index + 2] = v;
408 1.1 ad if ((v = fubyte(&cu->cmap.blue[i])) < 0)
409 1.1 ad return (EFAULT);
410 1.1 ad sc->sc_curcmap[i + cu->cmap.index + 4] = v;
411 1.1 ad }
412 1.1 ad zx_cursor_color(sc);
413 1.1 ad }
414 1.1 ad if ((v & FB_CUR_SETSHAPE) != 0) {
415 1.1 ad sc->sc_cursize = cu->size;
416 1.1 ad count = cu->size.y * 4;
417 1.1 ad memset(sc->sc_curbits, 0, sizeof(sc->sc_curbits));
418 1.13 chs memcpy(sc->sc_curbits[0], curbits[0], count);
419 1.13 chs memcpy(sc->sc_curbits[1], curbits[1], count);
420 1.1 ad zx_cursor_set(sc);
421 1.1 ad }
422 1.1 ad break;
423 1.1 ad
424 1.1 ad case FBIOGCURSOR:
425 1.1 ad cu = (struct fbcursor *)data;
426 1.1 ad
427 1.1 ad cu->set = FB_CUR_SETALL;
428 1.1 ad cu->enable = ((sc->sc_flags & ZX_CURSOR) != 0);
429 1.1 ad cu->pos = sc->sc_curpos;
430 1.1 ad cu->hot = sc->sc_curhot;
431 1.1 ad cu->size = sc->sc_cursize;
432 1.1 ad
433 1.1 ad if (cu->image != NULL) {
434 1.1 ad count = sc->sc_cursize.y * 4;
435 1.13 chs rv = copyout(sc->sc_curbits[1], cu->image, count);
436 1.1 ad if (rv)
437 1.1 ad return (rv);
438 1.13 chs rv = copyout(sc->sc_curbits[0], cu->mask, count);
439 1.1 ad if (rv)
440 1.1 ad return (rv);
441 1.1 ad }
442 1.1 ad if (cu->cmap.red != NULL) {
443 1.1 ad if (cu->cmap.index > 2 ||
444 1.1 ad cu->cmap.count > 2 - cu->cmap.index)
445 1.1 ad return (EINVAL);
446 1.1 ad for (i = 0; i < cu->cmap.count; i++) {
447 1.1 ad v = sc->sc_curcmap[i + cu->cmap.index + 0];
448 1.1 ad if (subyte(&cu->cmap.red[i], v))
449 1.1 ad return (EFAULT);
450 1.1 ad v = sc->sc_curcmap[i + cu->cmap.index + 2];
451 1.1 ad if (subyte(&cu->cmap.green[i], v))
452 1.1 ad return (EFAULT);
453 1.1 ad v = sc->sc_curcmap[i + cu->cmap.index + 4];
454 1.1 ad if (subyte(&cu->cmap.blue[i], v))
455 1.1 ad return (EFAULT);
456 1.1 ad }
457 1.1 ad } else {
458 1.1 ad cu->cmap.index = 0;
459 1.1 ad cu->cmap.count = 2;
460 1.1 ad }
461 1.1 ad break;
462 1.1 ad
463 1.1 ad default:
464 1.1 ad #ifdef DEBUG
465 1.1 ad log(LOG_NOTICE, "zxioctl(0x%lx) (%s[%d])\n", cmd,
466 1.18 jdc l->l_proc->p_comm, l->l_proc->p_pid);
467 1.1 ad #endif
468 1.1 ad return (ENOTTY);
469 1.1 ad }
470 1.1 ad
471 1.1 ad return (0);
472 1.1 ad }
473 1.1 ad
474 1.1 ad int
475 1.1 ad zx_intr(void *cookie)
476 1.1 ad {
477 1.1 ad
478 1.1 ad return (1);
479 1.1 ad }
480 1.1 ad
481 1.1 ad void
482 1.1 ad zx_reset(struct zx_softc *sc)
483 1.1 ad {
484 1.1 ad struct fbtype *fbt;
485 1.1 ad u_int i;
486 1.1 ad
487 1.1 ad fbt = &sc->sc_fb.fb_type;
488 1.1 ad
489 1.1 ad zx_cross_loadwid(sc, ZX_WID_DBL_8, 0, 0x2c0);
490 1.1 ad zx_cross_loadwid(sc, ZX_WID_DBL_8, 1, 0x30);
491 1.1 ad zx_cross_loadwid(sc, ZX_WID_DBL_8, 2, 0x20);
492 1.1 ad zx_cross_loadwid(sc, ZX_WID_DBL_24, 1, 0x30);
493 1.1 ad
494 1.25 tsutsui i = bus_space_read_4(sc->sc_bt, sc->sc_bhzdss1, zd_misc);
495 1.1 ad i |= ZX_SS1_MISC_ENABLE;
496 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss1, zd_misc, i);
497 1.1 ad
498 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_wid, 0xffffffff);
499 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_widclip, 0);
500 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_wmask, 0xffff);
501 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_vclipmin, 0);
502 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_vclipmax,
503 1.1 ad (fbt->fb_width - 1) | ((fbt->fb_height - 1) << 16));
504 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_fg, 0);
505 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_planemask, 0xff000000);
506 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_rop, ZX_STD_ROP);
507 1.1 ad
508 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_extent,
509 1.1 ad (fbt->fb_width - 1) | ((fbt->fb_height - 1) << 11));
510 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_addrspace,
511 1.25 tsutsui ZX_ADDRSPC_FONT_OBGR);
512 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_fontt, 0);
513 1.1 ad
514 1.1 ad for (i = 0; i < 256; i++) {
515 1.1 ad sc->sc_cmap[i] = rasops_cmap[i * 3];
516 1.1 ad sc->sc_cmap[i + 256] = rasops_cmap[i * 3 + 1];
517 1.1 ad sc->sc_cmap[i + 512] = rasops_cmap[i * 3 + 2];
518 1.1 ad }
519 1.1 ad
520 1.1 ad zx_cmap_put(sc);
521 1.1 ad }
522 1.1 ad
523 1.1 ad int
524 1.1 ad zx_cross_wait(struct zx_softc *sc)
525 1.1 ad {
526 1.1 ad int i;
527 1.1 ad
528 1.1 ad for (i = 300000; i != 0; i--) {
529 1.25 tsutsui if ((bus_space_read_4(sc->sc_bt, sc->sc_bhzx, zx_csr) &
530 1.25 tsutsui ZX_CROSS_CSR_PROGRESS) == 0)
531 1.1 ad break;
532 1.1 ad DELAY(1);
533 1.1 ad }
534 1.1 ad
535 1.1 ad if (i == 0)
536 1.1 ad printf("zx_cross_wait: timed out\n");
537 1.1 ad
538 1.1 ad return (i);
539 1.1 ad }
540 1.1 ad
541 1.1 ad int
542 1.1 ad zx_cross_loadwid(struct zx_softc *sc, u_int type, u_int index, u_int value)
543 1.1 ad {
544 1.12 chs u_int tmp = 0;
545 1.1 ad
546 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_type, ZX_CROSS_TYPE_WID);
547 1.1 ad
548 1.1 ad if (zx_cross_wait(sc))
549 1.1 ad return (1);
550 1.1 ad
551 1.1 ad if (type == ZX_WID_DBL_8)
552 1.1 ad tmp = (index & 0x0f) + 0x40;
553 1.1 ad else if (type == ZX_WID_DBL_24)
554 1.1 ad tmp = index & 0x3f;
555 1.1 ad
556 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_type, 0x5800 + tmp);
557 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_value, value);
558 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_type, ZX_CROSS_TYPE_WID);
559 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_csr,
560 1.25 tsutsui ZX_CROSS_CSR_UNK | ZX_CROSS_CSR_UNK2);
561 1.1 ad
562 1.1 ad return (0);
563 1.1 ad }
564 1.1 ad
565 1.1 ad int
566 1.1 ad zx_cmap_put(struct zx_softc *sc)
567 1.1 ad {
568 1.1 ad const u_char *b;
569 1.1 ad u_int i, t;
570 1.1 ad
571 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_type, ZX_CROSS_TYPE_CLUT0);
572 1.1 ad if (zx_cross_wait(sc))
573 1.1 ad return (1);
574 1.1 ad
575 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_type,
576 1.25 tsutsui ZX_CROSS_TYPE_CLUTDATA);
577 1.1 ad
578 1.1 ad for (i = 0, b = sc->sc_cmap; i < 256; i++) {
579 1.1 ad t = b[i];
580 1.1 ad t |= b[i + 256] << 8;
581 1.1 ad t |= b[i + 512] << 16;
582 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_value, t);
583 1.1 ad }
584 1.1 ad
585 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_type, ZX_CROSS_TYPE_CLUT0);
586 1.25 tsutsui i = bus_space_read_4(sc->sc_bt, sc->sc_bhzx, zx_csr);
587 1.1 ad i = i | ZX_CROSS_CSR_UNK | ZX_CROSS_CSR_UNK2;
588 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_csr, i);
589 1.1 ad return (0);
590 1.1 ad }
591 1.1 ad
592 1.1 ad void
593 1.1 ad zx_cursor_move(struct zx_softc *sc)
594 1.1 ad {
595 1.1 ad int sx, sy, x, y;
596 1.1 ad
597 1.1 ad x = sc->sc_curpos.x - sc->sc_curhot.x;
598 1.1 ad y = sc->sc_curpos.y - sc->sc_curhot.y;
599 1.1 ad
600 1.1 ad if (x < 0) {
601 1.1 ad sx = min(-x, 32);
602 1.1 ad x = 0;
603 1.1 ad } else
604 1.1 ad sx = 0;
605 1.1 ad
606 1.1 ad if (y < 0) {
607 1.1 ad sy = min(-y, 32);
608 1.1 ad y = 0;
609 1.1 ad } else
610 1.1 ad sy = 0;
611 1.1 ad
612 1.1 ad if (sx != sc->sc_shiftx || sy != sc->sc_shifty) {
613 1.1 ad sc->sc_shiftx = sx;
614 1.1 ad sc->sc_shifty = sy;
615 1.1 ad zx_cursor_set(sc);
616 1.1 ad }
617 1.1 ad
618 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_sxy,
619 1.25 tsutsui ((y & 0x7ff) << 11) | (x & 0x7ff));
620 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc,
621 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc) | 0x30);
622 1.1 ad
623 1.1 ad /* XXX Necessary? */
624 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc,
625 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc) | 0x80);
626 1.1 ad }
627 1.1 ad
628 1.1 ad void
629 1.1 ad zx_cursor_set(struct zx_softc *sc)
630 1.1 ad {
631 1.1 ad int i, j, data;
632 1.1 ad
633 1.2 ad if ((sc->sc_flags & ZX_CURSOR) != 0)
634 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc,
635 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc) &
636 1.25 tsutsui ~0x80);
637 1.1 ad
638 1.1 ad for (j = 0; j < 2; j++) {
639 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_type, 0x20 << j);
640 1.2 ad
641 1.1 ad for (i = sc->sc_shifty; i < 32; i++) {
642 1.1 ad data = sc->sc_curbits[j][i];
643 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_data,
644 1.25 tsutsui data >> sc->sc_shiftx);
645 1.1 ad }
646 1.1 ad for (i = sc->sc_shifty; i != 0; i--)
647 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_data, 0);
648 1.1 ad }
649 1.2 ad
650 1.2 ad if ((sc->sc_flags & ZX_CURSOR) != 0)
651 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc,
652 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc) | 0x80);
653 1.1 ad }
654 1.1 ad
655 1.1 ad void
656 1.1 ad zx_cursor_blank(struct zx_softc *sc)
657 1.1 ad {
658 1.1 ad
659 1.1 ad sc->sc_flags &= ~ZX_CURSOR;
660 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc,
661 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc) & ~0x80);
662 1.1 ad }
663 1.1 ad
664 1.1 ad void
665 1.1 ad zx_cursor_unblank(struct zx_softc *sc)
666 1.1 ad {
667 1.1 ad
668 1.1 ad sc->sc_flags |= ZX_CURSOR;
669 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc,
670 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc) | 0x80);
671 1.1 ad }
672 1.1 ad
673 1.1 ad void
674 1.1 ad zx_cursor_color(struct zx_softc *sc)
675 1.1 ad {
676 1.1 ad u_int8_t tmp;
677 1.1 ad
678 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_type, 0x50);
679 1.1 ad
680 1.1 ad tmp = sc->sc_curcmap[0] | (sc->sc_curcmap[2] << 8) |
681 1.1 ad (sc->sc_curcmap[4] << 16);
682 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_data, tmp);
683 1.1 ad
684 1.1 ad tmp = sc->sc_curcmap[1] | (sc->sc_curcmap[3] << 8) |
685 1.1 ad (sc->sc_curcmap[5] << 16);
686 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_data, sc->sc_curcmap[1]);
687 1.1 ad
688 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc,
689 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzcu, zcu_misc) | 0x03);
690 1.1 ad }
691 1.1 ad
692 1.1 ad void
693 1.1 ad zx_blank(struct device *dv)
694 1.1 ad {
695 1.1 ad struct zx_softc *sc;
696 1.1 ad
697 1.24 drochner sc = device_private(dv);
698 1.1 ad
699 1.1 ad if ((sc->sc_flags & ZX_BLANKED) != 0)
700 1.1 ad return;
701 1.1 ad sc->sc_flags |= ZX_BLANKED;
702 1.1 ad
703 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_type, ZX_CROSS_TYPE_VIDEO);
704 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_csr,
705 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzx, zx_csr) &
706 1.25 tsutsui ~ZX_CROSS_CSR_ENABLE);
707 1.1 ad }
708 1.1 ad
709 1.1 ad void
710 1.1 ad zx_unblank(struct device *dv)
711 1.1 ad {
712 1.1 ad struct zx_softc *sc;
713 1.1 ad
714 1.24 drochner sc = device_private(dv);
715 1.1 ad
716 1.1 ad if ((sc->sc_flags & ZX_BLANKED) == 0)
717 1.1 ad return;
718 1.1 ad sc->sc_flags &= ~ZX_BLANKED;
719 1.1 ad
720 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_type, ZX_CROSS_TYPE_VIDEO);
721 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzx, zx_csr,
722 1.25 tsutsui bus_space_read_4(sc->sc_bt, sc->sc_bhzx, zx_csr) |
723 1.25 tsutsui ZX_CROSS_CSR_ENABLE);
724 1.1 ad }
725 1.1 ad
726 1.1 ad paddr_t
727 1.1 ad zxmmap(dev_t dev, off_t off, int prot)
728 1.1 ad {
729 1.1 ad struct zx_softc *sc;
730 1.15 tsutsui const struct zx_mmo *mm, *mmmax;
731 1.2 ad
732 1.23 cegger sc = device_lookup_private(&zx_cd, minor(dev));
733 1.2 ad off = trunc_page(off);
734 1.1 ad mm = zx_mmo;
735 1.15 tsutsui mmmax = mm + sizeof(zx_mmo) / sizeof(zx_mmo[0]);
736 1.1 ad
737 1.15 tsutsui for (; mm < mmmax; mm++)
738 1.1 ad if (off >= mm->mo_va && off < mm->mo_va + mm->mo_size) {
739 1.1 ad off = off - mm->mo_va + mm->mo_pa;
740 1.1 ad return (bus_space_mmap(sc->sc_bt, sc->sc_paddr,
741 1.1 ad off, prot, BUS_SPACE_MAP_LINEAR));
742 1.1 ad }
743 1.1 ad
744 1.1 ad return (-1);
745 1.1 ad }
746 1.1 ad
747 1.1 ad void
748 1.1 ad zx_fillrect(struct rasops_info *ri, int x, int y, int w, int h, long attr,
749 1.1 ad int rop)
750 1.1 ad {
751 1.1 ad struct zx_softc *sc;
752 1.1 ad int fg, bg;
753 1.1 ad
754 1.1 ad sc = ri->ri_hw;
755 1.1 ad
756 1.1 ad rasops_unpack_attr(attr, &fg, &bg, NULL);
757 1.1 ad x = x * sc->sc_fontw + ri->ri_xorigin;
758 1.1 ad y = y * sc->sc_fonth + ri->ri_yorigin;
759 1.1 ad w = sc->sc_fontw * w - 1;
760 1.1 ad h = sc->sc_fonth * h - 1;
761 1.1 ad
762 1.25 tsutsui while ((bus_space_read_4(sc->sc_bt, sc->sc_bhzc, zc_csr) &
763 1.25 tsutsui ZX_CSR_BLT_BUSY) != 0)
764 1.1 ad ;
765 1.1 ad
766 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_rop, rop);
767 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_fg,
768 1.25 tsutsui (bg & 7) ? 0x00000000 : 0xff000000);
769 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_extent, w | (h << 11));
770 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_fill,
771 1.25 tsutsui x | (y << 11) | 0x80000000);
772 1.1 ad }
773 1.1 ad
774 1.1 ad void
775 1.1 ad zx_copyrect(struct rasops_info *ri, int sx, int sy, int dx, int dy, int w,
776 1.1 ad int h)
777 1.1 ad {
778 1.1 ad struct zx_softc *sc;
779 1.1 ad int dir;
780 1.1 ad
781 1.1 ad sc = ri->ri_hw;
782 1.1 ad
783 1.1 ad sx = sx * sc->sc_fontw + ri->ri_xorigin;
784 1.1 ad sy = sy * sc->sc_fonth + ri->ri_yorigin;
785 1.1 ad dx = dx * sc->sc_fontw + ri->ri_xorigin;
786 1.1 ad dy = dy * sc->sc_fonth + ri->ri_yorigin;
787 1.1 ad w = w * sc->sc_fontw - 1;
788 1.1 ad h = h * sc->sc_fonth - 1;
789 1.1 ad
790 1.1 ad if (sy < dy || sx < dx) {
791 1.1 ad dir = 0x80000000;
792 1.1 ad sx += w;
793 1.1 ad sy += h;
794 1.1 ad dx += w;
795 1.1 ad dy += h;
796 1.1 ad } else
797 1.1 ad dir = 0;
798 1.1 ad
799 1.25 tsutsui while ((bus_space_read_4(sc->sc_bt, sc->sc_bhzc, zc_csr) &
800 1.25 tsutsui ZX_CSR_BLT_BUSY) != 0)
801 1.1 ad ;
802 1.1 ad
803 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_rop, ZX_STD_ROP);
804 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_extent,
805 1.25 tsutsui w | (h << 11) | dir);
806 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_src, sx | (sy << 11));
807 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_copy, dx | (dy << 11));
808 1.1 ad }
809 1.1 ad
810 1.1 ad void
811 1.1 ad zx_do_cursor(struct rasops_info *ri)
812 1.1 ad {
813 1.1 ad
814 1.1 ad zx_fillrect(ri, ri->ri_ccol, ri->ri_crow, 1, 1, 0,
815 1.1 ad ZX_ROP_NEW_XOR_OLD | ZX_ATTR_WE_ENABLE | ZX_ATTR_OE_ENABLE |
816 1.1 ad ZX_ATTR_FORCE_WID);
817 1.1 ad }
818 1.1 ad
819 1.1 ad void
820 1.1 ad zx_erasecols(void *cookie, int row, int col, int num, long attr)
821 1.1 ad {
822 1.1 ad struct rasops_info *ri;
823 1.1 ad
824 1.1 ad ri = (struct rasops_info *)cookie;
825 1.1 ad
826 1.1 ad zx_fillrect(ri, col, row, num, 1, attr, ZX_STD_ROP);
827 1.1 ad }
828 1.1 ad
829 1.1 ad void
830 1.1 ad zx_eraserows(void *cookie, int row, int num, long attr)
831 1.1 ad {
832 1.1 ad struct rasops_info *ri;
833 1.1 ad
834 1.1 ad ri = (struct rasops_info *)cookie;
835 1.1 ad
836 1.1 ad zx_fillrect(ri, 0, row, ri->ri_cols, num, attr, ZX_STD_ROP);
837 1.1 ad }
838 1.1 ad
839 1.1 ad void
840 1.1 ad zx_copyrows(void *cookie, int src, int dst, int num)
841 1.1 ad {
842 1.1 ad struct rasops_info *ri;
843 1.1 ad
844 1.1 ad ri = (struct rasops_info *)cookie;
845 1.1 ad
846 1.1 ad zx_copyrect(ri, 0, src, 0, dst, ri->ri_cols, num);
847 1.1 ad }
848 1.1 ad
849 1.1 ad void
850 1.1 ad zx_copycols(void *cookie, int row, int src, int dst, int num)
851 1.1 ad {
852 1.1 ad struct rasops_info *ri;
853 1.1 ad
854 1.1 ad ri = (struct rasops_info *)cookie;
855 1.1 ad
856 1.1 ad zx_copyrect(ri, src, row, dst, row, num, 1);
857 1.1 ad }
858 1.1 ad
859 1.1 ad void
860 1.1 ad zx_putchar(void *cookie, int row, int col, u_int uc, long attr)
861 1.1 ad {
862 1.1 ad struct rasops_info *ri;
863 1.1 ad struct zx_softc *sc;
864 1.1 ad struct wsdisplay_font *font;
865 1.1 ad volatile u_int32_t *dp;
866 1.1 ad u_int8_t *fb;
867 1.1 ad int fs, i, fg, bg, ul;
868 1.1 ad
869 1.1 ad ri = (struct rasops_info *)cookie;
870 1.1 ad
871 1.1 ad if (uc == ' ') {
872 1.1 ad zx_fillrect(ri, col, row, 1, 1, attr, ZX_STD_ROP);
873 1.1 ad return;
874 1.1 ad }
875 1.1 ad
876 1.1 ad sc = (struct zx_softc *)ri->ri_hw;
877 1.1 ad font = ri->ri_font;
878 1.1 ad
879 1.1 ad dp = (volatile u_int32_t *)sc->sc_pixels +
880 1.1 ad ((row * sc->sc_fonth + ri->ri_yorigin) << 11) +
881 1.1 ad (col * sc->sc_fontw + ri->ri_xorigin);
882 1.1 ad fb = (u_int8_t *)font->data + (uc - font->firstchar) *
883 1.1 ad ri->ri_fontscale;
884 1.1 ad fs = font->stride;
885 1.1 ad rasops_unpack_attr(attr, &fg, &bg, &ul);
886 1.1 ad
887 1.25 tsutsui while ((bus_space_read_4(sc->sc_bt, sc->sc_bhzc, zc_csr) &
888 1.25 tsutsui ZX_CSR_BLT_BUSY) != 0)
889 1.1 ad ;
890 1.1 ad
891 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_rop, ZX_STD_ROP);
892 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_fg,
893 1.25 tsutsui (fg & 7) ? 0x00000000 : 0xff000000);
894 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzdss0, zd_bg,
895 1.25 tsutsui (bg & 7) ? 0x00000000 : 0xff000000);
896 1.25 tsutsui bus_space_write_4(sc->sc_bt, sc->sc_bhzc, zc_fontmsk,
897 1.25 tsutsui 0xffffffff << (32 - sc->sc_fontw));
898 1.1 ad
899 1.1 ad if (sc->sc_fontw <= 8) {
900 1.1 ad for (i = sc->sc_fonth; i != 0; i--, dp += 2048) {
901 1.1 ad *dp = *fb << 24;
902 1.1 ad fb += fs;
903 1.1 ad }
904 1.1 ad } else {
905 1.1 ad for (i = sc->sc_fonth; i != 0; i--, dp += 2048) {
906 1.1 ad *dp = *((u_int16_t *)fb) << 16;
907 1.1 ad fb += fs;
908 1.1 ad }
909 1.1 ad }
910 1.1 ad
911 1.1 ad if (ul) {
912 1.1 ad dp -= 4096;
913 1.1 ad *dp = 0xffffffff;
914 1.1 ad }
915 1.1 ad }
916