ftp://ftp.kernel.org/pub/linux/kernel/v2.6/linux-2.6.6.tar.bz2
[linux-2.6.git] / 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 #ifdef __i386__
23 #include <video/edid.h>
24 #endif
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 struct fb_info fb_info;
51 static u32 pseudo_palette[17];
52
53 static int             inverse   = 0;
54 static int             mtrr      = 1;
55
56 static int             pmi_setpal = 0;  /* pmi for palette changes ??? */
57 static int             ypan       = 0;  /* 0..nothing, 1..ypan, 2..ywrap */
58 static unsigned short  *pmi_base  = 0;
59 static void            (*pmi_start)(void);
60 static void            (*pmi_pal)(void);
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 void vesa_setpalette(int regno, unsigned red, unsigned green, unsigned blue)
94 {
95 #ifdef __i386__
96         struct { u_char blue, green, red, pad; } entry;
97
98         if (pmi_setpal) {
99                 entry.red   = red   >> 10;
100                 entry.green = green >> 10;
101                 entry.blue  = blue  >> 10;
102                 entry.pad   = 0;
103                 __asm__ __volatile__(
104                 "call *(%%esi)"
105                 : /* no return value */
106                 : "a" (0x4f09),         /* EAX */
107                   "b" (0),              /* EBX */
108                   "c" (1),              /* ECX */
109                   "d" (regno),          /* EDX */
110                   "D" (&entry),         /* EDI */
111                   "S" (&pmi_pal));      /* ESI */
112         } else {
113                 /* without protected mode interface, try VGA registers... */
114                 outb_p(regno,       dac_reg);
115                 outb_p(red   >> 10, dac_val);
116                 outb_p(green >> 10, dac_val);
117                 outb_p(blue  >> 10, dac_val);
118         }
119 #endif
120 }
121
122 static int vesafb_setcolreg(unsigned regno, unsigned red, unsigned green,
123                             unsigned blue, unsigned transp,
124                             struct fb_info *info)
125 {
126         /*
127          *  Set a single color register. The values supplied are
128          *  already rounded down to the hardware's capabilities
129          *  (according to the entries in the `var' structure). Return
130          *  != 0 for invalid regno.
131          */
132         
133         if (regno >= info->cmap.len)
134                 return 1;
135
136         switch (info->var.bits_per_pixel) {
137         case 8:
138                 vesa_setpalette(regno,red,green,blue);
139                 break;
140         case 16:
141                 if (info->var.red.offset == 10) {
142                         /* 1:5:5:5 */
143                         ((u32*) (info->pseudo_palette))[regno] =        
144                                         ((red   & 0xf800) >>  1) |
145                                         ((green & 0xf800) >>  6) |
146                                         ((blue  & 0xf800) >> 11);
147                 } else {
148                         /* 0:5:6:5 */
149                         ((u32*) (info->pseudo_palette))[regno] =        
150                                         ((red   & 0xf800)      ) |
151                                         ((green & 0xfc00) >>  5) |
152                                         ((blue  & 0xf800) >> 11);
153                 }
154                 break;
155         case 24:
156                 red   >>= 8;
157                 green >>= 8;
158                 blue  >>= 8;
159                 ((u32 *)(info->pseudo_palette))[regno] =
160                         (red   << info->var.red.offset)   |
161                         (green << info->var.green.offset) |
162                         (blue  << info->var.blue.offset);
163                 break;
164         case 32:
165                 red   >>= 8;
166                 green >>= 8;
167                 blue  >>= 8;
168                 ((u32 *)(info->pseudo_palette))[regno] =
169                         (red   << info->var.red.offset)   |
170                         (green << info->var.green.offset) |
171                         (blue  << info->var.blue.offset);
172                 break;
173     }
174     return 0;
175 }
176
177 static struct fb_ops vesafb_ops = {
178         .owner          = THIS_MODULE,
179         .fb_setcolreg   = vesafb_setcolreg,
180         .fb_pan_display = vesafb_pan_display,
181         .fb_fillrect    = cfb_fillrect,
182         .fb_copyarea    = cfb_copyarea,
183         .fb_imageblit   = cfb_imageblit,
184         .fb_cursor      = soft_cursor,
185 };
186
187 int __init vesafb_setup(char *options)
188 {
189         char *this_opt;
190         
191         if (!options || !*options)
192                 return 0;
193         
194         while ((this_opt = strsep(&options, ",")) != NULL) {
195                 if (!*this_opt) continue;
196                 
197                 if (! strcmp(this_opt, "inverse"))
198                         inverse=1;
199                 else if (! strcmp(this_opt, "redraw"))
200                         ypan=0;
201                 else if (! strcmp(this_opt, "ypan"))
202                         ypan=1;
203                 else if (! strcmp(this_opt, "ywrap"))
204                         ypan=2;
205                 else if (! strcmp(this_opt, "vgapal"))
206                         pmi_setpal=0;
207                 else if (! strcmp(this_opt, "pmipal"))
208                         pmi_setpal=1;
209                 else if (! strcmp(this_opt, "mtrr"))
210                         mtrr=1;
211                 else if (! strcmp(this_opt, "nomtrr"))
212                         mtrr=0;
213         }
214         return 0;
215 }
216
217 int __init vesafb_init(void)
218 {
219         int video_cmap_len;
220         int i;
221
222         if (screen_info.orig_video_isVGA != VIDEO_TYPE_VLFB)
223                 return -ENXIO;
224
225         vesafb_fix.smem_start = screen_info.lfb_base;
226         vesafb_defined.bits_per_pixel = screen_info.lfb_depth;
227         if (15 == vesafb_defined.bits_per_pixel)
228                 vesafb_defined.bits_per_pixel = 16;
229         vesafb_defined.xres = screen_info.lfb_width;
230         vesafb_defined.yres = screen_info.lfb_height;
231         vesafb_fix.line_length = screen_info.lfb_linelength;
232         vesafb_fix.smem_len = screen_info.lfb_size * 65536;
233         vesafb_fix.visual   = (vesafb_defined.bits_per_pixel == 8) ?
234                 FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_TRUECOLOR;
235
236         /* limit framebuffer size to 16 MB.  Otherwise we'll eat tons of
237          * kernel address space for nothing if the gfx card has alot of
238          * memory (>= 128 MB isn't uncommon these days ...) */
239         if (vesafb_fix.smem_len > 16 * 1024 * 1024)
240                 vesafb_fix.smem_len = 16 * 1024 * 1024;
241
242 #ifndef __i386__
243         screen_info.vesapm_seg = 0;
244 #endif
245
246         if (!request_mem_region(vesafb_fix.smem_start, vesafb_fix.smem_len, "vesafb")) {
247                 printk(KERN_WARNING
248                        "vesafb: abort, cannot reserve video memory at 0x%lx\n",
249                         vesafb_fix.smem_start);
250                 /* We cannot make this fatal. Sometimes this comes from magic
251                    spaces our resource handlers simply don't know about */
252         }
253
254         fb_info.screen_base = ioremap(vesafb_fix.smem_start, vesafb_fix.smem_len);
255         if (!fb_info.screen_base) {
256                 release_mem_region(vesafb_fix.smem_start, vesafb_fix.smem_len);
257                 printk(KERN_ERR
258                        "vesafb: abort, cannot ioremap video memory 0x%x @ 0x%lx\n",
259                         vesafb_fix.smem_len, vesafb_fix.smem_start);
260                 return -EIO;
261         }
262
263         printk(KERN_INFO "vesafb: framebuffer at 0x%lx, mapped to 0x%p, size %dk\n",
264                vesafb_fix.smem_start, fb_info.screen_base, vesafb_fix.smem_len/1024);
265         printk(KERN_INFO "vesafb: mode is %dx%dx%d, linelength=%d, pages=%d\n",
266                vesafb_defined.xres, vesafb_defined.yres, vesafb_defined.bits_per_pixel, vesafb_fix.line_length, screen_info.pages);
267
268         if (screen_info.vesapm_seg) {
269                 printk(KERN_INFO "vesafb: protected mode interface info at %04x:%04x\n",
270                        screen_info.vesapm_seg,screen_info.vesapm_off);
271         }
272
273         if (screen_info.vesapm_seg < 0xc000)
274                 ypan = pmi_setpal = 0; /* not available or some DOS TSR ... */
275
276         if (ypan || pmi_setpal) {
277                 pmi_base  = (unsigned short*)phys_to_virt(((unsigned long)screen_info.vesapm_seg << 4) + screen_info.vesapm_off);
278                 pmi_start = (void*)((char*)pmi_base + pmi_base[1]);
279                 pmi_pal   = (void*)((char*)pmi_base + pmi_base[2]);
280                 printk(KERN_INFO "vesafb: pmi: set display start = %p, set palette = %p\n",pmi_start,pmi_pal);
281                 if (pmi_base[3]) {
282                         printk(KERN_INFO "vesafb: pmi: ports = ");
283                                 for (i = pmi_base[3]/2; pmi_base[i] != 0xffff; i++)
284                                         printk("%x ",pmi_base[i]);
285                         printk("\n");
286                         if (pmi_base[i] != 0xffff) {
287                                 /*
288                                  * memory areas not supported (yet?)
289                                  *
290                                  * Rules are: we have to set up a descriptor for the requested
291                                  * memory area and pass it in the ES register to the BIOS function.
292                                  */
293                                 printk(KERN_INFO "vesafb: can't handle memory requests, pmi disabled\n");
294                                 ypan = pmi_setpal = 0;
295                         }
296                 }
297         }
298
299         vesafb_defined.xres_virtual = vesafb_defined.xres;
300         vesafb_defined.yres_virtual = vesafb_fix.smem_len / vesafb_fix.line_length;
301         if (ypan && vesafb_defined.yres_virtual > vesafb_defined.yres) {
302                 printk(KERN_INFO "vesafb: scrolling: %s using protected mode interface, yres_virtual=%d\n",
303                        (ypan > 1) ? "ywrap" : "ypan",vesafb_defined.yres_virtual);
304         } else {
305                 printk(KERN_INFO "vesafb: scrolling: redraw\n");
306                 vesafb_defined.yres_virtual = vesafb_defined.yres;
307                 ypan = 0;
308         }
309
310         /* some dummy values for timing to make fbset happy */
311         vesafb_defined.pixclock     = 10000000 / vesafb_defined.xres * 1000 / vesafb_defined.yres;
312         vesafb_defined.left_margin  = (vesafb_defined.xres / 8) & 0xf8;
313         vesafb_defined.hsync_len    = (vesafb_defined.xres / 8) & 0xf8;
314         
315         if (vesafb_defined.bits_per_pixel > 8) {
316                 vesafb_defined.red.offset    = screen_info.red_pos;
317                 vesafb_defined.red.length    = screen_info.red_size;
318                 vesafb_defined.green.offset  = screen_info.green_pos;
319                 vesafb_defined.green.length  = screen_info.green_size;
320                 vesafb_defined.blue.offset   = screen_info.blue_pos;
321                 vesafb_defined.blue.length   = screen_info.blue_size;
322                 vesafb_defined.transp.offset = screen_info.rsvd_pos;
323                 vesafb_defined.transp.length = screen_info.rsvd_size;
324                 printk(KERN_INFO "vesafb: directcolor: "
325                        "size=%d:%d:%d:%d, shift=%d:%d:%d:%d\n",
326                        screen_info.rsvd_size,
327                        screen_info.red_size,
328                        screen_info.green_size,
329                        screen_info.blue_size,
330                        screen_info.rsvd_pos,
331                        screen_info.red_pos,
332                        screen_info.green_pos,
333                        screen_info.blue_pos);
334                 video_cmap_len = 16;
335         } else {
336                 vesafb_defined.red.length   = 6;
337                 vesafb_defined.green.length = 6;
338                 vesafb_defined.blue.length  = 6;
339                 video_cmap_len = 256;
340         }
341
342         vesafb_fix.ypanstep  = ypan     ? 1 : 0;
343         vesafb_fix.ywrapstep = (ypan>1) ? 1 : 0;
344
345         /* request failure does not faze us, as vgacon probably has this
346          * region already (FIXME) */
347         request_region(0x3c0, 32, "vesafb");
348
349         if (mtrr) {
350                 int temp_size = vesafb_fix.smem_len;
351                 /* Find the largest power-of-two */
352                 while (temp_size & (temp_size - 1))
353                         temp_size &= (temp_size - 1);
354                         
355                 /* Try and find a power of two to add */
356                 while (temp_size && mtrr_add(vesafb_fix.smem_start, temp_size, MTRR_TYPE_WRCOMB, 1)==-EINVAL) {
357                         temp_size >>= 1;
358                 }
359         }
360         
361         fb_info.fbops = &vesafb_ops;
362         fb_info.var = vesafb_defined;
363         fb_info.fix = vesafb_fix;
364         fb_info.pseudo_palette = pseudo_palette;
365         fb_info.flags = FBINFO_FLAG_DEFAULT;
366
367         fb_alloc_cmap(&fb_info.cmap, video_cmap_len, 0);
368
369         if (register_framebuffer(&fb_info)<0)
370                 return -EINVAL;
371
372         printk(KERN_INFO "fb%d: %s frame buffer device\n",
373                fb_info.node, fb_info.fix.id);
374         return 0;
375 }
376
377 /*
378  * Overrides for Emacs so that we follow Linus's tabbing style.
379  * ---------------------------------------------------------------------------
380  * Local variables:
381  * c-basic-offset: 8
382  * End:
383  */
384
385 MODULE_LICENSE("GPL");