1 /* $NetBSD: ibm561.c,v 1.1 2001/12/12 07:46:48 elric Exp $ */ 2 3 /*- 4 * Copyright (c) 2001 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Roland C. Dowdeswell of Ponte, Inc. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. All advertising materials mentioning features or use of this software 19 * must display the following acknowledgement: 20 * This product includes software developed by the NetBSD 21 * Foundation, Inc. and its contributors. 22 * 4. Neither the name of The NetBSD Foundation nor the names of its 23 * contributors may be used to endorse or promote products derived 24 * from this software without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 * POSSIBILITY OF SUCH DAMAGE. 37 */ 38 39 #include <sys/param.h> 40 #include <sys/systm.h> 41 #include <sys/device.h> 42 #include <sys/buf.h> 43 #include <sys/kernel.h> 44 #include <sys/malloc.h> 45 46 #include <uvm/uvm_extern.h> 47 48 #include <dev/pci/pcivar.h> 49 #include <dev/ic/ibm561reg.h> 50 #include <dev/ic/ibm561var.h> 51 #include <dev/ic/ramdac.h> 52 53 #include <dev/wscons/wsconsio.h> 54 55 /* 56 * Functions exported via the RAMDAC configuration table. 57 */ 58 void ibm561_init __P((struct ramdac_cookie *)); 59 int ibm561_set_cmap __P((struct ramdac_cookie *, 60 struct wsdisplay_cmap *)); 61 int ibm561_get_cmap __P((struct ramdac_cookie *, 62 struct wsdisplay_cmap *)); 63 int ibm561_set_cursor __P((struct ramdac_cookie *, 64 struct wsdisplay_cursor *)); 65 int ibm561_get_cursor __P((struct ramdac_cookie *, 66 struct wsdisplay_cursor *)); 67 int ibm561_set_curpos __P((struct ramdac_cookie *, 68 struct wsdisplay_curpos *)); 69 int ibm561_get_curpos __P((struct ramdac_cookie *, 70 struct wsdisplay_curpos *)); 71 int ibm561_get_curmax __P((struct ramdac_cookie *, 72 struct wsdisplay_curpos *)); 73 int ibm561_set_dotclock __P((struct ramdac_cookie *, 74 unsigned)); 75 76 /* XXX const */ 77 struct ramdac_funcs ibm561_funcsstruct = { 78 "IBM561", 79 ibm561_register, 80 ibm561_init, 81 ibm561_set_cmap, 82 ibm561_get_cmap, 83 ibm561_set_cursor, 84 ibm561_get_cursor, 85 ibm561_set_curpos, 86 ibm561_get_curpos, 87 ibm561_get_curmax, 88 NULL, /* check_curcmap; not needed */ 89 NULL, /* set_curcmap; not needed */ 90 NULL, /* get_curcmap; not needed */ 91 ibm561_set_dotclock, 92 }; 93 94 /* 95 * Private data. 96 */ 97 struct ibm561data { 98 void *cookie; 99 100 int (*ramdac_sched_update) __P((void *, void (*)(void *))); 101 void (*ramdac_wr) __P((void *, u_int, u_int8_t)); 102 u_int8_t (*ramdac_rd) __P((void *, u_int)); 103 104 #define CHANGED_CURCMAP 0x0001 /* cursor cmap */ 105 #define CHANGED_CMAP 0x0002 /* color map */ 106 #define CHANGED_WTYPE 0x0004 /* window types */ 107 #define CHANGED_DOTCLOCK 0x0008 /* dot clock */ 108 #define CHANGED_ALL 0x000f /* or of all above */ 109 u_int8_t changed; 110 111 /* dotclock parameters */ 112 u_int8_t vco_div; 113 u_int8_t pll_ref; 114 u_int8_t div_dotclock; 115 116 /* colormaps et al. */ 117 u_int8_t curcmap_r[2]; 118 u_int8_t curcmap_g[2]; 119 u_int8_t curcmap_b[2]; 120 121 u_int8_t cmap_r[IBM561_NCMAP_ENTRIES]; 122 u_int8_t cmap_g[IBM561_NCMAP_ENTRIES]; 123 u_int8_t cmap_b[IBM561_NCMAP_ENTRIES]; 124 125 u_int16_t gamma_r[IBM561_NGAMMA_ENTRIES]; 126 u_int16_t gamma_g[IBM561_NGAMMA_ENTRIES]; 127 u_int16_t gamma_b[IBM561_NGAMMA_ENTRIES]; 128 129 u_int16_t wtype[IBM561_NWTYPES]; 130 }; 131 132 /* 133 * private functions 134 */ 135 void ibm561_update __P((void *)); 136 static void ibm561_load_cmap(struct ibm561data *); 137 static void ibm561_load_dotclock(struct ibm561data *); 138 static void ibm561_regbegin(struct ibm561data *, u_int16_t); 139 static void ibm561_regcont(struct ibm561data *, u_int16_t, u_int8_t); 140 static void ibm561_regcont10bit(struct ibm561data *, u_int16_t, u_int16_t); 141 static void ibm561_regwr(struct ibm561data *, u_int16_t, u_int8_t); 142 143 struct ramdac_funcs * 144 ibm561_funcs(void) 145 { 146 return &ibm561_funcsstruct; 147 } 148 149 struct ramdac_cookie * 150 ibm561_register(v, sched_update, wr, rd) 151 void *v; 152 int (*sched_update)(void *, void (*)(void *)); 153 void (*wr)(void *, u_int, u_int8_t); 154 u_int8_t (*rd)(void *, u_int); 155 { 156 struct ibm561data *data; 157 158 data = malloc(sizeof *data, M_DEVBUF, M_WAITOK); 159 memset(data, 0x0, sizeof *data); 160 data->cookie = v; 161 data->ramdac_sched_update = sched_update; 162 data->ramdac_wr = wr; 163 data->ramdac_rd = rd; 164 return (struct ramdac_cookie *)data; 165 } 166 167 /* 168 * This function exists solely to provide a means to init 169 * the RAMDAC without first registering. It is useful for 170 * initializing the console early on. 171 */ 172 173 struct ibm561data *saved_console_data; 174 175 void 176 ibm561_cninit(v, sched_update, wr, rd, dotclock) 177 void *v; 178 int (*sched_update)(void *, void (*)(void *)); 179 void (*wr)(void *, u_int, u_int8_t); 180 u_int8_t (*rd)(void *, u_int); 181 u_int dotclock; 182 { 183 struct ibm561data tmp, *data = &tmp; 184 memset(data, 0x0, sizeof *data); 185 data->cookie = v; 186 data->ramdac_sched_update = sched_update; 187 data->ramdac_wr = wr; 188 data->ramdac_rd = rd; 189 ibm561_set_dotclock((struct ramdac_cookie *)data, dotclock); 190 saved_console_data = data; 191 ibm561_init((struct ramdac_cookie *)data); 192 saved_console_data = NULL; 193 } 194 195 void 196 ibm561_init(rc) 197 struct ramdac_cookie *rc; 198 { 199 struct ibm561data *data = (struct ibm561data *)rc; 200 int i; 201 202 /* XXX this is _essential_ */ 203 204 ibm561_load_dotclock(data); 205 206 /* XXXrcd: bunch of magic of which I have no current clue */ 207 ibm561_regwr(data, IBM561_CONFIG_REG1, 0x2a); 208 ibm561_regwr(data, IBM561_CONFIG_REG3, 0x41); 209 ibm561_regwr(data, IBM561_CONFIG_REG4, 0x20); 210 211 /* initialize the card a bit */ 212 ibm561_regwr(data, IBM561_SYNC_CNTL, 0x1); 213 ibm561_regwr(data, IBM561_CONFIG_REG2, 0x19); 214 215 ibm561_regwr(data, IBM561_CONFIG_REG1, 0x2a); 216 ibm561_regwr(data, IBM561_CONFIG_REG4, 0x20); 217 218 ibm561_regbegin(data, IBM561_WAT_SEG_REG); 219 ibm561_regcont(data, IBM561_CMD, 0x00); 220 ibm561_regcont(data, IBM561_CMD, 0x00); 221 ibm561_regcont(data, IBM561_CMD, 0x00); 222 ibm561_regcont(data, IBM561_CMD, 0x00); 223 ibm561_regbegin(data, IBM561_CHROMAKEY0); 224 ibm561_regcont(data, IBM561_CMD, 0x00); 225 ibm561_regcont(data, IBM561_CMD, 0x00); 226 ibm561_regcont(data, IBM561_CMD, 0x00); 227 ibm561_regcont(data, IBM561_CMD, 0x00); 228 229 ibm561_regwr(data, IBM561_CURS_CNTL_REG, 0x00); /* XXX off? */ 230 231 /* cursor `hot spot' registers */ 232 ibm561_regbegin(data, IBM561_HOTSPOT_REG); 233 ibm561_regcont(data, IBM561_CMD, 0x00); 234 ibm561_regcont(data, IBM561_CMD, 0x00); 235 ibm561_regcont(data, IBM561_CMD, 0xff); 236 ibm561_regcont(data, IBM561_CMD, 0x00); 237 ibm561_regcont(data, IBM561_CMD, 0xff); 238 ibm561_regcont(data, IBM561_CMD, 0x00); 239 240 /* VRAM Mask Registers (diagnostics) */ 241 ibm561_regbegin(data, IBM561_VRAM_MASK_REG); 242 ibm561_regcont(data, IBM561_CMD, 0xff); 243 ibm561_regcont(data, IBM561_CMD, 0xff); 244 ibm561_regcont(data, IBM561_CMD, 0xff); 245 ibm561_regcont(data, IBM561_CMD, 0xff); 246 ibm561_regcont(data, IBM561_CMD, 0xff); 247 ibm561_regcont(data, IBM561_CMD, 0xff); 248 ibm561_regcont(data, IBM561_CMD, 0xff); 249 250 /* let's set up some decent default colour maps and gammas */ 251 for (i=0; i < IBM561_NCMAP_ENTRIES; i++) 252 data->cmap_r[i] = data->cmap_g[i] = data->cmap_b[i] = 0xff; 253 data->cmap_r[0] = data->cmap_g[0] = data->cmap_b[0] = 0x00; 254 data->cmap_r[256] = data->cmap_g[256] = data->cmap_b[256] = 0x00; 255 data->cmap_r[512] = data->cmap_g[512] = data->cmap_b[512] = 0x00; 256 data->cmap_r[768] = data->cmap_g[768] = data->cmap_b[768] = 0x00; 257 258 data->gamma_r[0] = data->gamma_g[0] = data->gamma_b[0] = 0x00; 259 for (i=0; i < IBM561_NGAMMA_ENTRIES; i++) 260 data->gamma_r[i] = data->gamma_g[i] = data->gamma_b[i] = 0xff; 261 262 for (i=0; i < IBM561_NWTYPES; i++) 263 data->wtype[i] = 0x0036; 264 data->wtype[1] = 0x0028; 265 266 /* the last step: */ 267 data->changed = CHANGED_ALL; 268 data->ramdac_sched_update(data->cookie, ibm561_update); 269 } 270 271 int 272 ibm561_set_cmap(rc, cmapp) 273 struct ramdac_cookie *rc; 274 struct wsdisplay_cmap *cmapp; 275 { 276 struct ibm561data *data = (struct ibm561data *)rc; 277 int count; 278 int index; 279 int s; 280 281 if ((u_int)cmapp->index >= IBM561_NCMAP_ENTRIES || 282 ((u_int)cmapp->index + (u_int)cmapp->count) > IBM561_NCMAP_ENTRIES) 283 return (EINVAL); 284 if (!uvm_useracc(cmapp->red, cmapp->count, B_READ) || 285 !uvm_useracc(cmapp->green, cmapp->count, B_READ) || 286 !uvm_useracc(cmapp->blue, cmapp->count, B_READ)) 287 return (EFAULT); 288 289 s = spltty(); 290 index = cmapp->index; 291 count = cmapp->count; 292 copyin(cmapp->red, &data->cmap_r[index], count); 293 copyin(cmapp->green, &data->cmap_g[index], count); 294 copyin(cmapp->blue, &data->cmap_b[index], count); 295 data->changed |= CHANGED_CMAP; 296 data->ramdac_sched_update(data->cookie, ibm561_update); 297 splx(s); 298 return (0); 299 } 300 301 int 302 ibm561_get_cmap(rc, cmapp) 303 struct ramdac_cookie *rc; 304 struct wsdisplay_cmap *cmapp; 305 { 306 struct ibm561data *data = (struct ibm561data *)rc; 307 int error; 308 int count; 309 int index; 310 311 if ((u_int)cmapp->index >= IBM561_NCMAP_ENTRIES || 312 ((u_int)cmapp->index + (u_int)cmapp->count) > IBM561_NCMAP_ENTRIES) 313 return (EINVAL); 314 count = cmapp->count; 315 index = cmapp->index; 316 error = copyout(&data->cmap_r[index], cmapp->red, count); 317 if (error) 318 return (error); 319 error = copyout(&data->cmap_g[index], cmapp->green, count); 320 if (error) 321 return (error); 322 error = copyout(&data->cmap_b[index], cmapp->blue, count); 323 return (error); 324 } 325 326 /* 327 * XXX: 328 * I am leaving these functions returning EINVAL, as they are 329 * not strictly necessary for the correct functioning of the 330 * card and in fact are not used on the other TGA variants, except 331 * they are exported via ioctl(2) to userland, which does not in 332 * fact use them. 333 */ 334 335 int 336 ibm561_set_cursor(rc, cursorp) 337 struct ramdac_cookie *rc; 338 struct wsdisplay_cursor *cursorp; 339 { 340 return EINVAL; 341 } 342 343 int 344 ibm561_get_cursor(rc, cursorp) 345 struct ramdac_cookie *rc; 346 struct wsdisplay_cursor *cursorp; 347 { 348 return EINVAL; 349 } 350 351 int 352 ibm561_set_curpos(rc, curposp) 353 struct ramdac_cookie *rc; 354 struct wsdisplay_curpos *curposp; 355 { 356 return EINVAL; 357 } 358 359 int 360 ibm561_get_curpos(rc, curposp) 361 struct ramdac_cookie *rc; 362 struct wsdisplay_curpos *curposp; 363 { 364 return EINVAL; 365 } 366 367 int 368 ibm561_get_curmax(rc, curposp) 369 struct ramdac_cookie *rc; 370 struct wsdisplay_curpos *curposp; 371 { 372 return EINVAL; 373 } 374 375 int 376 ibm561_set_dotclock(rc, dotclock) 377 struct ramdac_cookie *rc; 378 unsigned dotclock; 379 { 380 struct ibm561data *data = (struct ibm561data *)rc; 381 382 /* XXXrcd: a couple of these are a little hazy, vis a vis 383 * check 175MHz and 202MHz, which are wrong... 384 */ 385 switch (dotclock) { 386 case 25175000: data->vco_div = 0x3e; data->pll_ref = 0x09; break; 387 case 31500000: data->vco_div = 0x17; data->pll_ref = 0x05; break; 388 case 40000000: data->vco_div = 0x42; data->pll_ref = 0x06; break; 389 case 50000000: data->vco_div = 0x45; data->pll_ref = 0x05; break; 390 case 65000000: data->vco_div = 0xac; data->pll_ref = 0x0c; break; 391 case 69000000: data->vco_div = 0xa9; data->pll_ref = 0x0b; break; 392 case 74000000: data->vco_div = 0x9c; data->pll_ref = 0x09; break; 393 case 75000000: data->vco_div = 0x93; data->pll_ref = 0x08; break; 394 case 103994000: data->vco_div = 0x96; data->pll_ref = 0x06; break; 395 case 108180000: data->vco_div = 0xb8; data->pll_ref = 0x08; break; 396 case 110000000: data->vco_div = 0xba; data->pll_ref = 0x08; break; 397 case 119840000: data->vco_div = 0x82; data->pll_ref = 0x04; break; 398 case 130808000: data->vco_div = 0xc8; data->pll_ref = 0x08; break; 399 case 135000000: data->vco_div = 0xc1; data->pll_ref = 0x07; break; 400 case 175000000: data->vco_div = 0xe2; data->pll_ref = 0x07; break; 401 case 202500000: data->vco_div = 0xe2; data->pll_ref = 0x07; break; 402 default: 403 return EINVAL; 404 } 405 406 data->div_dotclock = 0xb0; 407 data->changed |= CHANGED_DOTCLOCK; 408 return 0; 409 } 410 411 /* 412 * Internal Functions 413 */ 414 415 void 416 ibm561_update(vp) 417 void *vp; 418 { 419 struct ibm561data *data = (struct ibm561data *)vp; 420 int i; 421 422 /* XXX see comment above ibm561_cninit() */ 423 if (!data) 424 data = saved_console_data; 425 426 if (data->changed & CHANGED_WTYPE) { 427 ibm561_regbegin(data, IBM561_FB_WINTYPE); 428 for (i=0; i < IBM561_NWTYPES; i++) 429 ibm561_regcont10bit(data, IBM561_CMD_FB_WAT, data->wtype[i]); 430 431 /* XXXrcd: quick hack here for AUX FB table */ 432 ibm561_regbegin(data, IBM561_AUXFB_WINTYPE); 433 for (i=0; i < IBM561_NWTYPES; i++) 434 ibm561_regcont(data, IBM561_CMD, 0x04); 435 436 /* XXXrcd: quick hack here for OL WAT table */ 437 ibm561_regbegin(data, IBM561_OL_WINTYPE); 438 for (i=0; i < IBM561_NWTYPES; i++) 439 ibm561_regcont10bit(data, IBM561_CMD_FB_WAT, 0x0231); 440 441 /* XXXrcd: quick hack here for AUX OL WAT table */ 442 ibm561_regbegin(data, IBM561_AUXOL_WINTYPE); 443 for (i=0; i < IBM561_NWTYPES; i++) 444 ibm561_regcont(data, IBM561_CMD, 0x0c); 445 } 446 447 if (data->changed & CHANGED_CMAP) 448 ibm561_load_cmap(data); 449 450 /* XXX: I am not sure in what situations it is safe to 451 * change the dotclock---hope this is good. 452 */ 453 if (data->changed & CHANGED_DOTCLOCK) 454 ibm561_load_dotclock(data); 455 } 456 457 static void 458 ibm561_load_cmap(struct ibm561data *data) 459 { 460 int i; 461 462 ibm561_regbegin(data, IBM561_CMAP_TABLE); 463 for (i=0; i < IBM561_NCMAP_ENTRIES; i++) { 464 ibm561_regcont(data, IBM561_CMD_CMAP, data->cmap_r[i]); 465 ibm561_regcont(data, IBM561_CMD_CMAP, data->cmap_g[i]); 466 ibm561_regcont(data, IBM561_CMD_CMAP, data->cmap_b[i]); 467 } 468 469 ibm561_regbegin(data, IBM561_RED_GAMMA_TABLE); 470 for (i=0; i < 256; i++) 471 ibm561_regcont10bit(data, IBM561_CMD_GAMMA, data->gamma_r[i]); 472 473 ibm561_regbegin(data, IBM561_GREEN_GAMMA_TABLE); 474 for (i=1; i < 256; i++) 475 ibm561_regcont10bit(data, IBM561_CMD_GAMMA, data->gamma_g[i]); 476 477 ibm561_regbegin(data, IBM561_BLUE_GAMMA_TABLE); 478 for (i=1; i < 256; i++) 479 ibm561_regcont10bit(data, IBM561_CMD_GAMMA, data->gamma_b[i]); 480 481 } 482 483 static void 484 ibm561_load_dotclock(struct ibm561data *data) 485 { 486 /* XXX 487 * we should probably be more pro-active here, but it shouldn't 488 * actually happen... 489 */ 490 if (!data->vco_div || !data->pll_ref || ! data->div_dotclock) { 491 panic("ibm561_load_dotclock: called uninitialized"); 492 } 493 494 ibm561_regwr(data, IBM561_PLL_VCO_DIV, data->vco_div); 495 ibm561_regwr(data, IBM561_PLL_REF_REG, data->pll_ref); 496 ibm561_regwr(data, IBM561_DIV_DOTCLCK, data->div_dotclock); 497 } 498 499 static void 500 ibm561_regcont10bit(struct ibm561data *data, u_int16_t reg, u_int16_t val) 501 { 502 data->ramdac_wr(data->cookie, IBM561_CMD_GAMMA, (val >> 2) & 0xff); 503 data->ramdac_wr(data->cookie, IBM561_CMD_GAMMA, (val & 0x3) << 6); 504 } 505 506 static void 507 ibm561_regbegin(struct ibm561data *data, u_int16_t reg) 508 { 509 data->ramdac_wr(data->cookie, IBM561_ADDR_LOW, reg & 0xff); 510 data->ramdac_wr(data->cookie, IBM561_ADDR_HIGH, (reg >> 8) & 0xff); 511 } 512 513 static void 514 ibm561_regcont(struct ibm561data *data, u_int16_t reg, u_int8_t val) 515 { 516 data->ramdac_wr(data->cookie, reg, val); 517 } 518 519 static void 520 ibm561_regwr(struct ibm561data *data, u_int16_t reg, u_int8_t val) 521 { 522 ibm561_regbegin(data, reg); 523 ibm561_regcont(data, IBM561_CMD, val); 524 } 525