+/*
+ * PicoDrive
+ * (C) notaz, 2007,2008
+ *
+ * This work is licensed under the terms of MAME license.
+ * See COPYING file in the top-level directory.
+ */
#include <stdio.h>
+#include <stdlib.h>
#include <stdarg.h>
#include <string.h>
+#include <unistd.h>
#include <pspkernel.h>
#include <pspiofilemgr.h>
#include <psppower.h>
#include <psprtc.h>
#include <pspgu.h>
+#include <pspsdk.h>
#include "psp.h"
#include "emu.h"
#include "../common/lprintf.h"
+#include "version.h"
-PSP_MODULE_INFO("PicoDrive", 0, 1, 34);
+extern int pico_main(void);
+
+#ifndef FW15
+
+PSP_MODULE_INFO("PicoDrive", 0, 1, 51);
+PSP_HEAP_SIZE_MAX();
+
+int main() { return pico_main(); } /* just a wrapper */
+
+#else
+
+PSP_MODULE_INFO("PicoDrive", 0x1000, 1, 51);
+PSP_MAIN_THREAD_ATTR(0);
+
+int main()
+{
+ SceUID thid;
+
+ /* this is the thing we need the kernel mode for */
+ pspSdkInstallNoDeviceCheckPatch();
+
+ thid = sceKernelCreateThread("pico_main", (SceKernelThreadEntry) pico_main, 32, 0x2000, PSP_THREAD_ATTR_USER, NULL);
+ if (thid >= 0)
+ sceKernelStartThread(thid, 0, 0);
+#ifndef GCOV
+ sceKernelExitDeleteThread(0);
+#else
+ while (engineState != PGS_Quit)
+ sceKernelDelayThread(1024 * 1024);
+#endif
+
+ return 0;
+}
+
+#endif
+
+int psp_unhandled_suspend = 0;
unsigned int __attribute__((aligned(16))) guCmdList[GU_CMDLIST_SIZE];
void *psp_screen = VRAM_FB0;
+
static int current_screen = 0; /* front bufer */
+static SceUID main_thread_id = -1;
+
#define ANALOG_DEADZONE 80
/* Exit callback */
/* Power Callback */
static int power_callback(int unknown, int pwrflags, void *common)
{
+ lprintf("power_callback: flags: 0x%08X\n", pwrflags);
+
/* check for power switch and suspending as one is manual and the other automatic */
- if (pwrflags & PSP_POWER_CB_POWER_SWITCH || pwrflags & PSP_POWER_CB_SUSPENDING)
+ if (pwrflags & PSP_POWER_CB_POWER_SWITCH || pwrflags & PSP_POWER_CB_SUSPENDING || pwrflags & PSP_POWER_CB_STANDBY)
{
- lprintf("power_callback: flags: 0x%08X: suspending\n", pwrflags);
- engineState = PGS_Menu;
+ psp_unhandled_suspend = 1;
+ if (engineState != PGS_Suspending)
+ engineStateSuspend = engineState;
+ sceKernelDelayThread(100000); // ??
}
- sceDisplayWaitVblankStart();
+ else if (pwrflags & PSP_POWER_CB_RESUME_COMPLETE)
+ {
+ engineState = PGS_SuspendWake;
+ }
+
+ //sceDisplayWaitVblankStart();
return 0;
}
void psp_init(void)
{
SceUID thid;
+ char buff[128], *r;
- lprintf("running in %08x kernel\n", sceKernelDevkitVersion()),
- lprintf("entered psp_init, threadId %08x, priority %i\n", sceKernelGetThreadId(),
+ /* fw 1.5 sometimes returns 8002032c, although getcwd works */
+ r = getcwd(buff, sizeof(buff));
+ if (r) sceIoChdir(buff);
+
+ main_thread_id = sceKernelGetThreadId();
+
+ lprintf("\n%s\n", "PicoDrive v" VERSION " " __DATE__ " " __TIME__);
+ lprintf("running on %08x kernel\n", sceKernelDevkitVersion()),
+ lprintf("entered psp_init, threadId %08x, priority %i\n", main_thread_id,
sceKernelGetThreadCurrentPriority());
- thid = sceKernelCreateThread("update_thread", callback_thread, 0x11, 0xFA0, 0, 0);
+ thid = sceKernelCreateThread("update_thread", callback_thread, 0x11, 0xFA0, 0, NULL);
if (thid >= 0)
{
sceKernelStartThread(thid, 0, 0);
void psp_finish(void)
{
+ lprintf("psp_finish..\n");
sceGuTerm();
//sceKernelSleepThread();
buttons = pad.Buttons;
// analog..
- buttons &= ~(BTN_NUB_UP|BTN_NUB_DOWN|BTN_NUB_LEFT|BTN_NUB_RIGHT);
- if (pad.Lx < 128 - ANALOG_DEADZONE) buttons |= BTN_NUB_LEFT;
- if (pad.Lx > 128 + ANALOG_DEADZONE) buttons |= BTN_NUB_RIGHT;
- if (pad.Ly < 128 - ANALOG_DEADZONE) buttons |= BTN_NUB_UP;
- if (pad.Ly > 128 + ANALOG_DEADZONE) buttons |= BTN_NUB_DOWN;
+ buttons &= ~(PBTN_NUB_UP|PBTN_NUB_DOWN|PBTN_NUB_LEFT|PBTN_NUB_RIGHT);
+ if (pad.Lx < 128 - ANALOG_DEADZONE) buttons |= PBTN_NUB_LEFT;
+ if (pad.Lx > 128 + ANALOG_DEADZONE) buttons |= PBTN_NUB_RIGHT;
+ if (pad.Ly < 128 - ANALOG_DEADZONE) buttons |= PBTN_NUB_UP;
+ if (pad.Ly > 128 + ANALOG_DEADZONE) buttons |= PBTN_NUB_DOWN;
return buttons;
}
return buff;
}
+void psp_wait_suspend(void)
+{
+ // probably should do something smarter here?
+ sceDisplayWaitVblankStart();
+}
+
+void psp_resume_suspend(void)
+{
+ // for some reason file IO doesn't seem to work
+ // after resume for some period of time, at least on 1.5
+ SceUID fd;
+ int i;
+ for (i = 0; i < 30; i++) {
+ fd = sceIoOpen("EBOOT.PBP", PSP_O_RDONLY, 0777);
+ if (fd >= 0) break;
+ sceKernelDelayThread(100 * 1024);
+ }
+ if (fd >= 0) sceIoClose(fd);
+ sceDisplayWaitVblankStart();
+ if (i < 30)
+ lprintf("io resumed after %i tries\n", i);
+ else {
+ lprintf("io resume failed with %08x\n", fd);
+ sceKernelDelayThread(500 * 1024);
+ }
+}
+
/* alt logging */
-#define LOG_FILE "log.log"
+#define LOG_FILE "log.txt"
-static SceUID logfd = -1;
+#ifndef LPRINTF_STDIO
+typedef struct _log_entry
+{
+ char buff[256];
+ struct _log_entry *next;
+} log_entry;
-void lprintf_f(const char *fmt, ...)
+static log_entry *le_root = NULL;
+#endif
+
+/* strange: if this function leaks memory (before psp_init() call?),
+ * resume after suspend breaks on 3.90 */
+void lprintf(const char *fmt, ...)
{
va_list vl;
+
+#ifdef LPRINTF_STDIO
+ va_start(vl, fmt);
+ vprintf(fmt, vl);
+ va_end(vl);
+#else
+ static SceUID logfd = -1;
+ static int msg_count = 0;
char buff[256];
+ log_entry *le, *le1;
if (logfd == -2) return; // disabled
- if (logfd < 0)
+ va_start(vl, fmt);
+ vsnprintf(buff, sizeof(buff), fmt, vl);
+ va_end(vl);
+
+ // note: this is still unsafe code
+ if (main_thread_id != sceKernelGetThreadId())
{
- logfd = sceIoOpen(LOG_FILE, PSP_O_WRONLY|PSP_O_APPEND, 0777);
- if (logfd < 0) {
- logfd = -2;
- return;
+ le = malloc(sizeof(*le));
+ if (le == NULL) return;
+ le->next = NULL;
+ strcpy(le->buff, buff);
+ if (le_root == NULL) le_root = le;
+ else {
+ for (le1 = le_root; le1->next != NULL; le1 = le1->next);
+ le1->next = le;
}
+ return;
}
- va_start(vl, fmt);
- vsnprintf(buff, sizeof(buff), fmt, vl);
- va_end(vl);
+ logfd = sceIoOpen(LOG_FILE, PSP_O_WRONLY|PSP_O_APPEND, 0777);
+ if (logfd < 0) {
+ if (msg_count == 0) logfd = -2;
+ return;
+ }
+
+ if (le_root != NULL)
+ {
+ le1 = le_root;
+ le_root = NULL;
+ sceKernelDelayThread(1000);
+ while (le1 != NULL) {
+ le = le1;
+ le1 = le->next;
+ sceIoWrite(logfd, le->buff, strlen(le->buff));
+ free(le);
+ msg_count++;
+ }
+ }
sceIoWrite(logfd, buff, strlen(buff));
+ msg_count++;
// make sure it gets flushed
sceIoClose(logfd);
logfd = -1;
+#endif
}