Committer: Michael Beasley <mike@snafu.setup>
[mikesnafu-overlay.git] / drivers / video / hgafb.c
blobfb9e67228543b05a1cb6cd7f62703fbd4f032596
1 /*
2 * linux/drivers/video/hgafb.c -- Hercules graphics adaptor frame buffer device
3 *
4 * Created 25 Nov 1999 by Ferenc Bakonyi (fero@drama.obuda.kando.hu)
5 * Based on skeletonfb.c by Geert Uytterhoeven and
6 * mdacon.c by Andrew Apted
8 * History:
10 * - Revision 0.1.8 (23 Oct 2002): Ported to new framebuffer api.
12 * - Revision 0.1.7 (23 Jan 2001): fix crash resulting from MDA only cards
13 * being detected as Hercules. (Paul G.)
14 * - Revision 0.1.6 (17 Aug 2000): new style structs
15 * documentation
16 * - Revision 0.1.5 (13 Mar 2000): spinlocks instead of saveflags();cli();etc
17 * minor fixes
18 * - Revision 0.1.4 (24 Jan 2000): fixed a bug in hga_card_detect() for
19 * HGA-only systems
20 * - Revision 0.1.3 (22 Jan 2000): modified for the new fb_info structure
21 * screen is cleared after rmmod
22 * virtual resolutions
23 * module parameter 'nologo={0|1}'
24 * the most important: boot logo :)
25 * - Revision 0.1.0 (6 Dec 1999): faster scrolling and minor fixes
26 * - First release (25 Nov 1999)
28 * This file is subject to the terms and conditions of the GNU General Public
29 * License. See the file COPYING in the main directory of this archive
30 * for more details.
33 #include <linux/module.h>
34 #include <linux/kernel.h>
35 #include <linux/errno.h>
36 #include <linux/spinlock.h>
37 #include <linux/string.h>
38 #include <linux/mm.h>
39 #include <linux/slab.h>
40 #include <linux/delay.h>
41 #include <linux/fb.h>
42 #include <linux/init.h>
43 #include <linux/ioport.h>
44 #include <linux/platform_device.h>
45 #include <asm/io.h>
46 #include <asm/vga.h>
48 #if 0
49 #define DPRINTK(args...) printk(KERN_DEBUG __FILE__": " ##args)
50 #else
51 #define DPRINTK(args...)
52 #endif
54 #if 0
55 #define CHKINFO(ret) if (info != &fb_info) { printk(KERN_DEBUG __FILE__": This should never happen, line:%d \n", __LINE__); return ret; }
56 #else
57 #define CHKINFO(ret)
58 #endif
60 /* Description of the hardware layout */
62 static void __iomem *hga_vram; /* Base of video memory */
63 static unsigned long hga_vram_len; /* Size of video memory */
65 #define HGA_ROWADDR(row) ((row%4)*8192 + (row>>2)*90)
66 #define HGA_TXT 0
67 #define HGA_GFX 1
69 static inline u8 __iomem * rowaddr(struct fb_info *info, u_int row)
71 return info->screen_base + HGA_ROWADDR(row);
74 static int hga_mode = -1; /* 0 = txt, 1 = gfx mode */
76 static enum { TYPE_HERC, TYPE_HERCPLUS, TYPE_HERCCOLOR } hga_type;
77 static char *hga_type_name;
79 #define HGA_INDEX_PORT 0x3b4 /* Register select port */
80 #define HGA_VALUE_PORT 0x3b5 /* Register value port */
81 #define HGA_MODE_PORT 0x3b8 /* Mode control port */
82 #define HGA_STATUS_PORT 0x3ba /* Status and Config port */
83 #define HGA_GFX_PORT 0x3bf /* Graphics control port */
85 /* HGA register values */
87 #define HGA_CURSOR_BLINKING 0x00
88 #define HGA_CURSOR_OFF 0x20
89 #define HGA_CURSOR_SLOWBLINK 0x60
91 #define HGA_MODE_GRAPHICS 0x02
92 #define HGA_MODE_VIDEO_EN 0x08
93 #define HGA_MODE_BLINK_EN 0x20
94 #define HGA_MODE_GFX_PAGE1 0x80
96 #define HGA_STATUS_HSYNC 0x01
97 #define HGA_STATUS_VSYNC 0x80
98 #define HGA_STATUS_VIDEO 0x08
100 #define HGA_CONFIG_COL132 0x08
101 #define HGA_GFX_MODE_EN 0x01
102 #define HGA_GFX_PAGE_EN 0x02
104 /* Global locks */
106 static DEFINE_SPINLOCK(hga_reg_lock);
108 /* Framebuffer driver structures */
110 static struct fb_var_screeninfo __initdata hga_default_var = {
111 .xres = 720,
112 .yres = 348,
113 .xres_virtual = 720,
114 .yres_virtual = 348,
115 .bits_per_pixel = 1,
116 .red = {0, 1, 0},
117 .green = {0, 1, 0},
118 .blue = {0, 1, 0},
119 .transp = {0, 0, 0},
120 .height = -1,
121 .width = -1,
124 static struct fb_fix_screeninfo __initdata hga_fix = {
125 .id = "HGA",
126 .type = FB_TYPE_PACKED_PIXELS, /* (not sure) */
127 .visual = FB_VISUAL_MONO10,
128 .xpanstep = 8,
129 .ypanstep = 8,
130 .line_length = 90,
131 .accel = FB_ACCEL_NONE
134 /* Don't assume that tty1 will be the initial current console. */
135 static int release_io_port = 0;
136 static int release_io_ports = 0;
137 static int nologo = 0;
139 /* -------------------------------------------------------------------------
141 * Low level hardware functions
143 * ------------------------------------------------------------------------- */
145 static void write_hga_b(unsigned int val, unsigned char reg)
147 outb_p(reg, HGA_INDEX_PORT);
148 outb_p(val, HGA_VALUE_PORT);
151 static void write_hga_w(unsigned int val, unsigned char reg)
153 outb_p(reg, HGA_INDEX_PORT); outb_p(val >> 8, HGA_VALUE_PORT);
154 outb_p(reg+1, HGA_INDEX_PORT); outb_p(val & 0xff, HGA_VALUE_PORT);
157 static int test_hga_b(unsigned char val, unsigned char reg)
159 outb_p(reg, HGA_INDEX_PORT);
160 outb (val, HGA_VALUE_PORT);
161 udelay(20); val = (inb_p(HGA_VALUE_PORT) == val);
162 return val;
165 static void hga_clear_screen(void)
167 unsigned char fillchar = 0xbf; /* magic */
168 unsigned long flags;
170 spin_lock_irqsave(&hga_reg_lock, flags);
171 if (hga_mode == HGA_TXT)
172 fillchar = ' ';
173 else if (hga_mode == HGA_GFX)
174 fillchar = 0x00;
175 spin_unlock_irqrestore(&hga_reg_lock, flags);
176 if (fillchar != 0xbf)
177 memset_io(hga_vram, fillchar, hga_vram_len);
180 static void hga_txt_mode(void)
182 unsigned long flags;
184 spin_lock_irqsave(&hga_reg_lock, flags);
185 outb_p(HGA_MODE_VIDEO_EN | HGA_MODE_BLINK_EN, HGA_MODE_PORT);
186 outb_p(0x00, HGA_GFX_PORT);
187 outb_p(0x00, HGA_STATUS_PORT);
189 write_hga_b(0x61, 0x00); /* horizontal total */
190 write_hga_b(0x50, 0x01); /* horizontal displayed */
191 write_hga_b(0x52, 0x02); /* horizontal sync pos */
192 write_hga_b(0x0f, 0x03); /* horizontal sync width */
194 write_hga_b(0x19, 0x04); /* vertical total */
195 write_hga_b(0x06, 0x05); /* vertical total adjust */
196 write_hga_b(0x19, 0x06); /* vertical displayed */
197 write_hga_b(0x19, 0x07); /* vertical sync pos */
199 write_hga_b(0x02, 0x08); /* interlace mode */
200 write_hga_b(0x0d, 0x09); /* maximum scanline */
201 write_hga_b(0x0c, 0x0a); /* cursor start */
202 write_hga_b(0x0d, 0x0b); /* cursor end */
204 write_hga_w(0x0000, 0x0c); /* start address */
205 write_hga_w(0x0000, 0x0e); /* cursor location */
207 hga_mode = HGA_TXT;
208 spin_unlock_irqrestore(&hga_reg_lock, flags);
211 static void hga_gfx_mode(void)
213 unsigned long flags;
215 spin_lock_irqsave(&hga_reg_lock, flags);
216 outb_p(0x00, HGA_STATUS_PORT);
217 outb_p(HGA_GFX_MODE_EN, HGA_GFX_PORT);
218 outb_p(HGA_MODE_VIDEO_EN | HGA_MODE_GRAPHICS, HGA_MODE_PORT);
220 write_hga_b(0x35, 0x00); /* horizontal total */
221 write_hga_b(0x2d, 0x01); /* horizontal displayed */
222 write_hga_b(0x2e, 0x02); /* horizontal sync pos */
223 write_hga_b(0x07, 0x03); /* horizontal sync width */
225 write_hga_b(0x5b, 0x04); /* vertical total */
226 write_hga_b(0x02, 0x05); /* vertical total adjust */
227 write_hga_b(0x57, 0x06); /* vertical displayed */
228 write_hga_b(0x57, 0x07); /* vertical sync pos */
230 write_hga_b(0x02, 0x08); /* interlace mode */
231 write_hga_b(0x03, 0x09); /* maximum scanline */
232 write_hga_b(0x00, 0x0a); /* cursor start */
233 write_hga_b(0x00, 0x0b); /* cursor end */
235 write_hga_w(0x0000, 0x0c); /* start address */
236 write_hga_w(0x0000, 0x0e); /* cursor location */
238 hga_mode = HGA_GFX;
239 spin_unlock_irqrestore(&hga_reg_lock, flags);
242 static void hga_show_logo(struct fb_info *info)
245 void __iomem *dest = hga_vram;
246 char *logo = linux_logo_bw;
247 int x, y;
249 for (y = 134; y < 134 + 80 ; y++) * this needs some cleanup *
250 for (x = 0; x < 10 ; x++)
251 writeb(~*(logo++),(dest + HGA_ROWADDR(y) + x + 40));
255 static void hga_pan(unsigned int xoffset, unsigned int yoffset)
257 unsigned int base;
258 unsigned long flags;
260 base = (yoffset / 8) * 90 + xoffset;
261 spin_lock_irqsave(&hga_reg_lock, flags);
262 write_hga_w(base, 0x0c); /* start address */
263 spin_unlock_irqrestore(&hga_reg_lock, flags);
264 DPRINTK("hga_pan: base:%d\n", base);
267 static void hga_blank(int blank_mode)
269 unsigned long flags;
271 spin_lock_irqsave(&hga_reg_lock, flags);
272 if (blank_mode) {
273 outb_p(0x00, HGA_MODE_PORT); /* disable video */
274 } else {
275 outb_p(HGA_MODE_VIDEO_EN | HGA_MODE_GRAPHICS, HGA_MODE_PORT);
277 spin_unlock_irqrestore(&hga_reg_lock, flags);
280 static int __init hga_card_detect(void)
282 int count=0;
283 void __iomem *p, *q;
284 unsigned short p_save, q_save;
286 hga_vram_len = 0x08000;
288 hga_vram = ioremap(0xb0000, hga_vram_len);
290 if (request_region(0x3b0, 12, "hgafb"))
291 release_io_ports = 1;
292 if (request_region(0x3bf, 1, "hgafb"))
293 release_io_port = 1;
295 /* do a memory check */
297 p = hga_vram;
298 q = hga_vram + 0x01000;
300 p_save = readw(p); q_save = readw(q);
302 writew(0xaa55, p); if (readw(p) == 0xaa55) count++;
303 writew(0x55aa, p); if (readw(p) == 0x55aa) count++;
304 writew(p_save, p);
306 if (count != 2) {
307 return 0;
310 /* Ok, there is definitely a card registering at the correct
311 * memory location, so now we do an I/O port test.
314 if (!test_hga_b(0x66, 0x0f)) { /* cursor low register */
315 return 0;
317 if (!test_hga_b(0x99, 0x0f)) { /* cursor low register */
318 return 0;
321 /* See if the card is a Hercules, by checking whether the vsync
322 * bit of the status register is changing. This test lasts for
323 * approximately 1/10th of a second.
326 p_save = q_save = inb_p(HGA_STATUS_PORT) & HGA_STATUS_VSYNC;
328 for (count=0; count < 50000 && p_save == q_save; count++) {
329 q_save = inb(HGA_STATUS_PORT) & HGA_STATUS_VSYNC;
330 udelay(2);
333 if (p_save == q_save)
334 return 0;
336 switch (inb_p(HGA_STATUS_PORT) & 0x70) {
337 case 0x10:
338 hga_type = TYPE_HERCPLUS;
339 hga_type_name = "HerculesPlus";
340 break;
341 case 0x50:
342 hga_type = TYPE_HERCCOLOR;
343 hga_type_name = "HerculesColor";
344 break;
345 default:
346 hga_type = TYPE_HERC;
347 hga_type_name = "Hercules";
348 break;
350 return 1;
354 * hgafb_open - open the framebuffer device
355 * @info:pointer to fb_info object containing info for current hga board
356 * @int:open by console system or userland.
359 static int hgafb_open(struct fb_info *info, int init)
361 hga_gfx_mode();
362 hga_clear_screen();
363 if (!nologo) hga_show_logo(info);
364 return 0;
368 * hgafb_open - open the framebuffer device
369 * @info:pointer to fb_info object containing info for current hga board
370 * @int:open by console system or userland.
373 static int hgafb_release(struct fb_info *info, int init)
375 hga_txt_mode();
376 hga_clear_screen();
377 return 0;
381 * hgafb_setcolreg - set color registers
382 * @regno:register index to set
383 * @red:red value, unused
384 * @green:green value, unused
385 * @blue:blue value, unused
386 * @transp:transparency value, unused
387 * @info:unused
389 * This callback function is used to set the color registers of a HGA
390 * board. Since we have only two fixed colors only @regno is checked.
391 * A zero is returned on success and 1 for failure.
394 static int hgafb_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
395 u_int transp, struct fb_info *info)
397 if (regno > 1)
398 return 1;
399 return 0;
403 * hga_pan_display - pan or wrap the display
404 * @var:contains new xoffset, yoffset and vmode values
405 * @info:pointer to fb_info object containing info for current hga board
407 * This function looks only at xoffset, yoffset and the %FB_VMODE_YWRAP
408 * flag in @var. If input parameters are correct it calls hga_pan() to
409 * program the hardware. @info->var is updated to the new values.
410 * A zero is returned on success and %-EINVAL for failure.
413 static int hgafb_pan_display(struct fb_var_screeninfo *var,
414 struct fb_info *info)
416 if (var->vmode & FB_VMODE_YWRAP) {
417 if (var->yoffset < 0 ||
418 var->yoffset >= info->var.yres_virtual ||
419 var->xoffset)
420 return -EINVAL;
421 } else {
422 if (var->xoffset + var->xres > info->var.xres_virtual
423 || var->yoffset + var->yres > info->var.yres_virtual
424 || var->yoffset % 8)
425 return -EINVAL;
428 hga_pan(var->xoffset, var->yoffset);
429 return 0;
433 * hgafb_blank - (un)blank the screen
434 * @blank_mode:blanking method to use
435 * @info:unused
437 * Blank the screen if blank_mode != 0, else unblank.
438 * Implements VESA suspend and powerdown modes on hardware that supports
439 * disabling hsync/vsync:
440 * @blank_mode == 2 means suspend vsync,
441 * @blank_mode == 3 means suspend hsync,
442 * @blank_mode == 4 means powerdown.
445 static int hgafb_blank(int blank_mode, struct fb_info *info)
447 hga_blank(blank_mode);
448 return 0;
452 * Accel functions
454 #ifdef CONFIG_FB_HGA_ACCEL
455 static void hgafb_fillrect(struct fb_info *info, const struct fb_fillrect *rect)
457 u_int rows, y;
458 u8 __iomem *dest;
460 y = rect->dy;
462 for (rows = rect->height; rows--; y++) {
463 dest = rowaddr(info, y) + (rect->dx >> 3);
464 switch (rect->rop) {
465 case ROP_COPY:
466 //fb_memset(dest, rect->color, (rect->width >> 3));
467 break;
468 case ROP_XOR:
469 fb_writeb(~(fb_readb(dest)), dest);
470 break;
475 static void hgafb_copyarea(struct fb_info *info, const struct fb_copyarea *area)
477 u_int rows, y1, y2;
478 u8 __iomem *src;
479 u8 __iomem *dest;
481 if (area->dy <= area->sy) {
482 y1 = area->sy;
483 y2 = area->dy;
485 for (rows = area->height; rows--; ) {
486 src = rowaddr(info, y1) + (area->sx >> 3);
487 dest = rowaddr(info, y2) + (area->dx >> 3);
488 //fb_memmove(dest, src, (area->width >> 3));
489 y1++;
490 y2++;
492 } else {
493 y1 = area->sy + area->height - 1;
494 y2 = area->dy + area->height - 1;
496 for (rows = area->height; rows--;) {
497 src = rowaddr(info, y1) + (area->sx >> 3);
498 dest = rowaddr(info, y2) + (area->dx >> 3);
499 //fb_memmove(dest, src, (area->width >> 3));
500 y1--;
501 y2--;
506 static void hgafb_imageblit(struct fb_info *info, const struct fb_image *image)
508 u8 __iomem *dest;
509 u8 *cdat = (u8 *) image->data;
510 u_int rows, y = image->dy;
511 u8 d;
513 for (rows = image->height; rows--; y++) {
514 d = *cdat++;
515 dest = rowaddr(info, y) + (image->dx >> 3);
516 fb_writeb(d, dest);
519 #else /* !CONFIG_FB_HGA_ACCEL */
520 #define hgafb_fillrect cfb_fillrect
521 #define hgafb_copyarea cfb_copyarea
522 #define hgafb_imageblit cfb_imageblit
523 #endif /* CONFIG_FB_HGA_ACCEL */
526 static struct fb_ops hgafb_ops = {
527 .owner = THIS_MODULE,
528 .fb_open = hgafb_open,
529 .fb_release = hgafb_release,
530 .fb_setcolreg = hgafb_setcolreg,
531 .fb_pan_display = hgafb_pan_display,
532 .fb_blank = hgafb_blank,
533 .fb_fillrect = hgafb_fillrect,
534 .fb_copyarea = hgafb_copyarea,
535 .fb_imageblit = hgafb_imageblit,
538 /* ------------------------------------------------------------------------- *
540 * Functions in fb_info
542 * ------------------------------------------------------------------------- */
544 /* ------------------------------------------------------------------------- */
547 * Initialization
550 static int __init hgafb_probe(struct device *device)
552 struct fb_info *info;
554 if (! hga_card_detect()) {
555 printk(KERN_INFO "hgafb: HGA card not detected.\n");
556 if (hga_vram)
557 iounmap(hga_vram);
558 return -EINVAL;
561 printk(KERN_INFO "hgafb: %s with %ldK of memory detected.\n",
562 hga_type_name, hga_vram_len/1024);
564 info = framebuffer_alloc(0, NULL);
565 if (!info) {
566 iounmap(hga_vram);
567 return -ENOMEM;
570 hga_fix.smem_start = (unsigned long)hga_vram;
571 hga_fix.smem_len = hga_vram_len;
573 info->flags = FBINFO_DEFAULT | FBINFO_HWACCEL_YPAN;
574 info->var = hga_default_var;
575 info->fix = hga_fix;
576 info->monspecs.hfmin = 0;
577 info->monspecs.hfmax = 0;
578 info->monspecs.vfmin = 10000;
579 info->monspecs.vfmax = 10000;
580 info->monspecs.dpms = 0;
581 info->fbops = &hgafb_ops;
582 info->screen_base = hga_vram;
584 if (register_framebuffer(info) < 0) {
585 framebuffer_release(info);
586 iounmap(hga_vram);
587 return -EINVAL;
590 printk(KERN_INFO "fb%d: %s frame buffer device\n",
591 info->node, info->fix.id);
592 dev_set_drvdata(device, info);
593 return 0;
596 static int hgafb_remove(struct device *device)
598 struct fb_info *info = dev_get_drvdata(device);
600 hga_txt_mode();
601 hga_clear_screen();
603 if (info) {
604 unregister_framebuffer(info);
605 framebuffer_release(info);
608 iounmap(hga_vram);
610 if (release_io_ports)
611 release_region(0x3b0, 12);
613 if (release_io_port)
614 release_region(0x3bf, 1);
616 return 0;
619 static struct device_driver hgafb_driver = {
620 .name = "hgafb",
621 .bus = &platform_bus_type,
622 .probe = hgafb_probe,
623 .remove = hgafb_remove,
626 static struct platform_device hgafb_device = {
627 .name = "hgafb",
630 static int __init hgafb_init(void)
632 int ret;
634 if (fb_get_options("hgafb", NULL))
635 return -ENODEV;
637 ret = driver_register(&hgafb_driver);
639 if (!ret) {
640 ret = platform_device_register(&hgafb_device);
641 if (ret)
642 driver_unregister(&hgafb_driver);
645 return ret;
648 static void __exit hgafb_exit(void)
650 platform_device_unregister(&hgafb_device);
651 driver_unregister(&hgafb_driver);
654 /* -------------------------------------------------------------------------
656 * Modularization
658 * ------------------------------------------------------------------------- */
660 MODULE_AUTHOR("Ferenc Bakonyi (fero@drama.obuda.kando.hu)");
661 MODULE_DESCRIPTION("FBDev driver for Hercules Graphics Adaptor");
662 MODULE_LICENSE("GPL");
664 module_param(nologo, bool, 0);
665 MODULE_PARM_DESC(nologo, "Disables startup logo if != 0 (default=0)");
666 module_init(hgafb_init);
667 module_exit(hgafb_exit);