KVM: Add support for in-kernel PIC emulation
[linux-2.6] / drivers / video / bw2.c
1 /* bw2.c: BWTWO frame buffer driver
2  *
3  * Copyright (C) 2003, 2006 David S. Miller (davem@davemloft.net)
4  * Copyright (C) 1996,1998 Jakub Jelinek (jj@ultra.linux.cz)
5  * Copyright (C) 1996 Miguel de Icaza (miguel@nuclecu.unam.mx)
6  * Copyright (C) 1997 Eddie C. Dost (ecd@skynet.be)
7  *
8  * Driver layout based loosely on tgafb.c, see that file for credits.
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/slab.h>
16 #include <linux/delay.h>
17 #include <linux/init.h>
18 #include <linux/fb.h>
19 #include <linux/mm.h>
20
21 #include <asm/io.h>
22 #include <asm/oplib.h>
23 #include <asm/prom.h>
24 #include <asm/of_device.h>
25 #include <asm/fbio.h>
26
27 #include "sbuslib.h"
28
29 /*
30  * Local functions.
31  */
32
33 static int bw2_blank(int, struct fb_info *);
34
35 static int bw2_mmap(struct fb_info *, struct vm_area_struct *);
36 static int bw2_ioctl(struct fb_info *, unsigned int, unsigned long);
37
38 /*
39  *  Frame buffer operations
40  */
41
42 static struct fb_ops bw2_ops = {
43         .owner                  = THIS_MODULE,
44         .fb_blank               = bw2_blank,
45         .fb_fillrect            = cfb_fillrect,
46         .fb_copyarea            = cfb_copyarea,
47         .fb_imageblit           = cfb_imageblit,
48         .fb_mmap                = bw2_mmap,
49         .fb_ioctl               = bw2_ioctl,
50 #ifdef CONFIG_COMPAT
51         .fb_compat_ioctl        = sbusfb_compat_ioctl,
52 #endif
53 };
54
55 /* OBio addresses for the bwtwo registers */
56 #define BWTWO_REGISTER_OFFSET 0x400000
57
58 struct bt_regs {
59         u32 addr;
60         u32 color_map;
61         u32 control;
62         u32 cursor;
63 };
64
65 struct bw2_regs {
66         struct bt_regs  cmap;
67         u8      control;
68         u8      status;
69         u8      cursor_start;
70         u8      cursor_end;
71         u8      h_blank_start;
72         u8      h_blank_end;
73         u8      h_sync_start;
74         u8      h_sync_end;
75         u8      comp_sync_end;
76         u8      v_blank_start_high;
77         u8      v_blank_start_low;
78         u8      v_blank_end;
79         u8      v_sync_start;
80         u8      v_sync_end;
81         u8      xfer_holdoff_start;
82         u8      xfer_holdoff_end;
83 };
84
85 /* Status Register Constants */
86 #define BWTWO_SR_RES_MASK       0x70
87 #define BWTWO_SR_1600_1280      0x50
88 #define BWTWO_SR_1152_900_76_A  0x40
89 #define BWTWO_SR_1152_900_76_B  0x60
90 #define BWTWO_SR_ID_MASK        0x0f
91 #define BWTWO_SR_ID_MONO        0x02
92 #define BWTWO_SR_ID_MONO_ECL    0x03
93 #define BWTWO_SR_ID_MSYNC       0x04
94 #define BWTWO_SR_ID_NOCONN      0x0a
95
96 /* Control Register Constants */
97 #define BWTWO_CTL_ENABLE_INTS   0x80
98 #define BWTWO_CTL_ENABLE_VIDEO  0x40
99 #define BWTWO_CTL_ENABLE_TIMING 0x20
100 #define BWTWO_CTL_ENABLE_CURCMP 0x10
101 #define BWTWO_CTL_XTAL_MASK     0x0C
102 #define BWTWO_CTL_DIVISOR_MASK  0x03
103
104 /* Status Register Constants */
105 #define BWTWO_STAT_PENDING_INT  0x80
106 #define BWTWO_STAT_MSENSE_MASK  0x70
107 #define BWTWO_STAT_ID_MASK      0x0f
108
109 struct bw2_par {
110         spinlock_t              lock;
111         struct bw2_regs         __iomem *regs;
112
113         u32                     flags;
114 #define BW2_FLAG_BLANKED        0x00000001
115
116         unsigned long           physbase;
117         unsigned long           which_io;
118         unsigned long           fbsize;
119 };
120
121 /**
122  *      bw2_blank - Optional function.  Blanks the display.
123  *      @blank_mode: the blank mode we want.
124  *      @info: frame buffer structure that represents a single frame buffer
125  */
126 static int
127 bw2_blank(int blank, struct fb_info *info)
128 {
129         struct bw2_par *par = (struct bw2_par *) info->par;
130         struct bw2_regs __iomem *regs = par->regs;
131         unsigned long flags;
132         u8 val;
133
134         spin_lock_irqsave(&par->lock, flags);
135
136         switch (blank) {
137         case FB_BLANK_UNBLANK: /* Unblanking */
138                 val = sbus_readb(&regs->control);
139                 val |= BWTWO_CTL_ENABLE_VIDEO;
140                 sbus_writeb(val, &regs->control);
141                 par->flags &= ~BW2_FLAG_BLANKED;
142                 break;
143
144         case FB_BLANK_NORMAL: /* Normal blanking */
145         case FB_BLANK_VSYNC_SUSPEND: /* VESA blank (vsync off) */
146         case FB_BLANK_HSYNC_SUSPEND: /* VESA blank (hsync off) */
147         case FB_BLANK_POWERDOWN: /* Poweroff */
148                 val = sbus_readb(&regs->control);
149                 val &= ~BWTWO_CTL_ENABLE_VIDEO;
150                 sbus_writeb(val, &regs->control);
151                 par->flags |= BW2_FLAG_BLANKED;
152                 break;
153         }
154
155         spin_unlock_irqrestore(&par->lock, flags);
156
157         return 0;
158 }
159
160 static struct sbus_mmap_map bw2_mmap_map[] = {
161         {
162                 .size = SBUS_MMAP_FBSIZE(1)
163         },
164         { .size = 0 }
165 };
166
167 static int bw2_mmap(struct fb_info *info, struct vm_area_struct *vma)
168 {
169         struct bw2_par *par = (struct bw2_par *)info->par;
170
171         return sbusfb_mmap_helper(bw2_mmap_map,
172                                   par->physbase, par->fbsize,
173                                   par->which_io,
174                                   vma);
175 }
176
177 static int bw2_ioctl(struct fb_info *info, unsigned int cmd, unsigned long arg)
178 {
179         struct bw2_par *par = (struct bw2_par *) info->par;
180
181         return sbusfb_ioctl_helper(cmd, arg, info,
182                                    FBTYPE_SUN2BW, 1, par->fbsize);
183 }
184
185 /*
186  *  Initialisation
187  */
188
189 static void __devinit bw2_init_fix(struct fb_info *info, int linebytes)
190 {
191         strlcpy(info->fix.id, "bwtwo", sizeof(info->fix.id));
192
193         info->fix.type = FB_TYPE_PACKED_PIXELS;
194         info->fix.visual = FB_VISUAL_MONO01;
195
196         info->fix.line_length = linebytes;
197
198         info->fix.accel = FB_ACCEL_SUN_BWTWO;
199 }
200
201 static u8 bw2regs_1600[] __devinitdata = {
202         0x14, 0x8b,     0x15, 0x28,     0x16, 0x03,     0x17, 0x13,
203         0x18, 0x7b,     0x19, 0x05,     0x1a, 0x34,     0x1b, 0x2e,
204         0x1c, 0x00,     0x1d, 0x0a,     0x1e, 0xff,     0x1f, 0x01,
205         0x10, 0x21,     0
206 };
207
208 static u8 bw2regs_ecl[] __devinitdata = {
209         0x14, 0x65,     0x15, 0x1e,     0x16, 0x04,     0x17, 0x0c,
210         0x18, 0x5e,     0x19, 0x03,     0x1a, 0xa7,     0x1b, 0x23,
211         0x1c, 0x00,     0x1d, 0x08,     0x1e, 0xff,     0x1f, 0x01,
212         0x10, 0x20,     0
213 };
214
215 static u8 bw2regs_analog[] __devinitdata = {
216         0x14, 0xbb,     0x15, 0x2b,     0x16, 0x03,     0x17, 0x13,
217         0x18, 0xb0,     0x19, 0x03,     0x1a, 0xa6,     0x1b, 0x22,
218         0x1c, 0x01,     0x1d, 0x05,     0x1e, 0xff,     0x1f, 0x01,
219         0x10, 0x20,     0
220 };
221
222 static u8 bw2regs_76hz[] __devinitdata = {
223         0x14, 0xb7,     0x15, 0x27,     0x16, 0x03,     0x17, 0x0f,
224         0x18, 0xae,     0x19, 0x03,     0x1a, 0xae,     0x1b, 0x2a,
225         0x1c, 0x01,     0x1d, 0x09,     0x1e, 0xff,     0x1f, 0x01,
226         0x10, 0x24,     0
227 };
228
229 static u8 bw2regs_66hz[] __devinitdata = {
230         0x14, 0xbb,     0x15, 0x2b,     0x16, 0x04,     0x17, 0x14,
231         0x18, 0xae,     0x19, 0x03,     0x1a, 0xa8,     0x1b, 0x24,
232         0x1c, 0x01,     0x1d, 0x05,     0x1e, 0xff,     0x1f, 0x01,
233         0x10, 0x20,     0
234 };
235
236 static int __devinit bw2_do_default_mode(struct bw2_par *par,
237                                          struct fb_info *info,
238                                          int *linebytes)
239 {
240         u8 status, mon;
241         u8 *p;
242
243         status = sbus_readb(&par->regs->status);
244         mon = status & BWTWO_SR_RES_MASK;
245         switch (status & BWTWO_SR_ID_MASK) {
246         case BWTWO_SR_ID_MONO_ECL:
247                 if (mon == BWTWO_SR_1600_1280) {
248                         p = bw2regs_1600;
249                         info->var.xres = info->var.xres_virtual = 1600;
250                         info->var.yres = info->var.yres_virtual = 1280;
251                         *linebytes = 1600 / 8;
252                 } else
253                         p = bw2regs_ecl;
254                 break;
255
256         case BWTWO_SR_ID_MONO:
257                 p = bw2regs_analog;
258                 break;
259
260         case BWTWO_SR_ID_MSYNC:
261                 if (mon == BWTWO_SR_1152_900_76_A ||
262                     mon == BWTWO_SR_1152_900_76_B)
263                         p = bw2regs_76hz;
264                 else
265                         p = bw2regs_66hz;
266                 break;
267
268         case BWTWO_SR_ID_NOCONN:
269                 return 0;
270
271         default:
272                 printk(KERN_ERR "bw2: can't handle SR %02x\n",
273                        status);
274                 return -EINVAL;
275         }
276         for ( ; *p; p += 2) {
277                 u8 __iomem *regp = &((u8 __iomem *)par->regs)[p[0]];
278                 sbus_writeb(p[1], regp);
279         }
280         return 0;
281 }
282
283 static int __devinit bw2_probe(struct of_device *op, const struct of_device_id *match)
284 {
285         struct device_node *dp = op->node;
286         struct fb_info *info;
287         struct bw2_par *par;
288         int linebytes, err;
289
290         info = framebuffer_alloc(sizeof(struct bw2_par), &op->dev);
291
292         err = -ENOMEM;
293         if (!info)
294                 goto out_err;
295         par = info->par;
296
297         spin_lock_init(&par->lock);
298
299         par->physbase = op->resource[0].start;
300         par->which_io = op->resource[0].flags & IORESOURCE_BITS;
301
302         sbusfb_fill_var(&info->var, dp->node, 1);
303         linebytes = of_getintprop_default(dp, "linebytes",
304                                           info->var.xres);
305
306         info->var.red.length = info->var.green.length =
307                 info->var.blue.length = info->var.bits_per_pixel;
308         info->var.red.offset = info->var.green.offset =
309                 info->var.blue.offset = 0;
310
311         par->regs = of_ioremap(&op->resource[0], BWTWO_REGISTER_OFFSET,
312                                sizeof(struct bw2_regs), "bw2 regs");
313         if (!par->regs)
314                 goto out_release_fb;
315
316         if (!of_find_property(dp, "width", NULL)) {
317                 err = bw2_do_default_mode(par, info, &linebytes);
318                 if (err)
319                         goto out_unmap_regs;
320         }
321
322         par->fbsize = PAGE_ALIGN(linebytes * info->var.yres);
323
324         info->flags = FBINFO_DEFAULT;
325         info->fbops = &bw2_ops;
326
327         info->screen_base = of_ioremap(&op->resource[0], 0,
328                                        par->fbsize, "bw2 ram");
329         if (!info->screen_base)
330                 goto out_unmap_regs;
331
332         bw2_blank(0, info);
333
334         bw2_init_fix(info, linebytes);
335
336         err = register_framebuffer(info);
337         if (err < 0)
338                 goto out_unmap_screen;
339
340         dev_set_drvdata(&op->dev, info);
341
342         printk("%s: bwtwo at %lx:%lx\n",
343                dp->full_name, par->which_io, par->physbase);
344
345         return 0;
346
347 out_unmap_screen:
348         of_iounmap(&op->resource[0], info->screen_base, par->fbsize);
349
350 out_unmap_regs:
351         of_iounmap(&op->resource[0], par->regs, sizeof(struct bw2_regs));
352
353 out_release_fb:
354         framebuffer_release(info);
355
356 out_err:
357         return err;
358 }
359
360 static int __devexit bw2_remove(struct of_device *op)
361 {
362         struct fb_info *info = dev_get_drvdata(&op->dev);
363         struct bw2_par *par = info->par;
364
365         unregister_framebuffer(info);
366
367         of_iounmap(&op->resource[0], par->regs, sizeof(struct bw2_regs));
368         of_iounmap(&op->resource[0], info->screen_base, par->fbsize);
369
370         framebuffer_release(info);
371
372         dev_set_drvdata(&op->dev, NULL);
373
374         return 0;
375 }
376
377 static struct of_device_id bw2_match[] = {
378         {
379                 .name = "bwtwo",
380         },
381         {},
382 };
383 MODULE_DEVICE_TABLE(of, bw2_match);
384
385 static struct of_platform_driver bw2_driver = {
386         .name           = "bw2",
387         .match_table    = bw2_match,
388         .probe          = bw2_probe,
389         .remove         = __devexit_p(bw2_remove),
390 };
391
392 static int __init bw2_init(void)
393 {
394         if (fb_get_options("bw2fb", NULL))
395                 return -ENODEV;
396
397         return of_register_driver(&bw2_driver, &of_bus_type);
398 }
399
400 static void __exit bw2_exit(void)
401 {
402         return of_unregister_driver(&bw2_driver);
403 }
404
405
406 module_init(bw2_init);
407 module_exit(bw2_exit);
408
409 MODULE_DESCRIPTION("framebuffer driver for BWTWO chipsets");
410 MODULE_AUTHOR("David S. Miller <davem@davemloft.net>");
411 MODULE_VERSION("2.0");
412 MODULE_LICENSE("GPL");