psp.c 8.3 KB

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