revive GP2X build, update
[picodrive.git] / platform / gp2x / vid_pollux.c
1 /*
2  * (C) GraÅžvydas "notaz" Ignotas, 2009,2013
3  *
4  * This work is licensed under the terms of any of these licenses
5  * (at your option):
6  *  - GNU GPL, version 2 or later.
7  *  - GNU LGPL, version 2.1 or later.
8  *  - MAME license.
9  * See the COPYING file in the top-level directory.
10  *
11  * <random_info=mem_map>
12  * 00000000-029fffff linux (42MB)
13  * 02a00000-02dfffff fb (4MB, 153600B really used)
14  * 02e00000-02ffffff sound dma (2MB)
15  * 03000000-03ffffff MPEGDEC (?, 16MB)
16  * </random_info>
17  */
18
19 #include <stdio.h>
20 #include <stdlib.h>
21 #include <string.h>
22 #include <sys/types.h>
23 #include <sys/stat.h>
24 #include <fcntl.h>
25 #include <sys/ioctl.h>
26 #include <sys/mman.h>
27 #include <linux/fb.h>
28 #include <unistd.h>
29
30 #include "../libpicofe/gp2x/soc.h"
31 #include "../libpicofe/gp2x/plat_gp2x.h"
32 #include "../libpicofe/gp2x/pollux_set.h"
33 #include "../common/emu.h"
34 #include "../common/arm_utils.h"
35 #include "plat.h"
36
37 #define fb_buf_count 4
38 static unsigned int fb_paddr[fb_buf_count];
39 static int fb_work_buf;
40 static int fbdev = -1;
41
42 static unsigned short memtimex_old[2];
43 static int last_pal_setting = 0;
44
45
46 /* misc */
47 static void pollux_set_fromenv(const char *env_var)
48 {
49         const char *set_string;
50         set_string = getenv(env_var);
51         if (set_string)
52                 pollux_set(memregs, set_string);
53         else
54                 printf("env var %s not defined.\n", env_var);
55 }
56
57 /* video stuff */
58 static void pollux_video_flip(int buf_count)
59 {
60         memregl[0x406C>>2] = fb_paddr[fb_work_buf];
61         memregl[0x4058>>2] |= 0x10;
62         fb_work_buf++;
63         if (fb_work_buf >= buf_count)
64                 fb_work_buf = 0;
65         g_screen_ptr = gp2x_screens[fb_work_buf];
66 }
67
68 static void gp2x_video_flip_(void)
69 {
70         pollux_video_flip(fb_buf_count);
71 }
72
73 /* doulblebuffered flip */
74 static void gp2x_video_flip2_(void)
75 {
76         pollux_video_flip(2);
77 }
78
79 static void gp2x_video_changemode_ll_(int bpp)
80 {
81         static int prev_bpp = 0;
82         int code = 0, bytes = 2;
83         int rot_cmd[2] = { 0, 0 };
84         unsigned int r;
85         char buff[32];
86         int ret;
87
88         if (bpp == prev_bpp)
89                 return;
90         prev_bpp = bpp;
91
92         printf("changemode: %dbpp rot=%d\n", abs(bpp), bpp < 0);
93
94         /* negative bpp means rotated mode */
95         rot_cmd[0] = (bpp < 0) ? 6 : 5;
96         ret = ioctl(fbdev, _IOW('D', 90, int[2]), rot_cmd);
97         if (ret < 0)
98                 perror("rot ioctl failed");
99         memregl[0x4004>>2] = (bpp < 0) ? 0x013f00ef : 0x00ef013f;
100         memregl[0x4000>>2] |= 1 << 3;
101
102         /* the above ioctl resets LCD timings, so set them here */
103         snprintf(buff, sizeof(buff), "POLLUX_LCD_TIMINGS_%s", last_pal_setting ? "PAL" : "NTSC");
104         pollux_set_fromenv(buff);
105
106         switch (abs(bpp))
107         {
108                 case 8:
109                         code = 0x443a;
110                         bytes = 1;
111                         break;
112
113                 case 15:
114                 case 16:
115                         code = 0x4432;
116                         bytes = 2;
117                         break;
118
119                 default:
120                         printf("unhandled bpp request: %d\n", abs(bpp));
121                         return;
122         }
123
124         memregl[0x405c>>2] = bytes;
125         memregl[0x4060>>2] = bytes * (bpp < 0 ? 240 : 320);
126
127         r = memregl[0x4058>>2];
128         r = (r & 0xffff) | (code << 16) | 0x10;
129         memregl[0x4058>>2] = r;
130 }
131
132 static void gp2x_video_setpalette_(int *pal, int len)
133 {
134         /* pollux palette is 16bpp only.. */
135         int i;
136         for (i = 0; i < len; i++)
137         {
138                 int c = pal[i];
139                 c = ((c >> 8) & 0xf800) | ((c >> 5) & 0x07c0) | ((c >> 3) & 0x001f);
140                 memregl[0x4070>>2] = (i << 24) | c;
141         }
142 }
143
144 static void gp2x_video_RGB_setscaling_(int ln_offs, int W, int H)
145 {
146         /* maybe a job for 3d hardware? */
147 }
148
149 static void gp2x_video_wait_vsync_(void)
150 {
151         while (!(memregl[0x308c>>2] & (1 << 10)))
152                 spend_cycles(128);
153         memregl[0x308c>>2] |= 1 << 10;
154 }
155
156 /* RAM timings */
157 static void set_ram_timings_(void)
158 {
159         pollux_set_fromenv("POLLUX_RAM_TIMINGS");
160 }
161
162 static void unset_ram_timings_(void)
163 {
164         int i;
165
166         memregs[0x14802>>1] = memtimex_old[0];
167         memregs[0x14804>>1] = memtimex_old[1] | 0x8000;
168
169         for (i = 0; i < 0x100000; i++)
170                 if (!(memregs[0x14804>>1] & 0x8000))
171                         break;
172
173         printf("RAM timings reset to startup values.\n");
174 }
175
176 void vid_pollux_init(void)
177 {
178         struct fb_fix_screeninfo fbfix;
179         int i, ret;
180
181         fbdev = open("/dev/fb0", O_RDWR);
182         if (fbdev < 0) {
183                 perror("can't open fbdev");
184                 exit(1);
185         }
186
187         ret = ioctl(fbdev, FBIOGET_FSCREENINFO, &fbfix);
188         if (ret == -1) {
189                 perror("ioctl(fbdev) failed");
190                 exit(1);
191         }
192
193         printf("framebuffer: \"%s\" @ %08lx\n", fbfix.id, fbfix.smem_start);
194         fb_paddr[0] = fbfix.smem_start;
195
196         gp2x_screens[0] = mmap(0, 320*240*2*fb_buf_count, PROT_READ|PROT_WRITE,
197                         MAP_SHARED, memdev, fb_paddr[0]);
198         if (gp2x_screens[0] == MAP_FAILED)
199         {
200                 perror("mmap(gp2x_screens) failed");
201                 exit(1);
202         }
203         memset(gp2x_screens[0], 0, 320*240*2*fb_buf_count);
204
205         printf("  %p -> %08x\n", gp2x_screens[0], fb_paddr[0]);
206         for (i = 1; i < fb_buf_count; i++)
207         {
208                 fb_paddr[i] = fb_paddr[i-1] + 320*240*2;
209                 gp2x_screens[i] = (char *)gp2x_screens[i-1] + 320*240*2;
210                 printf("  %p -> %08x\n", gp2x_screens[i], fb_paddr[i]);
211         }
212         fb_work_buf = 0;
213         g_screen_ptr = gp2x_screens[0];
214
215         set_ram_timings_();
216
217         gp2x_video_flip = gp2x_video_flip_;
218         gp2x_video_flip2 = gp2x_video_flip2_;
219         gp2x_video_changemode_ll = gp2x_video_changemode_ll_;
220         gp2x_video_setpalette = gp2x_video_setpalette_;
221         gp2x_video_RGB_setscaling = gp2x_video_RGB_setscaling_;
222         gp2x_video_wait_vsync = gp2x_video_wait_vsync_;
223 }
224
225 void vid_pollux_finish(void)
226 {
227         munmap(gp2x_screens[0], 320*240*2 * fb_buf_count);
228         close(fbdev);
229         fbdev = -1;
230
231         unset_ram_timings_();
232 }