[libpicofe.git] / common / menu.c

// (c) Copyright 2006,2007 notaz, All rights reserved.\r
// Free for non-commercial use.\r
\r
// For commercial use, separate licencing terms must be obtained.\r
\r
#include <stdio.h>\r
#include <string.h>\r
#include <stdlib.h>\r
#include <stdarg.h>\r
\r
#include "menu.h"\r
#include "fonts.h"\r
#include "readpng.h"\r
#include "lprintf.h"\r
\r
#if   defined(__GP2X__)\r
 #include "../gp2x/gp2x.h"\r
 #define SCREEN_WIDTH 320\r
 #define SCREEN_BUFFER gp2x_screen\r
#elif defined(__GIZ__)\r
 //#include "../gizmondo/giz.h"\r
 #define SCREEN_WIDTH 321\r
 #define SCREEN_BUFFER menu_screen\r
 extern unsigned char *menu_screen;\r
#elif defined(PSP)\r
 #include "../psp/psp.h"\r
 #define SCREEN_WIDTH 512\r
 #define SCREEN_BUFFER psp_screen\r
#endif\r
\r
char menuErrorMsg[64] = { 0, };\r
\r
static unsigned char menu_font_data[10240];\r
static int menu_text_color = 0xffff; // default to white\r
static int menu_sel_color = -1; // disabled\r
\r
// draws text to current bbp16 screen\r
static void text_out16_(int x, int y, const char *text, int color)\r
{\r
	int i, l, u, tr, tg, tb, len;\r
	unsigned short *dest = (unsigned short *)SCREEN_BUFFER + x + y*SCREEN_WIDTH;\r
	tr = (color & 0xf800) >> 8;\r
	tg = (color & 0x07e0) >> 3;\r
	tb = (color & 0x001f) << 3;\r
\r
	if (text == (void *)1)\r
	{\r
		// selector symbol\r
		text = "";\r
		len = 1;\r
	}\r
	else\r
		len = strlen(text);\r
\r
	for (i = 0; i < len; i++)\r
	{\r
		unsigned char  *src = menu_font_data + (unsigned int)text[i]*4*10;\r
		unsigned short *dst = dest;\r
		for (l = 0; l < 10; l++, dst += SCREEN_WIDTH-8)\r
		{\r
			for (u = 8/2; u > 0; u--, src++)\r
			{\r
				int c, r, g, b;\r
				c = *src >> 4;\r
				r = (*dst & 0xf800) >> 8;\r
				g = (*dst & 0x07e0) >> 3;\r
				b = (*dst & 0x001f) << 3;\r
				r = (c^0xf)*r/15 + c*tr/15;\r
				g = (c^0xf)*g/15 + c*tg/15;\r
				b = (c^0xf)*b/15 + c*tb/15;\r
				*dst++ = ((r<<8)&0xf800) | ((g<<3)&0x07e0) | (b>>3);\r
				c = *src & 0xf;\r
				r = (*dst & 0xf800) >> 8;\r
				g = (*dst & 0x07e0) >> 3;\r
				b = (*dst & 0x001f) << 3;\r
				r = (c^0xf)*r/15 + c*tr/15;\r
				g = (c^0xf)*g/15 + c*tg/15;\r
				b = (c^0xf)*b/15 + c*tb/15;\r
				*dst++ = ((r<<8)&0xf800) | ((g<<3)&0x07e0) | (b>>3);\r
			}\r
		}\r
		dest += 8;\r
	}\r
}\r
\r
void text_out16(int x, int y, const char *texto, ...)\r
{\r
	va_list args;\r
	char    buffer[512];\r
\r
	va_start(args,texto);\r
	vsprintf(buffer,texto,args);\r
	va_end(args);\r
\r
	text_out16_(x,y,buffer,menu_text_color);\r
}\r
\r
\r
void smalltext_out16(int x, int y, const char *texto, int color)\r
{\r
	int i;\r
	unsigned char  *src;\r
	unsigned short *dst;\r
\r
	for (i = 0;; i++, x += 6)\r
	{\r
		unsigned char c = (unsigned char) texto[i];\r
		int h = 8;\r
\r
		if (!c) break;\r
\r
		src = fontdata6x8[c];\r
		dst = (unsigned short *)SCREEN_BUFFER + x + y*SCREEN_WIDTH;\r
\r
		while (h--)\r
		{\r
			int w = 0x20;\r
			while (w)\r
			{\r
				if( *src & w ) *dst = color;\r
				dst++;\r
				w>>=1;\r
			}\r
			src++;\r
\r
			dst += SCREEN_WIDTH-6;\r
		}\r
	}\r
}\r
\r
void smalltext_out16_lim(int x, int y, const char *texto, int color, int max)\r
{\r
	char    buffer[SCREEN_WIDTH/6+1];\r
\r
	strncpy(buffer, texto, SCREEN_WIDTH/6);\r
	if (max > SCREEN_WIDTH/6) max = SCREEN_WIDTH/6;\r
	if (max < 0) max = 0;\r
	buffer[max] = 0;\r
\r
	smalltext_out16(x, y, buffer, color);\r
}\r
\r
void menu_draw_selection(int x, int y, int w)\r
{\r
	int i, h;\r
	unsigned short *dst, *dest;\r
\r
	text_out16_(x, y, (void *)1, (menu_sel_color < 0) ? menu_text_color : menu_sel_color);\r
\r
	if (menu_sel_color < 0) return; // no selection hilight\r
\r
	if (y > 0) y--;\r
	dest = (unsigned short *)SCREEN_BUFFER + x + y*SCREEN_WIDTH + 14;\r
	for (h = 11; h > 0; h--)\r
	{\r
		dst = dest;\r
		for (i = w; i > 0; i--)\r
			*dst++ = menu_sel_color;\r
		dest += SCREEN_WIDTH;\r
	}\r
}\r
\r
static int parse_hex_color(char *buff)\r
{\r
	char *endp = buff;\r
	int t = (int) strtoul(buff, &endp, 16);\r
	if (endp != buff) return ((t>>8)&0xf800) | ((t>>5)&0x07e0) | ((t>>3)&0x1f);\r
	return -1;\r
}\r
\r
void menu_init(void)\r
{\r
	int c, l;\r
	unsigned char *fd = menu_font_data;\r
	char buff[256];\r
	FILE *f;\r
\r
	// generate default font from fontdata8x8\r
	memset(menu_font_data, 0, sizeof(menu_font_data));\r
	for (c = 0; c < 256; c++)\r
	{\r
		for (l = 0; l < 8; l++)\r
		{\r
			unsigned char fd8x8 = fontdata8x8[c*8+l];\r
			if (fd8x8&0x80) *fd |= 0xf0;\r
			if (fd8x8&0x40) *fd |= 0x0f; fd++;\r
			if (fd8x8&0x20) *fd |= 0xf0;\r
			if (fd8x8&0x10) *fd |= 0x0f; fd++;\r
			if (fd8x8&0x08) *fd |= 0xf0;\r
			if (fd8x8&0x04) *fd |= 0x0f; fd++;\r
			if (fd8x8&0x02) *fd |= 0xf0;\r
			if (fd8x8&0x01) *fd |= 0x0f; fd++;\r
		}\r
		fd += 8*2/2; // 2 empty lines\r
	}\r
\r
	// load custom font and selector (stored as 1st symbol in font table)\r
	readpng(menu_font_data, "skin/font.png", READPNG_FONT);\r
	memcpy(menu_font_data, menu_font_data + ((int)'>')*4*10, 4*10); // default selector symbol is '>'\r
	readpng(menu_font_data, "skin/selector.png", READPNG_SELECTOR);\r
\r
	// load custom colors\r
	f = fopen("skin/skin.txt", "r");\r
	if (f != NULL)\r
	{\r
		lprintf("found skin.txt\n");\r
		while (!feof(f))\r
		{\r
			fgets(buff, sizeof(buff), f);\r
			if (buff[0] == '#'  || buff[0] == '/')  continue; // comment\r
			if (buff[0] == '\r' || buff[0] == '\n') continue; // empty line\r
			if (strncmp(buff, "text_color=", 11) == 0)\r
			{\r
				int tmp = parse_hex_color(buff+11);\r
				if (tmp >= 0) menu_text_color = tmp;\r
				else lprintf("skin.txt: parse error for text_color\n");\r
			}\r
			else if (strncmp(buff, "selection_color=", 16) == 0)\r
			{\r
				int tmp = parse_hex_color(buff+16);\r
				if (tmp >= 0) menu_sel_color = tmp;\r
				else lprintf("skin.txt: parse error for selection_color\n");\r
				lprintf("sel color: %04x\n", menu_sel_color);\r
			}\r
			else\r
				lprintf("skin.txt: parse error: %s\n", buff);\r
		}\r
		fclose(f);\r
	}\r
}\r
\r
\r
int me_id2offset(const menu_entry *entries, int count, menu_id id)\r
{\r
	int i;\r
	for (i = 0; i < count; i++)\r
	{\r
		if (entries[i].id == id) return i;\r
	}\r
\r
	lprintf("%s: id %i not found\n", __FUNCTION__, id);\r
	return 0;\r
}\r
\r
void me_enable(menu_entry *entries, int count, menu_id id, int enable)\r
{\r
	int i = me_id2offset(entries, count, id);\r
	entries[i].enabled = enable;\r
}\r
\r
int me_count_enabled(const menu_entry *entries, int count)\r
{\r
	int i, ret = 0;\r
\r
	for (i = 0; i < count; i++)\r
	{\r
		if (entries[i].enabled) ret++;\r
	}\r
\r
	return ret;\r
}\r
\r
menu_id me_index2id(const menu_entry *entries, int count, int index)\r
{\r
	int i;\r
\r
	for (i = 0; i < count; i++)\r
	{\r
		if (entries[i].enabled)\r
		{\r
			if (index == 0) break;\r
			index--;\r
		}\r
	}\r
	if (i >= count) i = count - 1;\r
	return entries[i].id;\r
}\r
\r
void me_draw(const menu_entry *entries, int count, int x, int y, me_draw_custom_f *cust_draw, void *param)\r
{\r
	int i, y1 = y;\r
\r
	for (i = 0; i < count; i++)\r
	{\r
		if (!entries[i].enabled) continue;\r
		if (entries[i].name == NULL)\r
		{\r
			if (cust_draw != NULL)\r
				cust_draw(&entries[i], x, y1, param);\r
			y1 += 10;\r
			continue;\r
		}\r
		text_out16(x, y1, entries[i].name);\r
		if (entries[i].beh == MB_ONOFF)\r
			text_out16(x + 27*8, y1, (*(int *)entries[i].var & entries[i].mask) ? "ON" : "OFF");\r
		else if (entries[i].beh == MB_RANGE)\r
			text_out16(x + 27*8, y1, "%i", *(int *)entries[i].var);\r
		y1 += 10;\r
	}\r
}\r
\r
int me_process(menu_entry *entries, int count, menu_id id, int is_next)\r
{\r
	int i = me_id2offset(entries, count, id);\r
	menu_entry *entry = &entries[i];\r
	switch (entry->beh)\r
	{\r
		case MB_ONOFF:\r
			*(int *)entry->var ^= entry->mask;\r
			return 1;\r
		case MB_RANGE:\r
			*(int *)entry->var += is_next ? 1 : -1;\r
			if (*(int *)entry->var < (int)entry->min) *(int *)entry->var = (int)entry->min;\r
			if (*(int *)entry->var > (int)entry->max) *(int *)entry->var = (int)entry->max;\r
			return 1;\r
		default:\r
			return 0;\r
	}\r
}\r
\r
\r
\r
Commit	Line	Data
c7a4ff64	1	// (c) Copyright 2006,2007 notaz, All rights reserved.\r
	2	// Free for non-commercial use.\r
	3	\r
	4	// For commercial use, separate licencing terms must be obtained.\r
	5	\r
	6	#include <stdio.h>\r
	7	#include <string.h>\r
	8	#include <stdlib.h>\r
	9	#include <stdarg.h>\r
	10	\r
	11	#include "menu.h"\r
	12	#include "fonts.h"\r
	13	#include "readpng.h"\r
	14	#include "lprintf.h"\r
	15	\r
	16	#if defined(__GP2X__)\r
f013066e	17	#include "../gp2x/gp2x.h"\r
	18	#define SCREEN_WIDTH 320\r
	19	#define SCREEN_BUFFER gp2x_screen\r
c7a4ff64	20	#elif defined(__GIZ__)\r
f013066e	21	//#include "../gizmondo/giz.h"\r
	22	#define SCREEN_WIDTH 321\r
	23	#define SCREEN_BUFFER menu_screen\r
	24	extern unsigned char *menu_screen;\r
2951214e	25	#elif defined(PSP)\r
	26	#include "../psp/psp.h"\r
	27	#define SCREEN_WIDTH 512\r
	28	#define SCREEN_BUFFER psp_screen\r
c7a4ff64	29	#endif\r
c7a4ff64	30	\r
f013066e	31	char menuErrorMsg[64] = { 0, };\r
f013066e	32	\r
c7a4ff64	33	static unsigned char menu_font_data[10240];\r
	34	static int menu_text_color = 0xffff; // default to white\r
	35	static int menu_sel_color = -1; // disabled\r
	36	\r
	37	// draws text to current bbp16 screen\r
	38	static void text_out16_(int x, int y, const char *text, int color)\r
	39	{\r
	40	int i, l, u, tr, tg, tb, len;\r
	41	unsigned short dest = (unsigned short )SCREEN_BUFFER + x + y*SCREEN_WIDTH;\r
	42	tr = (color & 0xf800) >> 8;\r
	43	tg = (color & 0x07e0) >> 3;\r
	44	tb = (color & 0x001f) << 3;\r
	45	\r
	46	if (text == (void *)1)\r
	47	{\r
	48	// selector symbol\r
	49	text = "";\r
	50	len = 1;\r
	51	}\r
	52	else\r
	53	len = strlen(text);\r
	54	\r
	55	for (i = 0; i < len; i++)\r
	56	{\r
	57	unsigned char src = menu_font_data + (unsigned int)text[i]4*10;\r
	58	unsigned short *dst = dest;\r
	59	for (l = 0; l < 10; l++, dst += SCREEN_WIDTH-8)\r
	60	{\r
	61	for (u = 8/2; u > 0; u--, src++)\r
	62	{\r
	63	int c, r, g, b;\r
	64	c = *src >> 4;\r
	65	r = (*dst & 0xf800) >> 8;\r
	66	g = (*dst & 0x07e0) >> 3;\r
	67	b = (*dst & 0x001f) << 3;\r
	68	r = (c^0xf)r/15 + ctr/15;\r
	69	g = (c^0xf)g/15 + ctg/15;\r
	70	b = (c^0xf)b/15 + ctb/15;\r
	71	*dst++ = ((r<<8)&0xf800) \| ((g<<3)&0x07e0) \| (b>>3);\r
	72	c = *src & 0xf;\r
	73	r = (*dst & 0xf800) >> 8;\r
	74	g = (*dst & 0x07e0) >> 3;\r
	75	b = (*dst & 0x001f) << 3;\r
	76	r = (c^0xf)r/15 + ctr/15;\r
	77	g = (c^0xf)g/15 + ctg/15;\r
	78	b = (c^0xf)b/15 + ctb/15;\r
	79	*dst++ = ((r<<8)&0xf800) \| ((g<<3)&0x07e0) \| (b>>3);\r
	80	}\r
	81	}\r
	82	dest += 8;\r
	83	}\r
	84	}\r
	85	\r
	86	void text_out16(int x, int y, const char *texto, ...)\r
	87	{\r
	88	va_list args;\r
	89	char buffer[512];\r
	90	\r
	91	va_start(args,texto);\r
	92	vsprintf(buffer,texto,args);\r
	93	va_end(args);\r
	94	\r
	95	text_out16_(x,y,buffer,menu_text_color);\r
	96	}\r
97	\r
98	\r
99	void smalltext_out16(int x, int y, const char *texto, int color)\r
100	{\r
101	int i;\r
102	unsigned char *src;\r
103	unsigned short *dst;\r
104	\r
105	for (i = 0;; i++, x += 6)\r
106	{\r
107	unsigned char c = (unsigned char) texto[i];\r
108	int h = 8;\r
109	\r
110	if (!c) break;\r
111	\r
112	src = fontdata6x8[c];\r
113	dst = (unsigned short )SCREEN_BUFFER + x + ySCREEN_WIDTH;\r
114	\r
115	while (h--)\r
116	{\r
117	int w = 0x20;\r
118	while (w)\r
119	{\r
120	if( src & w ) dst = color;\r
121	dst++;\r
122	w>>=1;\r
123	}\r
124	src++;\r
125	\r
126	dst += SCREEN_WIDTH-6;\r
127	}\r
128	}\r
129	}\r
130	\r
131	void smalltext_out16_lim(int x, int y, const char *texto, int color, int max)\r
132	{\r
133	char buffer[SCREEN_WIDTH/6+1];\r
134	\r
135	strncpy(buffer, texto, SCREEN_WIDTH/6);\r
136	if (max > SCREEN_WIDTH/6) max = SCREEN_WIDTH/6;\r
137	if (max < 0) max = 0;\r
138	buffer[max] = 0;\r
139	\r
140	smalltext_out16(x, y, buffer, color);\r
141	}\r
142	\r
143	void menu_draw_selection(int x, int y, int w)\r
144	{\r
145	int i, h;\r
146	unsigned short dst, dest;\r
147	\r
148	text_out16_(x, y, (void *)1, (menu_sel_color < 0) ? menu_text_color : menu_sel_color);\r
149	\r
150	if (menu_sel_color < 0) return; // no selection hilight\r
151	\r
152	if (y > 0) y--;\r
153	dest = (unsigned short )SCREEN_BUFFER + x + ySCREEN_WIDTH + 14;\r
154	for (h = 11; h > 0; h--)\r
155	{\r
156	dst = dest;\r
157	for (i = w; i > 0; i--)\r
158	*dst++ = menu_sel_color;\r
159	dest += SCREEN_WIDTH;\r
160	}\r
161	}\r
162	\r
163	static int parse_hex_color(char *buff)\r
164	{\r
165	char *endp = buff;\r
166	int t = (int) strtoul(buff, &endp, 16);\r
167	if (endp != buff) return ((t>>8)&0xf800) \| ((t>>5)&0x07e0) \| ((t>>3)&0x1f);\r
168	return -1;\r
169	}\r
170	\r
171	void menu_init(void)\r
172	{\r
173	int c, l;\r
174	unsigned char *fd = menu_font_data;\r
175	char buff[256];\r
176	FILE *f;\r
177	\r
178	// generate default font from fontdata8x8\r
179	memset(menu_font_data, 0, sizeof(menu_font_data));\r
180	for (c = 0; c < 256; c++)\r
181	{\r
182	for (l = 0; l < 8; l++)\r
183	{\r
184	unsigned char fd8x8 = fontdata8x8[c*8+l];\r
185	if (fd8x8&0x80) *fd \|= 0xf0;\r
186	if (fd8x8&0x40) *fd \|= 0x0f; fd++;\r
187	if (fd8x8&0x20) *fd \|= 0xf0;\r
188	if (fd8x8&0x10) *fd \|= 0x0f; fd++;\r
189	if (fd8x8&0x08) *fd \|= 0xf0;\r
190	if (fd8x8&0x04) *fd \|= 0x0f; fd++;\r
191	if (fd8x8&0x02) *fd \|= 0xf0;\r
192	if (fd8x8&0x01) *fd \|= 0x0f; fd++;\r
193	}\r
194	fd += 8*2/2; // 2 empty lines\r
195	}\r
196	\r
197	// load custom font and selector (stored as 1st symbol in font table)\r
198	readpng(menu_font_data, "skin/font.png", READPNG_FONT);\r
199	memcpy(menu_font_data, menu_font_data + ((int)'>')410, 4*10); // default selector symbol is '>'\r
200	readpng(menu_font_data, "skin/selector.png", READPNG_SELECTOR);\r
201	\r
202	// load custom colors\r
203	f = fopen("skin/skin.txt", "r");\r
204	if (f != NULL)\r
205	{\r
206	lprintf("found skin.txt\n");\r
207	while (!feof(f))\r
208	{\r
209	fgets(buff, sizeof(buff), f);\r
210	if (buff[0] == '#' \|\| buff[0] == '/') continue; // comment\r
211	if (buff[0] == '\r' \|\| buff[0] == '\n') continue; // empty line\r
212	if (strncmp(buff, "text_color=", 11) == 0)\r
213	{\r
214	int tmp = parse_hex_color(buff+11);\r
215	if (tmp >= 0) menu_text_color = tmp;\r
216	else lprintf("skin.txt: parse error for text_color\n");\r
217	}\r
218	else if (strncmp(buff, "selection_color=", 16) == 0)\r
219	{\r
220	int tmp = parse_hex_color(buff+16);\r
221	if (tmp >= 0) menu_sel_color = tmp;\r
222	else lprintf("skin.txt: parse error for selection_color\n");\r
2951214e	223	lprintf("sel color: %04x\n", menu_sel_color);\r
c7a4ff64	224	}\r
	225	else\r
	226	lprintf("skin.txt: parse error: %s\n", buff);\r
	227	}\r
	228	fclose(f);\r
	229	}\r
	230	}\r
	231	\r
	232	\r
	233	int me_id2offset(const menu_entry *entries, int count, menu_id id)\r
	234	{\r
	235	int i;\r
	236	for (i = 0; i < count; i++)\r
	237	{\r
	238	if (entries[i].id == id) return i;\r
	239	}\r
	240	\r
	241	lprintf("%s: id %i not found\n", __FUNCTION__, id);\r
	242	return 0;\r
	243	}\r
	244	\r
	245	void me_enable(menu_entry *entries, int count, menu_id id, int enable)\r
	246	{\r
	247	int i = me_id2offset(entries, count, id);\r
	248	entries[i].enabled = enable;\r
	249	}\r
	250	\r
	251	int me_count_enabled(const menu_entry *entries, int count)\r
	252	{\r
	253	int i, ret = 0;\r
	254	\r
	255	for (i = 0; i < count; i++)\r
	256	{\r
	257	if (entries[i].enabled) ret++;\r
	258	}\r
	259	\r
	260	return ret;\r
	261	}\r
	262	\r
	263	menu_id me_index2id(const menu_entry *entries, int count, int index)\r
	264	{\r
	265	int i;\r
	266	\r
	267	for (i = 0; i < count; i++)\r
	268	{\r
	269	if (entries[i].enabled)\r
	270	{\r
	271	if (index == 0) break;\r
	272	index--;\r
	273	}\r
	274	}\r
	275	if (i >= count) i = count - 1;\r
	276	return entries[i].id;\r
	277	}\r
	278	\r
	279	void me_draw(const menu_entry entries, int count, int x, int y, me_draw_custom_f cust_draw, void *param)\r
	280	{\r
	281	int i, y1 = y;\r
	282	\r
	283	for (i = 0; i < count; i++)\r
	284	{\r
	285	if (!entries[i].enabled) continue;\r
	286	if (entries[i].name == NULL)\r
	287	{\r
288	if (cust_draw != NULL)\r
289	cust_draw(&entries[i], x, y1, param);\r
290	y1 += 10;\r
291	continue;\r
292	}\r
293	text_out16(x, y1, entries[i].name);\r
294	if (entries[i].beh == MB_ONOFF)\r
295	text_out16(x + 278, y1, ((int *)entries[i].var & entries[i].mask) ? "ON" : "OFF");\r
296	else if (entries[i].beh == MB_RANGE)\r
297	text_out16(x + 278, y1, "%i", (int *)entries[i].var);\r
298	y1 += 10;\r
299	}\r
300	}\r
301	\r
302	int me_process(menu_entry *entries, int count, menu_id id, int is_next)\r
303	{\r
304	int i = me_id2offset(entries, count, id);\r
305	menu_entry *entry = &entries[i];\r
306	switch (entry->beh)\r
307	{\r
308	case MB_ONOFF:\r
309	(int )entry->var ^= entry->mask;\r
310	return 1;\r
311	case MB_RANGE:\r
312	(int )entry->var += is_next ? 1 : -1;\r
313	if ((int )entry->var < (int)entry->min) (int )entry->var = (int)entry->min;\r
314	if ((int )entry->var > (int)entry->max) (int )entry->var = (int)entry->max;\r
315	return 1;\r
316	default:\r
317	return 0;\r
318	}\r
319	}\r
320	\r
321	\r
322	\r