37b135d5d12ed92de0d46cd08c6250bbae297c20
[sfrench/cifs-2.6.git] / drivers / video / savage / savagefb_driver.c
1 /*
2  * linux/drivers/video/savagefb.c -- S3 Savage Framebuffer Driver
3  *
4  * Copyright (c) 2001-2002  Denis Oliver Kropp <dok@directfb.org>
5  *                          Sven Neumann <neo@directfb.org>
6  *
7  *
8  * Card specific code is based on XFree86's savage driver.
9  * Framebuffer framework code is based on code of cyber2000fb and tdfxfb.
10  *
11  * This file is subject to the terms and conditions of the GNU General
12  * Public License.  See the file COPYING in the main directory of this
13  * archive for more details.
14  *
15  * 0.4.0 (neo)
16  *  - hardware accelerated clear and move
17  *
18  * 0.3.2 (dok)
19  *  - wait for vertical retrace before writing to cr67
20  *    at the beginning of savagefb_set_par
21  *  - use synchronization registers cr23 and cr26
22  *
23  * 0.3.1 (dok)
24  *  - reset 3D engine
25  *  - don't return alpha bits for 32bit format
26  *
27  * 0.3.0 (dok)
28  *  - added WaitIdle functions for all Savage types
29  *  - do WaitIdle before mode switching
30  *  - code cleanup
31  *
32  * 0.2.0 (dok)
33  *  - first working version
34  *
35  *
36  * TODO
37  * - clock validations in decode_var
38  *
39  * BUGS
40  * - white margin on bootup
41  *
42  */
43
44 #include <linux/module.h>
45 #include <linux/kernel.h>
46 #include <linux/errno.h>
47 #include <linux/string.h>
48 #include <linux/mm.h>
49 #include <linux/slab.h>
50 #include <linux/delay.h>
51 #include <linux/fb.h>
52 #include <linux/pci.h>
53 #include <linux/init.h>
54 #include <linux/console.h>
55
56 #include <asm/io.h>
57 #include <asm/irq.h>
58 #include <asm/pgtable.h>
59 #include <asm/system.h>
60
61 #ifdef CONFIG_MTRR
62 #include <asm/mtrr.h>
63 #endif
64
65 #include "savagefb.h"
66
67
68 #define SAVAGEFB_VERSION "0.4.0_2.6"
69
70 /* --------------------------------------------------------------------- */
71
72
73 static char *mode_option __devinitdata = NULL;
74
75 #ifdef MODULE
76
77 MODULE_AUTHOR("(c) 2001-2002  Denis Oliver Kropp <dok@directfb.org>");
78 MODULE_LICENSE("GPL");
79 MODULE_DESCRIPTION("FBDev driver for S3 Savage PCI/AGP Chips");
80
81 #endif
82
83
84 /* --------------------------------------------------------------------- */
85
86 static void vgaHWSeqReset(struct savagefb_par *par, int start)
87 {
88         if (start)
89                 VGAwSEQ(0x00, 0x01, par);       /* Synchronous Reset */
90         else
91                 VGAwSEQ(0x00, 0x03, par);       /* End Reset */
92 }
93
94 static void vgaHWProtect(struct savagefb_par *par, int on)
95 {
96         unsigned char tmp;
97
98         if (on) {
99                 /*
100                  * Turn off screen and disable sequencer.
101                  */
102                 tmp = VGArSEQ(0x01, par);
103
104                 vgaHWSeqReset(par, 1);          /* start synchronous reset */
105                 VGAwSEQ(0x01, tmp | 0x20, par);/* disable the display */
106
107                 VGAenablePalette(par);
108         } else {
109                 /*
110                  * Reenable sequencer, then turn on screen.
111                  */
112
113                 tmp = VGArSEQ(0x01, par);
114
115                 VGAwSEQ(0x01, tmp & ~0x20, par);/* reenable display */
116                 vgaHWSeqReset(par, 0);          /* clear synchronous reset */
117
118                 VGAdisablePalette(par);
119         }
120 }
121
122 static void vgaHWRestore(struct savagefb_par  *par, struct savage_reg *reg)
123 {
124         int i;
125
126         VGAwMISC(reg->MiscOutReg, par);
127
128         for (i = 1; i < 5; i++)
129                 VGAwSEQ(i, reg->Sequencer[i], par);
130
131         /* Ensure CRTC registers 0-7 are unlocked by clearing bit 7 or
132            CRTC[17] */
133         VGAwCR(17, reg->CRTC[17] & ~0x80, par);
134
135         for (i = 0; i < 25; i++)
136                 VGAwCR(i, reg->CRTC[i], par);
137
138         for (i = 0; i < 9; i++)
139                 VGAwGR(i, reg->Graphics[i], par);
140
141         VGAenablePalette(par);
142
143         for (i = 0; i < 21; i++)
144                 VGAwATTR(i, reg->Attribute[i], par);
145
146         VGAdisablePalette(par);
147 }
148
149 static void vgaHWInit(struct fb_var_screeninfo *var,
150                       struct savagefb_par            *par,
151                       struct xtimings                *timings,
152                       struct savage_reg              *reg)
153 {
154         reg->MiscOutReg = 0x23;
155
156         if (!(timings->sync & FB_SYNC_HOR_HIGH_ACT))
157                 reg->MiscOutReg |= 0x40;
158
159         if (!(timings->sync & FB_SYNC_VERT_HIGH_ACT))
160                 reg->MiscOutReg |= 0x80;
161
162         /*
163          * Time Sequencer
164          */
165         reg->Sequencer[0x00] = 0x00;
166         reg->Sequencer[0x01] = 0x01;
167         reg->Sequencer[0x02] = 0x0F;
168         reg->Sequencer[0x03] = 0x00;          /* Font select */
169         reg->Sequencer[0x04] = 0x0E;          /* Misc */
170
171         /*
172          * CRTC Controller
173          */
174         reg->CRTC[0x00] = (timings->HTotal >> 3) - 5;
175         reg->CRTC[0x01] = (timings->HDisplay >> 3) - 1;
176         reg->CRTC[0x02] = (timings->HSyncStart >> 3) - 1;
177         reg->CRTC[0x03] = (((timings->HSyncEnd >> 3)  - 1) & 0x1f) | 0x80;
178         reg->CRTC[0x04] = (timings->HSyncStart >> 3);
179         reg->CRTC[0x05] = ((((timings->HSyncEnd >> 3) - 1) & 0x20) << 2) |
180                 (((timings->HSyncEnd >> 3)) & 0x1f);
181         reg->CRTC[0x06] = (timings->VTotal - 2) & 0xFF;
182         reg->CRTC[0x07] = (((timings->VTotal - 2) & 0x100) >> 8) |
183                 (((timings->VDisplay - 1) & 0x100) >> 7) |
184                 ((timings->VSyncStart & 0x100) >> 6) |
185                 (((timings->VSyncStart - 1) & 0x100) >> 5) |
186                 0x10 |
187                 (((timings->VTotal - 2) & 0x200) >> 4) |
188                 (((timings->VDisplay - 1) & 0x200) >> 3) |
189                 ((timings->VSyncStart & 0x200) >> 2);
190         reg->CRTC[0x08] = 0x00;
191         reg->CRTC[0x09] = (((timings->VSyncStart - 1) & 0x200) >> 4) | 0x40;
192
193         if (timings->dblscan)
194                 reg->CRTC[0x09] |= 0x80;
195
196         reg->CRTC[0x0a] = 0x00;
197         reg->CRTC[0x0b] = 0x00;
198         reg->CRTC[0x0c] = 0x00;
199         reg->CRTC[0x0d] = 0x00;
200         reg->CRTC[0x0e] = 0x00;
201         reg->CRTC[0x0f] = 0x00;
202         reg->CRTC[0x10] = timings->VSyncStart & 0xff;
203         reg->CRTC[0x11] = (timings->VSyncEnd & 0x0f) | 0x20;
204         reg->CRTC[0x12] = (timings->VDisplay - 1) & 0xff;
205         reg->CRTC[0x13] = var->xres_virtual >> 4;
206         reg->CRTC[0x14] = 0x00;
207         reg->CRTC[0x15] = (timings->VSyncStart - 1) & 0xff;
208         reg->CRTC[0x16] = (timings->VSyncEnd - 1) & 0xff;
209         reg->CRTC[0x17] = 0xc3;
210         reg->CRTC[0x18] = 0xff;
211
212         /*
213          * are these unnecessary?
214          * vgaHWHBlankKGA(mode, regp, 0, KGA_FIX_OVERSCAN|KGA_ENABLE_ON_ZERO);
215          * vgaHWVBlankKGA(mode, regp, 0, KGA_FIX_OVERSCAN|KGA_ENABLE_ON_ZERO);
216          */
217
218         /*
219          * Graphics Display Controller
220          */
221         reg->Graphics[0x00] = 0x00;
222         reg->Graphics[0x01] = 0x00;
223         reg->Graphics[0x02] = 0x00;
224         reg->Graphics[0x03] = 0x00;
225         reg->Graphics[0x04] = 0x00;
226         reg->Graphics[0x05] = 0x40;
227         reg->Graphics[0x06] = 0x05;   /* only map 64k VGA memory !!!! */
228         reg->Graphics[0x07] = 0x0F;
229         reg->Graphics[0x08] = 0xFF;
230
231
232         reg->Attribute[0x00]  = 0x00; /* standard colormap translation */
233         reg->Attribute[0x01]  = 0x01;
234         reg->Attribute[0x02]  = 0x02;
235         reg->Attribute[0x03]  = 0x03;
236         reg->Attribute[0x04]  = 0x04;
237         reg->Attribute[0x05]  = 0x05;
238         reg->Attribute[0x06]  = 0x06;
239         reg->Attribute[0x07]  = 0x07;
240         reg->Attribute[0x08]  = 0x08;
241         reg->Attribute[0x09]  = 0x09;
242         reg->Attribute[0x0a] = 0x0A;
243         reg->Attribute[0x0b] = 0x0B;
244         reg->Attribute[0x0c] = 0x0C;
245         reg->Attribute[0x0d] = 0x0D;
246         reg->Attribute[0x0e] = 0x0E;
247         reg->Attribute[0x0f] = 0x0F;
248         reg->Attribute[0x10] = 0x41;
249         reg->Attribute[0x11] = 0xFF;
250         reg->Attribute[0x12] = 0x0F;
251         reg->Attribute[0x13] = 0x00;
252         reg->Attribute[0x14] = 0x00;
253 }
254
255 /* -------------------- Hardware specific routines ------------------------- */
256
257 /*
258  * Hardware Acceleration for SavageFB
259  */
260
261 /* Wait for fifo space */
262 static void
263 savage3D_waitfifo(struct savagefb_par *par, int space)
264 {
265         int slots = MAXFIFO - space;
266
267         while ((savage_in32(0x48C00, par) & 0x0000ffff) > slots);
268 }
269
270 static void
271 savage4_waitfifo(struct savagefb_par *par, int space)
272 {
273         int slots = MAXFIFO - space;
274
275         while ((savage_in32(0x48C60, par) & 0x001fffff) > slots);
276 }
277
278 static void
279 savage2000_waitfifo(struct savagefb_par *par, int space)
280 {
281         int slots = MAXFIFO - space;
282
283         while ((savage_in32(0x48C60, par) & 0x0000ffff) > slots);
284 }
285
286 /* Wait for idle accelerator */
287 static void
288 savage3D_waitidle(struct savagefb_par *par)
289 {
290         while ((savage_in32(0x48C00, par) & 0x0008ffff) != 0x80000);
291 }
292
293 static void
294 savage4_waitidle(struct savagefb_par *par)
295 {
296         while ((savage_in32(0x48C60, par) & 0x00a00000) != 0x00a00000);
297 }
298
299 static void
300 savage2000_waitidle(struct savagefb_par *par)
301 {
302         while ((savage_in32(0x48C60, par) & 0x009fffff));
303 }
304
305 #ifdef CONFIG_FB_SAVAGE_ACCEL
306 static void
307 SavageSetup2DEngine(struct savagefb_par  *par)
308 {
309         unsigned long GlobalBitmapDescriptor;
310
311         GlobalBitmapDescriptor = 1 | 8 | BCI_BD_BW_DISABLE;
312         BCI_BD_SET_BPP(GlobalBitmapDescriptor, par->depth);
313         BCI_BD_SET_STRIDE(GlobalBitmapDescriptor, par->vwidth);
314
315         switch(par->chip) {
316         case S3_SAVAGE3D:
317         case S3_SAVAGE_MX:
318                 /* Disable BCI */
319                 savage_out32(0x48C18, savage_in32(0x48C18, par) & 0x3FF0, par);
320                 /* Setup BCI command overflow buffer */
321                 savage_out32(0x48C14,
322                              (par->cob_offset >> 11) | (par->cob_index << 29),
323                              par);
324                 /* Program shadow status update. */
325                 savage_out32(0x48C10, 0x78207220, par);
326                 savage_out32(0x48C0C, 0, par);
327                 /* Enable BCI and command overflow buffer */
328                 savage_out32(0x48C18, savage_in32(0x48C18, par) | 0x0C, par);
329                 break;
330         case S3_SAVAGE4:
331         case S3_PROSAVAGE:
332         case S3_SUPERSAVAGE:
333                 /* Disable BCI */
334                 savage_out32(0x48C18, savage_in32(0x48C18, par) & 0x3FF0, par);
335                 /* Program shadow status update */
336                 savage_out32(0x48C10, 0x00700040, par);
337                 savage_out32(0x48C0C, 0, par);
338                 /* Enable BCI without the COB */
339                 savage_out32(0x48C18, savage_in32(0x48C18, par) | 0x08, par);
340                 break;
341         case S3_SAVAGE2000:
342                 /* Disable BCI */
343                 savage_out32(0x48C18, 0, par);
344                 /* Setup BCI command overflow buffer */
345                 savage_out32(0x48C18,
346                              (par->cob_offset >> 7) | (par->cob_index),
347                              par);
348                 /* Disable shadow status update */
349                 savage_out32(0x48A30, 0, par);
350                 /* Enable BCI and command overflow buffer */
351                 savage_out32(0x48C18, savage_in32(0x48C18, par) | 0x00280000,
352                              par);
353                 break;
354             default:
355                 break;
356         }
357         /* Turn on 16-bit register access. */
358         vga_out8(0x3d4, 0x31, par);
359         vga_out8(0x3d5, 0x0c, par);
360
361         /* Set stride to use GBD. */
362         vga_out8(0x3d4, 0x50, par);
363         vga_out8(0x3d5, vga_in8(0x3d5, par) | 0xC1, par);
364
365         /* Enable 2D engine. */
366         vga_out8(0x3d4, 0x40, par);
367         vga_out8(0x3d5, 0x01, par);
368
369         savage_out32(MONO_PAT_0, ~0, par);
370         savage_out32(MONO_PAT_1, ~0, par);
371
372         /* Setup plane masks */
373         savage_out32(0x8128, ~0, par); /* enable all write planes */
374         savage_out32(0x812C, ~0, par); /* enable all read planes */
375         savage_out16(0x8134, 0x27, par);
376         savage_out16(0x8136, 0x07, par);
377
378         /* Now set the GBD */
379         par->bci_ptr = 0;
380         par->SavageWaitFifo(par, 4);
381
382         BCI_SEND(BCI_CMD_SETREG | (1 << 16) | BCI_GBD1);
383         BCI_SEND(0);
384         BCI_SEND(BCI_CMD_SETREG | (1 << 16) | BCI_GBD2);
385         BCI_SEND(GlobalBitmapDescriptor);
386
387         /*
388          * I don't know why, sending this twice fixes the intial black screen,
389          * prevents X from crashing at least in Toshiba laptops with SavageIX.
390          * --Tony
391          */
392         par->bci_ptr = 0;
393         par->SavageWaitFifo(par, 4);
394
395         BCI_SEND(BCI_CMD_SETREG | (1 << 16) | BCI_GBD1);
396         BCI_SEND(0);
397         BCI_SEND(BCI_CMD_SETREG | (1 << 16) | BCI_GBD2);
398         BCI_SEND(GlobalBitmapDescriptor);
399 }
400
401 static void savagefb_set_clip(struct fb_info *info)
402 {
403         struct savagefb_par *par = info->par;
404         int cmd;
405
406         cmd = BCI_CMD_NOP | BCI_CMD_CLIP_NEW;
407         par->bci_ptr = 0;
408         par->SavageWaitFifo(par,3);
409         BCI_SEND(cmd);
410         BCI_SEND(BCI_CLIP_TL(0, 0));
411         BCI_SEND(BCI_CLIP_BR(0xfff, 0xfff));
412 }
413 #else
414 static void SavageSetup2DEngine(struct savagefb_par  *par) {}
415
416 #endif
417
418 static void SavageCalcClock(long freq, int min_m, int min_n1, int max_n1,
419                             int min_n2, int max_n2, long freq_min,
420                             long freq_max, unsigned int *mdiv,
421                             unsigned int *ndiv, unsigned int *r)
422 {
423         long diff, best_diff;
424         unsigned int m;
425         unsigned char n1, n2, best_n1=16+2, best_n2=2, best_m=125+2;
426
427         if (freq < freq_min / (1 << max_n2)) {
428                 printk(KERN_ERR "invalid frequency %ld Khz\n", freq);
429                 freq = freq_min / (1 << max_n2);
430         }
431         if (freq > freq_max / (1 << min_n2)) {
432                 printk(KERN_ERR "invalid frequency %ld Khz\n", freq);
433                 freq = freq_max / (1 << min_n2);
434         }
435
436         /* work out suitable timings */
437         best_diff = freq;
438
439         for (n2=min_n2; n2<=max_n2; n2++) {
440                 for (n1=min_n1+2; n1<=max_n1+2; n1++) {
441                         m = (freq * n1 * (1 << n2) + HALF_BASE_FREQ) /
442                                 BASE_FREQ;
443                         if (m < min_m+2 || m > 127+2)
444                                 continue;
445                         if ((m * BASE_FREQ >= freq_min * n1) &&
446                             (m * BASE_FREQ <= freq_max * n1)) {
447                                 diff = freq * (1 << n2) * n1 - BASE_FREQ * m;
448                                 if (diff < 0)
449                                         diff = -diff;
450                                 if (diff < best_diff) {
451                                         best_diff = diff;
452                                         best_m = m;
453                                         best_n1 = n1;
454                                         best_n2 = n2;
455                                 }
456                         }
457                 }
458         }
459
460         *ndiv = best_n1 - 2;
461         *r = best_n2;
462         *mdiv = best_m - 2;
463 }
464
465 static int common_calc_clock(long freq, int min_m, int min_n1, int max_n1,
466                              int min_n2, int max_n2, long freq_min,
467                              long freq_max, unsigned char *mdiv,
468                              unsigned char *ndiv)
469 {
470         long diff, best_diff;
471         unsigned int m;
472         unsigned char n1, n2;
473         unsigned char best_n1 = 16+2, best_n2 = 2, best_m = 125+2;
474
475         best_diff = freq;
476
477         for (n2 = min_n2; n2 <= max_n2; n2++) {
478                 for (n1 = min_n1+2; n1 <= max_n1+2; n1++) {
479                         m = (freq * n1 * (1 << n2) + HALF_BASE_FREQ) /
480                                 BASE_FREQ;
481                         if (m < min_m + 2 || m > 127+2)
482                                 continue;
483                         if ((m * BASE_FREQ >= freq_min * n1) &&
484                             (m * BASE_FREQ <= freq_max * n1)) {
485                                 diff = freq * (1 << n2) * n1 - BASE_FREQ * m;
486                                 if (diff < 0)
487                                         diff = -diff;
488                                 if (diff < best_diff) {
489                                         best_diff = diff;
490                                         best_m = m;
491                                         best_n1 = n1;
492                                         best_n2 = n2;
493                                 }
494                         }
495                 }
496         }
497
498         if (max_n1 == 63)
499                 *ndiv = (best_n1 - 2) | (best_n2 << 6);
500         else
501                 *ndiv = (best_n1 - 2) | (best_n2 << 5);
502
503         *mdiv = best_m - 2;
504
505         return 0;
506 }
507
508 #ifdef SAVAGEFB_DEBUG
509 /* This function is used to debug, it prints out the contents of s3 regs */
510
511 static void SavagePrintRegs(struct savagefb_par *par)
512 {
513         unsigned char i;
514         int vgaCRIndex = 0x3d4;
515         int vgaCRReg = 0x3d5;
516
517         printk(KERN_DEBUG "SR    x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 xA xB xC xD xE "
518                "xF");
519
520         for (i = 0; i < 0x70; i++) {
521                 if (!(i % 16))
522                         printk(KERN_DEBUG "\nSR%xx ", i >> 4);
523                 vga_out8(0x3c4, i, par);
524                 printk(KERN_DEBUG " %02x", vga_in8(0x3c5, par));
525         }
526
527         printk(KERN_DEBUG "\n\nCR    x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 xA xB xC "
528                "xD xE xF");
529
530         for (i = 0; i < 0xB7; i++) {
531                 if (!(i % 16))
532                         printk(KERN_DEBUG "\nCR%xx ", i >> 4);
533                 vga_out8(vgaCRIndex, i, par);
534                 printk(KERN_DEBUG " %02x", vga_in8(vgaCRReg, par));
535         }
536
537         printk(KERN_DEBUG "\n\n");
538 }
539 #endif
540
541 /* --------------------------------------------------------------------- */
542
543 static void savage_get_default_par(struct savagefb_par *par, struct savage_reg *reg)
544 {
545         unsigned char cr3a, cr53, cr66;
546
547         vga_out16(0x3d4, 0x4838, par);
548         vga_out16(0x3d4, 0xa039, par);
549         vga_out16(0x3c4, 0x0608, par);
550
551         vga_out8(0x3d4, 0x66, par);
552         cr66 = vga_in8(0x3d5, par);
553         vga_out8(0x3d5, cr66 | 0x80, par);
554         vga_out8(0x3d4, 0x3a, par);
555         cr3a = vga_in8(0x3d5, par);
556         vga_out8(0x3d5, cr3a | 0x80, par);
557         vga_out8(0x3d4, 0x53, par);
558         cr53 = vga_in8(0x3d5, par);
559         vga_out8(0x3d5, cr53 & 0x7f, par);
560
561         vga_out8(0x3d4, 0x66, par);
562         vga_out8(0x3d5, cr66, par);
563         vga_out8(0x3d4, 0x3a, par);
564         vga_out8(0x3d5, cr3a, par);
565
566         vga_out8(0x3d4, 0x66, par);
567         vga_out8(0x3d5, cr66, par);
568         vga_out8(0x3d4, 0x3a, par);
569         vga_out8(0x3d5, cr3a, par);
570
571         /* unlock extended seq regs */
572         vga_out8(0x3c4, 0x08, par);
573         reg->SR08 = vga_in8(0x3c5, par);
574         vga_out8(0x3c5, 0x06, par);
575
576         /* now save all the extended regs we need */
577         vga_out8(0x3d4, 0x31, par);
578         reg->CR31 = vga_in8(0x3d5, par);
579         vga_out8(0x3d4, 0x32, par);
580         reg->CR32 = vga_in8(0x3d5, par);
581         vga_out8(0x3d4, 0x34, par);
582         reg->CR34 = vga_in8(0x3d5, par);
583         vga_out8(0x3d4, 0x36, par);
584         reg->CR36 = vga_in8(0x3d5, par);
585         vga_out8(0x3d4, 0x3a, par);
586         reg->CR3A = vga_in8(0x3d5, par);
587         vga_out8(0x3d4, 0x40, par);
588         reg->CR40 = vga_in8(0x3d5, par);
589         vga_out8(0x3d4, 0x42, par);
590         reg->CR42 = vga_in8(0x3d5, par);
591         vga_out8(0x3d4, 0x45, par);
592         reg->CR45 = vga_in8(0x3d5, par);
593         vga_out8(0x3d4, 0x50, par);
594         reg->CR50 = vga_in8(0x3d5, par);
595         vga_out8(0x3d4, 0x51, par);
596         reg->CR51 = vga_in8(0x3d5, par);
597         vga_out8(0x3d4, 0x53, par);
598         reg->CR53 = vga_in8(0x3d5, par);
599         vga_out8(0x3d4, 0x58, par);
600         reg->CR58 = vga_in8(0x3d5, par);
601         vga_out8(0x3d4, 0x60, par);
602         reg->CR60 = vga_in8(0x3d5, par);
603         vga_out8(0x3d4, 0x66, par);
604         reg->CR66 = vga_in8(0x3d5, par);
605         vga_out8(0x3d4, 0x67, par);
606         reg->CR67 = vga_in8(0x3d5, par);
607         vga_out8(0x3d4, 0x68, par);
608         reg->CR68 = vga_in8(0x3d5, par);
609         vga_out8(0x3d4, 0x69, par);
610         reg->CR69 = vga_in8(0x3d5, par);
611         vga_out8(0x3d4, 0x6f, par);
612         reg->CR6F = vga_in8(0x3d5, par);
613
614         vga_out8(0x3d4, 0x33, par);
615         reg->CR33 = vga_in8(0x3d5, par);
616         vga_out8(0x3d4, 0x86, par);
617         reg->CR86 = vga_in8(0x3d5, par);
618         vga_out8(0x3d4, 0x88, par);
619         reg->CR88 = vga_in8(0x3d5, par);
620         vga_out8(0x3d4, 0x90, par);
621         reg->CR90 = vga_in8(0x3d5, par);
622         vga_out8(0x3d4, 0x91, par);
623         reg->CR91 = vga_in8(0x3d5, par);
624         vga_out8(0x3d4, 0xb0, par);
625         reg->CRB0 = vga_in8(0x3d5, par) | 0x80;
626
627         /* extended mode timing regs */
628         vga_out8(0x3d4, 0x3b, par);
629         reg->CR3B = vga_in8(0x3d5, par);
630         vga_out8(0x3d4, 0x3c, par);
631         reg->CR3C = vga_in8(0x3d5, par);
632         vga_out8(0x3d4, 0x43, par);
633         reg->CR43 = vga_in8(0x3d5, par);
634         vga_out8(0x3d4, 0x5d, par);
635         reg->CR5D = vga_in8(0x3d5, par);
636         vga_out8(0x3d4, 0x5e, par);
637         reg->CR5E = vga_in8(0x3d5, par);
638         vga_out8(0x3d4, 0x65, par);
639         reg->CR65 = vga_in8(0x3d5, par);
640
641         /* save seq extended regs for DCLK PLL programming */
642         vga_out8(0x3c4, 0x0e, par);
643         reg->SR0E = vga_in8(0x3c5, par);
644         vga_out8(0x3c4, 0x0f, par);
645         reg->SR0F = vga_in8(0x3c5, par);
646         vga_out8(0x3c4, 0x10, par);
647         reg->SR10 = vga_in8(0x3c5, par);
648         vga_out8(0x3c4, 0x11, par);
649         reg->SR11 = vga_in8(0x3c5, par);
650         vga_out8(0x3c4, 0x12, par);
651         reg->SR12 = vga_in8(0x3c5, par);
652         vga_out8(0x3c4, 0x13, par);
653         reg->SR13 = vga_in8(0x3c5, par);
654         vga_out8(0x3c4, 0x29, par);
655         reg->SR29 = vga_in8(0x3c5, par);
656
657         vga_out8(0x3c4, 0x15, par);
658         reg->SR15 = vga_in8(0x3c5, par);
659         vga_out8(0x3c4, 0x30, par);
660         reg->SR30 = vga_in8(0x3c5, par);
661         vga_out8(0x3c4, 0x18, par);
662         reg->SR18 = vga_in8(0x3c5, par);
663
664         /* Save flat panel expansion regsters. */
665         if (par->chip == S3_SAVAGE_MX) {
666                 int i;
667
668                 for (i = 0; i < 8; i++) {
669                         vga_out8(0x3c4, 0x54+i, par);
670                         reg->SR54[i] = vga_in8(0x3c5, par);
671                 }
672         }
673
674         vga_out8(0x3d4, 0x66, par);
675         cr66 = vga_in8(0x3d5, par);
676         vga_out8(0x3d5, cr66 | 0x80, par);
677         vga_out8(0x3d4, 0x3a, par);
678         cr3a = vga_in8(0x3d5, par);
679         vga_out8(0x3d5, cr3a | 0x80, par);
680
681         /* now save MIU regs */
682         if (par->chip != S3_SAVAGE_MX) {
683                 reg->MMPR0 = savage_in32(FIFO_CONTROL_REG, par);
684                 reg->MMPR1 = savage_in32(MIU_CONTROL_REG, par);
685                 reg->MMPR2 = savage_in32(STREAMS_TIMEOUT_REG, par);
686                 reg->MMPR3 = savage_in32(MISC_TIMEOUT_REG, par);
687         }
688
689         vga_out8(0x3d4, 0x3a, par);
690         vga_out8(0x3d5, cr3a, par);
691         vga_out8(0x3d4, 0x66, par);
692         vga_out8(0x3d5, cr66, par);
693 }
694
695 static void savage_set_default_par(struct savagefb_par *par,
696                                 struct savage_reg *reg)
697 {
698         unsigned char cr3a, cr53, cr66;
699
700         vga_out16(0x3d4, 0x4838, par);
701         vga_out16(0x3d4, 0xa039, par);
702         vga_out16(0x3c4, 0x0608, par);
703
704         vga_out8(0x3d4, 0x66, par);
705         cr66 = vga_in8(0x3d5, par);
706         vga_out8(0x3d5, cr66 | 0x80, par);
707         vga_out8(0x3d4, 0x3a, par);
708         cr3a = vga_in8(0x3d5, par);
709         vga_out8(0x3d5, cr3a | 0x80, par);
710         vga_out8(0x3d4, 0x53, par);
711         cr53 = vga_in8(0x3d5, par);
712         vga_out8(0x3d5, cr53 & 0x7f, par);
713
714         vga_out8(0x3d4, 0x66, par);
715         vga_out8(0x3d5, cr66, par);
716         vga_out8(0x3d4, 0x3a, par);
717         vga_out8(0x3d5, cr3a, par);
718
719         vga_out8(0x3d4, 0x66, par);
720         vga_out8(0x3d5, cr66, par);
721         vga_out8(0x3d4, 0x3a, par);
722         vga_out8(0x3d5, cr3a, par);
723
724         /* unlock extended seq regs */
725         vga_out8(0x3c4, 0x08, par);
726         vga_out8(0x3c5, reg->SR08, par);
727         vga_out8(0x3c5, 0x06, par);
728
729         /* now restore all the extended regs we need */
730         vga_out8(0x3d4, 0x31, par);
731         vga_out8(0x3d5, reg->CR31, par);
732         vga_out8(0x3d4, 0x32, par);
733         vga_out8(0x3d5, reg->CR32, par);
734         vga_out8(0x3d4, 0x34, par);
735         vga_out8(0x3d5, reg->CR34, par);
736         vga_out8(0x3d4, 0x36, par);
737         vga_out8(0x3d5,reg->CR36, par);
738         vga_out8(0x3d4, 0x3a, par);
739         vga_out8(0x3d5, reg->CR3A, par);
740         vga_out8(0x3d4, 0x40, par);
741         vga_out8(0x3d5, reg->CR40, par);
742         vga_out8(0x3d4, 0x42, par);
743         vga_out8(0x3d5, reg->CR42, par);
744         vga_out8(0x3d4, 0x45, par);
745         vga_out8(0x3d5, reg->CR45, par);
746         vga_out8(0x3d4, 0x50, par);
747         vga_out8(0x3d5, reg->CR50, par);
748         vga_out8(0x3d4, 0x51, par);
749         vga_out8(0x3d5, reg->CR51, par);
750         vga_out8(0x3d4, 0x53, par);
751         vga_out8(0x3d5, reg->CR53, par);
752         vga_out8(0x3d4, 0x58, par);
753         vga_out8(0x3d5, reg->CR58, par);
754         vga_out8(0x3d4, 0x60, par);
755         vga_out8(0x3d5, reg->CR60, par);
756         vga_out8(0x3d4, 0x66, par);
757         vga_out8(0x3d5, reg->CR66, par);
758         vga_out8(0x3d4, 0x67, par);
759         vga_out8(0x3d5, reg->CR67, par);
760         vga_out8(0x3d4, 0x68, par);
761         vga_out8(0x3d5, reg->CR68, par);
762         vga_out8(0x3d4, 0x69, par);
763         vga_out8(0x3d5, reg->CR69, par);
764         vga_out8(0x3d4, 0x6f, par);
765         vga_out8(0x3d5, reg->CR6F, par);
766
767         vga_out8(0x3d4, 0x33, par);
768         vga_out8(0x3d5, reg->CR33, par);
769         vga_out8(0x3d4, 0x86, par);
770         vga_out8(0x3d5, reg->CR86, par);
771         vga_out8(0x3d4, 0x88, par);
772         vga_out8(0x3d5, reg->CR88, par);
773         vga_out8(0x3d4, 0x90, par);
774         vga_out8(0x3d5, reg->CR90, par);
775         vga_out8(0x3d4, 0x91, par);
776         vga_out8(0x3d5, reg->CR91, par);
777         vga_out8(0x3d4, 0xb0, par);
778         vga_out8(0x3d5, reg->CRB0, par);
779
780         /* extended mode timing regs */
781         vga_out8(0x3d4, 0x3b, par);
782         vga_out8(0x3d5, reg->CR3B, par);
783         vga_out8(0x3d4, 0x3c, par);
784         vga_out8(0x3d5, reg->CR3C, par);
785         vga_out8(0x3d4, 0x43, par);
786         vga_out8(0x3d5, reg->CR43, par);
787         vga_out8(0x3d4, 0x5d, par);
788         vga_out8(0x3d5, reg->CR5D, par);
789         vga_out8(0x3d4, 0x5e, par);
790         vga_out8(0x3d5, reg->CR5E, par);
791         vga_out8(0x3d4, 0x65, par);
792         vga_out8(0x3d5, reg->CR65, par);
793
794         /* save seq extended regs for DCLK PLL programming */
795         vga_out8(0x3c4, 0x0e, par);
796         vga_out8(0x3c5, reg->SR0E, par);
797         vga_out8(0x3c4, 0x0f, par);
798         vga_out8(0x3c5, reg->SR0F, par);
799         vga_out8(0x3c4, 0x10, par);
800         vga_out8(0x3c5, reg->SR10, par);
801         vga_out8(0x3c4, 0x11, par);
802         vga_out8(0x3c5, reg->SR11, par);
803         vga_out8(0x3c4, 0x12, par);
804         vga_out8(0x3c5, reg->SR12, par);
805         vga_out8(0x3c4, 0x13, par);
806         vga_out8(0x3c5, reg->SR13, par);
807         vga_out8(0x3c4, 0x29, par);
808         vga_out8(0x3c5, reg->SR29, par);
809
810         vga_out8(0x3c4, 0x15, par);
811         vga_out8(0x3c5, reg->SR15, par);
812         vga_out8(0x3c4, 0x30, par);
813         vga_out8(0x3c5, reg->SR30, par);
814         vga_out8(0x3c4, 0x18, par);
815         vga_out8(0x3c5, reg->SR18, par);
816
817         /* Save flat panel expansion regsters. */
818         if (par->chip == S3_SAVAGE_MX) {
819                 int i;
820
821                 for (i = 0; i < 8; i++) {
822                         vga_out8(0x3c4, 0x54+i, par);
823                         vga_out8(0x3c5, reg->SR54[i], par);
824                 }
825         }
826
827         vga_out8(0x3d4, 0x66, par);
828         cr66 = vga_in8(0x3d5, par);
829         vga_out8(0x3d5, cr66 | 0x80, par);
830         vga_out8(0x3d4, 0x3a, par);
831         cr3a = vga_in8(0x3d5, par);
832         vga_out8(0x3d5, cr3a | 0x80, par);
833
834         /* now save MIU regs */
835         if (par->chip != S3_SAVAGE_MX) {
836                 savage_out32(FIFO_CONTROL_REG, reg->MMPR0, par);
837                 savage_out32(MIU_CONTROL_REG, reg->MMPR1, par);
838                 savage_out32(STREAMS_TIMEOUT_REG, reg->MMPR2, par);
839                 savage_out32(MISC_TIMEOUT_REG, reg->MMPR3, par);
840         }
841
842         vga_out8(0x3d4, 0x3a, par);
843         vga_out8(0x3d5, cr3a, par);
844         vga_out8(0x3d4, 0x66, par);
845         vga_out8(0x3d5, cr66, par);
846 }
847
848 static void savage_update_var(struct fb_var_screeninfo *var,
849                               const struct fb_videomode *modedb)
850 {
851         var->xres = var->xres_virtual = modedb->xres;
852         var->yres = modedb->yres;
853         if (var->yres_virtual < var->yres)
854             var->yres_virtual = var->yres;
855         var->xoffset = var->yoffset = 0;
856         var->pixclock = modedb->pixclock;
857         var->left_margin = modedb->left_margin;
858         var->right_margin = modedb->right_margin;
859         var->upper_margin = modedb->upper_margin;
860         var->lower_margin = modedb->lower_margin;
861         var->hsync_len = modedb->hsync_len;
862         var->vsync_len = modedb->vsync_len;
863         var->sync = modedb->sync;
864         var->vmode = modedb->vmode;
865 }
866
867 static int savagefb_check_var(struct fb_var_screeninfo   *var,
868                               struct fb_info *info)
869 {
870         struct savagefb_par *par = info->par;
871         int memlen, vramlen, mode_valid = 0;
872
873         DBG("savagefb_check_var");
874
875         var->transp.offset = 0;
876         var->transp.length = 0;
877         switch (var->bits_per_pixel) {
878         case 8:
879                 var->red.offset = var->green.offset =
880                         var->blue.offset = 0;
881                 var->red.length = var->green.length =
882                         var->blue.length = var->bits_per_pixel;
883                 break;
884         case 16:
885                 var->red.offset = 11;
886                 var->red.length = 5;
887                 var->green.offset = 5;
888                 var->green.length = 6;
889                 var->blue.offset = 0;
890                 var->blue.length = 5;
891                 break;
892         case 32:
893                 var->transp.offset = 24;
894                 var->transp.length = 8;
895                 var->red.offset = 16;
896                 var->red.length = 8;
897                 var->green.offset = 8;
898                 var->green.length = 8;
899                 var->blue.offset = 0;
900                 var->blue.length = 8;
901                 break;
902
903         default:
904                 return -EINVAL;
905         }
906
907         if (!info->monspecs.hfmax || !info->monspecs.vfmax ||
908             !info->monspecs.dclkmax || !fb_validate_mode(var, info))
909                 mode_valid = 1;
910
911         /* calculate modeline if supported by monitor */
912         if (!mode_valid && info->monspecs.gtf) {
913                 if (!fb_get_mode(FB_MAXTIMINGS, 0, var, info))
914                         mode_valid = 1;
915         }
916
917         if (!mode_valid) {
918                 const struct fb_videomode *mode;
919
920                 mode = fb_find_best_mode(var, &info->modelist);
921                 if (mode) {
922                         savage_update_var(var, mode);
923                         mode_valid = 1;
924                 }
925         }
926
927         if (!mode_valid && info->monspecs.modedb_len)
928                 return -EINVAL;
929
930         /* Is the mode larger than the LCD panel? */
931         if (par->SavagePanelWidth &&
932             (var->xres > par->SavagePanelWidth ||
933              var->yres > par->SavagePanelHeight)) {
934                 printk(KERN_INFO "Mode (%dx%d) larger than the LCD panel "
935                        "(%dx%d)\n", var->xres,  var->yres,
936                        par->SavagePanelWidth,
937                        par->SavagePanelHeight);
938                 return -1;
939         }
940
941         if (var->yres_virtual < var->yres)
942                 var->yres_virtual = var->yres;
943         if (var->xres_virtual < var->xres)
944                 var->xres_virtual = var->xres;
945
946         vramlen = info->fix.smem_len;
947
948         memlen = var->xres_virtual * var->bits_per_pixel *
949                 var->yres_virtual / 8;
950         if (memlen > vramlen) {
951                 var->yres_virtual = vramlen * 8 /
952                         (var->xres_virtual * var->bits_per_pixel);
953                 memlen = var->xres_virtual * var->bits_per_pixel *
954                         var->yres_virtual / 8;
955         }
956
957         /* we must round yres/xres down, we already rounded y/xres_virtual up
958            if it was possible. We should return -EINVAL, but I disagree */
959         if (var->yres_virtual < var->yres)
960                 var->yres = var->yres_virtual;
961         if (var->xres_virtual < var->xres)
962                 var->xres = var->xres_virtual;
963         if (var->xoffset + var->xres > var->xres_virtual)
964                 var->xoffset = var->xres_virtual - var->xres;
965         if (var->yoffset + var->yres > var->yres_virtual)
966                 var->yoffset = var->yres_virtual - var->yres;
967
968         return 0;
969 }
970
971
972 static int savagefb_decode_var(struct fb_var_screeninfo   *var,
973                                struct savagefb_par        *par,
974                                struct savage_reg          *reg)
975 {
976         struct xtimings timings;
977         int width, dclk, i, j; /*, refresh; */
978         unsigned int m, n, r;
979         unsigned char tmp = 0;
980         unsigned int pixclock = var->pixclock;
981
982         DBG("savagefb_decode_var");
983
984         memset(&timings, 0, sizeof(timings));
985
986         if (!pixclock) pixclock = 10000;        /* 10ns = 100MHz */
987         timings.Clock = 1000000000 / pixclock;
988         if (timings.Clock < 1) timings.Clock = 1;
989         timings.dblscan = var->vmode & FB_VMODE_DOUBLE;
990         timings.interlaced = var->vmode & FB_VMODE_INTERLACED;
991         timings.HDisplay = var->xres;
992         timings.HSyncStart = timings.HDisplay + var->right_margin;
993         timings.HSyncEnd = timings.HSyncStart + var->hsync_len;
994         timings.HTotal = timings.HSyncEnd + var->left_margin;
995         timings.VDisplay = var->yres;
996         timings.VSyncStart = timings.VDisplay + var->lower_margin;
997         timings.VSyncEnd = timings.VSyncStart + var->vsync_len;
998         timings.VTotal = timings.VSyncEnd + var->upper_margin;
999         timings.sync = var->sync;
1000
1001
1002         par->depth  = var->bits_per_pixel;
1003         par->vwidth = var->xres_virtual;
1004
1005         if (var->bits_per_pixel == 16  &&  par->chip == S3_SAVAGE3D) {
1006                 timings.HDisplay *= 2;
1007                 timings.HSyncStart *= 2;
1008                 timings.HSyncEnd *= 2;
1009                 timings.HTotal *= 2;
1010         }
1011
1012         /*
1013          * This will allocate the datastructure and initialize all of the
1014          * generic VGA registers.
1015          */
1016         vgaHWInit(var, par, &timings, reg);
1017
1018         /* We need to set CR67 whether or not we use the BIOS. */
1019
1020         dclk = timings.Clock;
1021         reg->CR67 = 0x00;
1022
1023         switch(var->bits_per_pixel) {
1024         case 8:
1025                 if ((par->chip == S3_SAVAGE2000) && (dclk >= 230000))
1026                         reg->CR67 = 0x10;       /* 8bpp, 2 pixels/clock */
1027                 else
1028                         reg->CR67 = 0x00;       /* 8bpp, 1 pixel/clock */
1029                 break;
1030         case 15:
1031                 if (S3_SAVAGE_MOBILE_SERIES(par->chip) ||
1032                     ((par->chip == S3_SAVAGE2000) && (dclk >= 230000)))
1033                         reg->CR67 = 0x30;       /* 15bpp, 2 pixel/clock */
1034                 else
1035                         reg->CR67 = 0x20;       /* 15bpp, 1 pixels/clock */
1036                 break;
1037         case 16:
1038                 if (S3_SAVAGE_MOBILE_SERIES(par->chip) ||
1039                    ((par->chip == S3_SAVAGE2000) && (dclk >= 230000)))
1040                         reg->CR67 = 0x50;       /* 16bpp, 2 pixel/clock */
1041                 else
1042                         reg->CR67 = 0x40;       /* 16bpp, 1 pixels/clock */
1043                 break;
1044         case 24:
1045                 reg->CR67 = 0x70;
1046                 break;
1047         case 32:
1048                 reg->CR67 = 0xd0;
1049                 break;
1050         }
1051
1052         /*
1053          * Either BIOS use is disabled, or we failed to find a suitable
1054          * match.  Fall back to traditional register-crunching.
1055          */
1056
1057         vga_out8(0x3d4, 0x3a, par);
1058         tmp = vga_in8(0x3d5, par);
1059         if (1 /*FIXME:psav->pci_burst*/)
1060                 reg->CR3A = (tmp & 0x7f) | 0x15;
1061         else
1062                 reg->CR3A = tmp | 0x95;
1063
1064         reg->CR53 = 0x00;
1065         reg->CR31 = 0x8c;
1066         reg->CR66 = 0x89;
1067
1068         vga_out8(0x3d4, 0x58, par);
1069         reg->CR58 = vga_in8(0x3d5, par) & 0x80;
1070         reg->CR58 |= 0x13;
1071
1072         reg->SR15 = 0x03 | 0x80;
1073         reg->SR18 = 0x00;
1074         reg->CR43 = reg->CR45 = reg->CR65 = 0x00;
1075
1076         vga_out8(0x3d4, 0x40, par);
1077         reg->CR40 = vga_in8(0x3d5, par) & ~0x01;
1078
1079         reg->MMPR0 = 0x010400;
1080         reg->MMPR1 = 0x00;
1081         reg->MMPR2 = 0x0808;
1082         reg->MMPR3 = 0x08080810;
1083
1084         SavageCalcClock(dclk, 1, 1, 127, 0, 4, 180000, 360000, &m, &n, &r);
1085         /* m = 107; n = 4; r = 2; */
1086
1087         if (par->MCLK <= 0) {
1088                 reg->SR10 = 255;
1089                 reg->SR11 = 255;
1090         } else {
1091                 common_calc_clock(par->MCLK, 1, 1, 31, 0, 3, 135000, 270000,
1092                                    &reg->SR11, &reg->SR10);
1093                 /*      reg->SR10 = 80; // MCLK == 286000 */
1094                 /*      reg->SR11 = 125; */
1095         }
1096
1097         reg->SR12 = (r << 6) | (n & 0x3f);
1098         reg->SR13 = m & 0xff;
1099         reg->SR29 = (r & 4) | (m & 0x100) >> 5 | (n & 0x40) >> 2;
1100
1101         if (var->bits_per_pixel < 24)
1102                 reg->MMPR0 -= 0x8000;
1103         else
1104                 reg->MMPR0 -= 0x4000;
1105
1106         if (timings.interlaced)
1107                 reg->CR42 = 0x20;
1108         else
1109                 reg->CR42 = 0x00;
1110
1111         reg->CR34 = 0x10; /* display fifo */
1112
1113         i = ((((timings.HTotal >> 3) - 5) & 0x100) >> 8) |
1114                 ((((timings.HDisplay >> 3) - 1) & 0x100) >> 7) |
1115                 ((((timings.HSyncStart >> 3) - 1) & 0x100) >> 6) |
1116                 ((timings.HSyncStart & 0x800) >> 7);
1117
1118         if ((timings.HSyncEnd >> 3) - (timings.HSyncStart >> 3) > 64)
1119                 i |= 0x08;
1120         if ((timings.HSyncEnd >> 3) - (timings.HSyncStart >> 3) > 32)
1121                 i |= 0x20;
1122
1123         j = (reg->CRTC[0] + ((i & 0x01) << 8) +
1124              reg->CRTC[4] + ((i & 0x10) << 4) + 1) / 2;
1125
1126         if (j - (reg->CRTC[4] + ((i & 0x10) << 4)) < 4) {
1127                 if (reg->CRTC[4] + ((i & 0x10) << 4) + 4 <=
1128                     reg->CRTC[0] + ((i & 0x01) << 8))
1129                         j = reg->CRTC[4] + ((i & 0x10) << 4) + 4;
1130                 else
1131                         j = reg->CRTC[0] + ((i & 0x01) << 8) + 1;
1132         }
1133
1134         reg->CR3B = j & 0xff;
1135         i |= (j & 0x100) >> 2;
1136         reg->CR3C = (reg->CRTC[0] + ((i & 0x01) << 8)) / 2;
1137         reg->CR5D = i;
1138         reg->CR5E = (((timings.VTotal - 2) & 0x400) >> 10) |
1139                 (((timings.VDisplay - 1) & 0x400) >> 9) |
1140                 (((timings.VSyncStart) & 0x400) >> 8) |
1141                 (((timings.VSyncStart) & 0x400) >> 6) | 0x40;
1142         width = (var->xres_virtual * ((var->bits_per_pixel+7) / 8)) >> 3;
1143         reg->CR91 = reg->CRTC[19] = 0xff & width;
1144         reg->CR51 = (0x300 & width) >> 4;
1145         reg->CR90 = 0x80 | (width >> 8);
1146         reg->MiscOutReg |= 0x0c;
1147
1148         /* Set frame buffer description. */
1149
1150         if (var->bits_per_pixel <= 8)
1151                 reg->CR50 = 0;
1152         else if (var->bits_per_pixel <= 16)
1153                 reg->CR50 = 0x10;
1154         else
1155                 reg->CR50 = 0x30;
1156
1157         if (var->xres_virtual <= 640)
1158                 reg->CR50 |= 0x40;
1159         else if (var->xres_virtual == 800)
1160                 reg->CR50 |= 0x80;
1161         else if (var->xres_virtual == 1024)
1162                 reg->CR50 |= 0x00;
1163         else if (var->xres_virtual == 1152)
1164                 reg->CR50 |= 0x01;
1165         else if (var->xres_virtual == 1280)
1166                 reg->CR50 |= 0xc0;
1167         else if (var->xres_virtual == 1600)
1168                 reg->CR50 |= 0x81;
1169         else
1170                 reg->CR50 |= 0xc1;      /* Use GBD */
1171
1172         if (par->chip == S3_SAVAGE2000)
1173                 reg->CR33 = 0x08;
1174         else
1175                 reg->CR33 = 0x20;
1176
1177         reg->CRTC[0x17] = 0xeb;
1178
1179         reg->CR67 |= 1;
1180
1181         vga_out8(0x3d4, 0x36, par);
1182         reg->CR36 = vga_in8(0x3d5, par);
1183         vga_out8(0x3d4, 0x68, par);
1184         reg->CR68 = vga_in8(0x3d5, par);
1185         reg->CR69 = 0;
1186         vga_out8(0x3d4, 0x6f, par);
1187         reg->CR6F = vga_in8(0x3d5, par);
1188         vga_out8(0x3d4, 0x86, par);
1189         reg->CR86 = vga_in8(0x3d5, par);
1190         vga_out8(0x3d4, 0x88, par);
1191         reg->CR88 = vga_in8(0x3d5, par) | 0x08;
1192         vga_out8(0x3d4, 0xb0, par);
1193         reg->CRB0 = vga_in8(0x3d5, par) | 0x80;
1194
1195         return 0;
1196 }
1197
1198 /* --------------------------------------------------------------------- */
1199
1200 /*
1201  *    Set a single color register. Return != 0 for invalid regno.
1202  */
1203 static int savagefb_setcolreg(unsigned        regno,
1204                               unsigned        red,
1205                               unsigned        green,
1206                               unsigned        blue,
1207                               unsigned        transp,
1208                               struct fb_info *info)
1209 {
1210         struct savagefb_par *par = info->par;
1211
1212         if (regno >= NR_PALETTE)
1213                 return -EINVAL;
1214
1215         par->palette[regno].red    = red;
1216         par->palette[regno].green  = green;
1217         par->palette[regno].blue   = blue;
1218         par->palette[regno].transp = transp;
1219
1220         switch (info->var.bits_per_pixel) {
1221         case 8:
1222                 vga_out8(0x3c8, regno, par);
1223
1224                 vga_out8(0x3c9, red   >> 10, par);
1225                 vga_out8(0x3c9, green >> 10, par);
1226                 vga_out8(0x3c9, blue  >> 10, par);
1227                 break;
1228
1229         case 16:
1230                 if (regno < 16)
1231                         ((u32 *)info->pseudo_palette)[regno] =
1232                                 ((red   & 0xf800)      ) |
1233                                 ((green & 0xfc00) >>  5) |
1234                                 ((blue  & 0xf800) >> 11);
1235                 break;
1236
1237         case 24:
1238                 if (regno < 16)
1239                         ((u32 *)info->pseudo_palette)[regno] =
1240                                 ((red    & 0xff00) <<  8) |
1241                                 ((green  & 0xff00)      ) |
1242                                 ((blue   & 0xff00) >>  8);
1243                 break;
1244         case 32:
1245                 if (regno < 16)
1246                         ((u32 *)info->pseudo_palette)[regno] =
1247                                 ((transp & 0xff00) << 16) |
1248                                 ((red    & 0xff00) <<  8) |
1249                                 ((green  & 0xff00)      ) |
1250                                 ((blue   & 0xff00) >>  8);
1251                 break;
1252
1253         default:
1254                 return 1;
1255         }
1256
1257         return 0;
1258 }
1259
1260 static void savagefb_set_par_int(struct savagefb_par  *par, struct savage_reg *reg)
1261 {
1262         unsigned char tmp, cr3a, cr66, cr67;
1263
1264         DBG("savagefb_set_par_int");
1265
1266         par->SavageWaitIdle(par);
1267
1268         vga_out8(0x3c2, 0x23, par);
1269
1270         vga_out16(0x3d4, 0x4838, par);
1271         vga_out16(0x3d4, 0xa539, par);
1272         vga_out16(0x3c4, 0x0608, par);
1273
1274         vgaHWProtect(par, 1);
1275
1276         /*
1277          * Some Savage/MX and /IX systems go nuts when trying to exit the
1278          * server after WindowMaker has displayed a gradient background.  I
1279          * haven't been able to find what causes it, but a non-destructive
1280          * switch to mode 3 here seems to eliminate the issue.
1281          */
1282
1283         VerticalRetraceWait(par);
1284         vga_out8(0x3d4, 0x67, par);
1285         cr67 = vga_in8(0x3d5, par);
1286         vga_out8(0x3d5, cr67/*par->CR67*/ & ~0x0c, par); /* no STREAMS yet */
1287
1288         vga_out8(0x3d4, 0x23, par);
1289         vga_out8(0x3d5, 0x00, par);
1290         vga_out8(0x3d4, 0x26, par);
1291         vga_out8(0x3d5, 0x00, par);
1292
1293         /* restore extended regs */
1294         vga_out8(0x3d4, 0x66, par);
1295         vga_out8(0x3d5, reg->CR66, par);
1296         vga_out8(0x3d4, 0x3a, par);
1297         vga_out8(0x3d5, reg->CR3A, par);
1298         vga_out8(0x3d4, 0x31, par);
1299         vga_out8(0x3d5, reg->CR31, par);
1300         vga_out8(0x3d4, 0x32, par);
1301         vga_out8(0x3d5, reg->CR32, par);
1302         vga_out8(0x3d4, 0x58, par);
1303         vga_out8(0x3d5, reg->CR58, par);
1304         vga_out8(0x3d4, 0x53, par);
1305         vga_out8(0x3d5, reg->CR53 & 0x7f, par);
1306
1307         vga_out16(0x3c4, 0x0608, par);
1308
1309         /* Restore DCLK registers. */
1310
1311         vga_out8(0x3c4, 0x0e, par);
1312         vga_out8(0x3c5, reg->SR0E, par);
1313         vga_out8(0x3c4, 0x0f, par);
1314         vga_out8(0x3c5, reg->SR0F, par);
1315         vga_out8(0x3c4, 0x29, par);
1316         vga_out8(0x3c5, reg->SR29, par);
1317         vga_out8(0x3c4, 0x15, par);
1318         vga_out8(0x3c5, reg->SR15, par);
1319
1320         /* Restore flat panel expansion regsters. */
1321         if (par->chip == S3_SAVAGE_MX) {
1322                 int i;
1323
1324                 for (i = 0; i < 8; i++) {
1325                         vga_out8(0x3c4, 0x54+i, par);
1326                         vga_out8(0x3c5, reg->SR54[i], par);
1327                 }
1328         }
1329
1330         vgaHWRestore (par, reg);
1331
1332         /* extended mode timing registers */
1333         vga_out8(0x3d4, 0x53, par);
1334         vga_out8(0x3d5, reg->CR53, par);
1335         vga_out8(0x3d4, 0x5d, par);
1336         vga_out8(0x3d5, reg->CR5D, par);
1337         vga_out8(0x3d4, 0x5e, par);
1338         vga_out8(0x3d5, reg->CR5E, par);
1339         vga_out8(0x3d4, 0x3b, par);
1340         vga_out8(0x3d5, reg->CR3B, par);
1341         vga_out8(0x3d4, 0x3c, par);
1342         vga_out8(0x3d5, reg->CR3C, par);
1343         vga_out8(0x3d4, 0x43, par);
1344         vga_out8(0x3d5, reg->CR43, par);
1345         vga_out8(0x3d4, 0x65, par);
1346         vga_out8(0x3d5, reg->CR65, par);
1347
1348         /* restore the desired video mode with cr67 */
1349         vga_out8(0x3d4, 0x67, par);
1350         /* following part not present in X11 driver */
1351         cr67 = vga_in8(0x3d5, par) & 0xf;
1352         vga_out8(0x3d5, 0x50 | cr67, par);
1353         udelay(10000);
1354         vga_out8(0x3d4, 0x67, par);
1355         /* end of part */
1356         vga_out8(0x3d5, reg->CR67 & ~0x0c, par);
1357
1358         /* other mode timing and extended regs */
1359         vga_out8(0x3d4, 0x34, par);
1360         vga_out8(0x3d5, reg->CR34, par);
1361         vga_out8(0x3d4, 0x40, par);
1362         vga_out8(0x3d5, reg->CR40, par);
1363         vga_out8(0x3d4, 0x42, par);
1364         vga_out8(0x3d5, reg->CR42, par);
1365         vga_out8(0x3d4, 0x45, par);
1366         vga_out8(0x3d5, reg->CR45, par);
1367         vga_out8(0x3d4, 0x50, par);
1368         vga_out8(0x3d5, reg->CR50, par);
1369         vga_out8(0x3d4, 0x51, par);
1370         vga_out8(0x3d5, reg->CR51, par);
1371
1372         /* memory timings */
1373         vga_out8(0x3d4, 0x36, par);
1374         vga_out8(0x3d5, reg->CR36, par);
1375         vga_out8(0x3d4, 0x60, par);
1376         vga_out8(0x3d5, reg->CR60, par);
1377         vga_out8(0x3d4, 0x68, par);
1378         vga_out8(0x3d5, reg->CR68, par);
1379         vga_out8(0x3d4, 0x69, par);
1380         vga_out8(0x3d5, reg->CR69, par);
1381         vga_out8(0x3d4, 0x6f, par);
1382         vga_out8(0x3d5, reg->CR6F, par);
1383
1384         vga_out8(0x3d4, 0x33, par);
1385         vga_out8(0x3d5, reg->CR33, par);
1386         vga_out8(0x3d4, 0x86, par);
1387         vga_out8(0x3d5, reg->CR86, par);
1388         vga_out8(0x3d4, 0x88, par);
1389         vga_out8(0x3d5, reg->CR88, par);
1390         vga_out8(0x3d4, 0x90, par);
1391         vga_out8(0x3d5, reg->CR90, par);
1392         vga_out8(0x3d4, 0x91, par);
1393         vga_out8(0x3d5, reg->CR91, par);
1394
1395         if (par->chip == S3_SAVAGE4) {
1396                 vga_out8(0x3d4, 0xb0, par);
1397                 vga_out8(0x3d5, reg->CRB0, par);
1398         }
1399
1400         vga_out8(0x3d4, 0x32, par);
1401         vga_out8(0x3d5, reg->CR32, par);
1402
1403         /* unlock extended seq regs */
1404         vga_out8(0x3c4, 0x08, par);
1405         vga_out8(0x3c5, 0x06, par);
1406
1407         /* Restore extended sequencer regs for MCLK. SR10 == 255 indicates
1408          * that we should leave the default SR10 and SR11 values there.
1409          */
1410         if (reg->SR10 != 255) {
1411                 vga_out8(0x3c4, 0x10, par);
1412                 vga_out8(0x3c5, reg->SR10, par);
1413                 vga_out8(0x3c4, 0x11, par);
1414                 vga_out8(0x3c5, reg->SR11, par);
1415         }
1416
1417         /* restore extended seq regs for dclk */
1418         vga_out8(0x3c4, 0x0e, par);
1419         vga_out8(0x3c5, reg->SR0E, par);
1420         vga_out8(0x3c4, 0x0f, par);
1421         vga_out8(0x3c5, reg->SR0F, par);
1422         vga_out8(0x3c4, 0x12, par);
1423         vga_out8(0x3c5, reg->SR12, par);
1424         vga_out8(0x3c4, 0x13, par);
1425         vga_out8(0x3c5, reg->SR13, par);
1426         vga_out8(0x3c4, 0x29, par);
1427         vga_out8(0x3c5, reg->SR29, par);
1428         vga_out8(0x3c4, 0x18, par);
1429         vga_out8(0x3c5, reg->SR18, par);
1430
1431         /* load new m, n pll values for dclk & mclk */
1432         vga_out8(0x3c4, 0x15, par);
1433         tmp = vga_in8(0x3c5, par) & ~0x21;
1434
1435         vga_out8(0x3c5, tmp | 0x03, par);
1436         vga_out8(0x3c5, tmp | 0x23, par);
1437         vga_out8(0x3c5, tmp | 0x03, par);
1438         vga_out8(0x3c5, reg->SR15, par);
1439         udelay(100);
1440
1441         vga_out8(0x3c4, 0x30, par);
1442         vga_out8(0x3c5, reg->SR30, par);
1443         vga_out8(0x3c4, 0x08, par);
1444         vga_out8(0x3c5, reg->SR08, par);
1445
1446         /* now write out cr67 in full, possibly starting STREAMS */
1447         VerticalRetraceWait(par);
1448         vga_out8(0x3d4, 0x67, par);
1449         vga_out8(0x3d5, reg->CR67, par);
1450
1451         vga_out8(0x3d4, 0x66, par);
1452         cr66 = vga_in8(0x3d5, par);
1453         vga_out8(0x3d5, cr66 | 0x80, par);
1454         vga_out8(0x3d4, 0x3a, par);
1455         cr3a = vga_in8(0x3d5, par);
1456         vga_out8(0x3d5, cr3a | 0x80, par);
1457
1458         if (par->chip != S3_SAVAGE_MX) {
1459                 VerticalRetraceWait(par);
1460                 savage_out32(FIFO_CONTROL_REG, reg->MMPR0, par);
1461                 par->SavageWaitIdle(par);
1462                 savage_out32(MIU_CONTROL_REG, reg->MMPR1, par);
1463                 par->SavageWaitIdle(par);
1464                 savage_out32(STREAMS_TIMEOUT_REG, reg->MMPR2, par);
1465                 par->SavageWaitIdle(par);
1466                 savage_out32(MISC_TIMEOUT_REG, reg->MMPR3, par);
1467         }
1468
1469         vga_out8(0x3d4, 0x66, par);
1470         vga_out8(0x3d5, cr66, par);
1471         vga_out8(0x3d4, 0x3a, par);
1472         vga_out8(0x3d5, cr3a, par);
1473
1474         SavageSetup2DEngine(par);
1475         vgaHWProtect(par, 0);
1476 }
1477
1478 static void savagefb_update_start(struct savagefb_par      *par,
1479                                   struct fb_var_screeninfo *var)
1480 {
1481         int base;
1482
1483         base = ((var->yoffset * var->xres_virtual + (var->xoffset & ~1))
1484                 * ((var->bits_per_pixel+7) / 8)) >> 2;
1485
1486         /* now program the start address registers */
1487         vga_out16(0x3d4, (base & 0x00ff00) | 0x0c, par);
1488         vga_out16(0x3d4, ((base & 0x00ff) << 8) | 0x0d, par);
1489         vga_out8(0x3d4, 0x69, par);
1490         vga_out8(0x3d5, (base & 0x7f0000) >> 16, par);
1491 }
1492
1493
1494 static void savagefb_set_fix(struct fb_info *info)
1495 {
1496         info->fix.line_length = info->var.xres_virtual *
1497                 info->var.bits_per_pixel / 8;
1498
1499         if (info->var.bits_per_pixel == 8) {
1500                 info->fix.visual      = FB_VISUAL_PSEUDOCOLOR;
1501                 info->fix.xpanstep    = 4;
1502         } else {
1503                 info->fix.visual      = FB_VISUAL_TRUECOLOR;
1504                 info->fix.xpanstep    = 2;
1505         }
1506
1507 }
1508
1509 static int savagefb_set_par(struct fb_info *info)
1510 {
1511         struct savagefb_par *par = info->par;
1512         struct fb_var_screeninfo *var = &info->var;
1513         int err;
1514
1515         DBG("savagefb_set_par");
1516         err = savagefb_decode_var(var, par, &par->state);
1517         if (err)
1518                 return err;
1519
1520         if (par->dacSpeedBpp <= 0) {
1521                 if (var->bits_per_pixel > 24)
1522                         par->dacSpeedBpp = par->clock[3];
1523                 else if (var->bits_per_pixel >= 24)
1524                         par->dacSpeedBpp = par->clock[2];
1525                 else if ((var->bits_per_pixel > 8) && (var->bits_per_pixel < 24))
1526                         par->dacSpeedBpp = par->clock[1];
1527                 else if (var->bits_per_pixel <= 8)
1528                         par->dacSpeedBpp = par->clock[0];
1529         }
1530
1531         /* Set ramdac limits */
1532         par->maxClock = par->dacSpeedBpp;
1533         par->minClock = 10000;
1534
1535         savagefb_set_par_int(par, &par->state);
1536         fb_set_cmap(&info->cmap, info);
1537         savagefb_set_fix(info);
1538         savagefb_set_clip(info);
1539
1540         SavagePrintRegs(par);
1541         return 0;
1542 }
1543
1544 /*
1545  *    Pan or Wrap the Display
1546  */
1547 static int savagefb_pan_display(struct fb_var_screeninfo *var,
1548                                 struct fb_info           *info)
1549 {
1550         struct savagefb_par *par = info->par;
1551
1552         savagefb_update_start(par, var);
1553         return 0;
1554 }
1555
1556 static int savagefb_blank(int blank, struct fb_info *info)
1557 {
1558         struct savagefb_par *par = info->par;
1559         u8 sr8 = 0, srd = 0;
1560
1561         if (par->display_type == DISP_CRT) {
1562                 vga_out8(0x3c4, 0x08, par);
1563                 sr8 = vga_in8(0x3c5, par);
1564                 sr8 |= 0x06;
1565                 vga_out8(0x3c5, sr8, par);
1566                 vga_out8(0x3c4, 0x0d, par);
1567                 srd = vga_in8(0x3c5, par);
1568                 srd &= 0x03;
1569
1570                 switch (blank) {
1571                 case FB_BLANK_UNBLANK:
1572                 case FB_BLANK_NORMAL:
1573                         break;
1574                 case FB_BLANK_VSYNC_SUSPEND:
1575                         srd |= 0x10;
1576                         break;
1577                 case FB_BLANK_HSYNC_SUSPEND:
1578                         srd |= 0x40;
1579                         break;
1580                 case FB_BLANK_POWERDOWN:
1581                         srd |= 0x50;
1582                         break;
1583                 }
1584
1585                 vga_out8(0x3c4, 0x0d, par);
1586                 vga_out8(0x3c5, srd, par);
1587         }
1588
1589         if (par->display_type == DISP_LCD ||
1590             par->display_type == DISP_DFP) {
1591                 switch(blank) {
1592                 case FB_BLANK_UNBLANK:
1593                 case FB_BLANK_NORMAL:
1594                         vga_out8(0x3c4, 0x31, par); /* SR31 bit 4 - FP enable */
1595                         vga_out8(0x3c5, vga_in8(0x3c5, par) | 0x10, par);
1596                         break;
1597                 case FB_BLANK_VSYNC_SUSPEND:
1598                 case FB_BLANK_HSYNC_SUSPEND:
1599                 case FB_BLANK_POWERDOWN:
1600                         vga_out8(0x3c4, 0x31, par); /* SR31 bit 4 - FP enable */
1601                         vga_out8(0x3c5, vga_in8(0x3c5, par) & ~0x10, par);
1602                         break;
1603                 }
1604         }
1605
1606         return (blank == FB_BLANK_NORMAL) ? 1 : 0;
1607 }
1608
1609 static void savagefb_save_state(struct fb_info *info)
1610 {
1611         struct savagefb_par *par = info->par;
1612
1613         savage_get_default_par(par, &par->save);
1614 }
1615
1616 static void savagefb_restore_state(struct fb_info *info)
1617 {
1618         struct savagefb_par *par = info->par;
1619
1620         savagefb_blank(FB_BLANK_POWERDOWN, info);
1621         savage_set_default_par(par, &par->save);
1622         savagefb_blank(FB_BLANK_UNBLANK, info);
1623 }
1624
1625 static int savagefb_open(struct fb_info *info, int user)
1626 {
1627         struct savagefb_par *par = info->par;
1628
1629         mutex_lock(&par->open_lock);
1630
1631         if (!par->open_count) {
1632                 memset(&par->vgastate, 0, sizeof(par->vgastate));
1633                 par->vgastate.flags = VGA_SAVE_CMAP | VGA_SAVE_FONTS |
1634                         VGA_SAVE_MODE;
1635                 par->vgastate.vgabase = par->mmio.vbase + 0x8000;
1636                 save_vga(&par->vgastate);
1637                 savage_get_default_par(par, &par->initial);
1638         }
1639
1640         par->open_count++;
1641         mutex_unlock(&par->open_lock);
1642         return 0;
1643 }
1644
1645 static int savagefb_release(struct fb_info *info, int user)
1646 {
1647         struct savagefb_par *par = info->par;
1648
1649         mutex_lock(&par->open_lock);
1650
1651         if (par->open_count == 1) {
1652                 savage_set_default_par(par, &par->initial);
1653                 restore_vga(&par->vgastate);
1654         }
1655
1656         par->open_count--;
1657         mutex_unlock(&par->open_lock);
1658         return 0;
1659 }
1660
1661 static struct fb_ops savagefb_ops = {
1662         .owner          = THIS_MODULE,
1663         .fb_open        = savagefb_open,
1664         .fb_release     = savagefb_release,
1665         .fb_check_var   = savagefb_check_var,
1666         .fb_set_par     = savagefb_set_par,
1667         .fb_setcolreg   = savagefb_setcolreg,
1668         .fb_pan_display = savagefb_pan_display,
1669         .fb_blank       = savagefb_blank,
1670         .fb_save_state  = savagefb_save_state,
1671         .fb_restore_state = savagefb_restore_state,
1672 #if defined(CONFIG_FB_SAVAGE_ACCEL)
1673         .fb_fillrect    = savagefb_fillrect,
1674         .fb_copyarea    = savagefb_copyarea,
1675         .fb_imageblit   = savagefb_imageblit,
1676         .fb_sync        = savagefb_sync,
1677 #else
1678         .fb_fillrect    = cfb_fillrect,
1679         .fb_copyarea    = cfb_copyarea,
1680         .fb_imageblit   = cfb_imageblit,
1681 #endif
1682 };
1683
1684 /* --------------------------------------------------------------------- */
1685
1686 static struct fb_var_screeninfo __devinitdata savagefb_var800x600x8 = {
1687         .accel_flags =  FB_ACCELF_TEXT,
1688         .xres =         800,
1689         .yres =         600,
1690         .xres_virtual =  800,
1691         .yres_virtual =  600,
1692         .bits_per_pixel = 8,
1693         .pixclock =     25000,
1694         .left_margin =  88,
1695         .right_margin = 40,
1696         .upper_margin = 23,
1697         .lower_margin = 1,
1698         .hsync_len =    128,
1699         .vsync_len =    4,
1700         .sync =         FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
1701         .vmode =        FB_VMODE_NONINTERLACED
1702 };
1703
1704 static void savage_enable_mmio(struct savagefb_par *par)
1705 {
1706         unsigned char val;
1707
1708         DBG("savage_enable_mmio\n");
1709
1710         val = vga_in8(0x3c3, par);
1711         vga_out8(0x3c3, val | 0x01, par);
1712         val = vga_in8(0x3cc, par);
1713         vga_out8(0x3c2, val | 0x01, par);
1714
1715         if (par->chip >= S3_SAVAGE4) {
1716                 vga_out8(0x3d4, 0x40, par);
1717                 val = vga_in8(0x3d5, par);
1718                 vga_out8(0x3d5, val | 1, par);
1719         }
1720 }
1721
1722
1723 static void savage_disable_mmio(struct savagefb_par *par)
1724 {
1725         unsigned char val;
1726
1727         DBG("savage_disable_mmio\n");
1728
1729         if (par->chip >= S3_SAVAGE4) {
1730                 vga_out8(0x3d4, 0x40, par);
1731                 val = vga_in8(0x3d5, par);
1732                 vga_out8(0x3d5, val | 1, par);
1733         }
1734 }
1735
1736
1737 static int __devinit savage_map_mmio(struct fb_info *info)
1738 {
1739         struct savagefb_par *par = info->par;
1740         DBG("savage_map_mmio");
1741
1742         if (S3_SAVAGE3D_SERIES(par->chip))
1743                 par->mmio.pbase = pci_resource_start(par->pcidev, 0) +
1744                         SAVAGE_NEWMMIO_REGBASE_S3;
1745         else
1746                 par->mmio.pbase = pci_resource_start(par->pcidev, 0) +
1747                         SAVAGE_NEWMMIO_REGBASE_S4;
1748
1749         par->mmio.len = SAVAGE_NEWMMIO_REGSIZE;
1750
1751         par->mmio.vbase = ioremap(par->mmio.pbase, par->mmio.len);
1752         if (!par->mmio.vbase) {
1753                 printk("savagefb: unable to map memory mapped IO\n");
1754                 return -ENOMEM;
1755         } else
1756                 printk(KERN_INFO "savagefb: mapped io at %p\n",
1757                         par->mmio.vbase);
1758
1759         info->fix.mmio_start = par->mmio.pbase;
1760         info->fix.mmio_len   = par->mmio.len;
1761
1762         par->bci_base = (u32 __iomem *)(par->mmio.vbase + BCI_BUFFER_OFFSET);
1763         par->bci_ptr  = 0;
1764
1765         savage_enable_mmio(par);
1766
1767         return 0;
1768 }
1769
1770 static void savage_unmap_mmio(struct fb_info *info)
1771 {
1772         struct savagefb_par *par = info->par;
1773         DBG("savage_unmap_mmio");
1774
1775         savage_disable_mmio(par);
1776
1777         if (par->mmio.vbase) {
1778                 iounmap(par->mmio.vbase);
1779                 par->mmio.vbase = NULL;
1780         }
1781 }
1782
1783 static int __devinit savage_map_video(struct fb_info *info,
1784                                       int video_len)
1785 {
1786         struct savagefb_par *par = info->par;
1787         int resource;
1788
1789         DBG("savage_map_video");
1790
1791         if (S3_SAVAGE3D_SERIES(par->chip))
1792                 resource = 0;
1793         else
1794                 resource = 1;
1795
1796         par->video.pbase = pci_resource_start(par->pcidev, resource);
1797         par->video.len   = video_len;
1798         par->video.vbase = ioremap(par->video.pbase, par->video.len);
1799
1800         if (!par->video.vbase) {
1801                 printk("savagefb: unable to map screen memory\n");
1802                 return -ENOMEM;
1803         } else
1804                 printk(KERN_INFO "savagefb: mapped framebuffer at %p, "
1805                        "pbase == %x\n", par->video.vbase, par->video.pbase);
1806
1807         info->fix.smem_start = par->video.pbase;
1808         info->fix.smem_len   = par->video.len - par->cob_size;
1809         info->screen_base    = par->video.vbase;
1810
1811 #ifdef CONFIG_MTRR
1812         par->video.mtrr = mtrr_add(par->video.pbase, video_len,
1813                                    MTRR_TYPE_WRCOMB, 1);
1814 #endif
1815
1816         /* Clear framebuffer, it's all white in memory after boot */
1817         memset_io(par->video.vbase, 0, par->video.len);
1818
1819         return 0;
1820 }
1821
1822 static void savage_unmap_video(struct fb_info *info)
1823 {
1824         struct savagefb_par *par = info->par;
1825
1826         DBG("savage_unmap_video");
1827
1828         if (par->video.vbase) {
1829 #ifdef CONFIG_MTRR
1830                 mtrr_del(par->video.mtrr, par->video.pbase, par->video.len);
1831 #endif
1832
1833                 iounmap(par->video.vbase);
1834                 par->video.vbase = NULL;
1835                 info->screen_base = NULL;
1836         }
1837 }
1838
1839 static int savage_init_hw(struct savagefb_par *par)
1840 {
1841         unsigned char config1, m, n, n1, n2, sr8, cr3f, cr66 = 0, tmp;
1842
1843         static unsigned char RamSavage3D[] = { 8, 4, 4, 2 };
1844         static unsigned char RamSavage4[] =  { 2, 4, 8, 12, 16, 32, 64, 32 };
1845         static unsigned char RamSavageMX[] = { 2, 8, 4, 16, 8, 16, 4, 16 };
1846         static unsigned char RamSavageNB[] = { 0, 2, 4, 8, 16, 32, 2, 2 };
1847         int videoRam, videoRambytes, dvi;
1848
1849         DBG("savage_init_hw");
1850
1851         /* unprotect CRTC[0-7] */
1852         vga_out8(0x3d4, 0x11, par);
1853         tmp = vga_in8(0x3d5, par);
1854         vga_out8(0x3d5, tmp & 0x7f, par);
1855
1856         /* unlock extended regs */
1857         vga_out16(0x3d4, 0x4838, par);
1858         vga_out16(0x3d4, 0xa039, par);
1859         vga_out16(0x3c4, 0x0608, par);
1860
1861         vga_out8(0x3d4, 0x40, par);
1862         tmp = vga_in8(0x3d5, par);
1863         vga_out8(0x3d5, tmp & ~0x01, par);
1864
1865         /* unlock sys regs */
1866         vga_out8(0x3d4, 0x38, par);
1867         vga_out8(0x3d5, 0x48, par);
1868
1869         /* Unlock system registers. */
1870         vga_out16(0x3d4, 0x4838, par);
1871
1872         /* Next go on to detect amount of installed ram */
1873
1874         vga_out8(0x3d4, 0x36, par);            /* for register CR36 (CONFG_REG1), */
1875         config1 = vga_in8(0x3d5, par);    /* get amount of vram installed */
1876
1877         /* Compute the amount of video memory and offscreen memory. */
1878
1879         switch  (par->chip) {
1880         case S3_SAVAGE3D:
1881                 videoRam = RamSavage3D[(config1 & 0xC0) >> 6 ] * 1024;
1882                 break;
1883
1884         case S3_SAVAGE4:
1885                 /*
1886                  * The Savage4 has one ugly special case to consider.  On
1887                  * systems with 4 banks of 2Mx32 SDRAM, the BIOS says 4MB
1888                  * when it really means 8MB.  Why do it the same when you
1889                  * can do it different...
1890                  */
1891                 vga_out8(0x3d4, 0x68, par);     /* memory control 1 */
1892                 if ((vga_in8(0x3d5, par) & 0xC0) == (0x01 << 6))
1893                         RamSavage4[1] = 8;
1894
1895                 /*FALLTHROUGH*/
1896
1897         case S3_SAVAGE2000:
1898                 videoRam = RamSavage4[(config1 & 0xE0) >> 5] * 1024;
1899                 break;
1900
1901         case S3_SAVAGE_MX:
1902         case S3_SUPERSAVAGE:
1903                 videoRam = RamSavageMX[(config1 & 0x0E) >> 1] * 1024;
1904                 break;
1905
1906         case S3_PROSAVAGE:
1907                 videoRam = RamSavageNB[(config1 & 0xE0) >> 5] * 1024;
1908                 break;
1909
1910         default:
1911                 /* How did we get here? */
1912                 videoRam = 0;
1913                 break;
1914         }
1915
1916         videoRambytes = videoRam * 1024;
1917
1918         printk(KERN_INFO "savagefb: probed videoram:  %dk\n", videoRam);
1919
1920         /* reset graphics engine to avoid memory corruption */
1921         vga_out8(0x3d4, 0x66, par);
1922         cr66 = vga_in8(0x3d5, par);
1923         vga_out8(0x3d5, cr66 | 0x02, par);
1924         udelay(10000);
1925
1926         vga_out8(0x3d4, 0x66, par);
1927         vga_out8(0x3d5, cr66 & ~0x02, par);     /* clear reset flag */
1928         udelay(10000);
1929
1930
1931         /*
1932          * reset memory interface, 3D engine, AGP master, PCI master,
1933          * master engine unit, motion compensation/LPB
1934          */
1935         vga_out8(0x3d4, 0x3f, par);
1936         cr3f = vga_in8(0x3d5, par);
1937         vga_out8(0x3d5, cr3f | 0x08, par);
1938         udelay(10000);
1939
1940         vga_out8(0x3d4, 0x3f, par);
1941         vga_out8(0x3d5, cr3f & ~0x08, par);     /* clear reset flags */
1942         udelay(10000);
1943
1944         /* Savage ramdac speeds */
1945         par->numClocks = 4;
1946         par->clock[0] = 250000;
1947         par->clock[1] = 250000;
1948         par->clock[2] = 220000;
1949         par->clock[3] = 220000;
1950
1951         /* detect current mclk */
1952         vga_out8(0x3c4, 0x08, par);
1953         sr8 = vga_in8(0x3c5, par);
1954         vga_out8(0x3c5, 0x06, par);
1955         vga_out8(0x3c4, 0x10, par);
1956         n = vga_in8(0x3c5, par);
1957         vga_out8(0x3c4, 0x11, par);
1958         m = vga_in8(0x3c5, par);
1959         vga_out8(0x3c4, 0x08, par);
1960         vga_out8(0x3c5, sr8, par);
1961         m &= 0x7f;
1962         n1 = n & 0x1f;
1963         n2 = (n >> 5) & 0x03;
1964         par->MCLK = ((1431818 * (m+2)) / (n1+2) / (1 << n2) + 50) / 100;
1965         printk(KERN_INFO "savagefb: Detected current MCLK value of %d kHz\n",
1966                 par->MCLK);
1967
1968         /* check for DVI/flat panel */
1969         dvi = 0;
1970
1971         if (par->chip == S3_SAVAGE4) {
1972                 unsigned char sr30 = 0x00;
1973
1974                 vga_out8(0x3c4, 0x30, par);
1975                 /* clear bit 1 */
1976                 vga_out8(0x3c5, vga_in8(0x3c5, par) & ~0x02, par);
1977                 sr30 = vga_in8(0x3c5, par);
1978                 if (sr30 & 0x02 /*0x04 */) {
1979                         dvi = 1;
1980                         printk("savagefb: Digital Flat Panel Detected\n");
1981                 }
1982         }
1983
1984         if (S3_SAVAGE_MOBILE_SERIES(par->chip) && !par->crtonly)
1985                 par->display_type = DISP_LCD;
1986         else if (dvi || (par->chip == S3_SAVAGE4 && par->dvi))
1987                 par->display_type = DISP_DFP;
1988         else
1989                 par->display_type = DISP_CRT;
1990
1991         /* Check LCD panel parrmation */
1992
1993         if (par->display_type == DISP_LCD) {
1994                 unsigned char cr6b = VGArCR(0x6b, par);
1995
1996                 int panelX = (VGArSEQ(0x61, par) +
1997                               ((VGArSEQ(0x66, par) & 0x02) << 7) + 1) * 8;
1998                 int panelY = (VGArSEQ(0x69, par) +
1999                               ((VGArSEQ(0x6e, par) & 0x70) << 4) + 1);
2000
2001                 char * sTechnology = "Unknown";
2002
2003                 /* OK, I admit it.  I don't know how to limit the max dot clock
2004                  * for LCD panels of various sizes.  I thought I copied the
2005                  * formula from the BIOS, but many users have parrmed me of
2006                  * my folly.
2007                  *
2008                  * Instead, I'll abandon any attempt to automatically limit the
2009                  * clock, and add an LCDClock option to XF86Config.  Some day,
2010                  * I should come back to this.
2011                  */
2012
2013                 enum ACTIVE_DISPLAYS { /* These are the bits in CR6B */
2014                         ActiveCRT = 0x01,
2015                         ActiveLCD = 0x02,
2016                         ActiveTV = 0x04,
2017                         ActiveCRT2 = 0x20,
2018                         ActiveDUO = 0x80
2019                 };
2020
2021                 if ((VGArSEQ(0x39, par) & 0x03) == 0) {
2022                         sTechnology = "TFT";
2023                 } else if ((VGArSEQ(0x30, par) & 0x01) == 0) {
2024                         sTechnology = "DSTN";
2025                 } else  {
2026                         sTechnology = "STN";
2027                 }
2028
2029                 printk(KERN_INFO "savagefb: %dx%d %s LCD panel detected %s\n",
2030                        panelX, panelY, sTechnology,
2031                        cr6b & ActiveLCD ? "and active" : "but not active");
2032
2033                 if (cr6b & ActiveLCD)   {
2034                         /*
2035                          * If the LCD is active and panel expansion is enabled,
2036                          * we probably want to kill the HW cursor.
2037                          */
2038
2039                         printk(KERN_INFO "savagefb: Limiting video mode to "
2040                                 "%dx%d\n", panelX, panelY);
2041
2042                         par->SavagePanelWidth = panelX;
2043                         par->SavagePanelHeight = panelY;
2044
2045                 } else
2046                         par->display_type = DISP_CRT;
2047         }
2048
2049         savage_get_default_par(par, &par->state);
2050         par->save = par->state;
2051
2052         if (S3_SAVAGE4_SERIES(par->chip)) {
2053                 /*
2054                  * The Savage4 and ProSavage have COB coherency bugs which
2055                  * render the buffer useless.  We disable it.
2056                  */
2057                 par->cob_index = 2;
2058                 par->cob_size = 0x8000 << par->cob_index;
2059                 par->cob_offset = videoRambytes;
2060         } else {
2061                 /* We use 128kB for the COB on all chips. */
2062
2063                 par->cob_index  = 7;
2064                 par->cob_size   = 0x400 << par->cob_index;
2065                 par->cob_offset = videoRambytes - par->cob_size;
2066         }
2067
2068         return videoRambytes;
2069 }
2070
2071 static int __devinit savage_init_fb_info(struct fb_info *info,
2072                                          struct pci_dev *dev,
2073                                          const struct pci_device_id *id)
2074 {
2075         struct savagefb_par *par = info->par;
2076         int err = 0;
2077
2078         par->pcidev  = dev;
2079
2080         info->fix.type     = FB_TYPE_PACKED_PIXELS;
2081         info->fix.type_aux         = 0;
2082         info->fix.ypanstep         = 1;
2083         info->fix.ywrapstep   = 0;
2084         info->fix.accel       = id->driver_data;
2085
2086         switch (info->fix.accel) {
2087         case FB_ACCEL_SUPERSAVAGE:
2088                 par->chip = S3_SUPERSAVAGE;
2089                 snprintf(info->fix.id, 16, "SuperSavage");
2090                 break;
2091         case FB_ACCEL_SAVAGE4:
2092                 par->chip = S3_SAVAGE4;
2093                 snprintf(info->fix.id, 16, "Savage4");
2094                 break;
2095         case FB_ACCEL_SAVAGE3D:
2096                 par->chip = S3_SAVAGE3D;
2097                 snprintf(info->fix.id, 16, "Savage3D");
2098                 break;
2099         case FB_ACCEL_SAVAGE3D_MV:
2100                 par->chip = S3_SAVAGE3D;
2101                 snprintf(info->fix.id, 16, "Savage3D-MV");
2102                 break;
2103         case FB_ACCEL_SAVAGE2000:
2104                 par->chip = S3_SAVAGE2000;
2105                 snprintf(info->fix.id, 16, "Savage2000");
2106                 break;
2107         case FB_ACCEL_SAVAGE_MX_MV:
2108                 par->chip = S3_SAVAGE_MX;
2109                 snprintf(info->fix.id, 16, "Savage/MX-MV");
2110                 break;
2111         case FB_ACCEL_SAVAGE_MX:
2112                 par->chip = S3_SAVAGE_MX;
2113                 snprintf(info->fix.id, 16, "Savage/MX");
2114                 break;
2115         case FB_ACCEL_SAVAGE_IX_MV:
2116                 par->chip = S3_SAVAGE_MX;
2117                 snprintf(info->fix.id, 16, "Savage/IX-MV");
2118                 break;
2119         case FB_ACCEL_SAVAGE_IX:
2120                 par->chip = S3_SAVAGE_MX;
2121                 snprintf(info->fix.id, 16, "Savage/IX");
2122                 break;
2123         case FB_ACCEL_PROSAVAGE_PM:
2124                 par->chip = S3_PROSAVAGE;
2125                 snprintf(info->fix.id, 16, "ProSavagePM");
2126                 break;
2127         case FB_ACCEL_PROSAVAGE_KM:
2128                 par->chip = S3_PROSAVAGE;
2129                 snprintf(info->fix.id, 16, "ProSavageKM");
2130                 break;
2131         case FB_ACCEL_S3TWISTER_P:
2132                 par->chip = S3_PROSAVAGE;
2133                 snprintf(info->fix.id, 16, "TwisterP");
2134                 break;
2135         case FB_ACCEL_S3TWISTER_K:
2136                 par->chip = S3_PROSAVAGE;
2137                 snprintf(info->fix.id, 16, "TwisterK");
2138                 break;
2139         case FB_ACCEL_PROSAVAGE_DDR:
2140                 par->chip = S3_PROSAVAGE;
2141                 snprintf(info->fix.id, 16, "ProSavageDDR");
2142                 break;
2143         case FB_ACCEL_PROSAVAGE_DDRK:
2144                 par->chip = S3_PROSAVAGE;
2145                 snprintf(info->fix.id, 16, "ProSavage8");
2146                 break;
2147         }
2148
2149         if (S3_SAVAGE3D_SERIES(par->chip)) {
2150                 par->SavageWaitIdle = savage3D_waitidle;
2151                 par->SavageWaitFifo = savage3D_waitfifo;
2152         } else if (S3_SAVAGE4_SERIES(par->chip) ||
2153                    S3_SUPERSAVAGE == par->chip) {
2154                 par->SavageWaitIdle = savage4_waitidle;
2155                 par->SavageWaitFifo = savage4_waitfifo;
2156         } else {
2157                 par->SavageWaitIdle = savage2000_waitidle;
2158                 par->SavageWaitFifo = savage2000_waitfifo;
2159         }
2160
2161         info->var.nonstd      = 0;
2162         info->var.activate    = FB_ACTIVATE_NOW;
2163         info->var.width       = -1;
2164         info->var.height      = -1;
2165         info->var.accel_flags = 0;
2166
2167         info->fbops          = &savagefb_ops;
2168         info->flags          = FBINFO_DEFAULT |
2169                                FBINFO_HWACCEL_YPAN |
2170                                FBINFO_HWACCEL_XPAN;
2171
2172         info->pseudo_palette = par->pseudo_palette;
2173
2174 #if defined(CONFIG_FB_SAVAGE_ACCEL)
2175         /* FIFO size + padding for commands */
2176         info->pixmap.addr = kcalloc(8, 1024, GFP_KERNEL);
2177
2178         err = -ENOMEM;
2179         if (info->pixmap.addr) {
2180                 info->pixmap.size = 8*1024;
2181                 info->pixmap.scan_align = 4;
2182                 info->pixmap.buf_align = 4;
2183                 info->pixmap.access_align = 32;
2184
2185                 err = fb_alloc_cmap(&info->cmap, NR_PALETTE, 0);
2186                 if (!err)
2187                 info->flags |= FBINFO_HWACCEL_COPYAREA |
2188                                FBINFO_HWACCEL_FILLRECT |
2189                                FBINFO_HWACCEL_IMAGEBLIT;
2190         }
2191 #endif
2192         return err;
2193 }
2194
2195 /* --------------------------------------------------------------------- */
2196
2197 static int __devinit savagefb_probe(struct pci_dev* dev,
2198                                     const struct pci_device_id* id)
2199 {
2200         struct fb_info *info;
2201         struct savagefb_par *par;
2202         u_int h_sync, v_sync;
2203         int err, lpitch;
2204         int video_len;
2205
2206         DBG("savagefb_probe");
2207
2208         info = framebuffer_alloc(sizeof(struct savagefb_par), &dev->dev);
2209         if (!info)
2210                 return -ENOMEM;
2211         par = info->par;
2212         mutex_init(&par->open_lock);
2213         err = pci_enable_device(dev);
2214         if (err)
2215                 goto failed_enable;
2216
2217         if ((err = pci_request_regions(dev, "savagefb"))) {
2218                 printk(KERN_ERR "cannot request PCI regions\n");
2219                 goto failed_enable;
2220         }
2221
2222         err = -ENOMEM;
2223
2224         if ((err = savage_init_fb_info(info, dev, id)))
2225                 goto failed_init;
2226
2227         err = savage_map_mmio(info);
2228         if (err)
2229                 goto failed_mmio;
2230
2231         video_len = savage_init_hw(par);
2232         /* FIXME: cant be negative */
2233         if (video_len < 0) {
2234                 err = video_len;
2235                 goto failed_mmio;
2236         }
2237
2238         err = savage_map_video(info, video_len);
2239         if (err)
2240                 goto failed_video;
2241
2242         INIT_LIST_HEAD(&info->modelist);
2243 #if defined(CONFIG_FB_SAVAGE_I2C)
2244         savagefb_create_i2c_busses(info);
2245         savagefb_probe_i2c_connector(info, &par->edid);
2246         fb_edid_to_monspecs(par->edid, &info->monspecs);
2247         kfree(par->edid);
2248         fb_videomode_to_modelist(info->monspecs.modedb,
2249                                  info->monspecs.modedb_len,
2250                                  &info->modelist);
2251 #endif
2252         info->var = savagefb_var800x600x8;
2253
2254         if (mode_option) {
2255                 fb_find_mode(&info->var, info, mode_option,
2256                              info->monspecs.modedb, info->monspecs.modedb_len,
2257                              NULL, 8);
2258         } else if (info->monspecs.modedb != NULL) {
2259                 const struct fb_videomode *mode;
2260
2261                 mode = fb_find_best_display(&info->monspecs, &info->modelist);
2262                 savage_update_var(&info->var, mode);
2263         }
2264
2265         /* maximize virtual vertical length */
2266         lpitch = info->var.xres_virtual*((info->var.bits_per_pixel + 7) >> 3);
2267         info->var.yres_virtual = info->fix.smem_len/lpitch;
2268
2269         if (info->var.yres_virtual < info->var.yres)
2270                 goto failed;
2271
2272 #if defined(CONFIG_FB_SAVAGE_ACCEL)
2273         /*
2274          * The clipping coordinates are masked with 0xFFF, so limit our
2275          * virtual resolutions to these sizes.
2276          */
2277         if (info->var.yres_virtual > 0x1000)
2278                 info->var.yres_virtual = 0x1000;
2279
2280         if (info->var.xres_virtual > 0x1000)
2281                 info->var.xres_virtual = 0x1000;
2282 #endif
2283         savagefb_check_var(&info->var, info);
2284         savagefb_set_fix(info);
2285
2286         /*
2287          * Calculate the hsync and vsync frequencies.  Note that
2288          * we split the 1e12 constant up so that we can preserve
2289          * the precision and fit the results into 32-bit registers.
2290          *  (1953125000 * 512 = 1e12)
2291          */
2292         h_sync = 1953125000 / info->var.pixclock;
2293         h_sync = h_sync * 512 / (info->var.xres + info->var.left_margin +
2294                                  info->var.right_margin +
2295                                  info->var.hsync_len);
2296         v_sync = h_sync / (info->var.yres + info->var.upper_margin +
2297                            info->var.lower_margin + info->var.vsync_len);
2298
2299         printk(KERN_INFO "savagefb v" SAVAGEFB_VERSION ": "
2300                "%dkB VRAM, using %dx%d, %d.%03dkHz, %dHz\n",
2301                info->fix.smem_len >> 10,
2302                info->var.xres, info->var.yres,
2303                h_sync / 1000, h_sync % 1000, v_sync);
2304
2305
2306         fb_destroy_modedb(info->monspecs.modedb);
2307         info->monspecs.modedb = NULL;
2308
2309         err = register_framebuffer(info);
2310         if (err < 0)
2311                 goto failed;
2312
2313         printk(KERN_INFO "fb: S3 %s frame buffer device\n",
2314                info->fix.id);
2315
2316         /*
2317          * Our driver data
2318          */
2319         pci_set_drvdata(dev, info);
2320
2321         return 0;
2322
2323  failed:
2324 #ifdef CONFIG_FB_SAVAGE_I2C
2325         savagefb_delete_i2c_busses(info);
2326 #endif
2327         fb_alloc_cmap(&info->cmap, 0, 0);
2328         savage_unmap_video(info);
2329  failed_video:
2330         savage_unmap_mmio(info);
2331  failed_mmio:
2332         kfree(info->pixmap.addr);
2333  failed_init:
2334         pci_release_regions(dev);
2335  failed_enable:
2336         framebuffer_release(info);
2337
2338         return err;
2339 }
2340
2341 static void __devexit savagefb_remove(struct pci_dev *dev)
2342 {
2343         struct fb_info *info = pci_get_drvdata(dev);
2344
2345         DBG("savagefb_remove");
2346
2347         if (info) {
2348                 /*
2349                  * If unregister_framebuffer fails, then
2350                  * we will be leaving hooks that could cause
2351                  * oopsen laying around.
2352                  */
2353                 if (unregister_framebuffer(info))
2354                         printk(KERN_WARNING "savagefb: danger danger! "
2355                                "Oopsen imminent!\n");
2356
2357 #ifdef CONFIG_FB_SAVAGE_I2C
2358                 savagefb_delete_i2c_busses(info);
2359 #endif
2360                 fb_alloc_cmap(&info->cmap, 0, 0);
2361                 savage_unmap_video(info);
2362                 savage_unmap_mmio(info);
2363                 kfree(info->pixmap.addr);
2364                 pci_release_regions(dev);
2365                 framebuffer_release(info);
2366
2367                 /*
2368                  * Ensure that the driver data is no longer
2369                  * valid.
2370                  */
2371                 pci_set_drvdata(dev, NULL);
2372         }
2373 }
2374
2375 static int savagefb_suspend(struct pci_dev *dev, pm_message_t mesg)
2376 {
2377         struct fb_info *info = pci_get_drvdata(dev);
2378         struct savagefb_par *par = info->par;
2379
2380         DBG("savagefb_suspend");
2381
2382         if (mesg.event == PM_EVENT_PRETHAW)
2383                 mesg.event = PM_EVENT_FREEZE;
2384         par->pm_state = mesg.event;
2385         dev->dev.power.power_state = mesg;
2386
2387         /*
2388          * For PM_EVENT_FREEZE, do not power down so the console
2389          * can remain active.
2390          */
2391         if (mesg.event == PM_EVENT_FREEZE)
2392                 return 0;
2393
2394         acquire_console_sem();
2395         fb_set_suspend(info, 1);
2396
2397         if (info->fbops->fb_sync)
2398                 info->fbops->fb_sync(info);
2399
2400         savagefb_blank(FB_BLANK_POWERDOWN, info);
2401         savage_set_default_par(par, &par->save);
2402         savage_disable_mmio(par);
2403         pci_save_state(dev);
2404         pci_disable_device(dev);
2405         pci_set_power_state(dev, pci_choose_state(dev, mesg));
2406         release_console_sem();
2407
2408         return 0;
2409 }
2410
2411 static int savagefb_resume(struct pci_dev* dev)
2412 {
2413         struct fb_info *info = pci_get_drvdata(dev);
2414         struct savagefb_par *par = info->par;
2415         int cur_state = par->pm_state;
2416
2417         DBG("savage_resume");
2418
2419         par->pm_state = PM_EVENT_ON;
2420
2421         /*
2422          * The adapter was not powered down coming back from a
2423          * PM_EVENT_FREEZE.
2424          */
2425         if (cur_state == PM_EVENT_FREEZE) {
2426                 pci_set_power_state(dev, PCI_D0);
2427                 return 0;
2428         }
2429
2430         acquire_console_sem();
2431
2432         pci_set_power_state(dev, PCI_D0);
2433         pci_restore_state(dev);
2434
2435         if (pci_enable_device(dev))
2436                 DBG("err");
2437
2438         pci_set_master(dev);
2439         savage_enable_mmio(par);
2440         savage_init_hw(par);
2441         savagefb_set_par(info);
2442         fb_set_suspend(info, 0);
2443         savagefb_blank(FB_BLANK_UNBLANK, info);
2444         release_console_sem();
2445
2446         return 0;
2447 }
2448
2449
2450 static struct pci_device_id savagefb_devices[] __devinitdata = {
2451         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_MX128,
2452          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2453
2454         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_MX64,
2455          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2456
2457         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_MX64C,
2458          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2459
2460         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_IX128SDR,
2461          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2462
2463         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_IX128DDR,
2464          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2465
2466         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_IX64SDR,
2467          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2468
2469         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_IX64DDR,
2470          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2471
2472         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_IXCSDR,
2473          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2474
2475         {PCI_VENDOR_ID_S3, PCI_CHIP_SUPSAV_IXCDDR,
2476          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SUPERSAVAGE},
2477
2478         {PCI_VENDOR_ID_S3, PCI_CHIP_SAVAGE4,
2479          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SAVAGE4},
2480
2481         {PCI_VENDOR_ID_S3, PCI_CHIP_SAVAGE3D,
2482          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SAVAGE3D},
2483
2484         {PCI_VENDOR_ID_S3, PCI_CHIP_SAVAGE3D_MV,
2485          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SAVAGE3D_MV},
2486
2487         {PCI_VENDOR_ID_S3, PCI_CHIP_SAVAGE2000,
2488          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SAVAGE2000},
2489
2490         {PCI_VENDOR_ID_S3, PCI_CHIP_SAVAGE_MX_MV,
2491          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SAVAGE_MX_MV},
2492
2493         {PCI_VENDOR_ID_S3, PCI_CHIP_SAVAGE_MX,
2494          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SAVAGE_MX},
2495
2496         {PCI_VENDOR_ID_S3, PCI_CHIP_SAVAGE_IX_MV,
2497          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SAVAGE_IX_MV},
2498
2499         {PCI_VENDOR_ID_S3, PCI_CHIP_SAVAGE_IX,
2500          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_SAVAGE_IX},
2501
2502         {PCI_VENDOR_ID_S3, PCI_CHIP_PROSAVAGE_PM,
2503          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_PROSAVAGE_PM},
2504
2505         {PCI_VENDOR_ID_S3, PCI_CHIP_PROSAVAGE_KM,
2506          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_PROSAVAGE_KM},
2507
2508         {PCI_VENDOR_ID_S3, PCI_CHIP_S3TWISTER_P,
2509          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_S3TWISTER_P},
2510
2511         {PCI_VENDOR_ID_S3, PCI_CHIP_S3TWISTER_K,
2512          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_S3TWISTER_K},
2513
2514         {PCI_VENDOR_ID_S3, PCI_CHIP_PROSAVAGE_DDR,
2515          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_PROSAVAGE_DDR},
2516
2517         {PCI_VENDOR_ID_S3, PCI_CHIP_PROSAVAGE_DDRK,
2518          PCI_ANY_ID, PCI_ANY_ID, 0, 0, FB_ACCEL_PROSAVAGE_DDRK},
2519
2520         {0, 0, 0, 0, 0, 0, 0}
2521 };
2522
2523 MODULE_DEVICE_TABLE(pci, savagefb_devices);
2524
2525 static struct pci_driver savagefb_driver = {
2526         .name =     "savagefb",
2527         .id_table = savagefb_devices,
2528         .probe =    savagefb_probe,
2529         .suspend =  savagefb_suspend,
2530         .resume =   savagefb_resume,
2531         .remove =   __devexit_p(savagefb_remove)
2532 };
2533
2534 /* **************************** exit-time only **************************** */
2535
2536 static void __exit savage_done(void)
2537 {
2538         DBG("savage_done");
2539         pci_unregister_driver(&savagefb_driver);
2540 }
2541
2542
2543 /* ************************* init in-kernel code ************************** */
2544
2545 static int __init savagefb_setup(char *options)
2546 {
2547 #ifndef MODULE
2548         char *this_opt;
2549
2550         if (!options || !*options)
2551                 return 0;
2552
2553         while ((this_opt = strsep(&options, ",")) != NULL) {
2554                 mode_option = this_opt;
2555         }
2556 #endif /* !MODULE */
2557         return 0;
2558 }
2559
2560 static int __init savagefb_init(void)
2561 {
2562         char *option;
2563
2564         DBG("savagefb_init");
2565
2566         if (fb_get_options("savagefb", &option))
2567                 return -ENODEV;
2568
2569         savagefb_setup(option);
2570         return pci_register_driver(&savagefb_driver);
2571
2572 }
2573
2574 module_init(savagefb_init);
2575 module_exit(savage_done);
2576
2577 module_param(mode_option, charp, 0);
2578 MODULE_PARM_DESC(mode_option, "Specify initial video mode");