8b99ab90 |
1 | // (c) Copyright 2007 notaz, All rights reserved. |
2 | // Free for non-commercial use. |
3 | |
4 | // For commercial use, separate licencing terms must be obtained. |
5 | |
7d4906bf |
6 | #include <stdio.h> |
110df09c |
7 | #include <stdlib.h> |
7d4906bf |
8 | #include <stdarg.h> |
9 | #include <string.h> |
ea08c296 |
10 | #include <unistd.h> |
7d4906bf |
11 | |
1820b5a7 |
12 | #include <pspkernel.h> |
7d4906bf |
13 | #include <pspiofilemgr.h> |
1820b5a7 |
14 | #include <pspdisplay.h> |
70357ce5 |
15 | #include <psppower.h> |
9caf44b5 |
16 | #include <psprtc.h> |
1820b5a7 |
17 | #include <pspgu.h> |
2445b7cb |
18 | #include <pspsdk.h> |
1820b5a7 |
19 | |
20 | #include "psp.h" |
b542be46 |
21 | #include "emu.h" |
1820b5a7 |
22 | #include "../common/lprintf.h" |
052c0f86 |
23 | #include "version.h" |
1820b5a7 |
24 | |
2445b7cb |
25 | extern int pico_main(void); |
26 | |
27 | #ifndef FW15 |
28 | |
052c0f86 |
29 | PSP_MODULE_INFO("PicoDrive", 0, 1, 50); |
110df09c |
30 | PSP_HEAP_SIZE_MAX(); |
1820b5a7 |
31 | |
2445b7cb |
32 | int main() { return pico_main(); } /* just a wrapper */ |
33 | |
34 | #else |
35 | |
052c0f86 |
36 | PSP_MODULE_INFO("PicoDrive", 0x1000, 1, 50); |
2445b7cb |
37 | PSP_MAIN_THREAD_ATTR(0); |
38 | |
39 | int main() |
40 | { |
41 | SceUID thid; |
42 | |
43 | /* this is the thing we need the kernel mode for */ |
44 | pspSdkInstallNoDeviceCheckPatch(); |
45 | |
46 | thid = sceKernelCreateThread("pico_main", (SceKernelThreadEntry) pico_main, 32, 0x2000, PSP_THREAD_ATTR_USER, NULL); |
47 | if (thid >= 0) |
48 | sceKernelStartThread(thid, 0, 0); |
ff6b7429 |
49 | #ifndef GCOV |
2445b7cb |
50 | sceKernelExitDeleteThread(0); |
ff6b7429 |
51 | #else |
52 | while (engineState != PGS_Quit) |
53 | sceKernelDelayThread(1024 * 1024); |
54 | #endif |
2445b7cb |
55 | |
56 | return 0; |
57 | } |
58 | |
59 | #endif |
60 | |
9112b6ce |
61 | unsigned int __attribute__((aligned(16))) guCmdList[GU_CMDLIST_SIZE]; |
62 | |
63 | void *psp_screen = VRAM_FB0; |
ea08c296 |
64 | int psp_unhandled_suspend = 0; |
65 | |
1820b5a7 |
66 | static int current_screen = 0; /* front bufer */ |
67 | |
110df09c |
68 | static SceUID main_thread_id = -1; |
69 | |
9caf44b5 |
70 | #define ANALOG_DEADZONE 80 |
1820b5a7 |
71 | |
72 | /* Exit callback */ |
73 | static int exit_callback(int arg1, int arg2, void *common) |
74 | { |
75 | sceKernelExitGame(); |
76 | return 0; |
77 | } |
78 | |
b542be46 |
79 | /* Power Callback */ |
80 | static int power_callback(int unknown, int pwrflags, void *common) |
81 | { |
7d0143a2 |
82 | static int old_state = PGS_Menu; |
052c0f86 |
83 | int i; |
7d0143a2 |
84 | |
85 | lprintf("power_callback: flags: 0x%08X\n", pwrflags); |
86 | |
b542be46 |
87 | /* check for power switch and suspending as one is manual and the other automatic */ |
7d0143a2 |
88 | if (pwrflags & PSP_POWER_CB_POWER_SWITCH || pwrflags & PSP_POWER_CB_SUSPENDING || pwrflags & PSP_POWER_CB_STANDBY) |
b542be46 |
89 | { |
052c0f86 |
90 | if (engineState != PGS_Suspending && engineState != PGS_SuspendAck) { |
7d0143a2 |
91 | old_state = engineState; |
92 | engineState = PGS_Suspending; |
93 | } |
052c0f86 |
94 | for (i = 0; i < 10 && engineState != PGS_SuspendAck; i++) |
95 | sceKernelDelayThread(100*1024); |
96 | |
b542be46 |
97 | } |
7d0143a2 |
98 | else if (pwrflags & PSP_POWER_CB_RESUME_COMPLETE) |
ea08c296 |
99 | { |
7d0143a2 |
100 | engineState = old_state; |
ea08c296 |
101 | psp_unhandled_suspend = 1; |
102 | } |
7d0143a2 |
103 | |
2445b7cb |
104 | //sceDisplayWaitVblankStart(); |
b542be46 |
105 | return 0; |
106 | } |
107 | |
1820b5a7 |
108 | /* Callback thread */ |
109 | static int callback_thread(SceSize args, void *argp) |
110 | { |
111 | int cbid; |
112 | |
4b167c12 |
113 | lprintf("callback_thread started with id %08x, priority %i\n", |
a4221917 |
114 | sceKernelGetThreadId(), sceKernelGetThreadCurrentPriority()); |
1820b5a7 |
115 | |
116 | cbid = sceKernelCreateCallback("Exit Callback", exit_callback, NULL); |
117 | sceKernelRegisterExitCallback(cbid); |
b542be46 |
118 | cbid = sceKernelCreateCallback("Power Callback", power_callback, NULL); |
119 | scePowerRegisterCallback(0, cbid); |
1820b5a7 |
120 | |
121 | sceKernelSleepThreadCB(); |
122 | |
123 | return 0; |
124 | } |
125 | |
126 | void psp_init(void) |
127 | { |
a4221917 |
128 | SceUID thid; |
ea08c296 |
129 | char buff[128], *r; |
130 | |
131 | /* fw 1.5 sometimes returns 8002032c, although getcwd works */ |
132 | r = getcwd(buff, sizeof(buff)); |
133 | if (r) sceIoChdir(buff); |
1820b5a7 |
134 | |
110df09c |
135 | main_thread_id = sceKernelGetThreadId(); |
136 | |
052c0f86 |
137 | lprintf("\n%s\n", "PicoDrive v" VERSION " " __DATE__ " " __TIME__); |
110df09c |
138 | lprintf("running on %08x kernel\n", sceKernelDevkitVersion()), |
139 | lprintf("entered psp_init, threadId %08x, priority %i\n", main_thread_id, |
a4221917 |
140 | sceKernelGetThreadCurrentPriority()); |
1820b5a7 |
141 | |
2445b7cb |
142 | thid = sceKernelCreateThread("update_thread", callback_thread, 0x11, 0xFA0, 0, NULL); |
1820b5a7 |
143 | if (thid >= 0) |
144 | { |
145 | sceKernelStartThread(thid, 0, 0); |
146 | } |
147 | |
148 | /* video */ |
149 | sceDisplaySetMode(0, 480, 272); |
9112b6ce |
150 | sceDisplaySetFrameBuf(VRAM_FB1, 512, PSP_DISPLAY_PIXEL_FORMAT_565, PSP_DISPLAY_SETBUF_NEXTFRAME); |
1820b5a7 |
151 | current_screen = 1; |
9112b6ce |
152 | psp_screen = VRAM_FB0; |
1820b5a7 |
153 | |
154 | /* gu */ |
155 | sceGuInit(); |
156 | |
9112b6ce |
157 | sceGuStart(GU_DIRECT, guCmdList); |
8ab3e3c1 |
158 | sceGuDrawBuffer(GU_PSM_5650, (void *)VRAMOFFS_FB0, 512); |
159 | sceGuDispBuffer(480, 272, (void *)VRAMOFFS_FB1, 512); // don't care |
9112b6ce |
160 | sceGuClear(GU_COLOR_BUFFER_BIT | GU_DEPTH_BUFFER_BIT); |
8ab3e3c1 |
161 | sceGuDepthBuffer((void *)VRAMOFFS_DEPTH, 512); |
9112b6ce |
162 | sceGuOffset(2048 - (480 / 2), 2048 - (272 / 2)); |
163 | sceGuViewport(2048, 2048, 480, 272); |
164 | sceGuDepthRange(0xc350, 0x2710); |
165 | sceGuScissor(0, 0, 480, 272); |
166 | sceGuEnable(GU_SCISSOR_TEST); |
9112b6ce |
167 | |
168 | sceGuDepthMask(0xffff); |
169 | sceGuDisable(GU_DEPTH_TEST); |
170 | |
171 | sceGuFrontFace(GU_CW); |
9112b6ce |
172 | sceGuEnable(GU_TEXTURE_2D); |
9112b6ce |
173 | sceGuTexFunc(GU_TFX_REPLACE, GU_TCC_RGB); |
8ab3e3c1 |
174 | sceGuAmbientColor(0xffffffff); |
175 | sceGuColor(0xffffffff); |
9112b6ce |
176 | sceGuFinish(); |
177 | sceGuSync(0, 0); |
178 | |
179 | sceDisplayWaitVblankStart(); |
180 | sceGuDisplay(GU_TRUE); |
181 | |
182 | |
1820b5a7 |
183 | /* input */ |
184 | sceCtrlSetSamplingCycle(0); |
9caf44b5 |
185 | sceCtrlSetSamplingMode(PSP_CTRL_MODE_ANALOG); |
1820b5a7 |
186 | } |
187 | |
188 | void psp_finish(void) |
189 | { |
aefb65bc |
190 | lprintf("psp_finish..\n"); |
1820b5a7 |
191 | sceGuTerm(); |
192 | |
193 | //sceKernelSleepThread(); |
194 | sceKernelExitGame(); |
195 | } |
196 | |
7d4906bf |
197 | void psp_video_flip(int wait_vsync) |
1820b5a7 |
198 | { |
7d4906bf |
199 | if (wait_vsync) sceDisplayWaitVblankStart(); |
70357ce5 |
200 | sceDisplaySetFrameBuf(psp_screen, 512, PSP_DISPLAY_PIXEL_FORMAT_565, |
201 | wait_vsync ? PSP_DISPLAY_SETBUF_IMMEDIATE : PSP_DISPLAY_SETBUF_NEXTFRAME); |
1820b5a7 |
202 | current_screen ^= 1; |
9112b6ce |
203 | psp_screen = current_screen ? VRAM_FB0 : VRAM_FB1; |
7d4906bf |
204 | } |
205 | |
206 | void *psp_video_get_active_fb(void) |
207 | { |
9112b6ce |
208 | return current_screen ? VRAM_FB1 : VRAM_FB0; |
1820b5a7 |
209 | } |
210 | |
211 | void psp_video_switch_to_single(void) |
212 | { |
9112b6ce |
213 | psp_screen = VRAM_FB0; |
1820b5a7 |
214 | sceDisplaySetFrameBuf(psp_screen, 512, PSP_DISPLAY_PIXEL_FORMAT_565, PSP_DISPLAY_SETBUF_NEXTFRAME); |
215 | current_screen = 0; |
216 | } |
217 | |
218 | void psp_msleep(int ms) |
219 | { |
220 | sceKernelDelayThread(ms * 1000); |
221 | } |
222 | |
7d4906bf |
223 | unsigned int psp_pad_read(int blocking) |
1820b5a7 |
224 | { |
9caf44b5 |
225 | unsigned int buttons; |
1820b5a7 |
226 | SceCtrlData pad; |
7d4906bf |
227 | if (blocking) |
228 | sceCtrlReadBufferPositive(&pad, 1); |
229 | else sceCtrlPeekBufferPositive(&pad, 1); |
9caf44b5 |
230 | buttons = pad.Buttons; |
231 | |
232 | // analog.. |
233 | buttons &= ~(BTN_NUB_UP|BTN_NUB_DOWN|BTN_NUB_LEFT|BTN_NUB_RIGHT); |
234 | if (pad.Lx < 128 - ANALOG_DEADZONE) buttons |= BTN_NUB_LEFT; |
235 | if (pad.Lx > 128 + ANALOG_DEADZONE) buttons |= BTN_NUB_RIGHT; |
236 | if (pad.Ly < 128 - ANALOG_DEADZONE) buttons |= BTN_NUB_UP; |
237 | if (pad.Ly > 128 + ANALOG_DEADZONE) buttons |= BTN_NUB_DOWN; |
1820b5a7 |
238 | |
9caf44b5 |
239 | return buttons; |
1820b5a7 |
240 | } |
241 | |
70357ce5 |
242 | int psp_get_cpu_clock(void) |
243 | { |
244 | return scePowerGetCpuClockFrequencyInt(); |
245 | } |
246 | |
247 | int psp_set_cpu_clock(int clock) |
248 | { |
249 | int ret = scePowerSetClockFrequency(clock, clock, clock/2); |
250 | if (ret != 0) lprintf("failed to set clock: %i\n", ret); |
251 | |
252 | return ret; |
253 | } |
254 | |
9caf44b5 |
255 | char *psp_get_status_line(void) |
256 | { |
257 | static char buff[64]; |
258 | int ret, bat_percent, bat_time; |
259 | pspTime time; |
260 | |
261 | ret = sceRtcGetCurrentClockLocalTime(&time); |
262 | bat_percent = scePowerGetBatteryLifePercent(); |
263 | bat_time = scePowerGetBatteryLifeTime(); |
264 | if (ret < 0 || bat_percent < 0 || bat_time < 0) return NULL; |
265 | |
266 | snprintf(buff, sizeof(buff), "%02i:%02i bat: %3i%%", time.hour, time.minutes, bat_percent); |
267 | if (!scePowerIsPowerOnline()) |
268 | snprintf(buff+strlen(buff), sizeof(buff)-strlen(buff), " (%i:%02i)", bat_time/60, bat_time%60); |
269 | return buff; |
270 | } |
271 | |
7d0143a2 |
272 | void psp_wait_suspend(void) |
273 | { |
274 | // probably should do something smarter here? |
275 | sceDisplayWaitVblankStart(); |
276 | } |
277 | |
ea08c296 |
278 | void psp_resume_suspend(void) |
279 | { |
280 | // for some reason file IO doesn't seem to work |
281 | // after resume for some period of time, at least on 1.5 |
282 | SceUID fd; |
283 | int i; |
284 | for (i = 0; i < 30; i++) { |
2b1f0e25 |
285 | fd = sceIoOpen("EBOOT.PBP", PSP_O_RDONLY, 0777); |
286 | if (fd >= 0) break; |
287 | sceKernelDelayThread(100 * 1024); |
ea08c296 |
288 | } |
289 | if (fd >= 0) sceIoClose(fd); |
290 | sceDisplayWaitVblankStart(); |
291 | psp_unhandled_suspend = 0; |
292 | if (i < 30) |
2b1f0e25 |
293 | lprintf("io resumed after %i tries\n", i); |
294 | else { |
295 | lprintf("io resume failed with %08x\n", fd); |
296 | sceKernelDelayThread(500 * 1024); |
297 | } |
ea08c296 |
298 | } |
299 | |
7d4906bf |
300 | /* alt logging */ |
110df09c |
301 | #define LOG_FILE "log.txt" |
302 | |
c6196c0f |
303 | #ifndef LPRINTF_STDIO |
110df09c |
304 | typedef struct _log_entry |
305 | { |
306 | char buff[256]; |
307 | struct _log_entry *next; |
308 | } log_entry; |
7d4906bf |
309 | |
110df09c |
310 | static log_entry *le_root = NULL; |
c6196c0f |
311 | #endif |
9caf44b5 |
312 | |
052c0f86 |
313 | /* strange: if this function leaks memory (before psp_init() call?), |
314 | * resume after suspend breaks on 3.90 */ |
7d0143a2 |
315 | void lprintf(const char *fmt, ...) |
7d4906bf |
316 | { |
317 | va_list vl; |
110df09c |
318 | |
319 | #ifdef LPRINTF_STDIO |
320 | va_start(vl, fmt); |
321 | vprintf(fmt, vl); |
322 | va_end(vl); |
323 | #else |
324 | static SceUID logfd = -1; |
ea08c296 |
325 | static int msg_count = 0; |
7d4906bf |
326 | char buff[256]; |
110df09c |
327 | log_entry *le, *le1; |
7d4906bf |
328 | |
9caf44b5 |
329 | if (logfd == -2) return; // disabled |
330 | |
110df09c |
331 | va_start(vl, fmt); |
332 | vsnprintf(buff, sizeof(buff), fmt, vl); |
333 | va_end(vl); |
334 | |
335 | // note: this is still unsafe code |
336 | if (main_thread_id != sceKernelGetThreadId()) |
7d4906bf |
337 | { |
110df09c |
338 | le = malloc(sizeof(*le)); |
339 | if (le == NULL) return; |
340 | le->next = NULL; |
341 | strcpy(le->buff, buff); |
342 | if (le_root == NULL) le_root = le; |
343 | else { |
344 | for (le1 = le_root; le1->next != NULL; le1 = le1->next); |
345 | le1->next = le; |
9caf44b5 |
346 | } |
110df09c |
347 | return; |
7d4906bf |
348 | } |
349 | |
110df09c |
350 | logfd = sceIoOpen(LOG_FILE, PSP_O_WRONLY|PSP_O_APPEND, 0777); |
351 | if (logfd < 0) { |
ea08c296 |
352 | if (msg_count == 0) logfd = -2; |
110df09c |
353 | return; |
354 | } |
355 | |
356 | if (le_root != NULL) |
357 | { |
358 | le1 = le_root; |
359 | le_root = NULL; |
360 | sceKernelDelayThread(1000); |
361 | while (le1 != NULL) { |
362 | le = le1; |
363 | le1 = le->next; |
364 | sceIoWrite(logfd, le->buff, strlen(le->buff)); |
365 | free(le); |
ea08c296 |
366 | msg_count++; |
110df09c |
367 | } |
368 | } |
7d4906bf |
369 | |
370 | sceIoWrite(logfd, buff, strlen(buff)); |
ea08c296 |
371 | msg_count++; |
9caf44b5 |
372 | |
373 | // make sure it gets flushed |
374 | sceIoClose(logfd); |
375 | logfd = -1; |
110df09c |
376 | #endif |
7d4906bf |
377 | } |
378 | |
379 | |