fb: support caanoo
[ginge.git] / common / wiz_video.c
1 #include <stdio.h>
2 #include <stdlib.h>
3 #include <string.h>
4 #include <sys/types.h>
5 #include <sys/stat.h>
6 #include <fcntl.h>
7 #include <sys/ioctl.h>
8 #include <sys/mman.h>
9 #include <unistd.h>
10 #include <linux/fb.h>
11 #include "warm/warm.h"
12
13 static volatile unsigned short *memregs;
14 static volatile unsigned int   *memregl;
15 int probably_caanoo;
16 int memdev = -1;
17
18 #define FB_BUF_COUNT 4
19 static unsigned int fb_paddr[FB_BUF_COUNT];
20 static int fb_buf_count = FB_BUF_COUNT;
21 static int fb_work_buf;
22 static int fbdev = -1;
23
24 static void *gp2x_screens[FB_BUF_COUNT];
25 static void *g_screen_ptr;
26
27
28 static void vout_gp2x_flip(void)
29 {
30         memregl[0x406C>>2] = fb_paddr[fb_work_buf];
31         memregl[0x4058>>2] |= 0x10;
32
33         fb_work_buf++;
34         if (fb_work_buf >= fb_buf_count)
35                 fb_work_buf = 0;
36         g_screen_ptr = gp2x_screens[fb_work_buf];
37 }
38
39 static int vout_gp2x_init(int no_dblbuf)
40 {
41         struct fb_fix_screeninfo fbfix;
42         int i, ret;
43
44         memdev = open("/dev/mem", O_RDWR);
45         if (memdev == -1) {
46                 perror("open(/dev/mem) failed");
47                 exit(1);
48         }
49
50         memregs = mmap(0, 0x20000, PROT_READ|PROT_WRITE, MAP_SHARED, memdev, 0xc0000000);
51         if (memregs == MAP_FAILED) {
52                 perror("mmap(memregs) failed");
53                 exit(1);
54         }
55         memregl = (volatile void *)memregs;
56
57         fbdev = open("/dev/fb0", O_RDWR);
58         if (fbdev < 0) {
59                 perror("can't open fbdev");
60                 exit(1);
61         }
62
63         ret = ioctl(fbdev, FBIOGET_FSCREENINFO, &fbfix);
64         if (ret == -1) {
65                 perror("ioctl(fbdev) failed");
66                 exit(1);
67         }
68
69         printf("framebuffer: \"%s\" @ %08lx\n", fbfix.id, fbfix.smem_start);
70         fb_paddr[0] = fbfix.smem_start;
71         probably_caanoo = fb_paddr[0] >= 0x4000000;
72         printf("looking like Caanoo? %s.\n", probably_caanoo ? "yes" : "no");
73
74         gp2x_screens[0] = mmap(0, 320*240*2*FB_BUF_COUNT, PROT_READ|PROT_WRITE,
75                         MAP_SHARED, memdev, fb_paddr[0]);
76         if (gp2x_screens[0] == MAP_FAILED)
77         {
78                 perror("mmap(gp2x_screens) failed");
79                 exit(1);
80         }
81         memset(gp2x_screens[0], 0, 320*240*2*FB_BUF_COUNT);
82
83         if (!no_dblbuf) {
84                 warm_init();
85                 ret = warm_change_cb_range(WCB_B_BIT, 1, gp2x_screens[0], 320*240*2*FB_BUF_COUNT);
86                 if (ret != 0)
87                         fprintf(stderr, "could not make fb buferable.\n");
88         }
89
90         // printf("  %p -> %08x\n", gp2x_screens[0], fb_paddr[0]);
91         for (i = 1; i < FB_BUF_COUNT; i++)
92         {
93                 fb_paddr[i] = fb_paddr[i-1] + 320*240*2;
94                 gp2x_screens[i] = (char *)gp2x_screens[i-1] + 320*240*2;
95                 // printf("  %p -> %08x\n", gp2x_screens[i], fb_paddr[i]);
96         }
97         fb_work_buf = 0;
98         g_screen_ptr = gp2x_screens[0];
99
100         if (no_dblbuf)
101                 fb_buf_count = 1;
102
103         return 0;
104 }
105
106 static void vout_gp2x_set_mode(int bpp, int rot)
107 {
108         int rot_cmd[2] = { 0, 0 };
109         int code = 0, bytes = 2;
110         unsigned int r;
111         int ret;
112
113         if (probably_caanoo)
114                 rot = 0;
115
116         rot_cmd[0] = rot ? 6 : 5;
117         ret = ioctl(fbdev, _IOW('D', 90, int[2]), rot_cmd);
118         if (ret < 0)
119                 perror("rot ioctl failed");
120
121         memregl[0x4004>>2] = rot ? 0x013f00ef : 0x00ef013f;
122         memregl[0x4000>>2] |= 1 << 3;
123
124         switch (bpp)
125         {
126                 case 8:
127                         code = 0x443a;
128                         bytes = 1;
129                         break;
130
131                 case 15:
132                 case 16:
133                         code = 0x4432;
134                         bytes = 2;
135                         break;
136
137                 default:
138                         fprintf(stderr, "unhandled bpp request: %d\n", abs(bpp));
139                         return;
140         }
141
142         memregl[0x405c>>2] = bytes;
143         memregl[0x4060>>2] = bytes * (rot ? 240 : 320);
144
145         r = memregl[0x4058>>2];
146         r = (r & 0xffff) | (code << 16) | 0x10;
147         memregl[0x4058>>2] = r;
148 }
149
150 static void vout_gp2x_set_palette16(unsigned short *pal, int len)
151 {
152         int i;
153         for (i = 0; i < len; i++)
154                 memregl[0x4070>>2] = (i << 24) | pal[i];
155 }
156
157 static void vout_gp2x_set_palette32(unsigned int *pal, int len)
158 {
159         /* pollux palette is 16bpp only.. */
160         int i;
161         for (i = 0; i < len; i++)
162         {
163                 int c = pal[i];
164                 c = ((c >> 8) & 0xf800) | ((c >> 5) & 0x07c0) | ((c >> 3) & 0x001f);
165                 memregl[0x4070>>2] = (i << 24) | c;
166         }
167 }
168
169 void vout_gp2x_finish(void)
170 {
171         if (memregl != NULL) {
172                 if (memregl[0x4058>>2] & 0x10)
173                         usleep(100000);
174                 if (memregl[0x4058>>2] & 0x10)
175                         printf("MLCCONTROL1 dirty? %08x %08x\n",
176                                 memregl[0x406C>>2], memregl[0x4058>>2]);
177
178                 memregl[0x406C>>2] = fb_paddr[0];
179                 memregl[0x4058>>2] |= 0x10;
180                 munmap((void *)memregs, 0x20000);
181                 memregs = NULL;
182                 memregl = NULL;
183         }
184
185         close(fbdev);
186         close(memdev);
187
188         warm_finish();
189 }
190