1 /*
2 * linux/drivers/video/pmagb-b-fb.c
3 *
4 * PMAGB-B TURBOchannel Smart Frame Buffer (SFB) card support,
5 * derived from:
6 * "HP300 Topcat framebuffer support (derived from macfb of all things)
7 * Phil Blundell <philb@gnu.org> 1998", the original code can be
8 * found in the file hpfb.c in the same directory.
9 *
10 * DECstation related code Copyright (C) 1999, 2000, 2001 by
11 * Michael Engel <engel@unix-ag.org>,
12 * Karsten Merker <merker@linuxtag.org> and
13 * Harald Koerfgen.
14 * Copyright (c) 2005, 2006 Maciej W. Rozycki
15 *
16 * This file is subject to the terms and conditions of the GNU General
17 * Public License. See the file COPYING in the main directory of this
18 * archive for more details.
19 */
20
21 #include <linux/compiler.h>
22 #include <linux/delay.h>
23 #include <linux/errno.h>
24 #include <linux/fb.h>
25 #include <linux/init.h>
26 #include <linux/kernel.h>
27 #include <linux/module.h>
28 #include <linux/tc.h>
29 #include <linux/types.h>
30
31 #include <asm/io.h>
32 #include <asm/system.h>
33
34 #include <video/pmagb-b-fb.h>
35
36
37 struct pmagbbfb_par {
38 volatile void __iomem *mmio;
39 volatile void __iomem *smem;
40 volatile u32 __iomem *sfb;
41 volatile u32 __iomem *dac;
42 unsigned int osc0;
43 unsigned int osc1;
44 int slot;
45 };
46
47
48 static struct fb_var_screeninfo pmagbbfb_defined __devinitdata = {
49 .bits_per_pixel = 8,
50 .red.length = 8,
51 .green.length = 8,
52 .blue.length = 8,
53 .activate = FB_ACTIVATE_NOW,
54 .height = -1,
55 .width = -1,
56 .accel_flags = FB_ACCEL_NONE,
57 .sync = FB_SYNC_ON_GREEN,
58 .vmode = FB_VMODE_NONINTERLACED,
59 };
60
61 static struct fb_fix_screeninfo pmagbbfb_fix __devinitdata = {
62 .id = "PMAGB-BA",
63 .smem_len = (2048 * 1024),
64 .type = FB_TYPE_PACKED_PIXELS,
65 .visual = FB_VISUAL_PSEUDOCOLOR,
66 .mmio_len = PMAGB_B_FBMEM,
67 };
68
69
sfb_write(struct pmagbbfb_par * par,unsigned int reg,u32 v)70 static inline void sfb_write(struct pmagbbfb_par *par, unsigned int reg, u32 v)
71 {
72 writel(v, par->sfb + reg / 4);
73 }
74
sfb_read(struct pmagbbfb_par * par,unsigned int reg)75 static inline u32 sfb_read(struct pmagbbfb_par *par, unsigned int reg)
76 {
77 return readl(par->sfb + reg / 4);
78 }
79
dac_write(struct pmagbbfb_par * par,unsigned int reg,u8 v)80 static inline void dac_write(struct pmagbbfb_par *par, unsigned int reg, u8 v)
81 {
82 writeb(v, par->dac + reg / 4);
83 }
84
dac_read(struct pmagbbfb_par * par,unsigned int reg)85 static inline u8 dac_read(struct pmagbbfb_par *par, unsigned int reg)
86 {
87 return readb(par->dac + reg / 4);
88 }
89
gp0_write(struct pmagbbfb_par * par,u32 v)90 static inline void gp0_write(struct pmagbbfb_par *par, u32 v)
91 {
92 writel(v, par->mmio + PMAGB_B_GP0);
93 }
94
95
96 /*
97 * Set the palette.
98 */
pmagbbfb_setcolreg(unsigned int regno,unsigned int red,unsigned int green,unsigned int blue,unsigned int transp,struct fb_info * info)99 static int pmagbbfb_setcolreg(unsigned int regno, unsigned int red,
100 unsigned int green, unsigned int blue,
101 unsigned int transp, struct fb_info *info)
102 {
103 struct pmagbbfb_par *par = info->par;
104
105 if (regno >= info->cmap.len)
106 return 1;
107
108 red >>= 8; /* The cmap fields are 16 bits */
109 green >>= 8; /* wide, but the hardware colormap */
110 blue >>= 8; /* registers are only 8 bits wide */
111
112 mb();
113 dac_write(par, BT459_ADDR_LO, regno);
114 dac_write(par, BT459_ADDR_HI, 0x00);
115 wmb();
116 dac_write(par, BT459_CMAP, red);
117 wmb();
118 dac_write(par, BT459_CMAP, green);
119 wmb();
120 dac_write(par, BT459_CMAP, blue);
121
122 return 0;
123 }
124
125 static struct fb_ops pmagbbfb_ops = {
126 .owner = THIS_MODULE,
127 .fb_setcolreg = pmagbbfb_setcolreg,
128 .fb_fillrect = cfb_fillrect,
129 .fb_copyarea = cfb_copyarea,
130 .fb_imageblit = cfb_imageblit,
131 };
132
133
134 /*
135 * Turn the hardware cursor off.
136 */
pmagbbfb_erase_cursor(struct fb_info * info)137 static void __init pmagbbfb_erase_cursor(struct fb_info *info)
138 {
139 struct pmagbbfb_par *par = info->par;
140
141 mb();
142 dac_write(par, BT459_ADDR_LO, 0x00);
143 dac_write(par, BT459_ADDR_HI, 0x03);
144 wmb();
145 dac_write(par, BT459_DATA, 0x00);
146 }
147
148 /*
149 * Set up screen parameters.
150 */
pmagbbfb_screen_setup(struct fb_info * info)151 static void __devinit pmagbbfb_screen_setup(struct fb_info *info)
152 {
153 struct pmagbbfb_par *par = info->par;
154
155 info->var.xres = ((sfb_read(par, SFB_REG_VID_HOR) >>
156 SFB_VID_HOR_PIX_SHIFT) & SFB_VID_HOR_PIX_MASK) * 4;
157 info->var.xres_virtual = info->var.xres;
158 info->var.yres = (sfb_read(par, SFB_REG_VID_VER) >>
159 SFB_VID_VER_SL_SHIFT) & SFB_VID_VER_SL_MASK;
160 info->var.yres_virtual = info->var.yres;
161 info->var.left_margin = ((sfb_read(par, SFB_REG_VID_HOR) >>
162 SFB_VID_HOR_BP_SHIFT) &
163 SFB_VID_HOR_BP_MASK) * 4;
164 info->var.right_margin = ((sfb_read(par, SFB_REG_VID_HOR) >>
165 SFB_VID_HOR_FP_SHIFT) &
166 SFB_VID_HOR_FP_MASK) * 4;
167 info->var.upper_margin = (sfb_read(par, SFB_REG_VID_VER) >>
168 SFB_VID_VER_BP_SHIFT) & SFB_VID_VER_BP_MASK;
169 info->var.lower_margin = (sfb_read(par, SFB_REG_VID_VER) >>
170 SFB_VID_VER_FP_SHIFT) & SFB_VID_VER_FP_MASK;
171 info->var.hsync_len = ((sfb_read(par, SFB_REG_VID_HOR) >>
172 SFB_VID_HOR_SYN_SHIFT) &
173 SFB_VID_HOR_SYN_MASK) * 4;
174 info->var.vsync_len = (sfb_read(par, SFB_REG_VID_VER) >>
175 SFB_VID_VER_SYN_SHIFT) & SFB_VID_VER_SYN_MASK;
176
177 info->fix.line_length = info->var.xres;
178 };
179
180 /*
181 * Determine oscillator configuration.
182 */
pmagbbfb_osc_setup(struct fb_info * info)183 static void __devinit pmagbbfb_osc_setup(struct fb_info *info)
184 {
185 static unsigned int pmagbbfb_freqs[] __devinitdata = {
186 130808, 119843, 104000, 92980, 74370, 72800,
187 69197, 66000, 65000, 50350, 36000, 32000, 25175
188 };
189 struct pmagbbfb_par *par = info->par;
190 struct tc_bus *tbus = to_tc_dev(info->device)->bus;
191 u32 count0 = 8, count1 = 8, counttc = 16 * 256 + 8;
192 u32 freq0, freq1, freqtc = tc_get_speed(tbus) / 250;
193 int i, j;
194
195 gp0_write(par, 0); /* select Osc0 */
196 for (j = 0; j < 16; j++) {
197 mb();
198 sfb_write(par, SFB_REG_TCCLK_COUNT, 0);
199 mb();
200 for (i = 0; i < 100; i++) { /* nominally max. 20.5us */
201 if (sfb_read(par, SFB_REG_TCCLK_COUNT) == 0)
202 break;
203 udelay(1);
204 }
205 count0 += sfb_read(par, SFB_REG_VIDCLK_COUNT);
206 }
207
208 gp0_write(par, 1); /* select Osc1 */
209 for (j = 0; j < 16; j++) {
210 mb();
211 sfb_write(par, SFB_REG_TCCLK_COUNT, 0);
212
213 for (i = 0; i < 100; i++) { /* nominally max. 20.5us */
214 if (sfb_read(par, SFB_REG_TCCLK_COUNT) == 0)
215 break;
216 udelay(1);
217 }
218 count1 += sfb_read(par, SFB_REG_VIDCLK_COUNT);
219 }
220
221 freq0 = (freqtc * count0 + counttc / 2) / counttc;
222 par->osc0 = freq0;
223 if (freq0 >= pmagbbfb_freqs[0] - (pmagbbfb_freqs[0] + 32) / 64 &&
224 freq0 <= pmagbbfb_freqs[0] + (pmagbbfb_freqs[0] + 32) / 64)
225 par->osc0 = pmagbbfb_freqs[0];
226
227 freq1 = (par->osc0 * count1 + count0 / 2) / count0;
228 par->osc1 = freq1;
229 for (i = 0; i < ARRAY_SIZE(pmagbbfb_freqs); i++)
230 if (freq1 >= pmagbbfb_freqs[i] -
231 (pmagbbfb_freqs[i] + 128) / 256 &&
232 freq1 <= pmagbbfb_freqs[i] +
233 (pmagbbfb_freqs[i] + 128) / 256) {
234 par->osc1 = pmagbbfb_freqs[i];
235 break;
236 }
237
238 if (par->osc0 - par->osc1 <= (par->osc0 + par->osc1 + 256) / 512 ||
239 par->osc1 - par->osc0 <= (par->osc0 + par->osc1 + 256) / 512)
240 par->osc1 = 0;
241
242 gp0_write(par, par->osc1 != 0); /* reselect OscX */
243
244 info->var.pixclock = par->osc1 ?
245 (1000000000 + par->osc1 / 2) / par->osc1 :
246 (1000000000 + par->osc0 / 2) / par->osc0;
247 };
248
249
pmagbbfb_probe(struct device * dev)250 static int __devinit pmagbbfb_probe(struct device *dev)
251 {
252 struct tc_dev *tdev = to_tc_dev(dev);
253 resource_size_t start, len;
254 struct fb_info *info;
255 struct pmagbbfb_par *par;
256 char freq0[12], freq1[12];
257 u32 vid_base;
258 int err;
259
260 info = framebuffer_alloc(sizeof(struct pmagbbfb_par), dev);
261 if (!info) {
262 printk(KERN_ERR "%s: Cannot allocate memory\n", dev_name(dev));
263 return -ENOMEM;
264 }
265
266 par = info->par;
267 dev_set_drvdata(dev, info);
268
269 if (fb_alloc_cmap(&info->cmap, 256, 0) < 0) {
270 printk(KERN_ERR "%s: Cannot allocate color map\n",
271 dev_name(dev));
272 err = -ENOMEM;
273 goto err_alloc;
274 }
275
276 info->fbops = &pmagbbfb_ops;
277 info->fix = pmagbbfb_fix;
278 info->var = pmagbbfb_defined;
279 info->flags = FBINFO_DEFAULT;
280
281 /* Request the I/O MEM resource. */
282 start = tdev->resource.start;
283 len = tdev->resource.end - start + 1;
284 if (!request_mem_region(start, len, dev_name(dev))) {
285 printk(KERN_ERR "%s: Cannot reserve FB region\n",
286 dev_name(dev));
287 err = -EBUSY;
288 goto err_cmap;
289 }
290
291 /* MMIO mapping setup. */
292 info->fix.mmio_start = start;
293 par->mmio = ioremap_nocache(info->fix.mmio_start, info->fix.mmio_len);
294 if (!par->mmio) {
295 printk(KERN_ERR "%s: Cannot map MMIO\n", dev_name(dev));
296 err = -ENOMEM;
297 goto err_resource;
298 }
299 par->sfb = par->mmio + PMAGB_B_SFB;
300 par->dac = par->mmio + PMAGB_B_BT459;
301
302 /* Frame buffer mapping setup. */
303 info->fix.smem_start = start + PMAGB_B_FBMEM;
304 par->smem = ioremap_nocache(info->fix.smem_start, info->fix.smem_len);
305 if (!par->smem) {
306 printk(KERN_ERR "%s: Cannot map FB\n", dev_name(dev));
307 err = -ENOMEM;
308 goto err_mmio_map;
309 }
310 vid_base = sfb_read(par, SFB_REG_VID_BASE);
311 info->screen_base = (void __iomem *)par->smem + vid_base * 0x1000;
312 info->screen_size = info->fix.smem_len - 2 * vid_base * 0x1000;
313
314 pmagbbfb_erase_cursor(info);
315 pmagbbfb_screen_setup(info);
316 pmagbbfb_osc_setup(info);
317
318 err = register_framebuffer(info);
319 if (err < 0) {
320 printk(KERN_ERR "%s: Cannot register framebuffer\n",
321 dev_name(dev));
322 goto err_smem_map;
323 }
324
325 get_device(dev);
326
327 snprintf(freq0, sizeof(freq0), "%u.%03uMHz",
328 par->osc0 / 1000, par->osc0 % 1000);
329 snprintf(freq1, sizeof(freq1), "%u.%03uMHz",
330 par->osc1 / 1000, par->osc1 % 1000);
331
332 pr_info("fb%d: %s frame buffer device at %s\n",
333 info->node, info->fix.id, dev_name(dev));
334 pr_info("fb%d: Osc0: %s, Osc1: %s, Osc%u selected\n",
335 info->node, freq0, par->osc1 ? freq1 : "disabled",
336 par->osc1 != 0);
337
338 return 0;
339
340
341 err_smem_map:
342 iounmap(par->smem);
343
344 err_mmio_map:
345 iounmap(par->mmio);
346
347 err_resource:
348 release_mem_region(start, len);
349
350 err_cmap:
351 fb_dealloc_cmap(&info->cmap);
352
353 err_alloc:
354 framebuffer_release(info);
355 return err;
356 }
357
pmagbbfb_remove(struct device * dev)358 static int __exit pmagbbfb_remove(struct device *dev)
359 {
360 struct tc_dev *tdev = to_tc_dev(dev);
361 struct fb_info *info = dev_get_drvdata(dev);
362 struct pmagbbfb_par *par = info->par;
363 resource_size_t start, len;
364
365 put_device(dev);
366 unregister_framebuffer(info);
367 iounmap(par->smem);
368 iounmap(par->mmio);
369 start = tdev->resource.start;
370 len = tdev->resource.end - start + 1;
371 release_mem_region(start, len);
372 fb_dealloc_cmap(&info->cmap);
373 framebuffer_release(info);
374 return 0;
375 }
376
377
378 /*
379 * Initialize the framebuffer.
380 */
381 static const struct tc_device_id pmagbbfb_tc_table[] = {
382 { "DEC ", "PMAGB-BA" },
383 { }
384 };
385 MODULE_DEVICE_TABLE(tc, pmagbbfb_tc_table);
386
387 static struct tc_driver pmagbbfb_driver = {
388 .id_table = pmagbbfb_tc_table,
389 .driver = {
390 .name = "pmagbbfb",
391 .bus = &tc_bus_type,
392 .probe = pmagbbfb_probe,
393 .remove = __exit_p(pmagbbfb_remove),
394 },
395 };
396
pmagbbfb_init(void)397 static int __init pmagbbfb_init(void)
398 {
399 #ifndef MODULE
400 if (fb_get_options("pmagbbfb", NULL))
401 return -ENXIO;
402 #endif
403 return tc_register_driver(&pmagbbfb_driver);
404 }
405
pmagbbfb_exit(void)406 static void __exit pmagbbfb_exit(void)
407 {
408 tc_unregister_driver(&pmagbbfb_driver);
409 }
410
411
412 module_init(pmagbbfb_init);
413 module_exit(pmagbbfb_exit);
414
415 MODULE_LICENSE("GPL");
416