refresh rate: comments
[fceu.git] / drivers / gp2x / minimal.c
CommitLineData
b2b95d2e 1/**\r
2 * This is a rewrite of a subset of rlyeh's minimal library.\r
3**/\r
4\r
5/*\r
6\r
7 GP2X minimal library v0.A by rlyeh, (c) 2005. emulnation.info@rlyeh (swap it!)\r
8\r
9 Thanks to Squidge, Robster, snaff, Reesy and NK, for the help & previous work! :-)\r
10\r
11 License\r
12 =======\r
13\r
14 Free for non-commercial projects (it would be nice receiving a mail from you).\r
15 Other cases, ask me first.\r
16\r
17 GamePark Holdings is not allowed to use this library and/or use parts from it.\r
18\r
19*/\r
20\r
21\r
22#include <stdio.h>\r
23#include <stdlib.h>\r
24#include <string.h>\r
25#include <unistd.h>\r
26#include <sys/mman.h>\r
27#include <sys/types.h>\r
28#include <sys/stat.h>\r
29#include <sys/ioctl.h>\r
30#include <sys/soundcard.h>\r
31#include <fcntl.h>\r
32#include <errno.h>\r
33\r
34#include "minimal.h"\r
35#include "usbjoy.h"\r
36#include "asmutils.h"\r
37\r
38volatile unsigned short *gp2x_memregs;\r
39//static\r
40volatile unsigned long *gp2x_memregl;\r
41static void *gp2x_screens[4];\r
42static int screensel = 0;\r
989672f4 43static int gp2x_screen_offs = 0;\r
b2b95d2e 44//static\r
45int memdev = 0;\r
46static int sounddev = 0, mixerdev = 0;\r
47\r
48void *gp2x_screen;\r
49\r
50#define FRAMEBUFF_WHOLESIZE (0x30000*4) // 320*240*2 + some more\r
51#define FRAMEBUFF_ADDR0 (0x4000000-FRAMEBUFF_WHOLESIZE)\r
52#define FRAMEBUFF_ADDR1 (FRAMEBUFF_ADDR0+0x30000)\r
53#define FRAMEBUFF_ADDR2 (FRAMEBUFF_ADDR1+0x30000)\r
54#define FRAMEBUFF_ADDR3 (FRAMEBUFF_ADDR2+0x30000)\r
55\r
56static const int gp2x_screenaddrs[4] = { FRAMEBUFF_ADDR0, FRAMEBUFF_ADDR1, FRAMEBUFF_ADDR2, FRAMEBUFF_ADDR3 };\r
b2b95d2e 57static unsigned short gp2x_screenaddr_old[4];\r
58\r
59\r
b2b95d2e 60/* video stuff */\r
61void gp2x_video_flip(void)\r
62{\r
63 unsigned short lsw, msw;\r
7b356ee3 64 int addr = gp2x_screenaddrs[screensel&3];\r
b2b95d2e 65\r
989672f4 66 addr += gp2x_screen_offs;\r
b2b95d2e 67\r
b2b95d2e 68 lsw = (unsigned short) addr;\r
69 msw = (unsigned short)(addr >> 16);\r
70\r
71 gp2x_memregs[0x2910>>1] = msw;\r
72 gp2x_memregs[0x2914>>1] = msw;\r
73 gp2x_memregs[0x290E>>1] = lsw;\r
74 gp2x_memregs[0x2912>>1] = lsw;\r
75\r
76 // jump to other buffer:\r
77 gp2x_screen = gp2x_screens[++screensel&3];\r
78}\r
79\r
80/* doulblebuffered flip */\r
81void gp2x_video_flip2(void)\r
82{\r
7b356ee3 83 unsigned short msw = (unsigned short)(gp2x_screenaddrs[screensel&1] >> 16);\r
b2b95d2e 84\r
85 gp2x_memregs[0x2910>>1] = msw;\r
86 gp2x_memregs[0x2914>>1] = msw;\r
87 gp2x_memregs[0x290E>>1] = 0;\r
88 gp2x_memregs[0x2912>>1] = 0;\r
89\r
90 // jump to other buffer:\r
91 gp2x_screen = gp2x_screens[++screensel&1];\r
92}\r
93\r
94\r
95void gp2x_video_changemode2(int bpp)\r
96{\r
97 gp2x_memregs[0x28DA>>1]=(((bpp+1)/8)<<9)|0xAB; /*8/15/16/24bpp...*/\r
98 gp2x_memregs[0x290C>>1]=320*((bpp+1)/8); /*line width in bytes*/\r
99}\r
100\r
101\r
102void gp2x_video_changemode(int bpp)\r
103{\r
104 gp2x_video_changemode2(bpp);\r
105\r
106 gp2x_memset_all_buffers(0, 0, 320*240*2);\r
107 gp2x_video_flip();\r
108}\r
109\r
110\r
111void gp2x_video_setpalette(int *pal, int len)\r
112{\r
113 unsigned short *g=(unsigned short *)pal;\r
114 volatile unsigned short *memreg = &gp2x_memregs[0x295A>>1];\r
115 gp2x_memregs[0x2958>>1] = 0;\r
116\r
117 len *= 2;\r
118 while(len--) *memreg=*g++;\r
119}\r
120\r
121\r
122// TV Compatible function //\r
7b356ee3 123void gp2x_video_RGB_setscaling(int W, int H)\r
b2b95d2e 124{\r
125 float escalaw, escalah;\r
126 int bpp = (gp2x_memregs[0x28DA>>1]>>9)&0x3;\r
127 unsigned short scalw;\r
128\r
b2b95d2e 129 escalaw = 1024.0; // RGB Horiz LCD\r
130 escalah = 320.0; // RGB Vert LCD\r
131\r
132 if(gp2x_memregs[0x2800>>1]&0x100) //TV-Out\r
133 {\r
134 escalaw=489.0; // RGB Horiz TV (PAL, NTSC)\r
135 if (gp2x_memregs[0x2818>>1] == 287) //PAL\r
136 escalah=274.0; // RGB Vert TV PAL\r
137 else if (gp2x_memregs[0x2818>>1] == 239) //NTSC\r
138 escalah=331.0; // RGB Vert TV NTSC\r
139 }\r
140\r
141 // scale horizontal\r
142 scalw = (unsigned short)((float)escalaw *(W/320.0));\r
143 /* if there is no horizontal scaling, vertical doesn't work. Here is a nasty wrokaround... */\r
144 if (H != 240 && W == 320) scalw--;\r
145 gp2x_memregs[0x2906>>1]=scalw;\r
146 // scale vertical\r
147 gp2x_memregl[0x2908>>2]=(unsigned long)((float)escalah *bpp *(H/240.0));\r
148}\r
149\r
989672f4 150void gp2x_video_set_offs(int offs)\r
151{\r
152 gp2x_screen_offs = offs;\r
153}\r
b2b95d2e 154\r
7b356ee3 155void gp2x_video_wait_vsync(void)\r
156{\r
157 unsigned short v = gp2x_memregs[0x1182>>1];\r
158 while (!((v ^ gp2x_memregs[0x1182>>1]) & 0x10));\r
159}\r
160\r
161void gp2x_video_flush_cache(void)\r
162{\r
163 // since we are using the mmu hack, we must flush the cache first\r
164 // (the params are most likely wrong, but they seem to work somehow)\r
165 //flushcache(addr, addr + 320*240*2, 0);\r
166 flushcache(gp2x_screen, (char *)gp2x_screen + 320*240*2, 0);\r
167}\r
168\r
b2b95d2e 169void gp2x_memcpy_buffers(int buffers, void *data, int offset, int len)\r
170{\r
171 if (buffers & (1<<0)) memcpy((char *)gp2x_screens[0] + offset, data, len);\r
172 if (buffers & (1<<1)) memcpy((char *)gp2x_screens[1] + offset, data, len);\r
173 if (buffers & (1<<2)) memcpy((char *)gp2x_screens[2] + offset, data, len);\r
174 if (buffers & (1<<3)) memcpy((char *)gp2x_screens[3] + offset, data, len);\r
175}\r
176\r
177\r
178void gp2x_memcpy_all_buffers(void *data, int offset, int len)\r
179{\r
180 gp2x_memcpy_buffers(0xf, data, offset, len);\r
181}\r
182\r
183\r
184void gp2x_memset_all_buffers(int offset, int byte, int len)\r
185{\r
186 memset((char *)gp2x_screens[0] + offset, byte, len);\r
187 memset((char *)gp2x_screens[1] + offset, byte, len);\r
188 memset((char *)gp2x_screens[2] + offset, byte, len);\r
189 memset((char *)gp2x_screens[3] + offset, byte, len);\r
190}\r
191\r
192\r
193unsigned long gp2x_joystick_read(int allow_usb_joy)\r
194{\r
195 int i;\r
196 unsigned long value=(gp2x_memregs[0x1198>>1] & 0x00FF);\r
197 if(value==0xFD) value=0xFA;\r
198 if(value==0xF7) value=0xEB;\r
199 if(value==0xDF) value=0xAF;\r
200 if(value==0x7F) value=0xBE;\r
201 value = ~((gp2x_memregs[0x1184>>1] & 0xFF00) | value | (gp2x_memregs[0x1186>>1] << 16));\r
202\r
203 if (allow_usb_joy && num_of_joys > 0) {\r
204 // check the usb joy as well..\r
205 gp2x_usbjoy_update();\r
206 for (i = 0; i < num_of_joys; i++)\r
207 value |= gp2x_usbjoy_check(i);\r
208 }\r
209\r
210 return value;\r
211}\r
212\r
213static int s_oldrate = 0, s_oldbits = 0, s_oldstereo = 0;\r
214\r
215void gp2x_start_sound(int rate, int bits, int stereo)\r
216{\r
217 int frag = 0, bsize, buffers;\r
218\r
219 // if no settings change, we don't need to do anything\r
220 if (rate == s_oldrate && s_oldbits == bits && s_oldstereo == stereo) return;\r
221\r
222 if (sounddev > 0) close(sounddev);\r
223 sounddev = open("/dev/dsp", O_WRONLY|O_ASYNC);\r
224 if (sounddev == -1)\r
e6ee7529 225 {\r
b2b95d2e 226 printf("open(\"/dev/dsp\") failed with %i\n", errno);\r
e6ee7529 227 return;\r
228 }\r
b2b95d2e 229\r
230 ioctl(sounddev, SNDCTL_DSP_SPEED, &rate);\r
231 ioctl(sounddev, SNDCTL_DSP_SETFMT, &bits);\r
232 ioctl(sounddev, SNDCTL_DSP_STEREO, &stereo);\r
233 // calculate buffer size\r
234 buffers = 16;\r
235 bsize = rate / 32;\r
236 if (rate > 22050) { bsize*=4; buffers*=2; } // 44k mode seems to be very demanding\r
237 while ((bsize>>=1)) frag++;\r
238 frag |= buffers<<16; // 16 buffers\r
239 ioctl(sounddev, SNDCTL_DSP_SETFRAGMENT, &frag);\r
240 printf("gp2x_set_sound: %i/%ibit/%s, %i buffers of %i bytes\n",\r
241 rate, bits, stereo?"stereo":"mono", frag>>16, 1<<(frag&0xffff));\r
242\r
243 s_oldrate = rate; s_oldbits = bits; s_oldstereo = stereo;\r
244 usleep(100000);\r
245}\r
246\r
247\r
248void gp2x_sound_write(void *buff, int len)\r
249{\r
250 write(sounddev, buff, len);\r
251}\r
252\r
253void gp2x_sound_sync(void)\r
254{\r
255 ioctl(sounddev, SOUND_PCM_SYNC, 0);\r
256}\r
257\r
258void gp2x_sound_volume(int l, int r)\r
259{\r
260 l=l<0?0:l; l=l>255?255:l; r=r<0?0:r; r=r>255?255:r;\r
261 l<<=8; l|=r;\r
262 ioctl(mixerdev, SOUND_MIXER_WRITE_PCM, &l); /*SOUND_MIXER_WRITE_VOLUME*/\r
263}\r
264\r
265\r
266/* common */\r
267void gp2x_init(void)\r
268{\r
269 printf("entering init()\n"); fflush(stdout);\r
270\r
271 memdev = open("/dev/mem", O_RDWR);\r
272 if (memdev == -1)\r
273 {\r
274 printf("open(\"/dev/mem\") failed with %i\n", errno);\r
275 exit(1);\r
276 }\r
277\r
278 gp2x_memregs = mmap(0, 0x10000, PROT_READ|PROT_WRITE, MAP_SHARED, memdev, 0xc0000000);\r
279 printf("memregs are @ %p\n", gp2x_memregs);\r
280 if(gp2x_memregs == MAP_FAILED)\r
281 {\r
282 printf("mmap(memregs) failed with %i\n", errno);\r
283 exit(1);\r
284 }\r
285 gp2x_memregl = (unsigned long *) gp2x_memregs;\r
286\r
287 gp2x_screens[0] = mmap(0, FRAMEBUFF_WHOLESIZE, PROT_WRITE, MAP_SHARED, memdev, FRAMEBUFF_ADDR0);\r
288 if(gp2x_screens[0] == MAP_FAILED)\r
289 {\r
290 printf("mmap(gp2x_screen) failed with %i\n", errno);\r
291 exit(1);\r
292 }\r
293 printf("framebuffers point to %p\n", gp2x_screens[0]);\r
294 gp2x_screens[1] = (char *) gp2x_screens[0]+0x30000;\r
295 gp2x_screens[2] = (char *) gp2x_screens[1]+0x30000;\r
296 gp2x_screens[3] = (char *) gp2x_screens[2]+0x30000;\r
297\r
298 gp2x_screen = gp2x_screens[0];\r
299 screensel = 0;\r
300\r
301 gp2x_screenaddr_old[0] = gp2x_memregs[0x290E>>1];\r
302 gp2x_screenaddr_old[1] = gp2x_memregs[0x2910>>1];\r
303 gp2x_screenaddr_old[2] = gp2x_memregs[0x2912>>1];\r
304 gp2x_screenaddr_old[3] = gp2x_memregs[0x2914>>1];\r
305\r
b2b95d2e 306 gp2x_memset_all_buffers(0, 0, 320*240*2);\r
307\r
308 // snd\r
309 mixerdev = open("/dev/mixer", O_RDWR);\r
310 if (mixerdev == -1)\r
311 printf("open(\"/dev/mixer\") failed with %i\n", errno);\r
312\r
313 /* init usb joys -GnoStiC */\r
314 gp2x_usbjoy_init();\r
315\r
316 printf("exitting init()\n"); fflush(stdout);\r
317}\r
318\r
319char *ext_menu = 0, *ext_state = 0;\r
320\r
321void gp2x_deinit(void)\r
322{\r
323 gp2x_video_changemode(15);\r
324 gp2x_memregs[0x290E>>1] = gp2x_screenaddr_old[0];\r
325 gp2x_memregs[0x2910>>1] = gp2x_screenaddr_old[1];\r
326 gp2x_memregs[0x2912>>1] = gp2x_screenaddr_old[2];\r
327 gp2x_memregs[0x2914>>1] = gp2x_screenaddr_old[3];\r
328\r
cc981841 329 gp2x_usbjoy_deinit();\r
330\r
b2b95d2e 331 munmap(gp2x_screens[0], FRAMEBUFF_WHOLESIZE);\r
332 munmap((void *)gp2x_memregs, 0x10000);\r
333 close(memdev);\r
334 close(mixerdev);\r
335 if (sounddev > 0) close(sounddev);\r
336\r
b2b95d2e 337 printf("all done, running ");\r
338\r
339 // Zaq121's alternative frontend support from MAME\r
340 if(ext_menu && ext_state) {\r
341 printf("%s -state %s\n", ext_menu, ext_state);\r
342 execl(ext_menu, ext_menu, "-state", ext_state, NULL);\r
343 } else if(ext_menu) {\r
344 printf("%s\n", ext_menu);\r
345 execl(ext_menu, ext_menu, NULL);\r
346 } else {\r
347 printf("gp2xmenu\n");\r
348 chdir("/usr/gp2x");\r
349 execl("gp2xmenu", "gp2xmenu", NULL);\r
350 }\r
351}\r
352\r
353\r