platform/psp/psp.c

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