#include <stdlib.h>

 #include <stddef.h>

 #include <stdio.h>

 #include <string.h>

 #include <sys/types.h>

 #include <sys/stat.h>

 #include <unistd.h>

 #include <dirent.h>

 #include <curl/curl.h>

 #include "razor.h"

 static const char *repo_filename = "system.repo";

 static const char *rawhide_repo_filename = "rawhide.repo";

 static const char *updated_repo_filename = "system-updated.repo";

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	razor_set_list(set, argv[0]);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	razor_set_list_properties(set, argv[0], RAZOR_PROPERTY_REQUIRES);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	razor_set_list_properties(set, argv[0], RAZOR_PROPERTY_PROVIDES);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	razor_set_list_properties(set, argv[0], RAZOR_PROPERTY_OBSOLETES);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	razor_set_list_properties(set, argv[0], RAZOR_PROPERTY_CONFLICTS);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	if (set == NULL)

 		return 1;

 	razor_set_list_files(set, argv[0]);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	if (set == NULL)

 		return 1;

 	razor_set_list_file_packages(set, argv[0]);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	if (set == NULL)

 		return 1;

 	razor_set_list_package_files(set, argv[0]);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	razor_set_list_property_packages(set, argv[0], argv[1],

 					 RAZOR_PROPERTY_REQUIRES);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	razor_set_list_property_packages(set, argv[0], argv[1],

 					 RAZOR_PROPERTY_PROVIDES);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

 show_progress(void *clientp,

 	      double dltotal, double dlnow, double ultotal, double ulnow)

 {

 	const char *file = clientp;

 	if (!dlnow < dltotal)

 		fprintf(stderr, "\rdownloading %s, %dkB/%dkB",

 			file, (int) dlnow / 1024, (int) dltotal / 1024);

 	else

 		fprintf(stderr, "\n");

 	return 0;

 }

 static int

 download_if_missing(CURL *curl, const char *url, const char *file)

 {

 	struct stat buf;

 	char error[256];

 	FILE *fp;

 	CURLcode res;

 	char buffer[256];

 	curl_easy_setopt(curl, CURLOPT_ERRORBUFFER, error);

 	curl_easy_setopt(curl, CURLOPT_NOPROGRESS, 0);

 	curl_easy_setopt(curl, CURLOPT_PROGRESSFUNCTION, show_progress);

 	curl_easy_setopt(curl, CURLOPT_PROGRESSDATA, file);

 	if (stat(file, &buf) < 0) {

 		fp = fopen(file, "w");

 		snprintf(buffer, sizeof buffer, "%s/%s", url, file);

 		curl_easy_setopt(curl, CURLOPT_WRITEDATA, fp);

 		curl_easy_setopt(curl, CURLOPT_URL, buffer);

 		res = curl_easy_perform(curl);

 		fclose(fp);

 		if (res != CURLE_OK) {

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

 			unlink(file);

 			return -1;

 		}

 	}

 	return 0;

 }

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

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

 static int

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

 {

 	struct razor_set *set;

 	CURL *curl;

 	curl = curl_easy_init();

 	if (curl == NULL)

 		return 1;

 	if (download_if_missing(curl, REPO_URL, "primary.xml.gz") < 0)

 		return -1;

 	if (download_if_missing(curl, REPO_URL, "filelists.xml.gz") < 0)

 		return -1;

 	curl_easy_cleanup(curl);

 	set = razor_set_create_from_yum();

 	if (set == NULL)

 		return 1;

 	razor_set_write(set, rawhide_repo_filename);

 	razor_set_destroy(set);

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

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_create_from_rpmdb();

 	if (set == NULL)

 		return 1;

 	razor_set_write(set, repo_filename);

 	razor_set_destroy(set);

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

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set;

 	set = razor_set_open(repo_filename);

 	if (set == NULL)

 		return 1;

 	razor_set_list_unsatisfied(set);

 	razor_set_destroy(set);

 	return 0;

 }

 static int

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

 {

 	struct razor_set *set, *upstream;

 	set = razor_set_open(repo_filename);

 	upstream = razor_set_open(rawhide_repo_filename);

 	if (set == NULL || upstream == NULL)

 		return 1;

 	set = razor_set_update(set, upstream, argc, argv);

 	razor_set_write(set, updated_repo_filename);

 	razor_set_destroy(set);

 	razor_set_destroy(upstream);

 	printf("wrote system-updated.repo\n");

 	return 0;

 }

 static void

 print_diff(const char *name,

 	   const char *old_version, const char *new_version, void *data)

 {

 	if (old_version)

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

 	else

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

 }

 static int

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

 {

 	struct razor_set *set, *updated;

 	set = razor_set_open(repo_filename);

 	updated = razor_set_open(updated_repo_filename);

 	if (set == NULL || updated == NULL)

 		return 1;

 	razor_set_diff(set, updated, print_diff, NULL);	

 	razor_set_destroy(set);

 	razor_set_destroy(updated);

 	return 0;

 }

 static int

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

 {

 	DIR *dir;

 	struct dirent *de;

 	struct razor_importer *importer;

 	struct razor_set *set;

 	int len;

 	char filename[256];

 	const char *dirname = argv[0];

 	if (dirname == NULL) {

 		fprintf(stderr, "usage: razor import-rpms DIR\n");

 		return -1;

 	}

 	dir = opendir(dirname);

 	if (dir == NULL) {

 		fprintf(stderr, "couldn't read dir %s\n", dirname);

 		return -1;

 	}

 	importer = razor_importer_new();

 	while (de = readdir(dir), de != NULL) {

 		len = strlen(de->d_name);

 		if (len < 5 || strcmp(de->d_name + len - 4, ".rpm") != 0)

 		    continue;

 		snprintf(filename, sizeof filename,

 			 "%s/%s", dirname, de->d_name);

 		if (razor_importer_add_rpm(importer, filename)) {

 			fprintf(stderr, "couldn't import %s\n", filename);

 			break;

 		}

 	}

 	if (de != NULL) {

 		razor_importer_destroy(importer);

 		return -1;

 	}

 	set = razor_importer_finish(importer);

 	razor_set_write(set, repo_filename);

 	razor_set_destroy(set);

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

 	return 0;

 }

 static struct {

 	const char *name;

 	const char *description;

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

 } razor_commands[] = {

 	{ "list", "list all packages", command_list },

 	{ "list-requires", "list all requires for the given package", command_list_requires },

 	{ "list-provides", "list all provides for the given package", command_list_provides },

 	{ "list-obsoletes", "list all obsoletes for the given package", command_list_obsoletes },

 	{ "list-conflicts", "list all conflicts for the given package", command_list_conflicts },

 	{ "list-files", "list files for package set", command_list_files },

 	{ "list-file-packages", "list packages owning file", command_list_file_packages },

 	{ "list-package-files", "list files in package", command_list_package_files },

 	{ "what-requires", "list the packages that have the given requires", command_what_requires },

 	{ "what-provides", "list the packages that have the given provides", command_what_provides },

 	{ "import-yum", "import yum metadata files", command_import_yum },

 	{ "import-rpmdb", "import the system rpm database", command_import_rpmdb },

 	{ "import-rpms", "import rpms from the given directory", command_import_rpms },

 	{ "validate", "validate a package set", command_validate },

 	{ "update", "update all or specified packages", command_update },

 	{ "diff", "show diff between two package sets", command_diff }

 };

 static int

 usage(void)

 {

 	int i;

 	printf("usage:\n");

 	for (i = 0; i < ARRAY_SIZE(razor_commands); i++)

 		printf("  %-20s%s\n",

 		       razor_commands[i].name, razor_commands[i].description);

 	return 1;

 }

 int

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

 {

 	char *repo;

 	int i;

 	repo = getenv("RAZOR_REPO");

 	if (repo != NULL)

 		repo_filename = repo;

 	if (argc < 2)

 		return usage();

 	for (i = 0; i < ARRAY_SIZE(razor_commands); i++)

 		if (strcmp(razor_commands[i].name, argv[1]) == 0)

 			return razor_commands[i].func(argc - 2, argv + 2);

 	return usage();

 }