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
  11 #include <pspkernel.h>
  12 #include <pspiofilemgr.h>
  13 #include <pspdisplay.h>
  14 #include <psppower.h>
  15 #include <psprtc.h>
  16 #include <pspgu.h>
  17
  18 #include "psp.h"
  19 #include "emu.h"
  20 #include "../common/lprintf.h"
  21
  22 PSP_MODULE_INFO("PicoDrive", 0, 1, 34);
  23 PSP_HEAP_SIZE_MAX();
  24
  25 unsigned int __attribute__((aligned(16))) guCmdList[GU_CMDLIST_SIZE];
  26
  27 void *psp_screen = VRAM_FB0;
  28 static int current_screen = 0; /* front bufer */
  29
  30 static SceUID main_thread_id = -1;
  31
  32 #define ANALOG_DEADZONE 80
  33
  34 /* Exit callback */
  35 static int exit_callback(int arg1, int arg2, void *common)
  36 {
  37         sceKernelExitGame();
  38         return 0;
  39 }
  40
  41 /* Power Callback */
  42 static int power_callback(int unknown, int pwrflags, void *common)
  43 {
  44         /* check for power switch and suspending as one is manual and the other automatic */
  45         if (pwrflags & PSP_POWER_CB_POWER_SWITCH || pwrflags & PSP_POWER_CB_SUSPENDING)
  46         {
  47                 lprintf("power_callback: flags: 0x%08X: suspending\n", pwrflags);
  48                 engineState = PGS_Menu;
  49         }
  50         sceDisplayWaitVblankStart();
  51         return 0;
  52 }
  53
  54 /* Callback thread */
  55 static int callback_thread(SceSize args, void *argp)
  56 {
  57         int cbid;
  58
  59         lprintf("callback_thread started with id %08x, priority %i\n",
  60                 sceKernelGetThreadId(), sceKernelGetThreadCurrentPriority());
  61
  62         cbid = sceKernelCreateCallback("Exit Callback", exit_callback, NULL);
  63         sceKernelRegisterExitCallback(cbid);
  64         cbid = sceKernelCreateCallback("Power Callback", power_callback, NULL);
  65         scePowerRegisterCallback(0, cbid);
  66
  67         sceKernelSleepThreadCB();
  68
  69         return 0;
  70 }
  71
  72 void psp_init(void)
  73 {
  74         SceUID thid;
  75
  76         main_thread_id = sceKernelGetThreadId();
  77
  78         lprintf("running on %08x kernel\n", sceKernelDevkitVersion()),
  79         lprintf("entered psp_init, threadId %08x, priority %i\n", main_thread_id,
  80                 sceKernelGetThreadCurrentPriority());
  81
  82         thid = sceKernelCreateThread("update_thread", callback_thread, 0x11, 0xFA0, 0, 0);
  83         if (thid >= 0)
  84         {
  85                 sceKernelStartThread(thid, 0, 0);
  86         }
  87
  88         /* video */
  89         sceDisplaySetMode(0, 480, 272);
  90         sceDisplaySetFrameBuf(VRAM_FB1, 512, PSP_DISPLAY_PIXEL_FORMAT_565, PSP_DISPLAY_SETBUF_NEXTFRAME);
  91         current_screen = 1;
  92         psp_screen = VRAM_FB0;
  93
  94         /* gu */
  95         sceGuInit();
  96
  97         sceGuStart(GU_DIRECT, guCmdList);
  98         sceGuDrawBuffer(GU_PSM_5650, (void *)VRAMOFFS_FB0, 512);
  99         sceGuDispBuffer(480, 272, (void *)VRAMOFFS_FB1, 512); // don't care
 100         sceGuClear(GU_COLOR_BUFFER_BIT | GU_DEPTH_BUFFER_BIT);
 101         sceGuDepthBuffer((void *)VRAMOFFS_DEPTH, 512);
 102         sceGuOffset(2048 - (480 / 2), 2048 - (272 / 2));
 103         sceGuViewport(2048, 2048, 480, 272);
 104         sceGuDepthRange(0xc350, 0x2710);
 105         sceGuScissor(0, 0, 480, 272);
 106         sceGuEnable(GU_SCISSOR_TEST);
 107
 108         sceGuDepthMask(0xffff);
 109         sceGuDisable(GU_DEPTH_TEST);
 110
 111         sceGuFrontFace(GU_CW);
 112         sceGuEnable(GU_TEXTURE_2D);
 113         sceGuTexFunc(GU_TFX_REPLACE, GU_TCC_RGB);
 114         sceGuAmbientColor(0xffffffff);
 115         sceGuColor(0xffffffff);
 116         sceGuFinish();
 117         sceGuSync(0, 0);
 118
 119         sceDisplayWaitVblankStart();
 120         sceGuDisplay(GU_TRUE);
 121
 122
 123         /* input */
 124         sceCtrlSetSamplingCycle(0);
 125         sceCtrlSetSamplingMode(PSP_CTRL_MODE_ANALOG);
 126 }
 127
 128 void psp_finish(void)
 129 {
 130         lprintf("psp_finish..\n");
 131         sceGuTerm();
 132
 133         //sceKernelSleepThread();
 134         sceKernelExitGame();
 135 }
 136
 137 void psp_video_flip(int wait_vsync)
 138 {
 139         if (wait_vsync) sceDisplayWaitVblankStart();
 140         sceDisplaySetFrameBuf(psp_screen, 512, PSP_DISPLAY_PIXEL_FORMAT_565,
 141                 wait_vsync ? PSP_DISPLAY_SETBUF_IMMEDIATE : PSP_DISPLAY_SETBUF_NEXTFRAME);
 142         current_screen ^= 1;
 143         psp_screen = current_screen ? VRAM_FB0 : VRAM_FB1;
 144 }
 145
 146 void *psp_video_get_active_fb(void)
 147 {
 148         return current_screen ? VRAM_FB1 : VRAM_FB0;
 149 }
 150
 151 void psp_video_switch_to_single(void)
 152 {
 153         psp_screen = VRAM_FB0;
 154         sceDisplaySetFrameBuf(psp_screen, 512, PSP_DISPLAY_PIXEL_FORMAT_565, PSP_DISPLAY_SETBUF_NEXTFRAME);
 155         current_screen = 0;
 156 }
 157
 158 void psp_msleep(int ms)
 159 {
 160         sceKernelDelayThread(ms * 1000);
 161 }
 162
 163 unsigned int psp_pad_read(int blocking)
 164 {
 165         unsigned int buttons;
 166         SceCtrlData pad;
 167         if (blocking)
 168              sceCtrlReadBufferPositive(&pad, 1);
 169         else sceCtrlPeekBufferPositive(&pad, 1);
 170         buttons = pad.Buttons;
 171
 172         // analog..
 173         buttons &= ~(BTN_NUB_UP|BTN_NUB_DOWN|BTN_NUB_LEFT|BTN_NUB_RIGHT);
 174         if (pad.Lx < 128 - ANALOG_DEADZONE) buttons |= BTN_NUB_LEFT;
 175         if (pad.Lx > 128 + ANALOG_DEADZONE) buttons |= BTN_NUB_RIGHT;
 176         if (pad.Ly < 128 - ANALOG_DEADZONE) buttons |= BTN_NUB_UP;
 177         if (pad.Ly > 128 + ANALOG_DEADZONE) buttons |= BTN_NUB_DOWN;
 178
 179         return buttons;
 180 }
 181
 182 int psp_get_cpu_clock(void)
 183 {
 184         return scePowerGetCpuClockFrequencyInt();
 185 }
 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
 192         return ret;
 193 }
 194
 195 char *psp_get_status_line(void)
 196 {
 197         static char buff[64];
 198         int ret, bat_percent, bat_time;
 199         pspTime time;
 200
 201         ret = sceRtcGetCurrentClockLocalTime(&time);
 202         bat_percent = scePowerGetBatteryLifePercent();
 203         bat_time = scePowerGetBatteryLifeTime();
 204         if (ret < 0 || bat_percent < 0 || bat_time < 0) return NULL;
 205
 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
 212 /* alt logging */
 213 #define LOG_FILE "log.txt"
 214
 215 #ifndef LPRINTF_STDIO
 216 typedef struct _log_entry
 217 {
 218         char buff[256];
 219         struct _log_entry *next;
 220 } log_entry;
 221
 222 static log_entry *le_root = NULL;
 223 #endif
 224
 225 void lprintf_f(const char *fmt, ...)
 226 {
 227         va_list vl;
 228
 229 #ifdef LPRINTF_STDIO
 230         va_start(vl, fmt);
 231         vprintf(fmt, vl);
 232         va_end(vl);
 233 #else
 234         static SceUID logfd = -1;
 235         char buff[256];
 236         log_entry *le, *le1;
 237
 238         if (logfd == -2) return; // disabled
 239
 240         va_start(vl, fmt);
 241         vsnprintf(buff, sizeof(buff), fmt, vl);
 242         va_end(vl);
 243
 244         // note: this is still unsafe code
 245         if (main_thread_id != sceKernelGetThreadId())
 246         {
 247                 le = malloc(sizeof(*le));
 248                 if (le == NULL) return;
 249                 le->next = NULL;
 250                 strcpy(le->buff, buff);
 251                 if (le_root == NULL) le_root = le;
 252                 else {
 253                         for (le1 = le_root; le1->next != NULL; le1 = le1->next);
 254                         le1->next = le;
 255                 }
 256                 return;
 257         }
 258
 259         logfd = sceIoOpen(LOG_FILE, PSP_O_WRONLY|PSP_O_APPEND, 0777);
 260         if (logfd < 0) {
 261                 logfd = -2;
 262                 return;
 263         }
 264
 265         if (le_root != NULL)
 266         {
 267                 le1 = le_root;
 268                 le_root = NULL;
 269                 sceKernelDelayThread(1000);
 270                 while (le1 != NULL) {
 271                         le = le1;
 272                         le1 = le->next;
 273                         sceIoWrite(logfd, le->buff, strlen(le->buff));
 274                         free(le);
 275                 }
 276         }
 277
 278         sceIoWrite(logfd, buff, strlen(buff));
 279
 280         // make sure it gets flushed
 281         sceIoClose(logfd);
 282         logfd = -1;
 283 #endif
 284 }
 285
 286