opkg: implement opkg_set_option() and opkg_get_option()
[oweals/opkg-lede.git] / libopkg / opkg.c
index e113847aae47a2b1251b404447530fc9f1919c2c..de1d9b8caaeaaa0c441fd78e7ee88bffaed8a3b2 100644 (file)
@@ -1,8 +1,8 @@
-/* opkg.c - the itsy package management system
+/* opkg.c - the opkg  package management system
 
-   Carl D. Worth
+   Thomas Wood <thomas@openedhand.com>
 
-   Copyright (C) 2001 University of Southern California
+   Copyright (C) 2008 OpenMoko Inc
 
    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License as
    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.
-*/
+ */
 
-#include "opkg.h"
+#include <config.h>
+#include <fnmatch.h>
 
-#include "args.h"
+#include "opkg.h"
 #include "opkg_conf.h"
-#include "opkg_cmd.h"
+#include "args.h"
+
+#include "opkg_install.h"
+#include "opkg_configure.h"
 
-int main(int argc, const char *argv[])
+struct _opkg_t
 {
-    int err, optind;
-    args_t args;
-    char *cmd_name;
-    opkg_cmd_t *cmd;
-    opkg_conf_t opkg_conf;
-
-    error_list=NULL;
-
-    args_init(&args);
-       
-    optind = args_parse(&args, argc, argv);
-    if (optind == argc || optind < 0) {
-       args_usage("opkg must have one sub-command argument");
-    }
+  args_t *args;
+  opkg_conf_t *conf;
+  opkg_option_t *options[];
+};
+
+/** Private Functions ***/
 
-    cmd_name = argv[optind++];
 
-    err = opkg_conf_init(&opkg_conf, &args);
-    if (err) {
-       return err;
+static int
+opkg_configure_packages(opkg_conf_t *conf, char *pkg_name)
+{
+  pkg_vec_t *all;
+  int i;
+  pkg_t *pkg;
+  int r, err = 0;
+
+  all = pkg_vec_alloc();
+  pkg_hash_fetch_available(&conf->pkg_hash, all);
+
+  for (i = 0; i < all->len; i++)
+  {
+    pkg = all->pkgs[i];
+
+    if (pkg_name && fnmatch(pkg_name, pkg->name, 0))
+      continue;
+
+    if (pkg->state_status == SS_UNPACKED)
+    {
+      r = opkg_configure(conf, pkg);
+      if (r == 0)
+      {
+        pkg->state_status = SS_INSTALLED;
+        pkg->parent->state_status = SS_INSTALLED;
+        pkg->state_flag &= ~SF_PREFER;
+      }
+      else
+      {
+        if (!err)
+          err = r;
+      }
     }
+  }
 
-    args_deinit(&args);
+  pkg_vec_free(all);
+  return err;
+}
 
-    cmd = opkg_cmd_find(cmd_name);
-    if (cmd == NULL) {
-       fprintf(stderr, "%s: unknown sub-command %s\n", argv[0], cmd_name);
-       args_usage(NULL);
-    }
 
-    if (cmd->requires_args && optind == argc) {
-       fprintf(stderr, "%s: the ``%s'' command requires at least one argument\n",
-               __FUNCTION__, cmd_name);
-       args_usage(NULL);
+
+/*** Public API ***/
+
+opkg_t *
+opkg_new ()
+{
+  opkg_t *opkg;
+  opkg = malloc (sizeof (opkg_t));
+  args_init (opkg->args);
+  opkg_conf_init (opkg->conf, opkg->args);
+  opkg_init_options_array (opkg->conf, opkg->options);
+  return opkg;
+}
+
+void
+opkg_free (opkg_t *opkg)
+{
+  opkg_conf_deinit (opkg->conf);
+  args_deinit (opkg->args);
+}
+
+void
+opkg_get_option (opkg_t *opkg, char *option, void **value)
+{
+  int i = 0;
+  opkg_option_t **options = opkg->options;
+
+  /* can't store a value in a NULL pointer! */
+  if (!value)
+    return;
+
+  /* look up the option
+   * TODO: this would be much better as a hash table
+   */
+  while (options[i]->name)
+  {
+    if (strcmp(options[i]->name, option) != 0)
+    {
+      i++;
+      continue;
     }
+  }
 
-    err = opkg_cmd_exec(cmd, &opkg_conf, argc - optind, argv + optind);
+  /* get the option */
+  switch (options[i]->type)
+  {
+    case OPKG_OPT_TYPE_BOOL:
+      *((int *) value) = *((int *) options[i]->value);
+      return;
 
-    if ( err == 0 ) {
-       opkg_message(opkg_conf, OPKG_NOTICE, "Succesfully done.\n");
-    } else {
-       opkg_message(opkg_conf, OPKG_NOTICE, "Error returned. Return value is %d\n.",err);
+    case OPKG_OPT_TYPE_INT:
+      *((int *) value) = *((int *) options[i]->value);
+      return;
+
+    case OPKG_OPT_TYPE_STRING:
+      *((char **)value) = strdup (options[i]->value);
+      return;
+   }
 
 }
 
+void
+opkg_set_option (opkg_t *opkg, char *option, void *value)
+{
+  int i = 0;
+  opkg_option_t **options = opkg->options;
+
+  /* NULL values are not defined */
+  if (!value)
+    return;
+
+  /* look up the option
+   * TODO: this would be much better as a hash table
+   */
+  while (options[i]->name)
+  {
+    if (strcmp(options[i]->name, option) != 0)
+    {
+      i++;
+      continue;
     }
-    /* XXX: FEATURE request: run ldconfig and/or depmod after package needing them are installed or removed */  
-    // opkg_global_postinst();
+  }
+
+  /* set the option */
+  switch (options[i]->type)
+  {
+    case OPKG_OPT_TYPE_BOOL:
+      if (*((int *) value) == 0)
+        *((int *)options[i]->value) = 0;
+      else
+        *((int *)options[i]->value) = 1;
+      return;
+
+    case OPKG_OPT_TYPE_INT:
+      *((int *) options[i]->value) = *((int *) value);
+      return;
+
+    case OPKG_OPT_TYPE_STRING:
+      *((char **)options[i]->value) = strdup(value);
+      return;
+   }
+
+}
+
+int
+opkg_install_package (opkg_t *opkg, char *package_name)
+{
+  int err;
+
+  pkg_info_preinstall_check(opkg->conf);
+
+  if (opkg->conf->multiple_providers)
+  {
+    err = opkg_install_multi_by_name (opkg->conf, package_name);
+  }
+  else
+  {
+    err = opkg_install_by_name (opkg->conf, package_name);
+  }
 
-    opkg_conf_deinit(&opkg_conf);
+  err = opkg_configure_packages (opkg->conf, NULL);
 
+  if (opkg->conf->noaction)
     return err;
+
+  opkg_conf_write_status_files (opkg->conf);
+  pkg_write_changed_filelists (opkg->conf);
+
+  return err;
 }
 
+int
+opkg_remove_package (opkg_t *opkg, char *package_name)
+{
+  return 1;
+}
 
+int
+opkg_upgrade_package (opkg_t *opkg, char *package_name)
+{
+  return 1;
+}
 
+int
+opkg_upgrade_all (opkg_t *opkg)
+{
+  return 1;
+}
+
+int
+opkg_update_package_lists (opkg_t *opkg)
+{
+  return 1;
+}