Pileus Git - ~andy/linux/blob - drivers/video/tridentfb.c

   1 /*
   2  * Frame buffer driver for Trident Blade and Image series
   3  *
   4  * Copyright 2001, 2002 - Jani Monoses   <jani@iv.ro>
   5  *
   6  *
   7  * CREDITS:(in order of appearance)
   8  *      skeletonfb.c by Geert Uytterhoeven and other fb code in drivers/video
   9  *      Special thanks ;) to Mattia Crivellini <tia@mclink.it>
  10  *      much inspired by the XFree86 4.x Trident driver sources
  11  *      by Alan Hourihane the FreeVGA project
  12  *      Francesco Salvestrini <salvestrini@users.sf.net> XP support,
  13  *      code, suggestions
  14  * TODO:
  15  *      timing value tweaking so it looks good on every monitor in every mode
  16  *      TGUI acceleration
  17  */
  18
  19 #include <linux/module.h>
  20 #include <linux/fb.h>
  21 #include <linux/init.h>
  22 #include <linux/pci.h>
  23
  24 #include <linux/delay.h>
  25 #include <video/vga.h>
  26 #include <video/trident.h>
  27
  28 #define VERSION         "0.7.9-NEWAPI"
  29
  30 struct tridentfb_par {
  31         void __iomem *io_virt;  /* iospace virtual memory address */
  32         u32 pseudo_pal[16];
  33         int chip_id;
  34         int flatpanel;
  35         void (*init_accel) (struct tridentfb_par *, int, int);
  36         void (*wait_engine) (struct tridentfb_par *);
  37         void (*fill_rect)
  38                 (struct tridentfb_par *par, u32, u32, u32, u32, u32, u32);
  39         void (*copy_rect)
  40                 (struct tridentfb_par *par, u32, u32, u32, u32, u32, u32);
  41 };
  42
  43 static unsigned char eng_oper;  /* engine operation... */
  44 static struct fb_ops tridentfb_ops;
  45
  46 static struct fb_fix_screeninfo tridentfb_fix = {
  47         .id = "Trident",
  48         .type = FB_TYPE_PACKED_PIXELS,
  49         .ypanstep = 1,
  50         .visual = FB_VISUAL_PSEUDOCOLOR,
  51         .accel = FB_ACCEL_NONE,
  52 };
  53
  54 /* defaults which are normally overriden by user values */
  55
  56 /* video mode */
  57 static char *mode_option __devinitdata = "640x480";
  58 static int bpp __devinitdata = 8;
  59
  60 static int noaccel __devinitdata;
  61
  62 static int center;
  63 static int stretch;
  64
  65 static int fp __devinitdata;
  66 static int crt __devinitdata;
  67
  68 static int memsize __devinitdata;
  69 static int memdiff __devinitdata;
  70 static int nativex;
  71
  72 module_param(mode_option, charp, 0);
  73 MODULE_PARM_DESC(mode_option, "Initial video mode e.g. '648x480-8@60'");
  74 module_param_named(mode, mode_option, charp, 0);
  75 MODULE_PARM_DESC(mode, "Initial video mode e.g. '648x480-8@60' (deprecated)");
  76 module_param(bpp, int, 0);
  77 module_param(center, int, 0);
  78 module_param(stretch, int, 0);
  79 module_param(noaccel, int, 0);
  80 module_param(memsize, int, 0);
  81 module_param(memdiff, int, 0);
  82 module_param(nativex, int, 0);
  83 module_param(fp, int, 0);
  84 MODULE_PARM_DESC(fp, "Define if flatpanel is connected");
  85 module_param(crt, int, 0);
  86 MODULE_PARM_DESC(crt, "Define if CRT is connected");
  87
  88 static int is_oldclock(int id)
  89 {
  90         return  (id == TGUI9440) ||
  91                 (id == TGUI9660) ||
  92                 (id == CYBER9320);
  93 }
  94
  95 static int is_oldprotect(int id)
  96 {
  97         return  (id == TGUI9440) ||
  98                 (id == TGUI9660) ||
  99                 (id == PROVIDIA9685) ||
 100                 (id == CYBER9320) ||
 101                 (id == CYBER9382) ||
 102                 (id == CYBER9385);
 103 }
 104
 105 static int is_blade(int id)
 106 {
 107         return  (id == BLADE3D) ||
 108                 (id == CYBERBLADEE4) ||
 109                 (id == CYBERBLADEi7) ||
 110                 (id == CYBERBLADEi7D) ||
 111                 (id == CYBERBLADEi1) ||
 112                 (id == CYBERBLADEi1D) ||
 113                 (id == CYBERBLADEAi1) ||
 114                 (id == CYBERBLADEAi1D);
 115 }
 116
 117 static int is_xp(int id)
 118 {
 119         return  (id == CYBERBLADEXPAi1) ||
 120                 (id == CYBERBLADEXPm8) ||
 121                 (id == CYBERBLADEXPm16);
 122 }
 123
 124 static int is3Dchip(int id)
 125 {
 126         return ((id == BLADE3D) || (id == CYBERBLADEE4) ||
 127                 (id == CYBERBLADEi7) || (id == CYBERBLADEi7D) ||
 128                 (id == CYBER9397) || (id == CYBER9397DVD) ||
 129                 (id == CYBER9520) || (id == CYBER9525DVD) ||
 130                 (id == IMAGE975) || (id == IMAGE985) ||
 131                 (id == CYBERBLADEi1) || (id == CYBERBLADEi1D) ||
 132                 (id == CYBERBLADEAi1) || (id == CYBERBLADEAi1D) ||
 133                 (id == CYBERBLADEXPm8) || (id == CYBERBLADEXPm16) ||
 134                 (id == CYBERBLADEXPAi1));
 135 }
 136
 137 static int iscyber(int id)
 138 {
 139         switch (id) {
 140         case CYBER9388:
 141         case CYBER9382:
 142         case CYBER9385:
 143         case CYBER9397:
 144         case CYBER9397DVD:
 145         case CYBER9520:
 146         case CYBER9525DVD:
 147         case CYBERBLADEE4:
 148         case CYBERBLADEi7D:
 149         case CYBERBLADEi1:
 150         case CYBERBLADEi1D:
 151         case CYBERBLADEAi1:
 152         case CYBERBLADEAi1D:
 153         case CYBERBLADEXPAi1:
 154                 return 1;
 155
 156         case CYBER9320:
 157         case TGUI9660:
 158         case PROVIDIA9685:
 159         case IMAGE975:
 160         case IMAGE985:
 161         case BLADE3D:
 162         case CYBERBLADEi7:      /* VIA MPV4 integrated version */
 163
 164         default:
 165                 /* case CYBERBLDAEXPm8:  Strange */
 166                 /* case CYBERBLDAEXPm16: Strange */
 167                 return 0;
 168         }
 169 }
 170
 171 static inline void t_outb(struct tridentfb_par *p, u8 val, u16 reg)
 172 {
 173         fb_writeb(val, p->io_virt + reg);
 174 }
 175
 176 static inline u8 t_inb(struct tridentfb_par *p, u16 reg)
 177 {
 178         return fb_readb(p->io_virt + reg);
 179 }
 180
 181 static inline void writemmr(struct tridentfb_par *par, u16 r, u32 v)
 182 {
 183         fb_writel(v, par->io_virt + r);
 184 }
 185
 186 static inline u32 readmmr(struct tridentfb_par *par, u16 r)
 187 {
 188         return fb_readl(par->io_virt + r);
 189 }
 190
 191 /*
 192  * Blade specific acceleration.
 193  */
 194
 195 #define point(x, y) ((y) << 16 | (x))
 196 #define STA     0x2120
 197 #define CMD     0x2144
 198 #define ROP     0x2148
 199 #define CLR     0x2160
 200 #define SR1     0x2100
 201 #define SR2     0x2104
 202 #define DR1     0x2108
 203 #define DR2     0x210C
 204
 205 #define ROP_S   0xCC
 206
 207 static void blade_init_accel(struct tridentfb_par *par, int pitch, int bpp)
 208 {
 209         int v1 = (pitch >> 3) << 20;
 210         int tmp = 0, v2;
 211         switch (bpp) {
 212         case 8:
 213                 tmp = 0;
 214                 break;
 215         case 15:
 216                 tmp = 5;
 217                 break;
 218         case 16:
 219                 tmp = 1;
 220                 break;
 221         case 24:
 222         case 32:
 223                 tmp = 2;
 224                 break;
 225         }
 226         v2 = v1 | (tmp << 29);
 227         writemmr(par, 0x21C0, v2);
 228         writemmr(par, 0x21C4, v2);
 229         writemmr(par, 0x21B8, v2);
 230         writemmr(par, 0x21BC, v2);
 231         writemmr(par, 0x21D0, v1);
 232         writemmr(par, 0x21D4, v1);
 233         writemmr(par, 0x21C8, v1);
 234         writemmr(par, 0x21CC, v1);
 235         writemmr(par, 0x216C, 0);
 236 }
 237
 238 static void blade_wait_engine(struct tridentfb_par *par)
 239 {
 240         while (readmmr(par, STA) & 0xFA800000) ;
 241 }
 242
 243 static void blade_fill_rect(struct tridentfb_par *par,
 244                             u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop)
 245 {
 246         writemmr(par, CLR, c);
 247         writemmr(par, ROP, rop ? 0x66 : ROP_S);
 248         writemmr(par, CMD, 0x20000000 | 1 << 19 | 1 << 4 | 2 << 2);
 249
 250         writemmr(par, DR1, point(x, y));
 251         writemmr(par, DR2, point(x + w - 1, y + h - 1));
 252 }
 253
 254 static void blade_copy_rect(struct tridentfb_par *par,
 255                             u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h)
 256 {
 257         u32 s1, s2, d1, d2;
 258         int direction = 2;
 259         s1 = point(x1, y1);
 260         s2 = point(x1 + w - 1, y1 + h - 1);
 261         d1 = point(x2, y2);
 262         d2 = point(x2 + w - 1, y2 + h - 1);
 263
 264         if ((y1 > y2) || ((y1 == y2) && (x1 > x2)))
 265                 direction = 0;
 266
 267         writemmr(par, ROP, ROP_S);
 268         writemmr(par, CMD, 0xE0000000 | 1 << 19 | 1 << 4 | 1 << 2 | direction);
 269
 270         writemmr(par, SR1, direction ? s2 : s1);
 271         writemmr(par, SR2, direction ? s1 : s2);
 272         writemmr(par, DR1, direction ? d2 : d1);
 273         writemmr(par, DR2, direction ? d1 : d2);
 274 }
 275
 276 /*
 277  * BladeXP specific acceleration functions
 278  */
 279
 280 #define ROP_P 0xF0
 281 #define masked_point(x, y) ((y & 0xffff)<<16|(x & 0xffff))
 282
 283 static void xp_init_accel(struct tridentfb_par *par, int pitch, int bpp)
 284 {
 285         int tmp = 0, v1;
 286         unsigned char x = 0;
 287
 288         switch (bpp) {
 289         case 8:
 290                 x = 0;
 291                 break;
 292         case 16:
 293                 x = 1;
 294                 break;
 295         case 24:
 296                 x = 3;
 297                 break;
 298         case 32:
 299                 x = 2;
 300                 break;
 301         }
 302
 303         switch (pitch << (bpp >> 3)) {
 304         case 8192:
 305         case 512:
 306                 x |= 0x00;
 307                 break;
 308         case 1024:
 309                 x |= 0x04;
 310                 break;
 311         case 2048:
 312                 x |= 0x08;
 313                 break;
 314         case 4096:
 315                 x |= 0x0C;
 316                 break;
 317         }
 318
 319         t_outb(par, x, 0x2125);
 320
 321         eng_oper = x | 0x40;
 322
 323         switch (bpp) {
 324         case 8:
 325                 tmp = 18;
 326                 break;
 327         case 15:
 328         case 16:
 329                 tmp = 19;
 330                 break;
 331         case 24:
 332         case 32:
 333                 tmp = 20;
 334                 break;
 335         }
 336
 337         v1 = pitch << tmp;
 338
 339         writemmr(par, 0x2154, v1);
 340         writemmr(par, 0x2150, v1);
 341         t_outb(par, 3, 0x2126);
 342 }
 343
 344 static void xp_wait_engine(struct tridentfb_par *par)
 345 {
 346         int busy;
 347         int count, timeout;
 348
 349         count = 0;
 350         timeout = 0;
 351         for (;;) {
 352                 busy = t_inb(par, STA) & 0x80;
 353                 if (busy != 0x80)
 354                         return;
 355                 count++;
 356                 if (count == 10000000) {
 357                         /* Timeout */
 358                         count = 9990000;
 359                         timeout++;
 360                         if (timeout == 8) {
 361                                 /* Reset engine */
 362                                 t_outb(par, 0x00, 0x2120);
 363                                 return;
 364                         }
 365                 }
 366         }
 367 }
 368
 369 static void xp_fill_rect(struct tridentfb_par *par,
 370                          u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop)
 371 {
 372         writemmr(par, 0x2127, ROP_P);
 373         writemmr(par, 0x2158, c);
 374         writemmr(par, 0x2128, 0x4000);
 375         writemmr(par, 0x2140, masked_point(h, w));
 376         writemmr(par, 0x2138, masked_point(y, x));
 377         t_outb(par, 0x01, 0x2124);
 378         t_outb(par, eng_oper, 0x2125);
 379 }
 380
 381 static void xp_copy_rect(struct tridentfb_par *par,
 382                          u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h)
 383 {
 384         int direction;
 385         u32 x1_tmp, x2_tmp, y1_tmp, y2_tmp;
 386
 387         direction = 0x0004;
 388
 389         if ((x1 < x2) && (y1 == y2)) {
 390                 direction |= 0x0200;
 391                 x1_tmp = x1 + w - 1;
 392                 x2_tmp = x2 + w - 1;
 393         } else {
 394                 x1_tmp = x1;
 395                 x2_tmp = x2;
 396         }
 397
 398         if (y1 < y2) {
 399                 direction |= 0x0100;
 400                 y1_tmp = y1 + h - 1;
 401                 y2_tmp = y2 + h - 1;
 402         } else {
 403                 y1_tmp = y1;
 404                 y2_tmp = y2;
 405         }
 406
 407         writemmr(par, 0x2128, direction);
 408         t_outb(par, ROP_S, 0x2127);
 409         writemmr(par, 0x213C, masked_point(y1_tmp, x1_tmp));
 410         writemmr(par, 0x2138, masked_point(y2_tmp, x2_tmp));
 411         writemmr(par, 0x2140, masked_point(h, w));
 412         t_outb(par, 0x01, 0x2124);
 413 }
 414
 415 /*
 416  * Image specific acceleration functions
 417  */
 418 static void image_init_accel(struct tridentfb_par *par, int pitch, int bpp)
 419 {
 420         int tmp = 0;
 421         switch (bpp) {
 422         case 8:
 423                 tmp = 0;
 424                 break;
 425         case 15:
 426                 tmp = 5;
 427                 break;
 428         case 16:
 429                 tmp = 1;
 430                 break;
 431         case 24:
 432         case 32:
 433                 tmp = 2;
 434                 break;
 435         }
 436         writemmr(par, 0x2120, 0xF0000000);
 437         writemmr(par, 0x2120, 0x40000000 | tmp);
 438         writemmr(par, 0x2120, 0x80000000);
 439         writemmr(par, 0x2144, 0x00000000);
 440         writemmr(par, 0x2148, 0x00000000);
 441         writemmr(par, 0x2150, 0x00000000);
 442         writemmr(par, 0x2154, 0x00000000);
 443         writemmr(par, 0x2120, 0x60000000 | (pitch << 16) | pitch);
 444         writemmr(par, 0x216C, 0x00000000);
 445         writemmr(par, 0x2170, 0x00000000);
 446         writemmr(par, 0x217C, 0x00000000);
 447         writemmr(par, 0x2120, 0x10000000);
 448         writemmr(par, 0x2130, (2047 << 16) | 2047);
 449 }
 450
 451 static void image_wait_engine(struct tridentfb_par *par)
 452 {
 453         while (readmmr(par, 0x2164) & 0xF0000000) ;
 454 }
 455
 456 static void image_fill_rect(struct tridentfb_par *par,
 457                             u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop)
 458 {
 459         writemmr(par, 0x2120, 0x80000000);
 460         writemmr(par, 0x2120, 0x90000000 | ROP_S);
 461
 462         writemmr(par, 0x2144, c);
 463
 464         writemmr(par, DR1, point(x, y));
 465         writemmr(par, DR2, point(x + w - 1, y + h - 1));
 466
 467         writemmr(par, 0x2124, 0x80000000 | 3 << 22 | 1 << 10 | 1 << 9);
 468 }
 469
 470 static void image_copy_rect(struct tridentfb_par *par,
 471                             u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h)
 472 {
 473         u32 s1, s2, d1, d2;
 474         int direction = 2;
 475         s1 = point(x1, y1);
 476         s2 = point(x1 + w - 1, y1 + h - 1);
 477         d1 = point(x2, y2);
 478         d2 = point(x2 + w - 1, y2 + h - 1);
 479
 480         if ((y1 > y2) || ((y1 == y2) && (x1 > x2)))
 481                 direction = 0;
 482
 483         writemmr(par, 0x2120, 0x80000000);
 484         writemmr(par, 0x2120, 0x90000000 | ROP_S);
 485
 486         writemmr(par, SR1, direction ? s2 : s1);
 487         writemmr(par, SR2, direction ? s1 : s2);
 488         writemmr(par, DR1, direction ? d2 : d1);
 489         writemmr(par, DR2, direction ? d1 : d2);
 490         writemmr(par, 0x2124,
 491                  0x80000000 | 1 << 22 | 1 << 10 | 1 << 7 | direction);
 492 }
 493
 494 /*
 495  * TGUI 9440/96XX acceleration
 496  */
 497
 498 static void tgui_init_accel(struct tridentfb_par *par, int pitch, int bpp)
 499 {
 500         unsigned char x = 0;
 501
 502         /* disable clipping */
 503         writemmr(par, 0x2148, 0);
 504         writemmr(par, 0x214C, point(4095, 2047));
 505
 506         switch (bpp) {
 507         case 8:
 508                 x = 0;
 509                 break;
 510         case 16:
 511                 x = 1;
 512                 break;
 513         case 24:
 514                 x = 3;
 515                 break;
 516         case 32:
 517                 x = 2;
 518                 break;
 519         }
 520
 521         switch ((pitch * bpp) / 8) {
 522         case 8192:
 523         case 512:
 524                 x |= 0x00;
 525                 break;
 526         case 1024:
 527                 x |= 0x04;
 528                 break;
 529         case 2048:
 530                 x |= 0x08;
 531                 break;
 532         case 4096:
 533                 x |= 0x0C;
 534                 break;
 535         }
 536
 537         fb_writew(x, par->io_virt + 0x2122);
 538 }
 539
 540 static void tgui_fill_rect(struct tridentfb_par *par,
 541                            u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop)
 542 {
 543         t_outb(par, ROP_P, 0x2127);
 544         writemmr(par, 0x212c, c);
 545         writemmr(par, 0x2128, 0x4020);
 546         writemmr(par, 0x2140, point(w - 1, h - 1));
 547         writemmr(par, 0x2138, point(x, y));
 548         t_outb(par, 1, 0x2124);
 549 }
 550
 551 static void tgui_copy_rect(struct tridentfb_par *par,
 552                            u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h)
 553 {
 554         int flags = 0;
 555         u16 x1_tmp, x2_tmp, y1_tmp, y2_tmp;
 556
 557         if ((x1 < x2) && (y1 == y2)) {
 558                 flags |= 0x0200;
 559                 x1_tmp = x1 + w - 1;
 560                 x2_tmp = x2 + w - 1;
 561         } else {
 562                 x1_tmp = x1;
 563                 x2_tmp = x2;
 564         }
 565
 566         if (y1 < y2) {
 567                 flags |= 0x0100;
 568                 y1_tmp = y1 + h - 1;
 569                 y2_tmp = y2 + h - 1;
 570         } else {
 571                 y1_tmp = y1;
 572                 y2_tmp = y2;
 573         }
 574
 575         writemmr(par, 0x2128, 0x4 | flags);
 576         t_outb(par, ROP_S, 0x2127);
 577         writemmr(par, 0x213C, point(x1_tmp, y1_tmp));
 578         writemmr(par, 0x2138, point(x2_tmp, y2_tmp));
 579         writemmr(par, 0x2140, point(w - 1, h - 1));
 580         t_outb(par, 1, 0x2124);
 581 }
 582
 583 /*
 584  * Accel functions called by the upper layers
 585  */
 586 #ifdef CONFIG_FB_TRIDENT_ACCEL
 587 static void tridentfb_fillrect(struct fb_info *info,
 588                                const struct fb_fillrect *fr)
 589 {
 590         struct tridentfb_par *par = info->par;
 591         int bpp = info->var.bits_per_pixel;
 592         int col = 0;
 593
 594         switch (bpp) {
 595         default:
 596         case 8:
 597                 col |= fr->color;
 598                 col |= col << 8;
 599                 col |= col << 16;
 600                 break;
 601         case 16:
 602                 col = ((u32 *)(info->pseudo_palette))[fr->color];
 603                 break;
 604         case 32:
 605                 col = ((u32 *)(info->pseudo_palette))[fr->color];
 606                 break;
 607         }
 608
 609         par->fill_rect(par, fr->dx, fr->dy, fr->width,
 610                        fr->height, col, fr->rop);
 611         par->wait_engine(par);
 612 }
 613 static void tridentfb_copyarea(struct fb_info *info,
 614                                const struct fb_copyarea *ca)
 615 {
 616         struct tridentfb_par *par = info->par;
 617
 618         par->copy_rect(par, ca->sx, ca->sy, ca->dx, ca->dy,
 619                        ca->width, ca->height);
 620         par->wait_engine(par);
 621 }
 622 #endif /* CONFIG_FB_TRIDENT_ACCEL */
 623
 624 /*
 625  * Hardware access functions
 626  */
 627
 628 static inline unsigned char read3X4(struct tridentfb_par *par, int reg)
 629 {
 630         return vga_mm_rcrt(par->io_virt, reg);
 631 }
 632
 633 static inline void write3X4(struct tridentfb_par *par, int reg,
 634                             unsigned char val)
 635 {
 636         vga_mm_wcrt(par->io_virt, reg, val);
 637 }
 638
 639 static inline unsigned char read3CE(struct tridentfb_par *par,
 640                                     unsigned char reg)
 641 {
 642         return vga_mm_rgfx(par->io_virt, reg);
 643 }
 644
 645 static inline void writeAttr(struct tridentfb_par *par, int reg,
 646                              unsigned char val)
 647 {
 648         fb_readb(par->io_virt + VGA_IS1_RC);    /* flip-flop to index */
 649         vga_mm_wattr(par->io_virt, reg, val);
 650 }
 651
 652 static inline void write3CE(struct tridentfb_par *par, int reg,
 653                             unsigned char val)
 654 {
 655         vga_mm_wgfx(par->io_virt, reg, val);
 656 }
 657
 658 static void enable_mmio(void)
 659 {
 660         /* Goto New Mode */
 661         vga_io_rseq(0x0B);
 662
 663         /* Unprotect registers */
 664         vga_io_wseq(NewMode1, 0x80);
 665
 666         /* Enable MMIO */
 667         outb(PCIReg, 0x3D4);
 668         outb(inb(0x3D5) | 0x01, 0x3D5);
 669 }
 670
 671 static void disable_mmio(struct tridentfb_par *par)
 672 {
 673         /* Goto New Mode */
 674         vga_mm_rseq(par->io_virt, 0x0B);
 675
 676         /* Unprotect registers */
 677         vga_mm_wseq(par->io_virt, NewMode1, 0x80);
 678
 679         /* Disable MMIO */
 680         t_outb(par, PCIReg, 0x3D4);
 681         t_outb(par, t_inb(par, 0x3D5) & ~0x01, 0x3D5);
 682 }
 683
 684 static void crtc_unlock(struct tridentfb_par *par)
 685 {
 686         write3X4(par, VGA_CRTC_V_SYNC_END,
 687                  read3X4(par, VGA_CRTC_V_SYNC_END) & 0x7F);
 688 }
 689
 690 /*  Return flat panel's maximum x resolution */
 691 static int __devinit get_nativex(struct tridentfb_par *par)
 692 {
 693         int x, y, tmp;
 694
 695         if (nativex)
 696                 return nativex;
 697
 698         tmp = (read3CE(par, VertStretch) >> 4) & 3;
 699
 700         switch (tmp) {
 701         case 0:
 702                 x = 1280; y = 1024;
 703                 break;
 704         case 2:
 705                 x = 1024; y = 768;
 706                 break;
 707         case 3:
 708                 x = 800; y = 600;
 709                 break;
 710         case 4:
 711                 x = 1400; y = 1050;
 712                 break;
 713         case 1:
 714         default:
 715                 x = 640;  y = 480;
 716                 break;
 717         }
 718
 719         output("%dx%d flat panel found\n", x, y);
 720         return x;
 721 }
 722
 723 /* Set pitch */
 724 static void set_lwidth(struct tridentfb_par *par, int width)
 725 {
 726         write3X4(par, VGA_CRTC_OFFSET, width & 0xFF);
 727         write3X4(par, AddColReg,
 728                  (read3X4(par, AddColReg) & 0xCF) | ((width & 0x300) >> 4));
 729 }
 730
 731 /* For resolutions smaller than FP resolution stretch */
 732 static void screen_stretch(struct tridentfb_par *par)
 733 {
 734         if (par->chip_id != CYBERBLADEXPAi1)
 735                 write3CE(par, BiosReg, 0);
 736         else
 737                 write3CE(par, BiosReg, 8);
 738         write3CE(par, VertStretch, (read3CE(par, VertStretch) & 0x7C) | 1);
 739         write3CE(par, HorStretch, (read3CE(par, HorStretch) & 0x7C) | 1);
 740 }
 741
 742 /* For resolutions smaller than FP resolution center */
 743 static void screen_center(struct tridentfb_par *par)
 744 {
 745         write3CE(par, VertStretch, (read3CE(par, VertStretch) & 0x7C) | 0x80);
 746         write3CE(par, HorStretch, (read3CE(par, HorStretch) & 0x7C) | 0x80);
 747 }
 748
 749 /* Address of first shown pixel in display memory */
 750 static void set_screen_start(struct tridentfb_par *par, int base)
 751 {
 752         u8 tmp;
 753         write3X4(par, VGA_CRTC_START_LO, base & 0xFF);
 754         write3X4(par, VGA_CRTC_START_HI, (base & 0xFF00) >> 8);
 755         tmp = read3X4(par, CRTCModuleTest) & 0xDF;
 756         write3X4(par, CRTCModuleTest, tmp | ((base & 0x10000) >> 11));
 757         tmp = read3X4(par, CRTHiOrd) & 0xF8;
 758         write3X4(par, CRTHiOrd, tmp | ((base & 0xE0000) >> 17));
 759 }
 760
 761 /* Set dotclock frequency */
 762 static void set_vclk(struct tridentfb_par *par, unsigned long freq)
 763 {
 764         int m, n, k;
 765         unsigned long fi, d, di;
 766         unsigned char best_m = 0, best_n = 0, best_k = 0;
 767         unsigned char hi, lo;
 768
 769         d = 20000;
 770         for (k = 1; k >= 0; k--)
 771                 for (m = 0; m < 32; m++)
 772                         for (n = 0; n < 122; n++) {
 773                                 fi = ((14318l * (n + 8)) / (m + 2)) >> k;
 774                                 if ((di = abs(fi - freq)) < d) {
 775                                         d = di;
 776                                         best_n = n;
 777                                         best_m = m;
 778                                         best_k = k;
 779                                 }
 780                                 if (fi > freq)
 781                                         break;
 782                         }
 783
 784         if (is_oldclock(par->chip_id)) {
 785                 lo = best_n | (best_m << 7);
 786                 hi = (best_m >> 1) | (best_k << 4);
 787         } else {
 788                 lo = best_n;
 789                 hi = best_m | (best_k << 6);
 790         }
 791
 792         if (is3Dchip(par->chip_id)) {
 793                 vga_mm_wseq(par->io_virt, ClockHigh, hi);
 794                 vga_mm_wseq(par->io_virt, ClockLow, lo);
 795         } else {
 796                 t_outb(par, lo, 0x43C8);
 797                 t_outb(par, hi, 0x43C9);
 798         }
 799         debug("VCLK = %X %X\n", hi, lo);
 800 }
 801
 802 /* Set number of lines for flat panels*/
 803 static void set_number_of_lines(struct tridentfb_par *par, int lines)
 804 {
 805         int tmp = read3CE(par, CyberEnhance) & 0x8F;
 806         if (lines > 1024)
 807                 tmp |= 0x50;
 808         else if (lines > 768)
 809                 tmp |= 0x30;
 810         else if (lines > 600)
 811                 tmp |= 0x20;
 812         else if (lines > 480)
 813                 tmp |= 0x10;
 814         write3CE(par, CyberEnhance, tmp);
 815 }
 816
 817 /*
 818  * If we see that FP is active we assume we have one.
 819  * Otherwise we have a CRT display. User can override.
 820  */
 821 static int __devinit is_flatpanel(struct tridentfb_par *par)
 822 {
 823         if (fp)
 824                 return 1;
 825         if (crt || !iscyber(par->chip_id))
 826                 return 0;
 827         return (read3CE(par, FPConfig) & 0x10) ? 1 : 0;
 828 }
 829
 830 /* Try detecting the video memory size */
 831 static unsigned int __devinit get_memsize(struct tridentfb_par *par)
 832 {
 833         unsigned char tmp, tmp2;
 834         unsigned int k;
 835
 836         /* If memory size provided by user */
 837         if (memsize)
 838                 k = memsize * Kb;
 839         else
 840                 switch (par->chip_id) {
 841                 case CYBER9525DVD:
 842                         k = 2560 * Kb;
 843                         break;
 844                 default:
 845                         tmp = read3X4(par, SPR) & 0x0F;
 846                         switch (tmp) {
 847
 848                         case 0x01:
 849                                 k = 512 * Kb;
 850                                 break;
 851                         case 0x02:
 852                                 k = 6 * Mb;     /* XP */
 853                                 break;
 854                         case 0x03:
 855                                 k = 1 * Mb;
 856                                 break;
 857                         case 0x04:
 858                                 k = 8 * Mb;
 859                                 break;
 860                         case 0x06:
 861                                 k = 10 * Mb;    /* XP */
 862                                 break;
 863                         case 0x07:
 864                                 k = 2 * Mb;
 865                                 break;
 866                         case 0x08:
 867                                 k = 12 * Mb;    /* XP */
 868                                 break;
 869                         case 0x0A:
 870                                 k = 14 * Mb;    /* XP */
 871                                 break;
 872                         case 0x0C:
 873                                 k = 16 * Mb;    /* XP */
 874                                 break;
 875                         case 0x0E:              /* XP */
 876
 877                                 tmp2 = vga_mm_rseq(par->io_virt, 0xC1);
 878                                 switch (tmp2) {
 879                                 case 0x00:
 880                                         k = 20 * Mb;
 881                                         break;
 882                                 case 0x01:
 883                                         k = 24 * Mb;
 884                                         break;
 885                                 case 0x10:
 886                                         k = 28 * Mb;
 887                                         break;
 888                                 case 0x11:
 889                                         k = 32 * Mb;
 890                                         break;
 891                                 default:
 892                                         k = 1 * Mb;
 893                                         break;
 894                                 }
 895                                 break;
 896
 897                         case 0x0F:
 898                                 k = 4 * Mb;
 899                                 break;
 900                         default:
 901                                 k = 1 * Mb;
 902                                 break;
 903                         }
 904                 }
 905
 906         k -= memdiff * Kb;
 907         output("framebuffer size = %d Kb\n", k / Kb);
 908         return k;
 909 }
 910
 911 /* See if we can handle the video mode described in var */
 912 static int tridentfb_check_var(struct fb_var_screeninfo *var,
 913                                struct fb_info *info)
 914 {
 915         struct tridentfb_par *par = info->par;
 916         int bpp = var->bits_per_pixel;
 917         int line_length;
 918         int ramdac = 230000; /* 230MHz for most 3D chips */
 919         debug("enter\n");
 920
 921         /* check color depth */
 922         if (bpp == 24)
 923                 bpp = var->bits_per_pixel = 32;
 924         if (par->chip_id == TGUI9440 && bpp == 32)
 925                 return -EINVAL;
 926         /* check whether resolution fits on panel and in memory */
 927         if (par->flatpanel && nativex && var->xres > nativex)
 928                 return -EINVAL;
 929         /* various resolution checks */
 930         var->xres = (var->xres + 7) & ~0x7;
 931         if (var->xres != var->xres_virtual)
 932                 var->xres_virtual = var->xres;
 933         line_length = var->xres_virtual * bpp / 8;
 934 #ifdef CONFIG_FB_TRIDENT_ACCEL
 935         if (!is3Dchip(par->chip_id)) {
 936                 /* acceleration requires line length to be power of 2 */
 937                 if (line_length <= 512)
 938                         var->xres_virtual = 512 * 8 / bpp;
 939                 else if (line_length <= 1024)
 940                         var->xres_virtual = 1024 * 8 / bpp;
 941                 else if (line_length <= 2048)
 942                         var->xres_virtual = 2048 * 8 / bpp;
 943                 else if (line_length <= 4096)
 944                         var->xres_virtual = 4096 * 8 / bpp;
 945                 else if (line_length <= 8192)
 946                         var->xres_virtual = 8192 * 8 / bpp;
 947
 948                 line_length = var->xres_virtual * bpp / 8;
 949         }
 950 #endif
 951         if (var->yres > var->yres_virtual)
 952                 var->yres_virtual = var->yres;
 953         if (line_length * var->yres_virtual > info->fix.smem_len)
 954                 return -EINVAL;
 955
 956         switch (bpp) {
 957         case 8:
 958                 var->red.offset = 0;
 959                 var->green.offset = 0;
 960                 var->blue.offset = 0;
 961                 var->red.length = 6;
 962                 var->green.length = 6;
 963                 var->blue.length = 6;
 964                 break;
 965         case 16:
 966                 var->red.offset = 11;
 967                 var->green.offset = 5;
 968                 var->blue.offset = 0;
 969                 var->red.length = 5;
 970                 var->green.length = 6;
 971                 var->blue.length = 5;
 972                 break;
 973         case 32:
 974                 var->red.offset = 16;
 975                 var->green.offset = 8;
 976                 var->blue.offset = 0;
 977                 var->red.length = 8;
 978                 var->green.length = 8;
 979                 var->blue.length = 8;
 980                 break;
 981         default:
 982                 return -EINVAL;
 983         }
 984
 985         if (is_xp(par->chip_id))
 986                 ramdac = 350000;
 987
 988         switch (par->chip_id) {
 989         case TGUI9440:
 990                 ramdac = (bpp >= 16) ? 45000 : 90000;
 991                 break;
 992         case CYBER9320:
 993         case TGUI9660:
 994                 ramdac = 135000;
 995                 break;
 996         case PROVIDIA9685:
 997         case CYBER9388:
 998         case CYBER9382:
 999         case CYBER9385:
1000                 ramdac = 170000;
1001                 break;
1002         }
1003
1004         /* The clock is doubled for 32 bpp */
1005         if (bpp == 32)
1006                 ramdac /= 2;
1007
1008         if (PICOS2KHZ(var->pixclock) > ramdac)
1009                 return -EINVAL;
1010
1011         debug("exit\n");
1012
1013         return 0;
1014
1015 }
1016
1017 /* Pan the display */
1018 static int tridentfb_pan_display(struct fb_var_screeninfo *var,
1019                                  struct fb_info *info)
1020 {
1021         struct tridentfb_par *par = info->par;
1022         unsigned int offset;
1023
1024         debug("enter\n");
1025         offset = (var->xoffset + (var->yoffset * var->xres_virtual))
1026                 * var->bits_per_pixel / 32;
1027         info->var.xoffset = var->xoffset;
1028         info->var.yoffset = var->yoffset;
1029         set_screen_start(par, offset);
1030         debug("exit\n");
1031         return 0;
1032 }
1033
1034 static void shadowmode_on(struct tridentfb_par *par)
1035 {
1036         write3CE(par, CyberControl, read3CE(par, CyberControl) | 0x81);
1037 }
1038
1039 static void shadowmode_off(struct tridentfb_par *par)
1040 {
1041         write3CE(par, CyberControl, read3CE(par, CyberControl) & 0x7E);
1042 }
1043
1044 /* Set the hardware to the requested video mode */
1045 static int tridentfb_set_par(struct fb_info *info)
1046 {
1047         struct tridentfb_par *par = (struct tridentfb_par *)(info->par);
1048         u32 htotal, hdispend, hsyncstart, hsyncend, hblankstart, hblankend;
1049         u32 vtotal, vdispend, vsyncstart, vsyncend, vblankstart, vblankend;
1050         struct fb_var_screeninfo *var = &info->var;
1051         int bpp = var->bits_per_pixel;
1052         unsigned char tmp;
1053         unsigned long vclk;
1054
1055         debug("enter\n");
1056         hdispend = var->xres / 8 - 1;
1057         hsyncstart = (var->xres + var->right_margin) / 8 - 1;
1058         hsyncend = (var->xres + var->right_margin + var->hsync_len) / 8 - 1;
1059         htotal = (var->xres + var->left_margin + var->right_margin +
1060                   var->hsync_len) / 8 - 5;
1061         hblankstart = hdispend + 1;
1062         hblankend = htotal + 3;
1063
1064         vdispend = var->yres - 1;
1065         vsyncstart = var->yres + var->lower_margin;
1066         vsyncend = vsyncstart + var->vsync_len;
1067         vtotal = var->upper_margin + vsyncend - 2;
1068         vblankstart = vdispend + 1;
1069         vblankend = vtotal;
1070
1071         crtc_unlock(par);
1072         write3CE(par, CyberControl, 8);
1073
1074         if (par->flatpanel && var->xres < nativex) {
1075                 /*
1076                  * on flat panels with native size larger
1077                  * than requested resolution decide whether
1078                  * we stretch or center
1079                  */
1080                 t_outb(par, 0xEB, VGA_MIS_W);
1081
1082                 shadowmode_on(par);
1083
1084                 if (center)
1085                         screen_center(par);
1086                 else if (stretch)
1087                         screen_stretch(par);
1088
1089         } else {
1090                 t_outb(par, 0x2B, VGA_MIS_W);
1091                 write3CE(par, CyberControl, 8);
1092         }
1093
1094         /* vertical timing values */
1095         write3X4(par, VGA_CRTC_V_TOTAL, vtotal & 0xFF);
1096         write3X4(par, VGA_CRTC_V_DISP_END, vdispend & 0xFF);
1097         write3X4(par, VGA_CRTC_V_SYNC_START, vsyncstart & 0xFF);
1098         write3X4(par, VGA_CRTC_V_SYNC_END, (vsyncend & 0x0F));
1099         write3X4(par, VGA_CRTC_V_BLANK_START, vblankstart & 0xFF);
1100         write3X4(par, VGA_CRTC_V_BLANK_END, vblankend & 0xFF);
1101
1102         /* horizontal timing values */
1103         write3X4(par, VGA_CRTC_H_TOTAL, htotal & 0xFF);
1104         write3X4(par, VGA_CRTC_H_DISP, hdispend & 0xFF);
1105         write3X4(par, VGA_CRTC_H_SYNC_START, hsyncstart & 0xFF);
1106         write3X4(par, VGA_CRTC_H_SYNC_END,
1107                  (hsyncend & 0x1F) | ((hblankend & 0x20) << 2));
1108         write3X4(par, VGA_CRTC_H_BLANK_START, hblankstart & 0xFF);
1109         write3X4(par, VGA_CRTC_H_BLANK_END, hblankend & 0x1F);
1110
1111         /* higher bits of vertical timing values */
1112         tmp = 0x10;
1113         if (vtotal & 0x100) tmp |= 0x01;
1114         if (vdispend & 0x100) tmp |= 0x02;
1115         if (vsyncstart & 0x100) tmp |= 0x04;
1116         if (vblankstart & 0x100) tmp |= 0x08;
1117
1118         if (vtotal & 0x200) tmp |= 0x20;
1119         if (vdispend & 0x200) tmp |= 0x40;
1120         if (vsyncstart & 0x200) tmp |= 0x80;
1121         write3X4(par, VGA_CRTC_OVERFLOW, tmp);
1122
1123         tmp = read3X4(par, CRTHiOrd) & 0x07;
1124         tmp |= 0x08;    /* line compare bit 10 */
1125         if (vtotal & 0x400) tmp |= 0x80;
1126         if (vblankstart & 0x400) tmp |= 0x40;
1127         if (vsyncstart & 0x400) tmp |= 0x20;
1128         if (vdispend & 0x400) tmp |= 0x10;
1129         write3X4(par, CRTHiOrd, tmp);
1130
1131         tmp = (htotal >> 8) & 0x01;
1132         tmp |= (hdispend >> 7) & 0x02;
1133         tmp |= (hsyncstart >> 5) & 0x08;
1134         tmp |= (hblankstart >> 4) & 0x10;
1135         write3X4(par, HorizOverflow, tmp);
1136
1137         tmp = 0x40;
1138         if (vblankstart & 0x200) tmp |= 0x20;
1139 //FIXME if (info->var.vmode & FB_VMODE_DOUBLE) tmp |= 0x80;  /* double scan for 200 line modes */
1140         write3X4(par, VGA_CRTC_MAX_SCAN, tmp);
1141
1142         write3X4(par, VGA_CRTC_LINE_COMPARE, 0xFF);
1143         write3X4(par, VGA_CRTC_PRESET_ROW, 0);
1144         write3X4(par, VGA_CRTC_MODE, 0xC3);
1145
1146         write3X4(par, LinearAddReg, 0x20);      /* enable linear addressing */
1147
1148         tmp = (info->var.vmode & FB_VMODE_INTERLACED) ? 0x84 : 0x80;
1149         /* enable access extended memory */
1150         write3X4(par, CRTCModuleTest, tmp);
1151
1152         /* enable GE for text acceleration */
1153         write3X4(par, GraphEngReg, 0x80);
1154
1155 #ifdef CONFIG_FB_TRIDENT_ACCEL
1156         par->init_accel(par, info->var.xres_virtual, bpp);
1157 #endif
1158
1159         switch (bpp) {
1160         case 8:
1161                 tmp = 0x00;
1162                 break;
1163         case 16:
1164                 tmp = 0x05;
1165                 break;
1166         case 24:
1167                 tmp = 0x29;
1168                 break;
1169         case 32:
1170                 tmp = 0x09;
1171                 break;
1172         }
1173
1174         write3X4(par, PixelBusReg, tmp);
1175
1176         tmp = read3X4(par, DRAMControl);
1177         if (!is_oldprotect(par->chip_id))
1178                 tmp |= 0x10;
1179         if (iscyber(par->chip_id))
1180                 tmp |= 0x20;
1181         write3X4(par, DRAMControl, tmp);        /* both IO, linear enable */
1182
1183         write3X4(par, InterfaceSel, read3X4(par, InterfaceSel) | 0x40);
1184         if (!is_xp(par->chip_id))
1185                 write3X4(par, Performance, read3X4(par, Performance) | 0x10);
1186         /* MMIO & PCI read and write burst enable */
1187         if (par->chip_id != TGUI9440)
1188                 write3X4(par, PCIReg, read3X4(par, PCIReg) | 0x06);
1189
1190         vga_mm_wseq(par->io_virt, 0, 3);
1191         vga_mm_wseq(par->io_virt, 1, 1); /* set char clock 8 dots wide */
1192         /* enable 4 maps because needed in chain4 mode */
1193         vga_mm_wseq(par->io_virt, 2, 0x0F);
1194         vga_mm_wseq(par->io_virt, 3, 0);
1195         vga_mm_wseq(par->io_virt, 4, 0x0E); /* memory mode enable bitmaps ?? */
1196
1197         /* convert from picoseconds to kHz */
1198         vclk = PICOS2KHZ(info->var.pixclock);
1199
1200         /* divide clock by 2 if 32bpp chain4 mode display and CPU path */
1201         tmp = read3CE(par, MiscExtFunc) & 0xF0;
1202         if (bpp == 32 || (par->chip_id == TGUI9440 && bpp == 16)) {
1203                 tmp |= 8;
1204                 vclk *= 2;
1205         }
1206         set_vclk(par, vclk);
1207         write3CE(par, MiscExtFunc, tmp | 0x12);
1208         write3CE(par, 0x5, 0x40);       /* no CGA compat, allow 256 col */
1209         write3CE(par, 0x6, 0x05);       /* graphics mode */
1210         write3CE(par, 0x7, 0x0F);       /* planes? */
1211
1212         if (par->chip_id == CYBERBLADEXPAi1) {
1213                 /* This fixes snow-effect in 32 bpp */
1214                 write3X4(par, VGA_CRTC_H_SYNC_START, 0x84);
1215         }
1216
1217         /* graphics mode and support 256 color modes */
1218         writeAttr(par, 0x10, 0x41);
1219         writeAttr(par, 0x12, 0x0F);     /* planes */
1220         writeAttr(par, 0x13, 0);        /* horizontal pel panning */
1221
1222         /* colors */
1223         for (tmp = 0; tmp < 0x10; tmp++)
1224                 writeAttr(par, tmp, tmp);
1225         fb_readb(par->io_virt + VGA_IS1_RC);    /* flip-flop to index */
1226         t_outb(par, 0x20, VGA_ATT_W);           /* enable attr */
1227
1228         switch (bpp) {
1229         case 8:
1230                 tmp = 0;
1231                 break;
1232         case 15:
1233                 tmp = 0x10;
1234                 break;
1235         case 16:
1236                 tmp = 0x30;
1237                 break;
1238         case 24:
1239         case 32:
1240                 tmp = 0xD0;
1241                 break;
1242         }
1243
1244         t_inb(par, VGA_PEL_IW);
1245         t_inb(par, VGA_PEL_MSK);
1246         t_inb(par, VGA_PEL_MSK);
1247         t_inb(par, VGA_PEL_MSK);
1248         t_inb(par, VGA_PEL_MSK);
1249         t_outb(par, tmp, VGA_PEL_MSK);
1250         t_inb(par, VGA_PEL_IW);
1251
1252         if (par->flatpanel)
1253                 set_number_of_lines(par, info->var.yres);
1254         info->fix.line_length = info->var.xres_virtual * bpp / 8;
1255         set_lwidth(par, info->fix.line_length / 8);
1256         info->fix.visual = (bpp == 8) ? FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_TRUECOLOR;
1257         info->cmap.len = (bpp == 8) ? 256 : 16;
1258         debug("exit\n");
1259         return 0;
1260 }
1261
1262 /* Set one color register */
1263 static int tridentfb_setcolreg(unsigned regno, unsigned red, unsigned green,
1264                                unsigned blue, unsigned transp,
1265                                struct fb_info *info)
1266 {
1267         int bpp = info->var.bits_per_pixel;
1268         struct tridentfb_par *par = info->par;
1269
1270         if (regno >= info->cmap.len)
1271                 return 1;
1272
1273         if (bpp == 8) {
1274                 t_outb(par, 0xFF, VGA_PEL_MSK);
1275                 t_outb(par, regno, VGA_PEL_IW);
1276
1277                 t_outb(par, red >> 10, VGA_PEL_D);
1278                 t_outb(par, green >> 10, VGA_PEL_D);
1279                 t_outb(par, blue >> 10, VGA_PEL_D);
1280
1281         } else if (regno < 16) {
1282                 if (bpp == 16) {        /* RGB 565 */
1283                         u32 col;
1284
1285                         col = (red & 0xF800) | ((green & 0xFC00) >> 5) |
1286                                 ((blue & 0xF800) >> 11);
1287                         col |= col << 16;
1288                         ((u32 *)(info->pseudo_palette))[regno] = col;
1289                 } else if (bpp == 32)           /* ARGB 8888 */
1290                         ((u32*)info->pseudo_palette)[regno] =
1291                                 ((transp & 0xFF00) << 16)       |
1292                                 ((red & 0xFF00) << 8)           |
1293                                 ((green & 0xFF00))              |
1294                                 ((blue & 0xFF00) >> 8);
1295         }
1296
1297 /*      debug("exit\n"); */
1298         return 0;
1299 }
1300
1301 /* Try blanking the screen.For flat panels it does nothing */
1302 static int tridentfb_blank(int blank_mode, struct fb_info *info)
1303 {
1304         unsigned char PMCont, DPMSCont;
1305         struct tridentfb_par *par = info->par;
1306
1307         debug("enter\n");
1308         if (par->flatpanel)
1309                 return 0;
1310         t_outb(par, 0x04, 0x83C8); /* Read DPMS Control */
1311         PMCont = t_inb(par, 0x83C6) & 0xFC;
1312         DPMSCont = read3CE(par, PowerStatus) & 0xFC;
1313         switch (blank_mode) {
1314         case FB_BLANK_UNBLANK:
1315                 /* Screen: On, HSync: On, VSync: On */
1316         case FB_BLANK_NORMAL:
1317                 /* Screen: Off, HSync: On, VSync: On */
1318                 PMCont |= 0x03;
1319                 DPMSCont |= 0x00;
1320                 break;
1321         case FB_BLANK_HSYNC_SUSPEND:
1322                 /* Screen: Off, HSync: Off, VSync: On */
1323                 PMCont |= 0x02;
1324                 DPMSCont |= 0x01;
1325                 break;
1326         case FB_BLANK_VSYNC_SUSPEND:
1327                 /* Screen: Off, HSync: On, VSync: Off */
1328                 PMCont |= 0x02;
1329                 DPMSCont |= 0x02;
1330                 break;
1331         case FB_BLANK_POWERDOWN:
1332                 /* Screen: Off, HSync: Off, VSync: Off */
1333                 PMCont |= 0x00;
1334                 DPMSCont |= 0x03;
1335                 break;
1336         }
1337
1338         write3CE(par, PowerStatus, DPMSCont);
1339         t_outb(par, 4, 0x83C8);
1340         t_outb(par, PMCont, 0x83C6);
1341
1342         debug("exit\n");
1343
1344         /* let fbcon do a softblank for us */
1345         return (blank_mode == FB_BLANK_NORMAL) ? 1 : 0;
1346 }
1347
1348 static struct fb_ops tridentfb_ops = {
1349         .owner = THIS_MODULE,
1350         .fb_setcolreg = tridentfb_setcolreg,
1351         .fb_pan_display = tridentfb_pan_display,
1352         .fb_blank = tridentfb_blank,
1353         .fb_check_var = tridentfb_check_var,
1354         .fb_set_par = tridentfb_set_par,
1355 #ifdef CONFIG_FB_TRIDENT_ACCEL
1356         .fb_fillrect = tridentfb_fillrect,
1357         .fb_copyarea = tridentfb_copyarea,
1358         .fb_imageblit = cfb_imageblit,
1359 #endif
1360 };
1361
1362 static int __devinit trident_pci_probe(struct pci_dev *dev,
1363                                        const struct pci_device_id *id)
1364 {
1365         int err;
1366         unsigned char revision;
1367         struct fb_info *info;
1368         struct tridentfb_par *default_par;
1369         int defaultaccel;
1370         int chip3D;
1371         int chip_id;
1372
1373         err = pci_enable_device(dev);
1374         if (err)
1375                 return err;
1376
1377         info = framebuffer_alloc(sizeof(struct tridentfb_par), &dev->dev);
1378         if (!info)
1379                 return -ENOMEM;
1380         default_par = info->par;
1381
1382         chip_id = id->device;
1383
1384         if (chip_id == CYBERBLADEi1)
1385                 output("*** Please do use cyblafb, Cyberblade/i1 support "
1386                        "will soon be removed from tridentfb!\n");
1387
1388
1389         /* If PCI id is 0x9660 then further detect chip type */
1390
1391         if (chip_id == TGUI9660) {
1392                 revision = vga_io_rseq(RevisionID);
1393
1394                 switch (revision) {
1395                 case 0x21:
1396                         chip_id = PROVIDIA9685;
1397                         break;
1398                 case 0x22:
1399                 case 0x23:
1400                         chip_id = CYBER9397;
1401                         break;
1402                 case 0x2A:
1403                         chip_id = CYBER9397DVD;
1404                         break;
1405                 case 0x30:
1406                 case 0x33:
1407                 case 0x34:
1408                 case 0x35:
1409                 case 0x38:
1410                 case 0x3A:
1411                 case 0xB3:
1412                         chip_id = CYBER9385;
1413                         break;
1414                 case 0x40 ... 0x43:
1415                         chip_id = CYBER9382;
1416                         break;
1417                 case 0x4A:
1418                         chip_id = CYBER9388;
1419                         break;
1420                 default:
1421                         break;
1422                 }
1423         }
1424
1425         chip3D = is3Dchip(chip_id);
1426
1427         if (is_xp(chip_id)) {
1428                 default_par->init_accel = xp_init_accel;
1429                 default_par->wait_engine = xp_wait_engine;
1430                 default_par->fill_rect = xp_fill_rect;
1431                 default_par->copy_rect = xp_copy_rect;
1432         } else if (is_blade(chip_id)) {
1433                 default_par->init_accel = blade_init_accel;
1434                 default_par->wait_engine = blade_wait_engine;
1435                 default_par->fill_rect = blade_fill_rect;
1436                 default_par->copy_rect = blade_copy_rect;
1437         } else if (chip3D) {                    /* 3DImage family left */
1438                 default_par->init_accel = image_init_accel;
1439                 default_par->wait_engine = image_wait_engine;
1440                 default_par->fill_rect = image_fill_rect;
1441                 default_par->copy_rect = image_copy_rect;
1442         } else {                                /* TGUI 9440/96XX family */
1443                 default_par->init_accel = tgui_init_accel;
1444                 default_par->wait_engine = xp_wait_engine;
1445                 default_par->fill_rect = tgui_fill_rect;
1446                 default_par->copy_rect = tgui_copy_rect;
1447         }
1448
1449         default_par->chip_id = chip_id;
1450
1451         /* acceleration is on by default for 3D chips */
1452         defaultaccel = chip3D && !noaccel;
1453
1454         /* setup MMIO region */
1455         tridentfb_fix.mmio_start = pci_resource_start(dev, 1);
1456         tridentfb_fix.mmio_len = chip3D ? 0x20000 : 0x10000;
1457
1458         if (!request_mem_region(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len, "tridentfb")) {
1459                 debug("request_region failed!\n");
1460                 framebuffer_release(info);
1461                 return -1;
1462         }
1463
1464         default_par->io_virt = ioremap_nocache(tridentfb_fix.mmio_start,
1465                                                tridentfb_fix.mmio_len);
1466
1467         if (!default_par->io_virt) {
1468                 debug("ioremap failed\n");
1469                 err = -1;
1470                 goto out_unmap1;
1471         }
1472
1473         enable_mmio();
1474
1475         /* setup framebuffer memory */
1476         tridentfb_fix.smem_start = pci_resource_start(dev, 0);
1477         tridentfb_fix.smem_len = get_memsize(default_par);
1478
1479         if (!request_mem_region(tridentfb_fix.smem_start, tridentfb_fix.smem_len, "tridentfb")) {
1480                 debug("request_mem_region failed!\n");
1481                 disable_mmio(info->par);
1482                 err = -1;
1483                 goto out_unmap1;
1484         }
1485
1486         info->screen_base = ioremap_nocache(tridentfb_fix.smem_start,
1487                                             tridentfb_fix.smem_len);
1488
1489         if (!info->screen_base) {
1490                 debug("ioremap failed\n");
1491                 err = -1;
1492                 goto out_unmap2;
1493         }
1494
1495         output("%s board found\n", pci_name(dev));
1496         default_par->flatpanel = is_flatpanel(default_par);
1497
1498         if (default_par->flatpanel)
1499                 nativex = get_nativex(default_par);
1500
1501         info->fix = tridentfb_fix;
1502         info->fbops = &tridentfb_ops;
1503         info->pseudo_palette = default_par->pseudo_pal;
1504
1505         info->flags = FBINFO_DEFAULT | FBINFO_HWACCEL_YPAN;
1506 #ifdef CONFIG_FB_TRIDENT_ACCEL
1507         info->flags |= FBINFO_HWACCEL_COPYAREA | FBINFO_HWACCEL_FILLRECT;
1508 #endif
1509         if (!fb_find_mode(&info->var, info,
1510                           mode_option, NULL, 0, NULL, bpp)) {
1511                 err = -EINVAL;
1512                 goto out_unmap2;
1513         }
1514         err = fb_alloc_cmap(&info->cmap, 256, 0);
1515         if (err < 0)
1516                 goto out_unmap2;
1517
1518         if (defaultaccel && default_par->init_accel)
1519                 info->var.accel_flags |= FB_ACCELF_TEXT;
1520         else
1521                 info->var.accel_flags &= ~FB_ACCELF_TEXT;
1522         info->var.activate |= FB_ACTIVATE_NOW;
1523         info->device = &dev->dev;
1524         if (register_framebuffer(info) < 0) {
1525                 printk(KERN_ERR "tridentfb: could not register Trident framebuffer\n");
1526                 fb_dealloc_cmap(&info->cmap);
1527                 err = -EINVAL;
1528                 goto out_unmap2;
1529         }
1530         output("fb%d: %s frame buffer device %dx%d-%dbpp\n",
1531            info->node, info->fix.id, info->var.xres,
1532            info->var.yres, info->var.bits_per_pixel);
1533
1534         pci_set_drvdata(dev, info);
1535         return 0;
1536
1537 out_unmap2:
1538         if (info->screen_base)
1539                 iounmap(info->screen_base);
1540         release_mem_region(tridentfb_fix.smem_start, tridentfb_fix.smem_len);
1541         disable_mmio(info->par);
1542 out_unmap1:
1543         if (default_par->io_virt)
1544                 iounmap(default_par->io_virt);
1545         release_mem_region(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len);
1546         framebuffer_release(info);
1547         return err;
1548 }
1549
1550 static void __devexit trident_pci_remove(struct pci_dev *dev)
1551 {
1552         struct fb_info *info = pci_get_drvdata(dev);
1553         struct tridentfb_par *par = info->par;
1554
1555         unregister_framebuffer(info);
1556         iounmap(par->io_virt);
1557         iounmap(info->screen_base);
1558         release_mem_region(tridentfb_fix.smem_start, tridentfb_fix.smem_len);
1559         release_mem_region(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len);
1560         pci_set_drvdata(dev, NULL);
1561         framebuffer_release(info);
1562 }
1563
1564 /* List of boards that we are trying to support */
1565 static struct pci_device_id trident_devices[] = {
1566         {PCI_VENDOR_ID_TRIDENT, BLADE3D, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1567         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEi7, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1568         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEi7D, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1569         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEi1, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1570         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEi1D, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1571         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEAi1, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1572         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEAi1D, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1573         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEE4, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1574         {PCI_VENDOR_ID_TRIDENT, TGUI9440, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1575         {PCI_VENDOR_ID_TRIDENT, TGUI9660, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1576         {PCI_VENDOR_ID_TRIDENT, IMAGE975, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1577         {PCI_VENDOR_ID_TRIDENT, IMAGE985, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1578         {PCI_VENDOR_ID_TRIDENT, CYBER9320, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1579         {PCI_VENDOR_ID_TRIDENT, CYBER9388, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1580         {PCI_VENDOR_ID_TRIDENT, CYBER9520, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1581         {PCI_VENDOR_ID_TRIDENT, CYBER9525DVD, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1582         {PCI_VENDOR_ID_TRIDENT, CYBER9397, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1583         {PCI_VENDOR_ID_TRIDENT, CYBER9397DVD, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1584         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEXPAi1, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1585         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEXPm8, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1586         {PCI_VENDOR_ID_TRIDENT, CYBERBLADEXPm16, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1587         {0,}
1588 };
1589
1590 MODULE_DEVICE_TABLE(pci, trident_devices);
1591
1592 static struct pci_driver tridentfb_pci_driver = {
1593         .name = "tridentfb",
1594         .id_table = trident_devices,
1595         .probe = trident_pci_probe,
1596         .remove = __devexit_p(trident_pci_remove)
1597 };
1598
1599 /*
1600  * Parse user specified options (`video=trident:')
1601  * example:
1602  *      video=trident:800x600,bpp=16,noaccel
1603  */
1604 #ifndef MODULE
1605 static int __init tridentfb_setup(char *options)
1606 {
1607         char *opt;
1608         if (!options || !*options)
1609                 return 0;
1610         while ((opt = strsep(&options, ",")) != NULL) {
1611                 if (!*opt)
1612                         continue;
1613                 if (!strncmp(opt, "noaccel", 7))
1614                         noaccel = 1;
1615                 else if (!strncmp(opt, "fp", 2))
1616                         fp = 1;
1617                 else if (!strncmp(opt, "crt", 3))
1618                         fp = 0;
1619                 else if (!strncmp(opt, "bpp=", 4))
1620                         bpp = simple_strtoul(opt + 4, NULL, 0);
1621                 else if (!strncmp(opt, "center", 6))
1622                         center = 1;
1623                 else if (!strncmp(opt, "stretch", 7))
1624                         stretch = 1;
1625                 else if (!strncmp(opt, "memsize=", 8))
1626                         memsize = simple_strtoul(opt + 8, NULL, 0);
1627                 else if (!strncmp(opt, "memdiff=", 8))
1628                         memdiff = simple_strtoul(opt + 8, NULL, 0);
1629                 else if (!strncmp(opt, "nativex=", 8))
1630                         nativex = simple_strtoul(opt + 8, NULL, 0);
1631                 else
1632                         mode_option = opt;
1633         }
1634         return 0;
1635 }
1636 #endif
1637
1638 static int __init tridentfb_init(void)
1639 {
1640 #ifndef MODULE
1641         char *option = NULL;
1642
1643         if (fb_get_options("tridentfb", &option))
1644                 return -ENODEV;
1645         tridentfb_setup(option);
1646 #endif
1647         output("Trident framebuffer %s initializing\n", VERSION);
1648         return pci_register_driver(&tridentfb_pci_driver);
1649 }
1650
1651 static void __exit tridentfb_exit(void)
1652 {
1653         pci_unregister_driver(&tridentfb_pci_driver);
1654 }
1655
1656 module_init(tridentfb_init);
1657 module_exit(tridentfb_exit);
1658
1659 MODULE_AUTHOR("Jani Monoses <jani@iv.ro>");
1660 MODULE_DESCRIPTION("Framebuffer driver for Trident cards");
1661 MODULE_LICENSE("GPL");
1662