drivers/video/fbdev/tdfxfb.c

   1 // SPDX-License-Identifier: GPL-2.0-only
   2 /*
   3  *
   4  * tdfxfb.c
   5  *
   6  * Author: Hannu Mallat <hmallat@cc.hut.fi>
   7  *
   8  * Copyright © 1999 Hannu Mallat
   9  * All rights reserved
  10  *
  11  * Created      : Thu Sep 23 18:17:43 1999, hmallat
  12  * Last modified: Tue Nov  2 21:19:47 1999, hmallat
  13  *
  14  * I2C part copied from the i2c-voodoo3.c driver by:
  15  * Frodo Looijaard <frodol@dds.nl>,
  16  * Philip Edelbrock <phil@netroedge.com>,
  17  * Ralph Metzler <rjkm@thp.uni-koeln.de>, and
  18  * Mark D. Studebaker <mdsxyz123@yahoo.com>
  19  *
  20  * Lots of the information here comes from the Daryll Strauss' Banshee
  21  * patches to the XF86 server, and the rest comes from the 3dfx
  22  * Banshee specification. I'm very much indebted to Daryll for his
  23  * work on the X server.
  24  *
  25  * Voodoo3 support was contributed Harold Oga. Lots of additions
  26  * (proper acceleration, 24 bpp, hardware cursor) and bug fixes by Attila
  27  * Kesmarki. Thanks guys!
  28  *
  29  * Voodoo1 and Voodoo2 support aren't relevant to this driver as they
  30  * behave very differently from the Voodoo3/4/5. For anyone wanting to
  31  * use frame buffer on the Voodoo1/2, see the sstfb driver (which is
  32  * located at http://www.sourceforge.net/projects/sstfb).
  33  *
  34  * While I _am_ grateful to 3Dfx for releasing the specs for Banshee,
  35  * I do wish the next version is a bit more complete. Without the XF86
  36  * patches I couldn't have gotten even this far... for instance, the
  37  * extensions to the VGA register set go completely unmentioned in the
  38  * spec! Also, lots of references are made to the 'SST core', but no
  39  * spec is publicly available, AFAIK.
  40  *
  41  * The structure of this driver comes pretty much from the Permedia
  42  * driver by Ilario Nardinocchi, which in turn is based on skeletonfb.
  43  *
  44  * TODO:
  45  * - multihead support (basically need to support an array of fb_infos)
  46  * - support other architectures (PPC, Alpha); does the fact that the VGA
  47  *   core can be accessed only thru I/O (not memory mapped) complicate
  48  *   things?
  49  *
  50  * Version history:
  51  *
  52  * 0.1.4 (released 2002-05-28)  ported over to new fbdev api by James Simmons
  53  *
  54  * 0.1.3 (released 1999-11-02)  added Attila's panning support, code
  55  *                              reorg, hwcursor address page size alignment
  56  *                              (for mmapping both frame buffer and regs),
  57  *                              and my changes to get rid of hardcoded
  58  *                              VGA i/o register locations (uses PCI
  59  *                              configuration info now)
  60  * 0.1.2 (released 1999-10-19)  added Attila Kesmarki's bug fixes and
  61  *                              improvements
  62  * 0.1.1 (released 1999-10-07)  added Voodoo3 support by Harold Oga.
  63  * 0.1.0 (released 1999-10-06)  initial version
  64  *
  65  */
  66
  67 #include <linux/module.h>
  68 #include <linux/kernel.h>
  69 #include <linux/errno.h>
  70 #include <linux/string.h>
  71 #include <linux/mm.h>
  72 #include <linux/slab.h>
  73 #include <linux/fb.h>
  74 #include <linux/init.h>
  75 #include <linux/pci.h>
  76 #include <asm/io.h>
  77
  78 #include <video/tdfx.h>
  79
  80 #define DPRINTK(a, b...) pr_debug("fb: %s: " a, __func__ , ## b)
  81
  82 #define BANSHEE_MAX_PIXCLOCK 270000
  83 #define VOODOO3_MAX_PIXCLOCK 300000
  84 #define VOODOO5_MAX_PIXCLOCK 350000
  85
  86 static const struct fb_fix_screeninfo tdfx_fix = {
  87         .type =         FB_TYPE_PACKED_PIXELS,
  88         .visual =       FB_VISUAL_PSEUDOCOLOR,
  89         .ypanstep =     1,
  90         .ywrapstep =    1,
  91         .accel =        FB_ACCEL_3DFX_BANSHEE
  92 };
  93
  94 static const struct fb_var_screeninfo tdfx_var = {
  95         /* "640x480, 8 bpp @ 60 Hz */
  96         .xres =         640,
  97         .yres =         480,
  98         .xres_virtual = 640,
  99         .yres_virtual = 1024,
 100         .bits_per_pixel = 8,
 101         .red =          {0, 8, 0},
 102         .blue =         {0, 8, 0},
 103         .green =        {0, 8, 0},
 104         .activate =     FB_ACTIVATE_NOW,
 105         .height =       -1,
 106         .width =        -1,
 107         .accel_flags =  FB_ACCELF_TEXT,
 108         .pixclock =     39722,
 109         .left_margin =  40,
 110         .right_margin = 24,
 111         .upper_margin = 32,
 112         .lower_margin = 11,
 113         .hsync_len =    96,
 114         .vsync_len =    2,
 115         .vmode =        FB_VMODE_NONINTERLACED
 116 };
 117
 118 /*
 119  * PCI driver prototypes
 120  */
 121 static int tdfxfb_probe(struct pci_dev *pdev, const struct pci_device_id *id);
 122 static void tdfxfb_remove(struct pci_dev *pdev);
 123
 124 static const struct pci_device_id tdfxfb_id_table[] = {
 125         { PCI_VENDOR_ID_3DFX, PCI_DEVICE_ID_3DFX_BANSHEE,
 126           PCI_ANY_ID, PCI_ANY_ID, PCI_BASE_CLASS_DISPLAY << 16,
 127           0xff0000, 0 },
 128         { PCI_VENDOR_ID_3DFX, PCI_DEVICE_ID_3DFX_VOODOO3,
 129           PCI_ANY_ID, PCI_ANY_ID, PCI_BASE_CLASS_DISPLAY << 16,
 130           0xff0000, 0 },
 131         { PCI_VENDOR_ID_3DFX, PCI_DEVICE_ID_3DFX_VOODOO5,
 132           PCI_ANY_ID, PCI_ANY_ID, PCI_BASE_CLASS_DISPLAY << 16,
 133           0xff0000, 0 },
 134         { 0, }
 135 };
 136
 137 static struct pci_driver tdfxfb_driver = {
 138         .name           = "tdfxfb",
 139         .id_table       = tdfxfb_id_table,
 140         .probe          = tdfxfb_probe,
 141         .remove         = tdfxfb_remove,
 142 };
 143
 144 MODULE_DEVICE_TABLE(pci, tdfxfb_id_table);
 145
 146 /*
 147  * Driver data
 148  */
 149 static int nopan;
 150 static int nowrap = 1;      /* not implemented (yet) */
 151 static int hwcursor = 1;
 152 static char *mode_option;
 153 static bool nomtrr;
 154
 155 /* -------------------------------------------------------------------------
 156  *                      Hardware-specific funcions
 157  * ------------------------------------------------------------------------- */
 158
 159 static inline u8 vga_inb(struct tdfx_par *par, u32 reg)
 160 {
 161         return inb(par->iobase + reg - 0x300);
 162 }
 163
 164 static inline void vga_outb(struct tdfx_par *par, u32 reg, u8 val)
 165 {
 166         outb(val, par->iobase + reg - 0x300);
 167 }
 168
 169 static inline void gra_outb(struct tdfx_par *par, u32 idx, u8 val)
 170 {
 171         vga_outb(par, GRA_I, idx);
 172         wmb();
 173         vga_outb(par, GRA_D, val);
 174         wmb();
 175 }
 176
 177 static inline void seq_outb(struct tdfx_par *par, u32 idx, u8 val)
 178 {
 179         vga_outb(par, SEQ_I, idx);
 180         wmb();
 181         vga_outb(par, SEQ_D, val);
 182         wmb();
 183 }
 184
 185 static inline u8 seq_inb(struct tdfx_par *par, u32 idx)
 186 {
 187         vga_outb(par, SEQ_I, idx);
 188         mb();
 189         return vga_inb(par, SEQ_D);
 190 }
 191
 192 static inline void crt_outb(struct tdfx_par *par, u32 idx, u8 val)
 193 {
 194         vga_outb(par, CRT_I, idx);
 195         wmb();
 196         vga_outb(par, CRT_D, val);
 197         wmb();
 198 }
 199
 200 static inline u8 crt_inb(struct tdfx_par *par, u32 idx)
 201 {
 202         vga_outb(par, CRT_I, idx);
 203         mb();
 204         return vga_inb(par, CRT_D);
 205 }
 206
 207 static inline void att_outb(struct tdfx_par *par, u32 idx, u8 val)
 208 {
 209         unsigned char tmp;
 210
 211         tmp = vga_inb(par, IS1_R);
 212         vga_outb(par, ATT_IW, idx);
 213         vga_outb(par, ATT_IW, val);
 214 }
 215
 216 static inline void vga_disable_video(struct tdfx_par *par)
 217 {
 218         unsigned char s;
 219
 220         s = seq_inb(par, 0x01) | 0x20;
 221         seq_outb(par, 0x00, 0x01);
 222         seq_outb(par, 0x01, s);
 223         seq_outb(par, 0x00, 0x03);
 224 }
 225
 226 static inline void vga_enable_video(struct tdfx_par *par)
 227 {
 228         unsigned char s;
 229
 230         s = seq_inb(par, 0x01) & 0xdf;
 231         seq_outb(par, 0x00, 0x01);
 232         seq_outb(par, 0x01, s);
 233         seq_outb(par, 0x00, 0x03);
 234 }
 235
 236 static inline void vga_enable_palette(struct tdfx_par *par)
 237 {
 238         vga_inb(par, IS1_R);
 239         mb();
 240         vga_outb(par, ATT_IW, 0x20);
 241 }
 242
 243 static inline u32 tdfx_inl(struct tdfx_par *par, unsigned int reg)
 244 {
 245         return readl(par->regbase_virt + reg);
 246 }
 247
 248 static inline void tdfx_outl(struct tdfx_par *par, unsigned int reg, u32 val)
 249 {
 250         writel(val, par->regbase_virt + reg);
 251 }
 252
 253 static inline void banshee_make_room(struct tdfx_par *par, int size)
 254 {
 255         /* Note: The Voodoo3's onboard FIFO has 32 slots. This loop
 256          * won't quit if you ask for more. */
 257         while ((tdfx_inl(par, STATUS) & 0x1f) < size - 1)
 258                 cpu_relax();
 259 }
 260
 261 static int banshee_wait_idle(struct fb_info *info)
 262 {
 263         struct tdfx_par *par = info->par;
 264         int i = 0;
 265
 266         banshee_make_room(par, 1);
 267         tdfx_outl(par, COMMAND_3D, COMMAND_3D_NOP);
 268
 269         do {
 270                 if ((tdfx_inl(par, STATUS) & STATUS_BUSY) == 0)
 271                         i++;
 272         } while (i < 3);
 273
 274         return 0;
 275 }
 276
 277 /*
 278  * Set the color of a palette entry in 8bpp mode
 279  */
 280 static inline void do_setpalentry(struct tdfx_par *par, unsigned regno, u32 c)
 281 {
 282         banshee_make_room(par, 2);
 283         tdfx_outl(par, DACADDR, regno);
 284         /* read after write makes it working */
 285         tdfx_inl(par, DACADDR);
 286         tdfx_outl(par, DACDATA, c);
 287 }
 288
 289 static u32 do_calc_pll(int freq, int *freq_out)
 290 {
 291         int m, n, k, best_m, best_n, best_k, best_error;
 292         int fref = 14318;
 293
 294         best_error = freq;
 295         best_n = best_m = best_k = 0;
 296
 297         for (k = 3; k >= 0; k--) {
 298                 for (m = 63; m >= 0; m--) {
 299                         /*
 300                          * Estimate value of n that produces target frequency
 301                          * with current m and k
 302                          */
 303                         int n_estimated = ((freq * (m + 2) << k) / fref) - 2;
 304
 305                         /* Search neighborhood of estimated n */
 306                         for (n = max(0, n_estimated);
 307                                 n <= min(255, n_estimated + 1);
 308                                 n++) {
 309                                 /*
 310                                  * Calculate PLL freqency with current m, k and
 311                                  * estimated n
 312                                  */
 313                                 int f = (fref * (n + 2) / (m + 2)) >> k;
 314                                 int error = abs(f - freq);
 315
 316                                 /*
 317                                  * If this is the closest we've come to the
 318                                  * target frequency then remember n, m and k
 319                                  */
 320                                 if (error < best_error) {
 321                                         best_error = error;
 322                                         best_n = n;
 323                                         best_m = m;
 324                                         best_k = k;
 325                                 }
 326                         }
 327                 }
 328         }
 329
 330         n = best_n;
 331         m = best_m;
 332         k = best_k;
 333         *freq_out = (fref * (n + 2) / (m + 2)) >> k;
 334
 335         return (n << 8) | (m << 2) | k;
 336 }
 337
 338 static void do_write_regs(struct fb_info *info, struct banshee_reg *reg)
 339 {
 340         struct tdfx_par *par = info->par;
 341         int i;
 342
 343         banshee_wait_idle(info);
 344
 345         tdfx_outl(par, MISCINIT1, tdfx_inl(par, MISCINIT1) | 0x01);
 346
 347         crt_outb(par, 0x11, crt_inb(par, 0x11) & 0x7f); /* CRT unprotect */
 348
 349         banshee_make_room(par, 3);
 350         tdfx_outl(par, VGAINIT1, reg->vgainit1 & 0x001FFFFF);
 351         tdfx_outl(par, VIDPROCCFG, reg->vidcfg & ~0x00000001);
 352 #if 0
 353         tdfx_outl(par, PLLCTRL1, reg->mempll);
 354         tdfx_outl(par, PLLCTRL2, reg->gfxpll);
 355 #endif
 356         tdfx_outl(par, PLLCTRL0, reg->vidpll);
 357
 358         vga_outb(par, MISC_W, reg->misc[0x00] | 0x01);
 359
 360         for (i = 0; i < 5; i++)
 361                 seq_outb(par, i, reg->seq[i]);
 362
 363         for (i = 0; i < 25; i++)
 364                 crt_outb(par, i, reg->crt[i]);
 365
 366         for (i = 0; i < 9; i++)
 367                 gra_outb(par, i, reg->gra[i]);
 368
 369         for (i = 0; i < 21; i++)
 370                 att_outb(par, i, reg->att[i]);
 371
 372         crt_outb(par, 0x1a, reg->ext[0]);
 373         crt_outb(par, 0x1b, reg->ext[1]);
 374
 375         vga_enable_palette(par);
 376         vga_enable_video(par);
 377
 378         banshee_make_room(par, 9);
 379         tdfx_outl(par, VGAINIT0, reg->vgainit0);
 380         tdfx_outl(par, DACMODE, reg->dacmode);
 381         tdfx_outl(par, VIDDESKSTRIDE, reg->stride);
 382         tdfx_outl(par, HWCURPATADDR, reg->curspataddr);
 383
 384         tdfx_outl(par, VIDSCREENSIZE, reg->screensize);
 385         tdfx_outl(par, VIDDESKSTART, reg->startaddr);
 386         tdfx_outl(par, VIDPROCCFG, reg->vidcfg);
 387         tdfx_outl(par, VGAINIT1, reg->vgainit1);
 388         tdfx_outl(par, MISCINIT0, reg->miscinit0);
 389
 390         banshee_make_room(par, 8);
 391         tdfx_outl(par, SRCBASE, reg->startaddr);
 392         tdfx_outl(par, DSTBASE, reg->startaddr);
 393         tdfx_outl(par, COMMANDEXTRA_2D, 0);
 394         tdfx_outl(par, CLIP0MIN, 0);
 395         tdfx_outl(par, CLIP0MAX, 0x0fff0fff);
 396         tdfx_outl(par, CLIP1MIN, 0);
 397         tdfx_outl(par, CLIP1MAX, 0x0fff0fff);
 398         tdfx_outl(par, SRCXY, 0);
 399
 400         banshee_wait_idle(info);
 401 }
 402
 403 static unsigned long do_lfb_size(struct tdfx_par *par, unsigned short dev_id)
 404 {
 405         u32 draminit0 = tdfx_inl(par, DRAMINIT0);
 406         u32 draminit1 = tdfx_inl(par, DRAMINIT1);
 407         u32 miscinit1;
 408         int num_chips = (draminit0 & DRAMINIT0_SGRAM_NUM) ? 8 : 4;
 409         int chip_size; /* in MB */
 410         int has_sgram = draminit1 & DRAMINIT1_MEM_SDRAM;
 411
 412         if (dev_id < PCI_DEVICE_ID_3DFX_VOODOO5) {
 413                 /* Banshee/Voodoo3 */
 414                 chip_size = 2;
 415                 if (has_sgram && !(draminit0 & DRAMINIT0_SGRAM_TYPE))
 416                         chip_size = 1;
 417         } else {
 418                 /* Voodoo4/5 */
 419                 has_sgram = 0;
 420                 chip_size = draminit0 & DRAMINIT0_SGRAM_TYPE_MASK;
 421                 chip_size = 1 << (chip_size >> DRAMINIT0_SGRAM_TYPE_SHIFT);
 422         }
 423
 424         /* disable block writes for SDRAM */
 425         miscinit1 = tdfx_inl(par, MISCINIT1);
 426         miscinit1 |= has_sgram ? 0 : MISCINIT1_2DBLOCK_DIS;
 427         miscinit1 |= MISCINIT1_CLUT_INV;
 428
 429         banshee_make_room(par, 1);
 430         tdfx_outl(par, MISCINIT1, miscinit1);
 431         return num_chips * chip_size * 1024l * 1024;
 432 }
 433
 434 /* ------------------------------------------------------------------------- */
 435
 436 static int tdfxfb_check_var(struct fb_var_screeninfo *var, struct fb_info *info)
 437 {
 438         struct tdfx_par *par = info->par;
 439         u32 lpitch;
 440
 441         if (var->bits_per_pixel != 8  && var->bits_per_pixel != 16 &&
 442             var->bits_per_pixel != 24 && var->bits_per_pixel != 32) {
 443                 DPRINTK("depth not supported: %u\n", var->bits_per_pixel);
 444                 return -EINVAL;
 445         }
 446
 447         if (var->xres != var->xres_virtual)
 448                 var->xres_virtual = var->xres;
 449
 450         if (var->yres > var->yres_virtual)
 451                 var->yres_virtual = var->yres;
 452
 453         if (var->xoffset) {
 454                 DPRINTK("xoffset not supported\n");
 455                 return -EINVAL;
 456         }
 457         var->yoffset = 0;
 458
 459         /*
 460          * Banshee doesn't support interlace, but Voodoo4/5 and probably
 461          * Voodoo3 do.
 462          * no direct information about device id now?
 463          *  use max_pixclock for this...
 464          */
 465         if (((var->vmode & FB_VMODE_MASK) == FB_VMODE_INTERLACED) &&
 466             (par->max_pixclock < VOODOO3_MAX_PIXCLOCK)) {
 467                 DPRINTK("interlace not supported\n");
 468                 return -EINVAL;
 469         }
 470
 471         if (info->monspecs.hfmax && info->monspecs.vfmax &&
 472             info->monspecs.dclkmax && fb_validate_mode(var, info) < 0) {
 473                 DPRINTK("mode outside monitor's specs\n");
 474                 return -EINVAL;
 475         }
 476
 477         var->xres = (var->xres + 15) & ~15; /* could sometimes be 8 */
 478         lpitch = var->xres * ((var->bits_per_pixel + 7) >> 3);
 479
 480         if (var->xres < 320 || var->xres > 2048) {
 481                 DPRINTK("width not supported: %u\n", var->xres);
 482                 return -EINVAL;
 483         }
 484
 485         if (var->yres < 200 || var->yres > 2048) {
 486                 DPRINTK("height not supported: %u\n", var->yres);
 487                 return -EINVAL;
 488         }
 489
 490         if (lpitch * var->yres_virtual > info->fix.smem_len) {
 491                 var->yres_virtual = info->fix.smem_len / lpitch;
 492                 if (var->yres_virtual < var->yres) {
 493                         DPRINTK("no memory for screen (%ux%ux%u)\n",
 494                                 var->xres, var->yres_virtual,
 495                                 var->bits_per_pixel);
 496                         return -EINVAL;
 497                 }
 498         }
 499
 500         if (PICOS2KHZ(var->pixclock) > par->max_pixclock) {
 501                 DPRINTK("pixclock too high (%ldKHz)\n",
 502                         PICOS2KHZ(var->pixclock));
 503                 return -EINVAL;
 504         }
 505
 506         var->transp.offset = 0;
 507         var->transp.length = 0;
 508         switch (var->bits_per_pixel) {
 509         case 8:
 510                 var->red.length = 8;
 511                 var->red.offset = 0;
 512                 var->green = var->red;
 513                 var->blue = var->red;
 514                 break;
 515         case 16:
 516                 var->red.offset   = 11;
 517                 var->red.length   = 5;
 518                 var->green.offset = 5;
 519                 var->green.length = 6;
 520                 var->blue.offset  = 0;
 521                 var->blue.length  = 5;
 522                 break;
 523         case 32:
 524                 var->transp.offset = 24;
 525                 var->transp.length = 8;
 526                 /* fall through */
 527         case 24:
 528                 var->red.offset = 16;
 529                 var->green.offset = 8;
 530                 var->blue.offset = 0;
 531                 var->red.length = var->green.length = var->blue.length = 8;
 532                 break;
 533         }
 534         var->width = -1;
 535         var->height = -1;
 536
 537         var->accel_flags = FB_ACCELF_TEXT;
 538
 539         DPRINTK("Checking graphics mode at %dx%d depth %d\n",
 540                 var->xres, var->yres, var->bits_per_pixel);
 541         return 0;
 542 }
 543
 544 static int tdfxfb_set_par(struct fb_info *info)
 545 {
 546         struct tdfx_par *par = info->par;
 547         u32 hdispend = info->var.xres;
 548         u32 hsyncsta = hdispend + info->var.right_margin;
 549         u32 hsyncend = hsyncsta + info->var.hsync_len;
 550         u32 htotal   = hsyncend + info->var.left_margin;
 551         u32 hd, hs, he, ht, hbs, hbe;
 552         u32 vd, vs, ve, vt, vbs, vbe;
 553         struct banshee_reg reg;
 554         int fout, freq;
 555         u32 wd;
 556         u32 cpp = (info->var.bits_per_pixel + 7) >> 3;
 557
 558         memset(&reg, 0, sizeof(reg));
 559
 560         reg.vidcfg = VIDCFG_VIDPROC_ENABLE | VIDCFG_DESK_ENABLE |
 561                      VIDCFG_CURS_X11 |
 562                      ((cpp - 1) << VIDCFG_PIXFMT_SHIFT) |
 563                      (cpp != 1 ? VIDCFG_CLUT_BYPASS : 0);
 564
 565         /* PLL settings */
 566         freq = PICOS2KHZ(info->var.pixclock);
 567
 568         reg.vidcfg &= ~VIDCFG_2X;
 569
 570         if (freq > par->max_pixclock / 2) {
 571                 freq = freq > par->max_pixclock ? par->max_pixclock : freq;
 572                 reg.dacmode |= DACMODE_2X;
 573                 reg.vidcfg  |= VIDCFG_2X;
 574                 hdispend >>= 1;
 575                 hsyncsta >>= 1;
 576                 hsyncend >>= 1;
 577                 htotal   >>= 1;
 578         }
 579
 580         wd = (hdispend >> 3) - 1;
 581         hd  = wd;
 582         hs  = (hsyncsta >> 3) - 1;
 583         he  = (hsyncend >> 3) - 1;
 584         ht  = (htotal >> 3) - 1;
 585         hbs = hd;
 586         hbe = ht;
 587
 588         if ((info->var.vmode & FB_VMODE_MASK) == FB_VMODE_DOUBLE) {
 589                 vd = (info->var.yres << 1) - 1;
 590                 vs  = vd + (info->var.lower_margin << 1);
 591                 ve  = vs + (info->var.vsync_len << 1);
 592                 vt = ve + (info->var.upper_margin << 1) - 1;
 593                 reg.screensize = info->var.xres | (info->var.yres << 13);
 594                 reg.vidcfg |= VIDCFG_HALF_MODE;
 595                 reg.crt[0x09] = 0x80;
 596         } else {
 597                 vd = info->var.yres - 1;
 598                 vs  = vd + info->var.lower_margin;
 599                 ve  = vs + info->var.vsync_len;
 600                 vt = ve + info->var.upper_margin - 1;
 601                 reg.screensize = info->var.xres | (info->var.yres << 12);
 602                 reg.vidcfg &= ~VIDCFG_HALF_MODE;
 603         }
 604         vbs = vd;
 605         vbe = vt;
 606
 607         /* this is all pretty standard VGA register stuffing */
 608         reg.misc[0x00] = 0x0f |
 609                         (info->var.xres < 400 ? 0xa0 :
 610                          info->var.xres < 480 ? 0x60 :
 611                          info->var.xres < 768 ? 0xe0 : 0x20);
 612
 613         reg.gra[0x05] = 0x40;
 614         reg.gra[0x06] = 0x05;
 615         reg.gra[0x07] = 0x0f;
 616         reg.gra[0x08] = 0xff;
 617
 618         reg.att[0x00] = 0x00;
 619         reg.att[0x01] = 0x01;
 620         reg.att[0x02] = 0x02;
 621         reg.att[0x03] = 0x03;
 622         reg.att[0x04] = 0x04;
 623         reg.att[0x05] = 0x05;
 624         reg.att[0x06] = 0x06;
 625         reg.att[0x07] = 0x07;
 626         reg.att[0x08] = 0x08;
 627         reg.att[0x09] = 0x09;
 628         reg.att[0x0a] = 0x0a;
 629         reg.att[0x0b] = 0x0b;
 630         reg.att[0x0c] = 0x0c;
 631         reg.att[0x0d] = 0x0d;
 632         reg.att[0x0e] = 0x0e;
 633         reg.att[0x0f] = 0x0f;
 634         reg.att[0x10] = 0x41;
 635         reg.att[0x12] = 0x0f;
 636
 637         reg.seq[0x00] = 0x03;
 638         reg.seq[0x01] = 0x01; /* fixme: clkdiv2? */
 639         reg.seq[0x02] = 0x0f;
 640         reg.seq[0x03] = 0x00;
 641         reg.seq[0x04] = 0x0e;
 642
 643         reg.crt[0x00] = ht - 4;
 644         reg.crt[0x01] = hd;
 645         reg.crt[0x02] = hbs;
 646         reg.crt[0x03] = 0x80 | (hbe & 0x1f);
 647         reg.crt[0x04] = hs;
 648         reg.crt[0x05] = ((hbe & 0x20) << 2) | (he & 0x1f);
 649         reg.crt[0x06] = vt;
 650         reg.crt[0x07] = ((vs & 0x200) >> 2) |
 651                         ((vd & 0x200) >> 3) |
 652                         ((vt & 0x200) >> 4) | 0x10 |
 653                         ((vbs & 0x100) >> 5) |
 654                         ((vs & 0x100) >> 6) |
 655                         ((vd & 0x100) >> 7) |
 656                         ((vt & 0x100) >> 8);
 657         reg.crt[0x09] |= 0x40 | ((vbs & 0x200) >> 4);
 658         reg.crt[0x10] = vs;
 659         reg.crt[0x11] = (ve & 0x0f) | 0x20;
 660         reg.crt[0x12] = vd;
 661         reg.crt[0x13] = wd;
 662         reg.crt[0x15] = vbs;
 663         reg.crt[0x16] = vbe + 1;
 664         reg.crt[0x17] = 0xc3;
 665         reg.crt[0x18] = 0xff;
 666
 667         /* Banshee's nonvga stuff */
 668         reg.ext[0x00] = (((ht & 0x100) >> 8) |
 669                         ((hd & 0x100) >> 6) |
 670                         ((hbs & 0x100) >> 4) |
 671                         ((hbe & 0x40) >> 1) |
 672                         ((hs & 0x100) >> 2) |
 673                         ((he & 0x20) << 2));
 674         reg.ext[0x01] = (((vt & 0x400) >> 10) |
 675                         ((vd & 0x400) >> 8) |
 676                         ((vbs & 0x400) >> 6) |
 677                         ((vbe & 0x400) >> 4));
 678
 679         reg.vgainit0 =  VGAINIT0_8BIT_DAC     |
 680                         VGAINIT0_EXT_ENABLE   |
 681                         VGAINIT0_WAKEUP_3C3   |
 682                         VGAINIT0_ALT_READBACK |
 683                         VGAINIT0_EXTSHIFTOUT;
 684         reg.vgainit1 = tdfx_inl(par, VGAINIT1) & 0x1fffff;
 685
 686         if (hwcursor)
 687                 reg.curspataddr = info->fix.smem_len;
 688
 689         reg.cursloc   = 0;
 690
 691         reg.cursc0    = 0;
 692         reg.cursc1    = 0xffffff;
 693
 694         reg.stride    = info->var.xres * cpp;
 695         reg.startaddr = info->var.yoffset * reg.stride
 696                         + info->var.xoffset * cpp;
 697
 698         reg.vidpll = do_calc_pll(freq, &fout);
 699 #if 0
 700         reg.mempll = do_calc_pll(..., &fout);
 701         reg.gfxpll = do_calc_pll(..., &fout);
 702 #endif
 703
 704         if ((info->var.vmode & FB_VMODE_MASK) == FB_VMODE_INTERLACED)
 705                 reg.vidcfg |= VIDCFG_INTERLACE;
 706         reg.miscinit0 = tdfx_inl(par, MISCINIT0);
 707
 708 #if defined(__BIG_ENDIAN)
 709         switch (info->var.bits_per_pixel) {
 710         case 8:
 711         case 24:
 712                 reg.miscinit0 &= ~(1 << 30);
 713                 reg.miscinit0 &= ~(1 << 31);
 714                 break;
 715         case 16:
 716                 reg.miscinit0 |= (1 << 30);
 717                 reg.miscinit0 |= (1 << 31);
 718                 break;
 719         case 32:
 720                 reg.miscinit0 |= (1 << 30);
 721                 reg.miscinit0 &= ~(1 << 31);
 722                 break;
 723         }
 724 #endif
 725         do_write_regs(info, &reg);
 726
 727         /* Now change fb_fix_screeninfo according to changes in par */
 728         info->fix.line_length = reg.stride;
 729         info->fix.visual = (info->var.bits_per_pixel == 8)
 730                                 ? FB_VISUAL_PSEUDOCOLOR
 731                                 : FB_VISUAL_TRUECOLOR;
 732         DPRINTK("Graphics mode is now set at %dx%d depth %d\n",
 733                 info->var.xres, info->var.yres, info->var.bits_per_pixel);
 734         return 0;
 735 }
 736
 737 /* A handy macro shamelessly pinched from matroxfb */
 738 #define CNVT_TOHW(val, width) ((((val) << (width)) + 0x7FFF - (val)) >> 16)
 739
 740 static int tdfxfb_setcolreg(unsigned regno, unsigned red, unsigned green,
 741                             unsigned blue, unsigned transp,
 742                             struct fb_info *info)
 743 {
 744         struct tdfx_par *par = info->par;
 745         u32 rgbcol;
 746
 747         if (regno >= info->cmap.len || regno > 255)
 748                 return 1;
 749
 750         /* grayscale works only partially under directcolor */
 751         if (info->var.grayscale) {
 752                 /* grayscale = 0.30*R + 0.59*G + 0.11*B */
 753                 blue = (red * 77 + green * 151 + blue * 28) >> 8;
 754                 green = blue;
 755                 red = blue;
 756         }
 757
 758         switch (info->fix.visual) {
 759         case FB_VISUAL_PSEUDOCOLOR:
 760                 rgbcol = (((u32)red   & 0xff00) << 8) |
 761                          (((u32)green & 0xff00) << 0) |
 762                          (((u32)blue  & 0xff00) >> 8);
 763                 do_setpalentry(par, regno, rgbcol);
 764                 break;
 765         /* Truecolor has no hardware color palettes. */
 766         case FB_VISUAL_TRUECOLOR:
 767                 if (regno < 16) {
 768                         rgbcol = (CNVT_TOHW(red, info->var.red.length) <<
 769                                   info->var.red.offset) |
 770                                 (CNVT_TOHW(green, info->var.green.length) <<
 771                                  info->var.green.offset) |
 772                                 (CNVT_TOHW(blue, info->var.blue.length) <<
 773                                  info->var.blue.offset) |
 774                                 (CNVT_TOHW(transp, info->var.transp.length) <<
 775                                  info->var.transp.offset);
 776                         par->palette[regno] = rgbcol;
 777                 }
 778
 779                 break;
 780         default:
 781                 DPRINTK("bad depth %u\n", info->var.bits_per_pixel);
 782                 break;
 783         }
 784
 785         return 0;
 786 }
 787
 788 /* 0 unblank, 1 blank, 2 no vsync, 3 no hsync, 4 off */
 789 static int tdfxfb_blank(int blank, struct fb_info *info)
 790 {
 791         struct tdfx_par *par = info->par;
 792         int vgablank = 1;
 793         u32 dacmode = tdfx_inl(par, DACMODE);
 794
 795         dacmode &= ~(BIT(1) | BIT(3));
 796
 797         switch (blank) {
 798         case FB_BLANK_UNBLANK: /* Screen: On; HSync: On, VSync: On */
 799                 vgablank = 0;
 800                 break;
 801         case FB_BLANK_NORMAL: /* Screen: Off; HSync: On, VSync: On */
 802                 break;
 803         case FB_BLANK_VSYNC_SUSPEND: /* Screen: Off; HSync: On, VSync: Off */
 804                 dacmode |= BIT(3);
 805                 break;
 806         case FB_BLANK_HSYNC_SUSPEND: /* Screen: Off; HSync: Off, VSync: On */
 807                 dacmode |= BIT(1);
 808                 break;
 809         case FB_BLANK_POWERDOWN: /* Screen: Off; HSync: Off, VSync: Off */
 810                 dacmode |= BIT(1) | BIT(3);
 811                 break;
 812         }
 813
 814         banshee_make_room(par, 1);
 815         tdfx_outl(par, DACMODE, dacmode);
 816         if (vgablank)
 817                 vga_disable_video(par);
 818         else
 819                 vga_enable_video(par);
 820         return 0;
 821 }
 822
 823 /*
 824  * Set the starting position of the visible screen to var->yoffset
 825  */
 826 static int tdfxfb_pan_display(struct fb_var_screeninfo *var,
 827                               struct fb_info *info)
 828 {
 829         struct tdfx_par *par = info->par;
 830         u32 addr = var->yoffset * info->fix.line_length;
 831
 832         if (nopan || var->xoffset)
 833                 return -EINVAL;
 834
 835         banshee_make_room(par, 1);
 836         tdfx_outl(par, VIDDESKSTART, addr);
 837
 838         return 0;
 839 }
 840
 841 #ifdef CONFIG_FB_3DFX_ACCEL
 842 /*
 843  * FillRect 2D command (solidfill or invert (via ROP_XOR))
 844  */
 845 static void tdfxfb_fillrect(struct fb_info *info,
 846                             const struct fb_fillrect *rect)
 847 {
 848         struct tdfx_par *par = info->par;
 849         u32 bpp = info->var.bits_per_pixel;
 850         u32 stride = info->fix.line_length;
 851         u32 fmt = stride | ((bpp + ((bpp == 8) ? 0 : 8)) << 13);
 852         int tdfx_rop;
 853         u32 dx = rect->dx;
 854         u32 dy = rect->dy;
 855         u32 dstbase = 0;
 856
 857         if (rect->rop == ROP_COPY)
 858                 tdfx_rop = TDFX_ROP_COPY;
 859         else
 860                 tdfx_rop = TDFX_ROP_XOR;
 861
 862         /* assume always rect->height < 4096 */
 863         if (dy + rect->height > 4095) {
 864                 dstbase = stride * dy;
 865                 dy = 0;
 866         }
 867         /* assume always rect->width < 4096 */
 868         if (dx + rect->width > 4095) {
 869                 dstbase += dx * bpp >> 3;
 870                 dx = 0;
 871         }
 872         banshee_make_room(par, 6);
 873         tdfx_outl(par, DSTFORMAT, fmt);
 874         if (info->fix.visual == FB_VISUAL_PSEUDOCOLOR) {
 875                 tdfx_outl(par, COLORFORE, rect->color);
 876         } else { /* FB_VISUAL_TRUECOLOR */
 877                 tdfx_outl(par, COLORFORE, par->palette[rect->color]);
 878         }
 879         tdfx_outl(par, COMMAND_2D, COMMAND_2D_FILLRECT | (tdfx_rop << 24));
 880         tdfx_outl(par, DSTBASE, dstbase);
 881         tdfx_outl(par, DSTSIZE, rect->width | (rect->height << 16));
 882         tdfx_outl(par, LAUNCH_2D, dx | (dy << 16));
 883 }
 884
 885 /*
 886  * Screen-to-Screen BitBlt 2D command (for the bmove fb op.)
 887  */
 888 static void tdfxfb_copyarea(struct fb_info *info,
 889                             const struct fb_copyarea *area)
 890 {
 891         struct tdfx_par *par = info->par;
 892         u32 sx = area->sx, sy = area->sy, dx = area->dx, dy = area->dy;
 893         u32 bpp = info->var.bits_per_pixel;
 894         u32 stride = info->fix.line_length;
 895         u32 blitcmd = COMMAND_2D_S2S_BITBLT | (TDFX_ROP_COPY << 24);
 896         u32 fmt = stride | ((bpp + ((bpp == 8) ? 0 : 8)) << 13);
 897         u32 dstbase = 0;
 898         u32 srcbase = 0;
 899
 900         /* assume always area->height < 4096 */
 901         if (sy + area->height > 4095) {
 902                 srcbase = stride * sy;
 903                 sy = 0;
 904         }
 905         /* assume always area->width < 4096 */
 906         if (sx + area->width > 4095) {
 907                 srcbase += sx * bpp >> 3;
 908                 sx = 0;
 909         }
 910         /* assume always area->height < 4096 */
 911         if (dy + area->height > 4095) {
 912                 dstbase = stride * dy;
 913                 dy = 0;
 914         }
 915         /* assume always area->width < 4096 */
 916         if (dx + area->width > 4095) {
 917                 dstbase += dx * bpp >> 3;
 918                 dx = 0;
 919         }
 920
 921         if (area->sx <= area->dx) {
 922                 /* -X */
 923                 blitcmd |= BIT(14);
 924                 sx += area->width - 1;
 925                 dx += area->width - 1;
 926         }
 927         if (area->sy <= area->dy) {
 928                 /* -Y */
 929                 blitcmd |= BIT(15);
 930                 sy += area->height - 1;
 931                 dy += area->height - 1;
 932         }
 933
 934         banshee_make_room(par, 8);
 935
 936         tdfx_outl(par, SRCFORMAT, fmt);
 937         tdfx_outl(par, DSTFORMAT, fmt);
 938         tdfx_outl(par, COMMAND_2D, blitcmd);
 939         tdfx_outl(par, DSTSIZE, area->width | (area->height << 16));
 940         tdfx_outl(par, DSTXY, dx | (dy << 16));
 941         tdfx_outl(par, SRCBASE, srcbase);
 942         tdfx_outl(par, DSTBASE, dstbase);
 943         tdfx_outl(par, LAUNCH_2D, sx | (sy << 16));
 944 }
 945
 946 static void tdfxfb_imageblit(struct fb_info *info, const struct fb_image *image)
 947 {
 948         struct tdfx_par *par = info->par;
 949         int size = image->height * ((image->width * image->depth + 7) >> 3);
 950         int fifo_free;
 951         int i, stride = info->fix.line_length;
 952         u32 bpp = info->var.bits_per_pixel;
 953         u32 dstfmt = stride | ((bpp + ((bpp == 8) ? 0 : 8)) << 13);
 954         u8 *chardata = (u8 *) image->data;
 955         u32 srcfmt;
 956         u32 dx = image->dx;
 957         u32 dy = image->dy;
 958         u32 dstbase = 0;
 959
 960         if (image->depth != 1) {
 961 #ifdef BROKEN_CODE
 962                 banshee_make_room(par, 6 + ((size + 3) >> 2));
 963                 srcfmt = stride | ((bpp + ((bpp == 8) ? 0 : 8)) << 13) |
 964                         0x400000;
 965 #else
 966                 cfb_imageblit(info, image);
 967 #endif
 968                 return;
 969         }
 970         banshee_make_room(par, 9);
 971         switch (info->fix.visual) {
 972         case FB_VISUAL_PSEUDOCOLOR:
 973                 tdfx_outl(par, COLORFORE, image->fg_color);
 974                 tdfx_outl(par, COLORBACK, image->bg_color);
 975                 break;
 976         case FB_VISUAL_TRUECOLOR:
 977         default:
 978                 tdfx_outl(par, COLORFORE,
 979                           par->palette[image->fg_color]);
 980                 tdfx_outl(par, COLORBACK,
 981                           par->palette[image->bg_color]);
 982         }
 983 #ifdef __BIG_ENDIAN
 984         srcfmt = 0x400000 | BIT(20);
 985 #else
 986         srcfmt = 0x400000;
 987 #endif
 988         /* assume always image->height < 4096 */
 989         if (dy + image->height > 4095) {
 990                 dstbase = stride * dy;
 991                 dy = 0;
 992         }
 993         /* assume always image->width < 4096 */
 994         if (dx + image->width > 4095) {
 995                 dstbase += dx * bpp >> 3;
 996                 dx = 0;
 997         }
 998
 999         tdfx_outl(par, DSTBASE, dstbase);
1000         tdfx_outl(par, SRCXY, 0);
1001         tdfx_outl(par, DSTXY, dx | (dy << 16));
1002         tdfx_outl(par, COMMAND_2D,
1003                   COMMAND_2D_H2S_BITBLT | (TDFX_ROP_COPY << 24));
1004         tdfx_outl(par, SRCFORMAT, srcfmt);
1005         tdfx_outl(par, DSTFORMAT, dstfmt);
1006         tdfx_outl(par, DSTSIZE, image->width | (image->height << 16));
1007
1008         /* A count of how many free FIFO entries we've requested.
1009          * When this goes negative, we need to request more. */
1010         fifo_free = 0;
1011
1012         /* Send four bytes at a time of data */
1013         for (i = (size >> 2); i > 0; i--) {
1014                 if (--fifo_free < 0) {
1015                         fifo_free = 31;
1016                         banshee_make_room(par, fifo_free);
1017                 }
1018                 tdfx_outl(par, LAUNCH_2D, *(u32 *)chardata);
1019                 chardata += 4;
1020         }
1021
1022         /* Send the leftovers now */
1023         banshee_make_room(par, 3);
1024         switch (size % 4) {
1025         case 0:
1026                 break;
1027         case 1:
1028                 tdfx_outl(par, LAUNCH_2D, *chardata);
1029                 break;
1030         case 2:
1031                 tdfx_outl(par, LAUNCH_2D, *(u16 *)chardata);
1032                 break;
1033         case 3:
1034                 tdfx_outl(par, LAUNCH_2D,
1035                         *(u16 *)chardata | (chardata[3] << 24));
1036                 break;
1037         }
1038 }
1039 #endif /* CONFIG_FB_3DFX_ACCEL */
1040
1041 static int tdfxfb_cursor(struct fb_info *info, struct fb_cursor *cursor)
1042 {
1043         struct tdfx_par *par = info->par;
1044         u32 vidcfg;
1045
1046         if (!hwcursor)
1047                 return -EINVAL; /* just to force soft_cursor() call */
1048
1049         /* Too large of a cursor or wrong bpp :-( */
1050         if (cursor->image.width > 64 ||
1051             cursor->image.height > 64 ||
1052             cursor->image.depth > 1)
1053                 return -EINVAL;
1054
1055         vidcfg = tdfx_inl(par, VIDPROCCFG);
1056         if (cursor->enable)
1057                 tdfx_outl(par, VIDPROCCFG, vidcfg | VIDCFG_HWCURSOR_ENABLE);
1058         else
1059                 tdfx_outl(par, VIDPROCCFG, vidcfg & ~VIDCFG_HWCURSOR_ENABLE);
1060
1061         /*
1062          * If the cursor is not be changed this means either we want the
1063          * current cursor state (if enable is set) or we want to query what
1064          * we can do with the cursor (if enable is not set)
1065          */
1066         if (!cursor->set)
1067                 return 0;
1068
1069         /* fix cursor color - XFree86 forgets to restore it properly */
1070         if (cursor->set & FB_CUR_SETCMAP) {
1071                 struct fb_cmap cmap = info->cmap;
1072                 u32 bg_idx = cursor->image.bg_color;
1073                 u32 fg_idx = cursor->image.fg_color;
1074                 unsigned long bg_color, fg_color;
1075
1076                 fg_color = (((u32)cmap.red[fg_idx]   & 0xff00) << 8) |
1077                            (((u32)cmap.green[fg_idx] & 0xff00) << 0) |
1078                            (((u32)cmap.blue[fg_idx]  & 0xff00) >> 8);
1079                 bg_color = (((u32)cmap.red[bg_idx]   & 0xff00) << 8) |
1080                            (((u32)cmap.green[bg_idx] & 0xff00) << 0) |
1081                            (((u32)cmap.blue[bg_idx]  & 0xff00) >> 8);
1082                 banshee_make_room(par, 2);
1083                 tdfx_outl(par, HWCURC0, bg_color);
1084                 tdfx_outl(par, HWCURC1, fg_color);
1085         }
1086
1087         if (cursor->set & FB_CUR_SETPOS) {
1088                 int x = cursor->image.dx;
1089                 int y = cursor->image.dy - info->var.yoffset;
1090
1091                 x += 63;
1092                 y += 63;
1093                 banshee_make_room(par, 1);
1094                 tdfx_outl(par, HWCURLOC, (y << 16) + x);
1095         }
1096         if (cursor->set & (FB_CUR_SETIMAGE | FB_CUR_SETSHAPE)) {
1097                 /*
1098                  * Voodoo 3 and above cards use 2 monochrome cursor patterns.
1099                  *    The reason is so the card can fetch 8 words at a time
1100                  * and are stored on chip for use for the next 8 scanlines.
1101                  * This reduces the number of times for access to draw the
1102                  * cursor for each screen refresh.
1103                  *    Each pattern is a bitmap of 64 bit wide and 64 bit high
1104                  * (total of 8192 bits or 1024 bytes). The two patterns are
1105                  * stored in such a way that pattern 0 always resides in the
1106                  * lower half (least significant 64 bits) of a 128 bit word
1107                  * and pattern 1 the upper half. If you examine the data of
1108                  * the cursor image the graphics card uses then from the
1109                  * beginning you see line one of pattern 0, line one of
1110                  * pattern 1, line two of pattern 0, line two of pattern 1,
1111                  * etc etc. The linear stride for the cursor is always 16 bytes
1112                  * (128 bits) which is the maximum cursor width times two for
1113                  * the two monochrome patterns.
1114                  */
1115                 u8 __iomem *cursorbase = info->screen_base + info->fix.smem_len;
1116                 u8 *bitmap = (u8 *)cursor->image.data;
1117                 u8 *mask = (u8 *)cursor->mask;
1118                 int i;
1119
1120                 fb_memset(cursorbase, 0, 1024);
1121
1122                 for (i = 0; i < cursor->image.height; i++) {
1123                         int h = 0;
1124                         int j = (cursor->image.width + 7) >> 3;
1125
1126                         for (; j > 0; j--) {
1127                                 u8 data = *mask ^ *bitmap;
1128                                 if (cursor->rop == ROP_COPY)
1129                                         data = *mask & *bitmap;
1130                                 /* Pattern 0. Copy the cursor mask to it */
1131                                 fb_writeb(*mask, cursorbase + h);
1132                                 mask++;
1133                                 /* Pattern 1. Copy the cursor bitmap to it */
1134                                 fb_writeb(data, cursorbase + h + 8);
1135                                 bitmap++;
1136                                 h++;
1137                         }
1138                         cursorbase += 16;
1139                 }
1140         }
1141         return 0;
1142 }
1143
1144 static struct fb_ops tdfxfb_ops = {
1145         .owner          = THIS_MODULE,
1146         .fb_check_var   = tdfxfb_check_var,
1147         .fb_set_par     = tdfxfb_set_par,
1148         .fb_setcolreg   = tdfxfb_setcolreg,
1149         .fb_blank       = tdfxfb_blank,
1150         .fb_pan_display = tdfxfb_pan_display,
1151         .fb_sync        = banshee_wait_idle,
1152         .fb_cursor      = tdfxfb_cursor,
1153 #ifdef CONFIG_FB_3DFX_ACCEL
1154         .fb_fillrect    = tdfxfb_fillrect,
1155         .fb_copyarea    = tdfxfb_copyarea,
1156         .fb_imageblit   = tdfxfb_imageblit,
1157 #else
1158         .fb_fillrect    = cfb_fillrect,
1159         .fb_copyarea    = cfb_copyarea,
1160         .fb_imageblit   = cfb_imageblit,
1161 #endif
1162 };
1163
1164 #ifdef CONFIG_FB_3DFX_I2C
1165 /* The voo GPIO registers don't have individual masks for each bit
1166    so we always have to read before writing. */
1167
1168 static void tdfxfb_i2c_setscl(void *data, int val)
1169 {
1170         struct tdfxfb_i2c_chan  *chan = data;
1171         struct tdfx_par         *par = chan->par;
1172         unsigned int r;
1173
1174         r = tdfx_inl(par, VIDSERPARPORT);
1175         if (val)
1176                 r |= I2C_SCL_OUT;
1177         else
1178                 r &= ~I2C_SCL_OUT;
1179         tdfx_outl(par, VIDSERPARPORT, r);
1180         tdfx_inl(par, VIDSERPARPORT);   /* flush posted write */
1181 }
1182
1183 static void tdfxfb_i2c_setsda(void *data, int val)
1184 {
1185         struct tdfxfb_i2c_chan  *chan = data;
1186         struct tdfx_par         *par = chan->par;
1187         unsigned int r;
1188
1189         r = tdfx_inl(par, VIDSERPARPORT);
1190         if (val)
1191                 r |= I2C_SDA_OUT;
1192         else
1193                 r &= ~I2C_SDA_OUT;
1194         tdfx_outl(par, VIDSERPARPORT, r);
1195         tdfx_inl(par, VIDSERPARPORT);   /* flush posted write */
1196 }
1197
1198 /* The GPIO pins are open drain, so the pins always remain outputs.
1199    We rely on the i2c-algo-bit routines to set the pins high before
1200    reading the input from other chips. */
1201
1202 static int tdfxfb_i2c_getscl(void *data)
1203 {
1204         struct tdfxfb_i2c_chan  *chan = data;
1205         struct tdfx_par         *par = chan->par;
1206
1207         return (0 != (tdfx_inl(par, VIDSERPARPORT) & I2C_SCL_IN));
1208 }
1209
1210 static int tdfxfb_i2c_getsda(void *data)
1211 {
1212         struct tdfxfb_i2c_chan  *chan = data;
1213         struct tdfx_par         *par = chan->par;
1214
1215         return (0 != (tdfx_inl(par, VIDSERPARPORT) & I2C_SDA_IN));
1216 }
1217
1218 static void tdfxfb_ddc_setscl(void *data, int val)
1219 {
1220         struct tdfxfb_i2c_chan  *chan = data;
1221         struct tdfx_par         *par = chan->par;
1222         unsigned int r;
1223
1224         r = tdfx_inl(par, VIDSERPARPORT);
1225         if (val)
1226                 r |= DDC_SCL_OUT;
1227         else
1228                 r &= ~DDC_SCL_OUT;
1229         tdfx_outl(par, VIDSERPARPORT, r);
1230         tdfx_inl(par, VIDSERPARPORT);   /* flush posted write */
1231 }
1232
1233 static void tdfxfb_ddc_setsda(void *data, int val)
1234 {
1235         struct tdfxfb_i2c_chan  *chan = data;
1236         struct tdfx_par         *par = chan->par;
1237         unsigned int r;
1238
1239         r = tdfx_inl(par, VIDSERPARPORT);
1240         if (val)
1241                 r |= DDC_SDA_OUT;
1242         else
1243                 r &= ~DDC_SDA_OUT;
1244         tdfx_outl(par, VIDSERPARPORT, r);
1245         tdfx_inl(par, VIDSERPARPORT);   /* flush posted write */
1246 }
1247
1248 static int tdfxfb_ddc_getscl(void *data)
1249 {
1250         struct tdfxfb_i2c_chan  *chan = data;
1251         struct tdfx_par         *par = chan->par;
1252
1253         return (0 != (tdfx_inl(par, VIDSERPARPORT) & DDC_SCL_IN));
1254 }
1255
1256 static int tdfxfb_ddc_getsda(void *data)
1257 {
1258         struct tdfxfb_i2c_chan  *chan = data;
1259         struct tdfx_par         *par = chan->par;
1260
1261         return (0 != (tdfx_inl(par, VIDSERPARPORT) & DDC_SDA_IN));
1262 }
1263
1264 static int tdfxfb_setup_ddc_bus(struct tdfxfb_i2c_chan *chan, const char *name,
1265                                 struct device *dev)
1266 {
1267         int rc;
1268
1269         strlcpy(chan->adapter.name, name, sizeof(chan->adapter.name));
1270         chan->adapter.owner             = THIS_MODULE;
1271         chan->adapter.class             = I2C_CLASS_DDC;
1272         chan->adapter.algo_data         = &chan->algo;
1273         chan->adapter.dev.parent        = dev;
1274         chan->algo.setsda               = tdfxfb_ddc_setsda;
1275         chan->algo.setscl               = tdfxfb_ddc_setscl;
1276         chan->algo.getsda               = tdfxfb_ddc_getsda;
1277         chan->algo.getscl               = tdfxfb_ddc_getscl;
1278         chan->algo.udelay               = 10;
1279         chan->algo.timeout              = msecs_to_jiffies(500);
1280         chan->algo.data                 = chan;
1281
1282         i2c_set_adapdata(&chan->adapter, chan);
1283
1284         rc = i2c_bit_add_bus(&chan->adapter);
1285         if (rc == 0)
1286                 DPRINTK("I2C bus %s registered.\n", name);
1287         else
1288                 chan->par = NULL;
1289
1290         return rc;
1291 }
1292
1293 static int tdfxfb_setup_i2c_bus(struct tdfxfb_i2c_chan *chan, const char *name,
1294                                 struct device *dev)
1295 {
1296         int rc;
1297
1298         strlcpy(chan->adapter.name, name, sizeof(chan->adapter.name));
1299         chan->adapter.owner             = THIS_MODULE;
1300         chan->adapter.algo_data         = &chan->algo;
1301         chan->adapter.dev.parent        = dev;
1302         chan->algo.setsda               = tdfxfb_i2c_setsda;
1303         chan->algo.setscl               = tdfxfb_i2c_setscl;
1304         chan->algo.getsda               = tdfxfb_i2c_getsda;
1305         chan->algo.getscl               = tdfxfb_i2c_getscl;
1306         chan->algo.udelay               = 10;
1307         chan->algo.timeout              = msecs_to_jiffies(500);
1308         chan->algo.data                 = chan;
1309
1310         i2c_set_adapdata(&chan->adapter, chan);
1311
1312         rc = i2c_bit_add_bus(&chan->adapter);
1313         if (rc == 0)
1314                 DPRINTK("I2C bus %s registered.\n", name);
1315         else
1316                 chan->par = NULL;
1317
1318         return rc;
1319 }
1320
1321 static void tdfxfb_create_i2c_busses(struct fb_info *info)
1322 {
1323         struct tdfx_par *par = info->par;
1324
1325         tdfx_outl(par, VIDINFORMAT, 0x8160);
1326         tdfx_outl(par, VIDSERPARPORT, 0xcffc0020);
1327
1328         par->chan[0].par = par;
1329         par->chan[1].par = par;
1330
1331         tdfxfb_setup_ddc_bus(&par->chan[0], "Voodoo3-DDC", info->dev);
1332         tdfxfb_setup_i2c_bus(&par->chan[1], "Voodoo3-I2C", info->dev);
1333 }
1334
1335 static void tdfxfb_delete_i2c_busses(struct tdfx_par *par)
1336 {
1337         if (par->chan[0].par)
1338                 i2c_del_adapter(&par->chan[0].adapter);
1339         par->chan[0].par = NULL;
1340
1341         if (par->chan[1].par)
1342                 i2c_del_adapter(&par->chan[1].adapter);
1343         par->chan[1].par = NULL;
1344 }
1345
1346 static int tdfxfb_probe_i2c_connector(struct tdfx_par *par,
1347                                       struct fb_monspecs *specs)
1348 {
1349         u8 *edid = NULL;
1350
1351         DPRINTK("Probe DDC Bus\n");
1352         if (par->chan[0].par)
1353                 edid = fb_ddc_read(&par->chan[0].adapter);
1354
1355         if (edid) {
1356                 fb_edid_to_monspecs(edid, specs);
1357                 kfree(edid);
1358                 return 0;
1359         }
1360         return 1;
1361 }
1362 #endif /* CONFIG_FB_3DFX_I2C */
1363
1364 /**
1365  *      tdfxfb_probe - Device Initializiation
1366  *
1367  *      @pdev:  PCI Device to initialize
1368  *      @id:    PCI Device ID
1369  *
1370  *      Initializes and allocates resources for PCI device @pdev.
1371  *
1372  */
1373 static int tdfxfb_probe(struct pci_dev *pdev, const struct pci_device_id *id)
1374 {
1375         struct tdfx_par *default_par;
1376         struct fb_info *info;
1377         int err, lpitch;
1378         struct fb_monspecs *specs;
1379         bool found;
1380
1381         err = pci_enable_device(pdev);
1382         if (err) {
1383                 printk(KERN_ERR "tdfxfb: Can't enable pdev: %d\n", err);
1384                 return err;
1385         }
1386
1387         info = framebuffer_alloc(sizeof(struct tdfx_par), &pdev->dev);
1388
1389         if (!info)
1390                 return -ENOMEM;
1391
1392         default_par = info->par;
1393         info->fix = tdfx_fix;
1394
1395         /* Configure the default fb_fix_screeninfo first */
1396         switch (pdev->device) {
1397         case PCI_DEVICE_ID_3DFX_BANSHEE:
1398                 strcpy(info->fix.id, "3Dfx Banshee");
1399                 default_par->max_pixclock = BANSHEE_MAX_PIXCLOCK;
1400                 break;
1401         case PCI_DEVICE_ID_3DFX_VOODOO3:
1402                 strcpy(info->fix.id, "3Dfx Voodoo3");
1403                 default_par->max_pixclock = VOODOO3_MAX_PIXCLOCK;
1404                 break;
1405         case PCI_DEVICE_ID_3DFX_VOODOO5:
1406                 strcpy(info->fix.id, "3Dfx Voodoo5");
1407                 default_par->max_pixclock = VOODOO5_MAX_PIXCLOCK;
1408                 break;
1409         }
1410
1411         info->fix.mmio_start = pci_resource_start(pdev, 0);
1412         info->fix.mmio_len = pci_resource_len(pdev, 0);
1413         if (!request_mem_region(info->fix.mmio_start, info->fix.mmio_len,
1414                                 "tdfx regbase")) {
1415                 printk(KERN_ERR "tdfxfb: Can't reserve regbase\n");
1416                 goto out_err;
1417         }
1418
1419         default_par->regbase_virt =
1420                 ioremap_nocache(info->fix.mmio_start, info->fix.mmio_len);
1421         if (!default_par->regbase_virt) {
1422                 printk(KERN_ERR "fb: Can't remap %s register area.\n",
1423                                 info->fix.id);
1424                 goto out_err_regbase;
1425         }
1426
1427         info->fix.smem_start = pci_resource_start(pdev, 1);
1428         info->fix.smem_len = do_lfb_size(default_par, pdev->device);
1429         if (!info->fix.smem_len) {
1430                 printk(KERN_ERR "fb: Can't count %s memory.\n", info->fix.id);
1431                 goto out_err_regbase;
1432         }
1433
1434         if (!request_mem_region(info->fix.smem_start,
1435                                 pci_resource_len(pdev, 1), "tdfx smem")) {
1436                 printk(KERN_ERR "tdfxfb: Can't reserve smem\n");
1437                 goto out_err_regbase;
1438         }
1439
1440         info->screen_base = ioremap_wc(info->fix.smem_start,
1441                                        info->fix.smem_len);
1442         if (!info->screen_base) {
1443                 printk(KERN_ERR "fb: Can't remap %s framebuffer.\n",
1444                                 info->fix.id);
1445                 goto out_err_screenbase;
1446         }
1447
1448         default_par->iobase = pci_resource_start(pdev, 2);
1449
1450         if (!request_region(pci_resource_start(pdev, 2),
1451                             pci_resource_len(pdev, 2), "tdfx iobase")) {
1452                 printk(KERN_ERR "tdfxfb: Can't reserve iobase\n");
1453                 goto out_err_screenbase;
1454         }
1455
1456         printk(KERN_INFO "fb: %s memory = %dK\n", info->fix.id,
1457                         info->fix.smem_len >> 10);
1458
1459         if (!nomtrr)
1460                 default_par->wc_cookie= arch_phys_wc_add(info->fix.smem_start,
1461                                                          info->fix.smem_len);
1462
1463         info->fix.ypanstep      = nopan ? 0 : 1;
1464         info->fix.ywrapstep     = nowrap ? 0 : 1;
1465
1466         info->fbops             = &tdfxfb_ops;
1467         info->pseudo_palette    = default_par->palette;
1468         info->flags             = FBINFO_DEFAULT | FBINFO_HWACCEL_YPAN;
1469 #ifdef CONFIG_FB_3DFX_ACCEL
1470         info->flags             |= FBINFO_HWACCEL_FILLRECT |
1471                                    FBINFO_HWACCEL_COPYAREA |
1472                                    FBINFO_HWACCEL_IMAGEBLIT |
1473                                    FBINFO_READS_FAST;
1474 #endif
1475         /* reserve 8192 bits for cursor */
1476         /* the 2.4 driver says PAGE_MASK boundary is not enough for Voodoo4 */
1477         if (hwcursor)
1478                 info->fix.smem_len = (info->fix.smem_len - 1024) &
1479                                         (PAGE_MASK << 1);
1480         specs = &info->monspecs;
1481         found = false;
1482         info->var.bits_per_pixel = 8;
1483 #ifdef CONFIG_FB_3DFX_I2C
1484         tdfxfb_create_i2c_busses(info);
1485         err = tdfxfb_probe_i2c_connector(default_par, specs);
1486
1487         if (!err) {
1488                 if (specs->modedb == NULL)
1489                         DPRINTK("Unable to get Mode Database\n");
1490                 else {
1491                         const struct fb_videomode *m;
1492
1493                         fb_videomode_to_modelist(specs->modedb,
1494                                                  specs->modedb_len,
1495                                                  &info->modelist);
1496                         m = fb_find_best_display(specs, &info->modelist);
1497                         if (m) {
1498                                 fb_videomode_to_var(&info->var, m);
1499                                 /* fill all other info->var's fields */
1500                                 if (tdfxfb_check_var(&info->var, info) < 0)
1501                                         info->var = tdfx_var;
1502                                 else
1503                                         found = true;
1504                         }
1505                 }
1506         }
1507 #endif
1508         if (!mode_option && !found)
1509                 mode_option = "640x480@60";
1510
1511         if (mode_option) {
1512                 err = fb_find_mode(&info->var, info, mode_option,
1513                                    specs->modedb, specs->modedb_len,
1514                                    NULL, info->var.bits_per_pixel);
1515                 if (!err || err == 4)
1516                         info->var = tdfx_var;
1517         }
1518
1519         if (found) {
1520                 fb_destroy_modedb(specs->modedb);
1521                 specs->modedb = NULL;
1522         }
1523
1524         /* maximize virtual vertical length */
1525         lpitch = info->var.xres_virtual * ((info->var.bits_per_pixel + 7) >> 3);
1526         info->var.yres_virtual = info->fix.smem_len / lpitch;
1527         if (info->var.yres_virtual < info->var.yres)
1528                 goto out_err_iobase;
1529
1530         if (fb_alloc_cmap(&info->cmap, 256, 0) < 0) {
1531                 printk(KERN_ERR "tdfxfb: Can't allocate color map\n");
1532                 goto out_err_iobase;
1533         }
1534
1535         if (register_framebuffer(info) < 0) {
1536                 printk(KERN_ERR "tdfxfb: can't register framebuffer\n");
1537                 fb_dealloc_cmap(&info->cmap);
1538                 goto out_err_iobase;
1539         }
1540         /*
1541          * Our driver data
1542          */
1543         pci_set_drvdata(pdev, info);
1544         return 0;
1545
1546 out_err_iobase:
1547 #ifdef CONFIG_FB_3DFX_I2C
1548         tdfxfb_delete_i2c_busses(default_par);
1549 #endif
1550         arch_phys_wc_del(default_par->wc_cookie);
1551         release_region(pci_resource_start(pdev, 2),
1552                        pci_resource_len(pdev, 2));
1553 out_err_screenbase:
1554         if (info->screen_base)
1555                 iounmap(info->screen_base);
1556         release_mem_region(info->fix.smem_start, pci_resource_len(pdev, 1));
1557 out_err_regbase:
1558         /*
1559          * Cleanup after anything that was remapped/allocated.
1560          */
1561         if (default_par->regbase_virt)
1562                 iounmap(default_par->regbase_virt);
1563         release_mem_region(info->fix.mmio_start, info->fix.mmio_len);
1564 out_err:
1565         framebuffer_release(info);
1566         return -ENXIO;
1567 }
1568
1569 #ifndef MODULE
1570 static void __init tdfxfb_setup(char *options)
1571 {
1572         char *this_opt;
1573
1574         if (!options || !*options)
1575                 return;
1576
1577         while ((this_opt = strsep(&options, ",")) != NULL) {
1578                 if (!*this_opt)
1579                         continue;
1580                 if (!strcmp(this_opt, "nopan")) {
1581                         nopan = 1;
1582                 } else if (!strcmp(this_opt, "nowrap")) {
1583                         nowrap = 1;
1584                 } else if (!strncmp(this_opt, "hwcursor=", 9)) {
1585                         hwcursor = simple_strtoul(this_opt + 9, NULL, 0);
1586                 } else if (!strncmp(this_opt, "nomtrr", 6)) {
1587                         nomtrr = 1;
1588                 } else {
1589                         mode_option = this_opt;
1590                 }
1591         }
1592 }
1593 #endif
1594
1595 /**
1596  *      tdfxfb_remove - Device removal
1597  *
1598  *      @pdev:  PCI Device to cleanup
1599  *
1600  *      Releases all resources allocated during the course of the driver's
1601  *      lifetime for the PCI device @pdev.
1602  *
1603  */
1604 static void tdfxfb_remove(struct pci_dev *pdev)
1605 {
1606         struct fb_info *info = pci_get_drvdata(pdev);
1607         struct tdfx_par *par = info->par;
1608
1609         unregister_framebuffer(info);
1610 #ifdef CONFIG_FB_3DFX_I2C
1611         tdfxfb_delete_i2c_busses(par);
1612 #endif
1613         arch_phys_wc_del(par->wc_cookie);
1614         iounmap(par->regbase_virt);
1615         iounmap(info->screen_base);
1616
1617         /* Clean up after reserved regions */
1618         release_region(pci_resource_start(pdev, 2),
1619                        pci_resource_len(pdev, 2));
1620         release_mem_region(pci_resource_start(pdev, 1),
1621                            pci_resource_len(pdev, 1));
1622         release_mem_region(pci_resource_start(pdev, 0),
1623                            pci_resource_len(pdev, 0));
1624         fb_dealloc_cmap(&info->cmap);
1625         framebuffer_release(info);
1626 }
1627
1628 static int __init tdfxfb_init(void)
1629 {
1630 #ifndef MODULE
1631         char *option = NULL;
1632
1633         if (fb_get_options("tdfxfb", &option))
1634                 return -ENODEV;
1635
1636         tdfxfb_setup(option);
1637 #endif
1638         return pci_register_driver(&tdfxfb_driver);
1639 }
1640
1641 static void __exit tdfxfb_exit(void)
1642 {
1643         pci_unregister_driver(&tdfxfb_driver);
1644 }
1645
1646 MODULE_AUTHOR("Hannu Mallat <hmallat@cc.hut.fi>");
1647 MODULE_DESCRIPTION("3Dfx framebuffer device driver");
1648 MODULE_LICENSE("GPL");
1649
1650 module_param(hwcursor, int, 0644);
1651 MODULE_PARM_DESC(hwcursor, "Enable hardware cursor "
1652                         "(1=enable, 0=disable, default=1)");
1653 module_param(mode_option, charp, 0);
1654 MODULE_PARM_DESC(mode_option, "Initial video mode e.g. '648x480-8@60'");
1655 module_param(nomtrr, bool, 0);
1656 MODULE_PARM_DESC(nomtrr, "Disable MTRR support (default: enabled)");
1657
1658 module_init(tdfxfb_init);
1659 module_exit(tdfxfb_exit);