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 #ifdef ENABLE_SUSEREPO
1615   const char *descrdir;
1616   int defvendor;
1617 #endif
1618   struct stat stb;
1619   Pool *sigpool = 0;
1620   Repodata *data;
1621   int badchecksum;
1622   int dorefresh;
1623 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
1624   FILE *fpr;
1625   int j;
1626 #endif
1627
1628   repo = repo_create(pool, "@System");
1629 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
1630   printf("rpm database:");
1631   if (stat("/var/lib/rpm/Packages", &stb))
1632     memset(&stb, 0, sizeof(&stb));
1633 #endif
1634 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
1635   printf("dpgk database:");
1636   if (stat("/var/lib/dpkg/status", &stb))
1637     memset(&stb, 0, sizeof(&stb));
1638 #endif
1639   calc_checksum_stat(&stb, REPOKEY_TYPE_SHA256, installedcookie);
1640   if (usecachedrepo(repo, 0, installedcookie, 0))
1641     printf(" cached\n");
1642   else
1643     {
1644 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
1645       FILE *ofp;
1646       int done = 0;
1647 #endif
1648       printf(" reading\n");
1649
1650 #if defined(ENABLE_SUSEREPO) && defined(PRODUCTS_PATH)
1651       repo_add_products(repo, PRODUCTS_PATH, 0, REPO_NO_INTERNALIZE);
1652 #endif
1653 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
1654       if ((ofp = fopen(calccachepath(repo, 0), "r")) != 0)
1655         {
1656           Repo *ref = repo_create(pool, "@System.old");
1657           if (!repo_add_solv(ref, ofp))
1658             {
1659               repo_add_rpmdb(repo, ref, 0, REPO_REUSE_REPODATA);
1660               done = 1;
1661             }
1662           fclose(ofp);
1663           repo_free(ref, 1);
1664         }
1665       if (!done)
1666         repo_add_rpmdb(repo, 0, 0, REPO_REUSE_REPODATA);
1667 #else
1668 # if defined(ENABLE_DEBIAN) && defined(DEBIAN)
1669         repo_add_debdb(repo, 0, REPO_REUSE_REPODATA);
1670 # endif
1671 #endif
1672       writecachedrepo(repo, 0, 0, installedcookie);
1673     }
1674   pool_set_installed(pool, repo);
1675
1676   for (i = 0; i < nrepoinfos; i++)
1677     {
1678       cinfo = repoinfos + i;
1679       if (!cinfo->enabled)
1680         continue;
1681
1682       repo = repo_create(pool, cinfo->alias);
1683       cinfo->repo = repo;
1684       repo->appdata = cinfo;
1685       repo->priority = 99 - cinfo->priority;
1686
1687       dorefresh = cinfo->autorefresh;
1688       if (dorefresh && cinfo->metadata_expire && stat(calccachepath(repo, 0), &stb) == 0)
1689         {
1690           if (cinfo->metadata_expire == -1 || time(0) - stb.st_mtime < cinfo->metadata_expire)
1691             dorefresh = 0;
1692         }
1693       if (!dorefresh && usecachedrepo(repo, 0, 0, 0))
1694         {
1695           printf("repo '%s':", cinfo->alias);
1696           printf(" cached\n");
1697           continue;
1698         }
1699       badchecksum = 0;
1700       switch (cinfo->type)
1701         {
1702 #ifdef ENABLE_RPMMD
1703         case TYPE_RPMMD:
1704           printf("rpmmd repo '%s':", cinfo->alias);
1705           fflush(stdout);
1706           if ((fp = curlfopen(cinfo, "repodata/repomd.xml", 0, 0, 0, 0)) == 0)
1707             {
1708               printf(" no repomd.xml file, skipped\n");
1709               repo_free(repo, 1);
1710               cinfo->repo = 0;
1711               break;
1712             }
1713           calc_checksum_fp(fp, REPOKEY_TYPE_SHA256, cinfo->cookie);
1714           if (usecachedrepo(repo, 0, cinfo->cookie, 1))
1715             {
1716               printf(" cached\n");
1717               fclose(fp);
1718               break;
1719             }
1720           if (cinfo->repo_gpgcheck)
1721             {
1722               sigfp = curlfopen(cinfo, "repodata/repomd.xml.asc", 0, 0, 0, 0);
1723               if (!sigfp)
1724                 {
1725                   printf(" unsigned, skipped\n");
1726                   fclose(fp);
1727                   break;
1728                 }
1729               if (!sigpool)
1730                 sigpool = read_sigs();
1731               if (!checksig(sigpool, fp, sigfp))
1732                 {
1733                   printf(" checksig failed, skipped\n");
1734                   fclose(sigfp);
1735                   fclose(fp);
1736                   break;
1737                 }
1738               fclose(sigfp);
1739             }
1740           repo_add_repomdxml(repo, fp, 0);
1741           fclose(fp);
1742           printf(" fetching\n");
1743           filename = repomd_find(repo, "primary", &filechksum, &filechksumtype);
1744           if (filename && (fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, &badchecksum)) != 0)
1745             {
1746               repo_add_rpmmd(repo, fp, 0, 0);
1747               fclose(fp);
1748             }
1749           if (badchecksum)
1750             break;      /* hopeless */
1751
1752           filename = repomd_find(repo, "updateinfo", &filechksum, &filechksumtype);
1753           if (filename && (fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, &badchecksum)) != 0)
1754             {
1755               repo_add_updateinfoxml(repo, fp, 0);
1756               fclose(fp);
1757             }
1758
1759           data = repo_add_repodata(repo, 0);
1760           if (!repomd_add_ext(repo, data, "deltainfo"))
1761             repomd_add_ext(repo, data, "prestodelta");
1762           repomd_add_ext(repo, data, "filelists");
1763           repodata_internalize(data);
1764           if (!badchecksum)
1765             writecachedrepo(repo, 0, 0, cinfo->cookie);
1766           repodata_create_stubs(repo_last_repodata(repo));
1767           break;
1768 #endif
1769
1770 #ifdef ENABLE_SUSEREPO
1771         case TYPE_SUSETAGS:
1772           printf("susetags repo '%s':", cinfo->alias);
1773           fflush(stdout);
1774           descrdir = 0;
1775           defvendor = 0;
1776           if ((fp = curlfopen(cinfo, "content", 0, 0, 0, 0)) == 0)
1777             {
1778               printf(" no content file, skipped\n");
1779               repo_free(repo, 1);
1780               cinfo->repo = 0;
1781               break;
1782             }
1783           calc_checksum_fp(fp, REPOKEY_TYPE_SHA256, cinfo->cookie);
1784           if (usecachedrepo(repo, 0, cinfo->cookie, 1))
1785             {
1786               printf(" cached\n");
1787               fclose(fp);
1788               break;
1789             }
1790           if (cinfo->repo_gpgcheck)
1791             {
1792               sigfp = curlfopen(cinfo, "content.asc", 0, 0, 0, 0);
1793               if (!sigfp)
1794                 {
1795                   printf(" unsigned, skipped\n");
1796                   fclose(fp);
1797                   break;
1798                 }
1799               if (sigfp)
1800                 {
1801                   if (!sigpool)
1802                     sigpool = read_sigs();
1803                   if (!checksig(sigpool, fp, sigfp))
1804                     {
1805                       printf(" checksig failed, skipped\n");
1806                       fclose(sigfp);
1807                       fclose(fp);
1808                       break;
1809                     }
1810                   fclose(sigfp);
1811                 }
1812             }
1813           repo_add_content(repo, fp, 0);
1814           fclose(fp);
1815           defvendor = repo_lookup_id(repo, SOLVID_META, SUSETAGS_DEFAULTVENDOR);
1816           descrdir = repo_lookup_str(repo, SOLVID_META, SUSETAGS_DESCRDIR);
1817           if (!descrdir)
1818             descrdir = "suse/setup/descr";
1819           filename = susetags_find(repo, "packages.gz", &filechksum, &filechksumtype);
1820           if (!filename)
1821             filename = susetags_find(repo, "packages", &filechksum, &filechksumtype);
1822           if (!filename)
1823             {
1824               printf(" no packages file entry, skipped\n");
1825               break;
1826             }
1827           printf(" fetching\n");
1828           if ((fp = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, &badchecksum)) == 0)
1829             break;      /* hopeless */
1830           repo_add_susetags(repo, fp, defvendor, 0, REPO_NO_INTERNALIZE|SUSETAGS_RECORD_SHARES);
1831           fclose(fp);
1832           /* add default language */
1833           filename = susetags_find(repo, "packages.en.gz", &filechksum, &filechksumtype);
1834           if (!filename)
1835             filename = susetags_find(repo, "packages.en", &filechksum, &filechksumtype);
1836           if (filename)
1837             {
1838               if ((fp = curlfopen(cinfo, pool_tmpjoin(pool, descrdir, "/", filename), iscompressed(filename), filechksum, filechksumtype, &badchecksum)) != 0)
1839                 {
1840                   repo_add_susetags(repo, fp, defvendor, 0, REPO_NO_INTERNALIZE|REPO_REUSE_REPODATA|REPO_EXTEND_SOLVABLES);
1841                   fclose(fp);
1842                 }
1843             }
1844           repo_internalize(repo);
1845           data = repo_add_repodata(repo, 0);
1846           susetags_add_ext(repo, data);
1847           repodata_internalize(data);
1848           if (!badchecksum)
1849             writecachedrepo(repo, 0, 0, cinfo->cookie);
1850           repodata_create_stubs(repo_last_repodata(repo));
1851           break;
1852 #endif
1853
1854 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
1855         case TYPE_DEBIAN:
1856           printf("debian repo '%s':", cinfo->alias);
1857           fflush(stdout);
1858           filename = solv_dupjoin("dists/", cinfo->name, "/Release");
1859           if ((fpr = curlfopen(cinfo, filename, 0, 0, 0, 0)) == 0)
1860             {
1861               printf(" no Release file, skipped\n");
1862               repo_free(repo, 1);
1863               cinfo->repo = 0;
1864               free((char *)filename);
1865               break;
1866             }
1867           solv_free((char *)filename);
1868           if (cinfo->repo_gpgcheck)
1869             {
1870               filename = solv_dupjoin("dists/", cinfo->name, "/Release.gpg");
1871               sigfp = curlfopen(cinfo, filename, 0, 0, 0, 0);
1872               solv_free((char *)filename);
1873               if (!sigfp)
1874                 {
1875                   printf(" unsigned, skipped\n");
1876                   fclose(fpr);
1877                   break;
1878                 }
1879               if (!sigpool)
1880                 sigpool = read_sigs();
1881               if (!checksig(sigpool, fpr, sigfp))
1882                 {
1883                   printf(" checksig failed, skipped\n");
1884                   fclose(sigfp);
1885                   fclose(fpr);
1886                   break;
1887                 }
1888               fclose(sigfp);
1889             }
1890           calc_checksum_fp(fpr, REPOKEY_TYPE_SHA256, cinfo->cookie);
1891           if (usecachedrepo(repo, 0, cinfo->cookie, 1))
1892             {
1893               printf(" cached\n");
1894               fclose(fpr);
1895               break;
1896             }
1897           printf(" fetching\n");
1898           for (j = 0; j < cinfo->ncomponents; j++)
1899             {
1900               if (!(filename = debian_find_component(cinfo, fpr, cinfo->components[j], &filechksum, &filechksumtype)))
1901                 {
1902                   printf("[component %s not found]\n", cinfo->components[j]);
1903                   continue;
1904                 }
1905               if ((fp = curlfopen(cinfo, filename, iscompressed(filename), filechksum, filechksumtype, &badchecksum)) != 0)
1906                 {
1907                   repo_add_debpackages(repo, fp, 0);
1908                   fclose(fp);
1909                 }
1910               solv_free((char *)filechksum);
1911               solv_free((char *)filename);
1912             }
1913           fclose(fpr);
1914           if (!badchecksum)
1915             writecachedrepo(repo, 0, 0, cinfo->cookie);
1916           break;
1917 #endif
1918
1919         default:
1920           printf("unsupported repo '%s': skipped\n", cinfo->alias);
1921           repo_free(repo, 1);
1922           cinfo->repo = 0;
1923           break;
1924         }
1925     }
1926   if (sigpool)
1927     pool_free(sigpool);
1928 }
1929
1930
1931 int
1932 str2archid(Pool *pool, char *arch)
1933 {
1934   Id id;
1935   if (!*arch)
1936     return 0;
1937   id = pool_str2id(pool, arch, 0);
1938   if (id == ARCH_SRC || id == ARCH_NOSRC || id == ARCH_NOARCH)
1939     return id;
1940   if (pool->id2arch && (id > pool->lastarch || !pool->id2arch[id]))
1941     return 0;
1942   return id;
1943 }
1944
1945
1946 #define DEPGLOB_NAME     1
1947 #define DEPGLOB_DEP      2
1948 #define DEPGLOB_NAMEDEP  3
1949
1950 int
1951 depglob(Pool *pool, char *name, Queue *job, int what)
1952 {
1953   Id p, pp;
1954   Id id = pool_str2id(pool, name, 0);
1955   int i, match = 0;
1956
1957   if (id)
1958     {
1959       FOR_PROVIDES(p, pp, id)
1960         {
1961           Solvable *s = pool->solvables + p;
1962           match = 1;
1963           if (s->name == id && (what & DEPGLOB_NAME) != 0)
1964             {
1965               queue_push2(job, SOLVER_SOLVABLE_NAME, id);
1966               return 1;
1967             }
1968         }
1969       if (match)
1970         {
1971           if (what == DEPGLOB_NAMEDEP)
1972             printf("[using capability match for '%s']\n", name);
1973           queue_push2(job, SOLVER_SOLVABLE_PROVIDES, id);
1974           return 1;
1975         }
1976     }
1977
1978   if (strpbrk(name, "[*?") == 0)
1979     return 0;
1980
1981   if ((what & DEPGLOB_NAME) != 0)
1982     {
1983       /* looks like a name glob. hard work. */
1984       for (p = 1; p < pool->nsolvables; p++)
1985         {
1986           Solvable *s = pool->solvables + p;
1987           if (!s->repo || !pool_installable(pool, s))
1988             continue;
1989           id = s->name;
1990           if (fnmatch(name, pool_id2str(pool, id), 0) == 0)
1991             {
1992               for (i = 0; i < job->count; i += 2)
1993                 if (job->elements[i] == SOLVER_SOLVABLE_NAME && job->elements[i + 1] == id)
1994                   break;
1995               if (i == job->count)
1996                 queue_push2(job, SOLVER_SOLVABLE_NAME, id);
1997               match = 1;
1998             }
1999         }
2000       if (match)
2001         return 1;
2002     }
2003   if ((what & DEPGLOB_DEP))
2004     {
2005       /* looks like a dep glob. really hard work. */
2006       for (id = 1; id < pool->ss.nstrings; id++)
2007         {
2008           if (!pool->whatprovides[id])
2009             continue;
2010           if (fnmatch(name, pool_id2str(pool, id), 0) == 0)
2011             {
2012               if (!match && what == DEPGLOB_NAMEDEP)
2013                 printf("[using capability match for '%s']\n", name);
2014               for (i = 0; i < job->count; i += 2)
2015                 if (job->elements[i] == SOLVER_SOLVABLE_PROVIDES && job->elements[i + 1] == id)
2016                   break;
2017               if (i == job->count)
2018                 queue_push2(job, SOLVER_SOLVABLE_PROVIDES, id);
2019               match = 1;
2020             }
2021         }
2022       if (match)
2023         return 1;
2024     }
2025   return 0;
2026 }
2027
2028 int
2029 limitrelation(Pool *pool, Queue *job, int flags, Id evr)
2030 {
2031   int i, j;
2032   Id p, pp;
2033   for (i = j = 0; i < job->count; i += 2)
2034     {
2035       Id select = job->elements[i] & SOLVER_SELECTMASK;
2036       if (select != SOLVER_SOLVABLE_NAME && select != SOLVER_SOLVABLE_PROVIDES)
2037         {
2038           fprintf(stderr, "limitrelation only works on name/provides jobs\n");
2039           exit(1);
2040         }
2041       job->elements[i + 1] = pool_rel2id(pool, job->elements[i + 1], evr, flags, 1);
2042       if (flags == REL_ARCH)
2043         job->elements[i] |= SOLVER_SETARCH;
2044       if (flags == REL_EQ && select == SOLVER_SOLVABLE_NAME && job->elements[i])
2045         {
2046 #ifndef DEBIAN
2047           const char *evrstr = pool_id2str(pool, evr);
2048           if (!strchr(evrstr, '-'))
2049             job->elements[i] |= SOLVER_SETEV;
2050           else
2051 #endif
2052             job->elements[i] |= SOLVER_SETEVR;
2053         }
2054       /* make sure we still have matches */
2055       FOR_JOB_SELECT(p, pp, job->elements[i], job->elements[i + 1])
2056         break;
2057       if (p)
2058         {
2059           job->elements[j] = job->elements[i];
2060           job->elements[j + 1] = job->elements[i + 1];
2061           j += 2;
2062         }
2063     }
2064   queue_truncate(job, j);
2065   return j / 2;
2066 }
2067
2068 int
2069 limitrelation_arch(Pool *pool, Queue *job, int flags, char *evr)
2070 {
2071   char *r;
2072   Id archid;
2073   if ((r = strrchr(evr, '.')) != 0 && r[1] && (archid = str2archid(pool, r + 1)) != 0)
2074     {
2075       *r = 0;
2076       limitrelation(pool, job, REL_ARCH, archid);
2077       limitrelation(pool, job, flags, pool_str2id(pool, evr, 1));
2078       *r = '.';
2079     }
2080   else
2081     limitrelation(pool, job, flags, pool_str2id(pool, evr, 1));
2082   return job->count / 2;
2083 }
2084
2085 int
2086 limitrepo(Pool *pool, Id repofilter, Queue *job)
2087 {
2088   Queue mq;
2089   Id p, pp;
2090   int i, j;
2091   Solvable *s;
2092
2093   queue_init(&mq);
2094   for (i = j = 0; i < job->count; i += 2)
2095     {
2096       queue_empty(&mq);
2097       FOR_JOB_SELECT(p, pp, job->elements[i], job->elements[i + 1])
2098         {
2099           s = pool_id2solvable(pool, p);
2100           if (s->repo && s->repo->repoid == repofilter)
2101              queue_push(&mq, p);
2102         }
2103       if (mq.count)
2104         {
2105           /* here we assume that repo == vendor, so we also set SOLVER_SETVENDOR */
2106           if (mq.count == 1)
2107             {
2108               job->elements[j] = SOLVER_SOLVABLE | (job->elements[i] & SOLVER_SETMASK) | SOLVER_SETVENDOR | SOLVER_SETREPO | SOLVER_NOAUTOSET;
2109               job->elements[j + 1] = mq.elements[0];
2110             }
2111           else
2112             {
2113               job->elements[j] = SOLVER_SOLVABLE_ONE_OF | (job->elements[i] & SOLVER_SETMASK) | SOLVER_SETVENDOR | SOLVER_SETREPO;
2114               job->elements[j + 1] = pool_queuetowhatprovides(pool, &mq);
2115             }
2116           j += 2;
2117         }
2118     }
2119   queue_truncate(job, j);
2120   queue_free(&mq);
2121   return j / 2;
2122 }
2123
2124 int
2125 mkselect(Pool *pool, int mode, char *name, Queue *job)
2126 {
2127   char *r, *r2;
2128   Id archid;
2129
2130   if (*name == '/')
2131     {
2132       Dataiterator di;
2133       int type = strpbrk(name, "[*?") == 0 ? SEARCH_STRING : SEARCH_GLOB;
2134       Queue q;
2135       queue_init(&q);
2136       dataiterator_init(&di, pool, mode == SOLVER_ERASE ? pool->installed : 0, 0, SOLVABLE_FILELIST, name, type|SEARCH_FILES|SEARCH_COMPLETE_FILELIST);
2137       while (dataiterator_step(&di))
2138         {
2139           Solvable *s = pool->solvables + di.solvid;
2140           if (!s->repo || !pool_installable(pool, s))
2141             continue;
2142           queue_push(&q, di.solvid);
2143           dataiterator_skip_solvable(&di);
2144         }
2145       dataiterator_free(&di);
2146       if (q.count)
2147         {
2148           printf("[using file list match for '%s']\n", name);
2149           if (q.count > 1)
2150             queue_push2(job, SOLVER_SOLVABLE_ONE_OF, pool_queuetowhatprovides(pool, &q));
2151           else
2152             queue_push2(job, SOLVER_SOLVABLE | SOLVER_NOAUTOSET, q.elements[0]);
2153           queue_free(&q);
2154           return job->count / 2;
2155         }
2156     }
2157   if ((r = strpbrk(name, "<=>")) != 0)
2158     {
2159       /* relation case, support:
2160        * depglob rel
2161        * depglob.arch rel
2162        */
2163       int rflags = 0;
2164       int nend = r - name;
2165       char oldnend;
2166       for (; *r; r++)
2167         {
2168           if (*r == '<')
2169             rflags |= REL_LT;
2170           else if (*r == '=')
2171             rflags |= REL_EQ;
2172           else if (*r == '>')
2173             rflags |= REL_GT;
2174           else
2175             break;
2176         }
2177       while (*r && *r == ' ' && *r == '\t')
2178         r++;
2179       while (nend && (name[nend - 1] == ' ' || name[nend -1 ] == '\t'))
2180         nend--;
2181       if (!*name || !*r)
2182         {
2183           fprintf(stderr, "bad relation\n");
2184           exit(1);
2185         }
2186       oldnend = name[nend];
2187       name[nend] = 0;
2188       if (depglob(pool, name, job, DEPGLOB_NAMEDEP))
2189         {
2190           name[nend] = oldnend;
2191           limitrelation(pool, job, rflags, pool_str2id(pool, r, 1));
2192           return job->count / 2;
2193         }
2194       if ((r2 = strrchr(name, '.')) != 0 && r2[1] && (archid = str2archid(pool, r2 + 1)) != 0)
2195         {
2196           *r2 = 0;
2197           if (depglob(pool, name, job, DEPGLOB_NAMEDEP))
2198             {
2199               name[nend] = oldnend;
2200               *r2 = '.';
2201               limitrelation(pool, job, REL_ARCH, archid);
2202               limitrelation(pool, job, rflags, pool_str2id(pool, r, 1));
2203               return job->count / 2;
2204             }
2205           *r2 = '.';
2206         }
2207       name[nend] = oldnend;
2208     }
2209   else
2210     {
2211       /* no relation case, support:
2212        * depglob
2213        * depglob.arch
2214        * nameglob-version
2215        * nameglob-version.arch
2216        * nameglob-version-release
2217        * nameglob-version-release.arch
2218        */
2219       if (depglob(pool, name, job, DEPGLOB_NAMEDEP))
2220         return job->count / 2;
2221       if ((r = strrchr(name, '.')) != 0 && r[1] && (archid = str2archid(pool, r + 1)) != 0)
2222         {
2223           *r = 0;
2224           if (depglob(pool, name, job, DEPGLOB_NAMEDEP))
2225             {
2226               *r = '.';
2227               limitrelation(pool, job, REL_ARCH, archid);
2228               return job->count / 2;
2229             }
2230           *r = '.';
2231         }
2232       if ((r = strrchr(name, '-')) != 0)
2233         {
2234           *r = 0;
2235           if (depglob(pool, name, job, DEPGLOB_NAME))
2236             {
2237               /* have just the version */
2238               limitrelation_arch(pool, job, REL_EQ, r + 1);
2239               *r = '-';
2240               return job->count / 2;
2241             }
2242           if ((r2 = strrchr(name, '-')) != 0)
2243             {
2244               *r = '-';
2245               *r2 = 0;
2246               r = r2;
2247               if (depglob(pool, name, job, DEPGLOB_NAME))
2248                 {
2249                   /* have version-release */
2250                   limitrelation_arch(pool, job, REL_EQ, r + 1);
2251                   *r = '-';
2252                   return job->count / 2;
2253                 }
2254             }
2255           *r = '-';
2256         }
2257     }
2258   return 0;
2259 }
2260
2261
2262 int
2263 yesno(const char *str)
2264 {
2265   char inbuf[128], *ip;
2266
2267   for (;;)
2268     {
2269       printf("%s", str);
2270       fflush(stdout);
2271       *inbuf = 0;
2272       if (!(ip = fgets(inbuf, sizeof(inbuf), stdin)))
2273         {
2274           printf("Abort.\n");
2275           exit(1);
2276         }
2277       while (*ip == ' ' || *ip == '\t')
2278         ip++;
2279       if (*ip == 'q')
2280         {
2281           printf("Abort.\n");
2282           exit(1);
2283         }
2284       if (*ip == 'y' || *ip == 'n')
2285         return *ip == 'y' ? 1 : 0;
2286     }
2287 }
2288
2289 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
2290
2291 struct fcstate {
2292   FILE **newpkgsfps;
2293   Queue *checkq;
2294   int newpkgscnt;
2295   void *rpmdbstate;
2296 };
2297
2298 static void *
2299 fileconflict_cb(Pool *pool, Id p, void *cbdata)
2300 {
2301   struct fcstate *fcstate = cbdata;
2302   Solvable *s;
2303   Id rpmdbid;
2304   int i;
2305   FILE *fp;
2306
2307   if (!p)
2308     {
2309       rpm_byrpmdbid(0, 0, &fcstate->rpmdbstate);
2310       return 0;
2311     }
2312   s = pool_id2solvable(pool, p);
2313   if (pool->installed && s->repo == pool->installed)
2314     {
2315       if (!s->repo->rpmdbid)
2316         return 0;
2317       rpmdbid = s->repo->rpmdbid[p - s->repo->start];
2318       if (!rpmdbid)
2319         return 0;
2320        return rpm_byrpmdbid(rpmdbid, 0, &fcstate->rpmdbstate);
2321     }
2322   for (i = 0; i < fcstate->newpkgscnt; i++)
2323     if (fcstate->checkq->elements[i] == p)
2324       break;
2325   if (i == fcstate->newpkgscnt)
2326     return 0;
2327   fp = fcstate->newpkgsfps[i];
2328   if (!fp)
2329     return 0;
2330   rewind(fp);
2331   return rpm_byfp(fp, pool_solvable2str(pool, s), &fcstate->rpmdbstate);
2332 }
2333
2334
2335 void
2336 runrpm(const char *arg, const char *name, int dupfd3)
2337 {
2338   pid_t pid;
2339   int status;
2340
2341   if ((pid = fork()) == (pid_t)-1)
2342     {
2343       perror("fork");
2344       exit(1);
2345     }
2346   if (pid == 0)
2347     {
2348       if (dupfd3 != -1 && dupfd3 != 3)
2349         {
2350           dup2(dupfd3, 3);
2351           close(dupfd3);
2352         }
2353       if (dupfd3 != -1)
2354         fcntl(3, F_SETFD, 0);   /* clear CLOEXEC */
2355       if (strcmp(arg, "-e") == 0)
2356         execlp("rpm", "rpm", arg, "--nodeps", "--nodigest", "--nosignature", name, (char *)0);
2357       else
2358         execlp("rpm", "rpm", arg, "--force", "--nodeps", "--nodigest", "--nosignature", name, (char *)0);
2359       perror("rpm");
2360       _exit(0);
2361     }
2362   while (waitpid(pid, &status, 0) != pid)
2363     ;
2364   if (status)
2365     {
2366       printf("rpm failed\n");
2367       exit(1);
2368     }
2369 }
2370
2371 #endif
2372
2373 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
2374
2375 void
2376 rundpkg(const char *arg, const char *name, int dupfd3)
2377 {
2378   pid_t pid;
2379   int status;
2380
2381   if ((pid = fork()) == (pid_t)-1)
2382     {
2383       perror("fork");
2384       exit(1);
2385     }
2386   if (pid == 0)
2387     {
2388       if (dupfd3 != -1 && dupfd3 != 3)
2389         {
2390           dup2(dupfd3, 3);
2391           close(dupfd3);
2392         }
2393       if (dupfd3 != -1)
2394         fcntl(3, F_SETFD, 0);   /* clear CLOEXEC */
2395       if (strcmp(arg, "--install") == 0)
2396         execlp("dpkg", "dpkg", "--install", "--force", "all", name, (char *)0);
2397       else
2398         execlp("dpkg", "dpkg", "--remove", "--force", "all", name, (char *)0);
2399       perror("dpkg");
2400       _exit(0);
2401     }
2402   while (waitpid(pid, &status, 0) != pid)
2403     ;
2404   if (status)
2405     {
2406       printf("dpkg failed\n");
2407       exit(1);
2408     }
2409 }
2410
2411 #endif
2412
2413 static Id
2414 nscallback(Pool *pool, void *data, Id name, Id evr)
2415 {
2416   if (name == NAMESPACE_PRODUCTBUDDY)
2417     {
2418       /* SUSE specific hack: each product has an associated rpm */
2419       Solvable *s = pool->solvables + evr;
2420       Id p, pp, cap;
2421
2422       cap = pool_str2id(pool, pool_tmpjoin(pool, "product(", pool_id2str(pool, s->name) + 8, ")"), 0);
2423       if (!cap)
2424         return 0;
2425       cap = pool_rel2id(pool, cap, s->evr, REL_EQ, 0);
2426       if (!cap)
2427         return 0;
2428       FOR_PROVIDES(p, pp, cap)
2429         {
2430           Solvable *ps = pool->solvables + p;
2431           if (ps->repo == s->repo && ps->arch == s->arch)
2432             break;
2433         }
2434       return p;
2435     }
2436   return 0;
2437 }
2438
2439 #ifdef SOFTLOCKS_PATH
2440
2441 void
2442 addsoftlocks(Pool *pool, Queue *job)
2443 {
2444   FILE *fp;
2445   Id type, id, p, pp;
2446   char *bp, *ep, buf[4096];
2447
2448   if ((fp = fopen(SOFTLOCKS_PATH, "r")) == 0)
2449     return;
2450   while((bp = fgets(buf, sizeof(buf), fp)) != 0)
2451     {
2452       while (*bp == ' ' || *bp == '\t')
2453         bp++;
2454       if (!*bp || *bp == '#')
2455         continue;
2456       for (ep = bp; *ep; ep++)
2457         if (*ep == ' ' || *ep == '\t' || *ep == '\n')
2458           break;
2459       *ep = 0;
2460       type = SOLVER_SOLVABLE_NAME;
2461       if (!strncmp(bp, "provides:", 9) && bp[9])
2462         {
2463           type = SOLVER_SOLVABLE_PROVIDES;
2464           bp += 9;
2465         }
2466       id = pool_str2id(pool, bp, 1);
2467       if (pool->installed)
2468         {
2469           FOR_JOB_SELECT(p, pp, type, id)
2470             if (pool->solvables[p].repo == pool->installed)
2471               break;
2472           if (p)
2473             continue;   /* ignore, as it is already installed */
2474         }
2475       queue_push2(job, SOLVER_LOCK|SOLVER_WEAK|type, id);
2476     }
2477   fclose(fp);
2478 }
2479
2480 #endif
2481
2482
2483 void
2484 rewrite_repos(Pool *pool, Id *addedfileprovides)
2485 {
2486   Repo *repo;
2487   Repodata *data;
2488   Map providedids;
2489   Queue fileprovidesq;
2490   Id id;
2491   int i, j, n, nprovidedids;
2492   struct repoinfo *cinfo;
2493
2494   map_init(&providedids, pool->ss.nstrings);
2495   queue_init(&fileprovidesq);
2496   for (nprovidedids = 0; (id = addedfileprovides[nprovidedids]) != 0; nprovidedids++)
2497     MAPSET(&providedids, id);
2498   FOR_REPOS(i, repo)
2499     {
2500       /* make sure this repo has just one main repodata */
2501       if (!repo->nrepodata)
2502         continue;
2503       cinfo = repo->appdata;
2504       data = repo->repodata + 1;
2505       if (data->store.pagefd == -1)
2506         continue;
2507       if (repodata_lookup_idarray(data, SOLVID_META, REPOSITORY_ADDEDFILEPROVIDES, &fileprovidesq))
2508         {
2509           n = 0;
2510           for (j = 0; j < fileprovidesq.count; j++)
2511             if (MAPTST(&providedids, fileprovidesq.elements[j]))
2512               n++;
2513           if (n == nprovidedids)
2514             continue;   /* nothing new added */
2515         }
2516       /* oh my! */
2517       for (j = 0; addedfileprovides[j]; j++)
2518         repodata_add_idarray(data, SOLVID_META, REPOSITORY_ADDEDFILEPROVIDES, addedfileprovides[j]);
2519       repodata_internalize(data);
2520       writecachedrepo(repo, data, 0, cinfo ? cinfo->cookie : installedcookie);
2521     }
2522   queue_free(&fileprovidesq);
2523   map_free(&providedids);
2524 }
2525
2526 static void
2527 select_patches(Pool *pool, Queue *job)
2528 {
2529   Id p, pp;
2530   int pruneyou = 0;
2531   Map installedmap;
2532   Solvable *s;
2533
2534   map_init(&installedmap, pool->nsolvables);
2535   if (pool->installed)
2536     FOR_REPO_SOLVABLES(pool->installed, p, s)
2537       MAPSET(&installedmap, p);
2538
2539   /* install all patches */
2540   for (p = 1; p < pool->nsolvables; p++)
2541     {
2542       const char *type;
2543       int r;
2544       Id p2;
2545
2546       s = pool->solvables + p;
2547       if (strncmp(pool_id2str(pool, s->name), "patch:", 6) != 0)
2548         continue;
2549       FOR_PROVIDES(p2, pp, s->name)
2550         {
2551           Solvable *s2 = pool->solvables + p2;
2552           if (s2->name != s->name)
2553             continue;
2554           r = pool_evrcmp(pool, s->evr, s2->evr, EVRCMP_COMPARE);
2555           if (r < 0 || (r == 0 && p > p2))
2556             break;
2557         }
2558       if (p2)
2559         continue;
2560       type = solvable_lookup_str(s, SOLVABLE_PATCHCATEGORY);
2561       if (type && !strcmp(type, "optional"))
2562         continue;
2563       r = solvable_trivial_installable_map(s, &installedmap, 0);
2564       if (r == -1)
2565         continue;
2566       if (solvable_lookup_bool(s, UPDATE_RESTART) && r == 0)
2567         {
2568           if (!pruneyou++)
2569             queue_empty(job);
2570         }
2571       else if (pruneyou)
2572         continue;
2573       queue_push2(job, SOLVER_SOLVABLE, p);
2574     }
2575   map_free(&installedmap);
2576 }
2577
2578 #define MODE_LIST        0
2579 #define MODE_INSTALL     1
2580 #define MODE_ERASE       2
2581 #define MODE_UPDATE      3
2582 #define MODE_DISTUPGRADE 4
2583 #define MODE_VERIFY      5
2584 #define MODE_PATCH       6
2585 #define MODE_INFO        7
2586 #define MODE_REPOLIST    8
2587 #define MODE_SEARCH      9
2588
2589 void
2590 usage(int r)
2591 {
2592   fprintf(stderr, "Usage: solv COMMAND <select>\n");
2593   fprintf(stderr, "\n");
2594   fprintf(stderr, "    dist-upgrade: replace installed packages with\n");
2595   fprintf(stderr, "                  versions from the repositories\n");
2596   fprintf(stderr, "    erase:        erase installed packages\n");
2597   fprintf(stderr, "    info:         display package information\n");
2598   fprintf(stderr, "    install:      install packages\n");
2599   fprintf(stderr, "    list:         list packages\n");
2600   fprintf(stderr, "    repos:        list enabled repositories\n");
2601   fprintf(stderr, "    search:       search name/summary/description\n");
2602   fprintf(stderr, "    update:       update installed packages\n");
2603   fprintf(stderr, "    verify:       check dependencies of installed packages\n");
2604   fprintf(stderr, "\n");
2605   exit(r);
2606 }
2607
2608 int
2609 main(int argc, char **argv)
2610 {
2611   Pool *pool;
2612   Repo *commandlinerepo = 0;
2613   Id *commandlinepkgs = 0;
2614   Id p, pp;
2615   struct repoinfo *repoinfos;
2616   int nrepoinfos = 0;
2617   int mainmode = 0, mode = 0;
2618   int i, newpkgs;
2619   Queue job, checkq;
2620   Solver *solv = 0;
2621   Transaction *trans;
2622   char inbuf[128], *ip;
2623   int allpkgs = 0;
2624   FILE **newpkgsfps;
2625   Id *addedfileprovides = 0;
2626   Id repofilter = 0;
2627   int cleandeps = 0;
2628
2629   argc--;
2630   argv++;
2631   if (!argv[0])
2632     usage(1);
2633   if (!strcmp(argv[0], "install") || !strcmp(argv[0], "in"))
2634     {
2635       mainmode = MODE_INSTALL;
2636       mode = SOLVER_INSTALL;
2637     }
2638   else if (!strcmp(argv[0], "patch"))
2639     {
2640       mainmode = MODE_PATCH;
2641       mode = SOLVER_INSTALL;
2642     }
2643   else if (!strcmp(argv[0], "erase") || !strcmp(argv[0], "rm"))
2644     {
2645       mainmode = MODE_ERASE;
2646       mode = SOLVER_ERASE;
2647     }
2648   else if (!strcmp(argv[0], "list"))
2649     {
2650       mainmode = MODE_LIST;
2651       mode = 0;
2652     }
2653   else if (!strcmp(argv[0], "info"))
2654     {
2655       mainmode = MODE_INFO;
2656       mode = 0;
2657     }
2658   else if (!strcmp(argv[0], "search"))
2659     {
2660       mainmode = MODE_SEARCH;
2661       mode = 0;
2662     }
2663   else if (!strcmp(argv[0], "verify"))
2664     {
2665       mainmode = MODE_VERIFY;
2666       mode = SOLVER_VERIFY;
2667     }
2668   else if (!strcmp(argv[0], "update") || !strcmp(argv[0], "up"))
2669     {
2670       mainmode = MODE_UPDATE;
2671       mode = SOLVER_UPDATE;
2672     }
2673   else if (!strcmp(argv[0], "dist-upgrade") || !strcmp(argv[0], "dup"))
2674     {
2675       mainmode = MODE_DISTUPGRADE;
2676       mode = SOLVER_UPDATE;
2677     }
2678   else if (!strcmp(argv[0], "repos") || !strcmp(argv[0], "repolist") || !strcmp(argv[0], "lr"))
2679     {
2680       mainmode = MODE_REPOLIST;
2681       mode = 0;
2682     }
2683   else
2684     usage(1);
2685
2686   if (argc > 1 && !strcmp(argv[1], "--clean"))
2687     {
2688       cleandeps = 1;
2689       argc--;
2690       argv++;
2691     }
2692
2693   pool = pool_create();
2694
2695 #if 0
2696   {
2697     const char *langs[] = {"de_DE", "de", "en"};
2698     pool_set_languages(pool, langs, sizeof(langs)/sizeof(*langs));
2699   }
2700 #endif
2701
2702 #ifdef FEDORA
2703   pool->obsoleteusescolors = 1;
2704 #endif
2705   pool_setloadcallback(pool, load_stub, 0);
2706   pool->nscallback = nscallback;
2707   // pool_setdebuglevel(pool, 2);
2708   setarch(pool);
2709   repoinfos = read_repoinfos(pool, REPOINFO_PATH, &nrepoinfos);
2710
2711   if (mainmode == MODE_REPOLIST)
2712     {
2713       int j = 1;
2714       for (i = 0; i < nrepoinfos; i++)
2715         {
2716           struct repoinfo *cinfo = repoinfos + i;
2717           if (!cinfo->enabled)
2718             continue;
2719           printf("%d: %-20s %s (prio %d)\n", j++, cinfo->alias, cinfo->name, cinfo->priority);
2720         }
2721       exit(0);
2722     }
2723
2724   read_repos(pool, repoinfos, nrepoinfos);
2725
2726   if (argc > 2 && !strcmp(argv[1], "-r"))
2727     {
2728       const char *rname = argv[2], *rp;
2729       for (rp = rname; *rp; rp++)
2730         if (*rp <= '0' || *rp >= '9')
2731           break;
2732       if (!*rp)
2733         {
2734           /* repo specified by number */
2735           int rnum = atoi(rname);
2736           for (i = 0; i < nrepoinfos; i++)
2737             {
2738               struct repoinfo *cinfo = repoinfos + i;
2739               if (!cinfo->enabled)
2740                 continue;
2741               if (--rnum == 0)
2742                 repofilter = cinfo->repo->repoid;
2743             }
2744         }
2745       else
2746         {
2747           /* repo specified by alias */
2748           Repo *repo;
2749           FOR_REPOS(i, repo)
2750             {
2751               if (!strcasecmp(rname, repo->name))
2752                 repofilter = repo->repoid;
2753             }
2754         }
2755       if (!repofilter)
2756         {
2757           fprintf(stderr, "%s: no such repo\n", rname);
2758           exit(1);
2759         }
2760       argc -= 2;
2761       argv += 2;
2762     }
2763   if (mainmode == MODE_SEARCH)
2764     {
2765       Dataiterator di;
2766       Map m;
2767       if (argc != 2)
2768         usage(1);
2769       map_init(&m, pool->nsolvables);
2770       dataiterator_init(&di, pool, 0, 0, 0, argv[1], SEARCH_SUBSTRING|SEARCH_NOCASE);
2771       dataiterator_set_keyname(&di, SOLVABLE_NAME);
2772       dataiterator_set_search(&di, 0, 0);
2773       while (dataiterator_step(&di))
2774         MAPSET(&m, di.solvid);
2775       dataiterator_set_keyname(&di, SOLVABLE_SUMMARY);
2776       dataiterator_set_search(&di, 0, 0);
2777       while (dataiterator_step(&di))
2778         MAPSET(&m, di.solvid);
2779       dataiterator_set_keyname(&di, SOLVABLE_DESCRIPTION);
2780       dataiterator_set_search(&di, 0, 0);
2781       while (dataiterator_step(&di))
2782         MAPSET(&m, di.solvid);
2783       dataiterator_free(&di);
2784
2785       for (p = 1; p < pool->nsolvables; p++)
2786         {
2787           Solvable *s = pool_id2solvable(pool, p);
2788           if (!MAPTST(&m, p))
2789             continue;
2790           printf("  - %s: %s\n", pool_solvable2str(pool, s), solvable_lookup_str(s, SOLVABLE_SUMMARY));
2791         }
2792       map_free(&m);
2793       exit(0);
2794     }
2795
2796
2797   if (mainmode == MODE_LIST || mainmode == MODE_INSTALL)
2798     {
2799       for (i = 1; i < argc; i++)
2800         {
2801           int l;
2802           l = strlen(argv[i]);
2803 #ifndef DEBIAN
2804           if (l <= 4 || strcmp(argv[i] + l - 4, ".rpm"))
2805             continue;
2806 #else
2807           if (l <= 4 || strcmp(argv[i] + l - 4, ".deb"))
2808             continue;
2809 #endif
2810           if (access(argv[i], R_OK))
2811             {
2812               perror(argv[i]);
2813               exit(1);
2814             }
2815           if (!commandlinepkgs)
2816             commandlinepkgs = solv_calloc(argc, sizeof(Id));
2817           if (!commandlinerepo)
2818             commandlinerepo = repo_create(pool, "@commandline");
2819           p = 0;
2820 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
2821           p = repo_add_rpm(commandlinerepo, (const char *)argv[i], REPO_REUSE_REPODATA|REPO_NO_INTERNALIZE);
2822 #endif
2823 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
2824           p = repo_add_deb(commandlinerepo, (const char *)argv[i], REPO_REUSE_REPODATA|REPO_NO_INTERNALIZE);
2825 #endif
2826           if (!p)
2827             {
2828               fprintf(stderr, "could not add '%s'\n", argv[i]);
2829               exit(1);
2830             }
2831           commandlinepkgs[i] = p;
2832         }
2833       if (commandlinerepo)
2834         repo_internalize(commandlinerepo);
2835     }
2836
2837   // FOR_REPOS(i, repo)
2838   //   printf("%s: %d solvables\n", repo->name, repo->nsolvables);
2839   addedfileprovides = 0;
2840   pool_addfileprovides_ids(pool, pool->installed, &addedfileprovides);
2841   if (addedfileprovides && *addedfileprovides)
2842     rewrite_repos(pool, addedfileprovides);
2843   solv_free(addedfileprovides);
2844   pool_createwhatprovides(pool);
2845
2846   queue_init(&job);
2847   for (i = 1; i < argc; i++)
2848     {
2849       Queue job2;
2850       int j;
2851
2852       if (commandlinepkgs && commandlinepkgs[i])
2853         {
2854           queue_push2(&job, SOLVER_SOLVABLE, commandlinepkgs[i]);
2855           continue;
2856         }
2857       queue_init(&job2);
2858       if (!mkselect(pool, mode, argv[i], &job2))
2859         {
2860           fprintf(stderr, "nothing matches '%s'\n", argv[i]);
2861           exit(1);
2862         }
2863       if (repofilter && !limitrepo(pool, repofilter, &job2))
2864         {
2865           fprintf(stderr, "nothing in repo matches '%s'\n", argv[i]);
2866           exit(1);
2867         }
2868       for (j = 0; j < job2.count; j++)
2869         queue_push(&job, job2.elements[j]);
2870       queue_free(&job2);
2871     }
2872
2873   if (!job.count && mainmode != MODE_UPDATE && mainmode != MODE_DISTUPGRADE && mainmode != MODE_VERIFY && mainmode != MODE_PATCH)
2874     {
2875       printf("no package matched\n");
2876       exit(1);
2877     }
2878
2879   if (!job.count)
2880     allpkgs = 1;
2881
2882   if (mainmode == MODE_LIST || mainmode == MODE_INFO)
2883     {
2884       /* list mode, no solver needed */
2885       for (i = 0; i < job.count; i += 2)
2886         {
2887           Id how = job.elements[i] & SOLVER_SELECTMASK;
2888           FOR_JOB_SELECT(p, pp, how, job.elements[i + 1])
2889             {
2890               Solvable *s = pool_id2solvable(pool, p);
2891               if (mainmode == MODE_INFO)
2892                 {
2893                   const char *str;
2894                   printf("Name:        %s\n", pool_solvable2str(pool, s));
2895                   printf("Repo:        %s\n", s->repo->name);
2896                   printf("Summary:     %s\n", solvable_lookup_str(s, SOLVABLE_SUMMARY));
2897                   str = solvable_lookup_str(s, SOLVABLE_URL);
2898                   if (str)
2899                     printf("Url:         %s\n", str);
2900                   str = solvable_lookup_str(s, SOLVABLE_LICENSE);
2901                   if (str)
2902                     printf("License:     %s\n", str);
2903                   printf("Description:\n%s\n", solvable_lookup_str(s, SOLVABLE_DESCRIPTION));
2904                   printf("\n");
2905                 }
2906               else
2907                 {
2908 #if 1
2909                   const char *sum = solvable_lookup_str_lang(s, SOLVABLE_SUMMARY, "de", 1);
2910 #else
2911                   const char *sum = solvable_lookup_str_poollang(s, SOLVABLE_SUMMARY);
2912 #endif
2913                   printf("  - %s [%s]\n", pool_solvable2str(pool, s), s->repo->name);
2914                   if (sum)
2915                     printf("    %s\n", sum);
2916                 }
2917             }
2918         }
2919       queue_free(&job);
2920       pool_free(pool);
2921       free_repoinfos(repoinfos, nrepoinfos);
2922       solv_free(commandlinepkgs);
2923 #ifdef FEDORA
2924       yum_substitute(pool, 0);
2925 #endif
2926       exit(0);
2927     }
2928
2929   if (mainmode == MODE_PATCH)
2930     select_patches(pool, &job);
2931
2932   // add mode
2933   for (i = 0; i < job.count; i += 2)
2934     {
2935       if (mode == SOLVER_UPDATE)
2936         {
2937           /* make update of not installed packages an install */
2938           FOR_JOB_SELECT(p, pp, job.elements[i], job.elements[i + 1])
2939             if (pool->installed && pool->solvables[p].repo == pool->installed)
2940               break;
2941           if (!p)
2942             {
2943               job.elements[i] |= SOLVER_INSTALL;
2944               if (cleandeps)
2945                 job.elements[i] |= SOLVER_CLEANDEPS;
2946               continue;
2947             }
2948         }
2949       job.elements[i] |= mode;
2950       if (cleandeps)
2951         job.elements[i] |= SOLVER_CLEANDEPS;
2952     }
2953
2954   if (mainmode == MODE_DISTUPGRADE && allpkgs)
2955     {
2956       if (repofilter)
2957         queue_push2(&job, SOLVER_DISTUPGRADE|SOLVER_SOLVABLE_REPO, repofilter);
2958       else
2959         queue_push2(&job, SOLVER_DISTUPGRADE|SOLVER_SOLVABLE_ALL, 0);
2960     }
2961   if (mainmode == MODE_UPDATE && allpkgs)
2962     {
2963       if (repofilter)
2964         queue_push2(&job, SOLVER_UPDATE|SOLVER_SOLVABLE_REPO, repofilter);
2965       else
2966         queue_push2(&job, SOLVER_UPDATE|SOLVER_SOLVABLE_ALL, 0);
2967     }
2968   if (mainmode == MODE_VERIFY && allpkgs)
2969     {
2970       if (repofilter)
2971         queue_push2(&job, SOLVER_VERIFY|SOLVER_SOLVABLE_REPO, repofilter);
2972       else
2973         queue_push2(&job, SOLVER_VERIFY|SOLVER_SOLVABLE_ALL, 0);
2974     }
2975
2976   // multiversion test
2977   // queue_push2(&job, SOLVER_NOOBSOLETES|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae", 1));
2978   // queue_push2(&job, SOLVER_NOOBSOLETES|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae-base", 1));
2979   // queue_push2(&job, SOLVER_NOOBSOLETES|SOLVER_SOLVABLE_NAME, pool_str2id(pool, "kernel-pae-extra", 1));
2980
2981 #ifdef SOFTLOCKS_PATH
2982   addsoftlocks(pool, &job);
2983 #endif
2984
2985 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
2986 rerunsolver:
2987 #endif
2988   for (;;)
2989     {
2990       Id problem, solution;
2991       int pcnt, scnt;
2992
2993       solv = solver_create(pool);
2994       solver_set_flag(solv, SOLVER_FLAG_IGNORE_ALREADY_RECOMMENDED, 1);
2995       solver_set_flag(solv, SOLVER_FLAG_SPLITPROVIDES, 1);
2996       if (mainmode == MODE_ERASE)
2997         solver_set_flag(solv, SOLVER_FLAG_ALLOW_UNINSTALL, 1);  /* don't nag */
2998
2999       if (!solver_solve(solv, &job))
3000         break;
3001       pcnt = solver_problem_count(solv);
3002       printf("Found %d problems:\n", pcnt);
3003       for (problem = 1; problem <= pcnt; problem++)
3004         {
3005           int take = 0;
3006           printf("Problem %d:\n", problem);
3007           solver_printprobleminfo(solv, problem);
3008           printf("\n");
3009           scnt = solver_solution_count(solv, problem);
3010           for (solution = 1; solution <= scnt; solution++)
3011             {
3012               printf("Solution %d:\n", solution);
3013               solver_printsolution(solv, problem, solution);
3014               printf("\n");
3015             }
3016           for (;;)
3017             {
3018               printf("Please choose a solution: ");
3019               fflush(stdout);
3020               *inbuf = 0;
3021               if (!(ip = fgets(inbuf, sizeof(inbuf), stdin)))
3022                 {
3023                   printf("Abort.\n");
3024                   exit(1);
3025                 }
3026               while (*ip == ' ' || *ip == '\t')
3027                 ip++;
3028               if (*ip >= '0' && *ip <= '9')
3029                 {
3030                   take = atoi(ip);
3031                   if (take >= 1 && take <= scnt)
3032                     break;
3033                 }
3034               if (*ip == 's')
3035                 {
3036                   take = 0;
3037                   break;
3038                 }
3039               if (*ip == 'q')
3040                 {
3041                   printf("Abort.\n");
3042                   exit(1);
3043                 }
3044             }
3045           if (!take)
3046             continue;
3047           solver_take_solution(solv, problem, take, &job);
3048         }
3049       solver_free(solv);
3050       solv = 0;
3051     }
3052
3053   trans = solver_create_transaction(solv);
3054   if (!trans->steps.count)
3055     {
3056       printf("Nothing to do.\n");
3057       solver_free(solv);
3058       queue_free(&job);
3059       pool_free(pool);
3060       free_repoinfos(repoinfos, nrepoinfos);
3061       solv_free(commandlinepkgs);
3062 #ifdef FEDORA
3063       yum_substitute(pool, 0);
3064 #endif
3065       exit(1);
3066     }
3067   printf("\n");
3068   printf("Transaction summary:\n\n");
3069   transaction_print(trans);
3070
3071 #if !defined(FEDORA) && !defined(DEBIAN)
3072   if (1)
3073     {
3074       DUChanges duc[4];
3075       int i;
3076
3077       duc[0].path = "/";
3078       duc[1].path = "/usr/share/man";
3079       duc[2].path = "/sbin";
3080       duc[3].path = "/etc";
3081       transaction_calc_duchanges(trans, duc, 4);
3082       for (i = 0; i < 4; i++)
3083         printf("duchanges %s: %d K  %d inodes\n", duc[i].path, duc[i].kbytes, duc[i].files);
3084     }
3085 #endif
3086   printf("install size change: %d K\n", transaction_calc_installsizechange(trans));
3087   printf("\n");
3088
3089   if (!yesno("OK to continue (y/n)? "))
3090     {
3091       printf("Abort.\n");
3092       solver_free(solv);
3093       queue_free(&job);
3094       pool_free(pool);
3095       free_repoinfos(repoinfos, nrepoinfos);
3096       solv_free(commandlinepkgs);
3097 #ifdef FEDORA
3098       yum_substitute(pool, 0);
3099 #endif
3100       exit(1);
3101     }
3102
3103   queue_init(&checkq);
3104   newpkgs = transaction_installedresult(trans, &checkq);
3105   newpkgsfps = 0;
3106
3107   if (newpkgs)
3108     {
3109       int downloadsize = 0;
3110       for (i = 0; i < newpkgs; i++)
3111         {
3112           Solvable *s;
3113
3114           p = checkq.elements[i];
3115           s = pool_id2solvable(pool, p);
3116           downloadsize += solvable_lookup_num(s, SOLVABLE_DOWNLOADSIZE, 0);
3117         }
3118       printf("Downloading %d packages, %d K\n", newpkgs, downloadsize);
3119       newpkgsfps = solv_calloc(newpkgs, sizeof(*newpkgsfps));
3120       for (i = 0; i < newpkgs; i++)
3121         {
3122           unsigned int medianr;
3123           char *loc;
3124           Solvable *s;
3125           struct repoinfo *cinfo;
3126           const unsigned char *chksum;
3127           Id chksumtype;
3128           Dataiterator di;
3129
3130           p = checkq.elements[i];
3131           s = pool_id2solvable(pool, p);
3132           if (s->repo == commandlinerepo)
3133             {
3134               loc = solvable_get_location(s, &medianr);
3135               if (!(newpkgsfps[i] = fopen(loc, "r")))
3136                 {
3137                   perror(loc);
3138                   exit(1);
3139                 }
3140               putchar('.');
3141               continue;
3142             }
3143           cinfo = s->repo->appdata;
3144           if (!cinfo)
3145             {
3146               printf("%s: no repository information\n", s->repo->name);
3147               exit(1);
3148             }
3149           loc = solvable_get_location(s, &medianr);
3150           if (!loc)
3151              continue;
3152
3153           if (pool->installed && pool->installed->nsolvables)
3154             {
3155               /* try a delta first */
3156               char *matchname = strdup(pool_id2str(pool, s->name));
3157               dataiterator_init(&di, pool, s->repo, SOLVID_META, DELTA_PACKAGE_NAME, matchname, SEARCH_STRING);
3158               dataiterator_prepend_keyname(&di, REPOSITORY_DELTAINFO);
3159               while (dataiterator_step(&di))
3160                 {
3161                   Id baseevr, op;
3162
3163                   dataiterator_setpos_parent(&di);
3164                   if (pool_lookup_id(pool, SOLVID_POS, DELTA_PACKAGE_EVR) != s->evr ||
3165                       pool_lookup_id(pool, SOLVID_POS, DELTA_PACKAGE_ARCH) != s->arch)
3166                     continue;
3167                   baseevr = pool_lookup_id(pool, SOLVID_POS, DELTA_BASE_EVR);
3168                   FOR_PROVIDES(op, pp, s->name)
3169                     {
3170                       Solvable *os = pool->solvables + op;
3171                       if (os->repo == pool->installed && os->name == s->name && os->arch == s->arch && os->evr == baseevr)
3172                         break;
3173                     }
3174                   if (op && access("/usr/bin/applydeltarpm", X_OK) == 0)
3175                     {
3176                       /* base is installed, run sequence check */
3177                       const char *seqname;
3178                       const char *seqevr;
3179                       const char *seqnum;
3180                       const char *seq;
3181                       const char *dloc;
3182                       FILE *fp;
3183                       char cmd[128];
3184                       int newfd;
3185
3186                       seqname = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NAME);
3187                       seqevr = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_EVR);
3188                       seqnum = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NUM);
3189                       seq = pool_tmpjoin(pool, seqname, "-", seqevr);
3190                       seq = pool_tmpappend(pool, seq, "-", seqnum);
3191 #ifdef FEDORA
3192                       sprintf(cmd, "/usr/bin/applydeltarpm -a %s -c -s ", pool_id2str(pool, s->arch));
3193 #else
3194                       sprintf(cmd, "/usr/bin/applydeltarpm -c -s ");
3195 #endif
3196                       if (system(pool_tmpjoin(pool, cmd, seq, 0)) != 0)
3197                         continue;       /* didn't match */
3198                       /* looks good, download delta */
3199                       chksumtype = 0;
3200                       chksum = pool_lookup_bin_checksum(pool, SOLVID_POS, DELTA_CHECKSUM, &chksumtype);
3201                       if (!chksumtype)
3202                         continue;       /* no way! */
3203                       dloc = pool_lookup_str(pool, SOLVID_POS, DELTA_LOCATION_DIR);
3204                       dloc = pool_tmpappend(pool, dloc, "/", pool_lookup_str(pool, SOLVID_POS, DELTA_LOCATION_NAME));
3205                       dloc = pool_tmpappend(pool, dloc, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_LOCATION_EVR));
3206                       dloc = pool_tmpappend(pool, dloc, ".", pool_lookup_str(pool, SOLVID_POS, DELTA_LOCATION_SUFFIX));
3207                       if ((fp = curlfopen(cinfo, dloc, 0, chksum, chksumtype, 0)) == 0)
3208                         continue;
3209                       /* got it, now reconstruct */
3210                       newfd = opentmpfile();
3211 #ifdef FEDORA
3212                       sprintf(cmd, "applydeltarpm -a %s /dev/fd/%d /dev/fd/%d", pool_id2str(pool, s->arch), fileno(fp), newfd);
3213 #else
3214                       sprintf(cmd, "applydeltarpm /dev/fd/%d /dev/fd/%d", fileno(fp), newfd);
3215 #endif
3216                       fcntl(fileno(fp), F_SETFD, 0);
3217                       if (system(cmd))
3218                         {
3219                           close(newfd);
3220                           fclose(fp);
3221                           continue;
3222                         }
3223                       lseek(newfd, 0, SEEK_SET);
3224                       chksumtype = 0;
3225                       chksum = solvable_lookup_bin_checksum(s, SOLVABLE_CHECKSUM, &chksumtype);
3226                       if (chksumtype && !verify_checksum(newfd, loc, chksum, chksumtype))
3227                         {
3228                           close(newfd);
3229                           fclose(fp);
3230                           continue;
3231                         }
3232                       newpkgsfps[i] = fdopen(newfd, "r");
3233                       fclose(fp);
3234                       break;
3235                     }
3236                 }
3237               dataiterator_free(&di);
3238               solv_free(matchname);
3239             }
3240
3241           if (newpkgsfps[i])
3242             {
3243               putchar('d');
3244               fflush(stdout);
3245               continue;         /* delta worked! */
3246             }
3247           if (cinfo->type == TYPE_SUSETAGS)
3248             {
3249               const char *datadir = repo_lookup_str(cinfo->repo, SOLVID_META, SUSETAGS_DATADIR);
3250               loc = pool_tmpjoin(pool, datadir ? datadir : "suse", "/", loc);
3251             }
3252           chksumtype = 0;
3253           chksum = solvable_lookup_bin_checksum(s, SOLVABLE_CHECKSUM, &chksumtype);
3254           if ((newpkgsfps[i] = curlfopen(cinfo, loc, 0, chksum, chksumtype, 0)) == 0)
3255             {
3256               printf("\n%s: %s not found in repository\n", s->repo->name, loc);
3257               exit(1);
3258             }
3259           putchar('.');
3260           fflush(stdout);
3261         }
3262       putchar('\n');
3263     }
3264
3265 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
3266   if (newpkgs)
3267     {
3268       Queue conflicts;
3269       struct fcstate fcstate;
3270
3271       printf("Searching for file conflicts\n");
3272       queue_init(&conflicts);
3273       fcstate.rpmdbstate = 0;
3274       fcstate.newpkgscnt = newpkgs;
3275       fcstate.checkq = &checkq;
3276       fcstate.newpkgsfps = newpkgsfps;
3277       pool_findfileconflicts(pool, &checkq, newpkgs, &conflicts, &fileconflict_cb, &fcstate);
3278       if (conflicts.count)
3279         {
3280           printf("\n");
3281           for (i = 0; i < conflicts.count; i += 5)
3282             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]));
3283           printf("\n");
3284           if (yesno("Re-run solver (y/n/q)? "))
3285             {
3286               for (i = 0; i < newpkgs; i++)
3287                 if (newpkgsfps[i])
3288                   fclose(newpkgsfps[i]);
3289               newpkgsfps = solv_free(newpkgsfps);
3290               solver_free(solv);
3291               pool_add_fileconflicts_deps(pool, &conflicts);
3292               pool_createwhatprovides(pool);    /* Hmm... */
3293               goto rerunsolver;
3294             }
3295         }
3296       queue_free(&conflicts);
3297     }
3298 #endif
3299
3300   printf("Committing transaction:\n\n");
3301   transaction_order(trans, 0);
3302   for (i = 0; i < trans->steps.count; i++)
3303     {
3304 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
3305       const char *evr, *evrp, *nvra;
3306 #endif
3307       Solvable *s;
3308       int j;
3309       FILE *fp;
3310
3311       p = trans->steps.elements[i];
3312       s = pool_id2solvable(pool, p);
3313       Id type = transaction_type(trans, p, SOLVER_TRANSACTION_RPM_ONLY);
3314       switch(type)
3315         {
3316         case SOLVER_TRANSACTION_ERASE:
3317           printf("erase %s\n", pool_solvid2str(pool, p));
3318 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
3319           if (!s->repo->rpmdbid || !s->repo->rpmdbid[p - s->repo->start])
3320             continue;
3321           /* strip epoch from evr */
3322           evr = evrp = pool_id2str(pool, s->evr);
3323           while (*evrp >= '0' && *evrp <= '9')
3324             evrp++;
3325           if (evrp > evr && evrp[0] == ':' && evrp[1])
3326             evr = evrp + 1;
3327           nvra = pool_tmpjoin(pool, pool_id2str(pool, s->name), "-", evr);
3328           nvra = pool_tmpappend(pool, nvra, ".", pool_id2str(pool, s->arch));
3329           runrpm("-e", nvra, -1);       /* too bad that --querybynumber doesn't work */
3330 #endif
3331 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
3332           rundpkg("--remove", pool_id2str(pool, s->name), 0);
3333 #endif
3334           break;
3335         case SOLVER_TRANSACTION_INSTALL:
3336         case SOLVER_TRANSACTION_MULTIINSTALL:
3337           printf("install %s\n", pool_solvid2str(pool, p));
3338           for (j = 0; j < newpkgs; j++)
3339             if (checkq.elements[j] == p)
3340               break;
3341           fp = j < newpkgs ? newpkgsfps[j] : 0;
3342           if (!fp)
3343             continue;
3344           rewind(fp);
3345           lseek(fileno(fp), 0, SEEK_SET);
3346 #if defined(ENABLE_RPMDB) && !defined(DEBIAN)
3347           runrpm(type == SOLVER_TRANSACTION_MULTIINSTALL ? "-i" : "-U", "/dev/fd/3", fileno(fp));
3348 #endif
3349 #if defined(ENABLE_DEBIAN) && defined(DEBIAN)
3350           rundpkg("--install", "/dev/fd/3", fileno(fp));
3351 #endif
3352           fclose(fp);
3353           newpkgsfps[j] = 0;
3354           break;
3355         default:
3356           break;
3357         }
3358     }
3359
3360   for (i = 0; i < newpkgs; i++)
3361     if (newpkgsfps[i])
3362       fclose(newpkgsfps[i]);
3363   solv_free(newpkgsfps);
3364   queue_free(&checkq);
3365   solver_free(solv);
3366   queue_free(&job);
3367   pool_free(pool);
3368   free_repoinfos(repoinfos, nrepoinfos);
3369   solv_free(commandlinepkgs);
3370 #ifdef FEDORA
3371   yum_substitute(pool, 0);
3372 #endif
3373   exit(0);
3374 }