examples/solv.c

   1 /*
   2  * Copyright (c) 2009, Novell Inc.
   3  *
   4  * This program is licensed under the BSD license, read LICENSE.BSD
   5  * for further information
   6  */
   7
   8 /* solv, a little software installer demoing the sat solver library */
   9
  10 /* things it does:
  11  * - understands globs for package names / dependencies
  12  * - understands .arch suffix
  13  * - installation of commandline packages
  14  * - repository data caching
  15  * - on demand loading of secondary repository data
  16  * - gpg and checksum verification
  17  * - file conflicts
  18  * - deltarpm support
  19  * - fastestmirror implementation
  20  *
  21  * things available in the library but missing from solv:
  22  * - vendor policy loading
  23  * - soft locks file handling
  24  * - multi version handling
  25  */
  26
  27 #define _GNU_SOURCE
  28
  29 #include <stdio.h>
  30 #include <stdlib.h>
  31 #include <dirent.h>
  32 #include <fnmatch.h>
  33 #include <unistd.h>
  34 #include <zlib.h>
  35 #include <fcntl.h>
  36 #include <assert.h>
  37 #include <sys/utsname.h>
  38 #include <sys/types.h>
  39 #include <sys/wait.h>
  40 #include <time.h>
  41 #include <sys/time.h>
  42 #include <sys/dir.h>
  43 #include <sys/stat.h>
  44
  45 #include <sys/socket.h>
  46 #include <netdb.h>
  47 #include <poll.h>
  48 #include <errno.h>
  49
  50 #include "pool.h"
  51 #include "poolarch.h"
  52 #include "repo.h"
  53 #include "evr.h"
  54 #include "policy.h"
  55 #include "util.h"
  56 #include "solver.h"
  57 #include "solverdebug.h"
  58 #include "chksum.h"
  59 #include "repo_solv.h"
  60
  61 #include "repo_write.h"
  62 #ifdef ENABLE_RPMDB
  63 #include "repo_rpmdb.h"
  64 #include "pool_fileconflicts.h"
  65 #endif
  66 #ifdef ENABLE_DEBIAN
  67 #include "repo_deb.h"
  68 #endif
  69 #ifdef ENABLE_RPMMD
  70 #include "repo_rpmmd.h"
  71 #include "repo_repomdxml.h"
  72 #include "repo_updateinfoxml.h"
  73 #include "repo_deltainfoxml.h"
  74 #endif
  75 #ifdef ENABLE_SUSEREPO
  76 #include "repo_products.h"
  77 #include "repo_susetags.h"
  78 #include "repo_content.h"
  79 #endif
  80 #include "solv_xfopen.h"
  81
  82 #ifdef FEDORA
  83 # define REPOINFO_PATH "/etc/yum.repos.d"
  84 #else
  85 # define REPOINFO_PATH "/etc/zypp/repos.d"
  86 # define PRODUCTS_PATH "/etc/products.d"
  87 # define SOFTLOCKS_PATH "/var/lib/zypp/SoftLocks"
  88 #endif
  89
  90 #define SOLVCACHE_PATH "/var/cache/solv"
  91
  92 #define METADATA_EXPIRE (60 * 15)
  93
  94 struct repoinfo {
  95   Repo *repo;
  96
  97   char *alias;
  98   char *name;
  99   int enabled;
 100   int autorefresh;
 101   char *baseurl;
 102   char *metalink;
 103   char *mirrorlist;
 104   char *path;
 105   int type;
 106   int pkgs_gpgcheck;
 107   int repo_gpgcheck;
 108   int priority;
 109   int keeppackages;
 110   int metadata_expire;
 111   char **components;
 112   int ncomponents;
 113
 114   unsigned char cookie[32];
 115   unsigned char extcookie[32];
 116 };
 117
 118 #ifdef FEDORA
 119 char *
 120 yum_substitute(Pool *pool, char *line)
 121 {
 122   char *p, *p2;
 123   static char *releaseevr;
 124   static char *basearch;
 125
 126   if (!line)
 127     {
 128       solv_free(releaseevr);
 129       releaseevr = 0;
 130       solv_free(basearch);
 131       basearch = 0;
 132       return 0;
 133     }
 134   p = line;
 135   while ((p2 = strchr(p, '$')) != 0)
 136     {
 137       if (!strncmp(p2, "$releasever", 11))
 138         {
 139           if (!releaseevr)
 140             {
 141               Queue q;
 142
 143               queue_init(&q);
 144               rpm_installedrpmdbids(0, "Providename", "redhat-release", &q);
 145               if (q.count)
 146                 {
 147                   void *handle, *state = 0;
 148                   char *p;
 149                   handle = rpm_byrpmdbid(q.elements[0], 0, &state);
 150                   releaseevr = rpm_query(handle, SOLVABLE_EVR);
 151                   rpm_byrpmdbid(0, 0, &state);
 152                   if ((p = strchr(releaseevr, '-')) != 0)
 153                     *p = 0;
 154                 }
 155               queue_free(&q);
 156               if (!releaseevr)
 157                 releaseevr = strdup("?");
 158             }
 159           *p2 = 0;
 160           p = pool_tmpjoin(pool, line, releaseevr, p2 + 11);
 161           p2 = p + (p2 - line);
 162           line = p;
 163           p = p2 + strlen(releaseevr);
 164           continue;
 165         }
 166       if (!strncmp(p2, "$basearch", 9))
 167         {
 168           if (!basearch)
 169             {
 170               struct utsname un;
 171               if (uname(&un))
 172                 {
 173                   perror("uname");
 174                   exit(1);
 175                 }
 176               basearch = strdup(un.machine);
 177               if (basearch[0] == 'i' && basearch[1] && !strcmp(basearch + 2, "86"))
 178                 basearch[1] = '3';
 179             }
 180           *p2 = 0;
 181           p = pool_tmpjoin(pool, line, basearch, p2 + 9);
 182           p2 = p + (p2 - line);
 183           line = p;
 184           p = p2 + strlen(basearch);
 185           continue;
 186         }
 187       p = p2 + 1;
 188     }
 189   return line;
 190 }
 191 #endif
 192
 193 #define TYPE_UNKNOWN    0
 194 #define TYPE_SUSETAGS   1
 195 #define TYPE_RPMMD      2
 196 #define TYPE_PLAINDIR   3
 197 #define TYPE_DEBIAN     4
 198
 199 static int
 200 read_repoinfos_sort(const void *ap, const void *bp)
 201 {
 202   const struct repoinfo *a = ap;
 203   const struct repoinfo *b = bp;
 204   return strcmp(a->alias, b->alias);
 205 }
 206
 207 #ifndef DEBIAN
 208
 209 struct repoinfo *
 210 read_repoinfos(Pool *pool, const char *reposdir, int *nrepoinfosp)
 211 {
 212   char buf[4096];
 213   char buf2[4096], *kp, *vp, *kpe;
 214   DIR *dir;
 215   FILE *fp;
 216   struct dirent *ent;
 217   int l, rdlen;
 218   struct repoinfo *repoinfos = 0, *cinfo;
 219   int nrepoinfos = 0;
 220
 221   rdlen = strlen(reposdir);
 222   dir = opendir(reposdir);
 223   if (!dir)
 224     {
 225       *nrepoinfosp = 0;
 226       return 0;
 227     }
 228   while ((ent = readdir(dir)) != 0)
 229     {
 230       if (ent->d_name[0] == '.')
 231         continue;
 232       l = strlen(ent->d_name);
 233       if (l < 6 || rdlen + 2 + l >= sizeof(buf) || strcmp(ent->d_name + l - 5, ".repo") != 0)
 234         continue;
 235       snprintf(buf, sizeof(buf), "%s/%s", reposdir, ent->d_name);
 236       if ((fp = fopen(buf, "r")) == 0)
 237         {
 238           perror(buf);
 239           continue;
 240         }
 241       cinfo = 0;
 242       while(fgets(buf2, sizeof(buf2), fp))
 243         {
 244           l = strlen(buf2);
 245           if (l == 0)
 246             continue;
 247           while (l && (buf2[l - 1] == '\n' || buf2[l - 1] == ' ' || buf2[l - 1] == '\t'))
 248             buf2[--l] = 0;
 249           kp = buf2;
 250           while (*kp == ' ' || *kp == '\t')
 251             kp++;
 252           if (!*kp || *kp == '#')
 253             continue;
 254 #ifdef FEDORA
 255           if (strchr(kp, '$'))
 256             kp = yum_substitute(pool, kp);
 257 #endif
 258           if (*kp == '[')
 259             {
 260               vp = strrchr(kp, ']');
 261               if (!vp)
 262                 continue;
 263               *vp = 0;
 264               repoinfos = solv_extend(repoinfos, nrepoinfos, 1, sizeof(*repoinfos), 15);
 265               cinfo = repoinfos + nrepoinfos++;
 266               memset(cinfo, 0, sizeof(*cinfo));
 267               cinfo->alias = strdup(kp + 1);
 268               cinfo->type = TYPE_RPMMD;
 269               cinfo->autorefresh = 1;
 270               cinfo->priority = 99;
 271 #ifndef FEDORA
 272               cinfo->repo_gpgcheck = 1;
 273 #endif
 274               cinfo->metadata_expire = METADATA_EXPIRE;
 275               continue;
 276             }
 277           if (!cinfo)
 278             continue;
 279           vp = strchr(kp, '=');
 280           if (!vp)
 281             continue;
 282           for (kpe = vp - 1; kpe >= kp; kpe--)
 283             if (*kpe != ' ' && *kpe != '\t')
 284               break;
 285           if (kpe == kp)
 286             continue;
 287           vp++;
 288           while (*vp == ' ' || *vp == '\t')
 289             vp++;
 290           kpe[1] = 0;
 291           if (!strcmp(kp, "name"))
 292             cinfo->name = strdup(vp);
 293           else if (!strcmp(kp, "enabled"))
 294             cinfo->enabled = *vp == '0' ? 0 : 1;
 295           else if (!strcmp(kp, "autorefresh"))
 296             cinfo->autorefresh = *vp == '0' ? 0 : 1;
 297           else if (!strcmp(kp, "gpgcheck"))
 298             cinfo->pkgs_gpgcheck = *vp == '0' ? 0 : 1;
 299           else if (!strcmp(kp, "repo_gpgcheck"))
 300             cinfo->repo_gpgcheck = *vp == '0' ? 0 : 1;
 301           else if (!strcmp(kp, "baseurl"))
 302             cinfo->baseurl = strdup(vp);
 303           else if (!strcmp(kp, "mirrorlist"))
 304             {
 305               if (strstr(vp, "metalink"))
 306                 cinfo->metalink = strdup(vp);
 307               else
 308                 cinfo->mirrorlist = strdup(vp);
 309             }
 310           else if (!strcmp(kp, "path"))
 311             {
 312               if (vp && strcmp(vp, "/") != 0)
 313                 cinfo->path = strdup(vp);
 314             }
 315           else if (!strcmp(kp, "type"))
 316             {
 317               if (!strcmp(vp, "yast2"))
 318                 cinfo->type = TYPE_SUSETAGS;
 319               else if (!strcmp(vp, "rpm-md"))
 320                 cinfo->type = TYPE_RPMMD;
 321               else if (!strcmp(vp, "plaindir"))
 322                 cinfo->type = TYPE_PLAINDIR;
 323               else
 324                 cinfo->type = TYPE_UNKNOWN;
 325             }
 326           else if (!strcmp(kp, "priority"))
 327             cinfo->priority = atoi(vp);
 328           else if (!strcmp(kp, "keeppackages"))
 329             cinfo->keeppackages = *vp == '0' ? 0 : 1;
 330         }
 331       fclose(fp);
 332       cinfo = 0;
 333     }
 334   closedir(dir);
 335   qsort(repoinfos, nrepoinfos, sizeof(*repoinfos), read_repoinfos_sort);
 336   *nrepoinfosp = nrepoinfos;
 337   return repoinfos;
 338 }
 339
 340 #else
 341
 342 struct repoinfo *
 343 read_repoinfos(Pool *pool, const char *reposdir, int *nrepoinfosp)
 344 {
 345   FILE *fp;
 346   char buf[4096];
 347   char buf2[4096];
 348   int l;
 349   char *kp, *url, *distro;
 350   struct repoinfo *repoinfos = 0, *cinfo;
 351   int nrepoinfos = 0;
 352   DIR *dir = 0;
 353   struct dirent *ent;
 354
 355   fp = fopen("/etc/apt/sources.list", "r");
 356   while (1)
 357     {
 358       if (!fp)
 359         {
 360           if (!dir)
 361             {
 362               dir = opendir("/etc/apt/sources.list.d");
 363               if (!dir)
 364                 break;
 365             }
 366           if ((ent = readdir(dir)) == 0)
 367             {
 368               closedir(dir);
 369               break;
 370             }
 371           if (ent->d_name[0] == '.')
 372             continue;
 373           l = strlen(ent->d_name);
 374           if (l < 5 || strcmp(ent->d_name + l - 5, ".list") != 0)
 375             continue;
 376           snprintf(buf, sizeof(buf), "%s/%s", "/etc/apt/sources.list.d", ent->d_name);
 377           if (!(fp = fopen(buf, "r")))
 378             continue;
 379         }
 380       while(fgets(buf2, sizeof(buf2), fp))
 381         {
 382           l = strlen(buf2);
 383           if (l == 0)
 384             continue;
 385           while (l && (buf2[l - 1] == '\n' || buf2[l - 1] == ' ' || buf2[l - 1] == '\t'))
 386             buf2[--l] = 0;
 387           kp = buf2;
 388           while (*kp == ' ' || *kp == '\t')
 389             kp++;
 390           if (!*kp || *kp == '#')
 391             continue;
 392           if (strncmp(kp, "deb", 3) != 0)
 393             continue;
 394           kp += 3;
 395           if (*kp != ' ' && *kp != '\t')
 396             continue;
 397           while (*kp == ' ' || *kp == '\t')
 398             kp++;
 399           if (!*kp)
 400             continue;
 401           url = kp;
 402           while (*kp && *kp != ' ' && *kp != '\t')
 403             kp++;
 404           if (*kp)
 405             *kp++ = 0;
 406           while (*kp == ' ' || *kp == '\t')
 407             kp++;
 408           if (!*kp)
 409             continue;
 410           distro = kp;
 411           while (*kp && *kp != ' ' && *kp != '\t')
 412             kp++;
 413           if (*kp)
 414             *kp++ = 0;
 415           while (*kp == ' ' || *kp == '\t')
 416             kp++;
 417           if (!*kp)
 418             continue;
 419           repoinfos = solv_extend(repoinfos, nrepoinfos, 1, sizeof(*repoinfos), 15);
 420           cinfo = repoinfos + nrepoinfos++;
 421           memset(cinfo, 0, sizeof(*cinfo));
 422           cinfo->baseurl = strdup(url);
 423           cinfo->alias = solv_dupjoin(url, "/", distro);
 424           cinfo->name = strdup(distro);
 425           cinfo->type = TYPE_DEBIAN;
 426           cinfo->enabled = 1;
 427           cinfo->autorefresh = 1;
 428           cinfo->repo_gpgcheck = 1;
 429           cinfo->metadata_expire = METADATA_EXPIRE;
 430           while (*kp)
 431             {
 432               char *compo;
 433               while (*kp == ' ' || *kp == '\t')
 434                 kp++;
 435               if (!*kp)
 436                 break;
 437               compo = kp;
 438               while (*kp && *kp != ' ' && *kp != '\t')
 439                 kp++;
 440               if (*kp)
 441                 *kp++ = 0;
 442               cinfo->components = solv_extend(cinfo->components, cinfo->ncomponents, 1, sizeof(*cinfo->components), 15);
 443               cinfo->components[cinfo->ncomponents++] = strdup(compo);
 444             }
 445         }
 446       fclose(fp);
 447       fp = 0;
 448     }
 449   qsort(repoinfos, nrepoinfos, sizeof(*repoinfos), read_repoinfos_sort);
 450   *nrepoinfosp = nrepoinfos;
 451   return repoinfos;
 452 }
 453
 454 #endif
 455
 456 void
 457 free_repoinfos(struct repoinfo *repoinfos, int nrepoinfos)
 458 {
 459   int i, j;
 460   for (i = 0; i < nrepoinfos; i++)
 461     {
 462       struct repoinfo *cinfo = repoinfos + i;
 463       solv_free(cinfo->name);
 464       solv_free(cinfo->alias);
 465       solv_free(cinfo->path);
 466       solv_free(cinfo->metalink);
 467       solv_free(cinfo->mirrorlist);
 468       solv_free(cinfo->baseurl);
 469       for (j = 0; j < cinfo->ncomponents; j++)
 470         solv_free(cinfo->components[j]);
 471       solv_free(cinfo->components);
 472     }
 473   solv_free(repoinfos);
 474 }
 475
 476 static inline int
 477 opentmpfile()
 478 {
 479   char tmpl[100];
 480   int fd;
 481
 482   strcpy(tmpl, "/var/tmp/solvXXXXXX");
 483   fd = mkstemp(tmpl);
 484   if (fd < 0)
 485     {
 486       perror("mkstemp");
 487       exit(1);
 488     }
 489   unlink(tmpl);
 490   return fd;
 491 }
 492
 493 static int
 494 verify_checksum(int fd, const char *file, const unsigned char *chksum, Id chksumtype)
 495 {
 496   char buf[1024];
 497   const unsigned char *sum;
 498   void *h;
 499   int l;
 500
 501   h = solv_chksum_create(chksumtype);
 502   if (!h)
 503     {
 504       printf("%s: unknown checksum type\n", file);
 505       return 0;
 506     }
 507   while ((l = read(fd, buf, sizeof(buf))) > 0)
 508     solv_chksum_add(h, buf, l);
 509   lseek(fd, 0, SEEK_SET);
 510   l = 0;
 511   sum = solv_chksum_get(h, &l);
 512   if (memcmp(sum, chksum, l))
 513     {
 514       printf("%s: checksum mismatch\n", file);
 515       solv_chksum_free(h, 0);
 516       return 0;
 517     }
 518   solv_chksum_free(h, 0);
 519   return 1;
 520 }
 521
 522 void
 523 findfastest(char **urls, int nurls)
 524 {
 525   int i, j, port;
 526   int *socks, qc;
 527   struct pollfd *fds;
 528   char *p, *p2, *q;
 529   char portstr[16];
 530   struct addrinfo hints, *result;;
 531
 532   fds = solv_calloc(nurls, sizeof(*fds));
 533   socks = solv_calloc(nurls, sizeof(*socks));
 534   for (i = 0; i < nurls; i++)
 535     {
 536       socks[i] = -1;
 537       p = strchr(urls[i], '/');
 538       if (!p)
 539         continue;
 540       if (p[1] != '/')
 541         continue;
 542       p += 2;
 543       q = strchr(p, '/');
 544       qc = 0;
 545       if (q)
 546         {
 547           qc = *q;
 548           *q = 0;
 549         }
 550       if ((p2 = strchr(p, '@')) != 0)
 551         p = p2 + 1;
 552       port = 80;
 553       if (!strncmp("https:", urls[i], 6))
 554         port = 443;
 555       else if (!strncmp("ftp:", urls[i], 4))
 556         port = 21;
 557       if ((p2 = strrchr(p, ':')) != 0)
 558         {
 559           port = atoi(p2 + 1);
 560           if (q)
 561             *q = qc;
 562           q = p2;
 563           qc = *q;
 564           *q = 0;
 565         }
 566       sprintf(portstr, "%d", port);
 567       memset(&hints, 0, sizeof(struct addrinfo));
 568       hints.ai_family = AF_UNSPEC;
 569       hints.ai_socktype = SOCK_STREAM;
 570       hints.ai_flags = AI_NUMERICSERV;
 571       result = 0;
 572       if (!getaddrinfo(p, portstr, &hints, &result))
 573         {
 574           socks[i] = socket(result->ai_family, result->ai_socktype, result->ai_protocol);
 575           if (socks[i] >= 0)
 576             {
 577               fcntl(socks[i], F_SETFL, O_NONBLOCK);
 578               if (connect(socks[i], result->ai_addr, result->ai_addrlen) == -1)
 579                 {
 580                   if (errno != EINPROGRESS)
 581                     {
 582                       close(socks[i]);
 583                       socks[i] = -1;
 584                     }
 585                 }
 586             }
 587           freeaddrinfo(result);
 588         }
 589       if (q)
 590         *q = qc;
 591     }
 592   for (;;)
 593     {
 594       for (i = j = 0; i < nurls; i++)
 595         {
 596           if (socks[i] < 0)
 597             continue;
 598           fds[j].fd = socks[i];
 599           fds[j].events = POLLOUT;
 600           j++;
 601         }
 602       if (j < 2)
 603         {
 604           i = j - 1;
 605           break;
 606         }
 607       if (poll(fds, j, 10000) <= 0)
 608         {
 609           i = -1;       /* something is wrong */
 610           break;
 611         }
 612       for (i = 0; i < j; i++)
 613         if ((fds[i].revents & POLLOUT) != 0)
 614           {
 615             int soe = 0;
 616             socklen_t soel = sizeof(int);
 617             if (getsockopt(fds[i].fd, SOL_SOCKET, SO_ERROR, &soe, &soel) == -1 || soe != 0)
 618               {
 619                 /* connect failed, kill socket */
 620                 for (j = 0; j < nurls; j++)
 621                   if (socks[j] == fds[i].fd)
 622                     {
 623                       close(socks[j]);
 624                       socks[j] = -1;
 625                     }
 626                 i = j + 1;
 627                 break;
 628               }
 629             break;      /* horray! */
 630           }
 631       if (i == j + 1)
 632         continue;
 633       if (i == j)
 634         i = -1;         /* something is wrong, no bit was set */
 635       break;
 636     }
 637   /* now i contains the fastest fd index */
 638   if (i >= 0)
 639     {
 640       for (j = 0; j < nurls; j++)
 641         if (socks[j] == fds[i].fd)
 642           break;
 643       if (j != 0)
 644         {
 645           char *url0 = urls[0];
 646           urls[0] = urls[j];
 647           urls[j] = url0;
 648         }
 649     }
 650   for (i = j = 0; i < nurls; i++)
 651     if (socks[i] >= 0)
 652       close(socks[i]);
 653   free(socks);
 654   free(fds);
 655 }
 656
 657 char *
 658 findmetalinkurl(FILE *fp, unsigned char *chksump, Id *chksumtypep)
 659 {
 660   char buf[4096], *bp, *ep;
 661   char **urls = 0;
 662   int nurls = 0;
 663   int i;
 664
 665   if (chksumtypep)
 666     *chksumtypep = 0;
 667   while((bp = fgets(buf, sizeof(buf), fp)) != 0)
 668     {
 669       while (*bp == ' ' || *bp == '\t')
 670         bp++;
 671       if (chksumtypep && !*chksumtypep && !strncmp(bp, "<hash type=\"sha256\">", 20))
 672         {
 673           bp += 20;
 674           if (solv_hex2bin((const char **)&bp, chksump, 32) == 32)
 675             *chksumtypep = REPOKEY_TYPE_SHA256;
 676           continue;
 677         }
 678       if (strncmp(bp, "<url", 4))
 679         continue;
 680       bp = strchr(bp, '>');
 681       if (!bp)
 682         continue;
 683       bp++;
 684       ep = strstr(bp, "repodata/repomd.xml</url>");
 685       if (!ep)
 686         continue;
 687       *ep = 0;
 688       if (strncmp(bp, "http", 4))
 689         continue;
 690       urls = solv_extend(urls, nurls, 1, sizeof(*urls), 15);
 691       urls[nurls++] = strdup(bp);
 692     }
 693   if (nurls)
 694     {
 695       if (nurls > 1)
 696         findfastest(urls, nurls > 5 ? 5 : nurls);
 697       bp = urls[0];
 698       urls[0] = 0;
 699       for (i = 0; i < nurls; i++)
 700         solv_free(urls[i]);
 701       solv_free(urls);
 702       ep = strchr(bp, '/');
 703       if ((ep = strchr(ep + 2, '/')) != 0)
 704         {
 705           *ep = 0;
 706           printf("[using mirror %s]\n", bp);
 707           *ep = '/';
 708         }
 709       return bp;
 710     }
 711   return 0;
 712 }
 713
 714 char *
 715 findmirrorlisturl(FILE *fp)
 716 {
 717   char buf[4096], *bp, *ep;
 718   int i, l;
 719   char **urls = 0;
 720   int nurls = 0;
 721
 722   while((bp = fgets(buf, sizeof(buf), fp)) != 0)
 723     {
 724       while (*bp == ' ' || *bp == '\t')
 725         bp++;
 726       if (!*bp || *bp == '#')
 727         continue;
 728       l = strlen(bp);
 729       while (l > 0 && (bp[l - 1] == ' ' || bp[l - 1] == '\t' || bp[l - 1] == '\n'))
 730         bp[--l] = 0;
 731       urls = solv_extend(urls, nurls, 1, sizeof(*urls), 15);
 732       urls[nurls++] = strdup(bp);
 733     }
 734   if (nurls)
 735     {
 736       if (nurls > 1)
 737         findfastest(urls, nurls > 5 ? 5 : nurls);
 738       bp = urls[0];
 739       urls[0] = 0;
 740       for (i = 0; i < nurls; i++)
 741         solv_free(urls[i]);
 742       solv_free(urls);
 743       ep = strchr(bp, '/');
 744       if ((ep = strchr(ep + 2, '/')) != 0)
 745         {
 746           *ep = 0;
 747           printf("[using mirror %s]\n", bp);
 748           *ep = '/';
 749         }
 750       return bp;
 751     }
 752   return 0;
 753 }
 754
 755 static inline int
 756 iscompressed(const char *name)
 757 {
 758   int l = strlen(name);
 759   return l > 3 && !strcmp(name + l - 3, ".gz") ? 1 : 0;
 760 }
 761
 762 FILE *
 763 curlfopen(struct repoinfo *cinfo, const char *file, int uncompress, const unsigned char *chksum, Id chksumtype, int *badchecksump)
 764 {
 765   pid_t pid;
 766   int fd, l;
 767   int status;
 768   char url[4096];
 769   const char *baseurl = cinfo->baseurl;
 770
 771   if (!baseurl)
 772     {
 773       if (!cinfo->metalink && !cinfo->mirrorlist)
 774         return 0;
 775       if (file != cinfo->metalink && file != cinfo->mirrorlist)
 776         {
 777           FILE *fp = curlfopen(cinfo, cinfo->metalink ? cinfo->metalink : cinfo->mirrorlist, 0, 0, 0, 0);
 778           unsigned char mlchksum[32];
 779           Id mlchksumtype = 0;
 780           if (!fp)
 781             return 0;
 782           if (cinfo->metalink)
 783             cinfo->baseurl = findmetalinkurl(fp, mlchksum, &mlchksumtype);
 784           else
 785             cinfo->baseurl = findmirrorlisturl(fp);
 786           fclose(fp);
 787           if (!cinfo->baseurl)
 788             return 0;
 789 #ifdef FEDORA
 790           if (strchr(cinfo->baseurl, '$'))
 791             {
 792               char *b = yum_substitute(cinfo->repo->pool, cinfo->baseurl);
 793               free(cinfo->baseurl);
 794               cinfo->baseurl = strdup(b);
 795             }
 796 #endif
 797           if (!chksumtype && mlchksumtype && !strcmp(file, "repodata/repomd.xml"))
 798             {
 799               chksumtype = mlchksumtype;
 800               chksum = mlchksum;
 801             }
 802           return curlfopen(cinfo, file, uncompress, chksum, chksumtype, badchecksump);
 803         }
 804       snprintf(url, sizeof(url), "%s", file);
 805     }
 806   else
 807     {
 808       l = strlen(baseurl);
 809       if (l && baseurl[l - 1] == '/')
 810         snprintf(url, sizeof(url), "%s%s", baseurl, file);
 811       else
 812         snprintf(url, sizeof(url), "%s/%s", baseurl, file);
 813     }
 814   fd = opentmpfile();
 815   // printf("url: %s\n", url);
 816   if ((pid = fork()) == (pid_t)-1)
 817     {
 818       perror("fork");
 819       exit(1);
 820     }
 821   if (pid == 0)
 822     {
 823       if (fd != 1)
 824         {
 825           dup2(fd, 1);
 826           close(fd);
 827         }
 828       execlp("curl", "curl", "-f", "-s", "-L", url, (char *)0);
 829       perror("curl");
 830       _exit(0);
 831     }
 832   status = 0;
 833   while (waitpid(pid, &status, 0) != pid)
 834     ;
 835   if (lseek(fd, 0, SEEK_END) == 0 && (!status || !chksumtype))
 836     {
 837       /* empty file */
 838       close(fd);
 839       return 0;
 840     }
 841   lseek(fd, 0, SEEK_SET);
 842   if (status)
 843     {
 844       printf("%s: download error %d\n", file, status >> 8 ? status >> 8 : status);
 845       if (badchecksump)
 846         *badchecksump = 1;
 847       close(fd);
 848       return 0;
 849     }
 850   if (chksumtype && !verify_checksum(fd, file, chksum, chksumtype))
 851     {
 852       if (badchecksump)
 853         *badchecksump = 1;
 854       close(fd);
 855       return 0;
 856     }
 857   if (uncompress)
 858     return solv_xfopen_fd(".gz", fd, "r");
 859   fcntl(fd, F_SETFD, FD_CLOEXEC);
 860   return fdopen(fd, "r");
 861 }
 862
 863 #ifndef DEBIAN
 864
 865 static void
 866 cleanupgpg(char *gpgdir)
 867 {
 868   char cmd[256];
 869   snprintf(cmd, sizeof(cmd), "%s/pubring.gpg", gpgdir);
 870   unlink(cmd);
 871   snprintf(cmd, sizeof(cmd), "%s/pubring.gpg~", gpgdir);
 872   unlink(cmd);
 873   snprintf(cmd, sizeof(cmd), "%s/secring.gpg", gpgdir);
 874   unlink(cmd);
 875   snprintf(cmd, sizeof(cmd), "%s/trustdb.gpg", gpgdir);
 876   unlink(cmd);
 877   snprintf(cmd, sizeof(cmd), "%s/keys", gpgdir);
 878   unlink(cmd);
 879   rmdir(gpgdir);
 880 }
 881
 882 int
 883 checksig(Pool *sigpool, FILE *fp, FILE *sigfp)
 884 {
 885   char *gpgdir;
 886   char *keysfile;
 887   const char *pubkey;
 888   char cmd[256];
 889   FILE *kfp;
 890   Solvable *s;
 891   Id p;
 892   off_t posfp, possigfp;
 893   int r, nkeys;
 894
 895   gpgdir = mkdtemp(pool_tmpjoin(sigpool, "/var/tmp/solvgpg.XXXXXX", 0, 0));
 896   if (!gpgdir)
 897     return 0;
 898   keysfile = pool_tmpjoin(sigpool, gpgdir, "/keys", 0);
 899   if (!(kfp = fopen(keysfile, "w")) )
 900     {
 901       cleanupgpg(gpgdir);
 902       return 0;
 903     }
 904   nkeys = 0;
 905   for (p = 1, s = sigpool->solvables + p; p < sigpool->nsolvables; p++, s++)
 906     {
 907       if (!s->repo)
 908         continue;
 909       pubkey = solvable_lookup_str(s, SOLVABLE_DESCRIPTION);
 910       if (!pubkey || !*pubkey)
 911         continue;
 912       if (fwrite(pubkey, strlen(pubkey), 1, kfp) != 1)
 913         break;
 914       if (fputc('\n', kfp) == EOF)      /* Just in case... */
 915         break;
 916       nkeys++;
 917     }
 918   if (fclose(kfp) || !nkeys)
 919     {
 920       cleanupgpg(gpgdir);
 921       return 0;
 922     }
 923   snprintf(cmd, sizeof(cmd), "gpg2 -q --homedir %s --import %s", gpgdir, keysfile);
 924   if (system(cmd))
 925     {
 926       fprintf(stderr, "key import error\n");
 927       cleanupgpg(gpgdir);
 928       return 0;
 929     }
 930   unlink(keysfile);
 931   posfp = lseek(fileno(fp), 0, SEEK_CUR);
 932   lseek(fileno(fp), 0, SEEK_SET);
 933   possigfp = lseek(fileno(sigfp), 0, SEEK_CUR);
 934   lseek(fileno(sigfp), 0, SEEK_SET);
 935   snprintf(cmd, sizeof(cmd), "gpg -q --homedir %s --verify /dev/fd/%d /dev/fd/%d >/dev/null 2>&1", gpgdir, fileno(sigfp), fileno(fp));
 936   fcntl(fileno(fp), F_SETFD, 0);        /* clear CLOEXEC */
 937   fcntl(fileno(sigfp), F_SETFD, 0);     /* clear CLOEXEC */
 938   r = system(cmd);
 939   lseek(fileno(sigfp), possigfp, SEEK_SET);
 940   lseek(fileno(fp), posfp, SEEK_SET);
 941   fcntl(fileno(fp), F_SETFD, FD_CLOEXEC);
 942   fcntl(fileno(sigfp), F_SETFD, FD_CLOEXEC);
 943   cleanupgpg(gpgdir);
 944   return r == 0 ? 1 : 0;
 945 }
 946
 947 #else
 948
 949 int
 950 checksig(Pool *sigpool, FILE *fp, FILE *sigfp)
 951 {
 952   char cmd[256];
 953   int r;
 954
 955   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));
 956   fcntl(fileno(fp), F_SETFD, 0);        /* clear CLOEXEC */
 957   fcntl(fileno(sigfp), F_SETFD, 0);     /* clear CLOEXEC */
 958   r = system(cmd);
 959   fcntl(fileno(fp), F_SETFD, FD_CLOEXEC);
 960   fcntl(fileno(sigfp), F_SETFD, FD_CLOEXEC);
 961   return r == 0 ? 1 : 0;
 962 }
 963
 964 #endif
 965
 966 #define CHKSUM_IDENT "1.1"
 967
 968 void
 969 calc_checksum_fp(FILE *fp, Id chktype, unsigned char *out)
 970 {
 971   char buf[4096];
 972   void *h = solv_chksum_create(chktype);
 973   int l;
 974
 975   solv_chksum_add(h, CHKSUM_IDENT, strlen(CHKSUM_IDENT));
 976   while ((l = fread(buf, 1, sizeof(buf), fp)) > 0)
 977     solv_chksum_add(h, buf, l);
 978   rewind(fp);
 979   solv_chksum_free(h, out);
 980 }
 981
 982 void
 983 calc_checksum_stat(struct stat *stb, Id chktype, unsigned char *out)
 984 {
 985   void *h = solv_chksum_create(chktype);
 986   solv_chksum_add(h, CHKSUM_IDENT, strlen(CHKSUM_IDENT));
 987   solv_chksum_add(h, &stb->st_dev, sizeof(stb->st_dev));
 988   solv_chksum_add(h, &stb->st_ino, sizeof(stb->st_ino));
 989   solv_chksum_add(h, &stb->st_size, sizeof(stb->st_size));
 990   solv_chksum_add(h, &stb->st_mtime, sizeof(stb->st_mtime));
 991   solv_chksum_free(h, out);
 992 }
 993
 994 void
 995 setarch(Pool *pool)
 996 {
 997   struct utsname un;
 998   if (uname(&un))
 999     {
1000       perror("uname");
1001       exit(1);
1002     }
1003   pool_setarch(pool, un.machine);
1004 }
1005
1006 char *calccachepath(Repo *repo, const char *repoext)
1007 {
1008   char *q, *p = pool_tmpjoin(repo->pool, SOLVCACHE_PATH, "/", repo->name);
1009   if (repoext)
1010     {
1011       p = pool_tmpappend(repo->pool, p, "_", repoext);
1012       p = pool_tmpappend(repo->pool, p, ".solvx", 0);
1013     }
1014   else
1015     p = pool_tmpappend(repo->pool, p, ".solv", 0);
1016   q = p + strlen(SOLVCACHE_PATH) + 1;
1017   if (*q == '.')
1018     *q = '_';
1019   for (; *q; q++)
1020     if (*q == '/')
1021       *q = '_';
1022   return p;
1023 }
1024
1025 int
1026 usecachedrepo(Repo *repo, const char *repoext, unsigned char *cookie, int mark)
1027 {
1028   FILE *fp;
1029   unsigned char mycookie[32];
1030   unsigned char myextcookie[32];
1031   struct repoinfo *cinfo;
1032   int flags;
1033
1034   cinfo = repo->appdata;
1035   if (!(fp = fopen(calccachepath(repo, repoext), "r")))
1036     return 0;
1037   if (fseek(fp, -sizeof(mycookie), SEEK_END) || fread(mycookie, sizeof(mycookie), 1, fp) != 1)
1038     {
1039       fclose(fp);
1040       return 0;
1041     }
1042   if (cookie && memcmp(cookie, mycookie, sizeof(mycookie)))
1043     {
1044       fclose(fp);
1045       return 0;
1046     }
1047   if (cinfo && !repoext)
1048     {
1049       if (fseek(fp, -sizeof(mycookie) * 2, SEEK_END) || fread(myextcookie, sizeof(myextcookie), 1, fp) != 1)
1050         {
1051           fclose(fp);
1052           return 0;
1053         }
1054     }
1055   rewind(fp);
1056
1057   flags = 0;
1058   if (repoext)
1059     {
1060       flags = REPO_USE_LOADING|REPO_EXTEND_SOLVABLES;
1061       if (strcmp(repoext, "DL") != 0)
1062         flags |= REPO_LOCALPOOL;        /* no local pool for DL so that we can compare IDs */
1063     }
1064
1065   if (repo_add_solv_flags(repo, fp, flags))
1066     {
1067       fclose(fp);
1068       return 0;
1069     }
1070   if (cinfo && !repoext)
1071     {
1072       memcpy(cinfo->cookie, mycookie, sizeof(mycookie));
1073       memcpy(cinfo->extcookie, myextcookie, sizeof(myextcookie));
1074     }
1075   if (mark)
1076     futimes(fileno(fp), 0);     /* try to set modification time */
1077   fclose(fp);
1078   return 1;
1079 }
1080
1081 void
1082 writecachedrepo(Repo *repo, Repodata *info, const char *repoext, unsigned char *cookie)
1083 {
1084   FILE *fp;
1085   int i, fd;
1086   char *tmpl;
1087   struct repoinfo *cinfo;
1088   int onepiece;
1089
1090   cinfo = repo->appdata;
1091   mkdir(SOLVCACHE_PATH, 0755);
1092   /* use dupjoin instead of tmpjoin because tmpl must survive repo_write */
1093   tmpl = solv_dupjoin(SOLVCACHE_PATH, "/", ".newsolv-XXXXXX");
1094   fd = mkstemp(tmpl);
1095   if (fd < 0)
1096     {
1097       free(tmpl);
1098       return;
1099     }
1100   fchmod(fd, 0444);
1101   if (!(fp = fdopen(fd, "w")))
1102     {
1103       close(fd);
1104       unlink(tmpl);
1105       free(tmpl);
1106       return;
1107     }
1108
1109   onepiece = 1;
1110   for (i = repo->start; i < repo->end; i++)
1111    if (repo->pool->solvables[i].repo != repo)
1112      break;
1113   if (i < repo->end)
1114     onepiece = 0;
1115
1116   if (!info)
1117     repo_write(repo, fp, repo_write_stdkeyfilter, 0, 0);
1118   else if (repoext)
1119     repodata_write(info, fp, repo_write_stdkeyfilter, 0);
1120   else
1121     {
1122       int oldnrepodata = repo->nrepodata;
1123       repo->nrepodata = oldnrepodata > 2 ? 2 : oldnrepodata;    /* XXX: do this right */
1124       repo_write(repo, fp, repo_write_stdkeyfilter, 0, 0);
1125       repo->nrepodata = oldnrepodata;
1126       onepiece = 0;
1127     }
1128
1129   if (!repoext && cinfo)
1130     {
1131       if (!cinfo->extcookie[0])
1132         {
1133           /* create the ext cookie and append it */
1134           /* we just need some unique ID */
1135           struct stat stb;
1136           if (!fstat(fileno(fp), &stb))
1137             {
1138               int i;
1139
1140               calc_checksum_stat(&stb, REPOKEY_TYPE_SHA256, cinfo->extcookie);
1141               for (i = 0; i < 32; i++)
1142                 cinfo->extcookie[i] ^= cookie[i];
1143             }
1144           if (cinfo->extcookie[0] == 0)
1145             cinfo->extcookie[0] = 1;
1146         }
1147       if (fwrite(cinfo->extcookie, 32, 1, fp) != 1)
1148         {
1149           fclose(fp);
1150           unlink(tmpl);
1151           free(tmpl);
1152           return;
1153         }
1154     }
1155   /* append our cookie describing the metadata state */
1156   if (fwrite(cookie, 32, 1, fp) != 1)
1157     {
1158       fclose(fp);
1159       unlink(tmpl);
1160       free(tmpl);
1161       return;
1162     }
1163   if (fclose(fp))
1164     {
1165       unlink(tmpl);
1166       free(tmpl);
1167       return;
1168     }
1169   if (onepiece)
1170     {
1171       /* switch to just saved repo to activate paging and save memory */
1172       FILE *fp = fopen(tmpl, "r");
1173       if (fp)
1174         {
1175           if (!repoext)
1176             {
1177               /* main repo */
1178               repo_empty(repo, 1);
1179               if (repo_add_solv_flags(repo, fp, SOLV_ADD_NO_STUBS))
1180                 {
1181                   /* oops, no way to recover from here */
1182                   fprintf(stderr, "internal error\n");
1183                   exit(1);
1184                 }
1185             }
1186           else
1187             {
1188               /* make sure repodata contains complete repo */
1189               /* (this is how repodata_write saves it) */
1190               repodata_extend_block(info, repo->start, repo->end - repo->start);
1191               info->state = REPODATA_LOADING;
1192               /* no need for LOCALPOOL as pool already contains ids */
1193               repo_add_solv_flags(repo, fp, REPO_USE_LOADING|REPO_EXTEND_SOLVABLES);
1194               info->state = REPODATA_AVAILABLE; /* in case the load failed */
1195             }
1196           fclose(fp);
1197         }
1198     }
1199   if (!rename(tmpl, calccachepath(repo, repoext)))
1200     unlink(tmpl);
1201   free(tmpl);
1202 }
1203
1204
1205 static Pool *
1206 read_sigs()
1207 {
1208   Pool *sigpool = pool_create();
1209 #ifdef ENABLE_RPMDB
1210   Repo *repo = repo_create(sigpool, "rpmdbkeys");
1211   repo_add_rpmdb_pubkeys(repo, 0, 0);
1212 #endif
1213   return sigpool;
1214 }
1215
1216
1217 #ifdef ENABLE_RPMMD
1218 /* repomd helpers */
1219
1220 static inline const char *
1221 repomd_find(Repo *repo, const char *what, const unsigned char **chksump, Id *chksumtypep)
1222 {
1223   Pool *pool = repo->pool;
1224   Dataiterator di;
1225   const char *filename;
1226
1227   filename = 0;
1228   *chksump = 0;
1229   *chksumtypep = 0;
1230   dataiterator_init(&di, pool, repo, SOLVID_META, REPOSITORY_REPOMD_TYPE, what, SEARCH_STRING);
1231   dataiterator_prepend_keyname(&di, REPOSITORY_REPOMD);
1232   if (dataiterator_step(&di))
1233     {
1234       dataiterator_setpos_parent(&di);
1235       filename = pool_lookup_str(pool, SOLVID_POS, REPOSITORY_REPOMD_LOCATION);
1236       *chksump = pool_lookup_bin_checksum(pool, SOLVID_POS, REPOSITORY_REPOMD_CHECKSUM, chksumtypep);
1237     }
1238   dataiterator_free(&di);
1239   if (filename && !*chksumtypep)
1240     {
1241       printf("no %s file checksum!\n", what);
1242       filename = 0;
1243     }
1244   return filename;
1245 }
1246
1247 int
1248 repomd_add_ext(Repo *repo, Repodata *data, const char *what)
1249 {
1250   Id chksumtype, handle;
1251   const unsigned char *chksum;
1252   const char *filename;
1253
1254   filename = repomd_find(repo, what, &chksum, &chksumtype);
1255   if (!filename)
1256     return 0;
1257   if (!strcmp(what, "prestodelta"))
1258     what = "deltainfo";
1259   handle = repodata_new_handle(data);
1260   repodata_set_poolstr(data, handle, REPOSITORY_REPOMD_TYPE, what);
1261   repodata_set_str(data, handle, REPOSITORY_REPOMD_LOCATION, filename);
1262   repodata_set_bin_checksum(data, handle, REPOSITORY_REPOMD_CHECKSUM, chksumtype, chksum);
1263   if (!strcmp(what, "deltainfo"))
1264     {
1265       repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOSITORY_DELTAINFO);
1266       repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOKEY_TYPE_FLEXARRAY);
1267     }
1268   if (!strcmp(what, "filelists"))
1269     {
1270       repodata_add_idarray(data, handle, REPOSITORY_KEYS, SOLVABLE_FILELIST);
1271       repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOKEY_TYPE_DIRSTRARRAY);
1272     }
1273   repodata_add_flexarray(data, SOLVID_META, REPOSITORY_EXTERNAL, handle);
1274   return 1;
1275 }
1276
1277 int
1278 repomd_load_ext(Repo *repo, Repodata *data)
1279 {
1280   const char *filename, *repomdtype;
1281   char ext[3];
1282   FILE *fp;
1283   struct repoinfo *cinfo;
1284   const unsigned char *filechksum;
1285   Id filechksumtype;
1286
1287   cinfo = repo->appdata;
1288   repomdtype = repodata_lookup_str(data, SOLVID_META, REPOSITORY_REPOMD_TYPE);
1289   if (!repomdtype)
1290     return 0;
1291   if (!strcmp(repomdtype, "filelists"))
1292     strcpy(ext, "FL");
1293   else if (!strcmp(repomdtype, "deltainfo"))
1294     strcpy(ext, "DL");
1295   else
1296     return 0;
1297 #if 1
1298   printf("[%s:%s", repo->name, ext);
1299 #endif
1300   if (usecachedrepo(repo, ext, cinfo->extcookie, 0))
1301     {
1302       printf(" cached]\n");fflush(stdout);
1303       return 1;
1304     }
1305   printf(" fetching]\n"); fflush(stdout);
1306   filename = repodata_lookup_str(data, SOLVID_META, REPOSITORY_REPOMD_LOCATION);
1307   filechksumtype = 0;
1308   filechksum = repodata_lookup_bin_checksum(data, SOLVID_META, REPOSITORY_REPOMD_CHECKSUM, &filechksumtype);
1309   if ((fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, 0)) == 0)
1310     return 0;
1311   if (!strcmp(ext, "FL"))
1312     repo_add_rpmmd(repo, fp, ext, REPO_USE_LOADING|REPO_EXTEND_SOLVABLES);
1313   else if (!strcmp(ext, "DL"))
1314     repo_add_deltainfoxml(repo, fp, REPO_USE_LOADING);
1315   fclose(fp);
1316   writecachedrepo(repo, data, ext, cinfo->extcookie);
1317   return 1;
1318 }
1319
1320 #endif
1321
1322
1323 #ifdef ENABLE_SUSEREPO
1324 /* susetags helpers */
1325
1326 static inline const char *
1327 susetags_find(Repo *repo, const char *what, const unsigned char **chksump, Id *chksumtypep)
1328 {
1329   Pool *pool = repo->pool;
1330   Dataiterator di;
1331   const char *filename;
1332
1333   filename = 0;
1334   *chksump = 0;
1335   *chksumtypep = 0;
1336   dataiterator_init(&di, pool, repo, SOLVID_META, SUSETAGS_FILE_NAME, what, SEARCH_STRING);
1337   dataiterator_prepend_keyname(&di, SUSETAGS_FILE);
1338   if (dataiterator_step(&di))
1339     {
1340       dataiterator_setpos_parent(&di);
1341       *chksump = pool_lookup_bin_checksum(pool, SOLVID_POS, SUSETAGS_FILE_CHECKSUM, chksumtypep);
1342       filename = what;
1343     }
1344   dataiterator_free(&di);
1345   if (filename && !*chksumtypep)
1346     {
1347       printf("no %s file checksum!\n", what);
1348       filename = 0;
1349     }
1350   return filename;
1351 }
1352
1353 static Id susetags_langtags[] = {
1354   SOLVABLE_SUMMARY, REPOKEY_TYPE_STR,
1355   SOLVABLE_DESCRIPTION, REPOKEY_TYPE_STR,
1356   SOLVABLE_EULA, REPOKEY_TYPE_STR,
1357   SOLVABLE_MESSAGEINS, REPOKEY_TYPE_STR,
1358   SOLVABLE_MESSAGEDEL, REPOKEY_TYPE_STR,
1359   SOLVABLE_CATEGORY, REPOKEY_TYPE_ID,
1360   0, 0
1361 };
1362
1363 void
1364 susetags_add_ext(Repo *repo, Repodata *data)
1365 {
1366   Pool *pool = repo->pool;
1367   Dataiterator di;
1368   char ext[3];
1369   Id handle, filechksumtype;
1370   const unsigned char *filechksum;
1371   int i;
1372
1373   dataiterator_init(&di, pool, repo, SOLVID_META, SUSETAGS_FILE_NAME, 0, 0);
1374   dataiterator_prepend_keyname(&di, SUSETAGS_FILE);
1375   while (dataiterator_step(&di))
1376     {
1377       if (strncmp(di.kv.str, "packages.", 9) != 0)
1378         continue;
1379       if (!strcmp(di.kv.str + 9, "gz"))
1380         continue;
1381       if (!di.kv.str[9] || !di.kv.str[10] || (di.kv.str[11] && di.kv.str[11] != '.'))
1382         continue;
1383       ext[0] = di.kv.str[9];
1384       ext[1] = di.kv.str[10];
1385       ext[2] = 0;
1386       if (!strcmp(ext, "en"))
1387         continue;
1388       if (!susetags_find(repo, di.kv.str, &filechksum, &filechksumtype))
1389         continue;
1390       handle = repodata_new_handle(data);
1391       repodata_set_str(data, handle, SUSETAGS_FILE_NAME, di.kv.str);
1392       if (filechksumtype)
1393         repodata_set_bin_checksum(data, handle, SUSETAGS_FILE_CHECKSUM, filechksumtype, filechksum);
1394       if (!strcmp(ext, "DU"))
1395         {
1396           repodata_add_idarray(data, handle, REPOSITORY_KEYS, SOLVABLE_DISKUSAGE);
1397           repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOKEY_TYPE_DIRNUMNUMARRAY);
1398         }
1399       else if (!strcmp(ext, "FL"))
1400         {
1401           repodata_add_idarray(data, handle, REPOSITORY_KEYS, SOLVABLE_FILELIST);
1402           repodata_add_idarray(data, handle, REPOSITORY_KEYS, REPOKEY_TYPE_DIRSTRARRAY);
1403         }
1404       else
1405         {
1406           for (i = 0; susetags_langtags[i]; i += 2)
1407             {
1408               repodata_add_idarray(data, handle, REPOSITORY_KEYS, pool_id2langid(pool, susetags_langtags[i], ext, 1));
1409               repodata_add_idarray(data, handle, REPOSITORY_KEYS, susetags_langtags[i + 1]);
1410             }
1411         }
1412       repodata_add_flexarray(data, SOLVID_META, REPOSITORY_EXTERNAL, handle);
1413     }
1414   dataiterator_free(&di);
1415 }
1416
1417 int
1418 susetags_load_ext(Repo *repo, Repodata *data)
1419 {
1420   const char *filename, *descrdir;
1421   Id defvendor;
1422   char ext[3];
1423   FILE *fp;
1424   struct repoinfo *cinfo;
1425   const unsigned char *filechksum;
1426   Id filechksumtype;
1427
1428   cinfo = repo->appdata;
1429   filename = repodata_lookup_str(data, SOLVID_META, SUSETAGS_FILE_NAME);
1430   if (!filename)
1431     return 0;
1432   /* susetags load */
1433   ext[0] = filename[9];
1434   ext[1] = filename[10];
1435   ext[2] = 0;
1436 #if 1
1437   printf("[%s:%s", repo->name, ext);
1438 #endif
1439   if (usecachedrepo(repo, ext, cinfo->extcookie, 0))
1440     {
1441       printf(" cached]\n"); fflush(stdout);
1442       return 1;
1443     }
1444 #if 1
1445   printf(" fetching]\n"); fflush(stdout);
1446 #endif
1447   defvendor = repo_lookup_id(repo, SOLVID_META, SUSETAGS_DEFAULTVENDOR);
1448   descrdir = repo_lookup_str(repo, SOLVID_META, SUSETAGS_DESCRDIR);
1449   if (!descrdir)
1450     descrdir = "suse/setup/descr";
1451   filechksumtype = 0;
1452   filechksum = repodata_lookup_bin_checksum(data, SOLVID_META, SUSETAGS_FILE_CHECKSUM, &filechksumtype);
1453   if ((fp = curlfopen(cinfo, pool_tmpjoin(repo->pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, 0)) == 0)
1454     return 0;
1455   repo_add_susetags(repo, fp, defvendor, ext, REPO_USE_LOADING|REPO_EXTEND_SOLVABLES);
1456   fclose(fp);
1457   writecachedrepo(repo, data, ext, cinfo->extcookie);
1458   return 1;
1459 }
1460 #endif
1461
1462
1463
1464 /* load callback */
1465
1466 int
1467 load_stub(Pool *pool, Repodata *data, void *dp)
1468 {
1469   struct repoinfo *cinfo = data->repo->appdata;
1470 #ifdef ENABLE_SUSEREPO
1471   if (cinfo->type == TYPE_SUSETAGS)
1472     return susetags_load_ext(data->repo, data);
1473 #endif
1474 #ifdef ENABLE_RPMMD
1475   if (cinfo->type == TYPE_RPMMD)
1476     return repomd_load_ext(data->repo, data);
1477 #endif
1478   return 0;
1479 }
1480
1481 static unsigned char installedcookie[32];
1482
1483 #ifdef ENABLE_DEBIAN
1484
1485 const char *
1486 debian_find_component(struct repoinfo *cinfo, FILE *fp, char *comp, const unsigned char **chksump, Id *chksumtypep)
1487 {
1488   char buf[4096];
1489   Id chksumtype;
1490   unsigned char *chksum;
1491   Id curchksumtype;
1492   int l, compl;
1493   char *ch, *fn, *bp;
1494   char *filename;
1495   static char *basearch;
1496   char *binarydir;
1497   int lbinarydir;
1498
1499   if (!basearch)
1500     {
1501       struct utsname un;
1502       if (uname(&un))
1503         {
1504           perror("uname");
1505           exit(1);
1506         }
1507       basearch = strdup(un.machine);
1508       if (basearch[0] == 'i' && basearch[1] && !strcmp(basearch + 2, "86"))
1509         basearch[1] = '3';
1510     }
1511   binarydir = solv_dupjoin("binary-", basearch, "/");
1512   lbinarydir = strlen(binarydir);
1513   compl = strlen(comp);
1514   rewind(fp);
1515   curchksumtype = 0;
1516   filename = 0;
1517   chksum = solv_malloc(32);
1518   chksumtype = 0;
1519   while(fgets(buf, sizeof(buf), fp))
1520     {
1521       l = strlen(buf);
1522       if (l == 0)
1523         continue;
1524       while (l && (buf[l - 1] == '\n' || buf[l - 1] == ' ' || buf[l - 1] == '\t'))
1525         buf[--l] = 0;
1526       if (!strncasecmp(buf, "MD5Sum:", 7))
1527         {
1528           curchksumtype = REPOKEY_TYPE_MD5;
1529           continue;
1530         }
1531       if (!strncasecmp(buf, "SHA1:", 5))
1532         {
1533           curchksumtype = REPOKEY_TYPE_SHA1;
1534           continue;
1535         }
1536       if (!strncasecmp(buf, "SHA256:", 7))
1537         {
1538           curchksumtype = REPOKEY_TYPE_SHA256;
1539           continue;
1540         }
1541       if (!curchksumtype)
1542         continue;
1543       bp = buf;
1544       if (*bp++ != ' ')
1545         {
1546           curchksumtype = 0;
1547           continue;
1548         }
1549       ch = bp;
1550       while (*bp && *bp != ' ' && *bp != '\t')
1551         bp++;
1552       if (!*bp)
1553         continue;
1554       *bp++ = 0;
1555       while (*bp == ' ' || *bp == '\t')
1556         bp++;
1557       while (*bp && *bp != ' ' && *bp != '\t')
1558         bp++;
1559       if (!*bp)
1560         continue;
1561       while (*bp == ' ' || *bp == '\t')
1562         bp++;
1563       fn = bp;
1564       if (strncmp(fn, comp, compl) != 0 || fn[compl] != '/')
1565         continue;
1566       bp += compl + 1;
1567       if (strncmp(bp, binarydir, lbinarydir))
1568         continue;
1569       bp += lbinarydir;
1570       if (!strcmp(bp, "Packages") || !strcmp(bp, "Packages.gz"))
1571         {
1572           unsigned char curchksum[32];
1573           int curl;
1574           if (filename && !strcmp(bp, "Packages"))
1575             continue;
1576           curl = solv_chksum_len(curchksumtype);
1577           if (!curl || (chksumtype && solv_chksum_len(chksumtype) > curl))
1578             continue;
1579           if (solv_hex2bin((const char **)&ch, curchksum, sizeof(curchksum)) != curl)
1580             continue;
1581           solv_free(filename);
1582           filename = strdup(fn);
1583           chksumtype = curchksumtype;
1584           memcpy(chksum, curchksum, curl);
1585         }
1586     }
1587   free(binarydir);
1588   if (filename)
1589     {
1590       fn = solv_dupjoin("/", filename, 0);
1591       solv_free(filename);
1592       filename = solv_dupjoin("dists/", cinfo->name, fn);
1593       solv_free(fn);
1594     }
1595   if (!chksumtype)
1596     chksum = solv_free(chksum);
1597   *chksump = chksum;
1598   *chksumtypep = chksumtype;
1599   return filename;
1600 }
1601 #endif
1602
1603 void
1604 read_repos(Pool *pool, struct repoinfo *repoinfos, int nrepoinfos)
1605 {
1606   Repo *repo;
1607   struct repoinfo *cinfo;
1608   int i;
1609   FILE *fp;
1610   FILE *sigfp;
1611   const char *filename;
1612   const unsigned char *filechksum;
1613   Id filechksumtype;
1614   const char *descrdir;
1615   int defvendor;
1616   struct stat stb;
1617   Pool *sigpool = 0;
1618   Repodata *data;
1619   int badchecksum;
1620   int dorefresh;
1621 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
1622   FILE *fpr;
1623   int j;
1624 #endif
1625
1626   repo = repo_create(pool, "@System");
1627 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
1628   printf("rpm database:");
1629   if (stat("/var/lib/rpm/Packages", &stb))
1630     memset(&stb, 0, sizeof(&stb));
1631 #endif
1632 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
1633   printf("dpgk database:");
1634   if (stat("/var/lib/dpkg/status", &stb))
1635     memset(&stb, 0, sizeof(&stb));
1636 #endif
1637   calc_checksum_stat(&stb, REPOKEY_TYPE_SHA256, installedcookie);
1638   if (usecachedrepo(repo, 0, installedcookie, 0))
1639     printf(" cached\n");
1640   else
1641     {
1642 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
1643       FILE *ofp;
1644       int done = 0;
1645 #endif
1646       printf(" reading\n");
1647
1648 #if defined(ENABLE_SUSEREPO) && defined(PRODUCTS_PATH)
1649       repo_add_products(repo, PRODUCTS_PATH, 0, REPO_NO_INTERNALIZE);
1650 #endif
1651 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
1652       if ((ofp = fopen(calccachepath(repo, 0), "r")) != 0)
1653         {
1654           Repo *ref = repo_create(pool, "@System.old");
1655           if (!repo_add_solv(ref, ofp))
1656             {
1657               repo_add_rpmdb(repo, ref, 0, REPO_REUSE_REPODATA);
1658               done = 1;
1659             }
1660           fclose(ofp);
1661           repo_free(ref, 1);
1662         }
1663       if (!done)
1664         repo_add_rpmdb(repo, 0, 0, REPO_REUSE_REPODATA);
1665 #else
1666 # if defined(ENABLE_DEBIAN) && defined(DEBIAN)
1667         repo_add_debdb(repo, 0, REPO_REUSE_REPODATA);
1668 # endif
1669 #endif
1670       writecachedrepo(repo, 0, 0, installedcookie);
1671     }
1672   pool_set_installed(pool, repo);
1673
1674   for (i = 0; i < nrepoinfos; i++)
1675     {
1676       cinfo = repoinfos + i;
1677       if (!cinfo->enabled)
1678         continue;
1679
1680       repo = repo_create(pool, cinfo->alias);
1681       cinfo->repo = repo;
1682       repo->appdata = cinfo;
1683       repo->priority = 99 - cinfo->priority;
1684
1685       dorefresh = cinfo->autorefresh;
1686       if (dorefresh && cinfo->metadata_expire && stat(calccachepath(repo, 0), &stb) == 0)
1687         {
1688           if (cinfo->metadata_expire == -1 || time(0) - stb.st_mtime < cinfo->metadata_expire)
1689             dorefresh = 0;
1690         }
1691       if (!dorefresh && usecachedrepo(repo, 0, 0, 0))
1692         {
1693           printf("repo '%s':", cinfo->alias);
1694           printf(" cached\n");
1695           continue;
1696         }
1697       badchecksum = 0;
1698       switch (cinfo->type)
1699         {
1700 #ifdef ENABLE_RPMMD
1701         case TYPE_RPMMD:
1702           printf("rpmmd repo '%s':", cinfo->alias);
1703           fflush(stdout);
1704           if ((fp = curlfopen(cinfo, "repodata/repomd.xml", 0, 0, 0, 0)) == 0)
1705             {
1706               printf(" no repomd.xml file, skipped\n");
1707               repo_free(repo, 1);
1708               cinfo->repo = 0;
1709               break;
1710             }
1711           calc_checksum_fp(fp, REPOKEY_TYPE_SHA256, cinfo->cookie);
1712           if (usecachedrepo(repo, 0, cinfo->cookie, 1))
1713             {
1714               printf(" cached\n");
1715               fclose(fp);
1716               break;
1717             }
1718           if (cinfo->repo_gpgcheck)
1719             {
1720               sigfp = curlfopen(cinfo, "repodata/repomd.xml.asc", 0, 0, 0, 0);
1721               if (!sigfp)
1722                 {
1723                   printf(" unsigned, skipped\n");
1724                   fclose(fp);
1725                   break;
1726                 }
1727               if (!sigpool)
1728                 sigpool = read_sigs();
1729               if (!checksig(sigpool, fp, sigfp))
1730                 {
1731                   printf(" checksig failed, skipped\n");
1732                   fclose(sigfp);
1733                   fclose(fp);
1734                   break;
1735                 }
1736               fclose(sigfp);
1737             }
1738           repo_add_repomdxml(repo, fp, 0);
1739           fclose(fp);
1740           printf(" fetching\n");
1741           filename = repomd_find(repo, "primary", &filechksum, &filechksumtype);
1742           if (filename && (fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, &badchecksum)) != 0)
1743             {
1744               repo_add_rpmmd(repo, fp, 0, 0);
1745               fclose(fp);
1746             }
1747           if (badchecksum)
1748             break;      /* hopeless */
1749
1750           filename = repomd_find(repo, "updateinfo", &filechksum, &filechksumtype);
1751           if (filename && (fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, &badchecksum)) != 0)
1752             {
1753               repo_add_updateinfoxml(repo, fp, 0);
1754               fclose(fp);
1755             }
1756
1757           data = repo_add_repodata(repo, 0);
1758           if (!repomd_add_ext(repo, data, "deltainfo"))
1759             repomd_add_ext(repo, data, "prestodelta");
1760           repomd_add_ext(repo, data, "filelists");
1761           repodata_internalize(data);
1762           if (!badchecksum)
1763             writecachedrepo(repo, 0, 0, cinfo->cookie);
1764           repodata_create_stubs(repo_last_repodata(repo));
1765           break;
1766 #endif
1767
1768 #ifdef ENABLE_SUSEREPO
1769         case TYPE_SUSETAGS:
1770           printf("susetags repo '%s':", cinfo->alias);
1771           fflush(stdout);
1772           descrdir = 0;
1773           defvendor = 0;
1774           if ((fp = curlfopen(cinfo, "content", 0, 0, 0, 0)) == 0)
1775             {
1776               printf(" no content file, skipped\n");
1777               repo_free(repo, 1);
1778               cinfo->repo = 0;
1779               break;
1780             }
1781           calc_checksum_fp(fp, REPOKEY_TYPE_SHA256, cinfo->cookie);
1782           if (usecachedrepo(repo, 0, cinfo->cookie, 1))
1783             {
1784               printf(" cached\n");
1785               fclose(fp);
1786               break;
1787             }
1788           if (cinfo->repo_gpgcheck)
1789             {
1790               sigfp = curlfopen(cinfo, "content.asc", 0, 0, 0, 0);
1791               if (!sigfp)
1792                 {
1793                   printf(" unsigned, skipped\n");
1794                   fclose(fp);
1795                   break;
1796                 }
1797               if (sigfp)
1798                 {
1799                   if (!sigpool)
1800                     sigpool = read_sigs();
1801                   if (!checksig(sigpool, fp, sigfp))
1802                     {
1803                       printf(" checksig failed, skipped\n");
1804                       fclose(sigfp);
1805                       fclose(fp);
1806                       break;
1807                     }
1808                   fclose(sigfp);
1809                 }
1810             }
1811           repo_add_content(repo, fp, 0);
1812           fclose(fp);
1813           defvendor = repo_lookup_id(repo, SOLVID_META, SUSETAGS_DEFAULTVENDOR);
1814           descrdir = repo_lookup_str(repo, SOLVID_META, SUSETAGS_DESCRDIR);
1815           if (!descrdir)
1816             descrdir = "suse/setup/descr";
1817           filename = susetags_find(repo, "packages.gz", &filechksum, &filechksumtype);
1818           if (!filename)
1819             filename = susetags_find(repo, "packages", &filechksum, &filechksumtype);
1820           if (!filename)
1821             {
1822               printf(" no packages file entry, skipped\n");
1823               break;
1824             }
1825           printf(" fetching\n");
1826           if ((fp = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, &badchecksum)) == 0)
1827             break;      /* hopeless */
1828           repo_add_susetags(repo, fp, defvendor, 0, REPO_NO_INTERNALIZE|SUSETAGS_RECORD_SHARES);
1829           fclose(fp);
1830           /* add default language */
1831           filename = susetags_find(repo, "packages.en.gz", &filechksum, &filechksumtype);
1832           if (!filename)
1833             filename = susetags_find(repo, "packages.en", &filechksum, &filechksumtype);
1834           if (filename)
1835             {
1836               if ((fp = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, &badchecksum)) != 0)
1837                 {
1838                   repo_add_susetags(repo, fp, defvendor, 0, REPO_NO_INTERNALIZE|REPO_REUSE_REPODATA|REPO_EXTEND_SOLVABLES);
1839                   fclose(fp);
1840                 }
1841             }
1842           repo_internalize(repo);
1843           data = repo_add_repodata(repo, 0);
1844           susetags_add_ext(repo, data);
1845           repodata_internalize(data);
1846           if (!badchecksum)
1847             writecachedrepo(repo, 0, 0, cinfo->cookie);
1848           repodata_create_stubs(repo_last_repodata(repo));
1849           break;
1850 #endif
1851
1852 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
1853         case TYPE_DEBIAN:
1854           printf("debian repo '%s':", cinfo->alias);
1855           fflush(stdout);
1856           filename = solv_dupjoin("dists/", cinfo->name, "/Release");
1857           if ((fpr = curlfopen(cinfo, filename, 0, 0, 0, 0)) == 0)
1858             {
1859               printf(" no Release file, skipped\n");
1860               repo_free(repo, 1);
1861               cinfo->repo = 0;
1862               free((char *)filename);
1863               break;
1864             }
1865           solv_free((char *)filename);
1866           if (cinfo->repo_gpgcheck)
1867             {
1868               filename = solv_dupjoin("dists/", cinfo->name, "/Release.gpg");
1869               sigfp = curlfopen(cinfo, filename, 0, 0, 0, 0);
1870               solv_free((char *)filename);
1871               if (!sigfp)
1872                 {
1873                   printf(" unsigned, skipped\n");
1874                   fclose(fpr);
1875                   break;
1876                 }
1877               if (!sigpool)
1878                 sigpool = read_sigs();
1879               if (!checksig(sigpool, fpr, sigfp))
1880                 {
1881                   printf(" checksig failed, skipped\n");
1882                   fclose(sigfp);
1883                   fclose(fpr);
1884                   break;
1885                 }
1886               fclose(sigfp);
1887             }
1888           calc_checksum_fp(fpr, REPOKEY_TYPE_SHA256, cinfo->cookie);
1889           if (usecachedrepo(repo, 0, cinfo->cookie, 1))
1890             {
1891               printf(" cached\n");
1892               fclose(fpr);
1893               break;
1894             }
1895           printf(" fetching\n");
1896           for (j = 0; j < cinfo->ncomponents; j++)
1897             {
1898               if (!(filename = debian_find_component(cinfo, fpr, cinfo->components[j], &filechksum, &filechksumtype)))
1899                 {
1900                   printf("[component %s not found]\n", cinfo->components[j]);
1901                   continue;
1902                 }
1903               if ((fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, &badchecksum)) != 0)
1904                 {
1905                   repo_add_debpackages(repo, fp, 0);
1906                   fclose(fp);
1907                 }
1908               solv_free((char *)filechksum);
1909               solv_free((char *)filename);
1910             }
1911           fclose(fpr);
1912           if (!badchecksum)
1913             writecachedrepo(repo, 0, 0, cinfo->cookie);
1914           break;
1915 #endif
1916
1917         default:
1918           printf("unsupported repo '%s': skipped\n", cinfo->alias);
1919           repo_free(repo, 1);
1920           cinfo->repo = 0;
1921           break;
1922         }
1923     }
1924   if (sigpool)
1925     pool_free(sigpool);
1926 }
1927
1928
1929 int
1930 str2archid(Pool *pool, char *arch)
1931 {
1932   Id id;
1933   if (!*arch)
1934     return 0;
1935   id = pool_str2id(pool, arch, 0);
1936   if (id == ARCH_SRC || id == ARCH_NOSRC || id == ARCH_NOARCH)
1937     return id;
1938   if (pool->id2arch && (id > pool->lastarch || !pool->id2arch[id]))
1939     return 0;
1940   return id;
1941 }
1942
1943
1944 #define DEPGLOB_NAME     1
1945 #define DEPGLOB_DEP      2
1946 #define DEPGLOB_NAMEDEP  3
1947
1948 int
1949 depglob(Pool *pool, char *name, Queue *job, int what)
1950 {
1951   Id p, pp;
1952   Id id = pool_str2id(pool, name, 0);
1953   int i, match = 0;
1954
1955   if (id)
1956     {
1957       FOR_PROVIDES(p, pp, id)
1958         {
1959           Solvable *s = pool->solvables + p;
1960           match = 1;
1961           if (s->name == id && (what & DEPGLOB_NAME) != 0)
1962             {
1963               queue_push2(job, SOLVER_SOLVABLE_NAME, id);
1964               return 1;
1965             }
1966         }
1967       if (match)
1968         {
1969           if (what == DEPGLOB_NAMEDEP)
1970             printf("[using capability match for '%s']\n", name);
1971           queue_push2(job, SOLVER_SOLVABLE_PROVIDES, id);
1972           return 1;
1973         }
1974     }
1975
1976   if (strpbrk(name, "[*?") == 0)
1977     return 0;
1978
1979   if ((what & DEPGLOB_NAME) != 0)
1980     {
1981       /* looks like a name glob. hard work. */
1982       for (p = 1; p < pool->nsolvables; p++)
1983         {
1984           Solvable *s = pool->solvables + p;
1985           if (!s->repo || !pool_installable(pool, s))
1986             continue;
1987           id = s->name;
1988           if (fnmatch(name, pool_id2str(pool, id), 0) == 0)
1989             {
1990               for (i = 0; i < job->count; i += 2)
1991                 if (job->elements[i] == SOLVER_SOLVABLE_NAME && job->elements[i + 1] == id)
1992                   break;
1993               if (i == job->count)
1994                 queue_push2(job, SOLVER_SOLVABLE_NAME, id);
1995               match = 1;
1996             }
1997         }
1998       if (match)
1999         return 1;
2000     }
2001   if ((what & DEPGLOB_DEP))
2002     {
2003       /* looks like a dep glob. really hard work. */
2004       for (id = 1; id < pool->ss.nstrings; id++)
2005         {
2006           if (!pool->whatprovides[id])
2007             continue;
2008           if (fnmatch(name, pool_id2str(pool, id), 0) == 0)
2009             {
2010               if (!match && what == DEPGLOB_NAMEDEP)
2011                 printf("[using capability match for '%s']\n", name);
2012               for (i = 0; i < job->count; i += 2)
2013                 if (job->elements[i] == SOLVER_SOLVABLE_PROVIDES && job->elements[i + 1] == id)
2014                   break;
2015               if (i == job->count)
2016                 queue_push2(job, SOLVER_SOLVABLE_PROVIDES, id);
2017               match = 1;
2018             }
2019         }
2020       if (match)
2021         return 1;
2022     }
2023   return 0;
2024 }
2025
2026 int
2027 limitrelation(Pool *pool, Queue *job, int flags, Id evr)
2028 {
2029   int i, j;
2030   Id p, pp;
2031   for (i = j = 0; i < job->count; i += 2)
2032     {
2033       Id select = job->elements[i] & SOLVER_SELECTMASK;
2034       if (select != SOLVER_SOLVABLE_NAME && select != SOLVER_SOLVABLE_PROVIDES)
2035         {
2036           fprintf(stderr, "limitrelation only works on name/provides jobs\n");
2037           exit(1);
2038         }
2039       job->elements[i + 1] = pool_rel2id(pool, job->elements[i + 1], evr, flags, 1);
2040       if (flags == REL_ARCH)
2041         job->elements[i] |= SOLVER_SETARCH;
2042       if (flags == REL_EQ && select == SOLVER_SOLVABLE_NAME && job->elements[i])
2043         {
2044 #ifndef DEBIAN
2045           const char *evrstr = pool_id2str(pool, evr);
2046           if (!strchr(evrstr, '-'))
2047             job->elements[i] |= SOLVER_SETEV;
2048           else
2049 #endif
2050             job->elements[i] |= SOLVER_SETEVR;
2051         }
2052       /* make sure we still have matches */
2053       FOR_JOB_SELECT(p, pp, job->elements[i], job->elements[i + 1])
2054         break;
2055       if (p)
2056         {
2057           job->elements[j] = job->elements[i];
2058           job->elements[j + 1] = job->elements[i + 1];
2059           j += 2;
2060         }
2061     }
2062   queue_truncate(job, j);
2063   return j / 2;
2064 }
2065
2066 int
2067 limitrelation_arch(Pool *pool, Queue *job, int flags, char *evr)
2068 {
2069   char *r;
2070   Id archid;
2071   if ((r = strrchr(evr, '.')) != 0 && r[1] && (archid = str2archid(pool, r + 1)) != 0)
2072     {
2073       *r = 0;
2074       limitrelation(pool, job, REL_ARCH, archid);
2075       limitrelation(pool, job, flags, pool_str2id(pool, evr, 1));
2076       *r = '.';
2077     }
2078   else
2079     limitrelation(pool, job, flags, pool_str2id(pool, evr, 1));
2080   return job->count / 2;
2081 }
2082
2083 int
2084 limitrepo(Pool *pool, Id repofilter, Queue *job)
2085 {
2086   Queue mq;
2087   Id p, pp;
2088   int i, j;
2089   Solvable *s;
2090
2091   queue_init(&mq);
2092   for (i = j = 0; i < job->count; i += 2)
2093     {
2094       queue_empty(&mq);
2095       FOR_JOB_SELECT(p, pp, job->elements[i], job->elements[i + 1])
2096         {
2097           s = pool_id2solvable(pool, p);
2098           if (s->repo && s->repo->repoid == repofilter)
2099              queue_push(&mq, p);
2100         }
2101       if (mq.count)
2102         {
2103           /* here we assume that repo == vendor, so we also set SOLVER_SETVENDOR */
2104           if (mq.count == 1)
2105             {
2106               job->elements[j] = SOLVER_SOLVABLE | (job->elements[i] & SOLVER_SETMASK) | SOLVER_SETVENDOR | SOLVER_SETREPO | SOLVER_NOAUTOSET;
2107               job->elements[j + 1] = mq.elements[0];
2108             }
2109           else
2110             {
2111               job->elements[j] = SOLVER_SOLVABLE_ONE_OF | (job->elements[i] & SOLVER_SETMASK) | SOLVER_SETVENDOR | SOLVER_SETREPO;
2112               job->elements[j + 1] = pool_queuetowhatprovides(pool, &mq);
2113             }
2114           j += 2;
2115         }
2116     }
2117   queue_truncate(job, j);
2118   queue_free(&mq);
2119   return j / 2;
2120 }
2121
2122 int
2123 mkselect(Pool *pool, int mode, char *name, Queue *job)
2124 {
2125   char *r, *r2;
2126   Id archid;
2127
2128   if (*name == '/')
2129     {
2130       Dataiterator di;
2131       int type = strpbrk(name, "[*?") == 0 ? SEARCH_STRING : SEARCH_GLOB;
2132       Queue q;
2133       queue_init(&q);
2134       dataiterator_init(&di, pool, mode == SOLVER_ERASE ? pool->installed : 0, 0, SOLVABLE_FILELIST, name, type|SEARCH_FILES|SEARCH_COMPLETE_FILELIST);
2135       while (dataiterator_step(&di))
2136         {
2137           Solvable *s = pool->solvables + di.solvid;
2138           if (!s->repo || !pool_installable(pool, s))
2139             continue;
2140           queue_push(&q, di.solvid);
2141           dataiterator_skip_solvable(&di);
2142         }
2143       dataiterator_free(&di);
2144       if (q.count)
2145         {
2146           printf("[using file list match for '%s']\n", name);
2147           if (q.count > 1)
2148             queue_push2(job, SOLVER_SOLVABLE_ONE_OF, pool_queuetowhatprovides(pool, &q));
2149           else
2150             queue_push2(job, SOLVER_SOLVABLE | SOLVER_NOAUTOSET, q.elements[0]);
2151           queue_free(&q);
2152           return job->count / 2;
2153         }
2154     }
2155   if ((r = strpbrk(name, "<=>")) != 0)
2156     {
2157       /* relation case, support:
2158        * depglob rel
2159        * depglob.arch rel
2160        */
2161       int rflags = 0;
2162       int nend = r - name;
2163       char oldnend;
2164       for (; *r; r++)
2165         {
2166           if (*r == '<')
2167             rflags |= REL_LT;
2168           else if (*r == '=')
2169             rflags |= REL_EQ;
2170           else if (*r == '>')
2171             rflags |= REL_GT;
2172           else
2173             break;
2174         }
2175       while (*r && *r == ' ' && *r == '\t')
2176         r++;
2177       while (nend && (name[nend - 1] == ' ' || name[nend -1 ] == '\t'))
2178         nend--;
2179       if (!*name || !*r)
2180         {
2181           fprintf(stderr, "bad relation\n");
2182           exit(1);
2183         }
2184       oldnend = name[nend];
2185       name[nend] = 0;
2186       if (depglob(pool, name, job, DEPGLOB_NAMEDEP))
2187         {
2188           name[nend] = oldnend;
2189           limitrelation(pool, job, rflags, pool_str2id(pool, r, 1));
2190           return job->count / 2;
2191         }
2192       if ((r2 = strrchr(name, '.')) != 0 && r2[1] && (archid = str2archid(pool, r2 + 1)) != 0)
2193         {
2194           *r2 = 0;
2195           if (depglob(pool, name, job, DEPGLOB_NAMEDEP))
2196             {
2197               name[nend] = oldnend;
2198               *r2 = '.';
2199               limitrelation(pool, job, REL_ARCH, archid);
2200               limitrelation(pool, job, rflags, pool_str2id(pool, r, 1));
2201               return job->count / 2;
2202             }
2203           *r2 = '.';
2204         }
2205       name[nend] = oldnend;
2206     }
2207   else
2208     {
2209       /* no relation case, support:
2210        * depglob
2211        * depglob.arch
2212        * nameglob-version
2213        * nameglob-version.arch
2214        * nameglob-version-release
2215        * nameglob-version-release.arch
2216        */
2217       if (depglob(pool, name, job, DEPGLOB_NAMEDEP))
2218         return job->count / 2;
2219       if ((r = strrchr(name, '.')) != 0 && r[1] && (archid = str2archid(pool, r + 1)) != 0)
2220         {
2221           *r = 0;
2222           if (depglob(pool, name, job, DEPGLOB_NAMEDEP))
2223             {
2224               *r = '.';
2225               limitrelation(pool, job, REL_ARCH, archid);
2226               return job->count / 2;
2227             }
2228           *r = '.';
2229         }
2230       if ((r = strrchr(name, '-')) != 0)
2231         {
2232           *r = 0;
2233           if (depglob(pool, name, job, DEPGLOB_NAME))
2234             {
2235               /* have just the version */
2236               limitrelation_arch(pool, job, REL_EQ, r + 1);
2237               *r = '-';
2238               return job->count / 2;
2239             }
2240           if ((r2 = strrchr(name, '-')) != 0)
2241             {
2242               *r = '-';
2243               *r2 = 0;
2244               r = r2;
2245               if (depglob(pool, name, job, DEPGLOB_NAME))
2246                 {
2247                   /* have version-release */
2248                   limitrelation_arch(pool, job, REL_EQ, r + 1);
2249                   *r = '-';
2250                   return job->count / 2;
2251                 }
2252             }
2253           *r = '-';
2254         }
2255     }
2256   return 0;
2257 }
2258
2259
2260 int
2261 yesno(const char *str)
2262 {
2263   char inbuf[128], *ip;
2264
2265   for (;;)
2266     {
2267       printf("%s", str);
2268       fflush(stdout);
2269       *inbuf = 0;
2270       if (!(ip = fgets(inbuf, sizeof(inbuf), stdin)))
2271         {
2272           printf("Abort.\n");
2273           exit(1);
2274         }
2275       while (*ip == ' ' || *ip == '\t')
2276         ip++;
2277       if (*ip == 'q')
2278         {
2279           printf("Abort.\n");
2280           exit(1);
2281         }
2282       if (*ip == 'y' || *ip == 'n')
2283         return *ip == 'y' ? 1 : 0;
2284     }
2285 }
2286
2287 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
2288
2289 struct fcstate {
2290   FILE **newpkgsfps;
2291   Queue *checkq;
2292   int newpkgscnt;
2293   void *rpmdbstate;
2294 };
2295
2296 static void *
2297 fileconflict_cb(Pool *pool, Id p, void *cbdata)
2298 {
2299   struct fcstate *fcstate = cbdata;
2300   Solvable *s;
2301   Id rpmdbid;
2302   int i;
2303   FILE *fp;
2304
2305   if (!p)
2306     {
2307       rpm_byrpmdbid(0, 0, &fcstate->rpmdbstate);
2308       return 0;
2309     }
2310   s = pool_id2solvable(pool, p);
2311   if (pool->installed && s->repo == pool->installed)
2312     {
2313       if (!s->repo->rpmdbid)
2314         return 0;
2315       rpmdbid = s->repo->rpmdbid[p - s->repo->start];
2316       if (!rpmdbid)
2317         return 0;
2318        return rpm_byrpmdbid(rpmdbid, 0, &fcstate->rpmdbstate);
2319     }
2320   for (i = 0; i < fcstate->newpkgscnt; i++)
2321     if (fcstate->checkq->elements[i] == p)
2322       break;
2323   if (i == fcstate->newpkgscnt)
2324     return 0;
2325   fp = fcstate->newpkgsfps[i];
2326   if (!fp)
2327     return 0;
2328   rewind(fp);
2329   return rpm_byfp(fp, pool_solvable2str(pool, s), &fcstate->rpmdbstate);
2330 }
2331
2332
2333 void
2334 runrpm(const char *arg, const char *name, int dupfd3)
2335 {
2336   pid_t pid;
2337   int status;
2338
2339   if ((pid = fork()) == (pid_t)-1)
2340     {
2341       perror("fork");
2342       exit(1);
2343     }
2344   if (pid == 0)
2345     {
2346       if (dupfd3 != -1 && dupfd3 != 3)
2347         {
2348           dup2(dupfd3, 3);
2349           close(dupfd3);
2350         }
2351       if (dupfd3 != -1)
2352         fcntl(3, F_SETFD, 0);   /* clear CLOEXEC */
2353       if (strcmp(arg, "-e") == 0)
2354         execlp("rpm", "rpm", arg, "--nodeps", "--nodigest", "--nosignature", name, (char *)0);
2355       else
2356         execlp("rpm", "rpm", arg, "--force", "--nodeps", "--nodigest", "--nosignature", name, (char *)0);
2357       perror("rpm");
2358       _exit(0);
2359     }
2360   while (waitpid(pid, &status, 0) != pid)
2361     ;
2362   if (status)
2363     {
2364       printf("rpm failed\n");
2365       exit(1);
2366     }
2367 }
2368
2369 #endif
2370
2371 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
2372
2373 void
2374 rundpkg(const char *arg, const char *name, int dupfd3)
2375 {
2376   pid_t pid;
2377   int status;
2378
2379   if ((pid = fork()) == (pid_t)-1)
2380     {
2381       perror("fork");
2382       exit(1);
2383     }
2384   if (pid == 0)
2385     {
2386       if (dupfd3 != -1 && dupfd3 != 3)
2387         {
2388           dup2(dupfd3, 3);
2389           close(dupfd3);
2390         }
2391       if (dupfd3 != -1)
2392         fcntl(3, F_SETFD, 0);   /* clear CLOEXEC */
2393       if (strcmp(arg, "--install") == 0)
2394         execlp("dpkg", "dpkg", "--install", "--force", "all", name, (char *)0);
2395       else
2396         execlp("dpkg", "dpkg", "--remove", "--force", "all", name, (char *)0);
2397       perror("dpkg");
2398       _exit(0);
2399     }
2400   while (waitpid(pid, &status, 0) != pid)
2401     ;
2402   if (status)
2403     {
2404       printf("dpkg failed\n");
2405       exit(1);
2406     }
2407 }
2408
2409 #endif
2410
2411 static Id
2412 nscallback(Pool *pool, void *data, Id name, Id evr)
2413 {
2414   if (name == NAMESPACE_PRODUCTBUDDY)
2415     {
2416       /* SUSE specific hack: each product has an associated rpm */
2417       Solvable *s = pool->solvables + evr;
2418       Id p, pp, cap;
2419
2420       cap = pool_str2id(pool, pool_tmpjoin(pool, "product(", pool_id2str(pool, s->name) + 8, ")"), 0);
2421       if (!cap)
2422         return 0;
2423       cap = pool_rel2id(pool, cap, s->evr, REL_EQ, 0);
2424       if (!cap)
2425         return 0;
2426       FOR_PROVIDES(p, pp, cap)
2427         {
2428           Solvable *ps = pool->solvables + p;
2429           if (ps->repo == s->repo && ps->arch == s->arch)
2430             break;
2431         }
2432       return p;
2433     }
2434   return 0;
2435 }
2436
2437 #ifdef SOFTLOCKS_PATH
2438
2439 void
2440 addsoftlocks(Pool *pool, Queue *job)
2441 {
2442   FILE *fp;
2443   Id type, id, p, pp;
2444   char *bp, *ep, buf[4096];
2445
2446   if ((fp = fopen(SOFTLOCKS_PATH, "r")) == 0)
2447     return;
2448   while((bp = fgets(buf, sizeof(buf), fp)) != 0)
2449     {
2450       while (*bp == ' ' || *bp == '\t')
2451         bp++;
2452       if (!*bp || *bp == '#')
2453         continue;
2454       for (ep = bp; *ep; ep++)
2455         if (*ep == ' ' || *ep == '\t' || *ep == '\n')
2456           break;
2457       *ep = 0;
2458       type = SOLVER_SOLVABLE_NAME;
2459       if (!strncmp(bp, "provides:", 9) && bp[9])
2460         {
2461           type = SOLVER_SOLVABLE_PROVIDES;
2462           bp += 9;
2463         }
2464       id = pool_str2id(pool, bp, 1);
2465       if (pool->installed)
2466         {
2467           FOR_JOB_SELECT(p, pp, type, id)
2468             if (pool->solvables[p].repo == pool->installed)
2469               break;
2470           if (p)
2471             continue;   /* ignore, as it is already installed */
2472         }
2473       queue_push2(job, SOLVER_LOCK|SOLVER_WEAK|type, id);
2474     }
2475   fclose(fp);
2476 }
2477
2478 #endif
2479
2480
2481 void
2482 rewrite_repos(Pool *pool, Id *addedfileprovides)
2483 {
2484   Repo *repo;
2485   Repodata *data;
2486   Map providedids;
2487   Queue fileprovidesq;
2488   Id id;
2489   int i, j, n, nprovidedids;
2490   struct repoinfo *cinfo;
2491
2492   map_init(&providedids, pool->ss.nstrings);
2493   queue_init(&fileprovidesq);
2494   for (nprovidedids = 0; (id = addedfileprovides[nprovidedids]) != 0; nprovidedids++)
2495     MAPSET(&providedids, id);
2496   FOR_REPOS(i, repo)
2497     {
2498       /* make sure this repo has just one main repodata */
2499       if (!repo->nrepodata)
2500         continue;
2501       cinfo = repo->appdata;
2502       data = repo->repodata + 1;
2503       if (data->store.pagefd == -1)
2504         continue;
2505       if (repodata_lookup_idarray(data, SOLVID_META, REPOSITORY_ADDEDFILEPROVIDES, &fileprovidesq))
2506         {
2507           n = 0;
2508           for (j = 0; j < fileprovidesq.count; j++)
2509             if (MAPTST(&providedids, fileprovidesq.elements[j]))
2510               n++;
2511           if (n == nprovidedids)
2512             continue;   /* nothing new added */
2513         }
2514       /* oh my! */
2515       for (j = 0; addedfileprovides[j]; j++)
2516         repodata_add_idarray(data, SOLVID_META, REPOSITORY_ADDEDFILEPROVIDES, addedfileprovides[j]);
2517       repodata_internalize(data);
2518       writecachedrepo(repo, data, 0, cinfo ? cinfo->cookie : installedcookie);
2519     }
2520   queue_free(&fileprovidesq);
2521   map_free(&providedids);
2522 }
2523
2524 static void
2525 select_patches(Pool *pool, Queue *job)
2526 {
2527   Id p, pp;
2528   int pruneyou = 0;
2529   Map installedmap;
2530   Solvable *s;
2531
2532   map_init(&installedmap, pool->nsolvables);
2533   if (pool->installed)
2534     FOR_REPO_SOLVABLES(pool->installed, p, s)
2535       MAPSET(&installedmap, p);
2536
2537   /* install all patches */
2538   for (p = 1; p < pool->nsolvables; p++)
2539     {
2540       const char *type;
2541       int r;
2542       Id p2;
2543
2544       s = pool->solvables + p;
2545       if (strncmp(pool_id2str(pool, s->name), "patch:", 6) != 0)
2546         continue;
2547       FOR_PROVIDES(p2, pp, s->name)
2548         {
2549           Solvable *s2 = pool->solvables + p2;
2550           if (s2->name != s->name)
2551             continue;
2552           r = pool_evrcmp(pool, s->evr, s2->evr, EVRCMP_COMPARE);
2553           if (r < 0 || (r == 0 && p > p2))
2554             break;
2555         }
2556       if (p2)
2557         continue;
2558       type = solvable_lookup_str(s, SOLVABLE_PATCHCATEGORY);
2559       if (type && !strcmp(type, "optional"))
2560         continue;
2561       r = solvable_trivial_installable_map(s, &installedmap, 0);
2562       if (r == -1)
2563         continue;
2564       if (solvable_lookup_bool(s, UPDATE_RESTART) && r == 0)
2565         {
2566           if (!pruneyou++)
2567             queue_empty(job);
2568         }
2569       else if (pruneyou)
2570         continue;
2571       queue_push2(job, SOLVER_SOLVABLE, p);
2572     }
2573   map_free(&installedmap);
2574 }
2575
2576 #define MODE_LIST        0
2577 #define MODE_INSTALL     1
2578 #define MODE_ERASE       2
2579 #define MODE_UPDATE      3
2580 #define MODE_DISTUPGRADE 4
2581 #define MODE_VERIFY      5
2582 #define MODE_PATCH       6
2583 #define MODE_INFO        7
2584 #define MODE_REPOLIST    8
2585 #define MODE_SEARCH      9
2586 #define MODE_ERASECLEAN  10
2587
2588 void
2589 usage(int r)
2590 {
2591   fprintf(stderr, "Usage: solv COMMAND <select>\n");
2592   fprintf(stderr, "\n");
2593   fprintf(stderr, "    dist-upgrade: replace installed packages with\n");
2594   fprintf(stderr, "                  versions from the repositories\n");
2595   fprintf(stderr, "    erase:        erase installed packages\n");
2596   fprintf(stderr, "    info:         display package information\n");
2597   fprintf(stderr, "    install:      install packages\n");
2598   fprintf(stderr, "    list:         list packages\n");
2599   fprintf(stderr, "    repos:        list enabled repositories\n");
2600   fprintf(stderr, "    search:       search name/summary/description\n");
2601   fprintf(stderr, "    update:       update installed packages\n");
2602   fprintf(stderr, "    verify:       check dependencies of installed packages\n");
2603   fprintf(stderr, "\n");
2604   exit(r);
2605 }
2606
2607 int
2608 main(int argc, char **argv)
2609 {
2610   Pool *pool;
2611   Repo *commandlinerepo = 0;
2612   Id *commandlinepkgs = 0;
2613   Id p, pp;
2614   struct repoinfo *repoinfos;
2615   int nrepoinfos = 0;
2616   int mainmode = 0, mode = 0;
2617   int i, newpkgs;
2618   Queue job, checkq;
2619   Solver *solv = 0;
2620   Transaction *trans;
2621   char inbuf[128], *ip;
2622   int allpkgs = 0;
2623   FILE **newpkgsfps;
2624   Id *addedfileprovides = 0;
2625   Id repofilter = 0;
2626
2627   argc--;
2628   argv++;
2629   if (!argv[0])
2630     usage(1);
2631   if (!strcmp(argv[0], "install") || !strcmp(argv[0], "in"))
2632     {
2633       mainmode = MODE_INSTALL;
2634       mode = SOLVER_INSTALL;
2635     }
2636   else if (!strcmp(argv[0], "patch"))
2637     {
2638       mainmode = MODE_PATCH;
2639       mode = SOLVER_INSTALL;
2640     }
2641   else if (!strcmp(argv[0], "erase") || !strcmp(argv[0], "rm"))
2642     {
2643       mainmode = MODE_ERASE;
2644       mode = SOLVER_ERASE;
2645     }
2646   else if (!strcmp(argv[0], "eraseclean") || !strcmp(argv[0], "rmclean"))
2647     {
2648       mainmode = MODE_ERASECLEAN;
2649       mode = SOLVER_ERASE;
2650     }
2651   else if (!strcmp(argv[0], "list"))
2652     {
2653       mainmode = MODE_LIST;
2654       mode = 0;
2655     }
2656   else if (!strcmp(argv[0], "info"))
2657     {
2658       mainmode = MODE_INFO;
2659       mode = 0;
2660     }
2661   else if (!strcmp(argv[0], "search"))
2662     {
2663       mainmode = MODE_SEARCH;
2664       mode = 0;
2665     }
2666   else if (!strcmp(argv[0], "verify"))
2667     {
2668       mainmode = MODE_VERIFY;
2669       mode = SOLVER_VERIFY;
2670     }
2671   else if (!strcmp(argv[0], "update") || !strcmp(argv[0], "up"))
2672     {
2673       mainmode = MODE_UPDATE;
2674       mode = SOLVER_UPDATE;
2675     }
2676   else if (!strcmp(argv[0], "dist-upgrade") || !strcmp(argv[0], "dup"))
2677     {
2678       mainmode = MODE_DISTUPGRADE;
2679       mode = SOLVER_UPDATE;
2680     }
2681   else if (!strcmp(argv[0], "repos") || !strcmp(argv[0], "repolist") || !strcmp(argv[0], "lr"))
2682     {
2683       mainmode = MODE_REPOLIST;
2684       mode = 0;
2685     }
2686   else
2687     usage(1);
2688
2689   pool = pool_create();
2690
2691 #if 0
2692   {
2693     const char *langs[] = {"de_DE", "de", "en"};
2694     pool_set_languages(pool, langs, sizeof(langs)/sizeof(*langs));
2695   }
2696 #endif
2697
2698 #ifdef FEDORA
2699   pool->obsoleteusescolors = 1;
2700 #endif
2701   pool_setloadcallback(pool, load_stub, 0);
2702   pool->nscallback = nscallback;
2703   // pool_setdebuglevel(pool, 2);
2704   setarch(pool);
2705   repoinfos = read_repoinfos(pool, REPOINFO_PATH, &nrepoinfos);
2706
2707   if (mainmode == MODE_REPOLIST)
2708     {
2709       int j = 1;
2710       for (i = 0; i < nrepoinfos; i++)
2711         {
2712           struct repoinfo *cinfo = repoinfos + i;
2713           if (!cinfo->enabled)
2714             continue;
2715           printf("%d: %-20s %s (prio %d)\n", j++, cinfo->alias, cinfo->name, cinfo->priority);
2716         }
2717       exit(0);
2718     }
2719
2720   read_repos(pool, repoinfos, nrepoinfos);
2721
2722   if (argc > 2 && !strcmp(argv[1], "-r"))
2723     {
2724       const char *rname = argv[2], *rp;
2725       for (rp = rname; *rp; rp++)
2726         if (*rp <= '0' || *rp >= '9')
2727           break;
2728       if (!*rp)
2729         {
2730           /* repo specified by number */
2731           int rnum = atoi(rname);
2732           for (i = 0; i < nrepoinfos; i++)
2733             {
2734               struct repoinfo *cinfo = repoinfos + i;
2735               if (!cinfo->enabled)
2736                 continue;
2737               if (--rnum == 0)
2738                 repofilter = cinfo->repo->repoid;
2739             }
2740         }
2741       else
2742         {
2743           /* repo specified by alias */
2744           Repo *repo;
2745           FOR_REPOS(i, repo)
2746             {
2747               if (!strcasecmp(rname, repo->name))
2748                 repofilter = repo->repoid;
2749             }
2750         }
2751       if (!repofilter)
2752         {
2753           fprintf(stderr, "%s: no such repo\n", rname);
2754           exit(1);
2755         }
2756       argc -= 2;
2757       argv += 2;
2758     }
2759   if (mainmode == MODE_SEARCH)
2760     {
2761       Dataiterator di;
2762       Map m;
2763       if (argc != 2)
2764         usage(1);
2765       map_init(&m, pool->nsolvables);
2766       dataiterator_init(&di, pool, 0, 0, 0, argv[1], SEARCH_SUBSTRING|SEARCH_NOCASE);
2767       dataiterator_set_keyname(&di, SOLVABLE_NAME);
2768       dataiterator_set_search(&di, 0, 0);
2769       while (dataiterator_step(&di))
2770         MAPSET(&m, di.solvid);
2771       dataiterator_set_keyname(&di, SOLVABLE_SUMMARY);
2772       dataiterator_set_search(&di, 0, 0);
2773       while (dataiterator_step(&di))
2774         MAPSET(&m, di.solvid);
2775       dataiterator_set_keyname(&di, SOLVABLE_DESCRIPTION);
2776       dataiterator_set_search(&di, 0, 0);
2777       while (dataiterator_step(&di))
2778         MAPSET(&m, di.solvid);
2779       dataiterator_free(&di);
2780
2781       for (p = 1; p < pool->nsolvables; p++)
2782         {
2783           Solvable *s = pool_id2solvable(pool, p);
2784           if (!MAPTST(&m, p))
2785             continue;
2786           printf("  - %s: %s\n", pool_solvable2str(pool, s), solvable_lookup_str(s, SOLVABLE_SUMMARY));
2787         }
2788       map_free(&m);
2789       exit(0);
2790     }
2791
2792
2793   if (mainmode == MODE_LIST || mainmode == MODE_INSTALL)
2794     {
2795       for (i = 1; i < argc; i++)
2796         {
2797           int l;
2798           l = strlen(argv[i]);
2799 #ifndef DEBIAN
2800           if (l <= 4 || strcmp(argv[i] + l - 4, ".rpm"))
2801             continue;
2802 #else
2803           if (l <= 4 || strcmp(argv[i] + l - 4, ".deb"))
2804             continue;
2805 #endif
2806           if (access(argv[i], R_OK))
2807             {
2808               perror(argv[i]);
2809               exit(1);
2810             }
2811           if (!commandlinepkgs)
2812             commandlinepkgs = solv_calloc(argc, sizeof(Id));
2813           if (!commandlinerepo)
2814             commandlinerepo = repo_create(pool, "@commandline");
2815           p = 0;
2816 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
2817           p = repo_add_rpm(commandlinerepo, (const char *)argv[i], REPO_REUSE_REPODATA|REPO_NO_INTERNALIZE);
2818 #endif
2819 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
2820           p = repo_add_deb(commandlinerepo, (const char *)argv[i], REPO_REUSE_REPODATA|REPO_NO_INTERNALIZE);
2821 #endif
2822           if (!p)
2823             {
2824               fprintf(stderr, "could not add '%s'\n", argv[i]);
2825               exit(1);
2826             }
2827           commandlinepkgs[i] = p;
2828         }
2829       if (commandlinerepo)
2830         repo_internalize(commandlinerepo);
2831     }
2832
2833   // FOR_REPOS(i, repo)
2834   //   printf("%s: %d solvables\n", repo->name, repo->nsolvables);
2835   addedfileprovides = 0;
2836   pool_addfileprovides_ids(pool, pool->installed, &addedfileprovides);
2837   if (addedfileprovides && *addedfileprovides)
2838     rewrite_repos(pool, addedfileprovides);
2839   solv_free(addedfileprovides);
2840   pool_createwhatprovides(pool);
2841
2842   queue_init(&job);
2843   for (i = 1; i < argc; i++)
2844     {
2845       Queue job2;
2846       int j;
2847
2848       if (commandlinepkgs && commandlinepkgs[i])
2849         {
2850           queue_push2(&job, SOLVER_SOLVABLE, commandlinepkgs[i]);
2851           continue;
2852         }
2853       queue_init(&job2);
2854       if (!mkselect(pool, mode, argv[i], &job2))
2855         {
2856           fprintf(stderr, "nothing matches '%s'\n", argv[i]);
2857           exit(1);
2858         }
2859       if (repofilter && !limitrepo(pool, repofilter, &job2))
2860         {
2861           fprintf(stderr, "nothing in repo matches '%s'\n", argv[i]);
2862           exit(1);
2863         }
2864       for (j = 0; j < job2.count; j++)
2865         queue_push(&job, job2.elements[j]);
2866       queue_free(&job2);
2867     }
2868
2869   if (!job.count && mainmode != MODE_UPDATE && mainmode != MODE_DISTUPGRADE && mainmode != MODE_VERIFY && mainmode != MODE_PATCH)
2870     {
2871       printf("no package matched\n");
2872       exit(1);
2873     }
2874
2875   if (!job.count)
2876     allpkgs = 1;
2877
2878   if (mainmode == MODE_LIST || mainmode == MODE_INFO)
2879     {
2880       /* list mode, no solver needed */
2881       for (i = 0; i < job.count; i += 2)
2882         {
2883           Id how = job.elements[i] & SOLVER_SELECTMASK;
2884           FOR_JOB_SELECT(p, pp, how, job.elements[i + 1])
2885             {
2886               Solvable *s = pool_id2solvable(pool, p);
2887               if (mainmode == MODE_INFO)
2888                 {
2889                   const char *str;
2890                   printf("Name:        %s\n", pool_solvable2str(pool, s));
2891                   printf("Repo:        %s\n", s->repo->name);
2892                   printf("Summary:     %s\n", solvable_lookup_str(s, SOLVABLE_SUMMARY));
2893                   str = solvable_lookup_str(s, SOLVABLE_URL);
2894                   if (str)
2895                     printf("Url:         %s\n", str);
2896                   str = solvable_lookup_str(s, SOLVABLE_LICENSE);
2897                   if (str)
2898                     printf("License:     %s\n", str);
2899                   printf("Description:\n%s\n", solvable_lookup_str(s, SOLVABLE_DESCRIPTION));
2900                   printf("\n");
2901                 }
2902               else
2903                 {
2904 #if 1
2905                   const char *sum = solvable_lookup_str_lang(s, SOLVABLE_SUMMARY, "de", 1);
2906 #else
2907                   const char *sum = solvable_lookup_str_poollang(s, SOLVABLE_SUMMARY);
2908 #endif
2909                   printf("  - %s [%s]\n", pool_solvable2str(pool, s), s->repo->name);
2910                   if (sum)
2911                     printf("    %s\n", sum);
2912                 }
2913             }
2914         }
2915       queue_free(&job);
2916       pool_free(pool);
2917       free_repoinfos(repoinfos, nrepoinfos);
2918       solv_free(commandlinepkgs);
2919 #ifdef FEDORA
2920       yum_substitute(pool, 0);
2921 #endif
2922       exit(0);
2923     }
2924
2925   if (mainmode == MODE_PATCH)
2926     select_patches(pool, &job);
2927
2928   // add mode
2929   for (i = 0; i < job.count; i += 2)
2930     {
2931       if (mode == SOLVER_UPDATE)
2932         {
2933           /* make update of not installed packages an install */
2934           FOR_JOB_SELECT(p, pp, job.elements[i], job.elements[i + 1])
2935             if (pool->installed && pool->solvables[p].repo == pool->installed)
2936               break;
2937           if (!p)
2938             {
2939               job.elements[i] |= SOLVER_INSTALL;
2940               continue;
2941             }
2942         }
2943       job.elements[i] |= mode;
2944       if (mainmode == MODE_ERASECLEAN)
2945         job.elements[i] |= SOLVER_CLEANDEPS;
2946     }
2947
2948   if (mainmode == MODE_DISTUPGRADE && allpkgs)
2949     {
2950       if (repofilter)
2951         queue_push2(&job, SOLVER_DISTUPGRADE|SOLVER_SOLVABLE_REPO, repofilter);
2952       else
2953         queue_push2(&job, SOLVER_DISTUPGRADE|SOLVER_SOLVABLE_ALL, 0);
2954     }
2955   if (mainmode == MODE_UPDATE && allpkgs)
2956     {
2957       if (repofilter)
2958         queue_push2(&job, SOLVER_UPDATE|SOLVER_SOLVABLE_REPO, repofilter);
2959       else
2960         queue_push2(&job, SOLVER_UPDATE|SOLVER_SOLVABLE_ALL, 0);
2961     }
2962   if (mainmode == MODE_VERIFY && allpkgs)
2963     {
2964       if (repofilter)
2965         queue_push2(&job, SOLVER_VERIFY|SOLVER_SOLVABLE_REPO, repofilter);
2966       else
2967         queue_push2(&job, SOLVER_VERIFY|SOLVER_SOLVABLE_ALL, 0);
2968     }
2969
2970   // multiversion test
2971   // queue_push2(&job, SOLVER_NOOBSOLETES|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae", 1));
2972   // queue_push2(&job, SOLVER_NOOBSOLETES|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae-base", 1));
2973   // queue_push2(&job, SOLVER_NOOBSOLETES|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae-extra", 1));
2974
2975 #ifdef SOFTLOCKS_PATH
2976   addsoftlocks(pool, &job);
2977 #endif
2978
2979 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
2980 rerunsolver:
2981 #endif
2982   for (;;)
2983     {
2984       Id problem, solution;
2985       int pcnt, scnt;
2986
2987       solv = solver_create(pool);
2988       solver_set_flag(solv, SOLVER_FLAG_IGNORE_ALREADY_RECOMMENDED, 1);
2989       solver_set_flag(solv, SOLVER_FLAG_SPLITPROVIDES, 1);
2990       if (mainmode == MODE_ERASE || mainmode == MODE_ERASECLEAN)
2991         solver_set_flag(solv, SOLVER_FLAG_ALLOW_UNINSTALL, 1);  /* don't nag */
2992
2993       if (!solver_solve(solv, &job))
2994         break;
2995       pcnt = solver_problem_count(solv);
2996       printf("Found %d problems:\n", pcnt);
2997       for (problem = 1; problem <= pcnt; problem++)
2998         {
2999           int take = 0;
3000           printf("Problem %d:\n", problem);
3001           solver_printprobleminfo(solv, problem);
3002           printf("\n");
3003           scnt = solver_solution_count(solv, problem);
3004           for (solution = 1; solution <= scnt; solution++)
3005             {
3006               printf("Solution %d:\n", solution);
3007               solver_printsolution(solv, problem, solution);
3008               printf("\n");
3009             }
3010           for (;;)
3011             {
3012               printf("Please choose a solution: ");
3013               fflush(stdout);
3014               *inbuf = 0;
3015               if (!(ip = fgets(inbuf, sizeof(inbuf), stdin)))
3016                 {
3017                   printf("Abort.\n");
3018                   exit(1);
3019                 }
3020               while (*ip == ' ' || *ip == '\t')
3021                 ip++;
3022               if (*ip >= '0' && *ip <= '9')
3023                 {
3024                   take = atoi(ip);
3025                   if (take >= 1 && take <= scnt)
3026                     break;
3027                 }
3028               if (*ip == 's')
3029                 {
3030                   take = 0;
3031                   break;
3032                 }
3033               if (*ip == 'q')
3034                 {
3035                   printf("Abort.\n");
3036                   exit(1);
3037                 }
3038             }
3039           if (!take)
3040             continue;
3041           solver_take_solution(solv, problem, take, &job);
3042         }
3043       solver_free(solv);
3044       solv = 0;
3045     }
3046
3047   trans = solver_create_transaction(solv);
3048   if (!trans->steps.count)
3049     {
3050       printf("Nothing to do.\n");
3051       solver_free(solv);
3052       queue_free(&job);
3053       pool_free(pool);
3054       free_repoinfos(repoinfos, nrepoinfos);
3055       solv_free(commandlinepkgs);
3056 #ifdef FEDORA
3057       yum_substitute(pool, 0);
3058 #endif
3059       exit(1);
3060     }
3061   printf("\n");
3062   printf("Transaction summary:\n\n");
3063   transaction_print(trans);
3064
3065 #if !defined(FEDORA) && !defined(DEBIAN)
3066   if (1)
3067     {
3068       DUChanges duc[4];
3069       int i;
3070
3071       duc[0].path = "/";
3072       duc[1].path = "/usr/share/man";
3073       duc[2].path = "/sbin";
3074       duc[3].path = "/etc";
3075       transaction_calc_duchanges(trans, duc, 4);
3076       for (i = 0; i < 4; i++)
3077         printf("duchanges %s: %d K  %d inodes\n", duc[i].path, duc[i].kbytes, duc[i].files);
3078     }
3079 #endif
3080   printf("install size change: %d K\n", transaction_calc_installsizechange(trans));
3081   printf("\n");
3082
3083   if (!yesno("OK to continue (y/n)? "))
3084     {
3085       printf("Abort.\n");
3086       solver_free(solv);
3087       queue_free(&job);
3088       pool_free(pool);
3089       free_repoinfos(repoinfos, nrepoinfos);
3090       solv_free(commandlinepkgs);
3091 #ifdef FEDORA
3092       yum_substitute(pool, 0);
3093 #endif
3094       exit(1);
3095     }
3096
3097   queue_init(&checkq);
3098   newpkgs = transaction_installedresult(trans, &checkq);
3099   newpkgsfps = 0;
3100
3101   if (newpkgs)
3102     {
3103       int downloadsize = 0;
3104       for (i = 0; i < newpkgs; i++)
3105         {
3106           Solvable *s;
3107
3108           p = checkq.elements[i];
3109           s = pool_id2solvable(pool, p);
3110           downloadsize += solvable_lookup_num(s, SOLVABLE_DOWNLOADSIZE, 0);
3111         }
3112       printf("Downloading %d packages, %d K\n", newpkgs, downloadsize);
3113       newpkgsfps = solv_calloc(newpkgs, sizeof(*newpkgsfps));
3114       for (i = 0; i < newpkgs; i++)
3115         {
3116           unsigned int medianr;
3117           char *loc;
3118           Solvable *s;
3119           struct repoinfo *cinfo;
3120           const unsigned char *chksum;
3121           Id chksumtype;
3122           Dataiterator di;
3123
3124           p = checkq.elements[i];
3125           s = pool_id2solvable(pool, p);
3126           if (s->repo == commandlinerepo)
3127             {
3128               loc = solvable_get_location(s, &medianr);
3129               if (!(newpkgsfps[i] = fopen(loc, "r")))
3130                 {
3131                   perror(loc);
3132                   exit(1);
3133                 }
3134               putchar('.');
3135               continue;
3136             }
3137           cinfo = s->repo->appdata;
3138           if (!cinfo)
3139             {
3140               printf("%s: no repository information\n", s->repo->name);
3141               exit(1);
3142             }
3143           loc = solvable_get_location(s, &medianr);
3144           if (!loc)
3145              continue;
3146
3147           if (pool->installed && pool->installed->nsolvables)
3148             {
3149               /* try a delta first */
3150               char *matchname = strdup(pool_id2str(pool, s->name));
3151               dataiterator_init(&di, pool, s->repo, SOLVID_META, DELTA_PACKAGE_NAME, matchname, SEARCH_STRING);
3152               dataiterator_prepend_keyname(&di, REPOSITORY_DELTAINFO);
3153               while (dataiterator_step(&di))
3154                 {
3155                   Id baseevr, op;
3156
3157                   dataiterator_setpos_parent(&di);
3158                   if (pool_lookup_id(pool, SOLVID_POS, DELTA_PACKAGE_EVR) != s->evr ||
3159                       pool_lookup_id(pool, SOLVID_POS, DELTA_PACKAGE_ARCH) != s->arch)
3160                     continue;
3161                   baseevr = pool_lookup_id(pool, SOLVID_POS, DELTA_BASE_EVR);
3162                   FOR_PROVIDES(op, pp, s->name)
3163                     {
3164                       Solvable *os = pool->solvables + op;
3165                       if (os->repo == pool->installed && os->name == s->name && os->arch == s->arch && os->evr == baseevr)
3166                         break;
3167                     }
3168                   if (op && access("/usr/bin/applydeltarpm", X_OK) == 0)
3169                     {
3170                       /* base is installed, run sequence check */
3171                       const char *seqname;
3172                       const char *seqevr;
3173                       const char *seqnum;
3174                       const char *seq;
3175                       const char *dloc;
3176                       FILE *fp;
3177                       char cmd[128];
3178                       int newfd;
3179
3180                       seqname = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NAME);
3181                       seqevr = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_EVR);
3182                       seqnum = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NUM);
3183                       seq = pool_tmpjoin(pool, seqname, "-", seqevr);
3184                       seq = pool_tmpappend(pool, seq, "-", seqnum);
3185 #ifdef FEDORA
3186                       sprintf(cmd, "/usr/bin/applydeltarpm -a %s -c -s ", pool_id2str(pool, s->arch));
3187 #else
3188                       sprintf(cmd, "/usr/bin/applydeltarpm -c -s ");
3189 #endif
3190                       if (system(pool_tmpjoin(pool, cmd, seq, 0)) != 0)
3191                         continue;       /* didn't match */
3192                       /* looks good, download delta */
3193                       chksumtype = 0;
3194                       chksum = pool_lookup_bin_checksum(pool, SOLVID_POS, DELTA_CHECKSUM, &chksumtype);
3195                       if (!chksumtype)
3196                         continue;       /* no way! */
3197                       dloc = pool_lookup_str(pool, SOLVID_POS, DELTA_LOCATION_DIR);
3198                       dloc = pool_tmpappend(pool, dloc, "/", pool_lookup_str(pool, SOLVID_POS, DELTA_LOCATION_NAME));
3199                       dloc = pool_tmpappend(pool, dloc, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_LOCATION_EVR));
3200                       dloc = pool_tmpappend(pool, dloc, ".", pool_lookup_str(pool, SOLVID_POS, DELTA_LOCATION_SUFFIX));
3201                       if ((fp = curlfopen(cinfo, dloc, 0, chksum, chksumtype, 0)) == 0)
3202                         continue;
3203                       /* got it, now reconstruct */
3204                       newfd = opentmpfile();
3205 #ifdef FEDORA
3206                       sprintf(cmd, "applydeltarpm -a %s /dev/fd/%d /dev/fd/%d", pool_id2str(pool, s->arch), fileno(fp), newfd);
3207 #else
3208                       sprintf(cmd, "applydeltarpm /dev/fd/%d /dev/fd/%d", fileno(fp), newfd);
3209 #endif
3210                       fcntl(fileno(fp), F_SETFD, 0);
3211                       if (system(cmd))
3212                         {
3213                           close(newfd);
3214                           fclose(fp);
3215                           continue;
3216                         }
3217                       lseek(newfd, 0, SEEK_SET);
3218                       chksumtype = 0;
3219                       chksum = solvable_lookup_bin_checksum(s, SOLVABLE_CHECKSUM, &chksumtype);
3220                       if (chksumtype && !verify_checksum(newfd, loc, chksum, chksumtype))
3221                         {
3222                           close(newfd);
3223                           fclose(fp);
3224                           continue;
3225                         }
3226                       newpkgsfps[i] = fdopen(newfd, "r");
3227                       fclose(fp);
3228                       break;
3229                     }
3230                 }
3231               dataiterator_free(&di);
3232               solv_free(matchname);
3233             }
3234
3235           if (newpkgsfps[i])
3236             {
3237               putchar('d');
3238               fflush(stdout);
3239               continue;         /* delta worked! */
3240             }
3241           if (cinfo->type == TYPE_SUSETAGS)
3242             {
3243               const char *datadir = repo_lookup_str(cinfo->repo, SOLVID_META, SUSETAGS_DATADIR);
3244               loc = pool_tmpjoin(pool, datadir ? datadir : "suse", "/", loc);
3245             }
3246           chksumtype = 0;
3247           chksum = solvable_lookup_bin_checksum(s, SOLVABLE_CHECKSUM, &chksumtype);
3248           if ((newpkgsfps[i] = curlfopen(cinfo, loc, 0, chksum, chksumtype, 0)) == 0)
3249             {
3250               printf("\n%s: %s not found in repository\n", s->repo->name, loc);
3251               exit(1);
3252             }
3253           putchar('.');
3254           fflush(stdout);
3255         }
3256       putchar('\n');
3257     }
3258
3259 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
3260   if (newpkgs)
3261     {
3262       Queue conflicts;
3263       struct fcstate fcstate;
3264
3265       printf("Searching for file conflicts\n");
3266       queue_init(&conflicts);
3267       fcstate.rpmdbstate = 0;
3268       fcstate.newpkgscnt = newpkgs;
3269       fcstate.checkq = &checkq;
3270       fcstate.newpkgsfps = newpkgsfps;
3271       pool_findfileconflicts(pool, &checkq, newpkgs, &conflicts, &fileconflict_cb, &fcstate);
3272       if (conflicts.count)
3273         {
3274           printf("\n");
3275           for (i = 0; i < conflicts.count; i += 5)
3276             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 + 3]));
3277           printf("\n");
3278           if (yesno("Re-run solver (y/n/q)? "))
3279             {
3280               for (i = 0; i < newpkgs; i++)
3281                 if (newpkgsfps[i])
3282                   fclose(newpkgsfps[i]);
3283               newpkgsfps = solv_free(newpkgsfps);
3284               solver_free(solv);
3285               pool_add_fileconflicts_deps(pool, &conflicts);
3286               pool_createwhatprovides(pool);    /* Hmm... */
3287               goto rerunsolver;
3288             }
3289         }
3290       queue_free(&conflicts);
3291     }
3292 #endif
3293
3294   printf("Committing transaction:\n\n");
3295   transaction_order(trans, 0);
3296   for (i = 0; i < trans->steps.count; i++)
3297     {
3298 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
3299       const char *evr, *evrp, *nvra;
3300 #endif
3301       Solvable *s;
3302       int j;
3303       FILE *fp;
3304
3305       p = trans->steps.elements[i];
3306       s = pool_id2solvable(pool, p);
3307       Id type = transaction_type(trans, p, SOLVER_TRANSACTION_RPM_ONLY);
3308       switch(type)
3309         {
3310         case SOLVER_TRANSACTION_ERASE:
3311           printf("erase %s\n", pool_solvid2str(pool, p));
3312 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
3313           if (!s->repo->rpmdbid || !s->repo->rpmdbid[p - s->repo->start])
3314             continue;
3315           /* strip epoch from evr */
3316           evr = evrp = pool_id2str(pool, s->evr);
3317           while (*evrp >= '0' && *evrp <= '9')
3318             evrp++;
3319           if (evrp > evr && evrp[0] == ':' && evrp[1])
3320             evr = evrp + 1;
3321           nvra = pool_tmpjoin(pool, pool_id2str(pool, s->name), "-", evr);
3322           nvra = pool_tmpappend(pool, nvra, ".", pool_id2str(pool, s->arch));
3323           runrpm("-e", nvra, -1);       /* too bad that --querybynumber doesn't work */
3324 #endif
3325 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
3326           rundpkg("--remove", pool_id2str(pool, s->name), 0);
3327 #endif
3328           break;
3329         case SOLVER_TRANSACTION_INSTALL:
3330         case SOLVER_TRANSACTION_MULTIINSTALL:
3331           printf("install %s\n", pool_solvid2str(pool, p));
3332           for (j = 0; j < newpkgs; j++)
3333             if (checkq.elements[j] == p)
3334               break;
3335           fp = j < newpkgs ? newpkgsfps[j] : 0;
3336           if (!fp)
3337             continue;
3338           rewind(fp);
3339           lseek(fileno(fp), 0, SEEK_SET);
3340 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
3341           runrpm(type == SOLVER_TRANSACTION_MULTIINSTALL ? "-i" : "-U", "/dev/fd/3", fileno(fp));
3342 #endif
3343 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
3344           rundpkg("--install", "/dev/fd/3", fileno(fp));
3345 #endif
3346           fclose(fp);
3347           newpkgsfps[j] = 0;
3348           break;
3349         default:
3350           break;
3351         }
3352     }
3353
3354   for (i = 0; i < newpkgs; i++)
3355     if (newpkgsfps[i])
3356       fclose(newpkgsfps[i]);
3357   solv_free(newpkgsfps);
3358   queue_free(&checkq);
3359   solver_free(solv);
3360   queue_free(&job);
3361   pool_free(pool);
3362   free_repoinfos(repoinfos, nrepoinfos);
3363   solv_free(commandlinepkgs);
3364 #ifdef FEDORA
3365   yum_substitute(pool, 0);
3366 #endif
3367   exit(0);
3368 }