X-Git-Url: https://git.librecmc.org/?p=oweals%2Fopkg-lede.git;a=blobdiff_plain;f=libopkg%2Fopkg_conf.c;h=589fc49479dab696bc8f4a973d91a6b0479d00bc;hp=34ca34d904a0fe52671e1d8cc291c4595d8dec39;hb=2985c00f6a35a39b0d5f7871ee396facdc973a54;hpb=69bae440fd21376d2a717575b1418c962396bd21 diff --git a/libopkg/opkg_conf.c b/libopkg/opkg_conf.c index 34ca34d..589fc49 100644 --- a/libopkg/opkg_conf.c +++ b/libopkg/opkg_conf.c @@ -1,7 +1,8 @@ -/* opkg_conf.c - the itsy package management system +/* opkg_conf.c - the opkg package management system - Carl D. Worth + Copyright (C) 2009 Ubiq Technologies + Carl D. Worth Copyright (C) 2001 University of Southern California This program is free software; you can redistribute it and/or @@ -15,707 +16,692 @@ General Public License for more details. */ -#include "includes.h" -#include "opkg_conf.h" +#include +#include +#include +#include +#include +#include +#include "opkg_conf.h" +#include "pkg_vec.h" +#include "pkg.h" #include "xregex.h" #include "sprintf_alloc.h" -#include "opkg_conf.h" #include "opkg_message.h" #include "file_util.h" -#include "str_util.h" -#include "xsystem.h" -#include #include "opkg_defines.h" - - -static int opkg_conf_parse_file(opkg_conf_t *conf, const char *filename, - pkg_src_list_t *pkg_src_list, - nv_pair_list_t *tmp_dest_nv_pair_list, - char **tmp_lists_dir); -static int opkg_init_options_array(const opkg_conf_t *conf, opkg_option_t **options); -static int opkg_conf_set_option(const opkg_option_t *options, - const char *name, const char *value); -static int opkg_conf_set_default_dest(opkg_conf_t *conf, - const char *default_dest_name); -static int set_and_load_pkg_src_list(opkg_conf_t *conf, - pkg_src_list_t *nv_pair_list); -static int set_and_load_pkg_dest_list(opkg_conf_t *conf, - nv_pair_list_t *nv_pair_list, char * lists_dir); - -int opkg_init_options_array(const opkg_conf_t *conf, opkg_option_t **options) -{ - opkg_option_t tmp[] = { - { "force_defaults", OPKG_OPT_TYPE_BOOL, &conf->force_defaults }, - { "force_depends", OPKG_OPT_TYPE_BOOL, &conf->force_depends }, - { "force_overwrite", OPKG_OPT_TYPE_BOOL, &conf->force_overwrite }, - { "force_downgrade", OPKG_OPT_TYPE_BOOL, &conf->force_downgrade }, - { "force_reinstall", OPKG_OPT_TYPE_BOOL, &conf->force_reinstall }, - { "force_space", OPKG_OPT_TYPE_BOOL, &conf->force_space }, - { "ftp_proxy", OPKG_OPT_TYPE_STRING, &conf->ftp_proxy }, - { "http_proxy", OPKG_OPT_TYPE_STRING, &conf->http_proxy }, - { "multiple_providers", OPKG_OPT_TYPE_BOOL, &conf->multiple_providers }, - { "no_proxy", OPKG_OPT_TYPE_STRING, &conf->no_proxy }, - { "test", OPKG_OPT_TYPE_INT, &conf->noaction }, - { "noaction", OPKG_OPT_TYPE_INT, &conf->noaction }, - { "nodeps", OPKG_OPT_TYPE_BOOL, &conf->nodeps }, - { "offline_root", OPKG_OPT_TYPE_STRING, &conf->offline_root }, - { "offline_root_post_script_cmd", OPKG_OPT_TYPE_STRING, &conf->offline_root_post_script_cmd }, - { "offline_root_pre_script_cmd", OPKG_OPT_TYPE_STRING, &conf->offline_root_pre_script_cmd }, - { "proxy_passwd", OPKG_OPT_TYPE_STRING, &conf->proxy_passwd }, - { "proxy_user", OPKG_OPT_TYPE_STRING, &conf->proxy_user }, - { "query-all", OPKG_OPT_TYPE_BOOL, &conf->query_all }, - { "verbose-wget", OPKG_OPT_TYPE_BOOL, &conf->verbose_wget }, - { "verbosity", OPKG_OPT_TYPE_BOOL, &conf->verbosity }, - { NULL } - }; - - *options = (opkg_option_t *)malloc(sizeof(tmp)); - if ( options == NULL ){ - fprintf(stderr,"%s: Unable to allocate memory\n",__FUNCTION__); - return -1; - } - - memcpy(*options, tmp, sizeof(tmp)); - return 0; +#include "libbb/libbb.h" + +static int lock_fd; +static char *lock_file = NULL; + +static opkg_conf_t _conf; +opkg_conf_t *conf = &_conf; + +/* + * Config file options + */ +opkg_option_t options[] = { + {"cache", OPKG_OPT_TYPE_STRING, &_conf.cache}, + {"force_defaults", OPKG_OPT_TYPE_BOOL, &_conf.force_defaults}, + {"force_maintainer", OPKG_OPT_TYPE_BOOL, &_conf.force_maintainer}, + {"force_depends", OPKG_OPT_TYPE_BOOL, &_conf.force_depends}, + {"force_overwrite", OPKG_OPT_TYPE_BOOL, &_conf.force_overwrite}, + {"force_downgrade", OPKG_OPT_TYPE_BOOL, &_conf.force_downgrade}, + {"force_reinstall", OPKG_OPT_TYPE_BOOL, &_conf.force_reinstall}, + {"force_space", OPKG_OPT_TYPE_BOOL, &_conf.force_space}, + {"force_postinstall", OPKG_OPT_TYPE_BOOL, &_conf.force_postinstall}, + {"force_checksum", OPKG_OPT_TYPE_BOOL, &_conf.force_checksum}, + {"check_signature", OPKG_OPT_TYPE_BOOL, &_conf.check_signature}, + {"ftp_proxy", OPKG_OPT_TYPE_STRING, &_conf.ftp_proxy}, + {"http_proxy", OPKG_OPT_TYPE_STRING, &_conf.http_proxy}, + {"no_proxy", OPKG_OPT_TYPE_STRING, &_conf.no_proxy}, + {"test", OPKG_OPT_TYPE_BOOL, &_conf.noaction}, + {"noaction", OPKG_OPT_TYPE_BOOL, &_conf.noaction}, + {"download_only", OPKG_OPT_TYPE_BOOL, &_conf.download_only}, + {"nodeps", OPKG_OPT_TYPE_BOOL, &_conf.nodeps}, + {"nocase", OPKG_OPT_TYPE_BOOL, &_conf.nocase}, + {"offline_root", OPKG_OPT_TYPE_STRING, &_conf.offline_root}, + {"overlay_root", OPKG_OPT_TYPE_STRING, &_conf.overlay_root}, + {"proxy_passwd", OPKG_OPT_TYPE_STRING, &_conf.proxy_passwd}, + {"proxy_user", OPKG_OPT_TYPE_STRING, &_conf.proxy_user}, + {"query-all", OPKG_OPT_TYPE_BOOL, &_conf.query_all}, + {"size", OPKG_OPT_TYPE_BOOL, &_conf.size}, + {"tmp_dir", OPKG_OPT_TYPE_STRING, &_conf.tmp_dir}, + {"verbosity", OPKG_OPT_TYPE_INT, &_conf.verbosity}, + {NULL, 0, NULL} }; -static void opkg_conf_override_string(char **conf_str, char *arg_str) +static int resolve_pkg_dest_list(void) { - if (arg_str) { - if (*conf_str) { - free(*conf_str); - } - *conf_str = strdup(arg_str); - } + nv_pair_list_elt_t *iter; + nv_pair_t *nv_pair; + pkg_dest_t *dest; + char *root_dir; + + for (iter = nv_pair_list_first(&conf->tmp_dest_list); iter; + iter = nv_pair_list_next(&conf->tmp_dest_list, iter)) { + nv_pair = (nv_pair_t *) iter->data; + + if (conf->offline_root) { + sprintf_alloc(&root_dir, "%s%s", conf->offline_root, + nv_pair->value); + } else { + root_dir = xstrdup(nv_pair->value); + } + + dest = + pkg_dest_list_append(&conf->pkg_dest_list, nv_pair->name, + root_dir, conf->lists_dir); + free(root_dir); + + if (conf->default_dest == NULL) + conf->default_dest = dest; + + if (conf->dest_str && !strcmp(dest->name, conf->dest_str)) { + conf->default_dest = dest; + conf->restrict_to_default_dest = 1; + } + } + + if (conf->dest_str && !conf->restrict_to_default_dest) { + opkg_msg(ERROR, "Unknown dest name: `%s'.\n", conf->dest_str); + return -1; + } + + return 0; } -static void opkg_conf_free_string(char **conf_str) +static int opkg_conf_set_option(const char *name, const char *value) { - if (*conf_str) { - free(*conf_str); - *conf_str = NULL; - } + int i = 0; + + while (options[i].name) { + if (strcmp(options[i].name, name) == 0) { + switch (options[i].type) { + case OPKG_OPT_TYPE_BOOL: + if (*(int *)options[i].value) { + opkg_msg(ERROR, + "Duplicate boolean option %s, " + "leaving this option on.\n", + name); + return 0; + } + *((int *const)options[i].value) = 1; + return 0; + case OPKG_OPT_TYPE_INT: + if (value) { + if (*(int *)options[i].value) { + opkg_msg(ERROR, + "Duplicate option %s, " + "using first seen value \"%d\".\n", + name, + *((int *)options[i]. + value)); + return 0; + } + *((int *const)options[i].value) = + atoi(value); + return 0; + } else { + opkg_msg(ERROR, + "Option %s needs an argument\n", + name); + return -1; + } + case OPKG_OPT_TYPE_STRING: + if (value) { + if (*(char **)options[i].value) { + opkg_msg(ERROR, + "Duplicate option %s, " + "using first seen value \"%s\".\n", + name, + *((char **)options[i]. + value)); + return 0; + } + *((char **const)options[i].value) = + xstrdup(value); + return 0; + } else { + opkg_msg(ERROR, + "Option %s needs an argument\n", + name); + return -1; + } + } + } + i++; + } + + opkg_msg(ERROR, "Unrecognized option: %s=%s\n", name, value); + return -1; } -int opkg_conf_init(opkg_conf_t *conf, const args_t *args) +static int +opkg_conf_parse_file(const char *filename, + pkg_src_list_t * pkg_src_list, + pkg_src_list_t * dist_src_list) { - int err; - char *tmp_dir_base; - nv_pair_list_t tmp_dest_nv_pair_list; - char * lists_dir =NULL; - glob_t globbuf; - char *etc_opkg_conf_pattern = "/etc/opkg/*.conf"; - char *pending_dir =NULL; - - memset(conf, 0, sizeof(opkg_conf_t)); - - pkg_src_list_init(&conf->pkg_src_list); - - nv_pair_list_init(&tmp_dest_nv_pair_list); - pkg_dest_list_init(&conf->pkg_dest_list); - - nv_pair_list_init(&conf->arch_list); - - conf->restrict_to_default_dest = 0; - conf->default_dest = NULL; - - - if (args->tmp_dir) - tmp_dir_base = args->tmp_dir; - else - tmp_dir_base = getenv("TMPDIR"); - sprintf_alloc(&conf->tmp_dir, "%s/%s", - tmp_dir_base ? tmp_dir_base : OPKG_CONF_DEFAULT_TMP_DIR_BASE, - OPKG_CONF_TMP_DIR_SUFFIX); - conf->tmp_dir = mkdtemp(conf->tmp_dir); - if (conf->tmp_dir == NULL) { - fprintf(stderr, "%s: Failed to create temporary directory `%s': %s\n", - __FUNCTION__, conf->tmp_dir, strerror(errno)); - return errno; - } - - conf->force_depends = 0; - conf->force_defaults = 0; - conf->force_overwrite = 0; - conf->force_downgrade = 0; - conf->force_reinstall = 0; - conf->force_space = 0; - conf->force_removal_of_essential_packages = 0; - conf->force_removal_of_dependent_packages = 0; - conf->nodeps = 0; - conf->verbose_wget = 0; - conf->offline_root = NULL; - conf->offline_root_pre_script_cmd = NULL; - conf->offline_root_post_script_cmd = NULL; - conf->multiple_providers = 0; - conf->verbosity = 1; - conf->noaction = 0; - - conf->http_proxy = NULL; - conf->ftp_proxy = NULL; - conf->no_proxy = NULL; - conf->proxy_user = NULL; - conf->proxy_passwd = NULL; - - pkg_hash_init("pkg-hash", &conf->pkg_hash, OPKG_CONF_DEFAULT_HASH_LEN); - hash_table_init("file-hash", &conf->file_hash, OPKG_CONF_DEFAULT_HASH_LEN); - hash_table_init("obs-file-hash", &conf->obs_file_hash, OPKG_CONF_DEFAULT_HASH_LEN); - lists_dir=(char *)malloc(1); - lists_dir[0]='\0'; - if (args->conf_file) { - struct stat stat_buf; - err = stat(args->conf_file, &stat_buf); - if (err == 0) - if (opkg_conf_parse_file(conf, args->conf_file, - &conf->pkg_src_list, &tmp_dest_nv_pair_list,&lists_dir)<0) { - /* Memory leakage from opkg_conf_parse-file */ - return -1; - } - - } - - /* if (!lists_dir ){*/ - if (strlen(lists_dir)<=1 ){ - lists_dir = realloc(lists_dir,strlen(OPKG_CONF_LISTS_DIR)+2); - sprintf (lists_dir,"%s",OPKG_CONF_LISTS_DIR); - } - - if (args->offline_root) { - char *tmp = malloc(strlen(lists_dir) + strlen(args->offline_root) + 1); - sprintf_alloc(&tmp, "%s/%s",args->offline_root,lists_dir); - free(lists_dir); - lists_dir = tmp; - } - - pending_dir = malloc(strlen(lists_dir)+strlen("/pending")+5); - snprintf(pending_dir,strlen(lists_dir)+strlen("/pending") ,"%s%s",lists_dir,"/pending"); - - conf->lists_dir = strdup(lists_dir); - conf->pending_dir = strdup(pending_dir); - - if (args->offline_root) - sprintf_alloc(&etc_opkg_conf_pattern, "%s/etc/opkg/*.conf", args->offline_root); - memset(&globbuf, 0, sizeof(globbuf)); - err = glob(etc_opkg_conf_pattern, 0, NULL, &globbuf); - if (!err) { - int i; - for (i = 0; i < globbuf.gl_pathc; i++) { - if (globbuf.gl_pathv[i]) - if ( opkg_conf_parse_file(conf, globbuf.gl_pathv[i], - &conf->pkg_src_list, &tmp_dest_nv_pair_list,&lists_dir)<0) { - /* Memory leakage from opkg_conf_parse-file */ - return -1; - } - } - } - globfree(&globbuf); - - /* if no architectures were defined, then default all, noarch, and host architecture */ - if (nv_pair_list_empty(&conf->arch_list)) { - nv_pair_list_append(&conf->arch_list, "all", "1"); - nv_pair_list_append(&conf->arch_list, "noarch", "1"); - nv_pair_list_append(&conf->arch_list, HOST_CPU_STR, "10"); - } - - /* Even if there is no conf file, we'll need at least one dest. */ - if (tmp_dest_nv_pair_list.head == NULL) { - nv_pair_list_append(&tmp_dest_nv_pair_list, - OPKG_CONF_DEFAULT_DEST_NAME, - OPKG_CONF_DEFAULT_DEST_ROOT_DIR); - } - - /* After parsing the file, set options from command-line, (so that - command-line arguments take precedence) */ - /* XXX: CLEANUP: The interaction between args.c and opkg_conf.c - really needs to be cleaned up. There is so much duplication - right now it is ridiculous. Maybe opkg_conf_t should just save - a pointer to args_t (which could then not be freed), rather - than duplicating every field here? */ - if (args->autoremove) { - conf->autoremove = 1; - } - if (args->force_depends) { - conf->force_depends = 1; - } - if (args->force_defaults) { - conf->force_defaults = 1; - } - if (args->force_overwrite) { - conf->force_overwrite = 1; - } - if (args->force_downgrade) { - conf->force_downgrade = 1; - } - if (args->force_reinstall) { - conf->force_reinstall = 1; - } - if (args->force_removal_of_dependent_packages) { - conf->force_removal_of_dependent_packages = 1; - } - if (args->force_removal_of_essential_packages) { - conf->force_removal_of_essential_packages = 1; - } - if (args->nodeps) { - conf->nodeps = 1; - } - if (args->noaction) { - conf->noaction = 1; - } - if (args->query_all) { - conf->query_all = 1; - } - if (args->verbose_wget) { - conf->verbose_wget = 1; - } - if (args->multiple_providers) { - conf->multiple_providers = 1; - } - if (args->verbosity != conf->verbosity) { - conf->verbosity = args->verbosity; - } - - opkg_conf_override_string(&conf->offline_root, - args->offline_root); - opkg_conf_override_string(&conf->offline_root_pre_script_cmd, - args->offline_root_pre_script_cmd); - opkg_conf_override_string(&conf->offline_root_post_script_cmd, - args->offline_root_post_script_cmd); - -/* Pigi: added a flag to disable the checking of structures if the command does not need to - read anything from there. -*/ - if ( !(args->nocheckfordirorfile)){ - /* need to run load the source list before dest list -Jamey */ - if ( !(args->noreadfeedsfile)) - set_and_load_pkg_src_list(conf, &conf->pkg_src_list); - - /* Now that we have resolved conf->offline_root, we can commit to - the directory names for the dests and load in all the package - lists. */ - set_and_load_pkg_dest_list(conf, &tmp_dest_nv_pair_list,lists_dir); - - if (args->dest) { - err = opkg_conf_set_default_dest(conf, args->dest); - if (err) { - return err; - } - } - } - nv_pair_list_deinit(&tmp_dest_nv_pair_list); - free(lists_dir); - free(pending_dir); - - return 0; + int line_num = 0; + int err = 0; + FILE *file; + regex_t valid_line_re, comment_re; +#define regmatch_size 14 + regmatch_t regmatch[regmatch_size]; + + file = fopen(filename, "r"); + if (file == NULL) { + opkg_perror(ERROR, "Failed to open %s", filename); + err = -1; + goto err0; + } + + opkg_msg(INFO, "Loading conf file %s.\n", filename); + + err = xregcomp(&comment_re, + "^[[:space:]]*(#.*|[[:space:]]*)$", REG_EXTENDED); + if (err) + goto err1; + + err = xregcomp(&valid_line_re, + "^[[:space:]]*(\"([^\"]*)\"|([^[:space:]]*))" + "[[:space:]]*(\"([^\"]*)\"|([^[:space:]]*))" + "[[:space:]]*(\"([^\"]*)\"|([^[:space:]]*))" + "([[:space:]]+([^[:space:]]+))?([[:space:]]+(.*))?[[:space:]]*$", + REG_EXTENDED); + if (err) + goto err2; + + while (1) { + char *line; + char *type, *name, *value, *extra; + + line_num++; + + line = file_read_line_alloc(file); + if (line == NULL) + break; + + if (regexec(&comment_re, line, 0, 0, 0) == 0) + goto NEXT_LINE; + + if (regexec(&valid_line_re, line, regmatch_size, regmatch, 0) == + REG_NOMATCH) { + opkg_msg(ERROR, "%s:%d: Ignoring invalid line: `%s'\n", + filename, line_num, line); + goto NEXT_LINE; + } + + /* This has to be so ugly to deal with optional quotation marks */ + if (regmatch[2].rm_so > 0) { + type = xstrndup(line + regmatch[2].rm_so, + regmatch[2].rm_eo - regmatch[2].rm_so); + } else { + type = xstrndup(line + regmatch[3].rm_so, + regmatch[3].rm_eo - regmatch[3].rm_so); + } + + if (regmatch[5].rm_so > 0) { + name = xstrndup(line + regmatch[5].rm_so, + regmatch[5].rm_eo - regmatch[5].rm_so); + } else { + name = xstrndup(line + regmatch[6].rm_so, + regmatch[6].rm_eo - regmatch[6].rm_so); + } + + if (regmatch[8].rm_so > 0) { + value = xstrndup(line + regmatch[8].rm_so, + regmatch[8].rm_eo - regmatch[8].rm_so); + } else { + value = xstrndup(line + regmatch[9].rm_so, + regmatch[9].rm_eo - regmatch[9].rm_so); + } + + extra = NULL; + if (regmatch[11].rm_so > 0) { + if (regmatch[13].rm_so > 0 + && regmatch[13].rm_so != regmatch[13].rm_eo) + extra = + xstrndup(line + regmatch[11].rm_so, + regmatch[13].rm_eo - + regmatch[11].rm_so); + else + extra = xstrndup(line + regmatch[11].rm_so, + regmatch[11].rm_eo - + regmatch[11].rm_so); + } + + if (regmatch[13].rm_so != regmatch[13].rm_eo + && strncmp(type, "dist", 4) != 0) { + opkg_msg(ERROR, + "%s:%d: Ignoring config line with trailing garbage: `%s'\n", + filename, line_num, line); + } else { + + /* We use the conf->tmp_dest_list below instead of + conf->pkg_dest_list because we might encounter an + offline_root option later and that would invalidate the + directories we would have computed in + pkg_dest_list_init. (We do a similar thing with + tmp_src_nv_pair_list for sake of symmetry.) */ + if (strcmp(type, "option") == 0) { + opkg_conf_set_option(name, value); + } else if (strcmp(type, "dist") == 0) { + if (!nv_pair_list_find + ((nv_pair_list_t *) dist_src_list, name)) { + pkg_src_list_append(dist_src_list, name, + value, extra, 0); + } else { + opkg_msg(ERROR, + "Duplicate dist declaration (%s %s). " + "Skipping.\n", name, value); + } + } else if (strcmp(type, "dist/gz") == 0) { + if (!nv_pair_list_find + ((nv_pair_list_t *) dist_src_list, name)) { + pkg_src_list_append(dist_src_list, name, + value, extra, 1); + } else { + opkg_msg(ERROR, + "Duplicate dist declaration (%s %s). " + "Skipping.\n", name, value); + } + } else if (strcmp(type, "src") == 0) { + if (!nv_pair_list_find + ((nv_pair_list_t *) pkg_src_list, name)) { + pkg_src_list_append(pkg_src_list, name, + value, extra, 0); + } else { + opkg_msg(ERROR, + "Duplicate src declaration (%s %s). " + "Skipping.\n", name, value); + } + } else if (strcmp(type, "src/gz") == 0) { + if (!nv_pair_list_find + ((nv_pair_list_t *) pkg_src_list, name)) { + pkg_src_list_append(pkg_src_list, name, + value, extra, 1); + } else { + opkg_msg(ERROR, + "Duplicate src declaration (%s %s). " + "Skipping.\n", name, value); + } + } else if (strcmp(type, "dest") == 0) { + nv_pair_list_append(&conf->tmp_dest_list, name, + value); + } else if (strcmp(type, "lists_dir") == 0) { + conf->lists_dir = xstrdup(value); + } else if (strcmp(type, "arch") == 0) { + opkg_msg(INFO, + "Supported arch %s priority (%s)\n", + name, value); + if (!value) { + opkg_msg(NOTICE, + "No priority given for architecture %s," + "defaulting to 10\n", name); + value = xstrdup("10"); + } + nv_pair_list_append(&conf->arch_list, name, + value); + } else { + opkg_msg(ERROR, + "%s:%d: Ignoring invalid line: `%s'\n", + filename, line_num, line); + } + + } + + free(type); + free(name); + free(value); + if (extra) + free(extra); + +NEXT_LINE: + free(line); + } + + regfree(&valid_line_re); +err2: + regfree(&comment_re); +err1: + if (fclose(file) == EOF) { + opkg_perror(ERROR, "Couldn't close %s", filename); + err = -1; + } +err0: + return err; } -void opkg_conf_deinit(opkg_conf_t *conf) +int opkg_conf_write_status_files(void) { -#ifdef OPKG_DEBUG_NO_TMP_CLEANUP -#error - fprintf(stderr, "%s: Not cleaning up %s since opkg compiled " - "with OPKG_DEBUG_NO_TMP_CLEANUP\n", - __FUNCTION__, conf->tmp_dir); -#else - int err; - - err = rmdir(conf->tmp_dir); - if (err) { - if (errno == ENOTEMPTY) { - char *cmd; - sprintf_alloc(&cmd, "rm -fr %s\n", conf->tmp_dir); - err = xsystem(cmd); - free(cmd); - } - if (err) - fprintf(stderr, "WARNING: Unable to remove temporary directory: %s: %s\n", conf->tmp_dir, strerror(errno)); - } -#endif /* OPKG_DEBUG_NO_TMP_CLEANUP */ - - free(conf->tmp_dir); /*XXX*/ - - pkg_src_list_deinit(&conf->pkg_src_list); - pkg_dest_list_deinit(&conf->pkg_dest_list); - nv_pair_list_deinit(&conf->arch_list); - if (&conf->pkg_hash) - pkg_hash_deinit(&conf->pkg_hash); - if (&conf->file_hash) - hash_table_deinit(&conf->file_hash); - if (&conf->obs_file_hash) - hash_table_deinit(&conf->obs_file_hash); - - opkg_conf_free_string(&conf->offline_root); - opkg_conf_free_string(&conf->offline_root_pre_script_cmd); - opkg_conf_free_string(&conf->offline_root_post_script_cmd); - - if (conf->verbosity > 1) { - int i; - hash_table_t *hashes[] = { - &conf->pkg_hash, - &conf->file_hash, - &conf->obs_file_hash }; - for (i = 0; i < 3; i++) { - hash_table_t *hash = hashes[i]; - int c = 0; - int n_conflicts = 0; - int j; - for (j = 0; j < hash->n_entries; j++) { - int len = 0; - hash_entry_t *e = &hash->entries[j]; - if (e->next) - n_conflicts++; - while (e && e->key) { - len++; - e = e->next; - } - if (len > c) - c = len; - } - opkg_message(conf, OPKG_DEBUG, "hash_table[%s] n_buckets=%d n_elements=%d max_conflicts=%d n_conflicts=%d\n", - hash->name, hash->n_entries, hash->n_elements, c, n_conflicts); - hash_table_deinit(hash); - } - } + pkg_dest_list_elt_t *iter; + pkg_dest_t *dest; + pkg_vec_t *all; + pkg_t *pkg; + int i, ret = 0; + + if (conf->noaction) + return 0; + + list_for_each_entry(iter, &conf->pkg_dest_list.head, node) { + dest = (pkg_dest_t *) iter->data; + + dest->status_fp = fopen(dest->status_file_name, "w"); + if (dest->status_fp == NULL && errno != EROFS) { + opkg_perror(ERROR, "Can't open status file %s", + dest->status_file_name); + ret = -1; + } + } + + all = pkg_vec_alloc(); + pkg_hash_fetch_available(all); + + for (i = 0; i < all->len; i++) { + pkg = all->pkgs[i]; + /* We don't need most uninstalled packages in the status file */ + if (pkg->state_status == SS_NOT_INSTALLED + && (pkg->state_want == SW_UNKNOWN + || (pkg->state_want == SW_DEINSTALL + && pkg->state_flag != SF_HOLD) + || pkg->state_want == SW_PURGE)) { + continue; + } + if (pkg->dest == NULL) { + opkg_msg(ERROR, + "Internal error: package %s has a NULL dest\n", + pkg->name); + continue; + } + if (pkg->dest->status_fp) + pkg_print_status(pkg, pkg->dest->status_fp); + } + + pkg_vec_free(all); + + list_for_each_entry(iter, &conf->pkg_dest_list.head, node) { + dest = (pkg_dest_t *) iter->data; + if (dest->status_fp && fclose(dest->status_fp) == EOF) { + opkg_perror(ERROR, "Couldn't close %s", + dest->status_file_name); + ret = -1; + } + } + + return ret; } -static int opkg_conf_set_default_dest(opkg_conf_t *conf, - const char *default_dest_name) +char *root_filename_alloc(char *filename) { - pkg_dest_list_elt_t *iter; - pkg_dest_t *dest; - - for (iter = conf->pkg_dest_list.head; iter; iter = iter->next) { - dest = iter->data; - if (strcmp(dest->name, default_dest_name) == 0) { - conf->default_dest = dest; - conf->restrict_to_default_dest = 1; - return 0; - } - } - - fprintf(stderr, "ERROR: Unknown dest name: `%s'\n", default_dest_name); - - return 1; + char *root_filename; + sprintf_alloc(&root_filename, "%s%s", + (conf->offline_root ? conf->offline_root : ""), filename); + return root_filename; } -static int set_and_load_pkg_src_list(opkg_conf_t *conf, pkg_src_list_t *pkg_src_list) +static int glob_errfunc(const char *epath, int eerrno) { - pkg_src_list_elt_t *iter; - pkg_src_t *src; - char *list_file; - - for (iter = pkg_src_list->head; iter; iter = iter->next) { - src = iter->data; - if (src == NULL) { - continue; - } - - sprintf_alloc(&list_file, "%s/%s", - conf->restrict_to_default_dest ? conf->default_dest->lists_dir : conf->lists_dir, - src->name); - - if (file_exists(list_file)) { - pkg_hash_add_from_file(conf, list_file, src, NULL, 0); - } - free(list_file); - } - - return 0; -} + if (eerrno == ENOENT) + /* If leading dir does not exist, we get GLOB_NOMATCH. */ + return 0; -static int set_and_load_pkg_dest_list(opkg_conf_t *conf, nv_pair_list_t *nv_pair_list, char *lists_dir ) -{ - nv_pair_list_elt_t *iter; - nv_pair_t *nv_pair; - pkg_dest_t *dest; - char *root_dir; - - for (iter = nv_pair_list->head; iter; iter = iter->next) { - nv_pair = iter->data; - - if (conf->offline_root) { - sprintf_alloc(&root_dir, "%s%s", conf->offline_root, nv_pair->value); - } else { - root_dir = strdup(nv_pair->value); - } - dest = pkg_dest_list_append(&conf->pkg_dest_list, nv_pair->name, root_dir, lists_dir); - free(root_dir); - if (dest == NULL) { - continue; - } - if (conf->default_dest == NULL) { - conf->default_dest = dest; - } - if (file_exists(dest->status_file_name)) { - pkg_hash_add_from_file(conf, dest->status_file_name, - NULL, dest, 1); - } - } - - return 0; + opkg_msg(ERROR, "glob failed for %s: %s\n", epath, strerror(eerrno)); + return 0; } -static int opkg_conf_parse_file(opkg_conf_t *conf, const char *filename, - pkg_src_list_t *pkg_src_list, - nv_pair_list_t *tmp_dest_nv_pair_list, - char **lists_dir) +int opkg_conf_init(void) { - int err; - opkg_option_t * options; - FILE *file = fopen(filename, "r"); - regex_t valid_line_re, comment_re; -#define regmatch_size 12 - regmatch_t regmatch[regmatch_size]; - - if (opkg_init_options_array(conf, &options)<0) - return ENOMEM; - - if (file == NULL) { - fprintf(stderr, "%s: failed to open %s: %s\n", - __FUNCTION__, filename, strerror(errno)); - free(options); - return errno; - } - opkg_message(conf, OPKG_NOTICE, "loading conf file %s\n", filename); - - err = xregcomp(&comment_re, - "^[[:space:]]*(#.*|[[:space:]]*)$", - REG_EXTENDED); - if (err) { - free(options); - return err; - } - err = xregcomp(&valid_line_re, "^[[:space:]]*(\"([^\"]*)\"|([^[:space:]]*))[[:space:]]*(\"([^\"]*)\"|([^[:space:]]*))[[:space:]]*(\"([^\"]*)\"|([^[:space:]]*))([[:space:]]+([^[:space:]]+))?[[:space:]]*$", REG_EXTENDED); - if (err) { - free(options); - return err; - } - - while(1) { - int line_num = 0; - char *line; - char *type, *name, *value, *extra; - - line = file_read_line_alloc(file); - line_num++; - if (line == NULL) { - break; - } - - str_chomp(line); - - if (regexec(&comment_re, line, 0, 0, 0) == 0) { - goto NEXT_LINE; - } - - if (regexec(&valid_line_re, line, regmatch_size, regmatch, 0) == REG_NOMATCH) { - str_chomp(line); - fprintf(stderr, "%s:%d: Ignoring invalid line: `%s'\n", - filename, line_num, line); - goto NEXT_LINE; - } - - /* This has to be so ugly to deal with optional quotation marks */ - if (regmatch[2].rm_so > 0) { - type = strndup(line + regmatch[2].rm_so, - regmatch[2].rm_eo - regmatch[2].rm_so); - } else { - type = strndup(line + regmatch[3].rm_so, - regmatch[3].rm_eo - regmatch[3].rm_so); - } - if (regmatch[5].rm_so > 0) { - name = strndup(line + regmatch[5].rm_so, - regmatch[5].rm_eo - regmatch[5].rm_so); - } else { - name = strndup(line + regmatch[6].rm_so, - regmatch[6].rm_eo - regmatch[6].rm_so); - } - if (regmatch[8].rm_so > 0) { - value = strndup(line + regmatch[8].rm_so, - regmatch[8].rm_eo - regmatch[8].rm_so); - } else { - value = strndup(line + regmatch[9].rm_so, - regmatch[9].rm_eo - regmatch[9].rm_so); - } - extra = NULL; - if (regmatch[11].rm_so > 0) { - extra = strndup (line + regmatch[11].rm_so, - regmatch[11].rm_eo - regmatch[11].rm_so); - } - - /* We use the tmp_dest_nv_pair_list below instead of - conf->pkg_dest_list because we might encounter an - offline_root option later and that would invalidate the - directories we would have computed in - pkg_dest_list_init. (We do a similar thing with - tmp_src_nv_pair_list for sake of symmetry.) */ - if (strcmp(type, "option") == 0) { - opkg_conf_set_option(options, name, value); - } else if (strcmp(type, "src") == 0) { - if (!nv_pair_list_find((nv_pair_list_t*) pkg_src_list, name)) { - pkg_src_list_append (pkg_src_list, name, value, extra, 0); - } else { - opkg_message(conf, OPKG_ERROR, "ERROR: duplicate src declaration. Skipping:\n\t src %s %s\n", - name, value); - } - } else if (strcmp(type, "src/gz") == 0) { - if (!nv_pair_list_find((nv_pair_list_t*) pkg_src_list, name)) { - pkg_src_list_append (pkg_src_list, name, value, extra, 1); - } else { - opkg_message(conf, OPKG_ERROR, "ERROR: duplicate src declaration. Skipping:\n\t src %s %s\n", - name, value); - } - } else if (strcmp(type, "dest") == 0) { - nv_pair_list_append(tmp_dest_nv_pair_list, name, value); - } else if (strcmp(type, "lists_dir") == 0) { - *lists_dir = realloc(*lists_dir,strlen(value)+1); - if (*lists_dir == NULL) { - opkg_message(conf, OPKG_ERROR, "ERROR: Not enough memory\n"); - free(options); - return EINVAL; - } - sprintf (*lists_dir,"%s",value); - } else if (strcmp(type, "arch") == 0) { - opkg_message(conf, OPKG_INFO, "supported arch %s priority (%s)\n", name, value); - if (!value) { - opkg_message(conf, OPKG_NOTICE, "defaulting architecture %s priority to 10\n", name); - value = strdup("10"); - } - nv_pair_list_append(&conf->arch_list, strdup(name), strdup(value)); - } else { - fprintf(stderr, "WARNING: Ignoring unknown configuration " - "parameter: %s %s %s\n", type, name, value); - free(options); - return EINVAL; - } - - free(type); - free(name); - free(value); - if (extra) - free (extra); - - NEXT_LINE: - free(line); - } - - free(options); - regfree(&comment_re); - regfree(&valid_line_re); - fclose(file); - - return 0; -} + pkg_src_list_init(&conf->pkg_src_list); + pkg_src_list_init(&conf->dist_src_list); + pkg_dest_list_init(&conf->pkg_dest_list); + pkg_dest_list_init(&conf->tmp_dest_list); + nv_pair_list_init(&conf->arch_list); -static int opkg_conf_set_option(const opkg_option_t *options, - const char *name, const char *value) -{ - int i = 0; - while (options[i].name) { - if (strcmp(options[i].name, name) == 0) { - switch (options[i].type) { - case OPKG_OPT_TYPE_BOOL: - *((int *)options[i].value) = 1; - return 0; - case OPKG_OPT_TYPE_INT: - if (value) { - *((int *)options[i].value) = atoi(value); - return 0; - } else { - printf("%s: Option %s need an argument\n", - __FUNCTION__, name); - return EINVAL; - } - case OPKG_OPT_TYPE_STRING: - if (value) { - *((char **)options[i].value) = strdup(value); - return 0; - } else { - printf("%s: Option %s need an argument\n", - __FUNCTION__, name); - return EINVAL; - } - } - } - i++; - } - - fprintf(stderr, "%s: Unrecognized option: %s=%s\n", - __FUNCTION__, name, value); - return EINVAL; + return 0; } -int opkg_conf_write_status_files(opkg_conf_t *conf) +int opkg_conf_load(void) { - pkg_dest_list_elt_t *iter; - pkg_dest_t *dest; - pkg_vec_t *all; - pkg_t *pkg; - register int i; - int err; - - if (conf->noaction) - return 0; - for (iter = conf->pkg_dest_list.head; iter; iter = iter->next) { - dest = iter->data; - dest->status_file = fopen(dest->status_file_tmp_name, "w"); - if (dest->status_file == NULL) { - fprintf(stderr, "%s: Can't open status file: %s for writing: %s\n", - __FUNCTION__, dest->status_file_name, strerror(errno)); - } - } - - all = pkg_vec_alloc(); - pkg_hash_fetch_available(&conf->pkg_hash, all); - - for(i = 0; i < all->len; i++) { - pkg = all->pkgs[i]; - /* We don't need most uninstalled packages in the status file */ - if (pkg->state_status == SS_NOT_INSTALLED - && (pkg->state_want == SW_UNKNOWN - || pkg->state_want == SW_DEINSTALL - || pkg->state_want == SW_PURGE)) { - continue; - } - if (!pkg) { - fprintf(stderr, "Null package\n"); - } - if (pkg->dest == NULL) { - fprintf(stderr, "%s: ERROR: Can't write status for " - "package %s since it has a NULL dest\n", - __FUNCTION__, pkg->name); - continue; - } - if (pkg->dest->status_file) { - pkg_print_status(pkg, pkg->dest->status_file); - } - } - - pkg_vec_free(all); - - for (iter = conf->pkg_dest_list.head; iter; iter = iter->next) { - dest = iter->data; - if (dest->status_file) { - err = ferror(dest->status_file); - fclose(dest->status_file); - dest->status_file = NULL; - if (!err) { - file_move(dest->status_file_tmp_name, dest->status_file_name); - } else { - fprintf(stderr, "%s: ERROR: An error has occurred writing %s, " - "retaining old %s\n", __FUNCTION__, - dest->status_file_tmp_name, dest->status_file_name); - } - } - } - - return 0; + int i, glob_ret; + char *tmp, *tmp_dir_base, **tmp_val; + glob_t globbuf; + char *etc_opkg_conf_pattern; + + conf->restrict_to_default_dest = 0; + conf->default_dest = NULL; + + if (!conf->offline_root) + conf->offline_root = xstrdup(getenv("OFFLINE_ROOT")); + + if (conf->conf_file) { + struct stat st; + if (stat(conf->conf_file, &st) == -1) { + opkg_perror(ERROR, "Couldn't stat %s", conf->conf_file); + goto err0; + } + if (opkg_conf_parse_file(conf->conf_file, + &conf->pkg_src_list, + &conf->dist_src_list)) + goto err1; + } + + if (conf->offline_root) + sprintf_alloc(&etc_opkg_conf_pattern, "%s/etc/opkg/*.conf", + conf->offline_root); + else { + const char *conf_file_dir = getenv("OPKG_CONF_DIR"); + if (conf_file_dir == NULL) + conf_file_dir = OPKG_CONF_DEFAULT_CONF_FILE_DIR; + sprintf_alloc(&etc_opkg_conf_pattern, "%s/*.conf", + conf_file_dir); + } + + memset(&globbuf, 0, sizeof(globbuf)); + glob_ret = glob(etc_opkg_conf_pattern, 0, glob_errfunc, &globbuf); + if (glob_ret && glob_ret != GLOB_NOMATCH) { + free(etc_opkg_conf_pattern); + globfree(&globbuf); + goto err1; + } + + free(etc_opkg_conf_pattern); + + for (i = 0; i < globbuf.gl_pathc; i++) { + if (globbuf.gl_pathv[i]) + if (conf->conf_file && + !strcmp(conf->conf_file, globbuf.gl_pathv[i])) + continue; + if (opkg_conf_parse_file(globbuf.gl_pathv[i], + &conf->pkg_src_list, + &conf->dist_src_list) < 0) { + globfree(&globbuf); + goto err1; + } + } + + globfree(&globbuf); + + if (conf->offline_root) + sprintf_alloc(&lock_file, "%s/%s", conf->offline_root, + OPKGLOCKFILE); + else + sprintf_alloc(&lock_file, "%s", OPKGLOCKFILE); + + lock_fd = creat(lock_file, S_IRUSR | S_IWUSR | S_IRGRP); + if (lock_fd == -1) { + opkg_perror(ERROR, "Could not create lock file %s", lock_file); + goto err2; + } + + if (lockf(lock_fd, F_TLOCK, (off_t) 0) == -1) { + opkg_perror(ERROR, "Could not lock %s", lock_file); + if (close(lock_fd) == -1) + opkg_perror(ERROR, "Couldn't close descriptor %d (%s)", + lock_fd, lock_file); + lock_fd = -1; + goto err2; + } + + if (conf->tmp_dir) + tmp_dir_base = conf->tmp_dir; + else + tmp_dir_base = getenv("TMPDIR"); + + sprintf_alloc(&tmp, "%s/%s", + tmp_dir_base ? tmp_dir_base : + OPKG_CONF_DEFAULT_TMP_DIR_BASE, OPKG_CONF_TMP_DIR_SUFFIX); + if (conf->tmp_dir) + free(conf->tmp_dir); + conf->tmp_dir = mkdtemp(tmp); + if (conf->tmp_dir == NULL) { + opkg_perror(ERROR, "Creating temp dir %s failed", tmp); + goto err3; + } + + pkg_hash_init(); + hash_table_init("file-hash", &conf->file_hash, + OPKG_CONF_DEFAULT_HASH_LEN); + hash_table_init("obs-file-hash", &conf->obs_file_hash, + OPKG_CONF_DEFAULT_HASH_LEN / 16); + + if (conf->lists_dir == NULL) + conf->lists_dir = xstrdup(OPKG_CONF_LISTS_DIR); + + if (conf->offline_root) { + sprintf_alloc(&tmp, "%s/%s", conf->offline_root, + conf->lists_dir); + free(conf->lists_dir); + conf->lists_dir = tmp; + } + + /* if no architectures were defined, then default all, noarch, and host architecture */ + if (nv_pair_list_empty(&conf->arch_list)) { + nv_pair_list_append(&conf->arch_list, "all", "1"); + nv_pair_list_append(&conf->arch_list, "noarch", "1"); + nv_pair_list_append(&conf->arch_list, HOST_CPU_STR, "10"); + } + + /* Even if there is no conf file, we'll need at least one dest. */ + if (nv_pair_list_empty(&conf->tmp_dest_list)) { + nv_pair_list_append(&conf->tmp_dest_list, + OPKG_CONF_DEFAULT_DEST_NAME, + OPKG_CONF_DEFAULT_DEST_ROOT_DIR); + } + + if (resolve_pkg_dest_list()) + goto err4; + + nv_pair_list_deinit(&conf->tmp_dest_list); + + return 0; + +err4: + free(conf->lists_dir); + + pkg_hash_deinit(); + hash_table_deinit(&conf->file_hash); + hash_table_deinit(&conf->obs_file_hash); + + if (rmdir(conf->tmp_dir) == -1) + opkg_perror(ERROR, "Couldn't remove dir %s", conf->tmp_dir); +err3: + if (lockf(lock_fd, F_ULOCK, (off_t) 0) == -1) + opkg_perror(ERROR, "Couldn't unlock %s", lock_file); + + if (close(lock_fd) == -1) + opkg_perror(ERROR, "Couldn't close descriptor %d (%s)", + lock_fd, lock_file); + if (unlink(lock_file) == -1) + opkg_perror(ERROR, "Couldn't unlink %s", lock_file); +err2: + if (lock_file) { + free(lock_file); + lock_file = NULL; + } +err1: + pkg_src_list_deinit(&conf->pkg_src_list); + pkg_src_list_deinit(&conf->dist_src_list); + pkg_dest_list_deinit(&conf->pkg_dest_list); + nv_pair_list_deinit(&conf->arch_list); + + for (i = 0; options[i].name; i++) { + if (options[i].type == OPKG_OPT_TYPE_STRING) { + tmp_val = (char **)options[i].value; + if (*tmp_val) { + free(*tmp_val); + *tmp_val = NULL; + } + } + } +err0: + nv_pair_list_deinit(&conf->tmp_dest_list); + if (conf->dest_str) + free(conf->dest_str); + if (conf->conf_file) + free(conf->conf_file); + + return -1; } - -char *root_filename_alloc(opkg_conf_t *conf, char *filename) +void opkg_conf_deinit(void) { - char *root_filename; - sprintf_alloc(&root_filename, "%s%s", (conf->offline_root ? conf->offline_root : ""), filename); - return root_filename; + int i; + char **tmp; + + if (conf->tmp_dir) + rm_r(conf->tmp_dir); + + if (conf->lists_dir) + free(conf->lists_dir); + + if (conf->dest_str) + free(conf->dest_str); + + if (conf->conf_file) + free(conf->conf_file); + + pkg_src_list_deinit(&conf->pkg_src_list); + pkg_src_list_deinit(&conf->dist_src_list); + pkg_dest_list_deinit(&conf->pkg_dest_list); + nv_pair_list_deinit(&conf->arch_list); + + for (i = 0; options[i].name; i++) { + if (options[i].type == OPKG_OPT_TYPE_STRING) { + tmp = (char **)options[i].value; + if (*tmp) { + free(*tmp); + *tmp = NULL; + } + } + } + + if (conf->verbosity >= DEBUG) { + hash_print_stats(&conf->pkg_hash); + hash_print_stats(&conf->file_hash); + hash_print_stats(&conf->obs_file_hash); + } + + pkg_hash_deinit(); + hash_table_deinit(&conf->file_hash); + hash_table_deinit(&conf->obs_file_hash); + + if (lock_fd != -1) { + if (lockf(lock_fd, F_ULOCK, (off_t) 0) == -1) + opkg_perror(ERROR, "Couldn't unlock %s", lock_file); + + if (close(lock_fd) == -1) + opkg_perror(ERROR, "Couldn't close descriptor %d (%s)", + lock_fd, lock_file); + + } + + if (lock_file) { + if (unlink(lock_file) == -1) + opkg_perror(ERROR, "Couldn't unlink %s", lock_file); + + free(lock_file); + } }