2 * Human-readable config file management for PicoDrive
12 #include <Pico/Pico.h>
14 extern menu_entry opt_entries[];
15 extern menu_entry opt2_entries[];
16 extern menu_entry cdopt_entries[];
17 extern const int opt_entry_count;
18 extern const int opt2_entry_count;
19 extern const int cdopt_entry_count;
21 static menu_entry *cfg_opts[] = { opt_entries, opt2_entries, cdopt_entries };
22 static const int *cfg_opt_counts[] = { &opt_entry_count, &opt2_entry_count, &cdopt_entry_count };
27 static int seek_sect(FILE *f, const char *section)
32 len = strlen(section);
33 // seek to the section needed
36 tmp = fgets(line, sizeof(line), f);
37 if (tmp == NULL) break;
39 if (line[0] != '[') continue; // not section start
40 if (strncmp(line + 1, section, len) == 0 && line[len+1] == ']')
48 static void custom_write(FILE *f, const menu_entry *me, int no_def)
55 if (no_def && !((defaultConfig.s_PicoOpt^PicoOpt)&0x10) &&
56 !((defaultConfig.EmuOpt^currentConfig.EmuOpt)&0x80)) return;
59 else if (currentConfig.EmuOpt&0x80)
60 str = "16bit accurate";
62 str = "8bit accurate";
63 fprintf(f, "Renderer = %s", str);
67 if (no_def && defaultConfig.scaling == currentConfig.scaling) return;
68 switch (currentConfig.scaling) {
69 default: str = "OFF"; break;
70 case 1: str = "hw horizontal"; break;
71 case 2: str = "hw horiz. + vert."; break;
72 case 3: str = "sw horizontal"; break;
74 fprintf(f, "Scaling = %s", str);
76 case MA_OPT_FRAMESKIP:
77 if (no_def && defaultConfig.Frameskip == currentConfig.Frameskip) return;
78 if (currentConfig.Frameskip < 0)
79 strcpy(str24, "Auto");
80 else sprintf(str24, "%i", currentConfig.Frameskip);
81 fprintf(f, "Frameskip = %s", str24);
83 case MA_OPT_SOUND_QUALITY:
84 if (no_def && !((defaultConfig.s_PicoOpt^PicoOpt)&8) &&
85 defaultConfig.s_PsndRate == PsndRate) return;
86 str = (PicoOpt&0x08)?"stereo":"mono";
87 fprintf(f, "Sound Quality = %i %s", PsndRate, str);
90 if (no_def && defaultConfig.s_PicoRegion == PicoRegionOverride &&
91 defaultConfig.s_PicoAutoRgnOrder == PicoAutoRgnOrder) return;
92 fprintf(f, "Region = %s", me_region_name(PicoRegionOverride, PicoAutoRgnOrder));
94 case MA_OPT_CONFIRM_STATES:
95 if (no_def && !((defaultConfig.EmuOpt^currentConfig.EmuOpt)&(5<<9))) return;
96 switch ((currentConfig.EmuOpt >> 9) & 5) {
97 default: str = "OFF"; break;
98 case 1: str = "writes"; break;
99 case 4: str = "loads"; break;
100 case 5: str = "both"; break;
102 fprintf(f, "Confirm savestate = %s", str);
104 case MA_OPT_CPU_CLOCKS:
105 if (no_def && defaultConfig.CPUclock == currentConfig.CPUclock) return;
106 fprintf(f, "GP2X CPU clocks = %i", currentConfig.CPUclock);
109 if (no_def && defaultConfig.gamma == currentConfig.gamma) return;
110 fprintf(f, "Gamma correction = %.3f", (double)currentConfig.gamma / 100.0);
112 case MA_OPT2_SQUIDGEHACK:
113 if (no_def && !((defaultConfig.EmuOpt^currentConfig.EmuOpt)&0x0010)) return;
114 fprintf(f, "Squidgehack = %i", (currentConfig.EmuOpt&0x0010)>>4);
116 case MA_CDOPT_READAHEAD:
117 if (no_def && defaultConfig.s_PicoCDBuffers == PicoCDBuffers) return;
118 sprintf(str24, "%i", PicoCDBuffers * 2);
119 fprintf(f, "ReadAhead buffer = %s", str24);
123 lprintf("unhandled custom_write: %i\n", me->id);
129 static int default_var(const menu_entry *me)
133 case MA_OPT_ACC_TIMING:
134 case MA_OPT_ACC_SPRITES:
135 case MA_OPT_ARM940_SOUND:
136 case MA_OPT_6BUTTON_PAD:
137 case MA_OPT2_ENABLE_Z80:
138 case MA_OPT2_ENABLE_YM2612:
139 case MA_OPT2_ENABLE_SN76496:
142 case MA_CDOPT_SAVERAM:
143 case MA_CDOPT_SCALEROT_CHIP:
144 case MA_CDOPT_BETTER_SYNC:
145 return defaultConfig.s_PicoOpt;
147 case MA_OPT_SHOW_FPS:
148 case MA_OPT_ENABLE_SOUND:
149 case MA_OPT_SRAM_STATES:
150 case MA_OPT2_A_SN_GAMMA:
152 case MA_OPT2_GZIP_STATES:
153 case MA_OPT2_NO_LAST_ROM:
154 case MA_OPT2_RAMTIMINGS:
156 return defaultConfig.EmuOpt;
158 case MA_OPT_SAVE_SLOT:
164 int config_writesect(const char *fname, const char *section)
166 FILE *fo = NULL, *fn = NULL; // old and new
167 int no_defaults = 0; // avoid saving defaults
170 char line[128], *tmp;
176 fo = fopen(fname, "r");
178 fn = fopen(fname, "w");
182 ret = seek_sect(fo, section);
184 // sect not found, we can simply append
185 fclose(fo); fo = NULL;
186 fn = fopen(fname, "a");
192 rename(fname, "tmp.cfg");
193 fo = fopen("tmp.cfg", "r");
194 fn = fopen(fname, "w");
195 if (fo == NULL || fn == NULL) goto write;
197 // copy everything until sect
198 tlen = strlen(section);
201 tmp = fgets(line, sizeof(line), fo);
202 if (tmp == NULL) break;
204 if (line[0] == '[' && strncmp(line + 1, section, tlen) == 0 && line[tlen+1] == ']')
209 // now skip to next sect
212 tmp = fgets(line, sizeof(line), fo);
213 if (tmp == NULL) break;
214 if (line[0] == '[') {
215 fseek(fo, -strlen(line), SEEK_CUR);
221 fclose(fo); fo = NULL;
227 fn = fopen(fname, "w");
236 fprintf(fn, "[%s]" NL, section);
238 for (t = 0; t < sizeof(cfg_opts) / sizeof(cfg_opts[0]); t++)
241 tlen = *(cfg_opt_counts[t]);
242 for (i = 0; i < tlen; i++, me++)
244 if (!me->need_to_save) continue;
245 if ((me->beh != MB_ONOFF && me->beh != MB_RANGE) || me->name == NULL)
246 custom_write(fn, me, no_defaults);
247 else if (me->beh == MB_ONOFF) {
248 if (!no_defaults || ((*(int *)me->var ^ default_var(me)) & me->mask))
249 fprintf(fn, "%s = %i" NL, me->name, (*(int *)me->var & me->mask) ? 1 : 0);
250 } else if (me->beh == MB_RANGE) {
251 if (!no_defaults || ((*(int *)me->var ^ default_var(me)) & me->mask))
252 fprintf(fn, "%s = %i" NL, me->name, *(int *)me->var);
260 // copy whatever is left
263 tmp = fgets(line, sizeof(line), fo);
264 if (tmp == NULL) break;
277 static void mystrip(char *str)
282 for (i = 0; i < len; i++)
283 if (str[i] != ' ') break;
284 if (i > 0) memmove(str, str + i, len - i + 1);
286 for (i = len - 1; i >= 0; i--)
287 if (str[i] != ' ') break;
292 int config_writelrom(const char *fname)
294 char line[128], *tmp, *optr = NULL;
295 char *old_data = NULL;
299 if (strlen(currentConfig.lastRomFile) == 0) return 0;
301 f = fopen(fname, "r");
304 fseek(f, 0, SEEK_END);
306 fseek(f, 0, SEEK_SET);
307 old_data = malloc(size + size/8);
308 if (old_data != NULL)
313 tmp = fgets(line, sizeof(line), f);
314 if (tmp == NULL) break;
316 if (strncasecmp(line, "LastUsedROM", 11) == 0)
318 sprintf(optr, "%s", line);
319 optr += strlen(optr);
325 f = fopen(fname, "w");
326 if (f == NULL) return -1;
328 if (old_data != NULL) {
329 fwrite(old_data, 1, optr - old_data, f);
332 fprintf(f, "LastUsedROM = %s" NL, currentConfig.lastRomFile);
338 static int custom_read(menu_entry *me, const char *var, const char *val)
345 case MA_OPT_RENDERER:
346 if (strcasecmp(var, "Renderer") != 0) return 0;
347 if (strcasecmp(val, "8bit fast") == 0) {
350 else if (strcasecmp(val, "16bit accurate") == 0) {
352 currentConfig.EmuOpt |= 0x80;
354 else if (strcasecmp(val, "8bit accurate") == 0) {
356 currentConfig.EmuOpt &= ~0x80;
363 if (strcasecmp(var, "Scaling") != 0) return 0;
364 if (strcasecmp(val, "OFF") == 0) {
365 currentConfig.scaling = 0;
366 } else if (strcasecmp(val, "hw horizontal") == 0) {
367 currentConfig.scaling = 1;
368 } else if (strcasecmp(val, "hw horiz. + vert.") == 0) {
369 currentConfig.scaling = 2;
370 } else if (strcasecmp(val, "sw horizontal") == 0) {
371 currentConfig.scaling = 3;
376 case MA_OPT_FRAMESKIP:
377 if (strcasecmp(var, "Frameskip") != 0) return 0;
378 if (strcasecmp(val, "Auto") == 0)
379 currentConfig.Frameskip = -1;
380 else currentConfig.Frameskip = atoi(val);
383 case MA_OPT_SOUND_QUALITY:
384 if (strcasecmp(var, "Sound Quality") != 0) return 0;
385 PsndRate = strtoul(val, &tmp, 10);
386 if (PsndRate < 8000 || PsndRate > 44100)
388 while (*tmp == ' ') tmp++;
389 if (strcasecmp(tmp, "stereo") == 0) {
391 } else if (strcasecmp(tmp, "mono") == 0) {
398 if (strcasecmp(var, "Region") != 0) return 0;
399 if (strncasecmp(val, "Auto: ", 6) == 0)
401 const char *p = val + 5, *end = val + strlen(val);
403 PicoRegionOverride = PicoAutoRgnOrder = 0;
404 for (i = 0; p < end && i < 3; i++)
406 while (*p == ' ') p++;
407 if (p[0] == 'J' && p[1] == 'P') {
408 PicoAutoRgnOrder |= 1 << (i*4);
409 } else if (p[0] == 'U' && p[1] == 'S') {
410 PicoAutoRgnOrder |= 4 << (i*4);
411 } else if (p[0] == 'E' && p[1] == 'U') {
412 PicoAutoRgnOrder |= 8 << (i*4);
414 while (*p != ' ' && *p != 0) p++;
418 else if (strcasecmp(val, "Auto") == 0) {
419 PicoRegionOverride = 0;
420 } else if (strcasecmp(val, "Japan NTSC") == 0) {
421 PicoRegionOverride = 1;
422 } else if (strcasecmp(val, "Japan PAL") == 0) {
423 PicoRegionOverride = 2;
424 } else if (strcasecmp(val, "USA") == 0) {
425 PicoRegionOverride = 4;
426 } else if (strcasecmp(val, "Europe") == 0) {
427 PicoRegionOverride = 8;
432 case MA_OPT_CONFIRM_STATES:
433 if (strcasecmp(var, "Confirm savestate") != 0) return 0;
434 if (strcasecmp(val, "OFF") == 0) {
435 currentConfig.EmuOpt &= 5<<9;
436 } else if (strcasecmp(val, "writes") == 0) {
437 currentConfig.EmuOpt &= 5<<9;
438 currentConfig.EmuOpt |= 1<<9;
439 } else if (strcasecmp(val, "loads") == 0) {
440 currentConfig.EmuOpt &= 5<<9;
441 currentConfig.EmuOpt |= 4<<9;
442 } else if (strcasecmp(val, "both") == 0) {
443 currentConfig.EmuOpt &= 5<<9;
444 currentConfig.EmuOpt |= 5<<9;
449 case MA_OPT_CPU_CLOCKS:
450 if (strcasecmp(var, "GP2X CPU clocks") != 0) return 0;
451 currentConfig.CPUclock = atoi(val);
455 if (strcasecmp(var, "Gamma correction") != 0) return 0;
456 currentConfig.gamma = (int) (atof(val) * 100.0);
459 case MA_OPT2_SQUIDGEHACK:
460 if (strcasecmp(var, "Squidgehack") != 0) return 0;
462 if (tmpi) *(int *)me->var |= me->mask;
463 else *(int *)me->var &= ~me->mask;
466 case MA_CDOPT_READAHEAD:
467 if (strcasecmp(var, "ReadAhead buffer") != 0) return 0;
468 PicoCDBuffers = atoi(val) / 2;
472 if (strcasecmp(var, "LastUsedROM") == 0) {
473 tmpi = sizeof(currentConfig.lastRomFile);
474 strncpy(currentConfig.lastRomFile, val, tmpi);
475 currentConfig.lastRomFile[tmpi-1] = 0;
478 lprintf("unhandled custom_read: %i\n", me->id);
484 static void parse(const char *var, const char *val)
487 int t, i, tlen, tmp, ret = 0;
489 for (t = 0; t < sizeof(cfg_opts) / sizeof(cfg_opts[0]) && ret == 0; t++)
492 tlen = *(cfg_opt_counts[t]);
493 for (i = 0; i < tlen && ret == 0; i++, me++)
495 if (!me->need_to_save) continue;
496 if (me->name != NULL) {
497 if (strcasecmp(var, me->name) != 0) continue; // surely not this one
498 if (me->beh == MB_ONOFF) {
500 if (tmp) *(int *)me->var |= me->mask;
501 else *(int *)me->var &= ~me->mask;
503 } else if (me->beh == MB_RANGE) {
505 if (tmp < me->min) tmp = me->min;
506 if (tmp > me->max) tmp = me->max;
507 *(int *)me->var = tmp;
511 ret = custom_read(me, var, val);
514 if (!ret) lprintf("config_readsect: unhandled var: %s\n", var);
518 int config_readsect(const char *fname, const char *section)
520 char line[128], *var, *val, *tmp;
521 FILE *f = fopen(fname, "r");
524 if (f == NULL) return 0;
528 ret = seek_sect(f, section);
530 lprintf("config_readsect: %s: missing section [%s]\n", fname, section);
538 tmp = fgets(line, sizeof(line), f);
539 if (tmp == NULL) break;
541 if (line[0] == '[') break; // other section
543 // strip comments, linefeed, spaces..
545 for (i = 0; i < len; i++)
546 if (line[i] == '#' || line[i] == '\r' || line[i] == '\n') { line[i] = 0; break; }
549 if (len <= 0) continue;
552 for (i = 0; i < len; i++)
553 if (line[i] == '=') break;
554 if (i >= len || strchr(&line[i+1], '=') != NULL) {
555 lprintf("config_readsect: can't parse: %s\n", line);
563 if (strlen(var) == 0 || strlen(val) == 0) {
564 lprintf("config_readsect: something's empty: \"%s\" = \"%s\"\n", var, val);