/*

 * Copyright (C) 2008  Kristian Høgsberg <krh@redhat.com>

 * Copyright (C) 2008  Red Hat, Inc

 * Copyright (C) 2009, 2011-2012, 2014, 2016  J. Ali Harlow <ali@juiblex.co.uk>

 *

 * This program 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 Foundation; either version 2 of the License, or

 * (at your option) any later version.

 *

 * This program 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 this program; if not, write to the Free Software Foundation, Inc.,

 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.

 */

#define _GNU_SOURCE

#include "config.h"

#include <stdlib.h>

#include <stddef.h>

#include <stdio.h>

#include <stdint.h>

#include <string.h>

#include <sys/stat.h>

#include <unistd.h>

#include <fcntl.h>

#include <dirent.h>

#include <limits.h>

#ifdef MSWIN_API

#include <windows.h>

#include <shlwapi.h>

#endif

#ifdef HAVE_CURL

#include <curl/curl.h>

#endif

#if !defined(HAVE_CURL) && !defined(MSWIN_API)

#include <ctype.h>

#endif

#include <fnmatch.h>

#include <errno.h>

#include <getopt.h>

#include "razor.h"

#include "import.h"

static const char system_repo_filename[] = "system.rzdb";

static const char next_repo_filename[] = "system-next.rzdb";

static const char rawhide_repo_uri[] = "file:rawhide.rzdb";

static const char *install_root = "";

static const char *repo_filename = system_repo_filename;

static const char *yum_url;

#ifndef FALSE

#define FALSE 0

#endif

#ifndef TRUE

#define TRUE (!FALSE)

#endif

#define ARRAY_SIZE(a) (sizeof(a) / sizeof((a)[0]))

static int

update_packages(struct razor_transaction *trans,

		struct razor_install_iterator *ii, struct razor_set *system,

		struct razor_set *next, struct razor_atomic *atomic,

		struct razor_relocations *relocations,

		enum razor_stage_type stage);

static int

update_system(struct razor_root *root, struct razor_relocations *relocations,

	      struct razor_transaction *trans, struct razor_set *next,

	      const char *verb);

static int command_help(int argc, char * const argv[]);

struct razor_option {

	char *name;

	int has_arg;

	int val;

	char *description;

	char *arg_description;

};

static void

razor_usage(const char *command, int n_options, struct razor_option *options,

	    const char *parameter_string)

{

	int i, help_printed = FALSE;

	char buf[19];

	printf("Usage: razor %s [options] %s\n", command, parameter_string);

	printf("(Specify the --help global option for a list of other "

	       "help options)\n");

	printf("\nOptions:\n");

	for(i = 0; i < n_options; i++) {

		if (!help_printed && strcmp(options[i].name, "help") > 0) {

			printf("  --help              "

			       "Show this help message and exit\n");

			help_printed = TRUE;

		}

		if (options[i].has_arg != no_argument)

			snprintf(buf, sizeof(buf), "%s=%s", options[i].name,

				 options[i].arg_description);

		else

			strncpy(buf, options[i].name, sizeof(buf));

		buf[18] = '\0';

		printf("  --%-18s%s\n", buf, options[i].description);

	}

	if (!help_printed)

		printf("  --help              "

		       "Show this help message and exit\n");

}

/**

 * razor_getopt:

 *

 *

 * Returns: The next option found or -2 on handled or -1 on error

 *          or 0 on end of option list.

 **/

static int

razor_getopt(int argc, char * const argv[], int n_options,

	     struct razor_option *options, const char *parameter_string,

	     const char **arg)

{

	int i, opt, do_help = 0, retval;

	struct option *longopts;

	longopts = calloc((n_options + 2), sizeof(*longopts));

	for(i = 0; i < n_options; i++) {

		longopts[i].name = options[i].name;

		longopts[i].has_arg = options[i].has_arg;

		longopts[i].flag = &retval;

		longopts[i].val = options[i].val;

	}

	longopts[i].name = "help";

	longopts[i].has_arg = no_argument;

	longopts[i].flag = &do_help;

	longopts[i].val = TRUE;

	opterr = 0;

	opt = getopt_long(argc, (char **)argv, "+", longopts, NULL);

	switch (opt)

	{

		case 0:

			if (do_help) {

				razor_usage(argv[0], n_options, options,

					    parameter_string);

				retval = -2;

			} else if (arg)

				*arg = optarg;

			break;

		case -1:

			retval = 0;

			break;

		default:

			razor_usage(argv[0], n_options, options,

				    parameter_string);

			retval = -1;

	}

	free(longopts);

	return retval;

}

static struct razor_package_iterator *

create_iterator_from_argv(struct razor_set *set, int argc, char * const argv[])

{

	struct razor_package_query *query;

	struct razor_package_iterator *iter;

	struct razor_package *package;

	const char *name, *pattern;

	int i, count;

	if (argc == 0)

		return razor_package_iterator_create(set);

	query = razor_package_query_create(set);

	for (i = 0; i < argc; i++) {

		iter = razor_package_iterator_create(set);

		pattern = argv[i];

		count = 0;

		while (razor_package_iterator_next(iter, &package,

						   RAZOR_DETAIL_NAME, &name,

						   RAZOR_DETAIL_LAST)) {

			if (fnmatch(pattern, name, 0) != 0)

				continue;

			razor_package_query_add_package(query, package);

			count++;

		}

		razor_package_iterator_destroy(iter);

		if (count == 0)

			fprintf(stderr,

				"no package matches \"%s\"\n", pattern);

	}

	return razor_package_query_finish(query);

}

#define LIST_PACKAGES_ONLY_NAMES 0x01

static void

list_packages(struct razor_package_iterator *iter, uint32_t flags)

{

	struct razor_package *package;

	const char *name, *version, *arch;

	while (razor_package_iterator_next(iter, &package,

					   RAZOR_DETAIL_NAME, &name,

					   RAZOR_DETAIL_VERSION, &version,

					   RAZOR_DETAIL_ARCH, &arch,

					   RAZOR_DETAIL_LAST)) {

		if (flags & LIST_PACKAGES_ONLY_NAMES)

			printf("%s\n", name);

		else

			printf("%s-%s.%s\n", name, version, arch);

	}

}

static int

command_list(int argc, char * const argv[])

{

	int opt;

	struct razor_package_iterator *pi;

	struct razor_error *error = NULL;

	struct razor_set *set;

	uint32_t flags = 0;

	enum {

		opt_only_names = 1,

	};

	static struct razor_option options[] = {

		{ .name = "only-names", .has_arg = no_argument,

		  .val = opt_only_names,

		  .description = "Only list package names" },

	};

	do {

		opt = razor_getopt(argc, argv, ARRAY_SIZE(options), options,

				   "pattern ...", NULL);

		switch (opt) {

			case -2:

				return 0;

			case -1:

				return 1;

			case opt_only_names:

				flags |= LIST_PACKAGES_ONLY_NAMES;

				break;

		}

	} while (opt);

	set = razor_root_open_read_only(install_root, &error);

	if (set == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	pi = create_iterator_from_argv(set, argc - optind, argv + optind);

	list_packages(pi, flags);

	razor_package_iterator_destroy(pi);

	razor_set_unref(set);

	return 0;

}

static void

list_package_properties(struct razor_set *set,

			struct razor_package *package, uint32_t type)

{

	struct razor_property_iterator *pi;

	struct razor_property *property;

	const char *name, *version;

	uint32_t flags;

	pi = razor_property_iterator_create(set, package);

	while (razor_property_iterator_next(pi, &property,

					    &name, &flags, &version)) {

		if ((flags & RAZOR_PROPERTY_TYPE_MASK) != type)

			continue;

		printf("%s", name);

		if (version[0] != '\0')

			printf(" %s %s",

			       razor_property_relation_to_string(property),

			       version);

		if (flags & ~(RAZOR_PROPERTY_RELATION_MASK | RAZOR_PROPERTY_TYPE_MASK)) {

			printf(" [");

			if (flags & RAZOR_PROPERTY_PRE)

				printf(" pre");

			if (flags & RAZOR_PROPERTY_POST)

				printf(" post");

			if (flags & RAZOR_PROPERTY_PREUN)

				printf(" preun");

			if (flags & RAZOR_PROPERTY_POSTUN)

				printf(" postun");

			printf(" ]");

		}

		printf("\n");

	}

	razor_property_iterator_destroy(pi);

}

static int

list_properties(int argc, char * const argv[], uint32_t type)

{

	struct razor_set *set;

	struct razor_error *error = NULL;

	struct razor_package *package;

	struct razor_package_iterator *pi;

	const char *name, *version, *arch;

	switch (razor_getopt(argc, argv, 0, NULL, "pattern ...", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	set = razor_root_open_read_only(install_root, &error);

	if (set == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	pi = create_iterator_from_argv(set, argc - optind, argv + optind);

	while (razor_package_iterator_next(pi, &package,

					   RAZOR_DETAIL_NAME, &name,

					   RAZOR_DETAIL_VERSION, &version,

					   RAZOR_DETAIL_ARCH, &arch,

					   RAZOR_DETAIL_LAST))

		list_package_properties(set, package, type);

	razor_package_iterator_destroy(pi);

	razor_set_unref(set);

	return 0;

}

static int

command_list_requires(int argc, char * const argv[])

{

	return list_properties(argc, argv, RAZOR_PROPERTY_REQUIRES);

}

static int

command_list_provides(int argc, char * const argv[])

{

	return list_properties(argc, argv, RAZOR_PROPERTY_PROVIDES);

}

static int

command_list_obsoletes(int argc, char * const argv[])

{

	return list_properties(argc, argv, RAZOR_PROPERTY_OBSOLETES);

}

static int

command_list_conflicts(int argc, char * const argv[])

{

	return list_properties(argc, argv, RAZOR_PROPERTY_CONFLICTS);

}

static int

command_list_scripts(int argc, char * const argv[])

{

	struct razor_set *set;

	struct razor_error *error = NULL;

	struct razor_package *package;

	struct razor_package_iterator *pi;

	const char *preunprog, *preun, *postunprog, *postun;

	switch (razor_getopt(argc, argv, 0, NULL, "pattern ...", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	set = razor_root_open_read_only(install_root, &error);

	if (set == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	pi = create_iterator_from_argv(set, argc - optind, argv + optind);

	while (razor_package_iterator_next(pi, &package,

					   RAZOR_DETAIL_PREUNPROG, &preunprog,

					   RAZOR_DETAIL_PREUN, &preun,

					   RAZOR_DETAIL_POSTUNPROG, &postunprog,

					   RAZOR_DETAIL_POSTUN, &postun,

					   RAZOR_DETAIL_LAST)) {

		if (preun && *preun) {

			printf("preuninstall scriptlet");

			if (preunprog && *preunprog)

				printf(" (using %s)",preunprog);

			printf(":\n%s\n",preun);

		}

		if (postun && *postun) {

			printf("postuninstall scriptlet");

			if (postunprog && *postunprog)

				printf(" (using %s)",postunprog);

			printf(":\n%s\n",postun);

		}

	}

	razor_package_iterator_destroy(pi);

	razor_set_unref(set);

	return 0;

}

static int

command_list_files(int argc, char * const argv[])

{

	struct razor_error *error = NULL;

	struct razor_set *set;

	switch (razor_getopt(argc, argv, 0, NULL, "[pattern]", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	if (argc - optind > 1) {

		razor_usage(argv[0], 0, NULL, "[pattern]");

		return 1;

	}

	set = razor_root_open_read_only(install_root, &error);

	if (set == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	razor_set_list_files(set, argv[optind]);

	razor_set_unref(set);

	return 0;

}

static int

command_list_file_packages(int argc, char * const argv[])

{

	struct razor_error *error = NULL;

	struct razor_set *set;

	struct razor_package_iterator *pi;

	switch (razor_getopt(argc, argv, 0, NULL, "pattern", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	if (argc - optind != 1) {

		razor_usage(argv[0], 0, NULL, "pattern");

		return 1;

	}

	set = razor_root_open_read_only(install_root, &error);

	if (set == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	pi = razor_package_iterator_create_for_file(set, argv[optind]);

	list_packages(pi, 0);

	razor_package_iterator_destroy(pi);

	razor_set_unref(set);

	return 0;

}

static int

command_list_package_files(int argc, char * const argv[])

{

	struct razor_error *error = NULL;

	struct razor_set *set;

	struct razor_package_iterator *pi;

	struct razor_package *package;

	const char *name, *version, *arch;

	switch (razor_getopt(argc, argv, 0, NULL, "pattern ...", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	set = razor_root_open_read_only(install_root, &error);

	if (set == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	pi = create_iterator_from_argv(set, argc - optind, argv + optind);

	while (razor_package_iterator_next(pi, &package,

					   RAZOR_DETAIL_NAME, &name,

					   RAZOR_DETAIL_VERSION, &version,

					   RAZOR_DETAIL_ARCH, &arch,

					   RAZOR_DETAIL_LAST))

		razor_set_list_package_files(set, package);

	razor_package_iterator_destroy(pi);

	razor_set_unref(set);

	return 0;

}

static int

list_property_packages(const char *ref_name,

		       const char *ref_version,

		       uint32_t type)

{

	struct razor_error *error = NULL;

	struct razor_set *set;

	struct razor_property *property;

	struct razor_property_iterator *prop_iter;

	struct razor_package_iterator *pkg_iter;

	const char *name, *version;

	uint32_t flags;

	set = razor_root_open_read_only(install_root, &error);

	if (set == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	prop_iter = razor_property_iterator_create(set, NULL);

	while (razor_property_iterator_next(prop_iter, &property,

					    &name, &flags, &version)) {

		if (strcmp(ref_name, name) != 0)

			continue;

		if (ref_version &&

		    (flags & RAZOR_PROPERTY_RELATION_MASK) == RAZOR_PROPERTY_EQUAL &&

		    strcmp(ref_version, version) != 0)

			continue;

		if ((flags & RAZOR_PROPERTY_TYPE_MASK) != type)

			continue;

		pkg_iter =

			razor_package_iterator_create_for_property(set,

								   property);

		list_packages(pkg_iter, 0);

		razor_package_iterator_destroy(pkg_iter);

	}

	razor_property_iterator_destroy(prop_iter);

	razor_set_unref(set);

	return 0;

}

static int

command_what_requires(int argc, char * const argv[])

{

	switch (razor_getopt(argc, argv, 0, NULL, "name [version-release]",

			     NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	if (argc - optind < 1 || argc - optind > 2) {

		razor_usage(argv[0], 0, NULL, "name [version-release]");

		return 1;

	}

	return list_property_packages(argv[optind], argv[optind + 1],

				      RAZOR_PROPERTY_REQUIRES);

}

static int

command_what_provides(int argc, char * const argv[])

{

	switch (razor_getopt(argc, argv, 0, NULL, "name [version-release]",

			     NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	if (argc - optind < 1 || argc - optind > 2) {

		razor_usage(argv[0], 0, NULL, "name [version-release]");

		return 1;

	}

	return list_property_packages(argv[optind], argv[optind + 1],

				      RAZOR_PROPERTY_PROVIDES);

}

#ifdef HAVE_CURL

struct get_contents_with_curl_baton {

	void *buf;

	size_t buflen;

};

static size_t

get_contents_with_curl_callback(void *contents, size_t size, size_t nmemb,

				void *data)

{

	size_t nb = size * nmemb;

	struct get_contents_with_curl_baton *baton = data;

	baton->buf = realloc(baton->buf, baton->buflen + nb);

	if (!baton->buf) {

		fprintf(stderr, "Not enough memory to read file\n");

		return 0;

	}

	memcpy((char *)baton->buf + baton->buflen, contents, nb);

	baton->buflen += nb;

	return nb;

}

static void *get_contents_with_curl(const char *uri, size_t *length,

				    int private, struct razor_error **error)

{

	CURL *curl;

	char errbuf[256];

	CURLcode res;

	struct get_contents_with_curl_baton baton = {0,};

	curl = curl_easy_init();

	if (!curl) {

		razor_set_error(error, RAZOR_GENERAL_ERROR,

				RAZOR_GENERAL_ERROR_FAILED, uri,

				"Failed to initialize libcurl");

		return NULL;

	}

	curl_easy_setopt(curl, CURLOPT_ERRORBUFFER, errbuf);

	curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION,

			 get_contents_with_curl_callback);

	curl_easy_setopt(curl, CURLOPT_WRITEDATA, (void *)&baton);

	curl_easy_setopt(curl, CURLOPT_URL, uri);

	curl_easy_setopt(curl, CURLOPT_USERAGENT, "razor/" VERSION);

	res = curl_easy_perform(curl);

	curl_easy_cleanup(curl);

	if (res != CURLE_OK) {

		razor_set_error(error, RAZOR_GENERAL_ERROR,

				RAZOR_GENERAL_ERROR_FAILED, uri, errbuf);

		free(baton.buf);

		return NULL;

	}

	*length = baton.buflen;

	return baton.buf;

}

int free_contents_with_curl(void *addr, size_t length)

{

	free(addr);

}

#endif

void init_uri_handler(void)

{

#ifdef HAVE_CURL

	struct razor_uri_vtable uri_vtable={0,};

	uri_vtable.structure_size=sizeof(uri_vtable);

	uri_vtable.get_contents=get_contents_with_curl;

	uri_vtable.free_contents=free_contents_with_curl;

	razor_uri_set_vtable(NULL, &uri_vtable, NULL);

#endif

}

static int

download_if_missing(const char *uri, const char *file)

{

	int retval = 0;

	struct stat buf;

	void *contents;

	size_t length;

	struct razor_error *error = NULL;

	FILE *fp;

	if (stat(file, &buf) >= 0)

		return 0;

	contents = razor_uri_get_contents(uri, &length, 0, &error);

	if (!contents) {

		fprintf(stderr, "%s: %s\n", uri, razor_error_get_msg(error));

		razor_error_free(error);

		return -1;

	}

	fp = fopen(file, "wb");

	if (!fp) {

		perror(file);

		razor_uri_free_contents(contents, length);

		return -1;

	}

	if (fwrite(contents, 1, length, fp) != length) {

		perror(file);

		retval = -1;

	}

	fclose(fp);

	razor_uri_free_contents(contents, length);

	return retval;

}

#define YUM_URL "http://download.fedora.redhat.com" \

	"/pub/fedora/linux/development/i386/os"

static int

command_import_yum(int argc, char * const argv[])

{

	int retval;

	struct razor_set *set;

	struct razor_atomic *atomic;

	char buffer[512];

	switch (razor_getopt(argc, argv, 0, NULL, "", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	if (argc - optind > 0) {

		razor_usage(argv[0], 0, NULL, "");

		return 1;

	}

	printf("importing from '%s'.\n", yum_url);

	set = razor_set_create_from_yum(yum_url);

	if (set == NULL)

		return 1;

	atomic = razor_atomic_open("Yum import repository");

	razor_set_write(set, atomic, rawhide_repo_uri, RAZOR_SECTION_ALL);

	retval = razor_atomic_commit(atomic);

	razor_set_unref(set);

	if (retval)

		fprintf(stderr, "%s\n", razor_atomic_get_error_msg(atomic));

	else

		printf("wrote %s\n", rawhide_repo_uri);

	razor_atomic_destroy(atomic);

	return retval;

}

#if HAVE_RPMLIB

static int

command_import_rpmdb(int argc, char * const argv[])

{

	struct razor_set *set;

	struct razor_root *root;

	struct razor_error *error = NULL;

	struct razor_atomic *atomic;

	int retval;

	switch (razor_getopt(argc, argv, 0, NULL, "", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	if (argc - optind > 0) {

		razor_usage(argv[0], 0, NULL, "");

		return 1;

	}

	root = razor_root_open(install_root, &error);

	if (root == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	set = razor_set_create_from_rpmdb();

	if (set == NULL)

		return 1;

	atomic = razor_atomic_open("Import RPM database");

	retval = razor_root_update(root, set, atomic);

	if (retval)

		fprintf(stderr, "%s\n", razor_atomic_get_error_msg(atomic));

	razor_atomic_destroy(atomic);

	razor_root_close(root);

	return retval;

}

#endif

static int

mark_packages_for_update(struct razor_transaction *trans,

			 struct razor_set *set, const char *pattern)

{

	struct razor_package_iterator *pi;

	struct razor_package *package;

	const char *name;

	int matches = 0;

	pi = razor_package_iterator_create(set);

	while (razor_package_iterator_next(pi, &package,

					   RAZOR_DETAIL_NAME, &name,

					   RAZOR_DETAIL_LAST)) {

		if (pattern && fnmatch(pattern, name, 0) == 0) {

			razor_transaction_update_package(trans, package);

			matches++;

		}

	}

	razor_package_iterator_destroy(pi);

	return matches;

}

static int

mark_packages_for_removal(struct razor_transaction *trans,

			  struct razor_set *set, const char *pattern)

{

	struct razor_package_iterator *pi;

	struct razor_package *package;

	const char *name;

	int matches = 0;

	pi = razor_package_iterator_create(set);

	while (razor_package_iterator_next(pi, &package,

					   RAZOR_DETAIL_NAME, &name,

					   RAZOR_DETAIL_LAST)) {

		if (pattern && fnmatch(pattern, name, 0) == 0) {

			razor_transaction_remove_package(trans, package);

			matches++;

		}

	}

	razor_package_iterator_destroy(pi);

	return matches;

}

static int

command_remove(int argc, char * const argv[])

{

	struct razor_set *system, *upstream, *next;

	struct razor_transaction *trans;

	struct razor_error *error = NULL;

	struct razor_root *root;

	int i, retval;

	switch (razor_getopt(argc, argv, 0, NULL, "pattern ...", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	root = razor_root_open(install_root, &error);

	if (root == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		return 1;

	}

	system = razor_root_get_system_set(root);

	upstream = razor_set_create_without_root();

	trans = razor_transaction_create(system, upstream);

	razor_set_unref(upstream);

	for (i = optind; i < argc; i++) {

		if (mark_packages_for_removal(trans, system, argv[i]) == 0) {

			fprintf(stderr, "no match for %s\n", argv[i]);

			razor_transaction_destroy(trans);

			razor_root_close(root);

			return 1;

		}

	}

	razor_transaction_resolve(trans);

	retval = razor_transaction_describe(trans);

	if (retval) {

		razor_transaction_destroy(trans);

		razor_root_close(root);

		return 1;

	}

	next = razor_transaction_commit(trans);

	retval = update_system(root, NULL, trans, next, "Remove");

	razor_transaction_destroy(trans);

	razor_root_close(root);

	razor_set_unref(next);

	return retval;

}

static void

print_diff(enum razor_diff_action action,

	   struct razor_package *package,

	   const char *name,

	   const char *version,

	   const char *arch,

	   void *data)

{

	if (action == RAZOR_DIFF_ACTION_ADD)

		printf("install %s-%s.%s\n", name, version, arch);

	if (action == RAZOR_DIFF_ACTION_REMOVE)

		printf("remove %s-%s.%s\n", name, version, arch);

}

static int

command_diff(int argc, char * const argv[])

{

	struct razor_error *error = NULL;

	struct razor_set *set, *updated;

	switch (razor_getopt(argc, argv, 0, NULL, "", NULL)) {

		case -2:

			return 0;

		case -1:

			return 1;

	}

	if (argc - optind > 0) {

		razor_usage(argv[0], 0, NULL, "");

		return 1;

	}

	set = razor_root_open_read_only(install_root, &error);

	if (set)

		updated = razor_set_open(rawhide_repo_uri, 0, &error);

	else

		updated = NULL;

	if (updated == NULL) {

		fprintf(stderr, "%s\n", razor_error_get_msg(error));

		razor_error_free(error);

		if (set)

			razor_set_unref(set);

		return 1;

	}

	razor_set_diff(set, updated, print_diff, NULL);

	razor_set_unref(set);

	razor_set_unref(updated);

	return 0;

}

static int

command_import_rpms(int argc, char * const argv[])

{

	DIR *dir;

	struct dirent *de;

	struct razor_importer *importer;

	struct razor_set *set;

	struct razor_rpm *rpm;

	struct razor_error *error=NULL;

	struct razor_atomic *atomic;

	int len, imported_count = 0;

	char filename[256];

	const char *dirname;

	int retval;

	switch (razor_getopt(argc, argv, 0, NULL, "dir", NULL)) {

		case -2: