psp.c 8.3 KB

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