ABC turbo
[picodrive.git] / platform / psp / psp.c
CommitLineData
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 25extern int pico_main(void);
26
27#ifndef FW15
28
052c0f86 29PSP_MODULE_INFO("PicoDrive", 0, 1, 50);
110df09c 30PSP_HEAP_SIZE_MAX();
1820b5a7 31
2445b7cb 32int main() { return pico_main(); } /* just a wrapper */
33
34#else
35
052c0f86 36PSP_MODULE_INFO("PicoDrive", 0x1000, 1, 50);
2445b7cb 37PSP_MAIN_THREAD_ATTR(0);
38
39int 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 61unsigned int __attribute__((aligned(16))) guCmdList[GU_CMDLIST_SIZE];
62
63void *psp_screen = VRAM_FB0;
ea08c296 64int psp_unhandled_suspend = 0;
65
1820b5a7 66static int current_screen = 0; /* front bufer */
67
110df09c 68static SceUID main_thread_id = -1;
69
9caf44b5 70#define ANALOG_DEADZONE 80
1820b5a7 71
72/* Exit callback */
73static int exit_callback(int arg1, int arg2, void *common)
74{
75 sceKernelExitGame();
76 return 0;
77}
78
b542be46 79/* Power Callback */
80static 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 */
109static 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
126void 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
188void psp_finish(void)
189{
aefb65bc 190 lprintf("psp_finish..\n");
1820b5a7 191 sceGuTerm();
192
193 //sceKernelSleepThread();
194 sceKernelExitGame();
195}
196
7d4906bf 197void 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
206void *psp_video_get_active_fb(void)
207{
9112b6ce 208 return current_screen ? VRAM_FB1 : VRAM_FB0;
1820b5a7 209}
210
211void 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
218void psp_msleep(int ms)
219{
220 sceKernelDelayThread(ms * 1000);
221}
222
7d4906bf 223unsigned 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 242int psp_get_cpu_clock(void)
243{
244 return scePowerGetCpuClockFrequencyInt();
245}
246
247int 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 255char *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 272void psp_wait_suspend(void)
273{
274 // probably should do something smarter here?
275 sceDisplayWaitVblankStart();
276}
277
ea08c296 278void 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 304typedef struct _log_entry
305{
306 char buff[256];
307 struct _log_entry *next;
308} log_entry;
7d4906bf 309
110df09c 310static 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 315void 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