psp.c 8.5 KB

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