X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=frontend%2Fcommon%2Fmenu.c;fp=frontend%2Fcommon%2Fmenu.c;h=1cb41c5734b03c8c9837ef6149ceba3814586331;hb=698517be481301b4525c29873134a67b8343af3c;hp=0000000000000000000000000000000000000000;hpb=1972732abfea710d3d7b61180971580d9e5081ce;p=pcsx_rearmed.git diff --git a/frontend/common/menu.c b/frontend/common/menu.c new file mode 100644 index 00000000..1cb41c57 --- /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 +#include +#include +#include + +#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); + } +} +