Begin adding core options interface.

Makefile

@@ -17,6 +17,7 @@ OBJ = frontend/frontend.o \
 		input/overlay.o \
 		patch.o \
 		fifo_buffer.o \
+		core_options.o \
 		compat/compat.o \
 		cheats.o \
 		conf/config_file.o \

Makefile.win

@@ -15,6 +15,7 @@ OBJ = frontend/frontend.o \
 		movie.o \
 		gfx/gfx_common.o \
 		input/input_common.o \
+		core_options.o \
 		patch.o \
 		compat/compat.o \
 		screenshot.o \

core_options.c

@@ -0,0 +1,208 @@
+/*  RetroArch - A frontend for libretro.
+ *  Copyright (C) 2010-2013 - Hans-Kristian Arntzen
+ * 
+ *  RetroArch is free software: you can redistribute it and/or modify it under the terms
+ *  of the GNU General Public License as published by the Free Software Found-
+ *  ation, either version 3 of the License, or (at your option) any later version.
+ *
+ *  RetroArch is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
+ *  without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+ *  PURPOSE.  See the GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License along with RetroArch.
+ *  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include "core_options.h"
+#include "general.h"
+#include "file.h"
+#include "compat/posix_string.h"
+
+struct core_option
+{
+   char *desc;
+   char *key;
+   struct string_list *vals;
+   size_t index;
+};
+
+struct core_option_manager
+{
+   config_file_t *conf;
+   char conf_path[PATH_MAX];
+
+   struct core_option *opts;
+   size_t size;
+   bool updated;
+};
+
+void core_option_free(core_option_manager_t *opt)
+{
+   if (!opt)
+      return;
+
+   for (size_t i = 0; i < opt->size; i++)
+   {
+      free(opt->opts[i].desc);
+      free(opt->opts[i].key);
+      string_list_free(opt->opts[i].vals);
+   }
+
+   if (opt->conf)
+      config_file_free(opt->conf);
+   free(opt->opts);
+   free(opt);
+}
+
+void core_option_get(core_option_manager_t *opt, struct retro_variable *var)
+{
+   for (size_t i = 0; i < opt->size; i++)
+   {
+      if (strcmp(opt->opts[i].key, var->key) == 0)
+      {
+         var->value = core_option_get_val(opt, i);
+         return;
+      }
+   }
+
+   var->value = NULL;
+}
+
+static bool parse_variable(core_option_manager_t *opt, size_t index, const struct retro_variable *var)
+{
+   struct core_option *option = &opt->opts[index];
+   option->key = strdup(var->key);
+
+   char *value = strdup(var->value);
+   char *desc_end = strstr(value, "; ");
+
+   if (!desc_end)
+   {
+      free(value);
+      return false;
+   }
+
+   *desc_end = '\0';
+   option->desc = strdup(value);
+
+   const char *val_start = desc_end + 2;
+   option->vals = string_split(val_start, "|");
+
+   if (!option->vals)
+   {
+      free(value);
+      return false;
+   }
+
+   char *config_val = NULL;
+   if (config_get_string(opt->conf, option->key, &config_val))
+   {
+      for (size_t i = 0; i < option->vals->size; i++)
+      {
+         if (strcmp(option->vals->elems[i].data, config_val) == 0)
+         {
+            option->index = i;
+            break;
+         }
+      }
+
+      free(config_val);
+   }
+
+   free(value);
+   return true;
+}
+
+core_option_manager_t *core_option_new(const char *conf_path, const struct retro_variable *vars)
+{
+   core_option_manager_t *opt = (core_option_manager_t*)calloc(1, sizeof(*opt));
+   if (!opt)
+      return NULL;
+
+   size_t size = 0;
+
+   if (*conf_path)
+      opt->conf = config_file_new(conf_path);
+   if (!opt->conf)
+      opt->conf = config_file_new(NULL);
+
+   strlcpy(opt->conf_path, conf_path, sizeof(opt->conf_path));
+
+   if (!opt->conf)
+      goto error;
+
+   for (const struct retro_variable *var = vars; var->key && var->value; var++)
+      size++;
+
+   opt->opts = (struct core_option*)calloc(size, sizeof(*opt->opts));
+   if (!opt->opts)
+      goto error;
+
+   opt->size = size;
+
+   size = 0;
+   for (const struct retro_variable *var = vars; var->key && var->value; size++, var++)
+   {
+      if (!parse_variable(opt, size, var))
+         goto error;
+   }
+
+   return opt;
+
+error:
+   core_option_free(opt);
+   return NULL;
+}
+
+bool core_option_updated(core_option_manager_t *opt)
+{
+   return opt->updated;
+}
+
+void core_option_flush(core_option_manager_t *opt)
+{
+   for (size_t i = 0; i < opt->size; i++)
+   {
+      struct core_option *option = &opt->opts[i];
+      config_set_string(opt->conf, option->key, core_option_get_val(opt, i));
+   }
+   config_file_write(opt->conf, opt->conf_path);
+}
+
+size_t core_option_size(core_option_manager_t *opt)
+{
+   return opt->size;
+}
+
+const char *core_option_get_desc(core_option_manager_t *opt, size_t index)
+{
+   return opt->opts[index].desc;
+}
+
+const char *core_option_get_val(core_option_manager_t *opt, size_t index)
+{
+   struct core_option *option = &opt->opts[index];
+   return option->vals->elems[option->index].data;
+}
+
+void core_option_next(core_option_manager_t *opt, size_t index)
+{
+   struct core_option *option = &opt->opts[index];
+   option->index = (option->index + 1) % option->vals->size;
+   opt->updated = true;
+}
+
+void core_option_prev(core_option_manager_t *opt, size_t index)
+{
+   struct core_option *option = &opt->opts[index];
+   option->index = (option->index + option->vals->size - 1) % option->vals->size;
+   opt->updated = true;
+}
+
+void core_option_set_default(core_option_manager_t *opt, size_t index)
+{
+   opt->opts[index].index = 0;
+   opt->updated = true;
+}
+
+

core_options.h

@@ -0,0 +1,47 @@
+/*  RetroArch - A frontend for libretro.
+ *  Copyright (C) 2010-2013 - Hans-Kristian Arntzen
+ * 
+ *  RetroArch is free software: you can redistribute it and/or modify it under the terms
+ *  of the GNU General Public License as published by the Free Software Found-
+ *  ation, either version 3 of the License, or (at your option) any later version.
+ *
+ *  RetroArch is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
+ *  without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+ *  PURPOSE.  See the GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License along with RetroArch.
+ *  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#ifndef CORE_OPTIONS_H__
+#define CORE_OPTIONS_H__
+
+#include "boolean.h"
+#include "libretro.h"
+#include <stddef.h>
+
+typedef struct core_option_manager core_option_manager_t;
+
+core_option_manager_t *core_option_new(const char *conf_path, const struct retro_variable *vars);
+bool core_option_updated(core_option_manager_t *opt);
+void core_option_flush(core_option_manager_t *opt);
+void core_option_free(core_option_manager_t *opt);
+
+void core_option_get(core_option_manager_t *opt, struct retro_variable *var);
+
+// Returns total number of options.
+size_t core_option_size(core_option_manager_t *opt);
+
+// Gets description and current value for an option.
+const char *core_option_get_desc(core_option_manager_t *opt, size_t index);
+const char *core_option_get_val(core_option_manager_t *opt, size_t index);
+
+// Cycles through options for an option. Options wrap around.
+void core_option_next(core_option_manager_t *opt, size_t index);
+void core_option_prev(core_option_manager_t *opt, size_t index);
+
+// Sets default val for an option.
+void core_option_set_default(core_option_manager_t *opt, size_t index);
+
+#endif
+

dynamic.c

@@ -90,7 +90,6 @@ void *(*pretro_get_memory_data)(unsigned);
 size_t (*pretro_get_memory_size)(unsigned);
 
 static void set_environment(void);
-static void set_environment_defaults(void);
 
 #ifdef HAVE_DYNAMIC
 #if defined(__APPLE__)
@@ -310,8 +309,6 @@ void init_libretro_sym(void)
 #endif
 
    load_symbols();
-
-   set_environment_defaults();
    set_environment();
 }
 
@@ -393,44 +390,34 @@ static bool environment_cb(unsigned cmd, void *data)
       case RETRO_ENVIRONMENT_GET_VARIABLE:
       {
          struct retro_variable *var = (struct retro_variable*)data;
-         if (var->key)
-         {
-            // Split string has '\0' delimiters so we have to find the position in original string,
-            // then pass the corresponding offset into the split string.
-            const char *key = strstr(g_extern.system.environment, var->key);
-            size_t key_len = strlen(var->key);
-            if (key && key[key_len] == '=')
-            {
-               ptrdiff_t offset = key - g_extern.system.environment;
-               var->value = &g_extern.system.environment_split[offset + key_len + 1];
-            }
-            else
-               var->value = NULL;
-         }
-         else
-            var->value = g_extern.system.environment;
+         RARCH_LOG("Environ GET_VARIABLE %s:\n", var->key);
 
-         RARCH_LOG("Environ GET_VARIABLE: %s=%s\n",
-               var->key ? var->key : "null",
-               var->value ? var->value : "null");
+         if (g_extern.system.core_options)
+            core_option_get(g_extern.system.core_options, var);
+         else
+            var->value = NULL;
 
          break;
       }
 
+      case RETRO_ENVIRONMENT_GET_VARIABLE_UPDATE:
+         *(bool*)data = g_extern.system.core_options ?
+            core_option_updated(g_extern.system.core_options) : false;
+         break;
+
       case RETRO_ENVIRONMENT_SET_VARIABLES:
       {
-         RARCH_LOG("Environ SET_VARIABLES:\n");
-         RARCH_LOG("=======================\n");
-         const struct retro_variable *vars = (const struct retro_variable*)data;
-         while (vars->key)
-         {
-            RARCH_LOG("\t%s :: %s\n",
-                  vars->key,
-                  vars->value ? vars->value : "N/A");
+         RARCH_LOG("Environ SET_VARIABLES.\n");
 
-            vars++;
+         if (g_extern.system.core_options)
+         {
+            core_option_flush(g_extern.system.core_options);
+            core_option_free(g_extern.system.core_options);
          }
-         RARCH_LOG("=======================\n");
+
+         const struct retro_variable *vars = (const struct retro_variable*)data;
+         g_extern.system.core_options = core_option_new(g_settings.core_options_path, vars);
+
          break;
       }
 
@@ -609,13 +596,3 @@ static void set_environment(void)
    pretro_set_environment(environment_cb);
 }
 
-static void set_environment_defaults(void)
-{
-   char *save;
-
-   // Split up environment variables beforehand.
-   if (g_extern.system.environment_split &&
-         strtok_r(g_extern.system.environment_split, ";", &save))
-      while (strtok_r(NULL, ";", &save));
-}
-