Merge git://git.kernel.org/pub/scm/linux/kernel/git/jejb/scsi-misc-2.6
[linux-2.6] / drivers / video / tcx.c
1 /* tcx.c: TCX 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) 1996 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 #include <linux/of_device.h>
21
22 #include <asm/io.h>
23 #include <asm/fbio.h>
24
25 #include "sbuslib.h"
26
27 /*
28  * Local functions.
29  */
30
31 static int tcx_setcolreg(unsigned, unsigned, unsigned, unsigned,
32                          unsigned, struct fb_info *);
33 static int tcx_blank(int, struct fb_info *);
34
35 static int tcx_mmap(struct fb_info *, struct vm_area_struct *);
36 static int tcx_ioctl(struct fb_info *, unsigned int, unsigned long);
37 static int tcx_pan_display(struct fb_var_screeninfo *, struct fb_info *);
38
39 /*
40  *  Frame buffer operations
41  */
42
43 static struct fb_ops tcx_ops = {
44         .owner                  = THIS_MODULE,
45         .fb_setcolreg           = tcx_setcolreg,
46         .fb_blank               = tcx_blank,
47         .fb_pan_display         = tcx_pan_display,
48         .fb_fillrect            = cfb_fillrect,
49         .fb_copyarea            = cfb_copyarea,
50         .fb_imageblit           = cfb_imageblit,
51         .fb_mmap                = tcx_mmap,
52         .fb_ioctl               = tcx_ioctl,
53 #ifdef CONFIG_COMPAT
54         .fb_compat_ioctl        = sbusfb_compat_ioctl,
55 #endif
56 };
57
58 /* THC definitions */
59 #define TCX_THC_MISC_REV_SHIFT       16
60 #define TCX_THC_MISC_REV_MASK        15
61 #define TCX_THC_MISC_VSYNC_DIS       (1 << 25)
62 #define TCX_THC_MISC_HSYNC_DIS       (1 << 24)
63 #define TCX_THC_MISC_RESET           (1 << 12)
64 #define TCX_THC_MISC_VIDEO           (1 << 10)
65 #define TCX_THC_MISC_SYNC            (1 << 9)
66 #define TCX_THC_MISC_VSYNC           (1 << 8)
67 #define TCX_THC_MISC_SYNC_ENAB       (1 << 7)
68 #define TCX_THC_MISC_CURS_RES        (1 << 6)
69 #define TCX_THC_MISC_INT_ENAB        (1 << 5)
70 #define TCX_THC_MISC_INT             (1 << 4)
71 #define TCX_THC_MISC_INIT            0x9f
72 #define TCX_THC_REV_REV_SHIFT        20
73 #define TCX_THC_REV_REV_MASK         15
74 #define TCX_THC_REV_MINREV_SHIFT     28
75 #define TCX_THC_REV_MINREV_MASK      15
76
77 /* The contents are unknown */
78 struct tcx_tec {
79         u32 tec_matrix;
80         u32 tec_clip;
81         u32 tec_vdc;
82 };
83
84 struct tcx_thc {
85         u32 thc_rev;
86         u32 thc_pad0[511];
87         u32 thc_hs;             /* hsync timing */
88         u32 thc_hsdvs;
89         u32 thc_hd;
90         u32 thc_vs;             /* vsync timing */
91         u32 thc_vd;
92         u32 thc_refresh;
93         u32 thc_misc;
94         u32 thc_pad1[56];
95         u32 thc_cursxy; /* cursor x,y position (16 bits each) */
96         u32 thc_cursmask[32];   /* cursor mask bits */
97         u32 thc_cursbits[32];   /* what to show where mask enabled */
98 };
99
100 struct bt_regs {
101         u32 addr;
102         u32 color_map;
103         u32 control;
104         u32 cursor;
105 };
106
107 #define TCX_MMAP_ENTRIES 14
108
109 struct tcx_par {
110         spinlock_t              lock;
111         struct bt_regs          __iomem *bt;
112         struct tcx_thc          __iomem *thc;
113         struct tcx_tec          __iomem *tec;
114         u32                     __iomem *cplane;
115
116         u32                     flags;
117 #define TCX_FLAG_BLANKED        0x00000001
118
119         unsigned long           physbase;
120         unsigned long           which_io;
121         unsigned long           fbsize;
122
123         struct sbus_mmap_map    mmap_map[TCX_MMAP_ENTRIES];
124         int                     lowdepth;
125 };
126
127 /* Reset control plane so that WID is 8-bit plane. */
128 static void __tcx_set_control_plane(struct tcx_par *par)
129 {
130         u32 __iomem *p, *pend;
131
132         if (par->lowdepth)
133                 return;
134
135         p = par->cplane;
136         if (p == NULL)
137                 return;
138         for (pend = p + par->fbsize; p < pend; p++) {
139                 u32 tmp = sbus_readl(p);
140
141                 tmp &= 0xffffff;
142                 sbus_writel(tmp, p);
143         }
144 }
145
146 static void tcx_reset(struct fb_info *info)
147 {
148         struct tcx_par *par = (struct tcx_par *) info->par;
149         unsigned long flags;
150
151         spin_lock_irqsave(&par->lock, flags);
152         __tcx_set_control_plane(par);
153         spin_unlock_irqrestore(&par->lock, flags);
154 }
155
156 static int tcx_pan_display(struct fb_var_screeninfo *var, struct fb_info *info)
157 {
158         tcx_reset(info);
159         return 0;
160 }
161
162 /**
163  *      tcx_setcolreg - Optional function. Sets a color register.
164  *      @regno: boolean, 0 copy local, 1 get_user() function
165  *      @red: frame buffer colormap structure
166  *      @green: The green value which can be up to 16 bits wide
167  *      @blue:  The blue value which can be up to 16 bits wide.
168  *      @transp: If supported the alpha value which can be up to 16 bits wide.
169  *      @info: frame buffer info structure
170  */
171 static int tcx_setcolreg(unsigned regno,
172                          unsigned red, unsigned green, unsigned blue,
173                          unsigned transp, struct fb_info *info)
174 {
175         struct tcx_par *par = (struct tcx_par *) info->par;
176         struct bt_regs __iomem *bt = par->bt;
177         unsigned long flags;
178
179         if (regno >= 256)
180                 return 1;
181
182         red >>= 8;
183         green >>= 8;
184         blue >>= 8;
185
186         spin_lock_irqsave(&par->lock, flags);
187
188         sbus_writel(regno << 24, &bt->addr);
189         sbus_writel(red << 24, &bt->color_map);
190         sbus_writel(green << 24, &bt->color_map);
191         sbus_writel(blue << 24, &bt->color_map);
192
193         spin_unlock_irqrestore(&par->lock, flags);
194
195         return 0;
196 }
197
198 /**
199  *      tcx_blank - Optional function.  Blanks the display.
200  *      @blank_mode: the blank mode we want.
201  *      @info: frame buffer structure that represents a single frame buffer
202  */
203 static int
204 tcx_blank(int blank, struct fb_info *info)
205 {
206         struct tcx_par *par = (struct tcx_par *) info->par;
207         struct tcx_thc __iomem *thc = par->thc;
208         unsigned long flags;
209         u32 val;
210
211         spin_lock_irqsave(&par->lock, flags);
212
213         val = sbus_readl(&thc->thc_misc);
214
215         switch (blank) {
216         case FB_BLANK_UNBLANK: /* Unblanking */
217                 val &= ~(TCX_THC_MISC_VSYNC_DIS |
218                          TCX_THC_MISC_HSYNC_DIS);
219                 val |= TCX_THC_MISC_VIDEO;
220                 par->flags &= ~TCX_FLAG_BLANKED;
221                 break;
222
223         case FB_BLANK_NORMAL: /* Normal blanking */
224                 val &= ~TCX_THC_MISC_VIDEO;
225                 par->flags |= TCX_FLAG_BLANKED;
226                 break;
227
228         case FB_BLANK_VSYNC_SUSPEND: /* VESA blank (vsync off) */
229                 val |= TCX_THC_MISC_VSYNC_DIS;
230                 break;
231         case FB_BLANK_HSYNC_SUSPEND: /* VESA blank (hsync off) */
232                 val |= TCX_THC_MISC_HSYNC_DIS;
233                 break;
234
235         case FB_BLANK_POWERDOWN: /* Poweroff */
236                 break;
237         };
238
239         sbus_writel(val, &thc->thc_misc);
240
241         spin_unlock_irqrestore(&par->lock, flags);
242
243         return 0;
244 }
245
246 static struct sbus_mmap_map __tcx_mmap_map[TCX_MMAP_ENTRIES] = {
247         {
248                 .voff   = TCX_RAM8BIT,
249                 .size   = SBUS_MMAP_FBSIZE(1)
250         },
251         {
252                 .voff   = TCX_RAM24BIT,
253                 .size   = SBUS_MMAP_FBSIZE(4)
254         },
255         {
256                 .voff   = TCX_UNK3,
257                 .size   = SBUS_MMAP_FBSIZE(8)
258         },
259         {
260                 .voff   = TCX_UNK4,
261                 .size   = SBUS_MMAP_FBSIZE(8)
262         },
263         {
264                 .voff   = TCX_CONTROLPLANE,
265                 .size   = SBUS_MMAP_FBSIZE(4)
266         },
267         {
268                 .voff   = TCX_UNK6,
269                 .size   = SBUS_MMAP_FBSIZE(8)
270         },
271         {
272                 .voff   = TCX_UNK7,
273                 .size   = SBUS_MMAP_FBSIZE(8)
274         },
275         {
276                 .voff   = TCX_TEC,
277                 .size   = PAGE_SIZE
278         },
279         {
280                 .voff   = TCX_BTREGS,
281                 .size   = PAGE_SIZE
282         },
283         {
284                 .voff   = TCX_THC,
285                 .size   = PAGE_SIZE
286         },
287         {
288                 .voff   = TCX_DHC,
289                 .size   = PAGE_SIZE
290         },
291         {
292                 .voff   = TCX_ALT,
293                 .size   = PAGE_SIZE
294         },
295         {
296                 .voff   = TCX_UNK2,
297                 .size   = 0x20000
298         },
299         { .size = 0 }
300 };
301
302 static int tcx_mmap(struct fb_info *info, struct vm_area_struct *vma)
303 {
304         struct tcx_par *par = (struct tcx_par *)info->par;
305
306         return sbusfb_mmap_helper(par->mmap_map,
307                                   par->physbase, par->fbsize,
308                                   par->which_io, vma);
309 }
310
311 static int tcx_ioctl(struct fb_info *info, unsigned int cmd,
312                      unsigned long arg)
313 {
314         struct tcx_par *par = (struct tcx_par *) info->par;
315
316         return sbusfb_ioctl_helper(cmd, arg, info,
317                                    FBTYPE_TCXCOLOR,
318                                    (par->lowdepth ? 8 : 24),
319                                    par->fbsize);
320 }
321
322 /*
323  *  Initialisation
324  */
325
326 static void
327 tcx_init_fix(struct fb_info *info, int linebytes)
328 {
329         struct tcx_par *par = (struct tcx_par *)info->par;
330         const char *tcx_name;
331
332         if (par->lowdepth)
333                 tcx_name = "TCX8";
334         else
335                 tcx_name = "TCX24";
336
337         strlcpy(info->fix.id, tcx_name, sizeof(info->fix.id));
338
339         info->fix.type = FB_TYPE_PACKED_PIXELS;
340         info->fix.visual = FB_VISUAL_PSEUDOCOLOR;
341
342         info->fix.line_length = linebytes;
343
344         info->fix.accel = FB_ACCEL_SUN_TCX;
345 }
346
347 static void tcx_unmap_regs(struct of_device *op, struct fb_info *info,
348                            struct tcx_par *par)
349 {
350         if (par->tec)
351                 of_iounmap(&op->resource[7],
352                            par->tec, sizeof(struct tcx_tec));
353         if (par->thc)
354                 of_iounmap(&op->resource[9],
355                            par->thc, sizeof(struct tcx_thc));
356         if (par->bt)
357                 of_iounmap(&op->resource[8],
358                            par->bt, sizeof(struct bt_regs));
359         if (par->cplane)
360                 of_iounmap(&op->resource[4],
361                            par->cplane, par->fbsize * sizeof(u32));
362         if (info->screen_base)
363                 of_iounmap(&op->resource[0],
364                            info->screen_base, par->fbsize);
365 }
366
367 static int __devinit tcx_probe(struct of_device *op,
368                                const struct of_device_id *match)
369 {
370         struct device_node *dp = op->node;
371         struct fb_info *info;
372         struct tcx_par *par;
373         int linebytes, i, err;
374
375         info = framebuffer_alloc(sizeof(struct tcx_par), &op->dev);
376
377         err = -ENOMEM;
378         if (!info)
379                 goto out_err;
380         par = info->par;
381
382         spin_lock_init(&par->lock);
383
384         par->lowdepth =
385                 (of_find_property(dp, "tcx-8-bit", NULL) != NULL);
386
387         sbusfb_fill_var(&info->var, dp, 8);
388         info->var.red.length = 8;
389         info->var.green.length = 8;
390         info->var.blue.length = 8;
391
392         linebytes = of_getintprop_default(dp, "linebytes",
393                                           info->var.xres);
394         par->fbsize = PAGE_ALIGN(linebytes * info->var.yres);
395
396         par->tec = of_ioremap(&op->resource[7], 0,
397                                   sizeof(struct tcx_tec), "tcx tec");
398         par->thc = of_ioremap(&op->resource[9], 0,
399                                   sizeof(struct tcx_thc), "tcx thc");
400         par->bt = of_ioremap(&op->resource[8], 0,
401                                  sizeof(struct bt_regs), "tcx dac");
402         info->screen_base = of_ioremap(&op->resource[0], 0,
403                                            par->fbsize, "tcx ram");
404         if (!par->tec || !par->thc ||
405             !par->bt || !info->screen_base)
406                 goto out_unmap_regs;
407
408         memcpy(&par->mmap_map, &__tcx_mmap_map, sizeof(par->mmap_map));
409         if (!par->lowdepth) {
410                 par->cplane = of_ioremap(&op->resource[4], 0,
411                                              par->fbsize * sizeof(u32),
412                                              "tcx cplane");
413                 if (!par->cplane)
414                         goto out_unmap_regs;
415         } else {
416                 par->mmap_map[1].size = SBUS_MMAP_EMPTY;
417                 par->mmap_map[4].size = SBUS_MMAP_EMPTY;
418                 par->mmap_map[5].size = SBUS_MMAP_EMPTY;
419                 par->mmap_map[6].size = SBUS_MMAP_EMPTY;
420         }
421
422         par->physbase = op->resource[0].start;
423         par->which_io = op->resource[0].flags & IORESOURCE_BITS;
424
425         for (i = 0; i < TCX_MMAP_ENTRIES; i++) {
426                 int j;
427
428                 switch (i) {
429                 case 10:
430                         j = 12;
431                         break;
432
433                 case 11: case 12:
434                         j = i - 1;
435                         break;
436
437                 default:
438                         j = i;
439                         break;
440                 };
441                 par->mmap_map[i].poff = op->resource[j].start;
442         }
443
444         info->flags = FBINFO_DEFAULT;
445         info->fbops = &tcx_ops;
446
447         /* Initialize brooktree DAC. */
448         sbus_writel(0x04 << 24, &par->bt->addr);         /* color planes */
449         sbus_writel(0xff << 24, &par->bt->control);
450         sbus_writel(0x05 << 24, &par->bt->addr);
451         sbus_writel(0x00 << 24, &par->bt->control);
452         sbus_writel(0x06 << 24, &par->bt->addr);         /* overlay plane */
453         sbus_writel(0x73 << 24, &par->bt->control);
454         sbus_writel(0x07 << 24, &par->bt->addr);
455         sbus_writel(0x00 << 24, &par->bt->control);
456
457         tcx_reset(info);
458
459         tcx_blank(FB_BLANK_UNBLANK, info);
460
461         if (fb_alloc_cmap(&info->cmap, 256, 0))
462                 goto out_unmap_regs;
463
464         fb_set_cmap(&info->cmap, info);
465         tcx_init_fix(info, linebytes);
466
467         err = register_framebuffer(info);
468         if (err < 0)
469                 goto out_dealloc_cmap;
470
471         dev_set_drvdata(&op->dev, info);
472
473         printk(KERN_INFO "%s: TCX at %lx:%lx, %s\n",
474                dp->full_name,
475                par->which_io,
476                par->physbase,
477                par->lowdepth ? "8-bit only" : "24-bit depth");
478
479         return 0;
480
481 out_dealloc_cmap:
482         fb_dealloc_cmap(&info->cmap);
483
484 out_unmap_regs:
485         tcx_unmap_regs(op, info, par);
486
487 out_err:
488         return err;
489 }
490
491 static int __devexit tcx_remove(struct of_device *op)
492 {
493         struct fb_info *info = dev_get_drvdata(&op->dev);
494         struct tcx_par *par = info->par;
495
496         unregister_framebuffer(info);
497         fb_dealloc_cmap(&info->cmap);
498
499         tcx_unmap_regs(op, info, par);
500
501         framebuffer_release(info);
502
503         dev_set_drvdata(&op->dev, NULL);
504
505         return 0;
506 }
507
508 static const struct of_device_id tcx_match[] = {
509         {
510                 .name = "SUNW,tcx",
511         },
512         {},
513 };
514 MODULE_DEVICE_TABLE(of, tcx_match);
515
516 static struct of_platform_driver tcx_driver = {
517         .name           = "tcx",
518         .match_table    = tcx_match,
519         .probe          = tcx_probe,
520         .remove         = __devexit_p(tcx_remove),
521 };
522
523 static int __init tcx_init(void)
524 {
525         if (fb_get_options("tcxfb", NULL))
526                 return -ENODEV;
527
528         return of_register_driver(&tcx_driver, &of_bus_type);
529 }
530
531 static void __exit tcx_exit(void)
532 {
533         of_unregister_driver(&tcx_driver);
534 }
535
536 module_init(tcx_init);
537 module_exit(tcx_exit);
538
539 MODULE_DESCRIPTION("framebuffer driver for TCX chipsets");
540 MODULE_AUTHOR("David S. Miller <davem@davemloft.net>");
541 MODULE_VERSION("2.0");
542 MODULE_LICENSE("GPL");