2 * (C) GraÅžvydas "notaz" Ignotas, 2006-2012
\r
4 * This work is licensed under the terms of any of these licenses
\r
6 * - GNU GPL, version 2 or later.
\r
7 * - GNU LGPL, version 2.1 or later.
\r
9 * See the COPYING file in the top-level directory.
\r
17 #include <locale.h> // savestate date
\r
21 #include "readpng.h"
\r
22 #include "lprintf.h"
\r
27 static char static_buff[64];
\r
28 static int menu_error_time = 0;
\r
29 char menu_error_msg[64] = { 0, };
\r
30 void *g_menuscreen_ptr;
\r
31 void *g_menubg_src_ptr;
\r
37 static unsigned char *menu_font_data = NULL;
\r
38 static int menu_text_color = 0xfffe; // default to white
\r
39 static int menu_sel_color = -1; // disabled
\r
41 /* note: these might become non-constant in future */
\r
43 static const int me_mfont_w = 16, me_mfont_h = 20;
\r
44 static const int me_sfont_w = 12, me_sfont_h = 20;
\r
46 static const int me_mfont_w = 8, me_mfont_h = 10;
\r
47 static const int me_sfont_w = 6, me_sfont_h = 10;
\r
50 static int g_menu_filter_off;
\r
51 static int g_border_style;
\r
52 static int border_left, border_right, border_top, border_bottom;
\r
54 // draws text to current bbp16 screen
\r
55 static void text_out16_(int x, int y, const char *text, int color)
\r
57 int i, lh, tr, tg, tb, len;
\r
58 unsigned short *dest = (unsigned short *)g_menuscreen_ptr + x + y * g_menuscreen_w;
\r
59 tr = (color & 0xf800) >> 8;
\r
60 tg = (color & 0x07e0) >> 3;
\r
61 tb = (color & 0x001f) << 3;
\r
63 if (text == (void *)1)
\r
72 for (p = text; *p != 0 && *p != '\n'; p++)
\r
78 if (y + lh > g_menuscreen_h)
\r
79 lh = g_menuscreen_h - y;
\r
81 for (i = 0; i < len; i++)
\r
83 unsigned char *src = menu_font_data + (unsigned int)text[i] * me_mfont_w * me_mfont_h / 2;
\r
84 unsigned short *dst = dest;
\r
87 for (l = 0; l < lh; l++, dst += g_menuscreen_w - me_mfont_w)
\r
89 for (u = me_mfont_w / 2; u > 0; u--, src++)
\r
93 r = (*dst & 0xf800) >> 8;
\r
94 g = (*dst & 0x07e0) >> 3;
\r
95 b = (*dst & 0x001f) << 3;
\r
96 r = (c^0xf)*r/15 + c*tr/15;
\r
97 g = (c^0xf)*g/15 + c*tg/15;
\r
98 b = (c^0xf)*b/15 + c*tb/15;
\r
99 *dst++ = ((r<<8)&0xf800) | ((g<<3)&0x07e0) | (b>>3);
\r
101 r = (*dst & 0xf800) >> 8;
\r
102 g = (*dst & 0x07e0) >> 3;
\r
103 b = (*dst & 0x001f) << 3;
\r
104 r = (c^0xf)*r/15 + c*tr/15;
\r
105 g = (c^0xf)*g/15 + c*tg/15;
\r
106 b = (c^0xf)*b/15 + c*tb/15;
\r
107 *dst++ = ((r<<8)&0xf800) | ((g<<3)&0x07e0) | (b>>3);
\r
110 dest += me_mfont_w;
\r
113 if (x < border_left)
\r
115 if (x + i * me_mfont_w > border_right)
\r
116 border_right = x + i * me_mfont_w;
\r
117 if (y < border_top)
\r
119 if (y + me_mfont_h > border_bottom)
\r
120 border_bottom = y + me_mfont_h;
\r
123 void text_out16(int x, int y, const char *texto, ...)
\r
127 int maxw = (g_menuscreen_w - x) / me_mfont_w;
\r
132 va_start(args, texto);
\r
133 vsnprintf(buffer, sizeof(buffer), texto, args);
\r
136 if (maxw > sizeof(buffer) - 1)
\r
137 maxw = sizeof(buffer) - 1;
\r
140 text_out16_(x,y,buffer,menu_text_color);
\r
143 /* draws in 6x8 font, might multiply size by integer */
\r
144 static void smalltext_out16_(int x, int y, const char *texto, int color)
\r
146 unsigned char *src;
\r
147 unsigned short *dst;
\r
148 int multiplier = me_sfont_w / 6;
\r
151 for (i = 0;; i++, x += me_sfont_w)
\r
153 unsigned char c = (unsigned char) texto[i];
\r
156 if (!c || c == '\n')
\r
159 src = fontdata6x8[c];
\r
160 dst = (unsigned short *)g_menuscreen_ptr + x + y * g_menuscreen_w;
\r
165 for (h2 = multiplier; h2 > 0; h2--)
\r
167 for (m = 0x20; m; m >>= 1) {
\r
169 for (w2 = multiplier; w2 > 0; w2--)
\r
175 dst += g_menuscreen_w - me_sfont_w;
\r
182 static void smalltext_out16(int x, int y, const char *texto, int color)
\r
185 int maxw = (g_menuscreen_w - x) / me_sfont_w;
\r
190 strncpy(buffer, texto, sizeof(buffer));
\r
191 if (maxw > sizeof(buffer) - 1)
\r
192 maxw = sizeof(buffer) - 1;
\r
195 smalltext_out16_(x, y, buffer, color);
\r
198 static void menu_draw_selection(int x, int y, int w)
\r
201 unsigned short *dst, *dest;
\r
203 text_out16_(x, y, (void *)1, (menu_sel_color < 0) ? menu_text_color : menu_sel_color);
\r
205 if (menu_sel_color < 0) return; // no selection hilight
\r
208 dest = (unsigned short *)g_menuscreen_ptr + x + y * g_menuscreen_w + me_mfont_w * 2 - 2;
\r
209 for (h = me_mfont_h + 1; h > 0; h--)
\r
212 for (i = w - (me_mfont_w * 2 - 2); i > 0; i--)
\r
213 *dst++ = menu_sel_color;
\r
214 dest += g_menuscreen_w;
\r
218 static int parse_hex_color(char *buff)
\r
221 int t = (int) strtoul(buff, &endp, 16);
\r
224 return ((t<<8)&0xf800) | ((t>>5)&0x07e0) | ((t>>19)&0x1f);
\r
226 return ((t>>8)&0xf800) | ((t>>5)&0x07e0) | ((t>>3)&0x1f);
\r
231 static char tolower_simple(char c)
\r
233 if ('A' <= c && c <= 'Z')
\r
238 void menu_init_base(void)
\r
241 unsigned char *fd, *fds;
\r
245 if (menu_font_data != NULL)
\r
246 free(menu_font_data);
\r
248 menu_font_data = calloc((MENU_X2 ? 256 * 320 : 128 * 160) / 2, 1);
\r
249 if (menu_font_data == NULL)
\r
252 // generate default 8x10 font from fontdata8x8
\r
253 for (c = 0, fd = menu_font_data; c < 256; c++)
\r
255 for (l = 0; l < 8; l++)
\r
257 unsigned char fd8x8 = fontdata8x8[c*8+l];
\r
258 if (fd8x8&0x80) *fd = 0xf0;
\r
259 if (fd8x8&0x40) *fd |= 0x0f; fd++;
\r
260 if (fd8x8&0x20) *fd = 0xf0;
\r
261 if (fd8x8&0x10) *fd |= 0x0f; fd++;
\r
262 if (fd8x8&0x08) *fd = 0xf0;
\r
263 if (fd8x8&0x04) *fd |= 0x0f; fd++;
\r
264 if (fd8x8&0x02) *fd = 0xf0;
\r
265 if (fd8x8&0x01) *fd |= 0x0f; fd++;
\r
267 fd += 8*2/2; // 2 empty lines
\r
271 // expand default font
\r
272 fds = menu_font_data + 128 * 160 / 2 - 4;
\r
273 fd = menu_font_data + 256 * 320 / 2 - 1;
\r
274 for (c = 255; c >= 0; c--)
\r
276 for (l = 9; l >= 0; l--, fds -= 4)
\r
278 for (i = 3; i >= 0; i--) {
\r
279 int px = fds[i] & 0x0f;
\r
280 *fd-- = px | (px << 4);
\r
281 px = (fds[i] >> 4) & 0x0f;
\r
282 *fd-- = px | (px << 4);
\r
284 for (i = 3; i >= 0; i--) {
\r
285 int px = fds[i] & 0x0f;
\r
286 *fd-- = px | (px << 4);
\r
287 px = (fds[i] >> 4) & 0x0f;
\r
288 *fd-- = px | (px << 4);
\r
294 // load custom font and selector (stored as 1st symbol in font table)
\r
295 emu_make_path(buff, "skin/font.png", sizeof(buff));
\r
296 readpng(menu_font_data, buff, READPNG_FONT,
\r
297 MENU_X2 ? 256 : 128, MENU_X2 ? 320 : 160);
\r
298 // default selector symbol is '>'
\r
299 memcpy(menu_font_data, menu_font_data + ((int)'>') * me_mfont_w * me_mfont_h / 2,
\r
300 me_mfont_w * me_mfont_h / 2);
\r
301 emu_make_path(buff, "skin/selector.png", sizeof(buff));
\r
302 readpng(menu_font_data, buff, READPNG_SELECTOR, me_mfont_w, me_mfont_h);
\r
304 // load custom colors
\r
305 emu_make_path(buff, "skin/skin.txt", sizeof(buff));
\r
306 f = fopen(buff, "r");
\r
309 lprintf("found skin.txt\n");
\r
312 if (fgets(buff, sizeof(buff), f) == NULL)
\r
314 if (buff[0] == '#' || buff[0] == '/') continue; // comment
\r
315 if (buff[0] == '\r' || buff[0] == '\n') continue; // empty line
\r
316 if (strncmp(buff, "text_color=", 11) == 0)
\r
318 int tmp = parse_hex_color(buff+11);
\r
319 if (tmp >= 0) menu_text_color = tmp;
\r
320 else lprintf("skin.txt: parse error for text_color\n");
\r
322 else if (strncmp(buff, "selection_color=", 16) == 0)
\r
324 int tmp = parse_hex_color(buff+16);
\r
325 if (tmp >= 0) menu_sel_color = tmp;
\r
326 else lprintf("skin.txt: parse error for selection_color\n");
\r
329 lprintf("skin.txt: parse error: %s\n", buff);
\r
334 // use user's locale for savestate date display
\r
335 setlocale(LC_TIME, "");
\r
338 static void menu_darken_bg(void *dst, void *src, int pixels, int darker)
\r
340 unsigned int *dest = dst;
\r
341 unsigned int *sorc = src;
\r
347 unsigned int p = *sorc++;
\r
348 *dest++ = ((p&0xf79ef79e)>>1) - ((p&0xc618c618)>>3);
\r
355 unsigned int p = *sorc++;
\r
356 *dest++ = (p&0xf79ef79e)>>1;
\r
361 static void menu_darken_text_bg(void)
\r
363 int x, y, xmin, xmax, ymax, ls;
\r
364 unsigned short *screen = g_menuscreen_ptr;
\r
366 xmin = border_left - 3;
\r
369 xmax = border_right + 2;
\r
370 if (xmax > g_menuscreen_w - 1)
\r
371 xmax = g_menuscreen_w - 1;
\r
373 y = border_top - 3;
\r
376 ymax = border_bottom + 2;
\r
377 if (ymax > g_menuscreen_h - 1)
\r
378 ymax = g_menuscreen_h - 1;
\r
380 for (x = xmin; x <= xmax; x++)
\r
381 screen[y * g_menuscreen_w + x] = 0xa514;
\r
382 for (y++; y < ymax; y++)
\r
384 ls = y * g_menuscreen_w;
\r
385 screen[ls + xmin] = 0xffff;
\r
386 for (x = xmin + 1; x < xmax; x++)
\r
388 unsigned int p = screen[ls + x];
\r
389 if (p != menu_text_color)
\r
390 screen[ls + x] = ((p&0xf79e)>>1) - ((p&0xc618)>>3);
\r
392 screen[ls + xmax] = 0xffff;
\r
394 ls = y * g_menuscreen_w;
\r
395 for (x = xmin; x <= xmax; x++)
\r
396 screen[ls + x] = 0xffff;
\r
399 static int borders_pending;
\r
401 static void menu_reset_borders(void)
\r
403 border_left = g_menuscreen_w;
\r
405 border_top = g_menuscreen_h;
\r
409 static void menu_draw_begin(int need_bg, int no_borders)
\r
411 plat_video_menu_begin();
\r
413 menu_reset_borders();
\r
414 borders_pending = g_border_style && !no_borders;
\r
417 if (g_border_style && no_borders) {
\r
418 menu_darken_bg(g_menuscreen_ptr, g_menubg_ptr,
\r
419 g_menuscreen_w * g_menuscreen_h, 1);
\r
422 memcpy(g_menuscreen_ptr, g_menubg_ptr,
\r
423 g_menuscreen_w * g_menuscreen_h * 2);
\r
428 static void menu_draw_end(void)
\r
430 if (borders_pending)
\r
431 menu_darken_text_bg();
\r
432 plat_video_menu_end();
\r
435 static void menu_separation(void)
\r
437 if (borders_pending) {
\r
438 menu_darken_text_bg();
\r
439 menu_reset_borders();
\r
443 static int me_id2offset(const menu_entry *ent, menu_id id)
\r
446 for (i = 0; ent->name; ent++, i++)
\r
447 if (ent->id == id) return i;
\r
449 lprintf("%s: id %i not found\n", __FUNCTION__, id);
\r
453 static void me_enable(menu_entry *entries, menu_id id, int enable)
\r
455 int i = me_id2offset(entries, id);
\r
456 entries[i].enabled = enable;
\r
459 static int me_count(const menu_entry *ent)
\r
463 for (ret = 0; ent->name; ent++, ret++)
\r
469 static unsigned int me_read_onoff(const menu_entry *ent)
\r
471 // guess var size based on mask to avoid reading too much
\r
472 if (ent->mask & 0xffff0000)
\r
473 return *(unsigned int *)ent->var & ent->mask;
\r
474 else if (ent->mask & 0xff00)
\r
475 return *(unsigned short *)ent->var & ent->mask;
\r
477 return *(unsigned char *)ent->var & ent->mask;
\r
480 static void me_toggle_onoff(menu_entry *ent)
\r
482 // guess var size based on mask to avoid reading too much
\r
483 if (ent->mask & 0xffff0000)
\r
484 *(unsigned int *)ent->var ^= ent->mask;
\r
485 else if (ent->mask & 0xff00)
\r
486 *(unsigned short *)ent->var ^= ent->mask;
\r
488 *(unsigned char *)ent->var ^= ent->mask;
\r
491 static void me_draw(const menu_entry *entries, int sel, void (*draw_more)(void))
\r
493 const menu_entry *ent, *ent_sel = entries;
\r
494 int x, y, w = 0, h = 0;
\r
495 int offs, col2_offs = 27 * me_mfont_w;
\r
500 /* calculate size of menu rect */
\r
501 for (ent = entries, i = n = 0; ent->name; ent++, i++)
\r
514 wt = strlen(ent->name) * me_mfont_w;
\r
515 if (wt == 0 && ent->generate_name)
\r
516 name = ent->generate_name(ent->id, &offs);
\r
518 wt = strlen(name) * me_mfont_w;
\r
520 if (ent->beh != MB_NONE)
\r
522 if (wt > col2_offs)
\r
523 col2_offs = wt + me_mfont_w;
\r
526 switch (ent->beh) {
\r
531 wt += me_mfont_w * 3;
\r
533 case MB_OPT_CUSTOM:
\r
534 case MB_OPT_CUSTONOFF:
\r
535 case MB_OPT_CUSTRANGE:
\r
538 if (ent->generate_name != NULL)
\r
539 name = ent->generate_name(ent->id, &offs);
\r
541 wt += (strlen(name) + offs) * me_mfont_w;
\r
544 wt += 10 * me_mfont_w;
\r
553 h = n * me_mfont_h;
\r
554 w += me_mfont_w * 2; /* selector */
\r
556 if (w > g_menuscreen_w) {
\r
557 lprintf("width %d > %d\n", w, g_menuscreen_w);
\r
558 w = g_menuscreen_w;
\r
560 if (h > g_menuscreen_h) {
\r
561 lprintf("height %d > %d\n", w, g_menuscreen_h);
\r
562 h = g_menuscreen_h;
\r
565 x = g_menuscreen_w / 2 - w / 2;
\r
566 y = g_menuscreen_h / 2 - h / 2;
\r
567 #ifdef MENU_ALIGN_LEFT
\r
568 if (x > 12) x = 12;
\r
572 menu_draw_begin(1, 0);
\r
573 menu_draw_selection(x, y + vi_sel_ln * me_mfont_h, w);
\r
574 x += me_mfont_w * 2;
\r
576 for (ent = entries; ent->name; ent++)
\r
578 const char **names;
\r
579 int len, leftname_end = 0;
\r
585 if (strlen(name) == 0) {
\r
586 if (ent->generate_name)
\r
587 name = ent->generate_name(ent->id, &offs);
\r
589 if (name != NULL) {
\r
590 text_out16(x, y, name);
\r
591 leftname_end = x + (strlen(name) + 1) * me_mfont_w;
\r
594 switch (ent->beh) {
\r
598 text_out16(x + col2_offs, y, me_read_onoff(ent) ? "ON" : "OFF");
\r
601 text_out16(x + col2_offs, y, "%i", *(int *)ent->var);
\r
603 case MB_OPT_CUSTOM:
\r
604 case MB_OPT_CUSTONOFF:
\r
605 case MB_OPT_CUSTRANGE:
\r
608 if (ent->generate_name)
\r
609 name = ent->generate_name(ent->id, &offs);
\r
611 text_out16(x + col2_offs + offs * me_mfont_w, y, "%s", name);
\r
614 names = (const char **)ent->data;
\r
615 for (i = 0; names[i] != NULL; i++) {
\r
616 offs = x + col2_offs;
\r
617 len = strlen(names[i]);
\r
619 offs += (10 - len - 2) * me_mfont_w;
\r
620 if (offs < leftname_end)
\r
621 offs = leftname_end;
\r
622 if (i == *(unsigned char *)ent->var) {
\r
623 text_out16(offs, y, "%s", names[i]);
\r
635 /* display help or message if we have one */
\r
636 h = (g_menuscreen_h - h) / 2; // bottom area height
\r
637 if (menu_error_msg[0] != 0) {
\r
638 if (h >= me_mfont_h + 4)
\r
639 text_out16(5, g_menuscreen_h - me_mfont_h - 4, menu_error_msg);
\r
641 lprintf("menu msg doesn't fit!\n");
\r
643 if (plat_get_ticks_ms() - menu_error_time > 2048)
\r
644 menu_error_msg[0] = 0;
\r
646 else if (ent_sel->help != NULL) {
\r
647 const char *tmp = ent_sel->help;
\r
649 for (l = 0; tmp != NULL && *tmp != 0; l++)
\r
650 tmp = strchr(tmp + 1, '\n');
\r
651 if (h >= l * me_sfont_h + 4)
\r
652 for (tmp = ent_sel->help; l > 0; l--, tmp = strchr(tmp, '\n') + 1)
\r
653 smalltext_out16(5, g_menuscreen_h - (l * me_sfont_h + 4), tmp, 0xffff);
\r
658 if (draw_more != NULL)
\r
664 static int me_process(menu_entry *entry, int is_next, int is_lr)
\r
666 const char **names;
\r
668 switch (entry->beh)
\r
671 case MB_OPT_CUSTONOFF:
\r
672 me_toggle_onoff(entry);
\r
675 case MB_OPT_CUSTRANGE:
\r
676 c = is_lr ? 10 : 1;
\r
677 *(int *)entry->var += is_next ? c : -c;
\r
678 if (*(int *)entry->var < (int)entry->min)
\r
679 *(int *)entry->var = (int)entry->max;
\r
680 if (*(int *)entry->var > (int)entry->max)
\r
681 *(int *)entry->var = (int)entry->min;
\r
684 names = (const char **)entry->data;
\r
685 for (c = 0; names[c] != NULL; c++)
\r
687 *(signed char *)entry->var += is_next ? 1 : -1;
\r
688 if (*(signed char *)entry->var < 0)
\r
689 *(signed char *)entry->var = 0;
\r
690 if (*(signed char *)entry->var >= c)
\r
691 *(signed char *)entry->var = c - 1;
\r
698 static void debug_menu_loop(void);
\r
700 static int me_loop_d(menu_entry *menu, int *menu_sel, void (*draw_prep)(void), void (*draw_more)(void))
\r
702 int ret = 0, inp, sel = *menu_sel, menu_sel_max;
\r
704 menu_sel_max = me_count(menu) - 1;
\r
705 if (menu_sel_max < 0) {
\r
706 lprintf("no enabled menu entries\n");
\r
710 while ((!menu[sel].enabled || !menu[sel].selectable) && sel < menu_sel_max)
\r
713 /* make sure action buttons are not pressed on entering menu */
\r
714 me_draw(menu, sel, NULL);
\r
715 while (in_menu_wait_any(NULL, 50) & (PBTN_MOK|PBTN_MBACK|PBTN_MENU));
\r
719 if (draw_prep != NULL)
\r
722 me_draw(menu, sel, draw_more);
\r
723 inp = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT|
\r
724 PBTN_MOK|PBTN_MBACK|PBTN_MENU|PBTN_L|PBTN_R, NULL, 70);
\r
725 if (inp & (PBTN_MENU|PBTN_MBACK))
\r
728 if (inp & PBTN_UP ) {
\r
732 sel = menu_sel_max;
\r
734 while (!menu[sel].enabled || !menu[sel].selectable);
\r
736 if (inp & PBTN_DOWN) {
\r
739 if (sel > menu_sel_max)
\r
742 while (!menu[sel].enabled || !menu[sel].selectable);
\r
745 /* a bit hacky but oh well */
\r
746 if ((inp & (PBTN_L|PBTN_R)) == (PBTN_L|PBTN_R))
\r
749 if (inp & (PBTN_LEFT|PBTN_RIGHT|PBTN_L|PBTN_R)) { /* multi choice */
\r
750 if (me_process(&menu[sel], (inp & (PBTN_RIGHT|PBTN_R)) ? 1 : 0,
\r
751 inp & (PBTN_L|PBTN_R)))
\r
755 if (inp & (PBTN_MOK|PBTN_LEFT|PBTN_RIGHT|PBTN_L|PBTN_R))
\r
757 /* require PBTN_MOK for MB_NONE */
\r
758 if (menu[sel].handler != NULL && (menu[sel].beh != MB_NONE || (inp & PBTN_MOK))) {
\r
759 ret = menu[sel].handler(menu[sel].id, inp);
\r
761 menu_sel_max = me_count(menu) - 1; /* might change, so update */
\r
770 static int me_loop(menu_entry *menu, int *menu_sel)
\r
772 return me_loop_d(menu, menu_sel, NULL, NULL);
\r
775 /* ***************************************** */
\r
777 static void draw_menu_message(const char *msg, void (*draw_more)(void))
\r
779 int x, y, h, w, wt;
\r
783 for (h = 1, w = 0; *p != 0; h++) {
\r
784 for (wt = 0; *p != 0 && *p != '\n'; p++)
\r
794 x = g_menuscreen_w / 2 - w * me_mfont_w / 2;
\r
795 y = g_menuscreen_h / 2 - h * me_mfont_h / 2;
\r
799 menu_draw_begin(1, 0);
\r
801 for (p = msg; *p != 0 && y <= g_menuscreen_h - me_mfont_h; y += me_mfont_h) {
\r
802 text_out16(x, y, p);
\r
804 for (; *p != 0 && *p != '\n'; p++)
\r
812 if (draw_more != NULL)
\r
818 // -------------- del confirm ---------------
\r
820 static void do_delete(const char *fpath, const char *fname)
\r
826 menu_draw_begin(1, 0);
\r
828 len = strlen(fname);
\r
829 if (len > g_menuscreen_w / me_sfont_w)
\r
830 len = g_menuscreen_w / me_sfont_w;
\r
832 mid = g_menuscreen_w / 2;
\r
833 text_out16(mid - me_mfont_w * 15 / 2, 8 * me_mfont_h, "About to delete");
\r
834 smalltext_out16(mid - len * me_sfont_w / 2, 9 * me_mfont_h + 5, fname, 0xbdff);
\r
835 text_out16(mid - me_mfont_w * 13 / 2, 11 * me_mfont_h, "Are you sure?");
\r
837 nm = in_get_key_name(-1, -PBTN_MA3);
\r
838 snprintf(tmp, sizeof(tmp), "(%s - confirm, ", nm);
\r
840 nm = in_get_key_name(-1, -PBTN_MBACK);
\r
841 snprintf(tmp + len, sizeof(tmp) - len, "%s - cancel)", nm);
\r
844 text_out16(mid - me_mfont_w * len / 2, 12 * me_mfont_h, tmp);
\r
847 while (in_menu_wait_any(NULL, 50) & (PBTN_MENU|PBTN_MA2));
\r
848 inp = in_menu_wait(PBTN_MA3|PBTN_MBACK, NULL, 100);
\r
849 if (inp & PBTN_MA3)
\r
853 // -------------- ROM selector --------------
\r
855 static void draw_dirlist(char *curdir, struct dirent **namelist,
\r
856 int n, int sel, int show_help)
\r
858 int max_cnt, start, i, x, pos;
\r
862 max_cnt = g_menuscreen_h / me_sfont_h;
\r
863 start = max_cnt / 2 - sel;
\r
864 n--; // exclude current dir (".")
\r
866 menu_draw_begin(1, 1);
\r
868 // if (!rom_loaded)
\r
869 // menu_darken_bg(gp2x_screen, 320*240, 0);
\r
871 darken_ptr = (short *)g_menuscreen_ptr + g_menuscreen_w * max_cnt/2 * me_sfont_h;
\r
872 menu_darken_bg(darken_ptr, darken_ptr, g_menuscreen_w * me_sfont_h * 8 / 10, 0);
\r
874 x = 5 + me_mfont_w + 1;
\r
875 if (start - 2 >= 0)
\r
876 smalltext_out16(14, (start - 2) * me_sfont_h, curdir, 0xffff);
\r
877 for (i = 0; i < n; i++) {
\r
879 if (pos < 0) continue;
\r
880 if (pos >= max_cnt) break;
\r
881 if (namelist[i+1]->d_type == DT_DIR) {
\r
882 smalltext_out16(x, pos * me_sfont_h, "/", 0xfff6);
\r
883 smalltext_out16(x + me_sfont_w, pos * me_sfont_h, namelist[i+1]->d_name, 0xfff6);
\r
885 unsigned short color = fname2color(namelist[i+1]->d_name);
\r
886 smalltext_out16(x, pos * me_sfont_h, namelist[i+1]->d_name, color);
\r
889 smalltext_out16(5, max_cnt/2 * me_sfont_h, ">", 0xffff);
\r
892 darken_ptr = (short *)g_menuscreen_ptr
\r
893 + g_menuscreen_w * (g_menuscreen_h - me_sfont_h * 5 / 2);
\r
894 menu_darken_bg(darken_ptr, darken_ptr,
\r
895 g_menuscreen_w * (me_sfont_h * 5 / 2), 1);
\r
897 snprintf(buff, sizeof(buff), "%s - select, %s - back",
\r
898 in_get_key_name(-1, -PBTN_MOK), in_get_key_name(-1, -PBTN_MBACK));
\r
899 smalltext_out16(x, g_menuscreen_h - me_sfont_h * 2 - 2, buff, 0xe78c);
\r
900 snprintf(buff, sizeof(buff), g_menu_filter_off ?
\r
901 "%s - hide unknown files" : "%s - show all files",
\r
902 in_get_key_name(-1, -PBTN_MA3));
\r
903 smalltext_out16(x, g_menuscreen_h - me_sfont_h * 1 - 2, buff, 0xe78c);
\r
909 static int scandir_cmp(const void *p1, const void *p2)
\r
911 const struct dirent **d1 = (const struct dirent **)p1;
\r
912 const struct dirent **d2 = (const struct dirent **)p2;
\r
913 if ((*d1)->d_type == (*d2)->d_type)
\r
914 return alphasort(d1, d2);
\r
915 if ((*d1)->d_type == DT_DIR)
\r
916 return -1; // put before
\r
917 if ((*d2)->d_type == DT_DIR)
\r
920 return alphasort(d1, d2);
\r
923 static const char **filter_exts_internal;
\r
925 static int scandir_filter(const struct dirent *ent)
\r
927 const char **filter = filter_exts_internal;
\r
931 if (ent == NULL || ent->d_name == NULL)
\r
934 if (ent->d_type == DT_DIR)
\r
937 ext = strrchr(ent->d_name, '.');
\r
942 for (i = 0; filter[i] != NULL; i++)
\r
943 if (strcasecmp(ext, filter[i]) == 0)
\r
949 static int dirent_seek_char(struct dirent **namelist, int len, int sel, char c)
\r
954 for (i = sel + 1; i != sel; i++) {
\r
958 if (tolower_simple(namelist[i]->d_name[0]) == c)
\r
965 static const char *menu_loop_romsel(char *curr_path, int len,
\r
966 const char **filter_exts,
\r
967 int (*extra_filter)(struct dirent **namelist, int count,
\r
968 const char *basedir))
\r
970 static char rom_fname_reload[256]; // used for return
\r
971 char sel_fname[256];
\r
972 int (*filter)(const struct dirent *);
\r
973 struct dirent **namelist = NULL;
\r
974 int n = 0, inp = 0, sel = 0, show_help = 0;
\r
975 char *curr_path_restore = NULL;
\r
976 const char *ret = NULL;
\r
979 filter_exts_internal = filter_exts;
\r
982 // is this a dir or a full path?
\r
983 if (!plat_is_dir(curr_path)) {
\r
984 char *p = strrchr(curr_path, '/');
\r
987 curr_path_restore = p;
\r
988 snprintf(sel_fname, sizeof(sel_fname), "%s", p + 1);
\r
991 if (rom_fname_reload[0] == 0)
\r
996 if (namelist != NULL) {
\r
1004 if (!g_menu_filter_off)
\r
1005 filter = scandir_filter;
\r
1007 n = scandir(curr_path, &namelist, filter, (void *)scandir_cmp);
\r
1010 lprintf("menu_loop_romsel failed, dir: %s\n", curr_path);
\r
1013 t = getcwd(curr_path, len);
\r
1015 plat_get_root_dir(curr_path, len);
\r
1016 n = scandir(curr_path, &namelist, filter, (void *)scandir_cmp);
\r
1018 // oops, we failed
\r
1019 lprintf("menu_loop_romsel failed, dir: %s\n", curr_path);
\r
1024 if (!g_menu_filter_off && extra_filter != NULL)
\r
1025 n = extra_filter(namelist, n, curr_path);
\r
1027 // try to find selected file
\r
1028 // note: we don't show '.' so sel is namelist index - 1
\r
1030 if (sel_fname[0] != 0) {
\r
1032 for (i = 1; i < n; i++) {
\r
1033 char *dname = namelist[i]->d_name;
\r
1034 if (dname[0] == sel_fname[0] && strcmp(dname, sel_fname) == 0) {
\r
1041 /* make sure action buttons are not pressed on entering menu */
\r
1042 draw_dirlist(curr_path, namelist, n, sel, show_help);
\r
1043 while (in_menu_wait_any(NULL, 50) & (PBTN_MOK|PBTN_MBACK|PBTN_MENU))
\r
1048 draw_dirlist(curr_path, namelist, n, sel, show_help);
\r
1049 inp = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT
\r
1050 | PBTN_L|PBTN_R|PBTN_MA2|PBTN_MA3|PBTN_MOK|PBTN_MBACK
\r
1051 | PBTN_MENU|PBTN_CHAR, &cinp, 33);
\r
1052 if (inp & PBTN_UP ) { sel--; if (sel < 0) sel = n-2; }
\r
1053 if (inp & PBTN_DOWN) { sel++; if (sel > n-2) sel = 0; }
\r
1054 if (inp & PBTN_LEFT) { sel-=10; if (sel < 0) sel = 0; }
\r
1055 if (inp & PBTN_L) { sel-=24; if (sel < 0) sel = 0; }
\r
1056 if (inp & PBTN_RIGHT) { sel+=10; if (sel > n-2) sel = n-2; }
\r
1057 if (inp & PBTN_R) { sel+=24; if (sel > n-2) sel = n-2; }
\r
1058 if (inp & PBTN_CHAR) sel = dirent_seek_char(namelist, n, sel, cinp);
\r
1059 if (inp & PBTN_MA3) {
\r
1060 g_menu_filter_off = !g_menu_filter_off;
\r
1061 snprintf(sel_fname, sizeof(sel_fname), "%s",
\r
1062 namelist[sel+1]->d_name);
\r
1065 if ((inp & PBTN_MOK) || (inp & (PBTN_MENU|PBTN_MA2)) == (PBTN_MENU|PBTN_MA2))
\r
1068 if (namelist[sel+1]->d_type == DT_REG)
\r
1070 snprintf(rom_fname_reload, sizeof(rom_fname_reload),
\r
1071 "%s/%s", curr_path, namelist[sel+1]->d_name);
\r
1072 if (inp & PBTN_MOK) { // return sel
\r
1073 ret = rom_fname_reload;
\r
1076 do_delete(rom_fname_reload, namelist[sel+1]->d_name);
\r
1079 else if (namelist[sel+1]->d_type == DT_DIR)
\r
1083 if (!(inp & PBTN_MOK))
\r
1085 newlen = strlen(curr_path) + strlen(namelist[sel+1]->d_name) + 2;
\r
1086 newdir = malloc(newlen);
\r
1087 if (newdir == NULL)
\r
1089 if (strcmp(namelist[sel+1]->d_name, "..") == 0) {
\r
1090 char *start = curr_path;
\r
1091 p = start + strlen(start) - 1;
\r
1092 while (*p == '/' && p > start) p--;
\r
1093 while (*p != '/' && p > start) p--;
\r
1094 if (p <= start) strcpy(newdir, "/");
\r
1095 else { strncpy(newdir, start, p-start); newdir[p-start] = 0; }
\r
1097 strcpy(newdir, curr_path);
\r
1098 p = newdir + strlen(newdir) - 1;
\r
1099 while (*p == '/' && p >= newdir) *p-- = 0;
\r
1100 strcat(newdir, "/");
\r
1101 strcat(newdir, namelist[sel+1]->d_name);
\r
1103 ret = menu_loop_romsel(newdir, newlen, filter_exts, extra_filter);
\r
1109 // unknown file type, happens on NTFS mounts. Try to guess.
\r
1110 FILE *tstf; int tmp;
\r
1111 snprintf(rom_fname_reload, sizeof(rom_fname_reload),
\r
1112 "%s/%s", curr_path, namelist[sel+1]->d_name);
\r
1113 tstf = fopen(rom_fname_reload, "rb");
\r
1116 if (fread(&tmp, 1, 1, tstf) > 0 || ferror(tstf) == 0)
\r
1117 namelist[sel+1]->d_type = DT_REG;
\r
1118 else namelist[sel+1]->d_type = DT_DIR;
\r
1124 if (inp & PBTN_MBACK)
\r
1127 if (show_help > 0)
\r
1133 free(namelist[n]);
\r
1137 // restore curr_path
\r
1138 if (curr_path_restore != NULL)
\r
1139 *curr_path_restore = '/';
\r
1144 // ------------ savestate loader ------------
\r
1146 #define STATE_SLOT_COUNT 10
\r
1148 static int state_slot_flags = 0;
\r
1149 static int state_slot_times[STATE_SLOT_COUNT];
\r
1151 static void state_check_slots(void)
\r
1155 state_slot_flags = 0;
\r
1157 for (slot = 0; slot < STATE_SLOT_COUNT; slot++) {
\r
1158 state_slot_times[slot] = 0;
\r
1159 if (emu_check_save_file(slot, &state_slot_times[slot]))
\r
1160 state_slot_flags |= 1 << slot;
\r
1164 static void draw_savestate_bg(int slot);
\r
1166 static void draw_savestate_menu(int menu_sel, int is_loading)
\r
1168 int i, x, y, w, h;
\r
1169 char time_buf[32];
\r
1171 if (state_slot_flags & (1 << menu_sel))
\r
1172 draw_savestate_bg(menu_sel);
\r
1174 w = (13 + 2) * me_mfont_w;
\r
1175 h = (1+2+STATE_SLOT_COUNT+1) * me_mfont_h;
\r
1176 x = g_menuscreen_w / 2 - w / 2;
\r
1178 y = g_menuscreen_h / 2 - h / 2;
\r
1180 #ifdef MENU_ALIGN_LEFT
\r
1181 if (x > 12 + me_mfont_w * 2)
\r
1182 x = 12 + me_mfont_w * 2;
\r
1185 menu_draw_begin(1, 1);
\r
1187 text_out16(x, y, is_loading ? "Load state" : "Save state");
\r
1188 y += 3 * me_mfont_h;
\r
1190 menu_draw_selection(x - me_mfont_w * 2, y + menu_sel * me_mfont_h, (23 + 2) * me_mfont_w + 4);
\r
1192 /* draw all slots */
\r
1193 for (i = 0; i < STATE_SLOT_COUNT; i++, y += me_mfont_h)
\r
1195 if (!(state_slot_flags & (1 << i)))
\r
1196 strcpy(time_buf, "free");
\r
1198 strcpy(time_buf, "USED");
\r
1199 if (state_slot_times[i] != 0) {
\r
1200 time_t time = state_slot_times[i];
\r
1201 struct tm *t = localtime(&time);
\r
1202 strftime(time_buf, sizeof(time_buf), "%x %R", t);
\r
1206 text_out16(x, y, "SLOT %i (%s)", i, time_buf);
\r
1208 text_out16(x, y, "back");
\r
1213 static int menu_loop_savestate(int is_loading)
\r
1215 static int menu_sel = STATE_SLOT_COUNT;
\r
1216 int menu_sel_max = STATE_SLOT_COUNT;
\r
1217 unsigned long inp = 0;
\r
1220 state_check_slots();
\r
1222 if (!(state_slot_flags & (1 << menu_sel)) && is_loading)
\r
1223 menu_sel = menu_sel_max;
\r
1227 draw_savestate_menu(menu_sel, is_loading);
\r
1228 inp = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_MOK|PBTN_MBACK, NULL, 100);
\r
1229 if (inp & PBTN_UP) {
\r
1233 menu_sel = menu_sel_max;
\r
1234 } while (!(state_slot_flags & (1 << menu_sel)) && menu_sel != menu_sel_max && is_loading);
\r
1236 if (inp & PBTN_DOWN) {
\r
1239 if (menu_sel > menu_sel_max)
\r
1241 } while (!(state_slot_flags & (1 << menu_sel)) && menu_sel != menu_sel_max && is_loading);
\r
1243 if (inp & PBTN_MOK) { // save/load
\r
1244 if (menu_sel < STATE_SLOT_COUNT) {
\r
1245 state_slot = menu_sel;
\r
1246 if (emu_save_load_game(is_loading, 0)) {
\r
1247 menu_update_msg(is_loading ? "Load failed" : "Save failed");
\r
1255 if (inp & PBTN_MBACK)
\r
1262 // -------------- key config --------------
\r
1264 static char *action_binds(int player_idx, int action_mask, int dev_id)
\r
1266 int dev = 0, dev_last = IN_MAX_DEVS - 1;
\r
1267 int can_combo = 1, type;
\r
1269 static_buff[0] = 0;
\r
1271 type = IN_BINDTYPE_EMU;
\r
1272 if (player_idx >= 0) {
\r
1274 type = IN_BINDTYPE_PLAYER12;
\r
1276 if (player_idx == 1)
\r
1277 action_mask <<= 16;
\r
1280 dev = dev_last = dev_id;
\r
1282 for (; dev <= dev_last; dev++) {
\r
1283 int k, count = 0, combo = 0;
\r
1286 binds = in_get_dev_binds(dev);
\r
1287 if (binds == NULL)
\r
1290 in_get_config(dev, IN_CFG_BIND_COUNT, &count);
\r
1291 in_get_config(dev, IN_CFG_DOES_COMBOS, &combo);
\r
1292 combo = combo && can_combo;
\r
1294 for (k = 0; k < count; k++) {
\r
1295 const char *xname;
\r
1298 if (!(binds[IN_BIND_OFFS(k, type)] & action_mask))
\r
1301 xname = in_get_key_name(dev, k);
\r
1302 len = strlen(static_buff);
\r
1304 strncat(static_buff, combo ? " + " : ", ",
\r
1305 sizeof(static_buff) - len - 1);
\r
1306 len += combo ? 3 : 2;
\r
1308 strncat(static_buff, xname, sizeof(static_buff) - len - 1);
\r
1312 return static_buff;
\r
1315 static int count_bound_keys(int dev_id, int action_mask, int bindtype)
\r
1321 binds = in_get_dev_binds(dev_id);
\r
1322 if (binds == NULL)
\r
1325 in_get_config(dev_id, IN_CFG_BIND_COUNT, &count);
\r
1326 for (k = 0; k < count; k++)
\r
1328 if (binds[IN_BIND_OFFS(k, bindtype)] & action_mask)
\r
1335 static void draw_key_config(const me_bind_action *opts, int opt_cnt, int player_idx,
\r
1336 int sel, int dev_id, int dev_count, int is_bind)
\r
1338 char buff[64], buff2[32];
\r
1339 const char *dev_name;
\r
1342 w = ((player_idx >= 0) ? 20 : 30) * me_mfont_w;
\r
1343 x = g_menuscreen_w / 2 - w / 2;
\r
1344 y = (g_menuscreen_h - 4 * me_mfont_h) / 2 - (2 + opt_cnt) * me_mfont_h / 2;
\r
1345 if (x < me_mfont_w * 2)
\r
1346 x = me_mfont_w * 2;
\r
1348 menu_draw_begin(1, 0);
\r
1349 if (player_idx >= 0)
\r
1350 text_out16(x, y, "Player %i controls", player_idx + 1);
\r
1352 text_out16(x, y, "Emulator controls");
\r
1354 y += 2 * me_mfont_h;
\r
1355 menu_draw_selection(x - me_mfont_w * 2, y + sel * me_mfont_h, w + 2 * me_mfont_w);
\r
1357 for (i = 0; i < opt_cnt; i++, y += me_mfont_h)
\r
1358 text_out16(x, y, "%s : %s", opts[i].name,
\r
1359 action_binds(player_idx, opts[i].mask, dev_id));
\r
1361 menu_separation();
\r
1364 dev_name = "(all devices)";
\r
1366 dev_name = in_get_dev_name(dev_id, 0, 1);
\r
1367 w = strlen(dev_name) * me_mfont_w;
\r
1368 if (w < 30 * me_mfont_w)
\r
1369 w = 30 * me_mfont_w;
\r
1370 if (w > g_menuscreen_w)
\r
1371 w = g_menuscreen_w;
\r
1373 x = g_menuscreen_w / 2 - w / 2;
\r
1376 snprintf(buff2, sizeof(buff2), "%s", in_get_key_name(-1, -PBTN_MOK));
\r
1377 snprintf(buff, sizeof(buff), "%s - bind, %s - clear", buff2,
\r
1378 in_get_key_name(-1, -PBTN_MA2));
\r
1379 text_out16(x, g_menuscreen_h - 4 * me_mfont_h, buff);
\r
1382 text_out16(x, g_menuscreen_h - 4 * me_mfont_h, "Press a button to bind/unbind");
\r
1384 if (dev_count > 1) {
\r
1385 text_out16(x, g_menuscreen_h - 3 * me_mfont_h, dev_name);
\r
1386 text_out16(x, g_menuscreen_h - 2 * me_mfont_h, "Press left/right for other devs");
\r
1392 static void key_config_loop(const me_bind_action *opts, int opt_cnt, int player_idx)
\r
1394 int i, sel = 0, menu_sel_max = opt_cnt - 1, does_combos = 0;
\r
1395 int dev_id, bind_dev_id, dev_count, kc, is_down, mkey;
\r
1396 int unbind, bindtype, mask_shift;
\r
1398 for (i = 0, dev_id = -1, dev_count = 0; i < IN_MAX_DEVS; i++) {
\r
1399 if (in_get_dev_name(i, 1, 0) != NULL) {
\r
1406 if (dev_id == -1) {
\r
1407 lprintf("no devs, can't do config\n");
\r
1411 dev_id = -1; // show all
\r
1413 if (player_idx == 1)
\r
1415 bindtype = player_idx >= 0 ? IN_BINDTYPE_PLAYER12 : IN_BINDTYPE_EMU;
\r
1419 draw_key_config(opts, opt_cnt, player_idx, sel, dev_id, dev_count, 0);
\r
1420 mkey = in_menu_wait(PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT
\r
1421 |PBTN_MBACK|PBTN_MOK|PBTN_MA2, NULL, 100);
\r
1423 case PBTN_UP: sel--; if (sel < 0) sel = menu_sel_max; continue;
\r
1424 case PBTN_DOWN: sel++; if (sel > menu_sel_max) sel = 0; continue;
\r
1426 for (i = 0, dev_id--; i < IN_MAX_DEVS + 1; i++, dev_id--) {
\r
1428 dev_id = IN_MAX_DEVS - 1;
\r
1429 if (dev_id == -1 || in_get_dev_name(dev_id, 0, 0) != NULL)
\r
1434 for (i = 0, dev_id++; i < IN_MAX_DEVS; i++, dev_id++) {
\r
1435 if (dev_id >= IN_MAX_DEVS)
\r
1437 if (dev_id == -1 || in_get_dev_name(dev_id, 0, 0) != NULL)
\r
1444 if (sel >= opt_cnt)
\r
1446 while (in_menu_wait_any(NULL, 30) & PBTN_MOK)
\r
1450 in_unbind_all(dev_id, opts[sel].mask << mask_shift, bindtype);
\r
1455 draw_key_config(opts, opt_cnt, player_idx, sel, dev_id, dev_count, 1);
\r
1457 /* wait for some up event */
\r
1458 for (is_down = 1; is_down; )
\r
1459 kc = in_update_keycode(&bind_dev_id, &is_down, NULL, -1);
\r
1461 i = count_bound_keys(bind_dev_id, opts[sel].mask << mask_shift, bindtype);
\r
1464 /* allow combos if device supports them */
\r
1465 in_get_config(bind_dev_id, IN_CFG_DOES_COMBOS, &does_combos);
\r
1466 if (i == 1 && bindtype == IN_BINDTYPE_EMU && does_combos)
\r
1470 in_unbind_all(bind_dev_id, opts[sel].mask << mask_shift, bindtype);
\r
1472 in_bind_key(bind_dev_id, kc, opts[sel].mask << mask_shift, bindtype, 0);
\r