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