1 /* $NetBSD: w100.c,v 1.4 2021/11/20 00:17:10 rin Exp $ */
2 /*
3 * Copyright (c) 2002, 2003 Genetec Corporation. All rights reserved.
4 * Written by Hiroyuki Bessho for Genetec Corporation.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. The name of Genetec Corporation may not be used to endorse or
15 * promote products derived from this software without specific prior
16 * written permission.
17 *
18 * THIS SOFTWARE IS PROVIDED BY GENETEC CORPORATION ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
20 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
21 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL GENETEC CORPORATION
22 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28 * POSSIBILITY OF SUCH DAMAGE.
29 */
30 #include <sys/cdefs.h>
31 __KERNEL_RCSID(0, "$NetBSD: w100.c,v 1.4 2021/11/20 00:17:10 rin Exp $");
32
33 #include <sys/param.h>
34 #include <sys/systm.h>
35 #include <sys/conf.h>
36 #include <sys/uio.h>
37 #include <sys/kmem.h>
38 #include <sys/kernel.h> /* for cold */
39
40 #include <uvm/uvm_extern.h>
41
42 #include <dev/cons.h>
43 #include <dev/wscons/wsconsio.h>
44 #include <dev/wscons/wsdisplayvar.h>
45 #include <dev/wscons/wscons_callbacks.h>
46 #include <dev/rasops/rasops.h>
47 #include <dev/wsfont/wsfont.h>
48
49 #include <sys/bus.h>
50 #include <machine/cpu.h>
51 #include <arm/cpufunc.h>
52
53 #include <zaurus/dev/w100reg.h>
54 #include <zaurus/dev/w100var.h>
55
56 #include "wsdisplay.h"
57
58 /* Console */
59 struct {
60 int is_console;
61 struct w100_wsscreen_descr *descr;
62 const struct w100_panel_geometry *geom;
63 } w100_console;
64
65 static void w100_initialize(struct w100_softc *sc,
66 const struct w100_panel_geometry *geom);
67 static int w100_new_screen(struct w100_softc *sc, int depth,
68 struct w100_screen **scrpp);
69 static void w100_lcd_geometry(struct w100_softc *sc,
70 const struct w100_panel_geometry *geom);
71 #if NWSDISPLAY > 0
72 static void w100_setup_rasops(struct w100_softc *sc,
73 struct rasops_info *rinfo,
74 struct w100_wsscreen_descr *descr,
75 const struct w100_panel_geometry *geom);
76 #endif
77
78 #define w100_reg_write(sc, offset, value) \
79 bus_space_write_4((sc)->iot, (sc)->ioh_reg, offset, value)
80
81 static void
w100_lcd_geometry(struct w100_softc * sc,const struct w100_panel_geometry * geom)82 w100_lcd_geometry(struct w100_softc *sc,
83 const struct w100_panel_geometry *geom)
84 {
85
86 sc->geometry = geom;
87 switch (geom->rotate) {
88 case W100_PANEL_ROTATE_CW:
89 sc->display_width = geom->panel_height;
90 sc->display_height = geom->panel_width;
91 w100_reg_write(sc, W100_REG_PCLK_CTRL, 0x00000061);
92 w100_reg_write(sc, W100_REG_GRAPHIC_CTRL, 0x00de1d0e);
93 w100_reg_write(sc, W100_REG_GRAPHIC_OFFSET, 0x00895b00);
94 w100_reg_write(sc, W100_REG_GRAPHIC_PITCH, 0x00000500);
95 break;
96 case W100_PANEL_ROTATE_CCW:
97 sc->display_width = geom->panel_height;
98 sc->display_height = geom->panel_width;
99 w100_reg_write(sc, W100_REG_PCLK_CTRL, 0x00000061);
100 w100_reg_write(sc, W100_REG_GRAPHIC_CTRL, 0x00de1d16);
101 w100_reg_write(sc, W100_REG_GRAPHIC_OFFSET, 0x008004fc);
102 w100_reg_write(sc, W100_REG_GRAPHIC_PITCH, 0x00000500);
103 break;
104 case W100_PANEL_ROTATE_UD:
105 sc->display_width = geom->panel_width;
106 sc->display_height = geom->panel_height;
107 w100_reg_write(sc, W100_REG_PCLK_CTRL, 0x00000021);
108 w100_reg_write(sc, W100_REG_GRAPHIC_CTRL, 0x00ded7e);
109 w100_reg_write(sc, W100_REG_GRAPHIC_OFFSET, 0x00895ffc);
110 w100_reg_write(sc, W100_REG_GRAPHIC_PITCH, 0x000003c0);
111 break;
112 default:
113 sc->display_width = geom->panel_width;
114 sc->display_height = geom->panel_height;
115 w100_reg_write(sc, W100_REG_PCLK_CTRL, 0x00000021);
116 w100_reg_write(sc, W100_REG_GRAPHIC_CTRL, 0x00de1d66);
117 w100_reg_write(sc, W100_REG_GRAPHIC_OFFSET, 0x00800000);
118 w100_reg_write(sc, W100_REG_GRAPHIC_PITCH, 0x000003c0);
119 break;
120 }
121 w100_reg_write(sc, W100_REG_DISP_DB_BUF_CTRL, 0x0000007b);
122 }
123
124 /*
125 * Initialize the LCD controller.
126 */
127 static void
w100_initialize(struct w100_softc * sc,const struct w100_panel_geometry * geom)128 w100_initialize(struct w100_softc *sc, const struct w100_panel_geometry *geom)
129 {
130
131 w100_lcd_geometry(sc, geom);
132 }
133
134
135 /*
136 * Common driver attachment code.
137 */
138 void
w100_attach_subr(struct w100_softc * sc,bus_space_tag_t iot,const struct w100_panel_geometry * geom)139 w100_attach_subr(struct w100_softc *sc, bus_space_tag_t iot,
140 const struct w100_panel_geometry *geom)
141 {
142 bus_space_handle_t ioh_cfg, ioh_reg, ioh_vram;
143 int error;
144
145 aprint_normal(": ATI Imageon100 LCD controller\n");
146 aprint_naive("\n");
147
148 sc->n_screens = 0;
149 LIST_INIT(&sc->screens);
150
151 /* config handler */
152 error = bus_space_map(iot, W100_CFG_ADDRESS, W100_CFG_SIZE, 0,
153 &ioh_cfg);
154 if (error) {
155 aprint_error_dev(sc->dev,
156 "failed to map config (errorno=%d)\n", error);
157 return;
158 }
159
160 /* register handler */
161 error = bus_space_map(iot, W100_REG_ADDRESS, W100_REG_SIZE, 0,
162 &ioh_reg);
163 if (error) {
164 aprint_error_dev(sc->dev,
165 "failed to map register (errorno=%d)\n", error);
166 return;
167 }
168
169 /* videomem handler */
170 error = bus_space_map(iot, W100_EXTMEM_ADDRESS, W100_EXTMEM_SIZE, 0,
171 &ioh_vram);
172 if (error) {
173 aprint_error_dev(sc->dev,
174 "failed to vram register (errorno=%d)\n", error);
175 return;
176 }
177
178 sc->iot = iot;
179 sc->ioh_cfg = ioh_cfg;
180 sc->ioh_reg = ioh_reg;
181 sc->ioh_vram = ioh_vram;
182
183 w100_initialize(sc, geom);
184
185 #if NWSDISPLAY > 0
186 if (w100_console.is_console) {
187 struct w100_wsscreen_descr *descr = w100_console.descr;
188 struct w100_screen *scr;
189 struct rasops_info *ri;
190 long defattr;
191
192 error = w100_new_screen(sc, descr->depth, &scr);
193 if (error) {
194 aprint_error_dev(sc->dev,
195 "unable to create new screen (errno=%d)", error);
196 return;
197 }
198
199 ri = &scr->rinfo;
200 ri->ri_hw = (void *)scr;
201 ri->ri_bits = scr->buf_va;
202 w100_setup_rasops(sc, ri, descr, geom);
203
204 /* assumes 16 bpp */
205 (*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr);
206
207 sc->active = scr;
208
209 wsdisplay_cnattach(&descr->c, ri, ri->ri_ccol, ri->ri_crow,
210 defattr);
211
212 aprint_normal_dev(sc->dev, "console\n");
213 }
214 #endif
215 }
216
217 int
w100_cnattach(struct w100_wsscreen_descr * descr,const struct w100_panel_geometry * geom)218 w100_cnattach(struct w100_wsscreen_descr *descr,
219 const struct w100_panel_geometry *geom)
220 {
221
222 w100_console.descr = descr;
223 w100_console.geom = geom;
224 w100_console.is_console = 1;
225
226 return 0;
227 }
228
229 /*
230 * Create and initialize a new screen buffer.
231 */
232 static int
w100_new_screen(struct w100_softc * sc,int depth,struct w100_screen ** scrpp)233 w100_new_screen(struct w100_softc *sc, int depth, struct w100_screen **scrpp)
234 {
235 struct w100_screen *scr = NULL;
236 int error = 0;
237
238 scr = kmem_zalloc(sizeof(*scr), KM_SLEEP);
239 scr->buf_va = (u_char *)bus_space_vaddr(sc->iot, sc->ioh_vram);
240 scr->depth = depth;
241
242 LIST_INSERT_HEAD(&sc->screens, scr, link);
243 sc->n_screens++;
244
245 *scrpp = scr;
246
247 return error;
248 }
249
250 #if NWSDISPLAY > 0
251 /*
252 * Initialize rasops for a screen, as well as struct wsscreen_descr if this
253 * is the first screen creation.
254 */
255 static void
w100_setup_rasops(struct w100_softc * sc,struct rasops_info * rinfo,struct w100_wsscreen_descr * descr,const struct w100_panel_geometry * geom)256 w100_setup_rasops(struct w100_softc *sc, struct rasops_info *rinfo,
257 struct w100_wsscreen_descr *descr, const struct w100_panel_geometry *geom)
258 {
259
260 rinfo->ri_flg = descr->flags | RI_CLEAR | RI_ENABLE_ALPHA;
261 rinfo->ri_depth = descr->depth;
262 rinfo->ri_width = sc->display_width;
263 rinfo->ri_height = sc->display_height;
264 rinfo->ri_stride = rinfo->ri_width * rinfo->ri_depth / 8;
265 #ifdef notyet
266 rinfo->ri_wsfcookie = -1; /* XXX */
267 #endif
268
269 /* swap B and R */
270 if (descr->depth == 16) {
271 rinfo->ri_rnum = 5;
272 rinfo->ri_rpos = 11;
273 rinfo->ri_gnum = 6;
274 rinfo->ri_gpos = 5;
275 rinfo->ri_bnum = 5;
276 rinfo->ri_bpos = 0;
277 }
278
279 if (descr->c.nrows == 0) {
280 /* get rasops to compute screen size the first time */
281 rasops_init(rinfo, 100, 100);
282 } else {
283 rasops_init(rinfo, descr->c.nrows, descr->c.ncols);
284 }
285
286 descr->c.nrows = rinfo->ri_rows;
287 descr->c.ncols = rinfo->ri_cols;
288 descr->c.capabilities = rinfo->ri_caps;
289 descr->c.textops = &rinfo->ri_ops;
290 }
291 #endif
292
293 /*
294 * Power management
295 */
296 void
w100_suspend(struct w100_softc * sc)297 w100_suspend(struct w100_softc *sc)
298 {
299
300 if (sc->active) {
301 /* XXX not yet */
302 }
303 }
304
305 void
w100_resume(struct w100_softc * sc)306 w100_resume(struct w100_softc *sc)
307 {
308
309 if (sc->active) {
310 w100_initialize(sc, sc->geometry);
311 /* XXX: and more */
312 }
313 }
314
315 void
w100_power(int why,void * v)316 w100_power(int why, void *v)
317 {
318 struct w100_softc *sc = v;
319
320 switch (why) {
321 case PWR_SUSPEND:
322 case PWR_STANDBY:
323 w100_suspend(sc);
324 break;
325
326 case PWR_RESUME:
327 w100_resume(sc);
328 break;
329 }
330 }
331
332 /*
333 * Initialize struct wsscreen_descr based on values calculated by
334 * raster operation subsystem.
335 */
336 #if 0
337 int
338 w100_setup_wsscreen(struct w100_wsscreen_descr *descr,
339 const struct w100_panel_geometry *geom,
340 const char *fontname)
341 {
342 int width = geom->panel_width;
343 int height = geom->panel_height;
344 int cookie = -1;
345 struct rasops_info rinfo;
346
347 memset(&rinfo, 0, sizeof rinfo);
348
349 if (fontname) {
350 wsfont_init();
351 cookie = wsfont_find(fontname, 0, 0, 0,
352 WSDISPLAY_FONTORDER_L2R, WSDISPLAY_FONTORDER_L2R);
353 if (cookie < 0 ||
354 wsfont_lock(cookie, &rinfo.ri_font))
355 return -1;
356 }
357 else {
358 /* let rasops_init() choose any font */
359 }
360
361 /* let rasops_init calculate # of cols and rows in character */
362 rinfo.ri_flg = 0;
363 rinfo.ri_depth = descr->depth;
364 rinfo.ri_bits = NULL;
365 rinfo.ri_width = width;
366 rinfo.ri_height = height;
367 rinfo.ri_stride = width * rinfo.ri_depth / 8;
368 rinfo.ri_wsfcookie = cookie;
369
370 rasops_init(&rinfo, 100, 100);
371
372 descr->c.nrows = rinfo.ri_rows;
373 descr->c.ncols = rinfo.ri_cols;
374 descr->c.capabilities = rinfo.ri_caps;
375
376 return cookie;
377 }
378 #endif
379
380 int
w100_show_screen(void * v,void * cookie,int waitok,void (* cb)(void *,int,int),void * cbarg)381 w100_show_screen(void *v, void *cookie, int waitok,
382 void (*cb)(void *, int, int), void *cbarg)
383 {
384
385 return 0;
386 }
387
388 int
w100_alloc_screen(void * v,const struct wsscreen_descr * _type,void ** cookiep,int * curxp,int * curyp,long * attrp)389 w100_alloc_screen(void *v, const struct wsscreen_descr *_type,
390 void **cookiep, int *curxp, int *curyp, long *attrp)
391 {
392 struct w100_softc *sc = v;
393 struct w100_screen *scr;
394 const struct w100_wsscreen_descr *type =
395 (const struct w100_wsscreen_descr *)_type;
396 int error;
397
398 if (sc->n_screens > 0)
399 return ENOMEM;
400
401 error = w100_new_screen(sc, type->depth, &scr);
402 if (error)
403 return error;
404
405 /*
406 * initialize raster operation for this screen.
407 */
408 scr->rinfo.ri_flg = 0;
409 scr->rinfo.ri_depth = type->depth;
410 scr->rinfo.ri_bits = scr->buf_va;
411 scr->rinfo.ri_width = sc->display_width;
412 scr->rinfo.ri_height = sc->display_height;
413 scr->rinfo.ri_stride = scr->rinfo.ri_width * scr->rinfo.ri_depth / 8;
414 scr->rinfo.ri_wsfcookie = -1; /* XXX */
415
416 rasops_init(&scr->rinfo, type->c.nrows, type->c.ncols);
417
418 (*scr->rinfo.ri_ops.allocattr)(&scr->rinfo, 0, 0, 0, attrp);
419
420 *cookiep = scr;
421 *curxp = 0;
422 *curyp = 0;
423
424 return 0;
425 }
426
427 void
w100_free_screen(void * v,void * cookie)428 w100_free_screen(void *v, void *cookie)
429 {
430 struct w100_softc *sc = v;
431 struct w100_screen *scr = cookie;
432
433 LIST_REMOVE(scr, link);
434 sc->n_screens--;
435 }
436
437 int
w100_ioctl(void * v,void * vs,u_long cmd,void * data,int flag,struct lwp * l)438 w100_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
439 struct lwp *l)
440 {
441 struct w100_softc *sc = v;
442 struct w100_screen *scr = sc->active; /* ??? */
443 struct wsdisplay_fbinfo *wsdisp_info;
444
445 switch (cmd) {
446 case WSDISPLAYIO_GTYPE:
447 *(int *)data = WSDISPLAY_TYPE_UNKNOWN;
448 return 0;
449
450 case WSDISPLAYIO_GINFO:
451 wsdisp_info = (struct wsdisplay_fbinfo *)data;
452 wsdisp_info->height = sc->display_height;
453 wsdisp_info->width = sc->display_width;
454 wsdisp_info->depth = scr->depth;
455 wsdisp_info->cmsize = 0;
456 return 0;
457
458 case WSDISPLAYIO_LINEBYTES:
459 *(u_int *)data = scr->rinfo.ri_stride;
460 return 0;
461
462 case WSDISPLAYIO_GETCMAP:
463 case WSDISPLAYIO_PUTCMAP:
464 return EPASSTHROUGH; /* XXX Colormap */
465
466 case WSDISPLAYIO_SVIDEO:
467 if (*(int *)data == WSDISPLAYIO_VIDEO_ON) {
468 /* XXX: turn it on */
469 } else {
470 /* XXX: start LCD shutdown */
471 /* XXX: sleep until interrupt */
472 }
473 return 0;
474
475 case WSDISPLAYIO_GVIDEO:
476 /* XXX: not yet */
477 *(u_int *)data = WSDISPLAYIO_VIDEO_ON;
478 return 0;
479
480 case WSDISPLAYIO_GCURPOS:
481 case WSDISPLAYIO_SCURPOS:
482 case WSDISPLAYIO_GCURMAX:
483 case WSDISPLAYIO_GCURSOR:
484 case WSDISPLAYIO_SCURSOR:
485 return EPASSTHROUGH; /* XXX */
486 }
487
488 return EPASSTHROUGH;
489 }
490
491 paddr_t
w100_mmap(void * v,void * vs,off_t offset,int prot)492 w100_mmap(void *v, void *vs, off_t offset, int prot)
493 {
494 struct w100_softc *sc = v;
495 struct w100_screen *scr = sc->active; /* ??? */
496
497 if (scr == NULL)
498 return -1;
499
500 if (offset < 0 ||
501 offset >= scr->rinfo.ri_stride * scr->rinfo.ri_height)
502 return -1;
503
504 return arm_btop(W100_EXTMEM_ADDRESS + offset);
505 }
506
507
508 static void
w100_cursor(void * cookie,int on,int row,int col)509 w100_cursor(void *cookie, int on, int row, int col)
510 {
511 struct w100_screen *scr = cookie;
512
513 (*scr->rinfo.ri_ops.cursor)(&scr->rinfo, on, row, col);
514 }
515
516 static int
w100_mapchar(void * cookie,int c,unsigned int * cp)517 w100_mapchar(void *cookie, int c, unsigned int *cp)
518 {
519 struct w100_screen *scr = cookie;
520
521 return (*scr->rinfo.ri_ops.mapchar)(&scr->rinfo, c, cp);
522 }
523
524 static void
w100_putchar(void * cookie,int row,int col,u_int uc,long attr)525 w100_putchar(void *cookie, int row, int col, u_int uc, long attr)
526 {
527 struct w100_screen *scr = cookie;
528
529 (*scr->rinfo.ri_ops.putchar)(&scr->rinfo, row, col, uc, attr);
530 }
531
532 static void
w100_copycols(void * cookie,int row,int src,int dst,int num)533 w100_copycols(void *cookie, int row, int src, int dst, int num)
534 {
535 struct w100_screen *scr = cookie;
536
537 (*scr->rinfo.ri_ops.copycols)(&scr->rinfo, row, src, dst, num);
538 }
539
540 static void
w100_erasecols(void * cookie,int row,int col,int num,long attr)541 w100_erasecols(void *cookie, int row, int col, int num, long attr)
542 {
543 struct w100_screen *scr = cookie;
544
545 (*scr->rinfo.ri_ops.erasecols)(&scr->rinfo, row, col, num, attr);
546 }
547
548 static void
w100_copyrows(void * cookie,int src,int dst,int num)549 w100_copyrows(void *cookie, int src, int dst, int num)
550 {
551 struct w100_screen *scr = cookie;
552
553 (*scr->rinfo.ri_ops.copyrows)(&scr->rinfo, src, dst, num);
554 }
555
556 static void
w100_eraserows(void * cookie,int row,int num,long attr)557 w100_eraserows(void *cookie, int row, int num, long attr)
558 {
559 struct w100_screen *scr = cookie;
560
561 (*scr->rinfo.ri_ops.eraserows)(&scr->rinfo, row, num, attr);
562 }
563
564 static int
w100_alloc_attr(void * cookie,int fg,int bg,int flg,long * attr)565 w100_alloc_attr(void *cookie, int fg, int bg, int flg, long *attr)
566 {
567 struct w100_screen *scr = cookie;
568
569 return (*scr->rinfo.ri_ops.allocattr)(&scr->rinfo, fg, bg, flg, attr);
570 }
571
572 const struct wsdisplay_emulops w100_emulops = {
573 w100_cursor,
574 w100_mapchar,
575 w100_putchar,
576 w100_copycols,
577 w100_erasecols,
578 w100_copyrows,
579 w100_eraserows,
580 w100_alloc_attr
581 };
582