diff options
Diffstat (limited to 'frontend/common/menu.c')
| -rw-r--r-- | frontend/common/menu.c | 1247 |
1 files changed, 1247 insertions, 0 deletions
diff --git a/frontend/common/menu.c b/frontend/common/menu.c new file mode 100644 index 0000000..1cb41c5 --- /dev/null +++ b/frontend/common/menu.c @@ -0,0 +1,1247 @@ +// (c) Copyright 2006-2010 notaz, All rights reserved.
+// Free for non-commercial use.
+
+// For commercial use, separate licencing terms must be obtained.
+
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#include <stdarg.h>
+
+#include "menu.h"
+#include "fonts.h"
+#include "readpng.h"
+#include "lprintf.h"
+#include "input.h"
+#include "plat.h"
+#include "posix.h"
+
+static char static_buff[64];
+static int menu_error_time = 0;
+char menu_error_msg[64] = { 0, };
+void *g_menuscreen_ptr;
+void *g_menubg_src_ptr;
+void *g_menubg_ptr;
+
+#if !MSCREEN_SIZE_FIXED
+int g_menuscreen_w;
+int g_menuscreen_h;
+#endif
+
+static unsigned char *menu_font_data = NULL;
+static int menu_text_color = 0xffff; // default to white
+static int menu_sel_color = -1; // disabled
+
+/* note: these might become non-constant in future */
+#if MENU_X2
+static const int me_mfont_w = 16, me_mfont_h = 20;
+static const int me_sfont_w = 12, me_sfont_h = 20;
+#else
+static const int me_mfont_w = 8, me_mfont_h = 10;
+static const int me_sfont_w = 6, me_sfont_h = 10;
+#endif
+
+// draws text to current bbp16 screen
+static void text_out16_(int x, int y, const char *text, int color)
+{
+ int i, lh, tr, tg, tb, len;
+ unsigned short *dest = (unsigned short *)g_menuscreen_ptr + x + y * g_menuscreen_w;
+ tr = (color & 0xf800) >> 8;
+ tg = (color & 0x07e0) >> 3;
+ tb = (color & 0x001f) << 3;
+
+ if (text == (void *)1)
+ {
+ // selector symbol
+ text = "";
+ len = 1;
+ }
+ else
+ {
+ const char *p;
+ for (p = text; *p != 0 && *p != '\n'; p++)
+ ;
+ len = p - text;
+ }
+
+ lh = me_mfont_h;
+ if (y + lh > g_menuscreen_h)
+ lh = g_menuscreen_h - y;
+
+ for (i = 0; i < len; i++)
+ {
+ unsigned char *src = menu_font_data + (unsigned int)text[i] * me_mfont_w * me_mfont_h / 2;
+ unsigned short *dst = dest;
+ int u, l;
+
+ for (l = 0; l < lh; l++, dst += g_menuscreen_w - me_mfont_w)
+ {
+ for (u = me_mfont_w / 2; u > 0; u--, src++)
+ {
+ int c, r, g, b;
+ c = *src >> 4;
+ r = (*dst & 0xf800) >> 8;
+ g = (*dst & 0x07e0) >> 3;
+ b = (*dst & 0x001f) << 3;
+ r = (c^0xf)*r/15 + c*tr/15;
+ g = (c^0xf)*g/15 + c*tg/15;
+ b = (c^0xf)*b/15 + c*tb/15;
+ *dst++ = ((r<<8)&0xf800) | ((g<<3)&0x07e0) | (b>>3);
+ c = *src & 0xf;
+ r = (*dst & 0xf800) >> 8;
+ g = (*dst & 0x07e0) >> 3;
+ b = (*dst & 0x001f) << 3;
+ r = (c^0xf)*r/15 + c*tr/15;
+ g = (c^0xf)*g/15 + c*tg/15;
+ b = (c^0xf)*b/15 + c*tb/15;
+ *dst++ = ((r<<8)&0xf800) | ((g<<3)&0x07e0) | (b>>3);
+ }
+ }
+ dest += me_mfont_w;
+ }
+}
+
+void text_out16(int x, int y, const char *texto, ...)
+{
+ va_list args;
+ char buffer[256];
+ int maxw = (g_menuscreen_w - x) / me_mfont_w;
+
+ if (maxw < 0)
+ return;
+
+ va_start(args, texto);
+ vsnprintf(buffer, sizeof(buffer), texto, args);
+ va_end(args);
+
+ if (maxw > sizeof(buffer) - 1)
+ maxw = sizeof(buffer) - 1;
+ buffer[maxw] = 0;
+
+ text_out16_(x,y,buffer,menu_text_color);
+}
+
+/* draws in 6x8 font, might multiply size by integer */
+static void smalltext_out16_(int x, int y, const char *texto, int color)
+{
+ unsigned char *src;
+ unsigned short *dst;
+ int multiplier = me_sfont_w / 6;
+ int i;
+
+ for (i = 0;; i++, x += me_sfont_w)
+ {
+ unsigned char c = (unsigned char) texto[i];
+ int h = 8;
+
+ if (!c || c == '\n')
+ break;
+
+ src = fontdata6x8[c];
+ dst = (unsigned short *)g_menuscreen_ptr + x + y * g_menuscreen_w;
+
+ while (h--)
+ {
+ int m, w2, h2;
+ for (h2 = multiplier; h2 > 0; h2--)
+ {
+ for (m = 0x20; m; m >>= 1) {
+ if (*src & m)
+ for (w2 = multiplier; w2 > 0; w2--)
+ *dst++ = color;
+ else
+ dst += multiplier;
+ }
+
+ dst += g_menuscreen_w - me_sfont_w;
+ }
+ src++;
+ }
+ }
+}
+
+static void smalltext_out16(int x, int y, const char *texto, int color)
+{
+ char buffer[128];
+ int maxw = (g_menuscreen_w - x) / me_sfont_w;
+
+ if (maxw < 0)
+ return;
+
+ strncpy(buffer, texto, sizeof(buffer));
+ if (maxw > sizeof(buffer) - 1)
+ maxw = sizeof(buffer) - 1;
+ buffer[maxw] = 0;
+
+ smalltext_out16_(x, y, buffer, color);
+}
+
+static void menu_draw_selection(int x, int y, int w)
+{
+ int i, h;
+ unsigned short *dst, *dest;
+
+ text_out16_(x, y, (void *)1, (menu_sel_color < 0) ? menu_text_color : menu_sel_color);
+
+ if (menu_sel_color < 0) return; // no selection hilight
+
+ if (y > 0) y--;
+ dest = (unsigned short *)g_menuscreen_ptr + x + y * g_menuscreen_w + me_mfont_w * 2 - 2;
+ for (h = me_mfont_h + 1; h > 0; h--)
+ {
+ dst = dest;
+ for (i = w - (me_mfont_w * 2 - 2); i > 0; i--)
+ *dst++ = menu_sel_color;
+ dest += g_menuscreen_w;
+ }
+}
+
+static int parse_hex_color(char *buff)
+{
+ char *endp = buff;
+ int t = (int) strtoul(buff, &endp, 16);
+ if (endp != buff)
+#ifdef PSP
+ return ((t<<8)&0xf800) | ((t>>5)&0x07e0) | ((t>>19)&0x1f);
+#else
+ return ((t>>8)&0xf800) | ((t>>5)&0x07e0) | ((t>>3)&0x1f);
+#endif
+ return -1;
+}
+
+void menu_init(void)
+{
+ int i, c, l;
+ unsigned char *fd, *fds;
+ char buff[256];
+ FILE *f;
+
+ if (menu_font_data != NULL)
+ free(menu_font_data);
+
+ menu_font_data = calloc((MENU_X2 ? 256 * 320 : 128 * 160) / 2, 1);
+ if (menu_font_data == NULL)
+ return;
+
+ // generate default 8x10 font from fontdata8x8
+ for (c = 0, fd = menu_font_data; c < 256; c++)
+ {
+ for (l = 0; l < 8; l++)
+ {
+ unsigned char fd8x8 = fontdata8x8[c*8+l];
+ if (fd8x8&0x80) *fd = 0xf0;
+ if (fd8x8&0x40) *fd |= 0x0f; fd++;
+ if (fd8x8&0x20) *fd = 0xf0;
+ if (fd8x8&0x10) *fd |= 0x0f; fd++;
+ if (fd8x8&0x08) *fd = 0xf0;
+ if (fd8x8&0x04) *fd |= 0x0f; fd++;
+ if (fd8x8&0x02) *fd = 0xf0;
+ if (fd8x8&0x01) *fd |= 0x0f; fd++;
+ }
+ fd += 8*2/2; // 2 empty lines
+ }
+
+ if (MENU_X2) {
+ // expand default font
+ fds = menu_font_data + 128 * 160 / 2 - 4;
+ fd = menu_font_data + 256 * 320 / 2 - 1;
+ for (c = 255; c >= 0; c--)
+ {
+ for (l = 9; l >= 0; l--, fds -= 4)
+ {
+ for (i = 3; i >= 0; i--) {
+ int px = fds[i] & 0x0f;
+ *fd-- = px | (px << 4);
+ px = (fds[i] >> 4) & 0x0f;
+ *fd-- = px | (px << 4);
+ }
+ for (i = 3; i >= 0; i--) {
+ int px = fds[i] & 0x0f;
+ *fd-- = px | (px << 4);
+ px = (fds[i] >> 4) & 0x0f;
+ *fd-- = px | (px << 4);
+ }
+ }
+ }
+ }
+
+ // load custom font and selector (stored as 1st symbol in font table)
+ emu_make_path(buff, "skin/font.png", sizeof(buff));
+ readpng(menu_font_data, buff, READPNG_FONT,
+ MENU_X2 ? 256 : 128, MENU_X2 ? 320 : 160);
+ // default selector symbol is '>'
+ memcpy(menu_font_data, menu_font_data + ((int)'>') * me_mfont_w * me_mfont_h / 2,
+ me_mfont_w * me_mfont_h / 2);
+ emu_make_path(buff, "skin/selector.png", sizeof(buff));
+ readpng(menu_font_data, buff, READPNG_SELECTOR, me_mfont_w, me_mfont_h);
+
+ // load custom colors
+ emu_make_path(buff, "skin/skin.txt", sizeof(buff));
+ f = fopen(buff, "r");
+ if (f != NULL)
+ {
+ lprintf("found skin.txt\n");
+ while (!feof(f))
+ {
+ if (fgets(buff, sizeof(buff), f) == NULL)
+ break;
+ if (buff[0] == '#' || buff[0] == '/') continue; // comment
+ if (buff[0] == '\r' || buff[0] == '\n') continue; // empty line
+ if (strncmp(buff, "text_color=", 11) == 0)
+ {
+ int tmp = parse_hex_color(buff+11);
+ if (tmp >= 0) menu_text_color = tmp;
+ else lprintf("skin.txt: parse error for text_color\n");
+ }
+ else if (strncmp(buff, "selection_color=", 16) == 0)
+ {
+ int tmp = parse_hex_color(buff+16);
+ if (tmp >= 0) menu_sel_color = tmp;
+ else lprintf("skin.txt: parse error for selection_color\n");
+ }
+ else
+ lprintf("skin.txt: parse error: %s\n", buff);
+ }
+ fclose(f);
+ }
+}
+
+static void menu_draw_begin(int need_bg)
+{
+ plat_video_menu_begin();
+ if (need_bg)
+ memcpy(g_menuscreen_ptr, g_menubg_ptr, g_menuscreen_w * g_menuscreen_h * 2);
+}
+
+static void menu_draw_end(void)
+{
+ plat_video_menu_end();
+}
+
+static void menu_darken_bg(void *dst, void *src, int pixels, int darker)
+{
+ unsigned int *dest = dst;
+ unsigned int *sorc = src;
+ pixels /= 2;
+ if (darker)
+ {
+ while (pixels--)
+ {
+ unsigned int p = *sorc++;
+ *dest++ = ((p&0xf79ef79e)>>1) - ((p&0xc618c618)>>3);
+ }
+ }
+ else
+ {
+ while (pixels--)
+ {
+ unsigned int p = *sorc++;
+ *dest++ = (p&0xf79ef79e)>>1;
+ }
+ }
+}
+
+static void menu_enter(int is_rom_loaded)
+{
+ if (is_rom_loaded)
+ {
+ // darken the active framebuffer
+ menu_darken_bg(g_menubg_ptr, g_menubg_src_ptr, g_menuscreen_w * g_menuscreen_h, 1);
+ }
+ else
+ {
+ char buff[256];
+
+ // should really only happen once, on startup..
+ emu_make_path(buff, "skin/background.png", sizeof(buff));
+ if (readpng(g_menubg_ptr, buff, READPNG_BG, g_menuscreen_w, g_menuscreen_h) < 0)
+ memset(g_menubg_ptr, 0, g_menuscreen_w * g_menuscreen_h * 2);
+ }
+
+ plat_video_menu_enter(is_rom_loaded);
+}
+
+static int me_id2offset(const menu_entry *ent, menu_id id)
+{
+ int i;
+ for (i = 0; ent->name; ent++, i++)
+ if (ent->id == id) return i;
+
+ lprintf("%s: id %i not found\n", __FUNCTION__, id);
+ return 0;
+}
+
+static void me_enable(menu_entry *entries, menu_id id, int enable)
+{
+ int i = me_id2offset(entries, id);
+ entries[i].enabled = enable;
+}
+
+static int me_count(const menu_entry *ent)
+{
+ int ret;
+
+ for (ret = 0; ent->name; ent++, ret++)
+ ;
+
+ return ret;
+}
+
+static void me_draw(const menu_entry *entries, int sel, void (*draw_more)(void))
+{
+ const menu_entry *ent, *ent_sel = entries;
+ int x, y, w = 0, h = 0;
+ int offs, col2_offs = 27 * me_mfont_w;
+ int vi_sel_ln = 0;
+ const char *name;
+ int i, n;
+
+ /* calculate size of menu rect */
+ for (ent = entries, i = n = 0; ent->name; ent++, i++)
+ {
+ int wt;
+
+ if (!ent->enabled)
+ continue;
+
+ if (i == sel) {
+ ent_sel = ent;
+ vi_sel_ln = n;
+ }
+
+ name = NULL;
+ wt = strlen(ent->name) * me_mfont_w;
+ if (wt == 0 && ent->generate_name)
+ name = ent->generate_name(ent->id, &offs);
+ if (name != NULL)
+ wt = strlen(name) * me_mfont_w;
+
+ if (ent->beh != MB_NONE)
+ {
+ if (wt > col2_offs)
+ col2_offs = wt + me_mfont_w;
+ wt = col2_offs;
+
+ switch (ent->beh) {
+ case MB_NONE:
+ break;
+ case MB_OPT_ONOFF:
+ case MB_OPT_RANGE:
+ wt += me_mfont_w * 3;
+ break;
+ case MB_OPT_CUSTOM:
+ case MB_OPT_CUSTONOFF:
+ case MB_OPT_CUSTRANGE:
+ name = NULL;
+ offs = 0;
+ if (ent->generate_name != NULL)
+ name = ent->generate_name(ent->id, &offs);
+ if (name != NULL)
+ wt += (strlen(name) + offs) * me_mfont_w;
+ break;
+ case MB_OPT_ENUM:
+ wt += 10 * me_mfont_w;
+ break;
+ }
+ }
+
+ if (wt > w)
+ w = wt;
+ n++;
+ }
+ h = n * me_mfont_h;
+ w += me_mfont_w * 2; /* selector */
+
+ if (w > g_menuscreen_w) {
+ lprintf("width %d > %d\n", w, g_menuscreen_w);
+ w = g_menuscreen_w;
+ }
+ if (h > g_menuscreen_h) {
+ lprintf("height %d > %d\n", w, g_menuscreen_h);
+ h = g_menuscreen_h;
+ }
+
+ x = g_menuscreen_w / 2 - w / 2;
+ y = g_menuscreen_h / 2 - h / 2;
+
+ /* draw */
+ menu_draw_begin(1);
+ menu_draw_selection(x, y + vi_sel_ln * me_mfont_h, w);
+ x += me_mfont_w * 2;
+
+ for (ent = entries; ent->name; ent++)
+ {
+ const char **names;
+ int len;
+
+ if (!ent->enabled)
+ continue;
+
+ name = ent->name;
+ if (strlen(name) == 0) {
+ if (ent->generate_name)
+ name = ent->generate_name(ent->id, &offs);
+ }
+ if (name != NULL)
+ text_out16(x, y, name);
+
+ switch (ent->beh) {
+ case MB_NONE:
+ break;
+ case MB_OPT_ONOFF:
+ text_out16(x + col2_offs, y, (*(int *)ent->var & ent->mask) ? "ON" : "OFF");
+ break;
+ case MB_OPT_RANGE:
+ text_out16(x + col2_offs, y, "%i", *(int *)ent->var);
+ break;
+ case MB_OPT_CUSTOM:
+ case MB_OPT_CUSTONOFF:
+ case MB_OPT_CUSTRANGE:
+ name = NULL;
+ offs = 0;
+ if (ent->generate_name)
+ name = ent->generate_name(ent->id, &offs);
+ if (name != NULL)
+ text_out16(x + col2_offs + offs * me_mfont_w, y, "%s", name);
+ break;
+ case MB_OPT_ENUM:
+ names = (const char **)ent->data;
+ offs = 0;
+ for (i = 0; names[i] != NULL; i++) {
+ len = strlen(names[i]);
+ if (len > 10)
+ offs = 10 - len - 2;
+ if (i == *(int *)ent->var) {
+ text_out16(x + col2_offs + offs * me_mfont_w, y, "%s", names[i]);
+ break;
+ }
+ }
+ break;
+ }
+
+ y += me_mfont_h;
+ }
+
+ /* display help or message if we have one */
+ h = (g_menuscreen_h - h) / 2; // bottom area height
+ if (menu_error_msg[0] != 0) {
+ if (h >= me_mfont_h + 4)
+ text_out16(5, g_menuscreen_h - me_mfont_h - 4, menu_error_msg);
+ else
+ lprintf("menu msg doesn't fit!\n");
+
+ if (plat_get_ticks_ms() - menu_error_time > 2048)
+ menu_error_msg[0] = 0;
+ }
+ else if (ent_sel->help != NULL) {
+ const char *tmp = ent_sel->help;
+ int l;
+ for (l = 0; tmp != NULL && *tmp != 0; l++)
+ tmp = strchr(tmp + 1, '\n');
+ if (h >= l * me_sfont_h + 4)
+ for (tmp = ent_sel->help; l > 0; l--, tmp = strchr(tmp, '\n') + 1)
+ smalltext_out16(5, g_menuscreen_h - (l * me_sfont_h + 4), tmp, 0xffff);
+ }
+
+ if (draw_more != NULL)
+ draw_more();
+
+ menu_draw_end();
+}
+
+static int me_process(menu_entry *entry, int is_next, int is_lr)
+{
+ const char **names;
+ int c;
+ switch (entry->beh)
+ {
+ case MB_OPT_ONOFF:
+ case MB_OPT_CUSTONOFF:
+ *(int *)entry->var ^= entry->mask;
+ return 1;
+ case MB_OPT_RANGE:
+ case MB_OPT_CUSTRANGE:
+ c = is_lr ? 10 : 1;
+ *(int *)entry->var += is_next ? c : -c;
+ if (*(int *)entry->var < (int)entry->min)
+ *(int *)entry->var = (int)entry->max;
+ if (*(int *)entry->var > (int)entry->max)
+ *(int *)entry->var = (int)entry->min;
+ return 1;
+ case MB_OPT_ENUM:
+ names = (const char **)entry->data;
+ for (c = 0; names[c] != NULL; c++)
+ ;
+ *(int *)entry->var += is_next ? 1 : -1;
+ if (*(int *)entry->var < 0)
+ *(int *)entry->var = 0;
+ if (*(int *)entry->var >= c)
+ *(int *)entry->var = c - 1;
+ return 1;
+ default:
+ return 0;
+ }
+}
+
+static void debug_menu_loop(void);
+
+static void me_loop(menu_entry *menu, int *menu_sel, void (*draw_more)(void))
+{
+ int ret, inp, sel = *menu_sel, menu_sel_max;
+
+ menu_sel_max = me_count(menu) - 1;
+ if (menu_sel_max < 0) {
+ lprintf("no enabled menu entries\n");
+ return;
+ }
+
+ while ((!menu[sel].enabled || !menu[sel].selectable) && sel < menu_sel_max)
+ sel++;
+
+ /* make sure action buttons are not pressed on entering menu */
+ me_draw(menu, sel, NULL);
+ while (in_menu_wait_any(50) & (PBTN_MOK|PBTN_MBACK|PBTN_MENU));
+
+ for (;;)
+ {
+ me_draw(menu, sel, draw_more);
+ inp = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT|
+ PBTN_MOK|PBTN_MBACK|PBTN_MENU|PBTN_L|PBTN_R, 70);
+ if (inp & (PBTN_MENU|PBTN_MBACK))
+ break;
+
+ if (inp & PBTN_UP ) {
+ do {
+ sel--;
+ if (sel < 0)
+ sel = menu_sel_max;
+ }
+ while (!menu[sel].enabled || !menu[sel].selectable);
+ }
+ if (inp & PBTN_DOWN) {
+ do {
+ sel++;
+ if (sel > menu_sel_max)
+ sel = 0;
+ }
+ while (!menu[sel].enabled || !menu[sel].selectable);
+ }
+
+ /* a bit hacky but oh well */
+ if ((inp & (PBTN_L|PBTN_R)) == (PBTN_L|PBTN_R))
+ debug_menu_loop();
+
+ if (inp & (PBTN_LEFT|PBTN_RIGHT|PBTN_L|PBTN_R)) { /* multi choice */
+ if (me_process(&menu[sel], (inp & (PBTN_RIGHT|PBTN_R)) ? 1 : 0,
+ inp & (PBTN_L|PBTN_R)))
+ continue;
+ }
+
+ if (inp & (PBTN_MOK|PBTN_LEFT|PBTN_RIGHT|PBTN_L|PBTN_R))
+ {
+ /* require PBTN_MOK for MB_NONE */
+ if (menu[sel].handler != NULL && (menu[sel].beh != MB_NONE || (inp & PBTN_MOK))) {
+ ret = menu[sel].handler(menu[sel].id, inp);
+ if (ret) break;
+ menu_sel_max = me_count(menu) - 1; /* might change, so update */
+ }
+ }
+ }
+ *menu_sel = sel;
+}
+
+/* ***************************************** */
+
+static void draw_menu_credits(void)
+{
+ const char *creds, *p;
+ int x, y, h, w, wt;
+
+ p = creds = plat_get_credits();
+
+ for (h = 1, w = 0; *p != 0; h++) {
+ for (wt = 0; *p != 0 && *p != '\n'; p++)
+ wt++;
+
+ if (wt > w)
+ w = wt;
+ if (*p == 0)
+ break;
+ p++;
+ }
+
+ x = g_menuscreen_w / 2 - w * me_mfont_w / 2;
+ y = g_menuscreen_h / 2 - h * me_mfont_h / 2;
+ if (x < 0) x = 0;
+ if (y < 0) y = 0;
+
+ menu_draw_begin(1);
+
+ for (p = creds; *p != 0 && y <= g_menuscreen_h - me_mfont_h; y += me_mfont_h) {
+ text_out16(x, y, p);
+
+ for (; *p != 0 && *p != '\n'; p++)
+ ;
+ if (*p != 0)
+ p++;
+ }
+
+ menu_draw_end();
+}
+
+// -------------- del confirm ---------------
+
+static void do_delete(const char *fpath, const char *fname)
+{
+ int len, mid, inp;
+ const char *nm;
+ char tmp[64];
+
+ menu_draw_begin(1);
+
+ len = strlen(fname);
+ if (len > g_menuscreen_w / me_sfont_w)
+ len = g_menuscreen_w / me_sfont_w;
+
+ mid = g_menuscreen_w / 2;
+ text_out16(mid - me_mfont_w * 15 / 2, 8 * me_mfont_h, "About to delete");
+ smalltext_out16(mid - len * me_sfont_w / 2, 9 * me_mfont_h + 5, fname, 0xbdff);
+ text_out16(mid - me_mfont_w * 13 / 2, 11 * me_mfont_h, "Are you sure?");
+
+ nm = in_get_key_name(-1, -PBTN_MA3);
+ snprintf(tmp, sizeof(tmp), "(%s - confirm, ", nm);
+ len = strlen(tmp);
+ nm = in_get_key_name(-1, -PBTN_MBACK);
+ snprintf(tmp + len, sizeof(tmp) - len, "%s - cancel)", nm);
+ len = strlen(tmp);
+
+ text_out16(mid - me_mfont_w * len / 2, 12 * me_mfont_h, tmp);
+ menu_draw_end();
+
+ while (in_menu_wait_any(50) & (PBTN_MENU|PBTN_MA2));
+ inp = in_menu_wait(PBTN_MA3|PBTN_MBACK, 100);
+ if (inp & PBTN_MA3)
+ remove(fpath);
+}
+
+// -------------- ROM selector --------------
+
+// rrrr rggg gggb bbbb
+static unsigned short file2color(const char *fname)
+{
+ const char *ext = fname + strlen(fname) - 3;
+ static const char *rom_exts[] = { "zip", "bin", "smd", "gen", "iso", "cso", "cue" };
+ static const char *other_exts[] = { "gmv", "pat" };
+ int i;
+
+ if (ext < fname) ext = fname;
+ for (i = 0; i < array_size(rom_exts); i++)
+ if (strcasecmp(ext, rom_exts[i]) == 0) return 0xbdff; // FIXME: mk defines
+ for (i = 0; i < array_size(other_exts); i++)
+ if (strcasecmp(ext, other_exts[i]) == 0) return 0xaff5;
+ return 0xffff;
+}
+
+static void draw_dirlist(char *curdir, struct dirent **namelist, int n, int sel)
+{
+ int max_cnt, start, i, x, pos;
+ void *darken_ptr;
+
+ max_cnt = g_menuscreen_h / me_sfont_h;
+ start = max_cnt / 2 - sel;
+ n--; // exclude current dir (".")
+
+ menu_draw_begin(1);
+
+// if (!rom_loaded)
+// menu_darken_bg(gp2x_screen, 320*240, 0);
+
+ darken_ptr = (short *)g_menuscreen_ptr + g_menuscreen_w * max_cnt/2 * me_sfont_h;
+ menu_darken_bg(darken_ptr, darken_ptr, g_menuscreen_w * me_sfont_h * 8 / 10, 0);
+
+ x = 5 + me_mfont_w + 1;
+ if (start - 2 >= 0)
+ smalltext_out16(14, (start - 2) * me_sfont_h, curdir, 0xffff);
+ for (i = 0; i < n; i++) {
+ pos = start + i;
+ if (pos < 0) continue;
+ if (pos >= max_cnt) break;
+ if (namelist[i+1]->d_type == DT_DIR) {
+ smalltext_out16(x, pos * me_sfont_h, "/", 0xfff6);
+ smalltext_out16(x + me_sfont_w, pos * me_sfont_h, namelist[i+1]->d_name, 0xfff6);
+ } else {
+ unsigned short color = file2color(namelist[i+1]->d_name);
+ smalltext_out16(x, pos * me_sfont_h, namelist[i+1]->d_name, color);
+ }
+ }
+ smalltext_out16(5, max_cnt/2 * me_sfont_h, ">", 0xffff);
+ menu_draw_end();
+}
+
+static int scandir_cmp(const void *p1, const void *p2)
+{
+ const struct dirent **d1 = (const struct dirent **)p1;
+ const struct dirent **d2 = (const struct dirent **)p2;
+ if ((*d1)->d_type == (*d2)->d_type)
+ return alphasort(d1, d2);
+ if ((*d1)->d_type == DT_DIR)
+ return -1; // put before
+ if ((*d2)->d_type == DT_DIR)
+ return 1;
+
+ return alphasort(d1, d2);
+}
+
+static const char *filter_exts[] = {
+ ".mp3", ".MP3", ".srm", ".brm", "s.gz", ".mds", "bcfg", ".txt", ".htm", "html",
+ ".jpg", ".gpe"
+};
+
+static int scandir_filter(const struct dirent *ent)
+{
+ const char *p;
+ int i;
+
+ if (ent == NULL || ent->d_name == NULL) return 0;
+ if (strlen(ent->d_name) < 5) return 1;
+
+ p = ent->d_name + strlen(ent->d_name) - 4;
+
+ for (i = 0; i < array_size(filter_exts); i++)
+ if (strcmp(p, filter_exts[i]) == 0)
+ return 0;
+
+ return 1;
+}
+
+static char *menu_loop_romsel(char *curr_path, int len)
+{
+ struct dirent **namelist;
+ int n, inp, sel = 0;
+ char *ret = NULL, *fname = NULL;
+
+rescan:
+ // is this a dir or a full path?
+ if (!plat_is_dir(curr_path)) {
+ char *p = curr_path + strlen(curr_path) - 1;
+ for (; p > curr_path && *p != '/'; p--)
+ ;
+ *p = 0;
+ fname = p+1;
+ }
+
+ n = scandir(curr_path, &namelist, scandir_filter, (void *)scandir_cmp);
+ if (n < 0) {
+ char *t;
+ lprintf("menu_loop_romsel failed, dir: %s\n", curr_path);
+
+ // try root
+ t = getcwd(curr_path, len);
+ if (t == NULL)
+ plat_get_root_dir(curr_path, len);
+ n = scandir(curr_path, &namelist, scandir_filter, (void *)scandir_cmp);
+ if (n < 0) {
+ // oops, we failed
+ lprintf("menu_loop_romsel failed, dir: %s\n", curr_path);
+ return NULL;
+ }
+ }
+
+ // try to find sel
+ if (fname != NULL) {
+ int i;
+ for (i = 1; i < n; i++) {
+ if (strcmp(namelist[i]->d_name, fname) == 0) {
+ sel = i - 1;
+ break;
+ }
+ }
+ }
+
+ /* make sure action buttons are not pressed on entering menu */
+ draw_dirlist(curr_path, namelist, n, sel);
+ while (in_menu_wait_any(50) & (PBTN_MOK|PBTN_MBACK|PBTN_MENU))
+ ;
+
+ for (;;)
+ {
+ draw_dirlist(curr_path, namelist, n, sel);
+ inp = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT|
+ PBTN_L|PBTN_R|PBTN_MA2|PBTN_MOK|PBTN_MBACK|PBTN_MENU, 33);
+ if (inp & PBTN_UP ) { sel--; if (sel < 0) sel = n-2; }
+ if (inp & PBTN_DOWN) { sel++; if (sel > n-2) sel = 0; }
+ if (inp & PBTN_LEFT) { sel-=10; if (sel < 0) sel = 0; }
+ if (inp & PBTN_L) { sel-=24; if (sel < 0) sel = 0; }
+ if (inp & PBTN_RIGHT) { sel+=10; if (sel > n-2) sel = n-2; }
+ if (inp & PBTN_R) { sel+=24; if (sel > n-2) sel = n-2; }
+ if ((inp & PBTN_MOK) || (inp & (PBTN_MENU|PBTN_MA2)) == (PBTN_MENU|PBTN_MA2))
+ {
+ again:
+ if (namelist[sel+1]->d_type == DT_REG)
+ {
+ strcpy(rom_fname_reload, curr_path);
+ strcat(rom_fname_reload, "/");
+ strcat(rom_fname_reload, namelist[sel+1]->d_name);
+ if (inp & PBTN_MOK) { // return sel
+ ret = rom_fname_reload;
+ break;
+ }
+ do_delete(rom_fname_reload, namelist[sel+1]->d_name);
+ if (n > 0) {
+ while (n--) free(namelist[n]);
+ free(namelist);
+ }
+ goto rescan;
+ }
+ else if (namelist[sel+1]->d_type == DT_DIR)
+ {
+ int newlen;
+ char *p, *newdir;
+ if (!(inp & PBTN_MOK)) continue;
+ newlen = strlen(curr_path) + strlen(namelist[sel+1]->d_name) + 2;
+ newdir = malloc(newlen);
+ if (strcmp(namelist[sel+1]->d_name, "..") == 0) {
+ char *start = curr_path;
+ p = start + strlen(start) - 1;
+ while (*p == '/' && p > start) p--;
+ while (*p != '/' && p > start) p--;
+ if (p <= start) strcpy(newdir, "/");
+ else { strncpy(newdir, start, p-start); newdir[p-start] = 0; }
+ } else {
+ strcpy(newdir, curr_path);
+ p = newdir + strlen(newdir) - 1;
+ while (*p == '/' && p >= newdir) *p-- = 0;
+ strcat(newdir, "/");
+ strcat(newdir, namelist[sel+1]->d_name);
+ }
+ ret = menu_loop_romsel(newdir, newlen);
+ free(newdir);
+ break;
+ }
+ else
+ {
+ // unknown file type, happens on NTFS mounts. Try to guess.
+ FILE *tstf; int tmp;
+ strcpy(rom_fname_reload, curr_path);
+ strcat(rom_fname_reload, "/");
+ strcat(rom_fname_reload, namelist[sel+1]->d_name);
+ tstf = fopen(rom_fname_reload, "rb");
+ if (tstf != NULL)
+ {
+ if (fread(&tmp, 1, 1, tstf) > 0 || ferror(tstf) == 0)
+ namelist[sel+1]->d_type = DT_REG;
+ else namelist[sel+1]->d_type = DT_DIR;
+ fclose(tstf);
+ goto again;
+ }
+ }
+ }
+ if (inp & PBTN_MBACK)
+ break;
+ }
+
+ if (n > 0) {
+ while (n--) free(namelist[n]);
+ free(namelist);
+ }
+
+ return ret;
+}
+
+// ------------ savestate loader ------------
+
+static int state_slot_flags = 0;
+
+static void state_check_slots(void)
+{
+ int slot;
+
+ state_slot_flags = 0;
+
+ for (slot = 0; slot < 10; slot++) {
+ if (emu_check_save_file(slot))
+ state_slot_flags |= 1 << slot;
+ }
+}
+
+static void draw_savestate_bg(int slot);
+
+static void draw_savestate_menu(int menu_sel, int is_loading)
+{
+ int i, x, y, w, h;
+
+ if (state_slot_flags & (1 << menu_sel))
+ draw_savestate_bg(menu_sel);
+
+ w = (13 + 2) * me_mfont_w;
+ h = (1+2+10+1) * me_mfont_h;
+ x = g_menuscreen_w / 2 - w / 2;
+ if (x < 0) x = 0;
+ y = g_menuscreen_h / 2 - h / 2;
+ if (y < 0) y = 0;
+
+ menu_draw_begin(1);
+
+ text_out16(x, y, is_loading ? "Load state" : "Save state");
+ y += 3 * me_mfont_h;
+
+ menu_draw_selection(x - me_mfont_w * 2, y + menu_sel * me_mfont_h, (13 + 2) * me_mfont_w + 4);
+
+ /* draw all 10 slots */
+ for (i = 0; i < 10; i++, y += me_mfont_h)
+ {
+ text_out16(x, y, "SLOT %i (%s)", i, (state_slot_flags & (1 << i)) ? "USED" : "free");
+ }
+ text_out16(x, y, "back");
+
+ menu_draw_end();
+}
+
+static int menu_loop_savestate(int is_loading)
+{
+ static int menu_sel = 10;
+ int menu_sel_max = 10;
+ unsigned long inp = 0;
+ int ret = 0;
+
+ state_check_slots();
+
+ if (!(state_slot_flags & (1 << menu_sel)) && is_loading)
+ menu_sel = menu_sel_max;
+
+ for (;;)
+ {
+ draw_savestate_menu(menu_sel, is_loading);
+ inp = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_MOK|PBTN_MBACK, 100);
+ if (inp & PBTN_UP) {
+ do {
+ menu_sel--;
+ if (menu_sel < 0)
+ menu_sel = menu_sel_max;
+ } while (!(state_slot_flags & (1 << menu_sel)) && menu_sel != menu_sel_max && is_loading);
+ }
+ if (inp & PBTN_DOWN) {
+ do {
+ menu_sel++;
+ if (menu_sel > menu_sel_max)
+ menu_sel = 0;
+ } while (!(state_slot_flags & (1 << menu_sel)) && menu_sel != menu_sel_max && is_loading);
+ }
+ if (inp & PBTN_MOK) { // save/load
+ if (menu_sel < 10) {
+ state_slot = menu_sel;
+ if (emu_save_load_game(is_loading, 0)) {
+ me_update_msg(is_loading ? "Load failed" : "Save failed");
+ break;
+ }
+ ret = 1;
+ break;
+ }
+ break;
+ }
+ if (inp & PBTN_MBACK)
+ break;
+ }
+
+ return ret;
+}
+
+// -------------- key config --------------
+
+static char *action_binds(int player_idx, int action_mask, int dev_id)
+{
+ int k, count = 0, can_combo = 0, type;
+ const int *binds;
+
+ static_buff[0] = 0;
+
+ binds = in_get_dev_binds(dev_id);
+ if (binds == NULL)
+ return static_buff;
+
+ in_get_config(dev_id, IN_CFG_BIND_COUNT, &count);
+ in_get_config(dev_id, IN_CFG_DOES_COMBOS, &can_combo);
+
+ type = IN_BINDTYPE_EMU;
+ if (player_idx >= 0) {
+ can_combo = 0;
+ type = IN_BINDTYPE_PLAYER12;
+ }
+ if (player_idx == 1)
+ action_mask <<= 16;
+
+ for (k = 0; k < count; k++)
+ {
+ const char *xname;
+ int len;
+
+ if (!(binds[IN_BIND_OFFS(k, type)] & action_mask))
+ continue;
+
+ xname = in_get_key_name(dev_id, k);
+ len = strlen(static_buff);
+ if (len) {
+ strncat(static_buff, can_combo ? " + " : ", ",
+ sizeof(static_buff) - len - 1);
+ len += can_combo ? 3 : 2;
+ }
+ strncat(static_buff, xname, sizeof(static_buff) - len - 1);
+ }
+
+ return static_buff;
+}
+
+static int count_bound_keys(int dev_id, int action_mask, int bindtype)
+{
+ const int *binds;
+ int k, keys = 0;
+ int count = 0;
+
+ binds = in_get_dev_binds(dev_id);
+ if (binds == NULL)
+ return 0;
+
+ in_get_config(dev_id, IN_CFG_BIND_COUNT, &count);
+ for (k = 0; k < count; k++)
+ {
+ if (binds[IN_BIND_OFFS(k, bindtype)] & action_mask)
+ keys++;
+ }
+
+ return keys;
+}
+
+static void draw_key_config(const me_bind_action *opts, int opt_cnt, int player_idx,
+ int sel, int dev_id, int dev_count, int is_bind)
+{
+ char buff[64], buff2[32];
+ const char *dev_name;
+ int x, y, w, i;
+
+ w = ((player_idx >= 0) ? 20 : 30) * me_mfont_w;
+ x = g_menuscreen_w / 2 - w / 2;
+ y = (g_menuscreen_h - 4 * me_mfont_h) / 2 - (2 + opt_cnt) * me_mfont_h / 2;
+ if (x < me_mfont_w * 2)
+ x = me_mfont_w * 2;
+
+ menu_draw_begin(1);
+ if (player_idx >= 0)
+ text_out16(x, y, "Player %i controls", player_idx + 1);
+ else
+ text_out16(x, y, "Emulator controls");
+
+ y += 2 * me_mfont_h;
+ menu_draw_selection(x - me_mfont_w * 2, y + sel * me_mfont_h, w + 2 * me_mfont_w);
+
+ for (i = 0; i < opt_cnt; i++, y += me_mfont_h)
+ text_out16(x, y, "%s : %s", opts[i].name,
+ action_binds(player_idx, opts[i].mask, dev_id));
+
+ dev_name = in_get_dev_name(dev_id, 1, 1);
+ w = strlen(dev_name) * me_mfont_w;
+ if (w < 30 * me_mfont_w)
+ w = 30 * me_mfont_w;
+ if (w > g_menuscreen_w)
+ w = g_menuscreen_w;
+
+ x = g_menuscreen_w / 2 - w / 2;
+
+ if (!is_bind) {
+ snprintf(buff2, sizeof(buff2), "%s", in_get_key_name(-1, -PBTN_MOK));
+ snprintf(buff, sizeof(buff), "%s - bind, %s - clear", buff2,
+ in_get_key_name(-1, -PBTN_MA2));
+ text_out16(x, g_menuscreen_h - 4 * me_mfont_h, buff);
+ }
+ else
+ text_out16(x, g_menuscreen_h - 4 * me_mfont_h, "Press a button to bind/unbind");
+
+ if (dev_count > 1) {
+ text_out16(x, g_menuscreen_h - 3 * me_mfont_h, dev_name);
+ text_out16(x, g_menuscreen_h - 2 * me_mfont_h, "Press left/right for other devs");
+ }
+
+ menu_draw_end();
+}
+
+static void key_config_loop(const me_bind_action *opts, int opt_cnt, int player_idx)
+{
+ int i, sel = 0, menu_sel_max = opt_cnt - 1, does_combos = 0;
+ int dev_id, dev_count, kc, is_down, mkey;
+ int unbind, bindtype, mask_shift;
+
+ for (i = 0, dev_id = -1, dev_count = 0; i < IN_MAX_DEVS; i++) {
+ if (in_get_dev_name(i, 1, 0) != NULL) {
+ dev_count++;
+ if (dev_id < 0)
+ dev_id = i;
+ }
+ }
+
+ if (dev_id == -1) {
+ lprintf("no devs, can't do config\n");
+ return;
+ }
+
+ mask_shift = 0;
+ if (player_idx == 1)
+ mask_shift = 16;
+ bindtype = player_idx >= 0 ? IN_BINDTYPE_PLAYER12 : IN_BINDTYPE_EMU;
+
+ for (;;)
+ {
+ draw_key_config(opts, opt_cnt, player_idx, sel, dev_id, dev_count, 0);
+ mkey = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT|PBTN_MBACK|PBTN_MOK|PBTN_MA2, 100);
+ switch (mkey) {
+ case PBTN_UP: sel--; if (sel < 0) sel = menu_sel_max; continue;
+ case PBTN_DOWN: sel++; if (sel > menu_sel_max) sel = 0; continue;
+ case PBTN_LEFT:
+ for (i = 0, dev_id--; i < IN_MAX_DEVS; i++, dev_id--) {
+ if (dev_id < 0)
+ dev_id = IN_MAX_DEVS - 1;
+ if (in_get_dev_name(dev_id, 1, 0) != NULL)
+ break;
+ }
+ continue;
+ case PBTN_RIGHT:
+ for (i = 0, dev_id++; i < IN_MAX_DEVS; i++, dev_id++) {
+ if (dev_id >= IN_MAX_DEVS)
+ dev_id = 0;
+ if (in_get_dev_name(dev_id, 1, 0) != NULL)
+ break;
+ }
+ continue;
+ case PBTN_MBACK:
+ return;
+ case PBTN_MOK:
+ if (sel >= opt_cnt)
+ return;
+ while (in_menu_wait_any(30) & PBTN_MOK)
+ ;
+ break;
+ case PBTN_MA2:
+ in_unbind_all(dev_id, opts[sel].mask << mask_shift, bindtype);
+ continue;
+ default:continue;
+ }
+
+ draw_key_config(opts, opt_cnt, player_idx, sel, dev_id, dev_count, 1);
+
+ /* wait for some up event */
+ for (is_down = 1; is_down; )
+ kc = in_update_keycode(&dev_id, &is_down, -1);
+
+ i = count_bound_keys(dev_id, opts[sel].mask << mask_shift, bindtype);
+ unbind = (i > 0);
+
+ /* allow combos if device supports them */
+ in_get_config(dev_id, IN_CFG_DOES_COMBOS, &does_combos);
+ if (i == 1 && bindtype == IN_BINDTYPE_EMU && does_combos)
+ unbind = 0;
+
+ if (unbind)
+ in_unbind_all(dev_id, opts[sel].mask << mask_shift, bindtype);
+
+ in_bind_key(dev_id, kc, opts[sel].mask << mask_shift, bindtype, 0);
+ }
+}
+
|