1 /* $NetBSD: w100.c,v 1.1 2012/01/29 10:12:42 tsutsui 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.1 2012/01/29 10:12:42 tsutsui 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/malloc.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 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 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 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 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 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 = malloc(sizeof(*scr), M_DEVBUF, M_NOWAIT); 239 if (scr == NULL) 240 return ENOMEM; 241 242 memset(scr, 0, sizeof(*scr)); 243 244 scr->buf_va = (u_char *)bus_space_vaddr(sc->iot, sc->ioh_vram); 245 scr->depth = depth; 246 247 LIST_INSERT_HEAD(&sc->screens, scr, link); 248 sc->n_screens++; 249 250 *scrpp = scr; 251 252 return error; 253 } 254 255 #if NWSDISPLAY > 0 256 /* 257 * Initialize rasops for a screen, as well as struct wsscreen_descr if this 258 * is the first screen creation. 259 */ 260 static void 261 w100_setup_rasops(struct w100_softc *sc, struct rasops_info *rinfo, 262 struct w100_wsscreen_descr *descr, const struct w100_panel_geometry *geom) 263 { 264 265 rinfo->ri_flg = descr->flags; 266 rinfo->ri_depth = descr->depth; 267 rinfo->ri_width = sc->display_width; 268 rinfo->ri_height = sc->display_height; 269 rinfo->ri_stride = rinfo->ri_width * rinfo->ri_depth / 8; 270 #ifdef notyet 271 rinfo->ri_wsfcookie = -1; /* XXX */ 272 #endif 273 274 /* swap B and R */ 275 if (descr->depth == 16) { 276 rinfo->ri_rnum = 5; 277 rinfo->ri_rpos = 11; 278 rinfo->ri_gnum = 6; 279 rinfo->ri_gpos = 5; 280 rinfo->ri_bnum = 5; 281 rinfo->ri_bpos = 0; 282 } 283 284 if (descr->c.nrows == 0) { 285 /* get rasops to compute screen size the first time */ 286 rasops_init(rinfo, 100, 100); 287 } else { 288 rasops_init(rinfo, descr->c.nrows, descr->c.ncols); 289 } 290 291 descr->c.nrows = rinfo->ri_rows; 292 descr->c.ncols = rinfo->ri_cols; 293 descr->c.capabilities = rinfo->ri_caps; 294 descr->c.textops = &rinfo->ri_ops; 295 } 296 #endif 297 298 /* 299 * Power management 300 */ 301 void 302 w100_suspend(struct w100_softc *sc) 303 { 304 305 if (sc->active) { 306 /* XXX not yet */ 307 } 308 } 309 310 void 311 w100_resume(struct w100_softc *sc) 312 { 313 314 if (sc->active) { 315 w100_initialize(sc, sc->geometry); 316 /* XXX: and more */ 317 } 318 } 319 320 void 321 w100_power(int why, void *v) 322 { 323 struct w100_softc *sc = v; 324 325 switch (why) { 326 case PWR_SUSPEND: 327 case PWR_STANDBY: 328 w100_suspend(sc); 329 break; 330 331 case PWR_RESUME: 332 w100_resume(sc); 333 break; 334 } 335 } 336 337 /* 338 * Initialize struct wsscreen_descr based on values calculated by 339 * raster operation subsystem. 340 */ 341 #if 0 342 int 343 w100_setup_wsscreen(struct w100_wsscreen_descr *descr, 344 const struct w100_panel_geometry *geom, 345 const char *fontname) 346 { 347 int width = geom->panel_width; 348 int height = geom->panel_height; 349 int cookie = -1; 350 struct rasops_info rinfo; 351 352 memset(&rinfo, 0, sizeof rinfo); 353 354 if (fontname) { 355 wsfont_init(); 356 cookie = wsfont_find(fontname, 0, 0, 0, 357 WSDISPLAY_FONTORDER_L2R, WSDISPLAY_FONTORDER_L2R); 358 if (cookie < 0 || 359 wsfont_lock(cookie, &rinfo.ri_font)) 360 return -1; 361 } 362 else { 363 /* let rasops_init() choose any font */ 364 } 365 366 /* let rasops_init calculate # of cols and rows in character */ 367 rinfo.ri_flg = 0; 368 rinfo.ri_depth = descr->depth; 369 rinfo.ri_bits = NULL; 370 rinfo.ri_width = width; 371 rinfo.ri_height = height; 372 rinfo.ri_stride = width * rinfo.ri_depth / 8; 373 rinfo.ri_wsfcookie = cookie; 374 375 rasops_init(&rinfo, 100, 100); 376 377 descr->c.nrows = rinfo.ri_rows; 378 descr->c.ncols = rinfo.ri_cols; 379 descr->c.capabilities = rinfo.ri_caps; 380 381 return cookie; 382 } 383 #endif 384 385 int 386 w100_show_screen(void *v, void *cookie, int waitok, 387 void (*cb)(void *, int, int), void *cbarg) 388 { 389 390 return 0; 391 } 392 393 int 394 w100_alloc_screen(void *v, const struct wsscreen_descr *_type, 395 void **cookiep, int *curxp, int *curyp, long *attrp) 396 { 397 struct w100_softc *sc = v; 398 struct w100_screen *scr; 399 const struct w100_wsscreen_descr *type = 400 (const struct w100_wsscreen_descr *)_type; 401 int error; 402 403 if (sc->n_screens > 0) 404 return ENOMEM; 405 406 error = w100_new_screen(sc, type->depth, &scr); 407 if (error) 408 return error; 409 410 /* 411 * initialize raster operation for this screen. 412 */ 413 scr->rinfo.ri_flg = 0; 414 scr->rinfo.ri_depth = type->depth; 415 scr->rinfo.ri_bits = scr->buf_va; 416 scr->rinfo.ri_width = sc->display_width; 417 scr->rinfo.ri_height = sc->display_height; 418 scr->rinfo.ri_stride = scr->rinfo.ri_width * scr->rinfo.ri_depth / 8; 419 scr->rinfo.ri_wsfcookie = -1; /* XXX */ 420 421 rasops_init(&scr->rinfo, type->c.nrows, type->c.ncols); 422 423 (*scr->rinfo.ri_ops.allocattr)(&scr->rinfo, 0, 0, 0, attrp); 424 425 *cookiep = scr; 426 *curxp = 0; 427 *curyp = 0; 428 429 return 0; 430 } 431 432 void 433 w100_free_screen(void *v, void *cookie) 434 { 435 struct w100_softc *sc = v; 436 struct w100_screen *scr = cookie; 437 438 LIST_REMOVE(scr, link); 439 sc->n_screens--; 440 } 441 442 int 443 w100_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, 444 struct lwp *l) 445 { 446 struct w100_softc *sc = v; 447 struct w100_screen *scr = sc->active; /* ??? */ 448 struct wsdisplay_fbinfo *wsdisp_info; 449 450 switch (cmd) { 451 case WSDISPLAYIO_GTYPE: 452 *(int *)data = WSDISPLAY_TYPE_UNKNOWN; 453 return 0; 454 455 case WSDISPLAYIO_GINFO: 456 wsdisp_info = (struct wsdisplay_fbinfo *)data; 457 wsdisp_info->height = sc->display_height; 458 wsdisp_info->width = sc->display_width; 459 wsdisp_info->depth = scr->depth; 460 wsdisp_info->cmsize = 0; 461 return 0; 462 463 case WSDISPLAYIO_LINEBYTES: 464 *(u_int *)data = scr->rinfo.ri_stride; 465 return 0; 466 467 case WSDISPLAYIO_GETCMAP: 468 case WSDISPLAYIO_PUTCMAP: 469 return EPASSTHROUGH; /* XXX Colormap */ 470 471 case WSDISPLAYIO_SVIDEO: 472 if (*(int *)data == WSDISPLAYIO_VIDEO_ON) { 473 /* XXX: turn it on */ 474 } else { 475 /* XXX: start LCD shutdown */ 476 /* XXX: sleep until interrupt */ 477 } 478 return 0; 479 480 case WSDISPLAYIO_GVIDEO: 481 /* XXX: not yet */ 482 *(u_int *)data = WSDISPLAYIO_VIDEO_ON; 483 return 0; 484 485 case WSDISPLAYIO_GCURPOS: 486 case WSDISPLAYIO_SCURPOS: 487 case WSDISPLAYIO_GCURMAX: 488 case WSDISPLAYIO_GCURSOR: 489 case WSDISPLAYIO_SCURSOR: 490 return EPASSTHROUGH; /* XXX */ 491 } 492 493 return EPASSTHROUGH; 494 } 495 496 paddr_t 497 w100_mmap(void *v, void *vs, off_t offset, int prot) 498 { 499 struct w100_softc *sc = v; 500 struct w100_screen *scr = sc->active; /* ??? */ 501 502 if (scr == NULL) 503 return -1; 504 505 if (offset < 0 || 506 offset >= scr->rinfo.ri_stride * scr->rinfo.ri_height) 507 return -1; 508 509 return arm_btop(W100_EXTMEM_ADDRESS + offset); 510 } 511 512 513 static void 514 w100_cursor(void *cookie, int on, int row, int col) 515 { 516 struct w100_screen *scr = cookie; 517 518 (*scr->rinfo.ri_ops.cursor)(&scr->rinfo, on, row, col); 519 } 520 521 static int 522 w100_mapchar(void *cookie, int c, unsigned int *cp) 523 { 524 struct w100_screen *scr = cookie; 525 526 return (*scr->rinfo.ri_ops.mapchar)(&scr->rinfo, c, cp); 527 } 528 529 static void 530 w100_putchar(void *cookie, int row, int col, u_int uc, long attr) 531 { 532 struct w100_screen *scr = cookie; 533 534 (*scr->rinfo.ri_ops.putchar)(&scr->rinfo, row, col, uc, attr); 535 } 536 537 static void 538 w100_copycols(void *cookie, int row, int src, int dst, int num) 539 { 540 struct w100_screen *scr = cookie; 541 542 (*scr->rinfo.ri_ops.copycols)(&scr->rinfo, row, src, dst, num); 543 } 544 545 static void 546 w100_erasecols(void *cookie, int row, int col, int num, long attr) 547 { 548 struct w100_screen *scr = cookie; 549 550 (*scr->rinfo.ri_ops.erasecols)(&scr->rinfo, row, col, num, attr); 551 } 552 553 static void 554 w100_copyrows(void *cookie, int src, int dst, int num) 555 { 556 struct w100_screen *scr = cookie; 557 558 (*scr->rinfo.ri_ops.copyrows)(&scr->rinfo, src, dst, num); 559 } 560 561 static void 562 w100_eraserows(void *cookie, int row, int num, long attr) 563 { 564 struct w100_screen *scr = cookie; 565 566 (*scr->rinfo.ri_ops.eraserows)(&scr->rinfo, row, num, attr); 567 } 568 569 static int 570 w100_alloc_attr(void *cookie, int fg, int bg, int flg, long *attr) 571 { 572 struct w100_screen *scr = cookie; 573 574 return (*scr->rinfo.ri_ops.allocattr)(&scr->rinfo, fg, bg, flg, attr); 575 } 576 577 const struct wsdisplay_emulops w100_emulops = { 578 w100_cursor, 579 w100_mapchar, 580 w100_putchar, 581 w100_copycols, 582 w100_erasecols, 583 w100_copyrows, 584 w100_eraserows, 585 w100_alloc_attr 586 }; 587