files for cfg stuff

git-svn-id: file:///home/notaz/opt/svn/PicoDrive/platform@391 be3aeb3a-fb24-0410-a615-afba39da0efa
This commit is contained in:
notaz 2008-03-20 21:33:15 +00:00
parent 0ae25549b5
commit c51bd2feb3
2 changed files with 535 additions and 0 deletions

529
common/config.c Normal file
View file

@ -0,0 +1,529 @@
/*
* Human-readable config file management for PicoDrive
* (c)
*/
#include <string.h>
#include <stdlib.h>
#include "config.h"
#include "menu.h"
#include "emu.h"
#include <Pico/Pico.h>
extern menu_entry opt_entries[];
extern menu_entry opt2_entries[];
extern menu_entry cdopt_entries[];
extern const int opt_entry_count;
extern const int opt2_entry_count;
extern const int cdopt_entry_count;
static menu_entry *cfg_opts[] = { opt_entries, opt2_entries, cdopt_entries };
static const int *cfg_opt_counts[] = { &opt_entry_count, &opt2_entry_count, &cdopt_entry_count };
#define NL "\n"
static int seek_sect(FILE *f, const char *section)
{
char line[128], *tmp;
int len;
len = strlen(section);
// seek to the section needed
while (!feof(f))
{
tmp = fgets(line, sizeof(line), f);
if (tmp == NULL) break;
if (line[0] != '[') continue; // not section start
if (strncmp(line + 1, section, len) == 0 && line[len+1] == ']')
return 1; // found it
}
return 0;
}
static void custom_write(FILE *f, const menu_entry *me)
{
char *str, str24[24];
switch (me->id)
{
case MA_OPT_RENDERER:
if (!((defaultConfig.s_PicoOpt^PicoOpt)&0x10) &&
!((defaultConfig.EmuOpt^currentConfig.EmuOpt)&0x80)) return;
if (PicoOpt&0x10)
str = "8bit fast";
else if (currentConfig.EmuOpt&0x80)
str = "16bit accurate";
else
str = "8bit accurate";
fprintf(f, "Renderer = %s", str);
break;
case MA_OPT_SCALING:
if (defaultConfig.scaling == currentConfig.scaling) return;
switch (currentConfig.scaling) {
default: str = "OFF"; break;
case 1: str = "hw horizontal"; break;
case 2: str = "hw horiz. + vert."; break;
case 3: str = "sw horizontal"; break;
}
fprintf(f, "Scaling = %s", str);
break;
case MA_OPT_FRAMESKIP:
if (defaultConfig.Frameskip == currentConfig.Frameskip) return;
if (currentConfig.Frameskip < 0)
strcpy(str24, "Auto");
else sprintf(str24, "%i", currentConfig.Frameskip);
fprintf(f, "Frameskip = %s", str24);
break;
case MA_OPT_SOUND_QUALITY:
if (!((defaultConfig.s_PicoOpt^PicoOpt)&8) &&
defaultConfig.s_PsndRate == PsndRate) return;
str = (PicoOpt&0x08)?"stereo":"mono";
fprintf(f, "Sound Quality = %i %s", PsndRate, str);
break;
case MA_OPT_REGION:
if (defaultConfig.s_PicoRegion == PicoRegionOverride &&
defaultConfig.s_PicoAutoRgnOrder == PicoAutoRgnOrder) return;
fprintf(f, "Region = %s", me_region_name(PicoRegionOverride, PicoAutoRgnOrder));
break;
case MA_OPT_CONFIRM_STATES:
if (!((defaultConfig.EmuOpt^currentConfig.EmuOpt)&(5<<9))) return;
switch ((currentConfig.EmuOpt >> 9) & 5) {
default: str = "OFF"; break;
case 1: str = "writes"; break;
case 4: str = "loads"; break;
case 5: str = "both"; break;
}
fprintf(f, "Confirm savestate = %s", str);
break;
case MA_OPT_CPU_CLOCKS:
if (defaultConfig.CPUclock == currentConfig.CPUclock) return;
fprintf(f, "GP2X CPU clocks = %i", currentConfig.CPUclock);
break;
case MA_OPT2_GAMMA:
if (defaultConfig.gamma == currentConfig.gamma) return;
fprintf(f, "Gamma correction = %.3f", (double)currentConfig.gamma / 100.0);
break;
case MA_OPT2_SQUIDGEHACK:
if (!((defaultConfig.EmuOpt^currentConfig.EmuOpt)&0x0010)) return;
fprintf(f, "Squidgehack = %i", (currentConfig.EmuOpt&0x0010)>>4);
break;
case MA_CDOPT_READAHEAD:
if (defaultConfig.s_PicoCDBuffers == PicoCDBuffers) return;
sprintf(str24, "%i", PicoCDBuffers * 2);
fprintf(f, "ReadAhead buffer = %s", str24);
break;
default:
printf("unhandled custom_write: %i\n", me->id);
return;
}
fprintf(f, NL);
}
int config_writesect(const char *fname, const char *section)
{
FILE *fo = NULL, *fn = NULL; // old and new
menu_entry *me;
int t, i, tlen, ret;
char line[128], *tmp;
if (section != NULL)
{
fo = fopen(fname, "r");
if (fo == NULL) {
fn = fopen(fname, "w");
goto write;
}
ret = seek_sect(fo, section);
if (!ret) {
// sect not found, we can simply append
fclose(fo); fo = NULL;
fn = fopen(fname, "a");
goto write;
}
// use 2 files..
fclose(fo);
rename(fname, "tmp.cfg");
fo = fopen("tmp.cfg", "r");
fn = fopen(fname, "w");
if (fo == NULL || fn == NULL) goto write;
// copy everything until sect
tlen = strlen(section);
while (!feof(fo))
{
tmp = fgets(line, sizeof(line), fo);
if (tmp == NULL) break;
if (line[0] == '[' && strncmp(line + 1, section, tlen) == 0 && line[tlen+1] == ']')
break;
fputs(line, fn);
}
// now skip to next sect
while (!feof(fo))
{
tmp = fgets(line, sizeof(line), fo);
if (tmp == NULL) break;
if (line[0] == '[') {
fseek(fo, -strlen(line), SEEK_CUR);
break;
}
}
if (feof(fo))
{
fclose(fo); fo = NULL;
remove("tmp.cfg");
}
}
else
{
fn = fopen(fname, "w");
}
write:
if (fn == NULL) {
if (fo) fclose(fo);
return -1;
}
if (section != NULL)
fprintf(fn, "[%s]" NL, section);
for (t = 0; t < sizeof(cfg_opts) / sizeof(cfg_opts[0]); t++)
{
me = cfg_opts[t];
tlen = *(cfg_opt_counts[t]);
for (i = 0; i < tlen; i++, me++)
{
if (!me->need_to_save) continue;
if ((me->beh != MB_ONOFF && me->beh != MB_RANGE) || me->name == NULL)
custom_write(fn, me);
else if (me->beh == MB_ONOFF)
fprintf(fn, "%s = %i" NL, me->name, (*(int *)me->var & me->mask) ? 1 : 0);
else if (me->beh == MB_RANGE)
fprintf(fn, "%s = %i" NL, me->name, *(int *)me->var);
}
}
fprintf(fn, NL);
if (fo != NULL)
{
// copy whatever is left
while (!feof(fo))
{
tmp = fgets(line, sizeof(line), fo);
if (tmp == NULL) break;
fputs(line, fn);
}
fclose(fo);
remove("tmp.cfg");
}
fclose(fn);
return 0;
}
static void mystrip(char *str)
{
int i, len;
len = strlen(str);
for (i = 0; i < len; i++)
if (str[i] != ' ') break;
if (i > 0) memmove(str, str + i, len - i + 1);
len = strlen(str);
for (i = len - 1; i >= 0; i--)
if (str[i] != ' ') break;
str[i+1] = 0;
}
int config_writelrom(const char *fname)
{
char line[128], *tmp, *optr = NULL;
char *old_data = NULL;
int size;
FILE *f;
if (strlen(currentConfig.lastRomFile) == 0) return 0;
f = fopen(fname, "r");
if (f != NULL)
{
fseek(f, 0, SEEK_END);
size = ftell(f);
fseek(f, 0, SEEK_SET);
old_data = malloc(size + size/8);
if (old_data != NULL)
{
optr = old_data;
while (!feof(f))
{
tmp = fgets(line, sizeof(line), f);
if (tmp == NULL) break;
mystrip(line);
if (strncasecmp(line, "LastUsedROM", 11) == 0)
continue;
sprintf(optr, "%s", line);
optr += strlen(optr);
}
}
fclose(f);
}
f = fopen(fname, "w");
if (f == NULL) return -1;
if (old_data != NULL) {
fwrite(old_data, 1, optr - old_data, f);
free(old_data);
}
fprintf(f, "LastUsedROM = %s" NL, currentConfig.lastRomFile);
fclose(f);
return 0;
}
static int custom_read(menu_entry *me, const char *var, const char *val)
{
char *tmp;
int tmpi;
switch (me->id)
{
case MA_OPT_RENDERER:
if (strcasecmp(var, "Renderer") != 0) return 0;
if (strcasecmp(val, "8bit fast") == 0) {
PicoOpt |= 0x10;
}
else if (strcasecmp(val, "16bit accurate") == 0) {
PicoOpt &= ~0x10;
currentConfig.EmuOpt |= 0x80;
}
else if (strcasecmp(val, "8bit accurate") == 0) {
PicoOpt &= ~0x10;
currentConfig.EmuOpt &= ~0x80;
}
else
return 0;
return 1;
case MA_OPT_SCALING:
if (strcasecmp(var, "Scaling") != 0) return 0;
if (strcasecmp(val, "OFF") == 0) {
currentConfig.scaling = 0;
} else if (strcasecmp(val, "hw horizontal") == 0) {
currentConfig.scaling = 1;
} else if (strcasecmp(val, "hw horiz. + vert.") == 0) {
currentConfig.scaling = 2;
} else if (strcasecmp(val, "sw horizontal") == 0) {
currentConfig.scaling = 3;
} else
return 0;
return 1;
case MA_OPT_FRAMESKIP:
if (strcasecmp(var, "Frameskip") != 0) return 0;
if (strcasecmp(val, "Auto") == 0)
currentConfig.Frameskip = -1;
else currentConfig.Frameskip = atoi(val);
return 1;
case MA_OPT_SOUND_QUALITY:
if (strcasecmp(var, "Sound Quality") != 0) return 0;
PsndRate = strtoul(val, &tmp, 10);
if (PsndRate < 8000 || PsndRate > 44100)
PsndRate = 22050;
while (*tmp == ' ') tmp++;
if (strcasecmp(tmp, "stereo") == 0) {
PicoOpt |= 8;
} else if (strcasecmp(tmp, "mono") == 0) {
PicoOpt &= ~8;
} else
return 0;
return 1;
case MA_OPT_REGION:
if (strcasecmp(var, "Region") != 0) return 0;
if (strncasecmp(val, "Auto: ", 6) == 0)
{
const char *p = val + 5, *end = val + strlen(val);
int i;
PicoRegionOverride = PicoAutoRgnOrder = 0;
for (i = 0; p < end && i < 3; p += 3, i++) {
if (p[0] == 'J' && p[1] == 'P') {
PicoAutoRgnOrder |= 1 << (i*4);
} else if (p[0] == 'U' && p[1] == 'S') {
PicoAutoRgnOrder |= 4 << (i*4);
} else if (p[0] == 'E' && p[1] == 'U') {
PicoAutoRgnOrder |= 8 << (i*4);
}
}
}
else if (strcasecmp(val, "Auto") == 0) {
PicoRegionOverride = 0;
} else if (strcasecmp(val, "Japan NTSC") == 0) {
PicoRegionOverride = 1;
} else if (strcasecmp(val, "Japan PAL") == 0) {
PicoRegionOverride = 2;
} else if (strcasecmp(val, "USA") == 0) {
PicoRegionOverride = 4;
} else if (strcasecmp(val, "Europe") == 0) {
PicoRegionOverride = 8;
} else
return 0;
return 1;
case MA_OPT_CONFIRM_STATES:
if (strcasecmp(var, "Confirm savestate") != 0) return 0;
if (strcasecmp(val, "OFF") == 0) {
currentConfig.EmuOpt &= 5<<9;
} else if (strcasecmp(val, "writes") == 0) {
currentConfig.EmuOpt &= 5<<9;
currentConfig.EmuOpt |= 1<<9;
} else if (strcasecmp(val, "loads") == 0) {
currentConfig.EmuOpt &= 5<<9;
currentConfig.EmuOpt |= 4<<9;
} else if (strcasecmp(val, "both") == 0) {
currentConfig.EmuOpt &= 5<<9;
currentConfig.EmuOpt |= 5<<9;
} else
return 0;
return 1;
case MA_OPT_CPU_CLOCKS:
if (strcasecmp(var, "GP2X CPU clocks") != 0) return 0;
currentConfig.CPUclock = atoi(val);
return 1;
case MA_OPT2_GAMMA:
if (strcasecmp(var, "Gamma correction") != 0) return 0;
currentConfig.gamma = (int) (atof(val) * 100.0);
return 1;
case MA_OPT2_SQUIDGEHACK:
if (strcasecmp(var, "Squidgehack") != 0) return 0;
tmpi = atoi(val);
if (tmpi) *(int *)me->var |= me->mask;
else *(int *)me->var &= ~me->mask;
return 1;
case MA_CDOPT_READAHEAD:
if (strcasecmp(var, "ReadAhead buffer") != 0) return 0;
PicoCDBuffers = atoi(val) / 2;
return 1;
default:
if (strcasecmp(var, "LastUsedROM") == 0) {
tmpi = sizeof(currentConfig.lastRomFile);
strncpy(currentConfig.lastRomFile, val, tmpi);
currentConfig.lastRomFile[tmpi-1] = 0;
return 1;
}
printf("unhandled custom_read: %i\n", me->id);
return 0;
}
}
static void parse(const char *var, const char *val)
{
menu_entry *me;
int t, i, tlen, tmp, ret = 0;
for (t = 0; t < sizeof(cfg_opts) / sizeof(cfg_opts[0]) && ret == 0; t++)
{
me = cfg_opts[t];
tlen = *(cfg_opt_counts[t]);
for (i = 0; i < tlen && ret == 0; i++, me++)
{
if (!me->need_to_save) continue;
if (me->name != NULL) {
if (strcasecmp(var, me->name) != 0) continue; // surely not this one
if (me->beh == MB_ONOFF) {
tmp = atoi(val);
if (tmp) *(int *)me->var |= me->mask;
else *(int *)me->var &= ~me->mask;
return;
} else if (me->beh == MB_RANGE) {
tmp = atoi(val);
if (tmp < me->min) tmp = me->min;
if (tmp > me->max) tmp = me->max;
*(int *)me->var = tmp;
return;
}
}
ret = custom_read(me, var, val);
}
}
if (!ret) printf("config_readsect: unhandled var: %s\n", var);
}
int config_readsect(const char *fname, const char *section)
{
char line[128], *var, *val, *tmp;
FILE *f = fopen(fname, "r");
int len, i, ret;
if (f == NULL) return 0;
if (section != NULL)
{
ret = seek_sect(f, section);
if (!ret) {
printf("config_readsect: %s: missing section [%s]\n", fname, section);
fclose(f);
return -1;
}
}
while (!feof(f))
{
tmp = fgets(line, sizeof(line), f);
if (tmp == NULL) break;
if (line[0] == '[') break; // other section
// strip comments, linefeed, spaces..
len = strlen(line);
for (i = 0; i < len; i++)
if (line[i] == '#' || line[i] == '\r' || line[i] == '\n') { line[i] = 0; break; }
mystrip(line);
len = strlen(line);
if (len <= 0) continue;
// get var and val
for (i = 0; i < len; i++)
if (line[i] == '=') break;
if (i >= len || strchr(&line[i+1], '=') != NULL) {
printf("config_readsect: can't parse: %s\n", line);
continue;
}
line[i] = 0;
var = line;
val = &line[i+1];
mystrip(var);
mystrip(val);
if (strlen(var) == 0 || strlen(val) == 0) {
printf("config_readsect: something's empty: \"%s\" = \"%s\"\n", var, val);
continue;
}
parse(var, val);
}
fclose(f);
return 0;
}

6
common/config.h Normal file
View file

@ -0,0 +1,6 @@
#include <stdio.h>
int config_writesect(const char *fname, const char *section);
int config_writelrom(const char *fname);
int config_readsect(const char *fname, const char *section);