1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327 |
- /*
- * (C) Gražvydas "notaz" Ignotas, 2006-2011
- *
- * This work is licensed under the terms of any of these licenses
- * (at your option):
- * - GNU GPL, version 2 or later.
- * - GNU LGPL, version 2.1 or later.
- * See the COPYING file in the top-level directory.
- */
- #include <stdio.h>
- #include <string.h>
- #include <stdlib.h>
- #include <stdarg.h>
- #include <time.h>
- #include <locale.h> // savestate date
- #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;
- }
- static char tolower_simple(char c)
- {
- if ('A' <= c && c <= 'Z')
- c = c - 'A' + 'a';
- return c;
- }
- 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);
- }
- // use user's locale for savestate date display
- setlocale(LC_TIME, "");
- }
- 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 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 unsigned int me_read_onoff(const menu_entry *ent)
- {
- // guess var size based on mask to avoid reading too much
- if (ent->mask & 0xffff0000)
- return *(unsigned int *)ent->var & ent->mask;
- else if (ent->mask & 0xff00)
- return *(unsigned short *)ent->var & ent->mask;
- else
- return *(unsigned char *)ent->var & ent->mask;
- }
- static void me_toggle_onoff(menu_entry *ent)
- {
- // guess var size based on mask to avoid reading too much
- if (ent->mask & 0xffff0000)
- *(unsigned int *)ent->var ^= ent->mask;
- else if (ent->mask & 0xff00)
- *(unsigned short *)ent->var ^= ent->mask;
- else
- *(unsigned char *)ent->var ^= ent->mask;
- }
- 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;
- #ifdef MENU_ALIGN_LEFT
- if (x > 12) x = 12;
- #endif
- /* 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, leftname_end = 0;
- 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);
- leftname_end = x + (strlen(name) + 1) * me_mfont_w;
- }
- switch (ent->beh) {
- case MB_NONE:
- break;
- case MB_OPT_ONOFF:
- text_out16(x + col2_offs, y, me_read_onoff(ent) ? "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;
- for (i = 0; names[i] != NULL; i++) {
- offs = x + col2_offs;
- len = strlen(names[i]);
- if (len > 10)
- offs += (10 - len - 2) * me_mfont_w;
- if (offs < leftname_end)
- offs = leftname_end;
- if (i == *(unsigned char *)ent->var) {
- text_out16(offs, 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:
- me_toggle_onoff(entry);
- 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++)
- ;
- *(signed char *)entry->var += is_next ? 1 : -1;
- if (*(signed char *)entry->var < 0)
- *(signed char *)entry->var = 0;
- if (*(signed char *)entry->var >= c)
- *(signed char *)entry->var = c - 1;
- return 1;
- default:
- return 0;
- }
- }
- static void debug_menu_loop(void);
- static int me_loop_d(menu_entry *menu, int *menu_sel, void (*draw_prep)(void), void (*draw_more)(void))
- {
- int ret = 0, 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 0;
- }
- 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(NULL, 50) & (PBTN_MOK|PBTN_MBACK|PBTN_MENU));
- for (;;)
- {
- if (draw_prep != NULL)
- draw_prep();
- 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, NULL, 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;
- return ret;
- }
- static int me_loop(menu_entry *menu, int *menu_sel)
- {
- return me_loop_d(menu, menu_sel, NULL, NULL);
- }
- /* ***************************************** */
- static void draw_menu_message(const char *msg, void (*draw_more)(void))
- {
- int x, y, h, w, wt;
- const char *p;
- p = msg;
- 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 = msg; *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++;
- }
- if (draw_more != NULL)
- draw_more();
- 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(NULL, 50) & (PBTN_MENU|PBTN_MA2));
- inp = in_menu_wait(PBTN_MA3|PBTN_MBACK, NULL, 100);
- if (inp & PBTN_MA3)
- remove(fpath);
- }
- // -------------- ROM selector --------------
- 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 = fname2color(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 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 int dirent_seek_char(struct dirent **namelist, int len, int sel, char c)
- {
- int i;
- sel++;
- for (i = sel + 1; i != sel; i++) {
- if (i >= len)
- i = 1;
- if (tolower_simple(namelist[i]->d_name[0]) == c)
- break;
- }
- return i - 1;
- }
- static char *menu_loop_romsel(char *curr_path, int len)
- {
- struct dirent **namelist;
- int n, inp, sel = 0;
- char *ret = NULL, *fname = NULL;
- char cinp;
- 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
- // note: we don't show '.' so sel is namelist index - 1
- if (fname != NULL) {
- int i;
- for (i = 1; i < n; i++) {
- char *dname = namelist[i]->d_name;
- if (dname[0] == fname[0] && strcmp(dname, 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(NULL, 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|PBTN_CHAR, &cinp, 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_CHAR) sel = dirent_seek_char(namelist, n, sel, cinp);
- 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 (newdir == NULL)
- break;
- 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);
- }
- // restore curr_path
- if (fname != NULL) {
- n = strlen(curr_path);
- if (curr_path + n + 1 == fname)
- curr_path[n] = '/';
- }
- return ret;
- }
- // ------------ savestate loader ------------
- #define STATE_SLOT_COUNT 10
- static int state_slot_flags = 0;
- static int state_slot_times[STATE_SLOT_COUNT];
- static void state_check_slots(void)
- {
- int slot;
- state_slot_flags = 0;
- for (slot = 0; slot < STATE_SLOT_COUNT; slot++) {
- state_slot_times[slot] = 0;
- if (emu_check_save_file(slot, &state_slot_times[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;
- char time_buf[32];
- if (state_slot_flags & (1 << menu_sel))
- draw_savestate_bg(menu_sel);
- w = (13 + 2) * me_mfont_w;
- h = (1+2+STATE_SLOT_COUNT+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;
- #ifdef MENU_ALIGN_LEFT
- if (x > 12 + me_mfont_w * 2)
- x = 12 + me_mfont_w * 2;
- #endif
- 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, (23 + 2) * me_mfont_w + 4);
- /* draw all slots */
- for (i = 0; i < STATE_SLOT_COUNT; i++, y += me_mfont_h)
- {
- if (!(state_slot_flags & (1 << i)))
- strcpy(time_buf, "free");
- else {
- strcpy(time_buf, "USED");
- if (state_slot_times[i] != 0) {
- time_t time = state_slot_times[i];
- struct tm *t = localtime(&time);
- strftime(time_buf, sizeof(time_buf), "%x %R", t);
- }
- }
- text_out16(x, y, "SLOT %i (%s)", i, time_buf);
- }
- text_out16(x, y, "back");
- menu_draw_end();
- }
- static int menu_loop_savestate(int is_loading)
- {
- static int menu_sel = STATE_SLOT_COUNT;
- int menu_sel_max = STATE_SLOT_COUNT;
- 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, NULL, 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 < STATE_SLOT_COUNT) {
- 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 dev = 0, dev_last = IN_MAX_DEVS - 1;
- int can_combo = 1, type;
- static_buff[0] = 0;
- type = IN_BINDTYPE_EMU;
- if (player_idx >= 0) {
- can_combo = 0;
- type = IN_BINDTYPE_PLAYER12;
- }
- if (player_idx == 1)
- action_mask <<= 16;
- if (dev_id >= 0)
- dev = dev_last = dev_id;
- for (; dev <= dev_last; dev++) {
- int k, count = 0, combo = 0;
- const int *binds;
- binds = in_get_dev_binds(dev);
- if (binds == NULL)
- continue;
- in_get_config(dev, IN_CFG_BIND_COUNT, &count);
- in_get_config(dev, IN_CFG_DOES_COMBOS, &combo);
- combo = combo && can_combo;
- 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, k);
- len = strlen(static_buff);
- if (len) {
- strncat(static_buff, combo ? " + " : ", ",
- sizeof(static_buff) - len - 1);
- len += 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));
- if (dev_id < 0)
- dev_name = "(all devices)";
- else
- 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, bind_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;
- }
- dev_id = -1; // show all
- 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, NULL, 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 + 1; i++, dev_id--) {
- if (dev_id < -1)
- dev_id = IN_MAX_DEVS - 1;
- if (dev_id == -1 || 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 = -1;
- if (dev_id == -1 || 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(NULL, 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(&bind_dev_id, &is_down, NULL, -1);
- i = count_bound_keys(bind_dev_id, opts[sel].mask << mask_shift, bindtype);
- unbind = (i > 0);
- /* allow combos if device supports them */
- in_get_config(bind_dev_id, IN_CFG_DOES_COMBOS, &does_combos);
- if (i == 1 && bindtype == IN_BINDTYPE_EMU && does_combos)
- unbind = 0;
- if (unbind)
- in_unbind_all(bind_dev_id, opts[sel].mask << mask_shift, bindtype);
- in_bind_key(bind_dev_id, kc, opts[sel].mask << mask_shift, bindtype, 0);
- }
- }
|