nextdisplay.c revision 1.26 1 /* $NetBSD: nextdisplay.c,v 1.26 2023/02/03 23:13:00 tsutsui 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.26 2023/02/03 23:13:00 tsutsui 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 *(uint32_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 = (uint32_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,
271 NEXT_I_IPL(NEXT_I_C16_VIDEO), 1, NULL);
272 INTR_ENABLE(NEXT_I_C16_VIDEO);
273 }
274
275 /* initialize the raster */
276 waa.console = isconsole;
277 waa.scrdata = iscolor ?
278 &nextdisplay_screenlist_color : &nextdisplay_screenlist_mono;
279 waa.accessops = &nextdisplay_accessops;
280 waa.accesscookie = sc;
281 #if 0
282 printf("nextdisplay: access cookie is %p\n", sc);
283 #endif
284 config_found(self, &waa, wsemuldisplaydevprint, CFARGS_NONE);
285 }
286
287 int
288 nextdisplay_intr(void *arg)
289 {
290 #if 0
291 uint8_t x;
292 #endif
293
294 if (!INTR_OCCURRED(NEXT_I_C16_VIDEO))
295 return 0;
296 #if 0
297 x = *(volatile uint8_t *)IIOV(NEXT_P_C16_CMD_REG);
298 printf("I%02x", x);
299 #endif
300 *(volatile uint8_t *)IIOV(NEXT_P_C16_CMD_REG) = 0x05;
301 return 1;
302 }
303
304 int
305 nextdisplay_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
306 struct lwp *l)
307 {
308 struct nextdisplay_softc *sc = v;
309 struct nextdisplay_config *dc = sc->sc_dc;
310
311 switch (cmd) {
312 case WSDISPLAYIO_GTYPE:
313 *(int *)data = dc->dc_type;
314 return 0;
315
316 case WSDISPLAYIO_SCURSOR:
317 printf("nextdisplay_ioctl: wsdisplayio_scursor\n");
318 return EPASSTHROUGH;
319
320 case WSDISPLAYIO_SCURPOS:
321 printf("nextdisplay_ioctl: wsdisplayio_scurpos\n");
322 return EPASSTHROUGH;
323
324 case WSDISPLAYIO_GINFO:
325 case WSDISPLAYIO_GETCMAP:
326 case WSDISPLAYIO_PUTCMAP:
327 case WSDISPLAYIO_GVIDEO:
328 case WSDISPLAYIO_SVIDEO:
329 case WSDISPLAYIO_GCURPOS:
330 case WSDISPLAYIO_GCURMAX:
331 case WSDISPLAYIO_GCURSOR:
332 printf("nextdisplay_ioctl: listed but unsupported ioctl\n");
333 return EPASSTHROUGH;
334 }
335
336 return EPASSTHROUGH;
337 }
338
339 static paddr_t
340 nextdisplay_mmap(void *v, void *vs, off_t offset, int prot)
341 {
342
343 /* XXX */
344 printf("nextdisplay_mmap: failed\n");
345 return -1;
346 }
347
348 int
349 nextdisplay_alloc_screen(void *v, const struct wsscreen_descr *type,
350 void **cookiep, int *curxp, int *curyp, long *defattrp)
351 {
352 struct nextdisplay_softc *sc = v;
353 long defattr;
354
355 /* only allow one screen */
356 if (sc->nscreens > 0)
357 return ENOMEM;
358
359 *cookiep = &sc->sc_dc->dc_rcons; /* one and only for now */
360 *curxp = 0;
361 *curyp = 0;
362 rcons_allocattr(&sc->sc_dc->dc_rcons, 0, 0,
363 (strcmp(type->name, "color") == 0) ? 0 : 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
395 return EPASSTHROUGH;
396 }
397
398 int
399 nextdisplay_cnattach(void)
400 {
401 struct nextdisplay_config *dc = &nextdisplay_console_dc;
402 long defattr;
403 int iscolor;
404
405 if (rom_machine_type == NeXT_WARP9C ||
406 rom_machine_type == NeXT_TURBO_COLOR)
407 iscolor = 1;
408 else
409 iscolor = 0;
410
411 /* set up the display */
412 nextdisplay_init(&nextdisplay_console_dc, iscolor);
413 nextdisplay_consaddr = nextdisplay_console_dc.dc_vaddr;
414
415 rcons_allocattr(&dc->dc_rcons, 0, 0,
416 iscolor ? 0 : WSATTR_REVERSE, &defattr);
417
418 wsdisplay_cnattach(iscolor ? &nextdisplay_color : &nextdisplay_mono,
419 &dc->dc_rcons, 0, 0, defattr);
420
421 dc->isconsole = 1;
422 return 0;
423 }
424