3cc23106641db10e1a7787f52c5f9c3ee6d4dcf1
[safe/jmp/linux-2.6] / drivers / video / vesafb.c
1 /*
2  * framebuffer driver for VBE 2.0 compliant graphic boards
3  *
4  * switching to graphics mode happens at boot time (while
5  * running in real mode, see arch/i386/boot/video.S).
6  *
7  * (c) 1998 Gerd Knorr <kraxel@goldbach.in-berlin.de>
8  *
9  */
10
11 #include <linux/module.h>
12 #include <linux/kernel.h>
13 #include <linux/errno.h>
14 #include <linux/string.h>
15 #include <linux/mm.h>
16 #include <linux/tty.h>
17 #include <linux/slab.h>
18 #include <linux/delay.h>
19 #include <linux/fb.h>
20 #include <linux/ioport.h>
21 #include <linux/init.h>
22 #include <linux/platform_device.h>
23
24 #include <video/vga.h>
25 #include <asm/io.h>
26 #include <asm/mtrr.h>
27
28 #define dac_reg (0x3c8)
29 #define dac_val (0x3c9)
30
31 /* --------------------------------------------------------------------- */
32
33 static struct fb_var_screeninfo vesafb_defined __initdata = {
34         .activate       = FB_ACTIVATE_NOW,
35         .height         = -1,
36         .width          = -1,
37         .right_margin   = 32,
38         .upper_margin   = 16,
39         .lower_margin   = 4,
40         .vsync_len      = 4,
41         .vmode          = FB_VMODE_NONINTERLACED,
42 };
43
44 static struct fb_fix_screeninfo vesafb_fix __initdata = {
45         .id     = "VESA VGA",
46         .type   = FB_TYPE_PACKED_PIXELS,
47         .accel  = FB_ACCEL_NONE,
48 };
49
50 static int             inverse   = 0;
51 static int             mtrr      = 3; /* default to write-combining */
52 static int             vram_remap __initdata = 0; /* Set amount of memory to be used */
53 static int             vram_total __initdata = 0; /* Set total amount of memory */
54 static int             pmi_setpal = 0;  /* pmi for palette changes ??? */
55 static int             ypan       = 0;  /* 0..nothing, 1..ypan, 2..ywrap */
56 static unsigned short  *pmi_base  = NULL;
57 static void            (*pmi_start)(void);
58 static void            (*pmi_pal)(void);
59 static int             depth;
60 static int             vga_compat;
61
62 /* --------------------------------------------------------------------- */
63
64 static int vesafb_pan_display(struct fb_var_screeninfo *var,
65                               struct fb_info *info)
66 {
67 #ifdef __i386__
68         int offset;
69
70         if (!ypan)
71                 return -EINVAL;
72         if (var->xoffset)
73                 return -EINVAL;
74         if (var->yoffset > var->yres_virtual)
75                 return -EINVAL;
76         if ((ypan==1) && var->yoffset+var->yres > var->yres_virtual)
77                 return -EINVAL;
78
79         offset = (var->yoffset * info->fix.line_length + var->xoffset) / 4;
80
81         __asm__ __volatile__(
82                 "call *(%%edi)"
83                 : /* no return value */
84                 : "a" (0x4f07),         /* EAX */
85                   "b" (0),              /* EBX */
86                   "c" (offset),         /* ECX */
87                   "d" (offset >> 16),   /* EDX */
88                   "D" (&pmi_start));    /* EDI */
89 #endif
90         return 0;
91 }
92
93 static int vesafb_blank(int blank, struct fb_info *info)
94 {
95         int err = 1;
96
97         if (vga_compat) {
98                 int loop = 10000;
99                 u8 seq = 0, crtc17 = 0;
100
101                 if (blank == FB_BLANK_POWERDOWN) {
102                         seq = 0x20;
103                         crtc17 = 0x00;
104                         err = 0;
105                 } else {
106                         seq = 0x00;
107                         crtc17 = 0x80;
108                         err = (blank == FB_BLANK_UNBLANK) ? 0 : -EINVAL;
109                 }
110
111                 vga_wseq(NULL, 0x00, 0x01);
112                 seq |= vga_rseq(NULL, 0x01) & ~0x20;
113                 vga_wseq(NULL, 0x00, seq);
114
115                 crtc17 |= vga_rcrt(NULL, 0x17) & ~0x80;
116                 while (loop--);
117                 vga_wcrt(NULL, 0x17, crtc17);
118                 vga_wseq(NULL, 0x00, 0x03);
119         }
120
121         return err;
122 }
123
124 static void vesa_setpalette(int regno, unsigned red, unsigned green,
125                             unsigned blue)
126 {
127 #ifdef __i386__
128         struct { u_char blue, green, red, pad; } entry;
129         int shift = 16 - depth;
130
131         if (pmi_setpal) {
132                 entry.red   = red   >> shift;
133                 entry.green = green >> shift;
134                 entry.blue  = blue  >> shift;
135                 entry.pad   = 0;
136                 __asm__ __volatile__(
137                 "call *(%%esi)"
138                 : /* no return value */
139                 : "a" (0x4f09),         /* EAX */
140                   "b" (0),              /* EBX */
141                   "c" (1),              /* ECX */
142                   "d" (regno),          /* EDX */
143                   "D" (&entry),         /* EDI */
144                   "S" (&pmi_pal));      /* ESI */
145         } else {
146                 /* without protected mode interface, try VGA registers... */
147                 outb_p(regno,       dac_reg);
148                 outb_p(red   >> shift, dac_val);
149                 outb_p(green >> shift, dac_val);
150                 outb_p(blue  >> shift, dac_val);
151         }
152 #endif
153 }
154
155 static int vesafb_setcolreg(unsigned regno, unsigned red, unsigned green,
156                             unsigned blue, unsigned transp,
157                             struct fb_info *info)
158 {
159         /*
160          *  Set a single color register. The values supplied are
161          *  already rounded down to the hardware's capabilities
162          *  (according to the entries in the `var' structure). Return
163          *  != 0 for invalid regno.
164          */
165         
166         if (regno >= info->cmap.len)
167                 return 1;
168
169         switch (info->var.bits_per_pixel) {
170         case 8:
171                 vesa_setpalette(regno,red,green,blue);
172                 break;
173         case 16:
174                 if (info->var.red.offset == 10) {
175                         /* 1:5:5:5 */
176                         ((u32*) (info->pseudo_palette))[regno] =        
177                                         ((red   & 0xf800) >>  1) |
178                                         ((green & 0xf800) >>  6) |
179                                         ((blue  & 0xf800) >> 11);
180                 } else {
181                         /* 0:5:6:5 */
182                         ((u32*) (info->pseudo_palette))[regno] =        
183                                         ((red   & 0xf800)      ) |
184                                         ((green & 0xfc00) >>  5) |
185                                         ((blue  & 0xf800) >> 11);
186                 }
187                 break;
188         case 24:
189                 red   >>= 8;
190                 green >>= 8;
191                 blue  >>= 8;
192                 ((u32 *)(info->pseudo_palette))[regno] =
193                         (red   << info->var.red.offset)   |
194                         (green << info->var.green.offset) |
195                         (blue  << info->var.blue.offset);
196                 break;
197         case 32:
198                 red   >>= 8;
199                 green >>= 8;
200                 blue  >>= 8;
201                 ((u32 *)(info->pseudo_palette))[regno] =
202                         (red   << info->var.red.offset)   |
203                         (green << info->var.green.offset) |
204                         (blue  << info->var.blue.offset);
205                 break;
206     }
207     return 0;
208 }
209
210 static struct fb_ops vesafb_ops = {
211         .owner          = THIS_MODULE,
212         .fb_setcolreg   = vesafb_setcolreg,
213         .fb_pan_display = vesafb_pan_display,
214         .fb_blank       = vesafb_blank,
215         .fb_fillrect    = cfb_fillrect,
216         .fb_copyarea    = cfb_copyarea,
217         .fb_imageblit   = cfb_imageblit,
218         .fb_cursor      = soft_cursor,
219 };
220
221 static int __init vesafb_setup(char *options)
222 {
223         char *this_opt;
224         
225         if (!options || !*options)
226                 return 0;
227         
228         while ((this_opt = strsep(&options, ",")) != NULL) {
229                 if (!*this_opt) continue;
230                 
231                 if (! strcmp(this_opt, "inverse"))
232                         inverse=1;
233                 else if (! strcmp(this_opt, "redraw"))
234                         ypan=0;
235                 else if (! strcmp(this_opt, "ypan"))
236                         ypan=1;
237                 else if (! strcmp(this_opt, "ywrap"))
238                         ypan=2;
239                 else if (! strcmp(this_opt, "vgapal"))
240                         pmi_setpal=0;
241                 else if (! strcmp(this_opt, "pmipal"))
242                         pmi_setpal=1;
243                 else if (! strncmp(this_opt, "mtrr:", 5))
244                         mtrr = simple_strtoul(this_opt+5, NULL, 0);
245                 else if (! strcmp(this_opt, "nomtrr"))
246                         mtrr=0;
247                 else if (! strncmp(this_opt, "vtotal:", 7))
248                         vram_total = simple_strtoul(this_opt+7, NULL, 0);
249                 else if (! strncmp(this_opt, "vremap:", 7))
250                         vram_remap = simple_strtoul(this_opt+7, NULL, 0);
251         }
252         return 0;
253 }
254
255 static int __init vesafb_probe(struct device *device)
256 {
257         struct platform_device *dev = to_platform_device(device);
258         struct fb_info *info;
259         int i, err;
260         unsigned int size_vmode;
261         unsigned int size_remap;
262         unsigned int size_total;
263
264         if (screen_info.orig_video_isVGA != VIDEO_TYPE_VLFB)
265                 return -ENODEV;
266
267         vesafb_fix.smem_start = screen_info.lfb_base;
268         vesafb_defined.bits_per_pixel = screen_info.lfb_depth;
269         if (15 == vesafb_defined.bits_per_pixel)
270                 vesafb_defined.bits_per_pixel = 16;
271         vesafb_defined.xres = screen_info.lfb_width;
272         vesafb_defined.yres = screen_info.lfb_height;
273         vesafb_fix.line_length = screen_info.lfb_linelength;
274         vesafb_fix.visual   = (vesafb_defined.bits_per_pixel == 8) ?
275                 FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_TRUECOLOR;
276
277         /*   size_vmode -- that is the amount of memory needed for the
278          *                 used video mode, i.e. the minimum amount of
279          *                 memory we need. */
280         size_vmode = vesafb_defined.yres * vesafb_fix.line_length;
281
282         /*   size_total -- all video memory we have. Used for mtrr
283          *                 entries, ressource allocation and bounds
284          *                 checking. */
285         size_total = screen_info.lfb_size * 65536;
286         if (vram_total)
287                 size_total = vram_total * 1024 * 1024;
288         if (size_total < size_vmode)
289                 size_total = size_vmode;
290
291         /*   size_remap -- the amount of video memory we are going to
292          *                 use for vesafb.  With modern cards it is no
293          *                 option to simply use size_total as that
294          *                 wastes plenty of kernel address space. */
295         size_remap  = size_vmode * 2;
296         if (vram_remap)
297                 size_remap = vram_remap * 1024 * 1024;
298         if (size_remap < size_vmode)
299                 size_remap = size_vmode;
300         if (size_remap > size_total)
301                 size_remap = size_total;
302         vesafb_fix.smem_len = size_remap;
303
304 #ifndef __i386__
305         screen_info.vesapm_seg = 0;
306 #endif
307
308         if (!request_mem_region(vesafb_fix.smem_start, size_total, "vesafb")) {
309                 printk(KERN_WARNING
310                        "vesafb: cannot reserve video memory at 0x%lx\n",
311                         vesafb_fix.smem_start);
312                 /* We cannot make this fatal. Sometimes this comes from magic
313                    spaces our resource handlers simply don't know about */
314         }
315
316         info = framebuffer_alloc(sizeof(u32) * 256, &dev->dev);
317         if (!info) {
318                 release_mem_region(vesafb_fix.smem_start, size_total);
319                 return -ENOMEM;
320         }
321         info->pseudo_palette = info->par;
322         info->par = NULL;
323
324         info->screen_base = ioremap(vesafb_fix.smem_start, vesafb_fix.smem_len);
325         if (!info->screen_base) {
326                 printk(KERN_ERR
327                        "vesafb: abort, cannot ioremap video memory 0x%x @ 0x%lx\n",
328                         vesafb_fix.smem_len, vesafb_fix.smem_start);
329                 err = -EIO;
330                 goto err;
331         }
332
333         printk(KERN_INFO "vesafb: framebuffer at 0x%lx, mapped to 0x%p, "
334                "using %dk, total %dk\n",
335                vesafb_fix.smem_start, info->screen_base,
336                size_remap/1024, size_total/1024);
337         printk(KERN_INFO "vesafb: mode is %dx%dx%d, linelength=%d, pages=%d\n",
338                vesafb_defined.xres, vesafb_defined.yres, vesafb_defined.bits_per_pixel, vesafb_fix.line_length, screen_info.pages);
339
340         if (screen_info.vesapm_seg) {
341                 printk(KERN_INFO "vesafb: protected mode interface info at %04x:%04x\n",
342                        screen_info.vesapm_seg,screen_info.vesapm_off);
343         }
344
345         if (screen_info.vesapm_seg < 0xc000)
346                 ypan = pmi_setpal = 0; /* not available or some DOS TSR ... */
347
348         if (ypan || pmi_setpal) {
349                 pmi_base  = (unsigned short*)phys_to_virt(((unsigned long)screen_info.vesapm_seg << 4) + screen_info.vesapm_off);
350                 pmi_start = (void*)((char*)pmi_base + pmi_base[1]);
351                 pmi_pal   = (void*)((char*)pmi_base + pmi_base[2]);
352                 printk(KERN_INFO "vesafb: pmi: set display start = %p, set palette = %p\n",pmi_start,pmi_pal);
353                 if (pmi_base[3]) {
354                         printk(KERN_INFO "vesafb: pmi: ports = ");
355                                 for (i = pmi_base[3]/2; pmi_base[i] != 0xffff; i++)
356                                         printk("%x ",pmi_base[i]);
357                         printk("\n");
358                         if (pmi_base[i] != 0xffff) {
359                                 /*
360                                  * memory areas not supported (yet?)
361                                  *
362                                  * Rules are: we have to set up a descriptor for the requested
363                                  * memory area and pass it in the ES register to the BIOS function.
364                                  */
365                                 printk(KERN_INFO "vesafb: can't handle memory requests, pmi disabled\n");
366                                 ypan = pmi_setpal = 0;
367                         }
368                 }
369         }
370
371         vesafb_defined.xres_virtual = vesafb_defined.xres;
372         vesafb_defined.yres_virtual = vesafb_fix.smem_len / vesafb_fix.line_length;
373         if (ypan && vesafb_defined.yres_virtual > vesafb_defined.yres) {
374                 printk(KERN_INFO "vesafb: scrolling: %s using protected mode interface, yres_virtual=%d\n",
375                        (ypan > 1) ? "ywrap" : "ypan",vesafb_defined.yres_virtual);
376         } else {
377                 printk(KERN_INFO "vesafb: scrolling: redraw\n");
378                 vesafb_defined.yres_virtual = vesafb_defined.yres;
379                 ypan = 0;
380         }
381
382         /* some dummy values for timing to make fbset happy */
383         vesafb_defined.pixclock     = 10000000 / vesafb_defined.xres * 1000 / vesafb_defined.yres;
384         vesafb_defined.left_margin  = (vesafb_defined.xres / 8) & 0xf8;
385         vesafb_defined.hsync_len    = (vesafb_defined.xres / 8) & 0xf8;
386         
387         vesafb_defined.red.offset    = screen_info.red_pos;
388         vesafb_defined.red.length    = screen_info.red_size;
389         vesafb_defined.green.offset  = screen_info.green_pos;
390         vesafb_defined.green.length  = screen_info.green_size;
391         vesafb_defined.blue.offset   = screen_info.blue_pos;
392         vesafb_defined.blue.length   = screen_info.blue_size;
393         vesafb_defined.transp.offset = screen_info.rsvd_pos;
394         vesafb_defined.transp.length = screen_info.rsvd_size;
395
396         if (vesafb_defined.bits_per_pixel <= 8) {
397                 depth = vesafb_defined.green.length;
398                 vesafb_defined.red.length =
399                 vesafb_defined.green.length =
400                 vesafb_defined.blue.length =
401                 vesafb_defined.bits_per_pixel;
402         }
403
404         printk(KERN_INFO "vesafb: %s: "
405                "size=%d:%d:%d:%d, shift=%d:%d:%d:%d\n",
406                (vesafb_defined.bits_per_pixel > 8) ?
407                "Truecolor" : "Pseudocolor",
408                screen_info.rsvd_size,
409                screen_info.red_size,
410                screen_info.green_size,
411                screen_info.blue_size,
412                screen_info.rsvd_pos,
413                screen_info.red_pos,
414                screen_info.green_pos,
415                screen_info.blue_pos);
416
417         vesafb_fix.ypanstep  = ypan     ? 1 : 0;
418         vesafb_fix.ywrapstep = (ypan>1) ? 1 : 0;
419
420         /* request failure does not faze us, as vgacon probably has this
421          * region already (FIXME) */
422         request_region(0x3c0, 32, "vesafb");
423
424         if (mtrr) {
425                 unsigned int temp_size = size_total;
426                 unsigned int type = 0;
427
428                 switch (mtrr) {
429                 case 1:
430                         type = MTRR_TYPE_UNCACHABLE;
431                         break;
432                 case 2:
433                         type = MTRR_TYPE_WRBACK;
434                         break;
435                 case 3:
436                         type = MTRR_TYPE_WRCOMB;
437                         break;
438                 case 4:
439                         type = MTRR_TYPE_WRTHROUGH;
440                         break;
441                 default:
442                         type = 0;
443                         break;
444                 }
445
446                 if (type) {
447                         int rc;
448
449                         /* Find the largest power-of-two */
450                         while (temp_size & (temp_size - 1))
451                                 temp_size &= (temp_size - 1);
452
453                         /* Try and find a power of two to add */
454                         do {
455                                 rc = mtrr_add(vesafb_fix.smem_start, temp_size,
456                                               type, 1);
457                                 temp_size >>= 1;
458                         } while (temp_size >= PAGE_SIZE && rc == -EINVAL);
459                 }
460         }
461         
462         info->fbops = &vesafb_ops;
463         info->var = vesafb_defined;
464         info->fix = vesafb_fix;
465         info->flags = FBINFO_FLAG_DEFAULT |
466                 (ypan) ? FBINFO_HWACCEL_YPAN : 0;
467
468         vga_compat = (screen_info.capabilities & 2) ? 0 : 1;
469         printk("vesafb: Mode is %sVGA compatible\n",
470                (vga_compat) ? "" : "not ");
471
472         if (fb_alloc_cmap(&info->cmap, 256, 0) < 0) {
473                 err = -ENOMEM;
474                 goto err;
475         }
476         if (register_framebuffer(info)<0) {
477                 err = -EINVAL;
478                 fb_dealloc_cmap(&info->cmap);
479                 goto err;
480         }
481         printk(KERN_INFO "fb%d: %s frame buffer device\n",
482                info->node, info->fix.id);
483         return 0;
484 err:
485         framebuffer_release(info);
486         release_mem_region(vesafb_fix.smem_start, size_total);
487         return err;
488 }
489
490 static struct device_driver vesafb_driver = {
491         .name   = "vesafb",
492         .bus    = &platform_bus_type,
493         .probe  = vesafb_probe,
494 };
495
496 static struct platform_device vesafb_device = {
497         .name   = "vesafb",
498 };
499
500 static int __init vesafb_init(void)
501 {
502         int ret;
503         char *option = NULL;
504
505         /* ignore error return of fb_get_options */
506         fb_get_options("vesafb", &option);
507         vesafb_setup(option);
508         ret = driver_register(&vesafb_driver);
509
510         if (!ret) {
511                 ret = platform_device_register(&vesafb_device);
512                 if (ret)
513                         driver_unregister(&vesafb_driver);
514         }
515         return ret;
516 }
517 module_init(vesafb_init);
518
519 MODULE_LICENSE("GPL");