nkeynes@450: /**
nkeynes@561:  * $Id$
nkeynes@450:  *
nkeynes@450:  * User configuration support
nkeynes@450:  *
nkeynes@450:  * Copyright (c) 2005 Nathan Keynes.
nkeynes@450:  *
nkeynes@450:  * This program is free software; you can redistribute it and/or modify
nkeynes@450:  * it under the terms of the GNU General Public License as published by
nkeynes@450:  * the Free Software Foundation; either version 2 of the License, or
nkeynes@450:  * (at your option) any later version.
nkeynes@450:  *
nkeynes@450:  * This program is distributed in the hope that it will be useful,
nkeynes@450:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
nkeynes@450:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
nkeynes@450:  * GNU General Public License for more details.
nkeynes@450:  */
nkeynes@450: 
nkeynes@450: #include <unistd.h>
nkeynes@450: #include <stdio.h>
nkeynes@450: #include <errno.h>
nkeynes@450: #include <stdlib.h>
nkeynes@450: #include <string.h>
nkeynes@480: #include <glib/gmem.h>
nkeynes@450: #include <glib/gstrfuncs.h>
nkeynes@450: #include "dream.h"
nkeynes@450: #include "config.h"
nkeynes@450: #include "maple/maple.h"
nkeynes@450: 
bhaal22@643: 
bhaal22@643: extern struct lxdream_config_entry alsa_config[];
bhaal22@643: 
nkeynes@450: gboolean lxdream_load_config_file( const gchar *filename );
nkeynes@450: gboolean lxdream_save_config_file( const gchar *filename );
nkeynes@450: gboolean lxdream_load_config_stream( FILE *f );
nkeynes@450: gboolean lxdream_save_config_stream( FILE *f );
nkeynes@450: 
nkeynes@450: static struct lxdream_config_entry global_config[] =
nkeynes@736:        {{ "bios", N_("Bios ROM"), CONFIG_TYPE_FILE, "dcboot.rom" },
nkeynes@736:         { "flash", N_("Flash ROM"), CONFIG_TYPE_FILE, "dcflash.rom" },
nkeynes@736:         { "default path", N_("Default disc path"), CONFIG_TYPE_PATH, "." },
nkeynes@736:         { "save path", N_("Save-state path"), CONFIG_TYPE_PATH, "save" },
nkeynes@736:         { "bootstrap", N_("Bootstrap IP.BIN"), CONFIG_TYPE_FILE, "IP.BIN" },
nkeynes@736:         { "gdrom", NULL, CONFIG_TYPE_FILE, NULL },
nkeynes@736:         { "recent", NULL, CONFIG_TYPE_FILE, NULL },
nkeynes@736:         { NULL, CONFIG_TYPE_NONE }};
nkeynes@450: 
nkeynes@450: static struct lxdream_config_entry serial_config[] =
nkeynes@736:        {{ "device", N_("Serial device"), CONFIG_TYPE_FILE, "/dev/ttyS1" },
nkeynes@736:         { NULL, CONFIG_TYPE_NONE }};
nkeynes@450: 
nkeynes@450: struct lxdream_config_group lxdream_config_root[] = 
nkeynes@736:        {{ "global", global_config },
nkeynes@736:         { "controllers", NULL },
nkeynes@736:         { "serial", serial_config },
bhaal22@643: #ifdef HAVE_ALSA
nkeynes@736:         { "alsa", alsa_config },
bhaal22@643: #endif
nkeynes@736:         { NULL, CONFIG_TYPE_NONE }};
nkeynes@450: 
nkeynes@450: static gchar *lxdream_config_load_filename = NULL;
nkeynes@450: static gchar *lxdream_config_save_filename = NULL;
nkeynes@450: 
nkeynes@450: gboolean lxdream_find_config()
nkeynes@450: {
nkeynes@480:     gboolean result = TRUE;
nkeynes@450:     char *home = getenv("HOME");
nkeynes@450:     if( lxdream_config_save_filename == NULL ) {
nkeynes@736:         lxdream_config_save_filename = g_strdup_printf("%s/.%s", home, DEFAULT_CONFIG_FILENAME);
nkeynes@450:     }
nkeynes@450:     if( lxdream_config_load_filename == NULL ) {
nkeynes@736:         if( access(lxdream_config_save_filename, R_OK) == 0 ) {
nkeynes@736:             lxdream_config_load_filename = g_strdup(lxdream_config_save_filename);
nkeynes@736:         } else if( access( PACKAGE_CONF_DIR "/" DEFAULT_CONFIG_FILENAME, R_OK ) == 0 ) {
nkeynes@736:             lxdream_config_load_filename = g_strdup(PACKAGE_CONF_DIR "/" DEFAULT_CONFIG_FILENAME);
nkeynes@736:         } else if( access( "./" DEFAULT_CONFIG_FILENAME, R_OK ) == 0 ) {
nkeynes@736:             lxdream_config_load_filename = g_strdup("./" DEFAULT_CONFIG_FILENAME);
nkeynes@736:         } else {
nkeynes@736:             lxdream_config_load_filename = g_strdup(lxdream_config_save_filename);
nkeynes@736:             result = FALSE;
nkeynes@736:         }	
nkeynes@480:     }
nkeynes@480:     return result;
nkeynes@450: }
nkeynes@450: 
nkeynes@450: void lxdream_set_config_filename( const gchar *filename )
nkeynes@450: {
nkeynes@450:     if( lxdream_config_load_filename != NULL ) {
nkeynes@736:         g_free(lxdream_config_load_filename);
nkeynes@450:     }
nkeynes@450:     lxdream_config_load_filename = g_strdup(filename);
nkeynes@450:     if( lxdream_config_save_filename != NULL ) {
nkeynes@736:         g_free(lxdream_config_save_filename);
nkeynes@450:     }
nkeynes@450:     lxdream_config_save_filename = g_strdup(filename);
nkeynes@450: }
nkeynes@450: 
nkeynes@450: void lxdream_set_default_config( )
nkeynes@450: {
nkeynes@450:     struct lxdream_config_group *group = lxdream_config_root;
nkeynes@450:     while( group->key != NULL ) {
nkeynes@736:         struct lxdream_config_entry *param = group->params;
nkeynes@736:         if( param != NULL ) {
nkeynes@736:             while( param->key != NULL ) {
nkeynes@736:                 if( param->value != param->default_value ) {
nkeynes@736:                     if( param->value != NULL )
nkeynes@736:                         free( param->value );
nkeynes@736:                     param->value = (gchar *)param->default_value;
nkeynes@736:                 }
nkeynes@736:                 param++;
nkeynes@736:             }
nkeynes@736:         }
nkeynes@736:         group++;
nkeynes@450:     }
nkeynes@450:     maple_detach_all();
nkeynes@450: }
nkeynes@450: 
nkeynes@450: const gchar *lxdream_get_config_value( int key )
nkeynes@450: {
nkeynes@450:     return global_config[key].value;
nkeynes@450: }
nkeynes@450: 
nkeynes@460: void lxdream_set_config_value( lxdream_config_entry_t param, const gchar *value )
nkeynes@450: {
nkeynes@475:     if( param->value != value ) {
nkeynes@736:         if( param->value != param->default_value && param->value != NULL ) {
nkeynes@736:             free( param->value );
nkeynes@736:         }
nkeynes@736:         param->value = g_strdup(value);
nkeynes@450:     }
nkeynes@450: }
nkeynes@450: 
nkeynes@460: void lxdream_set_global_config_value( int key, const gchar *value )
nkeynes@460: {
nkeynes@460:     lxdream_set_config_value(&global_config[key], value);
nkeynes@460: }
nkeynes@460: 
nkeynes@759: const struct lxdream_config_entry * lxdream_get_config_entry( int key )
nkeynes@724: {
nkeynes@724:     return &global_config[key];
nkeynes@724: }
nkeynes@724: 
nkeynes@458: gboolean lxdream_set_group_value( lxdream_config_group_t group, const gchar *key, const gchar *value )
nkeynes@458: {
nkeynes@458:     int i;
nkeynes@458:     for( i=0; group->params[i].key != NULL; i++ ) {
nkeynes@736:         if( strcasecmp( group->params[i].key, key ) == 0 ) {
nkeynes@736:             lxdream_set_config_value( &group->params[i], value );
nkeynes@736:             return TRUE;
nkeynes@736:         }
nkeynes@458:     }
nkeynes@458:     return FALSE;
nkeynes@458: }
nkeynes@458: 
nkeynes@460: void lxdream_copy_config_list( lxdream_config_entry_t dest, lxdream_config_entry_t src )
nkeynes@460: {
nkeynes@460:     int i;
nkeynes@460:     for( i=0; src[i].key != NULL; i++ ) {
nkeynes@736:         lxdream_set_config_value( &dest[i], src[i].value );
nkeynes@460:     }
nkeynes@460: }
nkeynes@460: 
nkeynes@450: gboolean lxdream_load_config( )
nkeynes@450: {
nkeynes@450:     if( lxdream_config_load_filename == NULL ) {
nkeynes@736:         lxdream_find_config();
nkeynes@450:     }
nkeynes@450:     return lxdream_load_config_file(lxdream_config_load_filename);
nkeynes@450: }
nkeynes@450: 
nkeynes@450: gboolean lxdream_save_config( )
nkeynes@450: {
nkeynes@450:     if( lxdream_config_save_filename == NULL ) {
nkeynes@736:         lxdream_find_config();
nkeynes@450:     }
nkeynes@450:     return lxdream_save_config_file(lxdream_config_save_filename);
nkeynes@450: }
nkeynes@450: 
nkeynes@450: gboolean lxdream_load_config_file( const gchar *filename )
nkeynes@450: {
nkeynes@450:     FILE *f;
nkeynes@450:     gboolean result;
nkeynes@450: 
nkeynes@450:     if( access(filename, F_OK) != 0 ) {
nkeynes@736:         INFO( "Configuration file '%s' does not exist, creating from defaults" );
nkeynes@736:         lxdream_set_default_config();
nkeynes@736:         lxdream_save_config();
nkeynes@450:     }
nkeynes@450: 
nkeynes@450:     f = fopen(filename, "ro");
nkeynes@450:     if( f == NULL ) {
nkeynes@736:         ERROR( "Unable to open configuration file '%s': %s", filename, strerror(errno) );
nkeynes@736:         lxdream_set_default_config();
nkeynes@736:         return FALSE;
nkeynes@450:     }
nkeynes@450: 
nkeynes@450:     result = lxdream_load_config_stream( f );
nkeynes@450:     fclose(f);
nkeynes@450:     return result;
nkeynes@450: }
nkeynes@450: 
nkeynes@450: gboolean lxdream_load_config_stream( FILE *f )
nkeynes@450: {
nkeynes@450: 
nkeynes@450:     char buf[512];
nkeynes@450:     int maple_device = -1, maple_subdevice = -1;
nkeynes@450:     struct lxdream_config_group devgroup;
nkeynes@450:     struct lxdream_config_group *group = NULL;
nkeynes@450:     maple_device_t device = NULL;
nkeynes@450:     lxdream_set_default_config();
nkeynes@450: 
nkeynes@450:     while( fgets( buf, sizeof(buf), f ) != NULL ) {
nkeynes@736:         g_strstrip(buf);
nkeynes@736:         if( buf[0] == '#' )
nkeynes@736:             continue;
nkeynes@736:         if( *buf == '[' ) {
nkeynes@736:             char *p = strchr(buf, ']');
nkeynes@736:             if( p != NULL ) {
nkeynes@736:                 struct lxdream_config_group *tmp_group;
nkeynes@736:                 maple_device = maple_subdevice = -1;
nkeynes@736:                 *p = '\0';
nkeynes@736:                 g_strstrip(buf+1);
nkeynes@736:                 tmp_group = &lxdream_config_root[0];
nkeynes@736:                 while( tmp_group->key != NULL ) {
nkeynes@736:                     if( strcasecmp(tmp_group->key, buf+1) == 0 ) {
nkeynes@736:                         group = tmp_group;
nkeynes@736:                         break;
nkeynes@736:                     }
nkeynes@736:                     tmp_group++;
nkeynes@736:                 }
nkeynes@736:             }
nkeynes@736:         } else if( group != NULL ) {
nkeynes@736:             char *value = strchr( buf, '=' );
nkeynes@736:             if( value != NULL ) {
nkeynes@736:                 struct lxdream_config_entry *param = group->params;
nkeynes@736:                 *value = '\0';
nkeynes@736:                 value++;
nkeynes@736:                 g_strstrip(buf);
nkeynes@736:                 g_strstrip(value);
nkeynes@736:                 if( strcmp(group->key,"controllers") == 0  ) {
nkeynes@736:                     if( g_strncasecmp( buf, "device ", 7 ) == 0 ) {
nkeynes@736:                         maple_device = strtoul( buf+7, NULL, 0 );
nkeynes@736:                         if( maple_device < 0 || maple_device > 3 ) {
nkeynes@736:                             ERROR( "Device number must be between 0..3 (not '%s')", buf+7);
nkeynes@736:                             continue;
nkeynes@736:                         }
nkeynes@736:                         maple_subdevice = 0;
nkeynes@736:                         device = maple_new_device( value );
nkeynes@736:                         if( device == NULL ) {
nkeynes@736:                             ERROR( "Unrecognized device '%s'", value );
nkeynes@736:                         } else {
nkeynes@736:                             devgroup.key = "controllers";
nkeynes@736:                             devgroup.params = maple_get_device_config(device);
nkeynes@736:                             maple_attach_device( device, maple_device, maple_subdevice );
nkeynes@736:                             group = &devgroup;
nkeynes@736:                         }
nkeynes@736:                         continue;
nkeynes@736:                     } else if( g_strncasecmp( buf, "subdevice ", 10 ) == 0 ) {
nkeynes@736:                         maple_subdevice = strtoul( buf+10, NULL, 0 );
nkeynes@736:                         if( maple_device == -1 ) {
nkeynes@736:                             ERROR( "Subdevice not allowed without primary device" );
nkeynes@736:                         } else if( maple_subdevice < 1 || maple_subdevice > 5 ) {
nkeynes@736:                             ERROR( "Subdevice must be between 1..5 (not '%s')", buf+10 );
nkeynes@736:                         } else if( (device = maple_new_device(value)) == NULL ) {
nkeynes@736:                             ERROR( "Unrecognized subdevice '%s'", value );
nkeynes@736:                         } else {
nkeynes@736:                             devgroup.key = "controllers";
nkeynes@736:                             devgroup.params = maple_get_device_config(device);
nkeynes@736:                             maple_attach_device( device, maple_device, maple_subdevice );
nkeynes@736:                             group = &devgroup;
nkeynes@736:                         }
nkeynes@736:                         continue;
nkeynes@736:                     }
nkeynes@736:                 }
nkeynes@736:                 while( param->key != NULL ) {
nkeynes@736:                     if( strcasecmp( param->key, buf ) == 0 ) {
nkeynes@736:                         param->value = g_strdup(value);
nkeynes@736:                         break;
nkeynes@736:                     }
nkeynes@736:                     param++;
nkeynes@736:                 }
nkeynes@736:             }
nkeynes@736:         }
nkeynes@450:     }
nkeynes@450:     return TRUE;
nkeynes@450: }
nkeynes@450: 
nkeynes@450: gboolean lxdream_save_config_file( const gchar *filename )
nkeynes@450: {
nkeynes@450:     FILE *f = fopen(filename, "wo");
nkeynes@450:     gboolean result;
nkeynes@450:     if( f == NULL ) {
nkeynes@736:         ERROR( "Unable to open '%s': %s", filename, strerror(errno) );
nkeynes@736:         return FALSE;
nkeynes@450:     }
nkeynes@450:     result = lxdream_save_config_stream(f);
nkeynes@450:     fclose(f);
nkeynes@450:     return TRUE;
nkeynes@450: }    
nkeynes@450: 
nkeynes@450: gboolean lxdream_save_config_stream( FILE *f )
nkeynes@450: {
nkeynes@450:     struct lxdream_config_group *group = &lxdream_config_root[0];
nkeynes@736: 
nkeynes@450:     while( group->key != NULL ) {
nkeynes@736:         struct lxdream_config_entry *entry = group->params;
nkeynes@736:         fprintf( f, "[%s]\n", group->key );
nkeynes@736: 
nkeynes@736:         if( entry != NULL ) {
nkeynes@736:             while( entry->key != NULL ) {
nkeynes@736:                 if( entry->value != NULL ) {
nkeynes@736:                     fprintf( f, "%s = %s\n", entry->key, entry->value );
nkeynes@736:                 }
nkeynes@736:                 entry++;
nkeynes@736:             }
nkeynes@736:         } else if( strcmp(group->key, "controllers") == 0 ) {
nkeynes@736:             int i,j;
nkeynes@736:             for( i=0; i<4; i++ ) {
nkeynes@736:                 for( j=0; j<6; j++ ) {
nkeynes@736:                     maple_device_t dev = maple_get_device( i, j );
nkeynes@736:                     if( dev != NULL ) {
nkeynes@736:                         if( j == 0 )
nkeynes@736:                             fprintf( f, "Device %d = %s\n", i, dev->device_class->name );
nkeynes@736:                         else 
nkeynes@736:                             fprintf( f, "Subdevice %d = %s\n", j, dev->device_class->name );
nkeynes@736:                         if( dev->get_config != NULL && ((entry = dev->get_config(dev)) != NULL) ) {
nkeynes@736:                             while( entry->key != NULL ) {
nkeynes@736:                                 if( entry->value != NULL ) {
nkeynes@736:                                     fprintf( f, "%*c%s = %s\n", j==0?4:8, ' ',entry->key, entry->value );
nkeynes@736:                                 }
nkeynes@736:                                 entry++;
nkeynes@736:                             }
nkeynes@736:                         }
nkeynes@736:                     }
nkeynes@736:                 }
nkeynes@736:             }
nkeynes@736:         }
nkeynes@736:         fprintf( f, "\n" );
nkeynes@736:         group++;
nkeynes@450:     }
nkeynes@450:     return TRUE;
nkeynes@450: }