librazor/razor.c
author Richard Hughes <richard@hughsie.com>
Mon Jun 30 08:51:26 2008 +0100 (2008-06-30)
changeset 302 9b71b537d175
parent 301 4124c37fd953
child 304 bf23ba00db03
permissions -rw-r--r--
convert razor_package_get_details() and razor_package_iterator_next() to varargs

The functions for getting package details about a package were limited to a few
things, when in the future we will want to support much more about a package.
The iterator was also limited to name,version,arch when most of the time we
didn't need all this data.
     1 /*
     2  * Copyright (C) 2008  Kristian Høgsberg <krh@redhat.com>
     3  * Copyright (C) 2008  Red Hat, Inc
     4  *
     5  * This program is free software; you can redistribute it and/or modify
     6  * it under the terms of the GNU General Public License as published by
     7  * the Free Software Foundation; either version 2 of the License, or
     8  * (at your option) any later version.
     9  *
    10  * This program is distributed in the hope that it will be useful,
    11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    13  * GNU General Public License for more details.
    14  *
    15  * You should have received a copy of the GNU General Public License along
    16  * with this program; if not, write to the Free Software Foundation, Inc.,
    17  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
    18  */
    19 
    20 #define _GNU_SOURCE
    21 
    22 #include <stdlib.h>
    23 #include <stddef.h>
    24 #include <stdint.h>
    25 #include <stdio.h>
    26 #include <stdarg.h>
    27 #include <string.h>
    28 #include <sys/types.h>
    29 #include <sys/stat.h>
    30 #include <sys/mman.h>
    31 #include <unistd.h>
    32 #include <fcntl.h>
    33 #include <errno.h>
    34 #include <ctype.h>
    35 #include <fnmatch.h>
    36 #include <assert.h>
    37 
    38 #include "razor-internal.h"
    39 #include "razor.h"
    40 
    41 void *
    42 zalloc(size_t size)
    43 {
    44 	void *p;
    45 
    46 	p = malloc(size);
    47 	memset(p, 0, size);
    48 
    49 	return p;
    50 }
    51 
    52 struct razor_set_section razor_sections[] = {
    53 	{ RAZOR_STRING_POOL,	offsetof(struct razor_set, string_pool) },
    54 	{ RAZOR_PACKAGES,	offsetof(struct razor_set, packages) },
    55 	{ RAZOR_PROPERTIES,	offsetof(struct razor_set, properties) },
    56 	{ RAZOR_PACKAGE_POOL,	offsetof(struct razor_set, package_pool) },
    57 	{ RAZOR_PROPERTY_POOL,	offsetof(struct razor_set, property_pool) },
    58 };
    59 
    60 struct razor_set_section razor_files_sections[] = {
    61 	{ RAZOR_FILES,			offsetof(struct razor_set, files) },
    62 	{ RAZOR_FILE_POOL,		offsetof(struct razor_set, file_pool) },
    63 	{ RAZOR_FILE_STRING_POOL,	offsetof(struct razor_set, file_string_pool) },
    64 };
    65 
    66 struct razor_set_section razor_details_sections[] = {
    67 	{ RAZOR_DETAILS_STRING_POOL,	offsetof(struct razor_set, details_string_pool) },
    68 };
    69 
    70 RAZOR_EXPORT struct razor_set *
    71 razor_set_create(void)
    72 {
    73 	struct razor_set *set;
    74 	struct razor_entry *e;
    75 	char *empty;
    76 
    77 	set = zalloc(sizeof *set);
    78 
    79 	e = array_add(&set->files, sizeof *e);
    80 	empty = array_add(&set->string_pool, 1);
    81 	*empty = '\0';
    82 	e->name = 0;
    83 	e->flags = RAZOR_ENTRY_LAST;
    84 	e->start = 0;
    85 	list_set_empty(&e->packages);
    86 
    87 	return set;
    88 }
    89 
    90 RAZOR_EXPORT struct razor_set *
    91 razor_set_open(const char *filename)
    92 {
    93 	struct razor_set *set;
    94 	struct razor_set_section *s;
    95 	struct stat stat;
    96 	struct array *array;
    97 	int fd;
    98 
    99 	set = zalloc(sizeof *set);
   100 	fd = open(filename, O_RDONLY);
   101 	if (fstat(fd, &stat) < 0)
   102 		return NULL;
   103 	set->header = mmap(NULL, stat.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
   104 	if (set->header == MAP_FAILED) {
   105 		free(set);
   106 		return NULL;
   107 	}
   108 
   109 	for (s = set->header->sections; ~s->type; s++) {
   110 		if (s->type >= ARRAY_SIZE(razor_sections))
   111 			continue;
   112 		if (s->type != razor_sections[s->type].type)
   113 			continue;
   114 		array = (void *) set + razor_sections[s->type].offset;
   115 		array->data = (void *) set->header + s->offset;
   116 		array->size = s->size;
   117 		array->alloc = s->size;
   118 	}
   119 	close(fd);
   120 
   121 	return set;
   122 }
   123 
   124 RAZOR_EXPORT int
   125 razor_set_open_details(struct razor_set *set, const char *filename)
   126 {
   127 	struct razor_set_section *s;
   128 	struct stat stat;
   129 	struct array *array;
   130 	int fd;
   131 
   132 	assert (set != NULL);
   133 	assert (filename != NULL);
   134 
   135 	fd = open(filename, O_RDONLY);
   136 	if (fstat(fd, &stat) < 0)
   137 		return -1;
   138 	set->details_header = mmap(NULL, stat.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
   139 	if (set->details_header == MAP_FAILED)
   140 		return -1;
   141 
   142 	for (s = set->details_header->sections; ~s->type; s++) {
   143 		if (s->type >= ARRAY_SIZE(razor_details_sections))
   144 			continue;
   145 		if (s->type != razor_details_sections[s->type].type)
   146 			continue;
   147 		array = (void *) set + razor_details_sections[s->type].offset;
   148 		array->data = (void *) set->details_header + s->offset;
   149 		array->size = s->size;
   150 		array->alloc = s->size;
   151 	}
   152 	close(fd);
   153 
   154 	return 0;
   155 }
   156 
   157 RAZOR_EXPORT int
   158 razor_set_open_files(struct razor_set *set, const char *filename)
   159 {
   160 	struct razor_set_section *s;
   161 	struct stat stat;
   162 	struct array *array;
   163 	int fd;
   164 
   165 	assert (set != NULL);
   166 	assert (filename != NULL);
   167 
   168 	fd = open(filename, O_RDONLY);
   169 	if (fstat(fd, &stat) < 0)
   170 		return -1;
   171 	set->files_header = mmap(NULL, stat.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
   172 	if (set->files_header == MAP_FAILED)
   173 		return -1;
   174 
   175 	for (s = set->files_header->sections; ~s->type; s++) {
   176 		if (s->type >= ARRAY_SIZE(razor_files_sections))
   177 			continue;
   178 		if (s->type != razor_files_sections[s->type].type)
   179 			continue;
   180 		array = (void *) set + razor_files_sections[s->type].offset;
   181 		array->data = (void *) set->files_header + s->offset;
   182 		array->size = s->size;
   183 		array->alloc = s->size;
   184 	}
   185 	close(fd);
   186 
   187 	return 0;
   188 }
   189 
   190 RAZOR_EXPORT void
   191 razor_set_destroy(struct razor_set *set)
   192 {
   193 	unsigned int size;
   194 	struct array *a;
   195 	int i;
   196 
   197 	assert (set != NULL);
   198 
   199 	if (set->header) {
   200 		for (i = 0; set->header->sections[i].type; i++)
   201 			;
   202 		size = set->header->sections[i].type;
   203 		munmap(set->header, size);
   204 	} else {
   205 		for (i = 0; i < ARRAY_SIZE(razor_sections); i++) {
   206 			a = (void *) set + razor_sections[i].offset;
   207 			free(a->data);
   208 		}
   209 	}
   210 
   211 	if (set->details_header) {
   212 		for (i = 0; set->details_header->sections[i].type; i++)
   213 			;
   214 		size = set->details_header->sections[i].type;
   215 		munmap(set->details_header, size);
   216 	} else {
   217 		for (i = 0; i < ARRAY_SIZE(razor_details_sections); i++) {
   218 			a = (void *) set + razor_details_sections[i].offset;
   219 			free(a->data);
   220 		}
   221 	}
   222 
   223 	if (set->files_header) {
   224 		for (i = 0; set->files_header->sections[i].type; i++)
   225 			;
   226 		size = set->files_header->sections[i].type;
   227 		munmap(set->files_header, size);
   228 	} else {
   229 		for (i = 0; i < ARRAY_SIZE(razor_files_sections); i++) {
   230 			a = (void *) set + razor_files_sections[i].offset;
   231 			free(a->data);
   232 		}
   233 	}
   234 
   235 	free(set);
   236 }
   237 
   238 static int
   239 razor_set_write_sections_to_fd(struct razor_set *set, int fd, int magic,
   240 			       struct razor_set_section *sections,
   241 			       size_t array_size)
   242 {
   243 	char data[4096];
   244 	struct razor_set_header *header = (struct razor_set_header *) data;
   245 	struct array *a;
   246 	uint32_t offset;
   247 	int i;
   248 
   249 	memset(data, 0, sizeof data);
   250 	header->magic = magic;
   251 	header->version = RAZOR_VERSION;
   252 	offset = sizeof data;
   253 
   254 	for (i = 0; i < array_size; i++) {
   255 		if (sections[i].type != i)
   256 			continue;
   257 		a = (void *) set + sections[i].offset;
   258 		header->sections[i].type = i;
   259 		header->sections[i].offset = offset;
   260 		header->sections[i].size = a->size;
   261 		offset += ALIGN(a->size, 4096);
   262 	}
   263 
   264 	header->sections[i].type = ~0;
   265 	header->sections[i].offset = 0;
   266 	header->sections[i].size = 0;
   267 
   268 	razor_write(fd, data, sizeof data);
   269 	memset(data, 0, sizeof data);
   270 	for (i = 0; i < array_size; i++) {
   271 		if (sections[i].type != i)
   272 			continue;
   273 		a = (void *) set + sections[i].offset;
   274 		razor_write(fd, a->data, a->size);
   275 		razor_write(fd, data, ALIGN(a->size, 4096) - a->size);
   276 	}
   277 
   278 	return 0;
   279 }
   280 
   281 RAZOR_EXPORT int
   282 razor_set_write_to_fd(struct razor_set *set, int fd,
   283 		      enum razor_repo_file_type type)
   284 {
   285 	switch (type) {
   286 	case RAZOR_REPO_FILE_MAIN:
   287 		return razor_set_write_sections_to_fd(set, fd, RAZOR_MAGIC,
   288 						      razor_sections,
   289 						      ARRAY_SIZE(razor_sections));
   290 
   291 	case RAZOR_REPO_FILE_DETAILS:
   292 		return razor_set_write_sections_to_fd(set, fd, RAZOR_DETAILS_MAGIC,
   293 						      razor_details_sections,
   294 						      ARRAY_SIZE(razor_details_sections));
   295 	case RAZOR_REPO_FILE_FILES:
   296 		return razor_set_write_sections_to_fd(set, fd, RAZOR_FILES_MAGIC,
   297 						      razor_files_sections,
   298 						      ARRAY_SIZE(razor_files_sections));
   299 	default:
   300 		return -1;
   301 	}
   302 }
   303 
   304 RAZOR_EXPORT int
   305 razor_set_write(struct razor_set *set, const char *filename,
   306 		enum razor_repo_file_type type)
   307 {
   308 	int fd, status;
   309 
   310 	fd = open(filename, O_CREAT | O_WRONLY | O_TRUNC, 0666);
   311 	if (fd < 0)
   312 		return -1;
   313 
   314 	status = razor_set_write_to_fd(set, fd, type);
   315 	if (status) {
   316 	    close(fd);
   317 	    return status;
   318 	}
   319 
   320 	return close(fd);
   321 }
   322 
   323 RAZOR_EXPORT void
   324 razor_build_evr(char *evr_buf, int size, const char *epoch,
   325 		const char *version, const char *release)
   326 {
   327 	int len;
   328 
   329 	if (!version || !*version) {
   330 		*evr_buf = '\0';
   331 		return;
   332 	}
   333 
   334 	if (epoch && *epoch && strcmp(epoch, "0") != 0) {
   335 		len = snprintf(evr_buf, size, "%s:", epoch);
   336 		evr_buf += len;
   337 		size -= len;
   338 	}
   339 	len = snprintf(evr_buf, size, "%s", version);
   340 	evr_buf += len;
   341 	size -= len;
   342 	if (release && *release)
   343 		snprintf(evr_buf, size, "-%s", release);
   344 }
   345 
   346 RAZOR_EXPORT int
   347 razor_versioncmp(const char *s1, const char *s2)
   348 {
   349 	const char *p1, *p2;
   350 	long n1, n2;
   351 	int res;
   352 
   353 	assert (s1 != NULL);
   354 	assert (s2 != NULL);
   355 
   356 	n1 = strtol(s1, (char **) &p1, 10);
   357 	n2 = strtol(s2, (char **) &p2, 10);
   358 
   359 	/* Epoch; if one but not the other has an epoch set, default
   360 	 * the epoch-less version to 0. */
   361 	res = (*p1 == ':') - (*p2 == ':');
   362 	if (res < 0) {
   363 		n1 = 0;
   364 		p1 = s1;
   365 		p2++;
   366 	} else if (res > 0) {
   367 		p1++;
   368 		n2 = 0;
   369 		p2 = s2;
   370 	}
   371 
   372 	if (n1 != n2)
   373 		return n1 - n2;
   374 	while (*p1 && *p2) {
   375 		if (*p1 != *p2)
   376 			return *p1 - *p2;
   377 		p1++;
   378 		p2++;
   379 		if (isdigit(*p1) && isdigit(*p2))
   380 			return razor_versioncmp(p1, p2);
   381 	}
   382 
   383 	return *p1 - *p2;
   384 }
   385 
   386 RAZOR_EXPORT struct razor_package *
   387 razor_set_get_package(struct razor_set *set, const char *package)
   388 {
   389 	struct razor_package_iterator *pi;
   390 	struct razor_package *p;
   391 	const char *name;
   392 
   393 	assert (set != NULL);
   394 	assert (package != NULL);
   395 
   396 	pi = razor_package_iterator_create(set);
   397 	while (razor_package_iterator_next(pi, &p, RAZOR_DETAIL_NAME, &name, 0)) {
   398 		if (strcmp(package, name) == 0)
   399 			break;
   400 	}
   401 	razor_package_iterator_destroy(pi);
   402 
   403 	return p;
   404 }
   405 
   406 static const char *
   407 razor_package_get_details_type(struct razor_set *set,
   408 			       struct razor_package *package,
   409 			       enum razor_detail_type type)
   410 {
   411 	const char *pool;
   412 
   413 	switch (type) {
   414 	case RAZOR_DETAIL_NAME:
   415 		pool = set->string_pool.data;
   416 		return &pool[package->name];
   417 
   418 	case RAZOR_DETAIL_VERSION:
   419 		pool = set->string_pool.data;
   420 		return &pool[package->version];
   421 
   422 	case RAZOR_DETAIL_ARCH:
   423 		pool = set->string_pool.data;
   424 		return &pool[package->arch];
   425 
   426 	case RAZOR_DETAIL_SUMMARY:
   427 		pool = set->details_string_pool.data;
   428 		return &pool[package->summary];
   429 
   430 	case RAZOR_DETAIL_DESCRIPTION:
   431 		pool = set->details_string_pool.data;
   432 		return &pool[package->description];
   433 
   434 	case RAZOR_DETAIL_URL:
   435 		pool = set->details_string_pool.data;
   436 		return &pool[package->url];
   437 
   438 	case RAZOR_DETAIL_LICENSE:
   439 		pool = set->details_string_pool.data;
   440 		return &pool[package->license];
   441 
   442 	default:
   443 		fprintf(stderr, "type %u not found\n", type);
   444 		return NULL;
   445 	}
   446 }
   447 
   448 /**
   449  * razor_package_get_details_varg:
   450  * @set: a %razor_set
   451  * @package: a %razor_package
   452  * @args: a va_list of arguments to set
   453  **/
   454 void
   455 razor_package_get_details_varg(struct razor_set *set,
   456 			       struct razor_package *package,
   457 			       va_list args)
   458 {
   459 	int i;
   460 	enum razor_detail_type type;
   461 	const char **data;
   462 
   463 	for (i = 0;; i += 2) {
   464 		type = va_arg(args, enum razor_detail_type);
   465 		if (type == 0)
   466 			break;
   467 		data = va_arg(args, const char **);
   468 		*data = razor_package_get_details_type(set, package, type);
   469 	}
   470 
   471 }
   472 
   473 /**
   474  * razor_package_get_details:
   475  * @set: a %razor_set
   476  * @package: a %razor_package
   477  *
   478  * Gets details about a package using a varg interface
   479  * The vararg must be terminated with zero.
   480  *
   481  * Example: razor_package_get_details (set, package, RAZOR_DETAIL_URL, &url, 0);
   482  **/
   483 RAZOR_EXPORT void
   484 razor_package_get_details(struct razor_set *set, struct razor_package *package, ...)
   485 {
   486 	va_list args;
   487 
   488 	assert (set != NULL);
   489 	assert (package != NULL);
   490 
   491 	va_start(args, NULL);
   492 	razor_package_get_details_varg (set, package, args);
   493 	va_end (args);
   494 }
   495 
   496 RAZOR_EXPORT const char *
   497 razor_property_relation_to_string(struct razor_property *p)
   498 {
   499 	assert (p != NULL);
   500 
   501 	switch (p->flags & RAZOR_PROPERTY_RELATION_MASK) {
   502 	case RAZOR_PROPERTY_LESS:
   503 		return "<";
   504 
   505 	case RAZOR_PROPERTY_LESS | RAZOR_PROPERTY_EQUAL:
   506 		return "<=";
   507 
   508 	case RAZOR_PROPERTY_EQUAL:
   509 		return "=";
   510 
   511 	case RAZOR_PROPERTY_GREATER | RAZOR_PROPERTY_EQUAL:
   512 		return ">=";
   513 
   514 	case RAZOR_PROPERTY_GREATER:
   515 		return ">";
   516 
   517 	default:
   518 		return "?";
   519 	}
   520 }
   521 
   522 RAZOR_EXPORT const char *
   523 razor_property_type_to_string(struct razor_property *p)
   524 {
   525 	assert (p != NULL);
   526 
   527 	switch (p->flags & RAZOR_PROPERTY_TYPE_MASK) {
   528 	case RAZOR_PROPERTY_REQUIRES:
   529 		return "requires";
   530 	case RAZOR_PROPERTY_PROVIDES:
   531 		return "provides";
   532 	case RAZOR_PROPERTY_CONFLICTS:
   533 		return "conflicts";
   534 	case RAZOR_PROPERTY_OBSOLETES:
   535 		return "obsoletes";
   536 	default:
   537 		return NULL;
   538 	}
   539 }
   540 
   541 RAZOR_EXPORT struct razor_entry *
   542 razor_set_find_entry(struct razor_set *set,
   543 		     struct razor_entry *dir, const char *pattern)
   544 {
   545 	struct razor_entry *e;
   546 	const char *n, *pool = set->file_string_pool.data;
   547 	int len;
   548 
   549 	assert (set != NULL);
   550 	assert (dir != NULL);
   551 	assert (pattern != NULL);
   552 
   553 	e = (struct razor_entry *) set->files.data + dir->start;
   554 	do {
   555 		n = pool + e->name;
   556 		if (strcmp(pattern + 1, n) == 0)
   557 			return e;
   558 		len = strlen(n);
   559 		if (e->start != 0 && strncmp(pattern + 1, n, len) == 0 &&
   560 		    pattern[len + 1] == '/') {
   561 			return razor_set_find_entry(set, e, pattern + len + 1);
   562 		}
   563 	} while (!((e++)->flags & RAZOR_ENTRY_LAST));
   564 
   565 	return NULL;
   566 }
   567 
   568 static void
   569 list_dir(struct razor_set *set, struct razor_entry *dir,
   570 	 char *prefix, const char *pattern)
   571 {
   572 	struct razor_entry *e;
   573 	const char *n, *pool = set->file_string_pool.data;
   574 
   575 	e = (struct razor_entry *) set->files.data + dir->start;
   576 	do {
   577 		n = pool + e->name;
   578 		if (pattern && pattern[0] && fnmatch(pattern, n, 0) != 0)
   579 			continue;
   580 		printf("%s/%s\n", prefix, n);
   581 		if (e->start) {
   582 			char *sub = prefix + strlen (prefix);
   583 			*sub = '/';
   584 			strcpy (sub + 1, n);
   585 			list_dir(set, e, prefix, pattern);
   586 			*sub = '\0';
   587 		}
   588 	} while (!((e++)->flags & RAZOR_ENTRY_LAST));
   589 }
   590 
   591 RAZOR_EXPORT void
   592 razor_set_list_files(struct razor_set *set, const char *pattern)
   593 {
   594 	struct razor_entry *e;
   595 	char buffer[512], *p, *base;
   596 
   597 	assert (set != NULL);
   598 
   599 	if (pattern == NULL || !strcmp (pattern, "/")) {
   600 		buffer[0] = '\0';
   601 		list_dir(set, set->files.data, buffer, NULL);
   602 		return;
   603 	}
   604 
   605 	strcpy(buffer, pattern);
   606 	e = razor_set_find_entry(set, set->files.data, buffer);
   607 	if (e && e->start > 0) {
   608 		base = NULL;
   609 	} else {
   610 		p = strrchr(buffer, '/');
   611 		if (p) {
   612 			*p = '\0';
   613 			base = p + 1;
   614 		} else {
   615 			base = NULL;
   616 		}
   617 	}
   618 	e = razor_set_find_entry(set, set->files.data, buffer);
   619 	if (e && e->start != 0)
   620 		list_dir(set, e, buffer, base);
   621 }
   622 
   623 static struct list *
   624 list_package_files(struct razor_set *set, struct list *r,
   625 		   struct razor_entry *dir, uint32_t end,
   626 		   char *prefix)
   627 {
   628 	struct razor_entry *e, *f, *entries;
   629 	uint32_t next, file;
   630 	char *pool;
   631 	int len;
   632 
   633 	entries = (struct razor_entry *) set->files.data;
   634 	pool = set->file_string_pool.data;
   635 
   636 	e = entries + dir->start;
   637 	do {
   638 		if (entries + r->data == e) {
   639 			printf("%s/%s\n", prefix, pool + e->name);
   640 			r = list_next(r);
   641 			if (!r)
   642 				return NULL;
   643 			if (r->data >= end)
   644 				return r;
   645 		}
   646 	} while (!((e++)->flags & RAZOR_ENTRY_LAST));
   647 
   648 	e = entries + dir->start;
   649 	do {
   650 		if (e->start == 0)
   651 			continue;
   652 
   653 		if (e->flags & RAZOR_ENTRY_LAST)
   654 			next = end;
   655 		else {
   656 			f = e + 1;
   657 			while (f->start == 0 && !(f->flags & RAZOR_ENTRY_LAST))
   658 				f++;
   659 			if (f->start == 0)
   660 				next = end;
   661 			else
   662 				next = f->start;
   663 		}
   664 
   665 		file = r->data;
   666 		if (e->start <= file && file < next) {
   667 			len = strlen(prefix);
   668 			prefix[len] = '/';
   669 			strcpy(prefix + len + 1, pool + e->name);
   670 			r = list_package_files(set, r, e, next, prefix);
   671 			prefix[len] = '\0';
   672 		}
   673 	} while (!((e++)->flags & RAZOR_ENTRY_LAST) && r != NULL);
   674 
   675 	return r;
   676 }
   677 
   678 RAZOR_EXPORT void
   679 razor_set_list_package_files(struct razor_set *set, const char *name)
   680 {
   681 	struct razor_package *package;
   682 	struct list *r;
   683 	uint32_t end;
   684 	char buffer[512];
   685 
   686 	assert (set != NULL);
   687 	assert (name != NULL);
   688 
   689 	package = razor_set_get_package(set, name);
   690 	/* TODO: we should return the error to the caller */
   691 	if (!package)
   692 		return;
   693 
   694 	r = list_first(&package->files, &set->file_pool);
   695 	end = set->files.size / sizeof (struct razor_entry);
   696 	buffer[0] = '\0';
   697 	list_package_files(set, r, set->files.data, end, buffer);
   698 }
   699 
   700 /* The diff order matters.  We should sort the packages so that a
   701  * REMOVE of a package comes before the INSTALL, and so that all
   702  * requires for a package have been installed before the package.
   703  **/
   704 
   705 RAZOR_EXPORT void
   706 razor_set_diff(struct razor_set *set, struct razor_set *upstream,
   707 	       razor_diff_callback_t callback, void *data)
   708 {
   709  	struct razor_package_iterator *pi1, *pi2;
   710  	struct razor_package *p1, *p2;
   711 	const char *name1, *name2, *version1, *version2, *arch1, *arch2;
   712 	int res;
   713 
   714 	assert (set != NULL);
   715 	assert (upstream != NULL);
   716 
   717 	pi1 = razor_package_iterator_create(set);
   718 	pi2 = razor_package_iterator_create(upstream);
   719 
   720 	razor_package_iterator_next(pi1, &p1,
   721 				    RAZOR_DETAIL_NAME, &name1,
   722 				    RAZOR_DETAIL_VERSION, &version1,
   723 				    RAZOR_DETAIL_ARCH, &arch1,
   724 				    0);
   725 	razor_package_iterator_next(pi2, &p2,
   726 				    RAZOR_DETAIL_NAME, &name2,
   727 				    RAZOR_DETAIL_VERSION, &version2,
   728 				    RAZOR_DETAIL_ARCH, &arch2,
   729 				    0);
   730 
   731 	while (p1 || p2) {
   732 		if (p1 && p2) {
   733 			res = strcmp(name1, name2);
   734 			if (res == 0)
   735 				res = razor_versioncmp(version1, version2);
   736 		} else {
   737 			res = 0;
   738 		}
   739 
   740 		if (p2 == NULL || res < 0)
   741 			callback(RAZOR_DIFF_ACTION_REMOVE,
   742 				 p1, name1, version1, arch1, data);
   743 		else if (p1 == NULL || res > 0)
   744 			callback(RAZOR_DIFF_ACTION_ADD,
   745 				 p2, name2, version2, arch2, data);
   746 
   747 		if (p1 != NULL && res <= 0)
   748 			razor_package_iterator_next(pi1, &p1,
   749 						    RAZOR_DETAIL_NAME, &name1,
   750 						    RAZOR_DETAIL_VERSION, &version1,
   751 						    RAZOR_DETAIL_ARCH, &arch1,
   752 						    0);
   753 		if (p2 != NULL && res >= 0)
   754 			razor_package_iterator_next(pi2, &p2,
   755 						    RAZOR_DETAIL_NAME, &name2,
   756 						    RAZOR_DETAIL_VERSION, &version2,
   757 						    RAZOR_DETAIL_ARCH, &arch2,
   758 						    0);
   759 	}
   760 
   761 	razor_package_iterator_destroy(pi1);
   762 	razor_package_iterator_destroy(pi2);
   763 }
   764 
   765 static void
   766 add_new_package(enum razor_diff_action action,
   767 		struct razor_package *package,
   768 		const char *name,
   769 		const char *version,
   770 		const char *arch,
   771 		void *data)
   772 {
   773 	if (action == RAZOR_DIFF_ACTION_ADD)
   774 		razor_package_query_add_package(data, package);
   775 }
   776 
   777 RAZOR_EXPORT struct razor_package_iterator *
   778 razor_set_create_remove_iterator(struct razor_set *set,
   779 				 struct razor_set *next)
   780 {
   781 	struct razor_package_query *query;
   782 	struct razor_package_iterator *pi;
   783 
   784 	assert (set != NULL);
   785 	assert (next != NULL);
   786 
   787 	query = razor_package_query_create(set);
   788 	razor_set_diff(next, set, add_new_package, query);
   789 
   790 	pi = razor_package_query_finish(query);
   791 
   792 	/* FIXME: We need to figure out the right install order here,
   793 	 * so the post and pre scripts can run. */
   794 
   795 	/* sort */
   796 
   797 	return pi;
   798 }
   799 
   800 RAZOR_EXPORT struct razor_package_iterator *
   801 razor_set_create_install_iterator(struct razor_set *set,
   802 				  struct razor_set *next)
   803 {
   804 	struct razor_package_query *query;
   805 	struct razor_package_iterator *pi;
   806 
   807 	assert (set != NULL);
   808 	assert (next != NULL);
   809 
   810 	query = razor_package_query_create(next);
   811 	razor_set_diff(set, next, add_new_package, query);
   812 
   813 	pi = razor_package_query_finish(query);
   814 
   815 	/* FIXME: We need to figure out the right install order here,
   816 	 * so the post and pre scripts can run. */
   817 
   818 	/* sort */
   819 
   820 	return pi;
   821 }