staging: vt6655: MACvSaveContext use memcpy_fromio to read context.
[linux/fpc-iii.git] / drivers / video / fbdev / s1d13xxxfb.c
blob96aa46dc696c94225be2b9a721e6cba6e619af46
1 /* drivers/video/s1d13xxxfb.c
3 * (c) 2004 Simtec Electronics
4 * (c) 2005 Thibaut VARENE <varenet@parisc-linux.org>
5 * (c) 2009 Kristoffer Ericson <kristoffer.ericson@gmail.com>
7 * Driver for Epson S1D13xxx series framebuffer chips
9 * Adapted from
10 * linux/drivers/video/skeletonfb.c
11 * linux/drivers/video/epson1355fb.c
12 * linux/drivers/video/epson/s1d13xxxfb.c (2.4 driver by Epson)
14 * TODO: - handle dual screen display (CRT and LCD at the same time).
15 * - check_var(), mode change, etc.
16 * - probably not SMP safe :)
17 * - support all bitblt operations on all cards
19 * This file is subject to the terms and conditions of the GNU General Public
20 * License. See the file COPYING in the main directory of this archive for
21 * more details.
24 #include <linux/module.h>
25 #include <linux/platform_device.h>
26 #include <linux/delay.h>
27 #include <linux/types.h>
28 #include <linux/errno.h>
29 #include <linux/mm.h>
30 #include <linux/mman.h>
31 #include <linux/fb.h>
32 #include <linux/spinlock_types.h>
33 #include <linux/spinlock.h>
34 #include <linux/slab.h>
35 #include <linux/io.h>
37 #include <video/s1d13xxxfb.h>
39 #define PFX "s1d13xxxfb: "
40 #define BLIT "s1d13xxxfb_bitblt: "
43 * set this to enable debugging on general functions
45 #if 0
46 #define dbg(fmt, args...) do { printk(KERN_INFO fmt, ## args); } while(0)
47 #else
48 #define dbg(fmt, args...) do { } while (0)
49 #endif
52 * set this to enable debugging on 2D acceleration
54 #if 0
55 #define dbg_blit(fmt, args...) do { printk(KERN_INFO BLIT fmt, ## args); } while (0)
56 #else
57 #define dbg_blit(fmt, args...) do { } while (0)
58 #endif
61 * we make sure only one bitblt operation is running
63 static DEFINE_SPINLOCK(s1d13xxxfb_bitblt_lock);
66 * list of card production ids
68 static const int s1d13xxxfb_prod_ids[] = {
69 S1D13505_PROD_ID,
70 S1D13506_PROD_ID,
71 S1D13806_PROD_ID,
75 * List of card strings
77 static const char *s1d13xxxfb_prod_names[] = {
78 "S1D13505",
79 "S1D13506",
80 "S1D13806",
84 * here we define the default struct fb_fix_screeninfo
86 static struct fb_fix_screeninfo s1d13xxxfb_fix = {
87 .id = S1D_FBID,
88 .type = FB_TYPE_PACKED_PIXELS,
89 .visual = FB_VISUAL_PSEUDOCOLOR,
90 .xpanstep = 0,
91 .ypanstep = 1,
92 .ywrapstep = 0,
93 .accel = FB_ACCEL_NONE,
96 static inline u8
97 s1d13xxxfb_readreg(struct s1d13xxxfb_par *par, u16 regno)
99 #if defined(CONFIG_PLAT_M32700UT) || defined(CONFIG_PLAT_OPSPUT) || defined(CONFIG_PLAT_MAPPI3)
100 regno=((regno & 1) ? (regno & ~1L) : (regno + 1));
101 #endif
102 return readb(par->regs + regno);
105 static inline void
106 s1d13xxxfb_writereg(struct s1d13xxxfb_par *par, u16 regno, u8 value)
108 #if defined(CONFIG_PLAT_M32700UT) || defined(CONFIG_PLAT_OPSPUT) || defined(CONFIG_PLAT_MAPPI3)
109 regno=((regno & 1) ? (regno & ~1L) : (regno + 1));
110 #endif
111 writeb(value, par->regs + regno);
114 static inline void
115 s1d13xxxfb_runinit(struct s1d13xxxfb_par *par,
116 const struct s1d13xxxfb_regval *initregs,
117 const unsigned int size)
119 int i;
121 for (i = 0; i < size; i++) {
122 if ((initregs[i].addr == S1DREG_DELAYOFF) ||
123 (initregs[i].addr == S1DREG_DELAYON))
124 mdelay((int)initregs[i].value);
125 else {
126 s1d13xxxfb_writereg(par, initregs[i].addr, initregs[i].value);
130 /* make sure the hardware can cope with us */
131 mdelay(1);
134 static inline void
135 lcd_enable(struct s1d13xxxfb_par *par, int enable)
137 u8 mode = s1d13xxxfb_readreg(par, S1DREG_COM_DISP_MODE);
139 if (enable)
140 mode |= 0x01;
141 else
142 mode &= ~0x01;
144 s1d13xxxfb_writereg(par, S1DREG_COM_DISP_MODE, mode);
147 static inline void
148 crt_enable(struct s1d13xxxfb_par *par, int enable)
150 u8 mode = s1d13xxxfb_readreg(par, S1DREG_COM_DISP_MODE);
152 if (enable)
153 mode |= 0x02;
154 else
155 mode &= ~0x02;
157 s1d13xxxfb_writereg(par, S1DREG_COM_DISP_MODE, mode);
161 /*************************************************************
162 framebuffer control functions
163 *************************************************************/
164 static inline void
165 s1d13xxxfb_setup_pseudocolour(struct fb_info *info)
167 info->fix.visual = FB_VISUAL_PSEUDOCOLOR;
169 info->var.red.length = 4;
170 info->var.green.length = 4;
171 info->var.blue.length = 4;
174 static inline void
175 s1d13xxxfb_setup_truecolour(struct fb_info *info)
177 info->fix.visual = FB_VISUAL_TRUECOLOR;
178 info->var.bits_per_pixel = 16;
180 info->var.red.length = 5;
181 info->var.red.offset = 11;
183 info->var.green.length = 6;
184 info->var.green.offset = 5;
186 info->var.blue.length = 5;
187 info->var.blue.offset = 0;
191 * s1d13xxxfb_set_par - Alters the hardware state.
192 * @info: frame buffer structure
194 * Using the fb_var_screeninfo in fb_info we set the depth of the
195 * framebuffer. This function alters the par AND the
196 * fb_fix_screeninfo stored in fb_info. It doesn't not alter var in
197 * fb_info since we are using that data. This means we depend on the
198 * data in var inside fb_info to be supported by the hardware.
199 * xxxfb_check_var is always called before xxxfb_set_par to ensure this.
201 * XXX TODO: write proper s1d13xxxfb_check_var(), without which that
202 * function is quite useless.
204 static int
205 s1d13xxxfb_set_par(struct fb_info *info)
207 struct s1d13xxxfb_par *s1dfb = info->par;
208 unsigned int val;
210 dbg("s1d13xxxfb_set_par: bpp=%d\n", info->var.bits_per_pixel);
212 if ((s1dfb->display & 0x01)) /* LCD */
213 val = s1d13xxxfb_readreg(s1dfb, S1DREG_LCD_DISP_MODE); /* read colour control */
214 else /* CRT */
215 val = s1d13xxxfb_readreg(s1dfb, S1DREG_CRT_DISP_MODE); /* read colour control */
217 val &= ~0x07;
219 switch (info->var.bits_per_pixel) {
220 case 4:
221 dbg("pseudo colour 4\n");
222 s1d13xxxfb_setup_pseudocolour(info);
223 val |= 2;
224 break;
225 case 8:
226 dbg("pseudo colour 8\n");
227 s1d13xxxfb_setup_pseudocolour(info);
228 val |= 3;
229 break;
230 case 16:
231 dbg("true colour\n");
232 s1d13xxxfb_setup_truecolour(info);
233 val |= 5;
234 break;
236 default:
237 dbg("bpp not supported!\n");
238 return -EINVAL;
241 dbg("writing %02x to display mode register\n", val);
243 if ((s1dfb->display & 0x01)) /* LCD */
244 s1d13xxxfb_writereg(s1dfb, S1DREG_LCD_DISP_MODE, val);
245 else /* CRT */
246 s1d13xxxfb_writereg(s1dfb, S1DREG_CRT_DISP_MODE, val);
248 info->fix.line_length = info->var.xres * info->var.bits_per_pixel;
249 info->fix.line_length /= 8;
251 dbg("setting line_length to %d\n", info->fix.line_length);
253 dbg("done setup\n");
255 return 0;
259 * s1d13xxxfb_setcolreg - sets a color register.
260 * @regno: Which register in the CLUT we are programming
261 * @red: The red value which can be up to 16 bits wide
262 * @green: The green value which can be up to 16 bits wide
263 * @blue: The blue value which can be up to 16 bits wide.
264 * @transp: If supported the alpha value which can be up to 16 bits wide.
265 * @info: frame buffer info structure
267 * Returns negative errno on error, or zero on success.
269 static int
270 s1d13xxxfb_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
271 u_int transp, struct fb_info *info)
273 struct s1d13xxxfb_par *s1dfb = info->par;
274 unsigned int pseudo_val;
276 if (regno >= S1D_PALETTE_SIZE)
277 return -EINVAL;
279 dbg("s1d13xxxfb_setcolreg: %d: rgb=%d,%d,%d, tr=%d\n",
280 regno, red, green, blue, transp);
282 if (info->var.grayscale)
283 red = green = blue = (19595*red + 38470*green + 7471*blue) >> 16;
285 switch (info->fix.visual) {
286 case FB_VISUAL_TRUECOLOR:
287 if (regno >= 16)
288 return -EINVAL;
290 /* deal with creating pseudo-palette entries */
292 pseudo_val = (red >> 11) << info->var.red.offset;
293 pseudo_val |= (green >> 10) << info->var.green.offset;
294 pseudo_val |= (blue >> 11) << info->var.blue.offset;
296 dbg("s1d13xxxfb_setcolreg: pseudo %d, val %08x\n",
297 regno, pseudo_val);
299 #if defined(CONFIG_PLAT_MAPPI)
300 ((u32 *)info->pseudo_palette)[regno] = cpu_to_le16(pseudo_val);
301 #else
302 ((u32 *)info->pseudo_palette)[regno] = pseudo_val;
303 #endif
305 break;
306 case FB_VISUAL_PSEUDOCOLOR:
307 s1d13xxxfb_writereg(s1dfb, S1DREG_LKUP_ADDR, regno);
308 s1d13xxxfb_writereg(s1dfb, S1DREG_LKUP_DATA, red);
309 s1d13xxxfb_writereg(s1dfb, S1DREG_LKUP_DATA, green);
310 s1d13xxxfb_writereg(s1dfb, S1DREG_LKUP_DATA, blue);
312 break;
313 default:
314 return -ENOSYS;
317 dbg("s1d13xxxfb_setcolreg: done\n");
319 return 0;
323 * s1d13xxxfb_blank - blanks the display.
324 * @blank_mode: the blank mode we want.
325 * @info: frame buffer structure that represents a single frame buffer
327 * Blank the screen if blank_mode != 0, else unblank. Return 0 if
328 * blanking succeeded, != 0 if un-/blanking failed due to e.g. a
329 * video mode which doesn't support it. Implements VESA suspend
330 * and powerdown modes on hardware that supports disabling hsync/vsync:
331 * blank_mode == 2: suspend vsync
332 * blank_mode == 3: suspend hsync
333 * blank_mode == 4: powerdown
335 * Returns negative errno on error, or zero on success.
337 static int
338 s1d13xxxfb_blank(int blank_mode, struct fb_info *info)
340 struct s1d13xxxfb_par *par = info->par;
342 dbg("s1d13xxxfb_blank: blank=%d, info=%p\n", blank_mode, info);
344 switch (blank_mode) {
345 case FB_BLANK_UNBLANK:
346 case FB_BLANK_NORMAL:
347 if ((par->display & 0x01) != 0)
348 lcd_enable(par, 1);
349 if ((par->display & 0x02) != 0)
350 crt_enable(par, 1);
351 break;
352 case FB_BLANK_VSYNC_SUSPEND:
353 case FB_BLANK_HSYNC_SUSPEND:
354 break;
355 case FB_BLANK_POWERDOWN:
356 lcd_enable(par, 0);
357 crt_enable(par, 0);
358 break;
359 default:
360 return -EINVAL;
363 /* let fbcon do a soft blank for us */
364 return ((blank_mode == FB_BLANK_NORMAL) ? 1 : 0);
368 * s1d13xxxfb_pan_display - Pans the display.
369 * @var: frame buffer variable screen structure
370 * @info: frame buffer structure that represents a single frame buffer
372 * Pan (or wrap, depending on the `vmode' field) the display using the
373 * `yoffset' field of the `var' structure (`xoffset' not yet supported).
374 * If the values don't fit, return -EINVAL.
376 * Returns negative errno on error, or zero on success.
378 static int
379 s1d13xxxfb_pan_display(struct fb_var_screeninfo *var, struct fb_info *info)
381 struct s1d13xxxfb_par *par = info->par;
382 u32 start;
384 if (var->xoffset != 0) /* not yet ... */
385 return -EINVAL;
387 if (var->yoffset + info->var.yres > info->var.yres_virtual)
388 return -EINVAL;
390 start = (info->fix.line_length >> 1) * var->yoffset;
392 if ((par->display & 0x01)) {
393 /* LCD */
394 s1d13xxxfb_writereg(par, S1DREG_LCD_DISP_START0, (start & 0xff));
395 s1d13xxxfb_writereg(par, S1DREG_LCD_DISP_START1, ((start >> 8) & 0xff));
396 s1d13xxxfb_writereg(par, S1DREG_LCD_DISP_START2, ((start >> 16) & 0x0f));
397 } else {
398 /* CRT */
399 s1d13xxxfb_writereg(par, S1DREG_CRT_DISP_START0, (start & 0xff));
400 s1d13xxxfb_writereg(par, S1DREG_CRT_DISP_START1, ((start >> 8) & 0xff));
401 s1d13xxxfb_writereg(par, S1DREG_CRT_DISP_START2, ((start >> 16) & 0x0f));
404 return 0;
407 /************************************************************
408 functions to handle bitblt acceleration
409 ************************************************************/
412 * bltbit_wait_bitclear - waits for change in register value
413 * @info : frambuffer structure
414 * @bit : value currently in register
415 * @timeout : ...
417 * waits until value changes FROM bit
420 static u8
421 bltbit_wait_bitclear(struct fb_info *info, u8 bit, int timeout)
423 while (s1d13xxxfb_readreg(info->par, S1DREG_BBLT_CTL0) & bit) {
424 udelay(10);
425 if (!--timeout) {
426 dbg_blit("wait_bitclear timeout\n");
427 break;
431 return timeout;
435 * s1d13xxxfb_bitblt_copyarea - accelerated copyarea function
436 * @info : framebuffer structure
437 * @area : fb_copyarea structure
439 * supports (atleast) S1D13506
442 static void
443 s1d13xxxfb_bitblt_copyarea(struct fb_info *info, const struct fb_copyarea *area)
445 u32 dst, src;
446 u32 stride;
447 u16 reverse = 0;
448 u16 sx = area->sx, sy = area->sy;
449 u16 dx = area->dx, dy = area->dy;
450 u16 width = area->width, height = area->height;
451 u16 bpp;
453 spin_lock(&s1d13xxxfb_bitblt_lock);
455 /* bytes per xres line */
456 bpp = (info->var.bits_per_pixel >> 3);
457 stride = bpp * info->var.xres;
459 /* reverse, calculate the last pixel in rectangle */
460 if ((dy > sy) || ((dy == sy) && (dx >= sx))) {
461 dst = (((dy + height - 1) * stride) + (bpp * (dx + width - 1)));
462 src = (((sy + height - 1) * stride) + (bpp * (sx + width - 1)));
463 reverse = 1;
464 /* not reverse, calculate the first pixel in rectangle */
465 } else { /* (y * xres) + (bpp * x) */
466 dst = (dy * stride) + (bpp * dx);
467 src = (sy * stride) + (bpp * sx);
470 /* set source address */
471 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_SRC_START0, (src & 0xff));
472 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_SRC_START1, (src >> 8) & 0x00ff);
473 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_SRC_START2, (src >> 16) & 0x00ff);
475 /* set destination address */
476 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_DST_START0, (dst & 0xff));
477 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_DST_START1, (dst >> 8) & 0x00ff);
478 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_DST_START2, (dst >> 16) & 0x00ff);
480 /* program height and width */
481 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_WIDTH0, (width & 0xff) - 1);
482 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_WIDTH1, (width >> 8));
484 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_HEIGHT0, (height & 0xff) - 1);
485 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_HEIGHT1, (height >> 8));
487 /* negative direction ROP */
488 if (reverse == 1) {
489 dbg_blit("(copyarea) negative rop\n");
490 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_OP, 0x03);
491 } else /* positive direction ROP */ {
492 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_OP, 0x02);
493 dbg_blit("(copyarea) positive rop\n");
496 /* set for rectangel mode and not linear */
497 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_CTL0, 0x0);
499 /* setup the bpp 1 = 16bpp, 0 = 8bpp*/
500 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_CTL1, (bpp >> 1));
502 /* set words per xres */
503 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_MEM_OFF0, (stride >> 1) & 0xff);
504 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_MEM_OFF1, (stride >> 9));
506 dbg_blit("(copyarea) dx=%d, dy=%d\n", dx, dy);
507 dbg_blit("(copyarea) sx=%d, sy=%d\n", sx, sy);
508 dbg_blit("(copyarea) width=%d, height=%d\n", width - 1, height - 1);
509 dbg_blit("(copyarea) stride=%d\n", stride);
510 dbg_blit("(copyarea) bpp=%d=0x0%d, mem_offset1=%d, mem_offset2=%d\n", bpp, (bpp >> 1),
511 (stride >> 1) & 0xff, stride >> 9);
513 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_CC_EXP, 0x0c);
515 /* initialize the engine */
516 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_CTL0, 0x80);
518 /* wait to complete */
519 bltbit_wait_bitclear(info, 0x80, 8000);
521 spin_unlock(&s1d13xxxfb_bitblt_lock);
526 * s1d13xxxfb_bitblt_solidfill - accelerated solidfill function
527 * @info : framebuffer structure
528 * @rect : fb_fillrect structure
530 * supports (atleast 13506)
533 static void
534 s1d13xxxfb_bitblt_solidfill(struct fb_info *info, const struct fb_fillrect *rect)
536 u32 screen_stride, dest;
537 u32 fg;
538 u16 bpp = (info->var.bits_per_pixel >> 3);
540 /* grab spinlock */
541 spin_lock(&s1d13xxxfb_bitblt_lock);
543 /* bytes per x width */
544 screen_stride = (bpp * info->var.xres);
546 /* bytes to starting point */
547 dest = ((rect->dy * screen_stride) + (bpp * rect->dx));
549 dbg_blit("(solidfill) dx=%d, dy=%d, stride=%d, dest=%d\n"
550 "(solidfill) : rect_width=%d, rect_height=%d\n",
551 rect->dx, rect->dy, screen_stride, dest,
552 rect->width - 1, rect->height - 1);
554 dbg_blit("(solidfill) : xres=%d, yres=%d, bpp=%d\n",
555 info->var.xres, info->var.yres,
556 info->var.bits_per_pixel);
557 dbg_blit("(solidfill) : rop=%d\n", rect->rop);
559 /* We split the destination into the three registers */
560 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_DST_START0, (dest & 0x00ff));
561 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_DST_START1, ((dest >> 8) & 0x00ff));
562 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_DST_START2, ((dest >> 16) & 0x00ff));
564 /* give information regarding rectangel width */
565 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_WIDTH0, ((rect->width) & 0x00ff) - 1);
566 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_WIDTH1, (rect->width >> 8));
568 /* give information regarding rectangel height */
569 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_HEIGHT0, ((rect->height) & 0x00ff) - 1);
570 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_HEIGHT1, (rect->height >> 8));
572 if (info->fix.visual == FB_VISUAL_TRUECOLOR ||
573 info->fix.visual == FB_VISUAL_DIRECTCOLOR) {
574 fg = ((u32 *)info->pseudo_palette)[rect->color];
575 dbg_blit("(solidfill) truecolor/directcolor\n");
576 dbg_blit("(solidfill) pseudo_palette[%d] = %d\n", rect->color, fg);
577 } else {
578 fg = rect->color;
579 dbg_blit("(solidfill) color = %d\n", rect->color);
582 /* set foreground color */
583 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_FGC0, (fg & 0xff));
584 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_FGC1, (fg >> 8) & 0xff);
586 /* set rectangual region of memory (rectangle and not linear) */
587 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_CTL0, 0x0);
589 /* set operation mode SOLID_FILL */
590 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_OP, BBLT_SOLID_FILL);
592 /* set bits per pixel (1 = 16bpp, 0 = 8bpp) */
593 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_CTL1, (info->var.bits_per_pixel >> 4));
595 /* set the memory offset for the bblt in word sizes */
596 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_MEM_OFF0, (screen_stride >> 1) & 0x00ff);
597 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_MEM_OFF1, (screen_stride >> 9));
599 /* and away we go.... */
600 s1d13xxxfb_writereg(info->par, S1DREG_BBLT_CTL0, 0x80);
602 /* wait until its done */
603 bltbit_wait_bitclear(info, 0x80, 8000);
605 /* let others play */
606 spin_unlock(&s1d13xxxfb_bitblt_lock);
609 /* framebuffer information structures */
610 static struct fb_ops s1d13xxxfb_fbops = {
611 .owner = THIS_MODULE,
612 .fb_set_par = s1d13xxxfb_set_par,
613 .fb_setcolreg = s1d13xxxfb_setcolreg,
614 .fb_blank = s1d13xxxfb_blank,
616 .fb_pan_display = s1d13xxxfb_pan_display,
618 /* gets replaced at chip detection time */
619 .fb_fillrect = cfb_fillrect,
620 .fb_copyarea = cfb_copyarea,
621 .fb_imageblit = cfb_imageblit,
624 static int s1d13xxxfb_width_tab[2][4] = {
625 {4, 8, 16, -1},
626 {9, 12, 18, -1},
630 * s1d13xxxfb_fetch_hw_state - Configure the framebuffer according to
631 * hardware setup.
632 * @info: frame buffer structure
634 * We setup the framebuffer structures according to the current
635 * hardware setup. On some machines, the BIOS will have filled
636 * the chip registers with such info, on others, these values will
637 * have been written in some init procedure. In any case, the
638 * software values needs to match the hardware ones. This is what
639 * this function ensures.
641 * Note: some of the hardcoded values here might need some love to
642 * work on various chips, and might need to no longer be hardcoded.
644 static void s1d13xxxfb_fetch_hw_state(struct fb_info *info)
646 struct fb_var_screeninfo *var = &info->var;
647 struct fb_fix_screeninfo *fix = &info->fix;
648 struct s1d13xxxfb_par *par = info->par;
649 u8 panel, display;
650 u16 offset;
651 u32 xres, yres;
652 u32 xres_virtual, yres_virtual;
653 int bpp, lcd_bpp;
654 int is_color, is_dual, is_tft;
655 int lcd_enabled, crt_enabled;
657 fix->type = FB_TYPE_PACKED_PIXELS;
659 /* general info */
660 par->display = s1d13xxxfb_readreg(par, S1DREG_COM_DISP_MODE);
661 crt_enabled = (par->display & 0x02) != 0;
662 lcd_enabled = (par->display & 0x01) != 0;
664 if (lcd_enabled && crt_enabled)
665 printk(KERN_WARNING PFX "Warning: LCD and CRT detected, using LCD\n");
667 if (lcd_enabled)
668 display = s1d13xxxfb_readreg(par, S1DREG_LCD_DISP_MODE);
669 else /* CRT */
670 display = s1d13xxxfb_readreg(par, S1DREG_CRT_DISP_MODE);
672 bpp = display & 0x07;
674 switch (bpp) {
675 case 2: /* 4 bpp */
676 case 3: /* 8 bpp */
677 var->bits_per_pixel = 8;
678 var->red.offset = var->green.offset = var->blue.offset = 0;
679 var->red.length = var->green.length = var->blue.length = 8;
680 break;
681 case 5: /* 16 bpp */
682 s1d13xxxfb_setup_truecolour(info);
683 break;
684 default:
685 dbg("bpp: %i\n", bpp);
687 fb_alloc_cmap(&info->cmap, 256, 0);
689 /* LCD info */
690 panel = s1d13xxxfb_readreg(par, S1DREG_PANEL_TYPE);
691 is_color = (panel & 0x04) != 0;
692 is_dual = (panel & 0x02) != 0;
693 is_tft = (panel & 0x01) != 0;
694 lcd_bpp = s1d13xxxfb_width_tab[is_tft][(panel >> 4) & 3];
696 if (lcd_enabled) {
697 xres = (s1d13xxxfb_readreg(par, S1DREG_LCD_DISP_HWIDTH) + 1) * 8;
698 yres = (s1d13xxxfb_readreg(par, S1DREG_LCD_DISP_VHEIGHT0) +
699 ((s1d13xxxfb_readreg(par, S1DREG_LCD_DISP_VHEIGHT1) & 0x03) << 8) + 1);
701 offset = (s1d13xxxfb_readreg(par, S1DREG_LCD_MEM_OFF0) +
702 ((s1d13xxxfb_readreg(par, S1DREG_LCD_MEM_OFF1) & 0x7) << 8));
703 } else { /* crt */
704 xres = (s1d13xxxfb_readreg(par, S1DREG_CRT_DISP_HWIDTH) + 1) * 8;
705 yres = (s1d13xxxfb_readreg(par, S1DREG_CRT_DISP_VHEIGHT0) +
706 ((s1d13xxxfb_readreg(par, S1DREG_CRT_DISP_VHEIGHT1) & 0x03) << 8) + 1);
708 offset = (s1d13xxxfb_readreg(par, S1DREG_CRT_MEM_OFF0) +
709 ((s1d13xxxfb_readreg(par, S1DREG_CRT_MEM_OFF1) & 0x7) << 8));
711 xres_virtual = offset * 16 / var->bits_per_pixel;
712 yres_virtual = fix->smem_len / (offset * 2);
714 var->xres = xres;
715 var->yres = yres;
716 var->xres_virtual = xres_virtual;
717 var->yres_virtual = yres_virtual;
718 var->xoffset = var->yoffset = 0;
720 fix->line_length = offset * 2;
722 var->grayscale = !is_color;
724 var->activate = FB_ACTIVATE_NOW;
726 dbg(PFX "bpp=%d, lcd_bpp=%d, "
727 "crt_enabled=%d, lcd_enabled=%d\n",
728 var->bits_per_pixel, lcd_bpp, crt_enabled, lcd_enabled);
729 dbg(PFX "xres=%d, yres=%d, vxres=%d, vyres=%d "
730 "is_color=%d, is_dual=%d, is_tft=%d\n",
731 xres, yres, xres_virtual, yres_virtual, is_color, is_dual, is_tft);
735 static int
736 s1d13xxxfb_remove(struct platform_device *pdev)
738 struct fb_info *info = platform_get_drvdata(pdev);
739 struct s1d13xxxfb_par *par = NULL;
741 if (info) {
742 par = info->par;
743 if (par && par->regs) {
744 /* disable output & enable powersave */
745 s1d13xxxfb_writereg(par, S1DREG_COM_DISP_MODE, 0x00);
746 s1d13xxxfb_writereg(par, S1DREG_PS_CNF, 0x11);
747 iounmap(par->regs);
750 fb_dealloc_cmap(&info->cmap);
752 if (info->screen_base)
753 iounmap(info->screen_base);
755 framebuffer_release(info);
758 release_mem_region(pdev->resource[0].start,
759 pdev->resource[0].end - pdev->resource[0].start +1);
760 release_mem_region(pdev->resource[1].start,
761 pdev->resource[1].end - pdev->resource[1].start +1);
762 return 0;
765 static int s1d13xxxfb_probe(struct platform_device *pdev)
767 struct s1d13xxxfb_par *default_par;
768 struct fb_info *info;
769 struct s1d13xxxfb_pdata *pdata = NULL;
770 int ret = 0;
771 int i;
772 u8 revision, prod_id;
774 dbg("probe called: device is %p\n", pdev);
776 printk(KERN_INFO "Epson S1D13XXX FB Driver\n");
778 /* enable platform-dependent hardware glue, if any */
779 if (dev_get_platdata(&pdev->dev))
780 pdata = dev_get_platdata(&pdev->dev);
782 if (pdata && pdata->platform_init_video)
783 pdata->platform_init_video();
785 if (pdev->num_resources != 2) {
786 dev_err(&pdev->dev, "invalid num_resources: %i\n",
787 pdev->num_resources);
788 ret = -ENODEV;
789 goto bail;
792 /* resource[0] is VRAM, resource[1] is registers */
793 if (pdev->resource[0].flags != IORESOURCE_MEM
794 || pdev->resource[1].flags != IORESOURCE_MEM) {
795 dev_err(&pdev->dev, "invalid resource type\n");
796 ret = -ENODEV;
797 goto bail;
800 if (!request_mem_region(pdev->resource[0].start,
801 pdev->resource[0].end - pdev->resource[0].start +1, "s1d13xxxfb mem")) {
802 dev_dbg(&pdev->dev, "request_mem_region failed\n");
803 ret = -EBUSY;
804 goto bail;
807 if (!request_mem_region(pdev->resource[1].start,
808 pdev->resource[1].end - pdev->resource[1].start +1, "s1d13xxxfb regs")) {
809 dev_dbg(&pdev->dev, "request_mem_region failed\n");
810 ret = -EBUSY;
811 goto bail;
814 info = framebuffer_alloc(sizeof(struct s1d13xxxfb_par) + sizeof(u32) * 256, &pdev->dev);
815 if (!info) {
816 ret = -ENOMEM;
817 goto bail;
820 platform_set_drvdata(pdev, info);
821 default_par = info->par;
822 default_par->regs = ioremap_nocache(pdev->resource[1].start,
823 pdev->resource[1].end - pdev->resource[1].start +1);
824 if (!default_par->regs) {
825 printk(KERN_ERR PFX "unable to map registers\n");
826 ret = -ENOMEM;
827 goto bail;
829 info->pseudo_palette = default_par->pseudo_palette;
831 info->screen_base = ioremap_nocache(pdev->resource[0].start,
832 pdev->resource[0].end - pdev->resource[0].start +1);
834 if (!info->screen_base) {
835 printk(KERN_ERR PFX "unable to map framebuffer\n");
836 ret = -ENOMEM;
837 goto bail;
840 /* production id is top 6 bits */
841 prod_id = s1d13xxxfb_readreg(default_par, S1DREG_REV_CODE) >> 2;
842 /* revision id is lower 2 bits */
843 revision = s1d13xxxfb_readreg(default_par, S1DREG_REV_CODE) & 0x3;
844 ret = -ENODEV;
846 for (i = 0; i < ARRAY_SIZE(s1d13xxxfb_prod_ids); i++) {
847 if (prod_id == s1d13xxxfb_prod_ids[i]) {
848 /* looks like we got it in our list */
849 default_par->prod_id = prod_id;
850 default_par->revision = revision;
851 ret = 0;
852 break;
856 if (!ret) {
857 printk(KERN_INFO PFX "chip production id %i = %s\n",
858 prod_id, s1d13xxxfb_prod_names[i]);
859 printk(KERN_INFO PFX "chip revision %i\n", revision);
860 } else {
861 printk(KERN_INFO PFX
862 "unknown chip production id %i, revision %i\n",
863 prod_id, revision);
864 printk(KERN_INFO PFX "please contact maintainer\n");
865 goto bail;
868 info->fix = s1d13xxxfb_fix;
869 info->fix.mmio_start = pdev->resource[1].start;
870 info->fix.mmio_len = pdev->resource[1].end - pdev->resource[1].start + 1;
871 info->fix.smem_start = pdev->resource[0].start;
872 info->fix.smem_len = pdev->resource[0].end - pdev->resource[0].start + 1;
874 printk(KERN_INFO PFX "regs mapped at 0x%p, fb %d KiB mapped at 0x%p\n",
875 default_par->regs, info->fix.smem_len / 1024, info->screen_base);
877 info->par = default_par;
878 info->flags = FBINFO_DEFAULT | FBINFO_HWACCEL_YPAN;
879 info->fbops = &s1d13xxxfb_fbops;
881 switch(prod_id) {
882 case S1D13506_PROD_ID: /* activate acceleration */
883 s1d13xxxfb_fbops.fb_fillrect = s1d13xxxfb_bitblt_solidfill;
884 s1d13xxxfb_fbops.fb_copyarea = s1d13xxxfb_bitblt_copyarea;
885 info->flags = FBINFO_DEFAULT | FBINFO_HWACCEL_YPAN |
886 FBINFO_HWACCEL_FILLRECT | FBINFO_HWACCEL_COPYAREA;
887 break;
888 default:
889 break;
892 /* perform "manual" chip initialization, if needed */
893 if (pdata && pdata->initregs)
894 s1d13xxxfb_runinit(info->par, pdata->initregs, pdata->initregssize);
896 s1d13xxxfb_fetch_hw_state(info);
898 if (register_framebuffer(info) < 0) {
899 ret = -EINVAL;
900 goto bail;
903 fb_info(info, "%s frame buffer device\n", info->fix.id);
905 return 0;
907 bail:
908 s1d13xxxfb_remove(pdev);
909 return ret;
913 #ifdef CONFIG_PM
914 static int s1d13xxxfb_suspend(struct platform_device *dev, pm_message_t state)
916 struct fb_info *info = platform_get_drvdata(dev);
917 struct s1d13xxxfb_par *s1dfb = info->par;
918 struct s1d13xxxfb_pdata *pdata = NULL;
920 /* disable display */
921 lcd_enable(s1dfb, 0);
922 crt_enable(s1dfb, 0);
924 if (dev_get_platdata(&dev->dev))
925 pdata = dev_get_platdata(&dev->dev);
927 #if 0
928 if (!s1dfb->disp_save)
929 s1dfb->disp_save = kmalloc(info->fix.smem_len, GFP_KERNEL);
931 if (!s1dfb->disp_save) {
932 printk(KERN_ERR PFX "no memory to save screen");
933 return -ENOMEM;
936 memcpy_fromio(s1dfb->disp_save, info->screen_base, info->fix.smem_len);
937 #else
938 s1dfb->disp_save = NULL;
939 #endif
941 if (!s1dfb->regs_save)
942 s1dfb->regs_save = kmalloc(info->fix.mmio_len, GFP_KERNEL);
944 if (!s1dfb->regs_save) {
945 printk(KERN_ERR PFX "no memory to save registers");
946 return -ENOMEM;
949 /* backup all registers */
950 memcpy_fromio(s1dfb->regs_save, s1dfb->regs, info->fix.mmio_len);
952 /* now activate power save mode */
953 s1d13xxxfb_writereg(s1dfb, S1DREG_PS_CNF, 0x11);
955 if (pdata && pdata->platform_suspend_video)
956 return pdata->platform_suspend_video();
957 else
958 return 0;
961 static int s1d13xxxfb_resume(struct platform_device *dev)
963 struct fb_info *info = platform_get_drvdata(dev);
964 struct s1d13xxxfb_par *s1dfb = info->par;
965 struct s1d13xxxfb_pdata *pdata = NULL;
967 /* awaken the chip */
968 s1d13xxxfb_writereg(s1dfb, S1DREG_PS_CNF, 0x10);
970 /* do not let go until SDRAM "wakes up" */
971 while ((s1d13xxxfb_readreg(s1dfb, S1DREG_PS_STATUS) & 0x01))
972 udelay(10);
974 if (dev_get_platdata(&dev->dev))
975 pdata = dev_get_platdata(&dev->dev);
977 if (s1dfb->regs_save) {
978 /* will write RO regs, *should* get away with it :) */
979 memcpy_toio(s1dfb->regs, s1dfb->regs_save, info->fix.mmio_len);
980 kfree(s1dfb->regs_save);
983 if (s1dfb->disp_save) {
984 memcpy_toio(info->screen_base, s1dfb->disp_save,
985 info->fix.smem_len);
986 kfree(s1dfb->disp_save); /* XXX kmalloc()'d when? */
989 if ((s1dfb->display & 0x01) != 0)
990 lcd_enable(s1dfb, 1);
991 if ((s1dfb->display & 0x02) != 0)
992 crt_enable(s1dfb, 1);
994 if (pdata && pdata->platform_resume_video)
995 return pdata->platform_resume_video();
996 else
997 return 0;
999 #endif /* CONFIG_PM */
1001 static struct platform_driver s1d13xxxfb_driver = {
1002 .probe = s1d13xxxfb_probe,
1003 .remove = s1d13xxxfb_remove,
1004 #ifdef CONFIG_PM
1005 .suspend = s1d13xxxfb_suspend,
1006 .resume = s1d13xxxfb_resume,
1007 #endif
1008 .driver = {
1009 .name = S1D_DEVICENAME,
1014 static int __init
1015 s1d13xxxfb_init(void)
1018 #ifndef MODULE
1019 if (fb_get_options("s1d13xxxfb", NULL))
1020 return -ENODEV;
1021 #endif
1023 return platform_driver_register(&s1d13xxxfb_driver);
1027 static void __exit
1028 s1d13xxxfb_exit(void)
1030 platform_driver_unregister(&s1d13xxxfb_driver);
1033 module_init(s1d13xxxfb_init);
1034 module_exit(s1d13xxxfb_exit);
1037 MODULE_LICENSE("GPL");
1038 MODULE_DESCRIPTION("Framebuffer driver for S1D13xxx devices");
1039 MODULE_AUTHOR("Ben Dooks <ben@simtec.co.uk>, Thibaut VARENE <varenet@parisc-linux.org>");