-/*
- * Copyright (c) 2009-2013, Novell Inc.
- *
- * This program is licensed under the BSD license, read LICENSE.BSD
- * for further information
- */
-
-/* solv, a little software installer demoing the sat solver library */
-
-/* things it does:
- * - understands globs for package names / dependencies
- * - understands .arch suffix
- * - installation of commandline packages
- * - repository data caching
- * - on demand loading of secondary repository data
- * - gpg and checksum verification
- * - file conflicts
- * - deltarpm support
- * - fastestmirror implementation
- *
- * things available in the library but missing from solv:
- * - vendor policy loading
- * - soft locks file handling
- * - multi version handling
- */
-
-#define _GNU_SOURCE
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <dirent.h>
-#include <fnmatch.h>
-#include <unistd.h>
-#include <zlib.h>
-#include <fcntl.h>
-#include <assert.h>
-#include <sys/utsname.h>
-#include <sys/types.h>
-#include <sys/wait.h>
-#include <time.h>
-#include <sys/time.h>
-#include <sys/dir.h>
-#include <sys/stat.h>
-
-#include <sys/socket.h>
-#include <netdb.h>
-#include <poll.h>
-#include <errno.h>
-
-#include "pool.h"
-#include "poolarch.h"
-#include "repo.h"
-#include "evr.h"
-#include "policy.h"
-#include "util.h"
-#include "solver.h"
-#include "solverdebug.h"
-#include "chksum.h"
-#include "repo_solv.h"
-#include "selection.h"
-
-#include "repo_write.h"
-#ifdef ENABLE_RPMDB
-#include "repo_rpmdb.h"
-#include "pool_fileconflicts.h"
-#endif
-#ifdef ENABLE_PUBKEY
-#include "repo_pubkey.h"
-#endif
-#ifdef ENABLE_DEBIAN
-#include "repo_deb.h"
-#endif
-#ifdef ENABLE_RPMMD
-#include "repo_rpmmd.h"
-#include "repo_repomdxml.h"
-#include "repo_updateinfoxml.h"
-#include "repo_deltainfoxml.h"
-#endif
-#ifdef ENABLE_APPDATA
-#include "repo_appdata.h"
-#endif
-#ifdef ENABLE_SUSEREPO
-#include "repo_products.h"
-#include "repo_susetags.h"
-#include "repo_content.h"
-#endif
-#ifdef SUSE
-#include "repo_autopattern.h"
-#endif
-#include "solv_xfopen.h"
-
-#ifdef FEDORA
-# define REPOINFO_PATH "/etc/yum.repos.d"
-#endif
-#ifdef SUSE
-# define REPOINFO_PATH "/etc/zypp/repos.d"
-# define PRODUCTS_PATH "/etc/products.d"
-# define SOFTLOCKS_PATH "/var/lib/zypp/SoftLocks"
-#endif
-#ifdef ENABLE_APPDATA
-# define APPDATA_PATH "/usr/share/appdata"
-#endif
-
-#define SOLVCACHE_PATH "/var/cache/solv"
-
-#define METADATA_EXPIRE (60 * 15)
-
-struct repoinfo {
- Repo *repo;
-
- char *alias;
- char *name;
- int enabled;
- int autorefresh;
- char *baseurl;
- char *metalink;
- char *mirrorlist;
- char *path;
- int type;
- int pkgs_gpgcheck;
- int repo_gpgcheck;
- int priority;
- int keeppackages;
- int metadata_expire;
- char **components;
- int ncomponents;
- unsigned char cookie[32];
- int extcookieset;
- unsigned char extcookie[32];
- int incomplete;
-};
-
-#ifdef FEDORA
-char *
-yum_substitute(Pool *pool, char *line)
-{
- char *p, *p2;
- static char *releaseevr;
- static char *basearch;
-
- if (!line)
- {
- solv_free(releaseevr);
- releaseevr = 0;
- solv_free(basearch);
- basearch = 0;
- return 0;
- }
- p = line;
- while ((p2 = strchr(p, '$')) != 0)
- {
- if (!strncmp(p2, "$releasever", 11))
- {
- if (!releaseevr)
- {
- void *rpmstate;
- Queue q;
-
- queue_init(&q);
- rpmstate = rpm_state_create(pool, pool_get_rootdir(pool));
- rpm_installedrpmdbids(rpmstate, "Providename", "redhat-release", &q);
- if (q.count)
- {
- void *handle;
- char *p;
- handle = rpm_byrpmdbid(rpmstate, q.elements[0]);
- releaseevr = handle ? rpm_query(handle, SOLVABLE_EVR) : 0;
- if (releaseevr && (p = strchr(releaseevr, '-')) != 0)
- *p = 0;
- }
- rpm_state_free(rpmstate);
- queue_free(&q);
- if (!releaseevr)
- {
- fprintf(stderr, "no installed package provides 'redhat-release', cannot determine $releasever\n");
- exit(1);
- }
- }
- *p2 = 0;
- p = pool_tmpjoin(pool, line, releaseevr, p2 + 11);
- p2 = p + (p2 - line);
- line = p;
- p = p2 + strlen(releaseevr);
- continue;
- }
- if (!strncmp(p2, "$basearch", 9))
- {
- if (!basearch)
- {
- struct utsname un;
- if (uname(&un))
- {
- perror("uname");
- exit(1);
- }
- basearch = strdup(un.machine);
- if (basearch[0] == 'i' && basearch[1] && !strcmp(basearch + 2, "86"))
- basearch[1] = '3';
- }
- *p2 = 0;
- p = pool_tmpjoin(pool, line, basearch, p2 + 9);
- p2 = p + (p2 - line);
- line = p;
- p = p2 + strlen(basearch);
- continue;
- }
- p = p2 + 1;
- }
- return line;
-}
-#endif
-
-#define TYPE_UNKNOWN 0
-#define TYPE_SUSETAGS 1
-#define TYPE_RPMMD 2
-#define TYPE_PLAINDIR 3
-#define TYPE_DEBIAN 4
-
-static int
-read_repoinfos_sort(const void *ap, const void *bp)
-{
- const struct repoinfo *a = ap;
- const struct repoinfo *b = bp;
- return strcmp(a->alias, b->alias);
-}
-
-#if defined(SUSE) || defined(FEDORA)
-
-struct repoinfo *
-read_repoinfos(Pool *pool, int *nrepoinfosp)
-{
- const char *reposdir = REPOINFO_PATH;
- char buf[4096];
- char buf2[4096], *kp, *vp, *kpe;
- DIR *dir;
- FILE *fp;
- struct dirent *ent;
- int l, rdlen;
- struct repoinfo *repoinfos = 0, *cinfo;
- int nrepoinfos = 0;
-
- rdlen = strlen(reposdir);
- dir = opendir(reposdir);
- if (!dir)
- {
- *nrepoinfosp = 0;
- return 0;
- }
- while ((ent = readdir(dir)) != 0)
- {
- if (ent->d_name[0] == '.')
- continue;
- l = strlen(ent->d_name);
- if (l < 6 || rdlen + 2 + l >= sizeof(buf) || strcmp(ent->d_name + l - 5, ".repo") != 0)
- continue;
- snprintf(buf, sizeof(buf), "%s/%s", reposdir, ent->d_name);
- if ((fp = fopen(buf, "r")) == 0)
- {
- perror(buf);
- continue;
- }
- cinfo = 0;
- while(fgets(buf2, sizeof(buf2), fp))
- {
- l = strlen(buf2);
- if (l == 0)
- continue;
- while (l && (buf2[l - 1] == '\n' || buf2[l - 1] == ' ' || buf2[l - 1] == '\t'))
- buf2[--l] = 0;
- kp = buf2;
- while (*kp == ' ' || *kp == '\t')
- kp++;
- if (!*kp || *kp == '#')
- continue;
-#ifdef FEDORA
- if (strchr(kp, '$'))
- kp = yum_substitute(pool, kp);
-#endif
- if (*kp == '[')
- {
- vp = strrchr(kp, ']');
- if (!vp)
- continue;
- *vp = 0;
- repoinfos = solv_extend(repoinfos, nrepoinfos, 1, sizeof(*repoinfos), 15);
- cinfo = repoinfos + nrepoinfos++;
- memset(cinfo, 0, sizeof(*cinfo));
- cinfo->alias = strdup(kp + 1);
- cinfo->type = TYPE_RPMMD;
- cinfo->autorefresh = 1;
- cinfo->priority = 99;
-#ifndef FEDORA
- cinfo->repo_gpgcheck = 1;
-#endif
- cinfo->metadata_expire = METADATA_EXPIRE;
- continue;
- }
- if (!cinfo)
- continue;
- vp = strchr(kp, '=');
- if (!vp)
- continue;
- for (kpe = vp - 1; kpe >= kp; kpe--)
- if (*kpe != ' ' && *kpe != '\t')
- break;
- if (kpe == kp)
- continue;
- vp++;
- while (*vp == ' ' || *vp == '\t')
- vp++;
- kpe[1] = 0;
- if (!strcmp(kp, "name"))
- cinfo->name = strdup(vp);
- else if (!strcmp(kp, "enabled"))
- cinfo->enabled = *vp == '0' ? 0 : 1;
- else if (!strcmp(kp, "autorefresh"))
- cinfo->autorefresh = *vp == '0' ? 0 : 1;
- else if (!strcmp(kp, "gpgcheck"))
- cinfo->pkgs_gpgcheck = *vp == '0' ? 0 : 1;
- else if (!strcmp(kp, "repo_gpgcheck"))
- cinfo->repo_gpgcheck = *vp == '0' ? 0 : 1;
- else if (!strcmp(kp, "baseurl"))
- cinfo->baseurl = strdup(vp);
- else if (!strcmp(kp, "mirrorlist"))
- {
- if (strstr(vp, "metalink"))
- cinfo->metalink = strdup(vp);
- else
- cinfo->mirrorlist = strdup(vp);
- }
- else if (!strcmp(kp, "path"))
- {
- if (vp && strcmp(vp, "/") != 0)
- cinfo->path = strdup(vp);
- }
- else if (!strcmp(kp, "type"))
- {
- if (!strcmp(vp, "yast2"))
- cinfo->type = TYPE_SUSETAGS;
- else if (!strcmp(vp, "rpm-md"))
- cinfo->type = TYPE_RPMMD;
- else if (!strcmp(vp, "plaindir"))
- cinfo->type = TYPE_PLAINDIR;
- else
- cinfo->type = TYPE_UNKNOWN;
- }
- else if (!strcmp(kp, "priority"))
- cinfo->priority = atoi(vp);
- else if (!strcmp(kp, "keeppackages"))
- cinfo->keeppackages = *vp == '0' ? 0 : 1;
- }
- fclose(fp);
- cinfo = 0;
- }
- closedir(dir);
- qsort(repoinfos, nrepoinfos, sizeof(*repoinfos), read_repoinfos_sort);
- *nrepoinfosp = nrepoinfos;
- return repoinfos;
-}
-
-#endif
-
-#ifdef DEBIAN
-
-struct repoinfo *
-read_repoinfos(Pool *pool, int *nrepoinfosp)
-{
- FILE *fp;
- char buf[4096];
- char buf2[4096];
- int l;
- char *kp, *url, *distro;
- struct repoinfo *repoinfos = 0, *cinfo;
- int nrepoinfos = 0;
- DIR *dir = 0;
- struct dirent *ent;
-
- fp = fopen("/etc/apt/sources.list", "r");
- while (1)
- {
- if (!fp)
- {
- if (!dir)
- {
- dir = opendir("/etc/apt/sources.list.d");
- if (!dir)
- break;
- }
- if ((ent = readdir(dir)) == 0)
- {
- closedir(dir);
- break;
- }
- if (ent->d_name[0] == '.')
- continue;
- l = strlen(ent->d_name);
- if (l < 5 || strcmp(ent->d_name + l - 5, ".list") != 0)
- continue;
- snprintf(buf, sizeof(buf), "%s/%s", "/etc/apt/sources.list.d", ent->d_name);
- if (!(fp = fopen(buf, "r")))
- continue;
- }
- while(fgets(buf2, sizeof(buf2), fp))
- {
- l = strlen(buf2);
- if (l == 0)
- continue;
- while (l && (buf2[l - 1] == '\n' || buf2[l - 1] == ' ' || buf2[l - 1] == '\t'))
- buf2[--l] = 0;
- kp = buf2;
- while (*kp == ' ' || *kp == '\t')
- kp++;
- if (!*kp || *kp == '#')
- continue;
- if (strncmp(kp, "deb", 3) != 0)
- continue;
- kp += 3;
- if (*kp != ' ' && *kp != '\t')
- continue;
- while (*kp == ' ' || *kp == '\t')
- kp++;
- if (!*kp)
- continue;
- url = kp;
- while (*kp && *kp != ' ' && *kp != '\t')
- kp++;
- if (*kp)
- *kp++ = 0;
- while (*kp == ' ' || *kp == '\t')
- kp++;
- if (!*kp)
- continue;
- distro = kp;
- while (*kp && *kp != ' ' && *kp != '\t')
- kp++;
- if (*kp)
- *kp++ = 0;
- while (*kp == ' ' || *kp == '\t')
- kp++;
- if (!*kp)
- continue;
- repoinfos = solv_extend(repoinfos, nrepoinfos, 1, sizeof(*repoinfos), 15);
- cinfo = repoinfos + nrepoinfos++;
- memset(cinfo, 0, sizeof(*cinfo));
- cinfo->baseurl = strdup(url);
- cinfo->alias = solv_dupjoin(url, "/", distro);
- cinfo->name = strdup(distro);
- cinfo->type = TYPE_DEBIAN;
- cinfo->enabled = 1;
- cinfo->autorefresh = 1;
- cinfo->repo_gpgcheck = 1;
- cinfo->metadata_expire = METADATA_EXPIRE;
- while (*kp)
- {
- char *compo;
- while (*kp == ' ' || *kp == '\t')
- kp++;
- if (!*kp)
- break;
- compo = kp;
- while (*kp && *kp != ' ' && *kp != '\t')
- kp++;
- if (*kp)
- *kp++ = 0;
- cinfo->components = solv_extend(cinfo->components, cinfo->ncomponents, 1, sizeof(*cinfo->components), 15);
- cinfo->components[cinfo->ncomponents++] = strdup(compo);
- }
- }
- fclose(fp);
- fp = 0;
- }
- qsort(repoinfos, nrepoinfos, sizeof(*repoinfos), read_repoinfos_sort);
- *nrepoinfosp = nrepoinfos;
- return repoinfos;
-}
-
-#endif
-
-
-void
-free_repoinfos(struct repoinfo *repoinfos, int nrepoinfos)
-{
- int i, j;
- for (i = 0; i < nrepoinfos; i++)
- {
- struct repoinfo *cinfo = repoinfos + i;
- solv_free(cinfo->name);
- solv_free(cinfo->alias);
- solv_free(cinfo->path);
- solv_free(cinfo->metalink);
- solv_free(cinfo->mirrorlist);
- solv_free(cinfo->baseurl);
- for (j = 0; j < cinfo->ncomponents; j++)
- solv_free(cinfo->components[j]);
- solv_free(cinfo->components);
- }
- solv_free(repoinfos);
-}
-
-static inline int
-opentmpfile()
-{
- char tmpl[100];
- int fd;
-
- strcpy(tmpl, "/var/tmp/solvXXXXXX");
- fd = mkstemp(tmpl);
- if (fd < 0)
- {
- perror("mkstemp");
- exit(1);
- }
- unlink(tmpl);
- return fd;
-}
-
-static int
-verify_checksum(int fd, const char *file, const unsigned char *chksum, Id chksumtype)
-{
- char buf[1024];
- const unsigned char *sum;
- Chksum *h;
- int l;
-
- h = solv_chksum_create(chksumtype);
- if (!h)
- {
- printf("%s: unknown checksum type\n", file);
- return 0;
- }
- while ((l = read(fd, buf, sizeof(buf))) > 0)
- solv_chksum_add(h, buf, l);
- lseek(fd, 0, SEEK_SET);
- l = 0;
- sum = solv_chksum_get(h, &l);
- if (memcmp(sum, chksum, l))
- {
- printf("%s: checksum mismatch\n", file);
- solv_chksum_free(h, 0);
- return 0;
- }
- solv_chksum_free(h, 0);
- return 1;
-}
-
-void
-findfastest(char **urls, int nurls)
-{
- int i, j, port;
- int *socks, qc;
- struct pollfd *fds;
- char *p, *p2, *q;
- char portstr[16];
- struct addrinfo hints, *result;;
-
- fds = solv_calloc(nurls, sizeof(*fds));
- socks = solv_calloc(nurls, sizeof(*socks));
- for (i = 0; i < nurls; i++)
- {
- socks[i] = -1;
- p = strchr(urls[i], '/');
- if (!p)
- continue;
- if (p[1] != '/')
- continue;
- p += 2;
- q = strchr(p, '/');
- qc = 0;
- if (q)
- {
- qc = *q;
- *q = 0;
- }
- if ((p2 = strchr(p, '@')) != 0)
- p = p2 + 1;
- port = 80;
- if (!strncmp("https:", urls[i], 6))
- port = 443;
- else if (!strncmp("ftp:", urls[i], 4))
- port = 21;
- if ((p2 = strrchr(p, ':')) != 0)
- {
- port = atoi(p2 + 1);
- if (q)
- *q = qc;
- q = p2;
- qc = *q;
- *q = 0;
- }
- sprintf(portstr, "%d", port);
- memset(&hints, 0, sizeof(struct addrinfo));
- hints.ai_family = AF_UNSPEC;
- hints.ai_socktype = SOCK_STREAM;
- hints.ai_flags = AI_NUMERICSERV;
- result = 0;
- if (!getaddrinfo(p, portstr, &hints, &result))
- {
- socks[i] = socket(result->ai_family, result->ai_socktype, result->ai_protocol);
- if (socks[i] >= 0)
- {
- fcntl(socks[i], F_SETFL, O_NONBLOCK);
- if (connect(socks[i], result->ai_addr, result->ai_addrlen) == -1)
- {
- if (errno != EINPROGRESS)
- {
- close(socks[i]);
- socks[i] = -1;
- }
- }
- }
- freeaddrinfo(result);
- }
- if (q)
- *q = qc;
- }
- for (;;)
- {
- for (i = j = 0; i < nurls; i++)
- {
- if (socks[i] < 0)
- continue;
- fds[j].fd = socks[i];
- fds[j].events = POLLOUT;
- j++;
- }
- if (j < 2)
- {
- i = j - 1;
- break;
- }
- if (poll(fds, j, 10000) <= 0)
- {
- i = -1; /* something is wrong */
- break;
- }
- for (i = 0; i < j; i++)
- if ((fds[i].revents & POLLOUT) != 0)
- {
- int soe = 0;
- socklen_t soel = sizeof(int);
- if (getsockopt(fds[i].fd, SOL_SOCKET, SO_ERROR, &soe, &soel) == -1 || soe != 0)
- {
- /* connect failed, kill socket */
- for (j = 0; j < nurls; j++)
- if (socks[j] == fds[i].fd)
- {
- close(socks[j]);
- socks[j] = -1;
- }
- i = j + 1;
- break;
- }
- break; /* horray! */
- }
- if (i == j + 1)
- continue;
- if (i == j)
- i = -1; /* something is wrong, no bit was set */
- break;
- }
- /* now i contains the fastest fd index */
- if (i >= 0)
- {
- for (j = 0; j < nurls; j++)
- if (socks[j] == fds[i].fd)
- break;
- if (j != 0)
- {
- char *url0 = urls[0];
- urls[0] = urls[j];
- urls[j] = url0;
- }
- }
- for (i = j = 0; i < nurls; i++)
- if (socks[i] >= 0)
- close(socks[i]);
- free(socks);
- free(fds);
-}
-
-char *
-findmetalinkurl(FILE *fp, unsigned char *chksump, Id *chksumtypep)
-{
- char buf[4096], *bp, *ep;
- char **urls = 0;
- int nurls = 0;
- int i;
-
- if (chksumtypep)
- *chksumtypep = 0;
- while((bp = fgets(buf, sizeof(buf), fp)) != 0)
- {
- while (*bp == ' ' || *bp == '\t')
- bp++;
- if (chksumtypep && !*chksumtypep && !strncmp(bp, "<hash type=\"sha256\">", 20))
- {
- bp += 20;
- if (solv_hex2bin((const char **)&bp, chksump, 32) == 32)
- *chksumtypep = REPOKEY_TYPE_SHA256;
- continue;
- }
- if (strncmp(bp, "<url", 4))
- continue;
- bp = strchr(bp, '>');
- if (!bp)
- continue;
- bp++;
- ep = strstr(bp, "repodata/repomd.xml</url>");
- if (!ep)
- continue;
- *ep = 0;
- if (strncmp(bp, "http", 4))
- continue;
- urls = solv_extend(urls, nurls, 1, sizeof(*urls), 15);
- urls[nurls++] = strdup(bp);
- }
- if (nurls)
- {
- if (nurls > 1)
- findfastest(urls, nurls > 5 ? 5 : nurls);
- bp = urls[0];
- urls[0] = 0;
- for (i = 0; i < nurls; i++)
- solv_free(urls[i]);
- solv_free(urls);
- ep = strchr(bp, '/');
- if ((ep = strchr(ep + 2, '/')) != 0)
- {
- *ep = 0;
- printf("[using mirror %s]\n", bp);
- *ep = '/';
- }
- return bp;
- }
- return 0;
-}
-
-char *
-findmirrorlisturl(FILE *fp)
-{
- char buf[4096], *bp, *ep;
- int i, l;
- char **urls = 0;
- int nurls = 0;
-
- while((bp = fgets(buf, sizeof(buf), fp)) != 0)
- {
- while (*bp == ' ' || *bp == '\t')
- bp++;
- if (!*bp || *bp == '#')
- continue;
- l = strlen(bp);
- while (l > 0 && (bp[l - 1] == ' ' || bp[l - 1] == '\t' || bp[l - 1] == '\n'))
- bp[--l] = 0;
- urls = solv_extend(urls, nurls, 1, sizeof(*urls), 15);
- urls[nurls++] = strdup(bp);
- }
- if (nurls)
- {
- if (nurls > 1)
- findfastest(urls, nurls > 5 ? 5 : nurls);
- bp = urls[0];
- urls[0] = 0;
- for (i = 0; i < nurls; i++)
- solv_free(urls[i]);
- solv_free(urls);
- ep = strchr(bp, '/');
- if ((ep = strchr(ep + 2, '/')) != 0)
- {
- *ep = 0;
- printf("[using mirror %s]\n", bp);
- *ep = '/';
- }
- return bp;
- }
- return 0;
-}
-
-static inline int
-iscompressed(const char *name)
-{
- return solv_xfopen_iscompressed(name) != 0;
-}
-
-FILE *
-curlfopen(struct repoinfo *cinfo, const char *file, int uncompress, const unsigned char *chksum, Id chksumtype, int markincomplete)
-{
- FILE *fp;
- pid_t pid;
- int fd, l;
- int status;
- char url[4096];
- const char *baseurl = cinfo->baseurl;
-
- if (!baseurl)
- {
- if (!cinfo->metalink && !cinfo->mirrorlist)
- return 0;
- if (file != cinfo->metalink && file != cinfo->mirrorlist)
- {
- unsigned char mlchksum[32];
- Id mlchksumtype;
- fp = curlfopen(cinfo, cinfo->metalink ? cinfo->metalink : cinfo->mirrorlist, 0, 0, 0, 0);
- mlchksumtype = 0;
- if (!fp)
- return 0;
- if (cinfo->metalink)
- cinfo->baseurl = findmetalinkurl(fp, mlchksum, &mlchksumtype);
- else
- cinfo->baseurl = findmirrorlisturl(fp);
- fclose(fp);
- if (!cinfo->baseurl)
- return 0;
-#ifdef FEDORA
- if (strchr(cinfo->baseurl, '$'))
- {
- char *b = yum_substitute(cinfo->repo->pool, cinfo->baseurl);
- free(cinfo->baseurl);
- cinfo->baseurl = strdup(b);
- }
-#endif
- if (!chksumtype && mlchksumtype && !strcmp(file, "repodata/repomd.xml"))
- {
- chksumtype = mlchksumtype;
- chksum = mlchksum;
- }
- return curlfopen(cinfo, file, uncompress, chksum, chksumtype, markincomplete);
- }
- snprintf(url, sizeof(url), "%s", file);
- }
- else
- {
- l = strlen(baseurl);
- if (l && baseurl[l - 1] == '/')
- snprintf(url, sizeof(url), "%s%s", baseurl, file);
- else
- snprintf(url, sizeof(url), "%s/%s", baseurl, file);
- }
- fd = opentmpfile();
- // printf("url: %s\n", url);
- if ((pid = fork()) == (pid_t)-1)
- {
- perror("fork");
- exit(1);
- }
- if (pid == 0)
- {
- if (fd != 1)
- {
- dup2(fd, 1);
- close(fd);
- }
- execlp("curl", "curl", "-f", "-s", "-L", url, (char *)0);
- perror("curl");
- _exit(0);
- }
- status = 0;
- while (waitpid(pid, &status, 0) != pid)
- ;
- if (lseek(fd, 0, SEEK_END) == 0 && (!status || !chksumtype))
- {
- /* empty file */
- close(fd);
- return 0;
- }
- lseek(fd, 0, SEEK_SET);
- if (status)
- {
- printf("%s: download error %d\n", file, status >> 8 ? status >> 8 : status);
- if (markincomplete)
- cinfo->incomplete = 1;
- close(fd);
- return 0;
- }
- if (chksumtype && !verify_checksum(fd, file, chksum, chksumtype))
- {
- if (markincomplete)
- cinfo->incomplete = 1;
- close(fd);
- return 0;
- }
- fcntl(fd, F_SETFD, FD_CLOEXEC);
- if (uncompress)
- {
- if (solv_xfopen_iscompressed(file) < 0)
- {
- printf("%s: unsupported compression\n", file);
- if (markincomplete)
- cinfo->incomplete = 1;
- close(fd);
- return 0;
- }
- fp = solv_xfopen_fd(file, fd, "r");
- }
- else
- fp = fdopen(fd, "r");
- if (!fp)
- close(fd);
- return fp;
-}
-
-#ifndef DEBIAN
-
-static void
-cleanupgpg(char *gpgdir)
-{
- char cmd[256];
- snprintf(cmd, sizeof(cmd), "%s/pubring.gpg", gpgdir);
- unlink(cmd);
- snprintf(cmd, sizeof(cmd), "%s/pubring.gpg~", gpgdir);
- unlink(cmd);
- snprintf(cmd, sizeof(cmd), "%s/secring.gpg", gpgdir);
- unlink(cmd);
- snprintf(cmd, sizeof(cmd), "%s/trustdb.gpg", gpgdir);
- unlink(cmd);
- snprintf(cmd, sizeof(cmd), "%s/keys", gpgdir);
- unlink(cmd);
- rmdir(gpgdir);
-}
-
-int
-checksig(Pool *sigpool, FILE *fp, FILE *sigfp)
-{
- char *gpgdir;
- char *keysfile;
- const char *pubkey;
- char cmd[256];
- FILE *kfp;
- Solvable *s;
- Id p;
- off_t posfp, possigfp;
- int r, nkeys;
-
- gpgdir = mkdtemp(pool_tmpjoin(sigpool, "/var/tmp/solvgpg.XXXXXX", 0, 0));
- if (!gpgdir)
- return 0;
- keysfile = pool_tmpjoin(sigpool, gpgdir, "/keys", 0);
- if (!(kfp = fopen(keysfile, "w")) )
- {
- cleanupgpg(gpgdir);
- return 0;
- }
- nkeys = 0;
- for (p = 1, s = sigpool->solvables + p; p < sigpool->nsolvables; p++, s++)
- {
- if (!s->repo)
- continue;
- pubkey = solvable_lookup_str(s, SOLVABLE_DESCRIPTION);
- if (!pubkey || !*pubkey)
- continue;
- if (fwrite(pubkey, strlen(pubkey), 1, kfp) != 1)
- break;
- if (fputc('\n', kfp) == EOF) /* Just in case... */
- break;
- nkeys++;
- }
- if (fclose(kfp) || !nkeys)
- {
- cleanupgpg(gpgdir);
- return 0;
- }
- snprintf(cmd, sizeof(cmd), "gpg2 -q --homedir %s --import %s", gpgdir, keysfile);
- if (system(cmd))
- {
- fprintf(stderr, "key import error\n");
- cleanupgpg(gpgdir);
- return 0;
- }
- unlink(keysfile);
- posfp = lseek(fileno(fp), 0, SEEK_CUR);
- lseek(fileno(fp), 0, SEEK_SET);
- possigfp = lseek(fileno(sigfp), 0, SEEK_CUR);
- lseek(fileno(sigfp), 0, SEEK_SET);
- snprintf(cmd, sizeof(cmd), "gpgv -q --homedir %s --keyring %s/pubring.gpg /dev/fd/%d /dev/fd/%d >/dev/null 2>&1", gpgdir, gpgdir, fileno(sigfp), fileno(fp));
- fcntl(fileno(fp), F_SETFD, 0); /* clear CLOEXEC */
- fcntl(fileno(sigfp), F_SETFD, 0); /* clear CLOEXEC */
- r = system(cmd);
- lseek(fileno(sigfp), possigfp, SEEK_SET);
- lseek(fileno(fp), posfp, SEEK_SET);
- fcntl(fileno(fp), F_SETFD, FD_CLOEXEC);
- fcntl(fileno(sigfp), F_SETFD, FD_CLOEXEC);
- cleanupgpg(gpgdir);
- return r == 0 ? 1 : 0;
-}
-
-#else
-
-static int
-checksig(Pool *sigpool, FILE *fp, FILE *sigfp)
-{
- char cmd[256];
- int r;
-
- snprintf(cmd, sizeof(cmd), "gpgv -q --keyring /etc/apt/trusted.gpg /dev/fd/%d /dev/fd/%d >/dev/null 2>&1", fileno(sigfp), fileno(fp));
- fcntl(fileno(fp), F_SETFD, 0); /* clear CLOEXEC */
- fcntl(fileno(sigfp), F_SETFD, 0); /* clear CLOEXEC */
- r = system(cmd);
- fcntl(fileno(fp), F_SETFD, FD_CLOEXEC);
- fcntl(fileno(sigfp), F_SETFD, FD_CLOEXEC);
- return r == 0 ? 1 : 0;
-}
-
-#endif
-
-static Pool *
-read_sigs()
-{
- Pool *sigpool = pool_create();
-#if defined(ENABLE_PUBKEY) && defined(ENABLE_RPMDB)
- Repo *repo = repo_create(sigpool, "pubkeys");
- repo_add_rpmdb_pubkeys(repo, 0);
-#endif
- return sigpool;
-}
-
-static int
-downloadchecksig(struct repoinfo *cinfo, FILE *fp, const char *sigurl, Pool **sigpool)
-{
- FILE *sigfp;
- sigfp = curlfopen(cinfo, sigurl, 0, 0, 0, 0);
- if (!sigfp)
- {
- printf(" unsigned, skipped\n");
- return 0;
- }
- if (!*sigpool)
- *sigpool = read_sigs();
- if (!checksig(*sigpool, fp, sigfp))
- {
- printf(" checksig failed, skipped\n");
- fclose(sigfp);
- return 0;
- }
- fclose(sigfp);
- return 1;
-}
-
-#define CHKSUM_IDENT "1.1"
-
-void
-calc_checksum_fp(FILE *fp, Id chktype, unsigned char *out)
-{
- char buf[4096];
- Chksum *h = solv_chksum_create(chktype);
- int l;
-
- solv_chksum_add(h, CHKSUM_IDENT, strlen(CHKSUM_IDENT));
- while ((l = fread(buf, 1, sizeof(buf), fp)) > 0)
- solv_chksum_add(h, buf, l);
- rewind(fp);
- solv_chksum_free(h, out);
-}
-
-void
-calc_checksum_stat(struct stat *stb, Id chktype, unsigned char *cookie, unsigned char *out)
-{
- Chksum *h = solv_chksum_create(chktype);
- solv_chksum_add(h, CHKSUM_IDENT, strlen(CHKSUM_IDENT));
- if (cookie)
- solv_chksum_add(h, cookie, 32);
- solv_chksum_add(h, &stb->st_dev, sizeof(stb->st_dev));
- solv_chksum_add(h, &stb->st_ino, sizeof(stb->st_ino));
- solv_chksum_add(h, &stb->st_size, sizeof(stb->st_size));
- solv_chksum_add(h, &stb->st_mtime, sizeof(stb->st_mtime));
- solv_chksum_free(h, out);
-}
-
-void
-setarch(Pool *pool)
-{
- struct utsname un;
- if (uname(&un))
- {
- perror("uname");
- exit(1);
- }
- pool_setarch(pool, un.machine);
-}
-
-char *userhome;
-
-char *
-calccachepath(Repo *repo, const char *repoext, int forcesystemloc)
-{
- char *q, *p;
- int l;
- if (!forcesystemloc && userhome && getuid())
- p = pool_tmpjoin(repo->pool, userhome, "/.solvcache/", 0);
- else
- p = pool_tmpjoin(repo->pool, SOLVCACHE_PATH, "/", 0);
- l = strlen(p);
- p = pool_tmpappend(repo->pool, p, repo->name, 0);
- if (repoext)
- {
- p = pool_tmpappend(repo->pool, p, "_", repoext);
- p = pool_tmpappend(repo->pool, p, ".solvx", 0);
- }
- else
- p = pool_tmpappend(repo->pool, p, ".solv", 0);
- q = p + l;
- if (*q == '.')
- *q = '_';
- for (; *q; q++)
- if (*q == '/')
- *q = '_';
- return p;
-}
-
-int
-usecachedrepo(Repo *repo, const char *repoext, unsigned char *cookie, int mark)
-{
- FILE *fp;
- unsigned char mycookie[32];
- unsigned char myextcookie[32];
- struct repoinfo *cinfo;
- int flags;
- int forcesystemloc;
-
- forcesystemloc = mark & 2 ? 0 : 1;
- if (mark < 2 && userhome && getuid())
- {
- /* first try home location */
- int res = usecachedrepo(repo, repoext, cookie, mark | 2);
- if (res)
- return res;
- }
- mark &= 1;
- cinfo = repo->appdata;
- if (!(fp = fopen(calccachepath(repo, repoext, forcesystemloc), "r")))
- return 0;
- if (fseek(fp, -sizeof(mycookie), SEEK_END) || fread(mycookie, sizeof(mycookie), 1, fp) != 1)
- {
- fclose(fp);
- return 0;
- }
- if (cookie && memcmp(cookie, mycookie, sizeof(mycookie)) != 0)
- {
- fclose(fp);
- return 0;
- }
- if (cinfo && !repoext)
- {
- if (fseek(fp, -sizeof(mycookie) * 2, SEEK_END) || fread(myextcookie, sizeof(myextcookie), 1, fp) != 1)
- {
- fclose(fp);
- return 0;
- }
- }
- rewind(fp);
-
- flags = 0;
- if (repoext)
- {
- flags = REPO_USE_LOADING|REPO_EXTEND_SOLVABLES;
- if (strcmp(repoext, "DL") != 0)
- flags |= REPO_LOCALPOOL; /* no local pool for DL so that we can compare IDs */
- }
-
- if (repo_add_solv(repo, fp, flags))
- {
- fclose(fp);
- return 0;
- }
- if (cinfo && !repoext)
- {
- memcpy(cinfo->cookie, mycookie, sizeof(mycookie));
- memcpy(cinfo->extcookie, myextcookie, sizeof(myextcookie));
- cinfo->extcookieset = 1;
- }
- if (mark)
- futimens(fileno(fp), 0); /* try to set modification time */
- fclose(fp);
- return 1;
-}
-
-void
-writecachedrepo(Repo *repo, Repodata *repodata, const char *repoext, unsigned char *cookie)
-{
- FILE *fp;
- int i, fd;
- char *tmpl, *cachedir;
- struct repoinfo *cinfo;
- int onepiece;
-
- cinfo = repo->appdata;
- if (cinfo && cinfo->incomplete)
- return;
- cachedir = userhome && getuid() ? pool_tmpjoin(repo->pool, userhome, "/.solvcache", 0) : SOLVCACHE_PATH;
- if (access(cachedir, W_OK | X_OK) != 0 && mkdir(cachedir, 0755) == 0)
- printf("[created %s]\n", cachedir);
- /* use dupjoin instead of tmpjoin because tmpl must survive repo_write */
- tmpl = solv_dupjoin(cachedir, "/", ".newsolv-XXXXXX");
- fd = mkstemp(tmpl);
- if (fd < 0)
- {
- free(tmpl);
- return;
- }
- fchmod(fd, 0444);
- if (!(fp = fdopen(fd, "w")))
- {
- close(fd);
- unlink(tmpl);
- free(tmpl);
- return;
- }
-
- onepiece = 1;
- for (i = repo->start; i < repo->end; i++)
- if (repo->pool->solvables[i].repo != repo)
- break;
- if (i < repo->end)
- onepiece = 0;
-
- if (!repodata)
- repo_write(repo, fp);
- else if (repoext)
- repodata_write(repodata, fp);
- else
- {
- int oldnrepodata = repo->nrepodata;
- repo->nrepodata = oldnrepodata > 2 ? 2 : oldnrepodata; /* XXX: do this right */
- repo_write(repo, fp);
- repo->nrepodata = oldnrepodata;
- onepiece = 0; /* don't bother for the added file provides */
- }
-
- if (!repoext && cinfo)
- {
- if (!cinfo->extcookieset)
- {
- /* create the ext cookie and append it */
- /* we just need some unique ID */
- struct stat stb;
- if (!fstat(fileno(fp), &stb))
- memset(&stb, 0, sizeof(stb));
- calc_checksum_stat(&stb, REPOKEY_TYPE_SHA256, cookie, cinfo->extcookie);
- cinfo->extcookieset = 1;
- }
- if (fwrite(cinfo->extcookie, 32, 1, fp) != 1)
- {
- fclose(fp);
- unlink(tmpl);
- free(tmpl);
- return;
- }
- }
- /* append our cookie describing the metadata state */
- if (fwrite(cookie, 32, 1, fp) != 1)
- {
- fclose(fp);
- unlink(tmpl);
- free(tmpl);
- return;
- }
- if (fclose(fp))
- {
- unlink(tmpl);
- free(tmpl);
- return;
- }
- if (onepiece)
- {
- /* switch to just saved repo to activate paging and save memory */
- FILE *fp = fopen(tmpl, "r");
- if (fp)
- {
- if (!repoext)
- {
- /* main repo */
- repo_empty(repo, 1);
- if (repo_add_solv(repo, fp, SOLV_ADD_NO_STUBS))
- {
- /* oops, no way to recover from here */
- fprintf(stderr, "internal error\n");
- exit(1);
- }
- }
- else
- {
- int flags = REPO_USE_LOADING|REPO_EXTEND_SOLVABLES;
- /* make sure repodata contains complete repo */
- /* (this is how repodata_write saves it) */
- repodata_extend_block(repodata, repo->start, repo->end - repo->start);
- repodata->state = REPODATA_LOADING;
- if (strcmp(repoext, "DL") != 0)
- flags |= REPO_LOCALPOOL;
- repo_add_solv(repo, fp, flags);
- repodata->state = REPODATA_AVAILABLE; /* in case the load failed */
- }
- fclose(fp);
- }
- }
- if (!rename(tmpl, calccachepath(repo, repoext, 0)))
- unlink(tmpl);
- free(tmpl);
-}
-
-
-#ifdef ENABLE_RPMMD
-/* repomd helpers */
-
-static inline const char *
-repomd_find(Repo *repo, const char *what, const unsigned char **chksump, Id *chksumtypep)
-{
- Pool *pool = repo->pool;
- Dataiterator di;
- const char *filename;
-
- filename = 0;
- *chksump = 0;
- *chksumtypep = 0;
- dataiterator_init(&di, pool, repo, SOLVID_META, REPOSITORY_REPOMD_TYPE, what, SEARCH_STRING);
- dataiterator_prepend_keyname(&di, REPOSITORY_REPOMD);
- if (dataiterator_step(&di))
- {
- dataiterator_setpos_parent(&di);
- filename = pool_lookup_str(pool, SOLVID_POS, REPOSITORY_REPOMD_LOCATION);
- *chksump = pool_lookup_bin_checksum(pool, SOLVID_POS, REPOSITORY_REPOMD_CHECKSUM, chksumtypep);
- }
- dataiterator_free(&di);
- if (filename && !*chksumtypep)
- {
- printf("no %s file checksum!\n", what);
- filename = 0;
- }
- return filename;
-}
-
-int
-repomd_add_ext(Repo *repo, Repodata *data, const char *what)
-{
- Id chksumtype, handle;
- const unsigned char *chksum;
- const char *filename;
-
- filename = repomd_find(repo, what, &chksum, &chksumtype);
- if (!filename)
- return 0;
- if (!strcmp(what, "prestodelta"))
- what = "deltainfo";
- handle = repodata_new_handle(data);
- repodata_set_poolstr(data, handle, REPOSITORY_REPOMD_TYPE, what);
- repodata_set_str(data, handle, REPOSITORY_REPOMD_LOCATION, filename);
- repodata_set_bin_checksum(data, handle, REPOSITORY_REPOMD_CHECKSUM, chksumtype, chksum);
- if (!strcmp(what, "deltainfo"))
- {
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOSITORY_DELTAINFO);
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOKEY_TYPE_FLEXARRAY);
- }
- if (!strcmp(what, "filelists"))
- {
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, SOLVABLE_FILELIST);
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOKEY_TYPE_DIRSTRARRAY);
- }
- repodata_add_flexarray(data, SOLVID_META, REPOSITORY_EXTERNAL, handle);
- return 1;
-}
-
-int
-repomd_load_ext(Repo *repo, Repodata *data)
-{
- const char *filename, *repomdtype;
- char ext[3];
- FILE *fp;
- struct repoinfo *cinfo;
- const unsigned char *filechksum;
- Id filechksumtype;
- int r = 0;
-
- cinfo = repo->appdata;
- repomdtype = repodata_lookup_str(data, SOLVID_META, REPOSITORY_REPOMD_TYPE);
- if (!repomdtype)
- return 0;
- if (!strcmp(repomdtype, "filelists"))
- strcpy(ext, "FL");
- else if (!strcmp(repomdtype, "deltainfo"))
- strcpy(ext, "DL");
- else
- return 0;
- printf("[%s:%s", repo->name, ext);
- if (usecachedrepo(repo, ext, cinfo->extcookie, 0))
- {
- printf(" cached]\n"); fflush(stdout);
- return 1;
- }
- printf(" fetching]\n"); fflush(stdout);
- filename = repodata_lookup_str(data, SOLVID_META, REPOSITORY_REPOMD_LOCATION);
- filechksumtype = 0;
- filechksum = repodata_lookup_bin_checksum(data, SOLVID_META, REPOSITORY_REPOMD_CHECKSUM, &filechksumtype);
- if ((fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, 0)) == 0)
- return 0;
- if (!strcmp(ext, "FL"))
- r = repo_add_rpmmd(repo, fp, ext, REPO_USE_LOADING|REPO_EXTEND_SOLVABLES|REPO_LOCALPOOL);
- else if (!strcmp(ext, "DL"))
- r = repo_add_deltainfoxml(repo, fp, REPO_USE_LOADING);
- fclose(fp);
- if (r)
- {
- printf("%s\n", pool_errstr(repo->pool));
- return 0;
- }
- if (cinfo->extcookieset)
- writecachedrepo(repo, data, ext, cinfo->extcookie);
- return 1;
-}
-
-#endif
-
-
-#ifdef ENABLE_SUSEREPO
-/* susetags helpers */
-
-static inline const char *
-susetags_find(Repo *repo, const char *what, const unsigned char **chksump, Id *chksumtypep)
-{
- Pool *pool = repo->pool;
- Dataiterator di;
- const char *filename;
-
- filename = 0;
- *chksump = 0;
- *chksumtypep = 0;
- dataiterator_init(&di, pool, repo, SOLVID_META, SUSETAGS_FILE_NAME, what, SEARCH_STRING);
- dataiterator_prepend_keyname(&di, SUSETAGS_FILE);
- if (dataiterator_step(&di))
- {
- dataiterator_setpos_parent(&di);
- *chksump = pool_lookup_bin_checksum(pool, SOLVID_POS, SUSETAGS_FILE_CHECKSUM, chksumtypep);
- filename = what;
- }
- dataiterator_free(&di);
- if (filename && !*chksumtypep)
- {
- printf("no %s file checksum!\n", what);
- filename = 0;
- }
- return filename;
-}
-
-static Id susetags_langtags[] = {
- SOLVABLE_SUMMARY, REPOKEY_TYPE_STR,
- SOLVABLE_DESCRIPTION, REPOKEY_TYPE_STR,
- SOLVABLE_EULA, REPOKEY_TYPE_STR,
- SOLVABLE_MESSAGEINS, REPOKEY_TYPE_STR,
- SOLVABLE_MESSAGEDEL, REPOKEY_TYPE_STR,
- SOLVABLE_CATEGORY, REPOKEY_TYPE_ID,
- 0, 0
-};
-
-void
-susetags_add_ext(Repo *repo, Repodata *data)
-{
- Pool *pool = repo->pool;
- Dataiterator di;
- char ext[3];
- Id handle, filechksumtype;
- const unsigned char *filechksum;
- int i;
-
- dataiterator_init(&di, pool, repo, SOLVID_META, SUSETAGS_FILE_NAME, 0, 0);
- dataiterator_prepend_keyname(&di, SUSETAGS_FILE);
- while (dataiterator_step(&di))
- {
- if (strncmp(di.kv.str, "packages.", 9) != 0)
- continue;
- if (!strcmp(di.kv.str + 9, "gz"))
- continue;
- if (!di.kv.str[9] || !di.kv.str[10] || (di.kv.str[11] && di.kv.str[11] != '.'))
- continue;
- ext[0] = di.kv.str[9];
- ext[1] = di.kv.str[10];
- ext[2] = 0;
- if (!strcmp(ext, "en"))
- continue;
- if (!susetags_find(repo, di.kv.str, &filechksum, &filechksumtype))
- continue;
- handle = repodata_new_handle(data);
- repodata_set_str(data, handle, SUSETAGS_FILE_NAME, di.kv.str);
- if (filechksumtype)
- repodata_set_bin_checksum(data, handle, SUSETAGS_FILE_CHECKSUM, filechksumtype, filechksum);
- if (!strcmp(ext, "DU"))
- {
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, SOLVABLE_DISKUSAGE);
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOKEY_TYPE_DIRNUMNUMARRAY);
- }
- else if (!strcmp(ext, "FL"))
- {
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, SOLVABLE_FILELIST);
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOKEY_TYPE_DIRSTRARRAY);
- }
- else
- {
- for (i = 0; susetags_langtags[i]; i += 2)
- {
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, pool_id2langid(pool, susetags_langtags[i], ext, 1));
- repodata_add_idarray(data, handle, REPOSITORY_KEYS, susetags_langtags[i + 1]);
- }
- }
- repodata_add_flexarray(data, SOLVID_META, REPOSITORY_EXTERNAL, handle);
- }
- dataiterator_free(&di);
-}
-
-int
-susetags_load_ext(Repo *repo, Repodata *data)
-{
- const char *filename, *descrdir;
- Id defvendor;
- char ext[3];
- FILE *fp;
- struct repoinfo *cinfo;
- const unsigned char *filechksum;
- Id filechksumtype;
- int flags;
-
- cinfo = repo->appdata;
- filename = repodata_lookup_str(data, SOLVID_META, SUSETAGS_FILE_NAME);
- if (!filename)
- return 0;
- /* susetags load */
- ext[0] = filename[9];
- ext[1] = filename[10];
- ext[2] = 0;
- printf("[%s:%s", repo->name, ext);
- if (usecachedrepo(repo, ext, cinfo->extcookie, 0))
- {
- printf(" cached]\n"); fflush(stdout);
- return 1;
- }
- printf(" fetching]\n"); fflush(stdout);
- defvendor = repo_lookup_id(repo, SOLVID_META, SUSETAGS_DEFAULTVENDOR);
- descrdir = repo_lookup_str(repo, SOLVID_META, SUSETAGS_DESCRDIR);
- if (!descrdir)
- descrdir = "suse/setup/descr";
- filechksumtype = 0;
- filechksum = repodata_lookup_bin_checksum(data, SOLVID_META, SUSETAGS_FILE_CHECKSUM, &filechksumtype);
- if ((fp = curlfopen(cinfo, pool_tmpjoin(repo->pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, 0)) == 0)
- return 0;
- flags = REPO_USE_LOADING|REPO_EXTEND_SOLVABLES;
- if (strcmp(ext, "DL") != 0)
- flags |= REPO_LOCALPOOL;
- if (repo_add_susetags(repo, fp, defvendor, ext, flags))
- {
- fclose(fp);
- printf("%s\n", pool_errstr(repo->pool));
- return 0;
- }
- fclose(fp);
- if (cinfo->extcookieset)
- writecachedrepo(repo, data, ext, cinfo->extcookie);
- return 1;
-}
-#endif
-
-
-
-/* load callback */
-
-int
-load_stub(Pool *pool, Repodata *data, void *dp)
-{
- struct repoinfo *cinfo = data->repo->appdata;
- switch (cinfo->type)
- {
-#ifdef ENABLE_SUSEREPO
- case TYPE_SUSETAGS:
- return susetags_load_ext(data->repo, data);
-#endif
-#ifdef ENABLE_RPMMD
- case TYPE_RPMMD:
- return repomd_load_ext(data->repo, data);
-#endif
- default:
- return 0;
- }
-}
-
-static unsigned char installedcookie[32];
-
-#ifdef ENABLE_DEBIAN
-
-const char *
-debian_find_component(struct repoinfo *cinfo, FILE *fp, char *comp, const unsigned char **chksump, Id *chksumtypep)
-{
- char buf[4096];
- Id chksumtype;
- unsigned char *chksum;
- Id curchksumtype;
- int l, compl;
- char *ch, *fn, *bp;
- char *filename;
- static char *basearch;
- char *binarydir;
- int lbinarydir;
-
- if (!basearch)
- {
- struct utsname un;
- if (uname(&un))
- {
- perror("uname");
- exit(1);
- }
- basearch = strdup(un.machine);
- if (basearch[0] == 'i' && basearch[1] && !strcmp(basearch + 2, "86"))
- basearch[1] = '3';
- }
- binarydir = solv_dupjoin("binary-", basearch, "/");
- lbinarydir = strlen(binarydir);
- compl = strlen(comp);
- rewind(fp);
- curchksumtype = 0;
- filename = 0;
- chksum = solv_malloc(32);
- chksumtype = 0;
- while(fgets(buf, sizeof(buf), fp))
- {
- l = strlen(buf);
- if (l == 0)
- continue;
- while (l && (buf[l - 1] == '\n' || buf[l - 1] == ' ' || buf[l - 1] == '\t'))
- buf[--l] = 0;
- if (!strncasecmp(buf, "MD5Sum:", 7))
- {
- curchksumtype = REPOKEY_TYPE_MD5;
- continue;
- }
- if (!strncasecmp(buf, "SHA1:", 5))
- {
- curchksumtype = REPOKEY_TYPE_SHA1;
- continue;
- }
- if (!strncasecmp(buf, "SHA256:", 7))
- {
- curchksumtype = REPOKEY_TYPE_SHA256;
- continue;
- }
- if (!curchksumtype)
- continue;
- bp = buf;
- if (*bp++ != ' ')
- {
- curchksumtype = 0;
- continue;
- }
- ch = bp;
- while (*bp && *bp != ' ' && *bp != '\t')
- bp++;
- if (!*bp)
- continue;
- *bp++ = 0;
- while (*bp == ' ' || *bp == '\t')
- bp++;
- while (*bp && *bp != ' ' && *bp != '\t')
- bp++;
- if (!*bp)
- continue;
- while (*bp == ' ' || *bp == '\t')
- bp++;
- fn = bp;
- if (strncmp(fn, comp, compl) != 0 || fn[compl] != '/')
- continue;
- bp += compl + 1;
- if (strncmp(bp, binarydir, lbinarydir))
- continue;
- bp += lbinarydir;
- if (!strcmp(bp, "Packages") || !strcmp(bp, "Packages.gz"))
- {
- unsigned char curchksum[32];
- int curl;
- if (filename && !strcmp(bp, "Packages"))
- continue;
- curl = solv_chksum_len(curchksumtype);
- if (!curl || (chksumtype && solv_chksum_len(chksumtype) > curl))
- continue;
- if (solv_hex2bin((const char **)&ch, curchksum, sizeof(curchksum)) != curl)
- continue;
- solv_free(filename);
- filename = strdup(fn);
- chksumtype = curchksumtype;
- memcpy(chksum, curchksum, curl);
- }
- }
- free(binarydir);
- if (filename)
- {
- fn = solv_dupjoin("/", filename, 0);
- solv_free(filename);
- filename = solv_dupjoin("dists/", cinfo->name, fn);
- solv_free(fn);
- }
- if (!chksumtype)
- chksum = solv_free(chksum);
- *chksump = chksum;
- *chksumtypep = chksumtype;
- return filename;
-}
-#endif
-
-void
-read_repos(Pool *pool, struct repoinfo *repoinfos, int nrepoinfos)
-{
- Repo *repo;
- struct repoinfo *cinfo;
- int i;
- FILE *fp;
- const char *filename;
- const unsigned char *filechksum;
- Id filechksumtype;
-#ifdef ENABLE_SUSEREPO
- const char *descrdir;
- int defvendor;
-#endif
- struct stat stb;
- Pool *sigpool = 0;
-#if defined(ENABLE_SUSEREPO) || defined(ENABLE_RPMMD)
- Repodata *data;
-#endif
- int dorefresh;
-#if defined(ENABLE_DEBIAN)
- FILE *fpr;
- int j;
-#endif
-
- repo = repo_create(pool, "@System");
- memset(&stb, 0, sizeof(stb));
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
- printf("rpm database:");
- if (stat(pool_prepend_rootdir_tmp(pool, "/var/lib/rpm/Packages"), &stb))
- memset(&stb, 0, sizeof(stb));
-#endif
-#if defined(ENABLE_DEBIAN) && defined(DEBIAN)
- printf("dpgk database:");
- if (stat(pool_prepend_rootdir_tmp(pool, "/var/lib/dpkg/status"), &stb))
- memset(&stb, 0, sizeof(stb));
-#endif
- calc_checksum_stat(&stb, REPOKEY_TYPE_SHA256, 0, installedcookie);
- if (usecachedrepo(repo, 0, installedcookie, 0))
- printf(" cached\n");
- else
- {
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
- FILE *ofp = 0;
-#endif
- printf(" reading\n");
-
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
-# if defined(ENABLE_SUSEREPO) && defined(PRODUCTS_PATH)
- if (repo_add_products(repo, PRODUCTS_PATH, REPO_REUSE_REPODATA | REPO_NO_INTERNALIZE | REPO_USE_ROOTDIR))
- {
- fprintf(stderr, "product reading failed: %s\n", pool_errstr(pool));
- exit(1);
- }
-# endif
-# if defined(ENABLE_APPDATA)
- if (repo_add_appdata_dir(repo, APPDATA_PATH, REPO_REUSE_REPODATA | REPO_NO_INTERNALIZE | REPO_USE_ROOTDIR))
- {
- fprintf(stderr, "appdata reading failed: %s\n", pool_errstr(pool));
- exit(1);
- }
-# endif
- ofp = fopen(calccachepath(repo, 0, 0), "r");
- if (repo_add_rpmdb_reffp(repo, ofp, REPO_REUSE_REPODATA | REPO_NO_INTERNALIZE | REPO_USE_ROOTDIR))
- {
- fprintf(stderr, "installed db: %s\n", pool_errstr(pool));
- exit(1);
- }
- if (ofp)
- fclose(ofp);
-#endif
-#if defined(ENABLE_DEBIAN) && defined(DEBIAN)
- if (repo_add_debdb(repo, REPO_REUSE_REPODATA | REPO_NO_INTERNALIZE | REPO_USE_ROOTDIR))
- {
- fprintf(stderr, "installed db: %s\n", pool_errstr(pool));
- exit(1);
- }
-#endif
- repo_internalize(repo);
- writecachedrepo(repo, 0, 0, installedcookie);
- }
- pool_set_installed(pool, repo);
-
- for (i = 0; i < nrepoinfos; i++)
- {
- cinfo = repoinfos + i;
- if (!cinfo->enabled)
- continue;
-
- repo = repo_create(pool, cinfo->alias);
- cinfo->repo = repo;
- repo->appdata = cinfo;
- repo->priority = 99 - cinfo->priority;
-
- dorefresh = cinfo->autorefresh;
- if (dorefresh && cinfo->metadata_expire && stat(calccachepath(repo, 0, 0), &stb) == 0)
- {
- if (cinfo->metadata_expire == -1 || time(0) - stb.st_mtime < cinfo->metadata_expire)
- dorefresh = 0;
- }
- if (!dorefresh && usecachedrepo(repo, 0, 0, 0))
- {
- printf("repo '%s':", cinfo->alias);
- printf(" cached\n");
- continue;
- }
- switch (cinfo->type)
- {
-#ifdef ENABLE_RPMMD
- case TYPE_RPMMD:
- printf("rpmmd repo '%s':", cinfo->alias);
- fflush(stdout);
- if ((fp = curlfopen(cinfo, "repodata/repomd.xml", 0, 0, 0, 0)) == 0)
- {
- printf(" no repomd.xml file, skipped\n");
- repo_free(repo, 1);
- cinfo->repo = 0;
- break;
- }
- calc_checksum_fp(fp, REPOKEY_TYPE_SHA256, cinfo->cookie);
- if (usecachedrepo(repo, 0, cinfo->cookie, 1))
- {
- printf(" cached\n");
- fclose(fp);
- break;
- }
- if (cinfo->repo_gpgcheck && !downloadchecksig(cinfo, fp, "repodata/repomd.xml.asc", &sigpool))
- {
- fclose(fp);
- break;
- }
- if (repo_add_repomdxml(repo, fp, 0))
- {
- printf("repomd.xml: %s\n", pool_errstr(pool));
- fclose(fp);
- break; /* hopeless */
- }
- fclose(fp);
- printf(" fetching\n");
- filename = repomd_find(repo, "primary", &filechksum, &filechksumtype);
- if (filename && (fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, 1)) != 0)
- {
- if (repo_add_rpmmd(repo, fp, 0, 0))
- {
- printf("primary: %s\n", pool_errstr(pool));
- cinfo->incomplete = 1;
- }
- fclose(fp);
- }
- if (cinfo->incomplete)
- break; /* hopeless */
-
- filename = repomd_find(repo, "updateinfo", &filechksum, &filechksumtype);
- if (filename && (fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, 1)) != 0)
- {
- if (repo_add_updateinfoxml(repo, fp, 0))
- {
- printf("updateinfo: %s\n", pool_errstr(pool));
- cinfo->incomplete = 1;
- }
- fclose(fp);
- }
-
-#ifdef ENABLE_APPDATA
- filename = repomd_find(repo, "appdata", &filechksum, &filechksumtype);
- if (filename && (fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, 1)) != 0)
- {
- if (repo_add_appdata(repo, fp, 0))
- {
- printf("appdata: %s\n", pool_errstr(pool));
- cinfo->incomplete = 1;
- }
- fclose(fp);
- }
-#endif
- data = repo_add_repodata(repo, 0);
- if (!repomd_add_ext(repo, data, "deltainfo"))
- repomd_add_ext(repo, data, "prestodelta");
- repomd_add_ext(repo, data, "filelists");
- repodata_internalize(data);
- if (!cinfo->incomplete)
- writecachedrepo(repo, 0, 0, cinfo->cookie);
- repodata_create_stubs(repo_last_repodata(repo));
- break;
-#endif
-
-#ifdef ENABLE_SUSEREPO
- case TYPE_SUSETAGS:
- printf("susetags repo '%s':", cinfo->alias);
- fflush(stdout);
- descrdir = 0;
- defvendor = 0;
- if ((fp = curlfopen(cinfo, "content", 0, 0, 0, 0)) == 0)
- {
- printf(" no content file, skipped\n");
- repo_free(repo, 1);
- cinfo->repo = 0;
- break;
- }
- calc_checksum_fp(fp, REPOKEY_TYPE_SHA256, cinfo->cookie);
- if (usecachedrepo(repo, 0, cinfo->cookie, 1))
- {
- printf(" cached\n");
- fclose(fp);
- break;
- }
- if (cinfo->repo_gpgcheck && !downloadchecksig(cinfo, fp, "content.asc", &sigpool))
- {
- fclose(fp);
- break;
- }
- if (repo_add_content(repo, fp, 0))
- {
- printf("content: %s\n", pool_errstr(pool));
- fclose(fp);
- break; /* hopeless */
- }
- fclose(fp);
- defvendor = repo_lookup_id(repo, SOLVID_META, SUSETAGS_DEFAULTVENDOR);
- descrdir = repo_lookup_str(repo, SOLVID_META, SUSETAGS_DESCRDIR);
- if (!descrdir)
- descrdir = "suse/setup/descr";
- filename = susetags_find(repo, "packages.gz", &filechksum, &filechksumtype);
- if (!filename)
- filename = susetags_find(repo, "packages", &filechksum, &filechksumtype);
- if (!filename)
- {
- printf(" no packages file entry, skipped\n");
- break;
- }
- printf(" fetching\n");
- if ((fp = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, 1)) == 0)
- break; /* hopeless */
- if (repo_add_susetags(repo, fp, defvendor, 0, REPO_NO_INTERNALIZE|SUSETAGS_RECORD_SHARES))
- {
- printf("packages: %s\n", pool_errstr(pool));
- fclose(fp);
- cinfo->incomplete = 1;
- break; /* hopeless */
- }
- fclose(fp);
- /* add default language */
- filename = susetags_find(repo, "packages.en.gz", &filechksum, &filechksumtype);
- if (!filename)
- filename = susetags_find(repo, "packages.en", &filechksum, &filechksumtype);
- if (filename)
- {
- if ((fp = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, 1)) != 0)
- {
- if (repo_add_susetags(repo, fp, defvendor, 0, REPO_NO_INTERNALIZE|REPO_REUSE_REPODATA|REPO_EXTEND_SOLVABLES))
- {
- printf("packages.en: %s\n", pool_errstr(pool));
- cinfo->incomplete = 1;
- }
- fclose(fp);
- }
- }
- filename = susetags_find(repo, "patterns", &filechksum, &filechksumtype);
- if (filename)
- {
- if ((fp = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, 1)) != 0)
- {
- char pbuf[256];
- while (fgets(pbuf, sizeof(pbuf), fp))
- {
- int l = strlen(pbuf);
- FILE *fp2;
- if (l && pbuf[l - 1] == '\n')
- pbuf[--l] = 0;
- if (!*pbuf || *pbuf == '.' || strchr(pbuf, '/') != 0)
- continue;
- filename = susetags_find(repo, pbuf, &filechksum, &filechksumtype);
- if (filename && (fp2 = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, 1)) != 0)
- {
- if (repo_add_susetags(repo, fp2, defvendor, 0, REPO_NO_INTERNALIZE))
- {
- printf("%s: %s\n", pbuf, pool_errstr(pool));
- cinfo->incomplete = 1;
- }
- fclose(fp2);
- }
- }
- fclose(fp);
- }
- }
-#ifdef ENABLE_APPDATA
- filename = susetags_find(repo, "appdata.xml.gz", &filechksum, &filechksumtype);
- if (!filename)
- filename = susetags_find(repo, "appdata.xml", &filechksum, &filechksumtype);
- if (filename && (fp = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, 1)) != 0)
- {
- if (repo_add_appdata(repo, fp, 0))
- {
- printf("appdata: %s\n", pool_errstr(pool));
- cinfo->incomplete = 1;
- }
- fclose(fp);
- }
-#endif
- repo_internalize(repo);
- data = repo_add_repodata(repo, 0);
- susetags_add_ext(repo, data);
- repodata_internalize(data);
- if (!cinfo->incomplete)
- writecachedrepo(repo, 0, 0, cinfo->cookie);
- repodata_create_stubs(repo_last_repodata(repo));
- break;
-#endif
-
-#if defined(ENABLE_DEBIAN)
- case TYPE_DEBIAN:
- printf("debian repo '%s':", cinfo->alias);
- fflush(stdout);
- filename = solv_dupjoin("dists/", cinfo->name, "/Release");
- if ((fpr = curlfopen(cinfo, filename, 0, 0, 0, 0)) == 0)
- {
- printf(" no Release file, skipped\n");
- repo_free(repo, 1);
- cinfo->repo = 0;
- free((char *)filename);
- break;
- }
- solv_free((char *)filename);
- if (cinfo->repo_gpgcheck)
- {
- filename = solv_dupjoin("dists/", cinfo->name, "/Release.gpg");
- if (!downloadchecksig(cinfo, fpr, filename, &sigpool))
- {
- fclose(fpr);
- solv_free((char *)filename);
- break;
- }
- solv_free((char *)filename);
- }
- calc_checksum_fp(fpr, REPOKEY_TYPE_SHA256, cinfo->cookie);
- if (usecachedrepo(repo, 0, cinfo->cookie, 1))
- {
- printf(" cached\n");
- fclose(fpr);
- break;
- }
- printf(" fetching\n");
- for (j = 0; j < cinfo->ncomponents; j++)
- {
- if (!(filename = debian_find_component(cinfo, fpr, cinfo->components[j], &filechksum, &filechksumtype)))
- {
- printf("[component %s not found]\n", cinfo->components[j]);
- continue;
- }
- if ((fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, 1)) != 0)
- {
- if (repo_add_debpackages(repo, fp, 0))
- {
- printf("component %s: %s\n", cinfo->components[j], pool_errstr(pool));
- cinfo->incomplete = 1;
- }
- fclose(fp);
- }
- solv_free((char *)filechksum);
- solv_free((char *)filename);
- }
- fclose(fpr);
- if (!cinfo->incomplete)
- writecachedrepo(repo, 0, 0, cinfo->cookie);
- break;
-#endif
-
- default:
- printf("unsupported repo '%s': skipped\n", cinfo->alias);
- repo_free(repo, 1);
- cinfo->repo = 0;
- break;
- }
- }
- if (sigpool)
- pool_free(sigpool);
-}
-
-int
-yesno(const char *str)
-{
- char inbuf[128], *ip;
-
- for (;;)
- {
- printf("%s", str);
- fflush(stdout);
- *inbuf = 0;
- if (!(ip = fgets(inbuf, sizeof(inbuf), stdin)))
- {
- printf("Abort.\n");
- exit(1);
- }
- while (*ip == ' ' || *ip == '\t')
- ip++;
- if (*ip == 'q')
- {
- printf("Abort.\n");
- exit(1);
- }
- if (*ip == 'y' || *ip == 'n')
- return *ip == 'y' ? 1 : 0;
- }
-}
-
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
-
-struct fcstate {
- FILE **newpkgsfps;
- Queue *checkq;
- int newpkgscnt;
- void *rpmstate;
-};
-
-static void *
-fileconflict_cb(Pool *pool, Id p, void *cbdata)
-{
- struct fcstate *fcstate = cbdata;
- Solvable *s;
- Id rpmdbid;
- int i;
- FILE *fp;
-
- s = pool_id2solvable(pool, p);
- if (pool->installed && s->repo == pool->installed)
- {
- if (!s->repo->rpmdbid)
- return 0;
- rpmdbid = s->repo->rpmdbid[p - s->repo->start];
- if (!rpmdbid)
- return 0;
- return rpm_byrpmdbid(fcstate->rpmstate, rpmdbid);
- }
- for (i = 0; i < fcstate->newpkgscnt; i++)
- if (fcstate->checkq->elements[i] == p)
- break;
- if (i == fcstate->newpkgscnt)
- return 0;
- fp = fcstate->newpkgsfps[i];
- if (!fp)
- return 0;
- rewind(fp);
- return rpm_byfp(fcstate->rpmstate, fp, pool_solvable2str(pool, s));
-}
-
-
-void
-runrpm(const char *arg, const char *name, int dupfd3, const char *rootdir)
-{
- pid_t pid;
- int status;
-
- if ((pid = fork()) == (pid_t)-1)
- {
- perror("fork");
- exit(1);
- }
- if (pid == 0)
- {
- if (!rootdir)
- rootdir = "/";
- if (dupfd3 != -1 && dupfd3 != 3)
- {
- dup2(dupfd3, 3);
- close(dupfd3);
- }
- if (dupfd3 != -1)
- fcntl(3, F_SETFD, 0); /* clear CLOEXEC */
- if (strcmp(arg, "-e") == 0)
- execlp("rpm", "rpm", arg, "--nodeps", "--nodigest", "--nosignature", "--root", rootdir, name, (char *)0);
- else
- execlp("rpm", "rpm", arg, "--force", "--nodeps", "--nodigest", "--nosignature", "--root", rootdir, name, (char *)0);
- perror("rpm");
- _exit(0);
- }
- while (waitpid(pid, &status, 0) != pid)
- ;
- if (status)
- {
- printf("rpm failed\n");
- exit(1);
- }
-}
-
-#endif
-
-#if defined(ENABLE_DEBIAN) && defined(DEBIAN)
-
-void
-rundpkg(const char *arg, const char *name, int dupfd3, const char *rootdir)
-{
- pid_t pid;
- int status;
-
- if ((pid = fork()) == (pid_t)-1)
- {
- perror("fork");
- exit(1);
- }
- if (pid == 0)
- {
- if (!rootdir)
- rootdir = "/";
- if (dupfd3 != -1 && dupfd3 != 3)
- {
- dup2(dupfd3, 3);
- close(dupfd3);
- }
- if (dupfd3 != -1)
- fcntl(3, F_SETFD, 0); /* clear CLOEXEC */
- if (strcmp(arg, "--install") == 0)
- execlp("dpkg", "dpkg", "--install", "--root", rootdir, "--force", "all", name, (char *)0);
- else
- execlp("dpkg", "dpkg", "--remove", "--root", rootdir, "--force", "all", name, (char *)0);
- perror("dpkg");
- _exit(0);
- }
- while (waitpid(pid, &status, 0) != pid)
- ;
- if (status)
- {
- printf("dpkg failed\n");
- exit(1);
- }
-}
-
-#endif
-
-#ifdef SUSE
-static Id
-nscallback(Pool *pool, void *data, Id name, Id evr)
-{
-#if 0
- if (name == NAMESPACE_LANGUAGE)
- {
- if (!strcmp(pool_id2str(pool, evr), "ja"))
- return 1;
- if (!strcmp(pool_id2str(pool, evr), "de"))
- return 1;
- if (!strcmp(pool_id2str(pool, evr), "en"))
- return 1;
- if (!strcmp(pool_id2str(pool, evr), "en_US"))
- return 1;
- }
-#endif
- return 0;
-}
-#endif
-
-#ifdef SOFTLOCKS_PATH
-void
-addsoftlocks(Pool *pool, Queue *job)
-{
- FILE *fp;
- Id type, id, p, pp;
- char *bp, *ep, buf[4096];
-
- if ((fp = fopen(SOFTLOCKS_PATH, "r")) == 0)
- return;
- while((bp = fgets(buf, sizeof(buf), fp)) != 0)
- {
- while (*bp == ' ' || *bp == '\t')
- bp++;
- if (!*bp || *bp == '#')
- continue;
- for (ep = bp; *ep; ep++)
- if (*ep == ' ' || *ep == '\t' || *ep == '\n')
- break;
- *ep = 0;
- type = SOLVER_SOLVABLE_NAME;
- if (!strncmp(bp, "provides:", 9) && bp[9])
- {
- type = SOLVER_SOLVABLE_PROVIDES;
- bp += 9;
- }
- id = pool_str2id(pool, bp, 1);
- if (pool->installed)
- {
- FOR_JOB_SELECT(p, pp, type, id)
- if (pool->solvables[p].repo == pool->installed)
- break;
- if (p)
- continue; /* ignore, as it is already installed */
- }
- queue_push2(job, SOLVER_LOCK|SOLVER_WEAK|type, id);
- }
- fclose(fp);
-}
-#endif
-
-
-#if defined(ENABLE_RPMDB)
-
-static void
-rewrite_repos(Pool *pool, Queue *addedfileprovides, Queue *addedfileprovides_inst)
-{
- Repo *repo;
- Repodata *data;
- Map providedids;
- Queue fileprovidesq;
- int i, j, n;
- struct repoinfo *cinfo;
-
- map_init(&providedids, pool->ss.nstrings);
- queue_init(&fileprovidesq);
- for (i = 0; i < addedfileprovides->count; i++)
- MAPSET(&providedids, addedfileprovides->elements[i]);
- FOR_REPOS(i, repo)
- {
- /* make sure all repodatas but the first are extensions */
- if (repo->nrepodata < 2)
- continue;
- cinfo = repo->appdata;
- if (repo != pool->installed && !cinfo)
- continue;
- if (cinfo && cinfo->incomplete)
- continue;
- data = repo_id2repodata(repo, 1);
- if (data->loadcallback)
- continue;
- for (j = 2; j < repo->nrepodata; j++)
- {
- Repodata *edata = repo_id2repodata(repo, j);
- if (!edata->loadcallback)
- break;
- }
- if (j < repo->nrepodata)
- continue; /* found a non-externsion repodata, can't rewrite */
- if (repodata_lookup_idarray(data, SOLVID_META, REPOSITORY_ADDEDFILEPROVIDES, &fileprovidesq))
- {
- if (repo == pool->installed && addedfileprovides_inst)
- {
- for (j = 0; j < addedfileprovides->count; j++)
- MAPCLR(&providedids, addedfileprovides->elements[j]);
- for (j = 0; j < addedfileprovides_inst->count; j++)
- MAPSET(&providedids, addedfileprovides_inst->elements[j]);
- }
- n = 0;
- for (j = 0; j < fileprovidesq.count; j++)
- if (MAPTST(&providedids, fileprovidesq.elements[j]))
- n++;
- if (repo == pool->installed && addedfileprovides_inst)
- {
- for (j = 0; j < addedfileprovides_inst->count; j++)
- MAPCLR(&providedids, addedfileprovides_inst->elements[j]);
- for (j = 0; j < addedfileprovides->count; j++)
- MAPSET(&providedids, addedfileprovides->elements[j]);
- if (n == addedfileprovides_inst->count)
- continue; /* nothing new added */
- }
- else if (n == addedfileprovides->count)
- continue; /* nothing new added */
- }
- repodata_set_idarray(data, SOLVID_META, REPOSITORY_ADDEDFILEPROVIDES, repo == pool->installed && addedfileprovides_inst ? addedfileprovides_inst : addedfileprovides);
- repodata_internalize(data);
- writecachedrepo(repo, data, 0, cinfo ? cinfo->cookie : installedcookie);
- }
- queue_free(&fileprovidesq);
- map_free(&providedids);
-}
-
-static void
-addfileprovides(Pool *pool)
-{
- Queue addedfileprovides;
- Queue addedfileprovides_inst;
-
- queue_init(&addedfileprovides);
- queue_init(&addedfileprovides_inst);
- pool_addfileprovides_queue(pool, &addedfileprovides, &addedfileprovides_inst);
- if (addedfileprovides.count || addedfileprovides_inst.count)
- rewrite_repos(pool, &addedfileprovides, &addedfileprovides_inst);
- queue_free(&addedfileprovides);
- queue_free(&addedfileprovides_inst);
-}
-
-#endif
-
-#ifdef SUSE
-static void
-add_autopackages(Pool *pool)
-{
- int i;
- Repo *repo;
- FOR_REPOS(i, repo)
- repo_add_autopattern(repo, 0);
-}
-#endif
-
-#if defined(SUSE) || defined(FEDORA)
-static void
-add_patchjobs(Pool *pool, Queue *job)
-{
- Id p, pp;
- int pruneyou = 0;
- Map installedmap, multiversionmap;
- Solvable *s;
-
- map_init(&multiversionmap, 0);
- map_init(&installedmap, pool->nsolvables);
- solver_calculate_multiversionmap(pool, job, &multiversionmap);
- if (pool->installed)
- FOR_REPO_SOLVABLES(pool->installed, p, s)
- MAPSET(&installedmap, p);
-
- /* install all patches */
- for (p = 1; p < pool->nsolvables; p++)
- {
- const char *type;
- int r;
- Id p2;
-
- s = pool->solvables + p;
- if (strncmp(pool_id2str(pool, s->name), "patch:", 6) != 0)
- continue;
- FOR_PROVIDES(p2, pp, s->name)
- {
- Solvable *s2 = pool->solvables + p2;
- if (s2->name != s->name)
- continue;
- r = pool_evrcmp(pool, s->evr, s2->evr, EVRCMP_COMPARE);
- if (r < 0 || (r == 0 && p > p2))
- break;
- }
- if (p2)
- continue;
- type = solvable_lookup_str(s, SOLVABLE_PATCHCATEGORY);
- if (type && !strcmp(type, "optional"))
- continue;
- r = solvable_trivial_installable_map(s, &installedmap, 0, &multiversionmap);
- if (r == -1)
- continue;
- if (solvable_lookup_bool(s, UPDATE_RESTART) && r == 0)
- {
- if (!pruneyou++)
- queue_empty(job);
- }
- else if (pruneyou)
- continue;
- queue_push2(job, SOLVER_SOLVABLE, p);
- }
- map_free(&installedmap);
- map_free(&multiversionmap);
-}
-#endif
-
-#ifdef SUSE
-static void
-showdiskusagechanges(Transaction *trans)
-{
- DUChanges duc[4];
- int i;
-
- /* XXX: use mountpoints here */
- memset(duc, 0, sizeof(duc));
- duc[0].path = "/";
- duc[1].path = "/usr/share/man";
- duc[2].path = "/sbin";
- duc[3].path = "/etc";
- transaction_calc_duchanges(trans, duc, 4);
- for (i = 0; i < 4; i++)
- printf("duchanges %s: %d K %d inodes\n", duc[i].path, duc[i].kbytes, duc[i].files);
-}
-#endif
-
-#if defined(ENABLE_RPMDB)
-static FILE *
-trydeltadownload(Solvable *s, struct repoinfo *cinfo, const char *loc)
-{
- Pool *pool = s->repo->pool;
- Dataiterator di;
- Id pp;
- const unsigned char *chksum;
- Id chksumtype;
- FILE *retfp = 0;
- char *matchname = strdup(pool_id2str(pool, s->name));
-
- dataiterator_init(&di, pool, s->repo, SOLVID_META, DELTA_PACKAGE_NAME, matchname, SEARCH_STRING);
- dataiterator_prepend_keyname(&di, REPOSITORY_DELTAINFO);
- while (dataiterator_step(&di))
- {
- Id baseevr, op;
-
- dataiterator_setpos_parent(&di);
- if (pool_lookup_id(pool, SOLVID_POS, DELTA_PACKAGE_EVR) != s->evr ||
- pool_lookup_id(pool, SOLVID_POS, DELTA_PACKAGE_ARCH) != s->arch)
- continue;
- baseevr = pool_lookup_id(pool, SOLVID_POS, DELTA_BASE_EVR);
- FOR_PROVIDES(op, pp, s->name)
- {
- Solvable *os = pool->solvables + op;
- if (os->repo == pool->installed && os->name == s->name && os->arch == s->arch && os->evr == baseevr)
- break;
- }
- if (op && access("/usr/bin/applydeltarpm", X_OK) == 0)
- {
- /* base is installed, run sequence check */
- const char *seq;
- const char *dloc;
- const char *archstr;
- FILE *fp;
- char cmd[128];
- int newfd;
-
- archstr = pool_id2str(pool, s->arch);
- if (strlen(archstr) > 10 || strchr(archstr, '\'') != 0)
- continue;
-
- seq = pool_tmpjoin(pool, pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NAME), "-", pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_EVR));
- seq = pool_tmpappend(pool, seq, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NUM));
- if (strchr(seq, '\'') != 0)
- continue;
-#ifdef FEDORA
- sprintf(cmd, "/usr/bin/applydeltarpm -a '%s' -c -s '", archstr);
-#else
- sprintf(cmd, "/usr/bin/applydeltarpm -c -s '");
-#endif
- if (system(pool_tmpjoin(pool, cmd, seq, "'")) != 0)
- continue; /* didn't match */
- /* looks good, download delta */
- chksumtype = 0;
- chksum = pool_lookup_bin_checksum(pool, SOLVID_POS, DELTA_CHECKSUM, &chksumtype);
- if (!chksumtype)
- continue; /* no way! */
- dloc = pool_lookup_deltalocation(pool, SOLVID_POS, 0);
- if (!dloc)
- continue;
-#ifdef ENABLE_SUSEREPO
- if (cinfo->type == TYPE_SUSETAGS)
- {
- const char *datadir = repo_lookup_str(cinfo->repo, SOLVID_META, SUSETAGS_DATADIR);
- dloc = pool_tmpjoin(pool, datadir ? datadir : "suse", "/", dloc);
- }
-#endif
- if ((fp = curlfopen(cinfo, dloc, 0, chksum, chksumtype, 0)) == 0)
- continue;
- /* got it, now reconstruct */
- newfd = opentmpfile();
-#ifdef FEDORA
- sprintf(cmd, "applydeltarpm -a '%s' /dev/fd/%d /dev/fd/%d", archstr, fileno(fp), newfd);
-#else
- sprintf(cmd, "applydeltarpm /dev/fd/%d /dev/fd/%d", fileno(fp), newfd);
-#endif
- fcntl(fileno(fp), F_SETFD, 0);
- if (system(cmd))
- {
- close(newfd);
- fclose(fp);
- continue;
- }
- lseek(newfd, 0, SEEK_SET);
- chksumtype = 0;
- chksum = solvable_lookup_bin_checksum(s, SOLVABLE_CHECKSUM, &chksumtype);
- if (chksumtype && !verify_checksum(newfd, loc, chksum, chksumtype))
- {
- close(newfd);
- fclose(fp);
- continue;
- }
- retfp = fdopen(newfd, "r");
- fclose(fp);
- break;
- }
- }
- dataiterator_free(&di);
- solv_free(matchname);
- return retfp;
-}
-#endif
-
-
-#define MODE_LIST 0
-#define MODE_INSTALL 1
-#define MODE_ERASE 2
-#define MODE_UPDATE 3
-#define MODE_DISTUPGRADE 4
-#define MODE_VERIFY 5
-#define MODE_PATCH 6
-#define MODE_INFO 7
-#define MODE_REPOLIST 8
-#define MODE_SEARCH 9
-
-void
-usage(int r)
-{
- fprintf(stderr, "Usage: solv COMMAND <select>\n");
- fprintf(stderr, "\n");
- fprintf(stderr, " dist-upgrade: replace installed packages with\n");
- fprintf(stderr, " versions from the repositories\n");
- fprintf(stderr, " erase: erase installed packages\n");
- fprintf(stderr, " info: display package information\n");
- fprintf(stderr, " install: install packages\n");
- fprintf(stderr, " list: list packages\n");
- fprintf(stderr, " repos: list enabled repositories\n");
- fprintf(stderr, " search: search name/summary/description\n");
- fprintf(stderr, " update: update installed packages\n");
- fprintf(stderr, " verify: check dependencies of installed packages\n");
-#if defined(SUSE) || defined(FEDORA)
- fprintf(stderr, " patch: install newest patches\n");
-#endif
- fprintf(stderr, "\n");
- exit(r);
-}
-
-int
-main(int argc, char **argv)
-{
- Pool *pool;
- Repo *commandlinerepo = 0;
- Id *commandlinepkgs = 0;
- Id p;
- struct repoinfo *repoinfos;
- int nrepoinfos = 0;
- int mainmode = 0, mode = 0;
- int i, newpkgs;
- Queue job, checkq;
- Solver *solv = 0;
- Transaction *trans;
- FILE **newpkgsfps;
- Queue repofilter;
- Queue kindfilter;
- Queue archfilter;
- int archfilter_src = 0;
- int cleandeps = 0;
- int forcebest = 0;
- char *rootdir = 0;
- char *keyname = 0;
- int debuglevel = 0;
-
- argc--;
- argv++;
- userhome = getenv("HOME");
- if (userhome && userhome[0] != '/')
- userhome = 0;
- while (argc && !strcmp(argv[0], "-d"))
- {
- debuglevel++;
- argc--;
- argv++;
- }
- if (!argv[0])
- usage(1);
- if (!strcmp(argv[0], "install") || !strcmp(argv[0], "in"))
- {
- mainmode = MODE_INSTALL;
- mode = SOLVER_INSTALL;
- }
-#if defined(SUSE) || defined(FEDORA)
- else if (!strcmp(argv[0], "patch"))
- {
- mainmode = MODE_PATCH;
- mode = SOLVER_INSTALL;
- }
-#endif
- else if (!strcmp(argv[0], "erase") || !strcmp(argv[0], "rm"))
- {
- mainmode = MODE_ERASE;
- mode = SOLVER_ERASE;
- }
- else if (!strcmp(argv[0], "list") || !strcmp(argv[0], "ls"))
- {
- mainmode = MODE_LIST;
- mode = 0;
- }
- else if (!strcmp(argv[0], "info"))
- {
- mainmode = MODE_INFO;
- mode = 0;
- }
- else if (!strcmp(argv[0], "search") || !strcmp(argv[0], "se"))
- {
- mainmode = MODE_SEARCH;
- mode = 0;
- }
- else if (!strcmp(argv[0], "verify"))
- {
- mainmode = MODE_VERIFY;
- mode = SOLVER_VERIFY;
- }
- else if (!strcmp(argv[0], "update") || !strcmp(argv[0], "up"))
- {
- mainmode = MODE_UPDATE;
- mode = SOLVER_UPDATE;
- }
- else if (!strcmp(argv[0], "dist-upgrade") || !strcmp(argv[0], "dup"))
- {
- mainmode = MODE_DISTUPGRADE;
- mode = SOLVER_DISTUPGRADE;
- }
- else if (!strcmp(argv[0], "repos") || !strcmp(argv[0], "repolist") || !strcmp(argv[0], "lr"))
- {
- mainmode = MODE_REPOLIST;
- mode = 0;
- }
- else
- usage(1);
-
- for (;;)
- {
- if (argc > 2 && !strcmp(argv[1], "--root"))
- {
- rootdir = argv[2];
- argc -= 2;
- argv += 2;
- }
- else if (argc > 1 && !strcmp(argv[1], "--clean"))
- {
- cleandeps = 1;
- argc--;
- argv++;
- }
- else if (argc > 1 && !strcmp(argv[1], "--best"))
- {
- forcebest = 1;
- argc--;
- argv++;
- }
- if (argc > 2 && !strcmp(argv[1], "--keyname"))
- {
- keyname = argv[2];
- argc -= 2;
- argv += 2;
- }
- else
- break;
- }
-
- pool = pool_create();
- pool_set_rootdir(pool, rootdir);
-
-#if 0
- {
- const char *langs[] = {"de_DE", "de", "en"};
- pool_set_languages(pool, langs, sizeof(langs)/sizeof(*langs));
- }
-#endif
-
- pool_setloadcallback(pool, load_stub, 0);
-#ifdef SUSE
- pool->nscallback = nscallback;
-#endif
- if (debuglevel)
- pool_setdebuglevel(pool, debuglevel);
- setarch(pool);
- pool_set_flag(pool, POOL_FLAG_ADDFILEPROVIDESFILTERED, 1);
- repoinfos = read_repoinfos(pool, &nrepoinfos);
-
- if (mainmode == MODE_REPOLIST)
- {
- int j = 1;
- for (i = 0; i < nrepoinfos; i++)
- {
- struct repoinfo *cinfo = repoinfos + i;
- if (!cinfo->enabled)
- continue;
- printf("%d: %-20s %s (prio %d)\n", j++, cinfo->alias, cinfo->name, cinfo->priority);
- }
- exit(0);
- }
-
- read_repos(pool, repoinfos, nrepoinfos);
-
- /* setup filters */
- queue_init(&repofilter);
- queue_init(&kindfilter);
- queue_init(&archfilter);
- while (argc > 1)
- {
- if (!strcmp(argv[1], "-i"))
- {
- queue_push2(&repofilter, SOLVER_SOLVABLE_REPO | SOLVER_SETREPO, pool->installed->repoid);
- argc--;
- argv++;
- }
- else if (argc > 2 && (!strcmp(argv[1], "-r") || !strcmp(argv[1], "--repo")))
- {
- const char *rname = argv[2], *rp;
- Id repoid = 0;
- for (rp = rname; *rp; rp++)
- if (*rp <= '0' || *rp >= '9')
- break;
- if (!*rp)
- {
- /* repo specified by number */
- int rnum = atoi(rname);
- for (i = 0; i < nrepoinfos; i++)
- {
- struct repoinfo *cinfo = repoinfos + i;
- if (!cinfo->enabled)
- continue;
- if (--rnum == 0)
- repoid = cinfo->repo->repoid;
- }
- }
- else
- {
- /* repo specified by alias */
- Repo *repo;
- FOR_REPOS(i, repo)
- {
- if (!strcasecmp(rname, repo->name))
- repoid = repo->repoid;
- }
- }
- if (!repoid)
- {
- fprintf(stderr, "%s: no such repo\n", rname);
- exit(1);
- }
- /* SETVENDOR is actually wrong but useful */
- queue_push2(&repofilter, SOLVER_SOLVABLE_REPO | SOLVER_SETREPO | SOLVER_SETVENDOR, repoid);
- argc -= 2;
- argv += 2;
- }
- else if (argc > 2 && !strcmp(argv[1], "--arch"))
- {
- if (!strcmp(argv[2], "src") || !strcmp(argv[2], "nosrc"))
- archfilter_src = 1;
- queue_push2(&archfilter, SOLVER_SOLVABLE_PROVIDES, pool_rel2id(pool, 0, pool_str2id(pool, argv[2], 1), REL_ARCH, 1));
- argc -= 2;
- argv += 2;
- }
- else if (argc > 2 && (!strcmp(argv[1], "-t") || !strcmp(argv[1], "--type")))
- {
- const char *kind = argv[2];
- if (!strcmp(kind, "srcpackage"))
- {
- /* hey! should use --arch! */
- queue_push2(&archfilter, SOLVER_SOLVABLE_PROVIDES, pool_rel2id(pool, 0, ARCH_SRC, REL_ARCH, 1));
- archfilter_src = 1;
- argc -= 2;
- argv += 2;
- continue;
- }
- if (!strcmp(kind, "package"))
- kind = "";
- if (!strcmp(kind, "all"))
- queue_push2(&kindfilter, SOLVER_SOLVABLE_ALL, 0);
- else
- queue_push2(&kindfilter, SOLVER_SOLVABLE_PROVIDES, pool_rel2id(pool, 0, pool_str2id(pool, kind, 1), REL_KIND, 1));
- argc -= 2;
- argv += 2;
- }
- else
- break;
- }
-
- if (mainmode == MODE_SEARCH)
- {
- Queue sel, q;
- Dataiterator di;
- if (argc != 2)
- usage(1);
- pool_createwhatprovides(pool);
- queue_init(&sel);
- dataiterator_init(&di, pool, 0, 0, 0, argv[1], SEARCH_SUBSTRING|SEARCH_NOCASE);
- dataiterator_set_keyname(&di, SOLVABLE_NAME);
- dataiterator_set_search(&di, 0, 0);
- while (dataiterator_step(&di))
- queue_push2(&sel, SOLVER_SOLVABLE, di.solvid);
- dataiterator_set_keyname(&di, SOLVABLE_SUMMARY);
- dataiterator_set_search(&di, 0, 0);
- while (dataiterator_step(&di))
- queue_push2(&sel, SOLVER_SOLVABLE, di.solvid);
- dataiterator_set_keyname(&di, SOLVABLE_DESCRIPTION);
- dataiterator_set_search(&di, 0, 0);
- while (dataiterator_step(&di))
- queue_push2(&sel, SOLVER_SOLVABLE, di.solvid);
- dataiterator_free(&di);
- if (repofilter.count)
- selection_filter(pool, &sel, &repofilter);
-
- queue_init(&q);
- selection_solvables(pool, &sel, &q);
- queue_free(&sel);
- for (i = 0; i < q.count; i++)
- {
- Solvable *s = pool_id2solvable(pool, q.elements[i]);
- printf(" - %s [%s]: %s\n", pool_solvable2str(pool, s), s->repo->name, solvable_lookup_str(s, SOLVABLE_SUMMARY));
- }
- queue_free(&q);
- exit(0);
- }
-
- /* process command line packages */
- if (mainmode == MODE_LIST || mainmode == MODE_INFO || mainmode == MODE_INSTALL)
- {
- for (i = 1; i < argc; i++)
- {
- int l;
- l = strlen(argv[i]);
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
- if (l <= 4 || strcmp(argv[i] + l - 4, ".rpm"))
- continue;
-#endif
-#if defined(ENABLE_DEBIAN) && defined(DEBIAN)
- if (l <= 4 || strcmp(argv[i] + l - 4, ".deb"))
- continue;
-#endif
- if (access(argv[i], R_OK))
- {
- perror(argv[i]);
- exit(1);
- }
- if (!commandlinepkgs)
- commandlinepkgs = solv_calloc(argc, sizeof(Id));
- if (!commandlinerepo)
- commandlinerepo = repo_create(pool, "@commandline");
- p = 0;
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
- p = repo_add_rpm(commandlinerepo, (const char *)argv[i], REPO_REUSE_REPODATA|REPO_NO_INTERNALIZE);
-#endif
-#if defined(ENABLE_DEBIAN) && defined(DEBIAN)
- p = repo_add_deb(commandlinerepo, (const char *)argv[i], REPO_REUSE_REPODATA|REPO_NO_INTERNALIZE);
-#endif
- if (!p)
- {
- fprintf(stderr, "could not add '%s'\n", argv[i]);
- exit(1);
- }
- commandlinepkgs[i] = p;
- }
- if (commandlinerepo)
- repo_internalize(commandlinerepo);
- }
-
- // FOR_REPOS(i, repo)
- // printf("%s: %d solvables\n", repo->name, repo->nsolvables);
-
-#if defined(ENABLE_RPMDB)
- if (pool->disttype == DISTTYPE_RPM)
- addfileprovides(pool);
-#endif
-#ifdef SUSE
- add_autopackages(pool);
-#endif
- pool_createwhatprovides(pool);
-
- if (keyname)
- keyname = solv_dupjoin("solvable:", keyname, 0);
- queue_init(&job);
- for (i = 1; i < argc; i++)
- {
- Queue job2;
- int j, flags, rflags;
-
- if (commandlinepkgs && commandlinepkgs[i])
- {
- queue_push2(&job, SOLVER_SOLVABLE, commandlinepkgs[i]);
- continue;
- }
- queue_init(&job2);
- flags = SELECTION_NAME|SELECTION_PROVIDES|SELECTION_GLOB;
- flags |= SELECTION_CANON|SELECTION_DOTARCH|SELECTION_REL;
- if (kindfilter.count)
- flags |= SELECTION_SKIP_KIND;
- if (mode == MODE_LIST || archfilter_src)
- flags |= SELECTION_WITH_SOURCE;
- if (argv[i][0] == '/')
- flags |= SELECTION_FILELIST | (mode == MODE_ERASE ? SELECTION_INSTALLED_ONLY : 0);
- if (!keyname)
- rflags = selection_make(pool, &job2, argv[i], flags);
- else
- rflags = selection_make_matchdeps(pool, &job2, argv[i], flags, pool_str2id(pool, keyname, 1), 0);
- if (repofilter.count)
- selection_filter(pool, &job2, &repofilter);
- if (archfilter.count)
- selection_filter(pool, &job2, &archfilter);
- if (kindfilter.count)
- selection_filter(pool, &job2, &kindfilter);
- if (!job2.count)
- {
- flags |= SELECTION_NOCASE;
- if (!keyname)
- rflags = selection_make(pool, &job2, argv[i], flags);
- else
- rflags = selection_make_matchdeps(pool, &job2, argv[i], flags, pool_str2id(pool, keyname, 1), 0);
- if (repofilter.count)
- selection_filter(pool, &job2, &repofilter);
- if (archfilter.count)
- selection_filter(pool, &job2, &archfilter);
- if (kindfilter.count)
- selection_filter(pool, &job2, &kindfilter);
- if (job2.count)
- printf("[ignoring case for '%s']\n", argv[i]);
- }
- if (!job2.count)
- {
- fprintf(stderr, "nothing matches '%s'\n", argv[i]);
- exit(1);
- }
- if (rflags & SELECTION_FILELIST)
- printf("[using file list match for '%s']\n", argv[i]);
- if (rflags & SELECTION_PROVIDES)
- printf("[using capability match for '%s']\n", argv[i]);
- for (j = 0; j < job2.count; j++)
- queue_push(&job, job2.elements[j]);
- queue_free(&job2);
- }
- keyname = solv_free(keyname);
-
- if (!job.count && (mainmode == MODE_UPDATE || mainmode == MODE_DISTUPGRADE || mainmode == MODE_VERIFY || repofilter.count || archfilter.count || kindfilter.count))
- {
- queue_push2(&job, SOLVER_SOLVABLE_ALL, 0);
- if (repofilter.count)
- selection_filter(pool, &job, &repofilter);
- if (archfilter.count)
- selection_filter(pool, &job, &archfilter);
- if (kindfilter.count)
- selection_filter(pool, &job, &kindfilter);
- }
- queue_free(&repofilter);
- queue_free(&archfilter);
- queue_free(&kindfilter);
-
- if (!job.count && mainmode != MODE_PATCH)
- {
- printf("no package matched\n");
- exit(1);
- }
-
- if (mainmode == MODE_LIST || mainmode == MODE_INFO)
- {
- /* list mode, no solver needed */
- Queue q;
- queue_init(&q);
- for (i = 0; i < job.count; i += 2)
- {
- int j;
- queue_empty(&q);
- pool_job2solvables(pool, &q, job.elements[i], job.elements[i + 1]);
- for (j = 0; j < q.count; j++)
- {
- Solvable *s = pool_id2solvable(pool, q.elements[j]);
- if (mainmode == MODE_INFO)
- {
- const char *str;
- printf("Name: %s\n", pool_solvable2str(pool, s));
- printf("Repo: %s\n", s->repo->name);
- printf("Summary: %s\n", solvable_lookup_str(s, SOLVABLE_SUMMARY));
- str = solvable_lookup_str(s, SOLVABLE_URL);
- if (str)
- printf("Url: %s\n", str);
- str = solvable_lookup_str(s, SOLVABLE_LICENSE);
- if (str)
- printf("License: %s\n", str);
-#if 0
- str = solvable_lookup_sourcepkg(s);
- if (str)
- printf("Source: %s\n", str);
-#endif
- printf("Description:\n%s\n", solvable_lookup_str(s, SOLVABLE_DESCRIPTION));
- printf("\n");
- }
- else
- {
-#if 1
- const char *sum = solvable_lookup_str_lang(s, SOLVABLE_SUMMARY, "de", 1);
-#else
- const char *sum = solvable_lookup_str_poollang(s, SOLVABLE_SUMMARY);
-#endif
- printf(" - %s [%s]\n", pool_solvable2str(pool, s), s->repo->name);
- if (sum)
- printf(" %s\n", sum);
- }
- }
- }
- queue_free(&q);
- queue_free(&job);
- pool_free(pool);
- free_repoinfos(repoinfos, nrepoinfos);
- solv_free(commandlinepkgs);
-#ifdef FEDORA
- yum_substitute(pool, 0);
-#endif
- exit(0);
- }
-
-#if defined(SUSE) || defined(FEDORA)
- if (mainmode == MODE_PATCH)
- add_patchjobs(pool, &job);
-#endif
-
- // add mode
- for (i = 0; i < job.count; i += 2)
- {
- job.elements[i] |= mode;
- if (mode == SOLVER_UPDATE && pool_isemptyupdatejob(pool, job.elements[i], job.elements[i + 1]))
- job.elements[i] ^= SOLVER_UPDATE ^ SOLVER_INSTALL;
- if (cleandeps)
- job.elements[i] |= SOLVER_CLEANDEPS;
- if (forcebest)
- job.elements[i] |= SOLVER_FORCEBEST;
- }
-
- // multiversion test
- // queue_push2(&job, SOLVER_MULTIVERSION|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae", 1));
- // queue_push2(&job, SOLVER_MULTIVERSION|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae-base", 1));
- // queue_push2(&job, SOLVER_MULTIVERSION|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae-extra", 1));
-#if 0
- queue_push2(&job, SOLVER_INSTALL|SOLVER_SOLVABLE_PROVIDES, pool_rel2id(pool, NAMESPACE_LANGUAGE, 0, REL_NAMESPACE, 1));
- queue_push2(&job, SOLVER_ERASE|SOLVER_CLEANDEPS|SOLVER_SOLVABLE_PROVIDES, pool_rel2id(pool, NAMESPACE_LANGUAGE, 0, REL_NAMESPACE, 1));
-#endif
-
-#ifdef SOFTLOCKS_PATH
- addsoftlocks(pool, &job);
-#endif
-
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
-rerunsolver:
-#endif
- solv = solver_create(pool);
- solver_set_flag(solv, SOLVER_FLAG_SPLITPROVIDES, 1);
-#ifdef FEDORA
- solver_set_flag(solv, SOLVER_FLAG_ALLOW_VENDORCHANGE, 1);
-#endif
- if (mainmode == MODE_ERASE)
- solver_set_flag(solv, SOLVER_FLAG_ALLOW_UNINSTALL, 1); /* don't nag */
- solver_set_flag(solv, SOLVER_FLAG_BEST_OBEY_POLICY, 1);
-
- for (;;)
- {
- Id problem, solution;
- int pcnt, scnt;
-
- if (!solver_solve(solv, &job))
- break;
- pcnt = solver_problem_count(solv);
- printf("Found %d problems:\n", pcnt);
- for (problem = 1; problem <= pcnt; problem++)
- {
- int take = 0;
- printf("Problem %d/%d:\n", problem, pcnt);
- solver_printprobleminfo(solv, problem);
- printf("\n");
- scnt = solver_solution_count(solv, problem);
- for (solution = 1; solution <= scnt; solution++)
- {
- printf("Solution %d:\n", solution);
- solver_printsolution(solv, problem, solution);
- printf("\n");
- }
- for (;;)
- {
- char inbuf[128], *ip;
- printf("Please choose a solution: ");
- fflush(stdout);
- *inbuf = 0;
- if (!(ip = fgets(inbuf, sizeof(inbuf), stdin)))
- {
- printf("Abort.\n");
- exit(1);
- }
- while (*ip == ' ' || *ip == '\t')
- ip++;
- if (*ip >= '0' && *ip <= '9')
- {
- take = atoi(ip);
- if (take >= 1 && take <= scnt)
- break;
- }
- if (*ip == 's')
- {
- take = 0;
- break;
- }
- if (*ip == 'q')
- {
- printf("Abort.\n");
- exit(1);
- }
- }
- if (!take)
- continue;
- solver_take_solution(solv, problem, take, &job);
- }
- }
-
- trans = solver_create_transaction(solv);
- if (!trans->steps.count)
- {
- printf("Nothing to do.\n");
- transaction_free(trans);
- solver_free(solv);
- queue_free(&job);
- pool_free(pool);
- free_repoinfos(repoinfos, nrepoinfos);
- solv_free(commandlinepkgs);
-#ifdef FEDORA
- yum_substitute(pool, 0);
-#endif
- exit(1);
- }
-
- /* display transaction to the user and ask for confirmation */
- printf("\n");
- printf("Transaction summary:\n\n");
- transaction_print(trans);
-#if defined(SUSE)
- showdiskusagechanges(trans);
-#endif
- printf("install size change: %d K\n", transaction_calc_installsizechange(trans));
- printf("\n");
-
- if (!yesno("OK to continue (y/n)? "))
- {
- printf("Abort.\n");
- transaction_free(trans);
- solver_free(solv);
- queue_free(&job);
- pool_free(pool);
- free_repoinfos(repoinfos, nrepoinfos);
- solv_free(commandlinepkgs);
-#ifdef FEDORA
- yum_substitute(pool, 0);
-#endif
- exit(1);
- }
-
- /* download all new packages */
- queue_init(&checkq);
- newpkgs = transaction_installedresult(trans, &checkq);
- newpkgsfps = 0;
- if (newpkgs)
- {
- int downloadsize = 0;
- for (i = 0; i < newpkgs; i++)
- {
- Solvable *s;
-
- p = checkq.elements[i];
- s = pool_id2solvable(pool, p);
- downloadsize += solvable_lookup_sizek(s, SOLVABLE_DOWNLOADSIZE, 0);
- }
- printf("Downloading %d packages, %d K\n", newpkgs, downloadsize);
- newpkgsfps = solv_calloc(newpkgs, sizeof(*newpkgsfps));
- for (i = 0; i < newpkgs; i++)
- {
- unsigned int medianr;
- const char *loc;
- Solvable *s;
- struct repoinfo *cinfo;
- const unsigned char *chksum;
- Id chksumtype;
-
- p = checkq.elements[i];
- s = pool_id2solvable(pool, p);
- if (s->repo == commandlinerepo)
- {
- loc = solvable_lookup_location(s, &medianr);
- if (!loc)
- continue;
- if (!(newpkgsfps[i] = fopen(loc, "r")))
- {
- perror(loc);
- exit(1);
- }
- putchar('.');
- continue;
- }
- cinfo = s->repo->appdata;
- if (!cinfo)
- {
- printf("%s: no repository information\n", s->repo->name);
- exit(1);
- }
- loc = solvable_lookup_location(s, &medianr);
- if (!loc)
- continue;
-#if defined(ENABLE_RPMDB)
- if (pool->installed && pool->installed->nsolvables)
- {
- if ((newpkgsfps[i] = trydeltadownload(s, cinfo, loc)) != 0)
- {
- putchar('d');
- fflush(stdout);
- continue; /* delta worked! */
- }
- }
-#endif
-#ifdef ENABLE_SUSEREPO
- if (cinfo->type == TYPE_SUSETAGS)
- {
- const char *datadir = repo_lookup_str(cinfo->repo, SOLVID_META, SUSETAGS_DATADIR);
- loc = pool_tmpjoin(pool, datadir ? datadir : "suse", "/", loc);
- }
-#endif
- chksumtype = 0;
- chksum = solvable_lookup_bin_checksum(s, SOLVABLE_CHECKSUM, &chksumtype);
- if ((newpkgsfps[i] = curlfopen(cinfo, loc, 0, chksum, chksumtype, 0)) == 0)
- {
- printf("\n%s: %s not found in repository\n", s->repo->name, loc);
- exit(1);
- }
- putchar('.');
- fflush(stdout);
- }
- putchar('\n');
- }
-
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
- /* check for file conflicts */
- if (newpkgs)
- {
- Queue conflicts;
- struct fcstate fcstate;
-
- printf("Searching for file conflicts\n");
- queue_init(&conflicts);
- fcstate.rpmstate = rpm_state_create(pool, rootdir);
- fcstate.newpkgscnt = newpkgs;
- fcstate.checkq = &checkq;
- fcstate.newpkgsfps = newpkgsfps;
- pool_findfileconflicts(pool, &checkq, newpkgs, &conflicts, FINDFILECONFLICTS_USE_SOLVABLEFILELIST | FINDFILECONFLICTS_CHECK_DIRALIASING | FINDFILECONFLICTS_USE_ROOTDIR, &fileconflict_cb, &fcstate);
- fcstate.rpmstate = rpm_state_free(fcstate.rpmstate);
- if (conflicts.count)
- {
- printf("\n");
- for (i = 0; i < conflicts.count; i += 6)
- printf("file %s of package %s conflicts with package %s\n", pool_id2str(pool, conflicts.elements[i]), pool_solvid2str(pool, conflicts.elements[i + 1]), pool_solvid2str(pool, conflicts.elements[i + 4]));
- printf("\n");
- if (yesno("Re-run solver (y/n/q)? "))
- {
- for (i = 0; i < newpkgs; i++)
- if (newpkgsfps[i])
- fclose(newpkgsfps[i]);
- newpkgsfps = solv_free(newpkgsfps);
- solver_free(solv);
- solv = 0;
- pool_add_fileconflicts_deps(pool, &conflicts);
- goto rerunsolver;
- }
- }
- queue_free(&conflicts);
- }
-#endif
-
- /* and finally commit the transaction */
- printf("Committing transaction:\n\n");
- transaction_order(trans, 0);
- for (i = 0; i < trans->steps.count; i++)
- {
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
- const char *evr, *evrp, *nvra;
-#endif
- Solvable *s;
- int j;
- FILE *fp;
- Id type;
-
- p = trans->steps.elements[i];
- s = pool_id2solvable(pool, p);
- type = transaction_type(trans, p, SOLVER_TRANSACTION_RPM_ONLY);
- switch(type)
- {
- case SOLVER_TRANSACTION_ERASE:
- printf("erase %s\n", pool_solvid2str(pool, p));
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
- if (!s->repo->rpmdbid || !s->repo->rpmdbid[p - s->repo->start])
- continue;
- /* strip epoch from evr */
- evr = evrp = pool_id2str(pool, s->evr);
- while (*evrp >= '0' && *evrp <= '9')
- evrp++;
- if (evrp > evr && evrp[0] == ':' && evrp[1])
- evr = evrp + 1;
- nvra = pool_tmpjoin(pool, pool_id2str(pool, s->name), "-", evr);
- nvra = pool_tmpappend(pool, nvra, ".", pool_id2str(pool, s->arch));
- runrpm("-e", nvra, -1, rootdir); /* too bad that --querybynumber doesn't work */
-#endif
-#if defined(ENABLE_DEBIAN) && defined(DEBIAN)
- rundpkg("--remove", pool_id2str(pool, s->name), 0, rootdir);
-#endif
- break;
- case SOLVER_TRANSACTION_INSTALL:
- case SOLVER_TRANSACTION_MULTIINSTALL:
- printf("install %s\n", pool_solvid2str(pool, p));
- for (j = 0; j < newpkgs; j++)
- if (checkq.elements[j] == p)
- break;
- fp = j < newpkgs ? newpkgsfps[j] : 0;
- if (!fp)
- continue;
- rewind(fp);
- lseek(fileno(fp), 0, SEEK_SET);
-#if defined(ENABLE_RPMDB) && (defined(SUSE) || defined(FEDORA))
- runrpm(type == SOLVER_TRANSACTION_MULTIINSTALL ? "-i" : "-U", "/dev/fd/3", fileno(fp), rootdir);
-#endif
-#if defined(ENABLE_DEBIAN) && defined(DEBIAN)
- rundpkg("--install", "/dev/fd/3", fileno(fp), rootdir);
-#endif
- fclose(fp);
- newpkgsfps[j] = 0;
- break;
- default:
- break;
- }
- }
-
- for (i = 0; i < newpkgs; i++)
- if (newpkgsfps[i])
- fclose(newpkgsfps[i]);
- solv_free(newpkgsfps);
- queue_free(&checkq);
- transaction_free(trans);
- solver_free(solv);
- queue_free(&job);
- pool_free(pool);
- free_repoinfos(repoinfos, nrepoinfos);
- solv_free(commandlinepkgs);
-#ifdef FEDORA
- yum_substitute(pool, 0);
-#endif
- exit(0);
-}