xref: /netbsd-src/sys/arch/next68k/dev/nextdisplay.c (revision 53b02e147d4ed531c0d2a5ca9b3e8026ba3e99b5)
1 /* $NetBSD: nextdisplay.c,v 1.25 2021/08/07 16:19:01 thorpej Exp $ */
2 
3 /*
4  * Copyright (c) 1998 Matt DeBergalis
5  * 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  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *      This product includes software developed by Matt DeBergalis
18  * 4. The name of the author may not be used to endorse or promote products
19  *    derived from this software without specific prior written permission
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31  */
32 
33 #include <sys/cdefs.h>
34 __KERNEL_RCSID(0, "$NetBSD: nextdisplay.c,v 1.25 2021/08/07 16:19:01 thorpej Exp $");
35 
36 #include <sys/cdefs.h>			/* RCS ID & Copyright macro defns */
37 
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/kernel.h>
41 #include <sys/device.h>
42 #include <sys/kmem.h>
43 
44 #include <machine/bus.h>
45 #include <machine/cpu.h>
46 
47 #include <next68k/next68k/nextrom.h>
48 #include <next68k/next68k/isr.h>
49 
50 #include <next68k/dev/intiovar.h>
51 #include <next68k/dev/nextdisplayvar.h>
52 #include <dev/wscons/wsconsio.h>
53 
54 #include <dev/rcons/raster.h>
55 #include <dev/wscons/wscons_raster.h>
56 #include <dev/wscons/wsdisplayvar.h>
57 
58 extern int turbo;
59 
60 int nextdisplay_match(device_t, cfdata_t, void *);
61 void nextdisplay_attach(device_t, device_t, void *);
62 
63 CFATTACH_DECL_NEW(nextdisplay, sizeof(struct nextdisplay_softc),
64     nextdisplay_match, nextdisplay_attach, NULL, NULL);
65 
66 const struct wsdisplay_emulops nextdisplay_mono_emulops = {
67 	rcons_cursor,
68 	rcons_mapchar,
69 	rcons_putchar,
70 	rcons_copycols,
71 	rcons_erasecols,
72 	rcons_copyrows,
73 	rcons_eraserows,
74 	rcons_allocattr
75 };
76 
77 struct wsscreen_descr nextdisplay_mono = {
78 	"mono",
79 	0, 0, /* will be filled in -- XXX shouldn't, it's global */
80 	&nextdisplay_mono_emulops,
81 	0, 0
82 };
83 
84 struct wsscreen_descr nextdisplay_color = {
85         "color",
86         0, 0, /* again, filled in */
87         &nextdisplay_mono_emulops,
88         0, 0
89 };
90 
91 const struct wsscreen_descr *_nextdisplay_scrlist_mono[] = {
92 	&nextdisplay_mono,
93 };
94 
95 const struct wsscreen_descr *_nextdisplay_scrlist_color[] = {
96         &nextdisplay_color,
97 };
98 
99 const struct wsscreen_list nextdisplay_screenlist_mono = {
100 	sizeof(_nextdisplay_scrlist_mono) / sizeof(struct wsscreen_descr *),
101 	_nextdisplay_scrlist_mono
102 };
103 
104 const struct wsscreen_list nextdisplay_screenlist_color = {
105 	sizeof(_nextdisplay_scrlist_color) / sizeof(struct wsscreen_descr *),
106 	_nextdisplay_scrlist_color
107 };
108 
109 static int	nextdisplay_ioctl(void *, void *, u_long, void *, int,
110 		    struct lwp *);
111 static paddr_t	nextdisplay_mmap(void *, void *, off_t, int);
112 static int	nextdisplay_alloc_screen(void *, const struct wsscreen_descr *,
113 		void **, int *, int *, long *);
114 static void	nextdisplay_free_screen(void *, void *);
115 static int	nextdisplay_show_screen(void *, void *, int,
116 					void (*) (void *, int, int), void *);
117 static int	nextdisplay_load_font(void *, void *, struct wsdisplay_font *);
118 
119 const struct wsdisplay_accessops nextdisplay_accessops = {
120 	nextdisplay_ioctl,
121 	nextdisplay_mmap,
122 	nextdisplay_alloc_screen,
123 	nextdisplay_free_screen,
124 	nextdisplay_show_screen,
125 	nextdisplay_load_font
126 };
127 
128 void nextdisplay_init(struct nextdisplay_config *, int);
129 int nextdisplay_intr(void *);
130 
131 vaddr_t nextdisplay_consaddr;
132 static int nextdisplay_is_console(vaddr_t);
133 
134 static struct nextdisplay_config nextdisplay_console_dc;
135 
136 static int
137 nextdisplay_is_console(vaddr_t addr)
138 {
139 	return (nextdisplay_console_dc.isconsole
140 			&& (addr == nextdisplay_consaddr));
141 }
142 
143 int
144 nextdisplay_match(device_t parent, cfdata_t match, void *aux)
145 {
146 	if (rom_machine_type == NeXT_WARP9 ||
147 	    rom_machine_type == NeXT_X15 ||
148 	    rom_machine_type == NeXT_WARP9C ||
149 	    rom_machine_type == NeXT_TURBO_MONO ||
150 	    rom_machine_type == NeXT_TURBO_COLOR)
151 		return (1);
152 	else
153 		return (0);
154 }
155 
156 void
157 nextdisplay_init(struct nextdisplay_config *dc, int color)
158 {
159 	struct raster *rap;
160 	struct rcons *rcp;
161 	int i;
162 
163 	/* printf("in nextdisplay_init\n"); */
164 
165 	if (color) {
166 		dc->dc_vaddr = colorbase;
167 		dc->dc_paddr = COLORBASE;
168 		dc->dc_size = NEXT_P_C16_VIDEOSIZE;
169 	} else {
170 		dc->dc_vaddr = monobase;
171 		dc->dc_paddr = MONOBASE;
172 		dc->dc_size = NEXT_P_VIDEOSIZE;
173 	}
174 
175 	dc->dc_wid = 1120;
176 	dc->dc_ht = 832;
177 	dc->dc_depth = color ? 16 : 2;
178 	dc->dc_rowbytes = (turbo ? 1120 : 1152) * dc->dc_depth / 8;
179 
180 	dc->dc_videobase = dc->dc_vaddr;
181 
182 #if 0
183 	printf("intiobase at: %08x\n", intiobase);
184 	printf("intiolimit at: %08x\n", intiolimit);
185 	printf("videobase at: %08x\n", color ? colorbase : monobase);
186 	printf("videolimit at: %08x\n", color ? colorlimit : monolimit);
187 
188 	printf("virtual fb at: %08x\n", dc->dc_vaddr);
189 	printf("physical fb at: %08x\n", dc->dc_paddr);
190 	printf("fb size: %08x\n", dc->dc_size);
191 
192 	printf("dc_wid: %08x\n", dc->dc_wid);
193 	printf("dc_ht: %08x\n", dc->dc_ht);
194 	printf("dc_depth: %08x\n", dc->dc_depth);
195 	printf("dc_rowbytes: %08x\n", dc->dc_rowbytes);
196 	printf("dc_videobase: %08x\n", dc->dc_videobase);
197 #endif
198 
199 	/* clear the screen */
200 	for (i = 0; i < dc->dc_ht * dc->dc_rowbytes; i += sizeof(u_int32_t))
201 		*(u_int32_t *)(dc->dc_videobase + i) =
202 			(color ? 0x0 : 0xffffffff);
203 
204 	rap = &dc->dc_raster;
205 	rap->width = dc->dc_wid;
206 	rap->height = dc->dc_ht;
207 	rap->depth = color ? 16 : 2;
208 	rap->linelongs = dc->dc_rowbytes / sizeof(u_int32_t);
209 	rap->pixels = (u_int32_t *)dc->dc_videobase;
210 
211 	/* initialize the raster console blitter */
212 	rcp = &dc->dc_rcons;
213 	rcp->rc_sp = rap;
214 	rcp->rc_crow = rcp->rc_ccol = -1;
215 	rcp->rc_crowp = &rcp->rc_crow;
216 	rcp->rc_ccolp = &rcp->rc_ccol;
217 	rcons_init(rcp, 34, 80);
218 
219 	if (color) {
220 		nextdisplay_color.nrows = dc->dc_rcons.rc_maxrow;
221 		nextdisplay_color.ncols = dc->dc_rcons.rc_maxcol;
222 	} else {
223 		nextdisplay_mono.nrows = dc->dc_rcons.rc_maxrow;
224 		nextdisplay_mono.ncols = dc->dc_rcons.rc_maxcol;
225 	}
226 }
227 
228 void
229 nextdisplay_attach(device_t parent, device_t self, void *aux)
230 {
231 	struct nextdisplay_softc *sc = device_private(self);
232 	struct wsemuldisplaydev_attach_args waa;
233 	int isconsole;
234 	int iscolor;
235 	paddr_t addr;
236 
237 	sc->sc_dev = self;
238 
239 	if (rom_machine_type == NeXT_WARP9C ||
240 	    rom_machine_type == NeXT_TURBO_COLOR) {
241 		iscolor = 1;
242 		addr = colorbase;
243 	} else {
244 		iscolor = 0;
245 		addr = monobase;
246 	}
247 
248 	isconsole = nextdisplay_is_console(addr);
249 
250 	if (isconsole) {
251 		sc->sc_dc = &nextdisplay_console_dc;
252 		sc->nscreens = 1;
253 	} else {
254 		sc->sc_dc = kmem_alloc(sizeof(struct nextdisplay_config),
255 		    KM_SLEEP);
256 		nextdisplay_init(sc->sc_dc, iscolor);
257 	}
258 
259 	printf(": %d x %d, %dbpp\n", sc->sc_dc->dc_wid, sc->sc_dc->dc_ht,
260 	       sc->sc_dc->dc_depth);
261 
262 	if (iscolor) {
263 #if 0
264 		uint8_t x;
265 
266 		x = *(volatile uint8_t *)IIOV(NEXT_P_C16_CMD_REG);
267 		aprint_debug_dev(sc->sc_dev, "cmd=%02x\n", x);
268 #endif
269 		*(volatile uint8_t *)IIOV(NEXT_P_C16_CMD_REG) = 0x05;
270 		isrlink_autovec(nextdisplay_intr, sc, NEXT_I_IPL(NEXT_I_C16_VIDEO), 1, NULL);
271 		INTR_ENABLE(NEXT_I_C16_VIDEO);
272 	}
273 
274 	/* initialize the raster */
275 	waa.console = isconsole;
276 	waa.scrdata = iscolor ? &nextdisplay_screenlist_color : &nextdisplay_screenlist_mono;
277 	waa.accessops = &nextdisplay_accessops;
278 	waa.accesscookie = sc;
279 #if 0
280 	printf("nextdisplay: access cookie is %p\n", sc);
281 #endif
282 	config_found(self, &waa, wsemuldisplaydevprint, CFARGS_NONE);
283 }
284 
285 int
286 nextdisplay_intr(void *arg)
287 {
288 #if 0
289 	uint8_t x;
290 #endif
291 
292 	if (!INTR_OCCURRED(NEXT_I_C16_VIDEO))
293 		return (0);
294 #if 0
295 	x = *(volatile uint8_t *)IIOV(NEXT_P_C16_CMD_REG);
296 	printf("I%02x", x);
297 #endif
298 	*(volatile uint8_t *)IIOV(NEXT_P_C16_CMD_REG) = 0x05;
299 	return (1);
300 }
301 
302 int
303 nextdisplay_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
304 	struct lwp *l)
305 {
306 	struct nextdisplay_softc *sc = v;
307 	struct nextdisplay_config *dc = sc->sc_dc;
308 
309 	switch (cmd) {
310 	case WSDISPLAYIO_GTYPE:
311 		*(int *)data = dc->dc_type;
312 		return 0;
313 
314 	case WSDISPLAYIO_SCURSOR:
315 		printf("nextdisplay_ioctl: wsdisplayio_scursor\n");
316 		return EPASSTHROUGH;
317 
318 	case WSDISPLAYIO_SCURPOS:
319 		printf("nextdisplay_ioctl: wsdisplayio_scurpos\n");
320 		return EPASSTHROUGH;
321 
322 	case WSDISPLAYIO_GINFO:
323 	case WSDISPLAYIO_GETCMAP:
324 	case WSDISPLAYIO_PUTCMAP:
325 	case WSDISPLAYIO_GVIDEO:
326 	case WSDISPLAYIO_SVIDEO:
327 	case WSDISPLAYIO_GCURPOS:
328 	case WSDISPLAYIO_GCURMAX:
329 	case WSDISPLAYIO_GCURSOR:
330 		printf("nextdisplay_ioctl: listed but unsupported ioctl\n");
331 		return EPASSTHROUGH;
332 	}
333 
334 	return EPASSTHROUGH;
335 }
336 
337 static paddr_t
338 nextdisplay_mmap(void *v, void *vs, off_t offset, int prot)
339 {
340 
341 	/* XXX */
342 	printf("nextdisplay_mmap: failed\n");
343 	return -1;
344 }
345 
346 int
347 nextdisplay_alloc_screen(void *v, const struct wsscreen_descr *type,
348     void **cookiep, int *curxp, int *curyp, long *defattrp)
349 {
350 	struct nextdisplay_softc *sc = v;
351 	long defattr;
352 
353 	/* only allow one screen */
354 	if (sc->nscreens > 0)
355 		return (ENOMEM);
356 
357 	*cookiep = &sc->sc_dc->dc_rcons; /* one and only for now */
358 	*curxp = 0;
359 	*curyp = 0;
360 	rcons_allocattr(&sc->sc_dc->dc_rcons, 0, 0,
361 			(strcmp(type->name, "color") == 0)
362 			? 0
363 			: WSATTR_REVERSE, &defattr);
364 	*defattrp = defattr;
365 	sc->nscreens++;
366 #if 0
367 	printf("nextdisplay: allocating screen\n");
368 #endif
369 	return (0);
370 }
371 
372 void
373 nextdisplay_free_screen(void *v, void *cookie)
374 {
375 	struct nextdisplay_softc *sc = v;
376 
377 	if (sc->sc_dc == &nextdisplay_console_dc)
378 		panic("nextdisplay_free_screen: console");
379 
380 	sc->nscreens--;
381 }
382 
383 int
384 nextdisplay_show_screen(void *v, void *cookie, int waitok,
385     void (*cb)(void *, int, int), void *cbarg)
386 {
387 
388 	return (0);
389 }
390 
391 static int
392 nextdisplay_load_font(void *v, void *cookie, struct wsdisplay_font *font)
393 {
394 	return (EPASSTHROUGH);
395 }
396 
397 int
398 nextdisplay_cnattach(void)
399 {
400 	struct nextdisplay_config *dc = &nextdisplay_console_dc;
401 	long defattr;
402 	int iscolor;
403 
404 	if (rom_machine_type == NeXT_WARP9C ||
405 	    rom_machine_type == NeXT_TURBO_COLOR)
406 		iscolor = 1;
407 	else
408 		iscolor = 0;
409 
410 	/* set up the display */
411 	nextdisplay_init(&nextdisplay_console_dc, iscolor);
412 	nextdisplay_consaddr = nextdisplay_console_dc.dc_vaddr;
413 
414 	rcons_allocattr(&dc->dc_rcons, 0, 0,
415 			iscolor ? 0 : WSATTR_REVERSE, &defattr);
416 
417 	wsdisplay_cnattach(iscolor ? &nextdisplay_color : &nextdisplay_mono,
418 			   &dc->dc_rcons, 0, 0, defattr);
419 
420 	dc->isconsole = 1;
421 	return (0);
422 }
423