lib/rpminstall.c

   1 /** \ingroup rpmcli
   2  * \file lib/rpminstall.c
   3  */
   4
   5 #include "system.h"
   6
   7 #include <rpm/rpmcli.h>
   8 #include <rpm/rpmtag.h>
   9 #include <rpm/rpmlib.h>         /* rpmReadPackageFile, vercmp etc */
  10 #include <rpm/rpmdb.h>
  11 #include <rpm/rpmds.h>
  12 #include <rpm/rpmts.h>
  13 #include <rpm/rpmlog.h>
  14 #include <rpm/rpmfileutil.h>
  15
  16 #include "lib/rpmgi.h"
  17 #include "lib/manifest.h"
  18 #include "debug.h"
  19
  20 static int rpmcliPackagesTotal = 0;
  21 static int rpmcliHashesCurrent = 0;
  22 static int rpmcliHashesTotal = 0;
  23 static int rpmcliProgressCurrent = 0;
  24 static int rpmcliProgressTotal = 0;
  25
  26 /**
  27  * Print a CLI progress bar.
  28  * @todo Unsnarl isatty(STDOUT_FILENO) from the control flow.
  29  * @param amount        current
  30  * @param total         final
  31  */
  32 static void printHash(const rpm_loff_t amount, const rpm_loff_t total)
  33 {
  34     int hashesNeeded;
  35
  36     rpmcliHashesTotal = (isatty (STDOUT_FILENO) ? 44 : 50);
  37
  38     if (rpmcliHashesCurrent != rpmcliHashesTotal) {
  39         float pct = (total ? (((float) amount) / total) : 1.0);
  40         hashesNeeded = (rpmcliHashesTotal * pct) + 0.5;
  41         while (hashesNeeded > rpmcliHashesCurrent) {
  42             if (isatty (STDOUT_FILENO)) {
  43                 int i;
  44                 for (i = 0; i < rpmcliHashesCurrent; i++)
  45                     (void) putchar ('#');
  46                 for (; i < rpmcliHashesTotal; i++)
  47                     (void) putchar (' ');
  48                 fprintf(stdout, "(%3d%%)", (int)((100 * pct) + 0.5));
  49                 for (i = 0; i < (rpmcliHashesTotal + 6); i++)
  50                     (void) putchar ('\b');
  51             } else
  52                 fprintf(stdout, "#");
  53
  54             rpmcliHashesCurrent++;
  55         }
  56         (void) fflush(stdout);
  57
  58         if (rpmcliHashesCurrent == rpmcliHashesTotal) {
  59             int i;
  60             rpmcliProgressCurrent++;
  61             if (isatty(STDOUT_FILENO)) {
  62                 for (i = 1; i < rpmcliHashesCurrent; i++)
  63                     (void) putchar ('#');
  64                 pct = (rpmcliProgressTotal
  65                     ? (((float) rpmcliProgressCurrent) / rpmcliProgressTotal)
  66                     : 1);
  67                 fprintf(stdout, " [%3d%%]", (int)((100 * pct) + 0.5));
  68             }
  69             fprintf(stdout, "\n");
  70         }
  71         (void) fflush(stdout);
  72     }
  73 }
  74
  75 static rpmVSFlags setvsFlags(struct rpmInstallArguments_s * ia)
  76 {
  77     rpmVSFlags vsflags;
  78
  79     if (ia->installInterfaceFlags & (INSTALL_UPGRADE | INSTALL_ERASE))
  80         vsflags = rpmExpandNumeric("%{?_vsflags_erase}");
  81     else
  82         vsflags = rpmExpandNumeric("%{?_vsflags_install}");
  83
  84     if (rpmcliQueryFlags & VERIFY_DIGEST)
  85         vsflags |= _RPMVSF_NODIGESTS;
  86     if (rpmcliQueryFlags & VERIFY_SIGNATURE)
  87         vsflags |= _RPMVSF_NOSIGNATURES;
  88     if (rpmcliQueryFlags & VERIFY_HDRCHK)
  89         vsflags |= RPMVSF_NOHDRCHK;
  90
  91     return vsflags;
  92 }
  93
  94 void * rpmShowProgress(const void * arg,
  95                         const rpmCallbackType what,
  96                         const rpm_loff_t amount,
  97                         const rpm_loff_t total,
  98                         fnpyKey key,
  99                         void * data)
 100 {
 101     Header h = (Header) arg;
 102     int flags = (int) ((long)data);
 103     void * rc = NULL;
 104     const char * filename = (const char *)key;
 105     static FD_t fd = NULL;
 106     static int state = -1;
 107
 108     switch (what) {
 109     case RPMCALLBACK_INST_OPEN_FILE:
 110         if (filename == NULL || filename[0] == '\0')
 111             return NULL;
 112         fd = Fopen(filename, "r.ufdio");
 113         /* FIX: still necessary? */
 114         if (fd == NULL || Ferror(fd)) {
 115             rpmlog(RPMLOG_ERR, _("open of %s failed: %s\n"), filename,
 116                         Fstrerror(fd));
 117             if (fd != NULL) {
 118                 Fclose(fd);
 119                 fd = NULL;
 120             }
 121         } else
 122             fd = fdLink(fd);
 123         return (void *)fd;
 124         break;
 125
 126     case RPMCALLBACK_INST_CLOSE_FILE:
 127         /* FIX: still necessary? */
 128         fd = fdFree(fd);
 129         if (fd != NULL) {
 130             Fclose(fd);
 131             fd = NULL;
 132         }
 133         break;
 134
 135     case RPMCALLBACK_INST_START:
 136     case RPMCALLBACK_UNINST_START:
 137         if (state != what) {
 138             state = what;
 139             if (flags & INSTALL_HASH) {
 140                 if (what == RPMCALLBACK_INST_START) {
 141                     fprintf(stdout, "Updating / installing...\n");
 142                 } else {
 143                     fprintf(stdout, "Cleaning up / removing...\n");
 144                 }
 145                 fflush(stdout);
 146             }
 147         }
 148
 149         rpmcliHashesCurrent = 0;
 150         if (h == NULL || !(flags & INSTALL_LABEL))
 151             break;
 152         /* @todo Remove headerFormat() on a progress callback. */
 153         if (flags & INSTALL_HASH) {
 154             char *s = headerFormat(h, "%{NAME}", NULL);
 155             if (isatty (STDOUT_FILENO))
 156                 fprintf(stdout, "%4d:%-23.23s", rpmcliProgressCurrent + 1, s);
 157             else
 158                 fprintf(stdout, "%-28.28s", s);
 159             (void) fflush(stdout);
 160             free(s);
 161         } else {
 162             char *s = headerFormat(h, "%{NAME}-%{VERSION}-%{RELEASE}", NULL);
 163             fprintf(stdout, "%s\n", s);
 164             (void) fflush(stdout);
 165             free(s);
 166         }
 167         break;
 168
 169     case RPMCALLBACK_INST_STOP:
 170         break;
 171
 172     case RPMCALLBACK_TRANS_PROGRESS:
 173     case RPMCALLBACK_INST_PROGRESS:
 174     case RPMCALLBACK_UNINST_PROGRESS:
 175         if (flags & INSTALL_PERCENT)
 176             fprintf(stdout, "%%%% %f\n", (double) (total
 177                                 ? ((((float) amount) / total) * 100)
 178                                 : 100.0));
 179         else if (flags & INSTALL_HASH)
 180             printHash(amount, total);
 181         (void) fflush(stdout);
 182         break;
 183
 184     case RPMCALLBACK_TRANS_START:
 185         rpmcliHashesCurrent = 0;
 186         rpmcliProgressTotal = 1;
 187         rpmcliProgressCurrent = 0;
 188         rpmcliPackagesTotal = total;
 189         state = what;
 190         if (!(flags & INSTALL_LABEL))
 191             break;
 192         if (flags & INSTALL_HASH)
 193             fprintf(stdout, "%-28s", _("Preparing..."));
 194         else
 195             fprintf(stdout, "%s\n", _("Preparing packages..."));
 196         (void) fflush(stdout);
 197         break;
 198
 199     case RPMCALLBACK_TRANS_STOP:
 200         if (flags & INSTALL_HASH)
 201             printHash(1, 1);    /* Fixes "preparing..." progress bar */
 202         rpmcliProgressTotal = rpmcliPackagesTotal;
 203         rpmcliProgressCurrent = 0;
 204         break;
 205
 206     case RPMCALLBACK_UNINST_STOP:
 207         break;
 208     case RPMCALLBACK_UNPACK_ERROR:
 209         break;
 210     case RPMCALLBACK_CPIO_ERROR:
 211         break;
 212     case RPMCALLBACK_SCRIPT_ERROR:
 213         break;
 214     case RPMCALLBACK_SCRIPT_START:
 215         break;
 216     case RPMCALLBACK_SCRIPT_STOP:
 217         break;
 218     case RPMCALLBACK_UNKNOWN:
 219     default:
 220         break;
 221     }
 222
 223     return rc;
 224 }
 225
 226 static void setNotifyFlag(struct rpmInstallArguments_s * ia,
 227                           rpmts ts)
 228 {
 229     int notifyFlags;
 230
 231     notifyFlags = ia->installInterfaceFlags | (rpmIsVerbose() ? INSTALL_LABEL : 0 );
 232     rpmtsSetNotifyCallback(ts, rpmShowProgress, (void *) ((long)notifyFlags));
 233 }
 234
 235 struct rpmEIU {
 236     int numFailed;
 237     int numPkgs;
 238     char ** pkgURL;
 239     char ** fnp;
 240     char * pkgState;
 241     int prevx;
 242     int pkgx;
 243     int numRPMS;
 244     int numSRPMS;
 245     char ** sourceURL;
 246     int argc;
 247     char ** argv;
 248     rpmRelocation * relocations;
 249     rpmRC rpmrc;
 250 };
 251
 252 static int rpmcliTransaction(rpmts ts, struct rpmInstallArguments_s * ia,
 253                       int numPackages)
 254 {
 255     rpmps ps;
 256
 257     int rc = 0;
 258     int stop = 0;
 259
 260     int eflags = ia->installInterfaceFlags & INSTALL_ERASE;
 261
 262     if (!(ia->installInterfaceFlags & INSTALL_NODEPS)) {
 263
 264         if (rpmtsCheck(ts)) {
 265             rc = numPackages;
 266             stop = 1;
 267         }
 268
 269         ps = rpmtsProblems(ts);
 270         if (!stop && rpmpsNumProblems(ps) > 0) {
 271             rpmlog(RPMLOG_ERR, _("Failed dependencies:\n"));
 272             rpmpsPrint(NULL, ps);
 273             rc = numPackages;
 274             stop = 1;
 275         }
 276         ps = rpmpsFree(ps);
 277     }
 278
 279     if (!stop && !(ia->installInterfaceFlags & INSTALL_NOORDER)) {
 280         if (rpmtsOrder(ts)) {
 281             rc = numPackages;
 282             stop = 1;
 283         }
 284     }
 285
 286     if (numPackages && !stop) {
 287         rpmlog(RPMLOG_DEBUG, eflags ? "erasing packages\n" :
 288                                       "installing binary packages\n");
 289         rpmtsClean(ts);
 290         rc = rpmtsRun(ts, NULL, ia->probFilter);
 291
 292         ps = rpmtsProblems(ts);
 293
 294         if ((rpmpsNumProblems(ps) > 0) && (eflags? 1 : (rc > 0)))
 295             rpmpsPrint((eflags? NULL : stderr), ps);
 296         ps = rpmpsFree(ps);
 297     }
 298
 299     return rc;
 300 }
 301
 302 static int tryReadManifest(struct rpmEIU * eiu)
 303 {
 304     int rc;
 305
 306     /* Try to read a package manifest. */
 307     FD_t fd = Fopen(*eiu->fnp, "r.ufdio");
 308     if (fd == NULL || Ferror(fd)) {
 309         rpmlog(RPMLOG_ERR, _("open of %s failed: %s\n"), *eiu->fnp,
 310                Fstrerror(fd));
 311         if (fd != NULL) {
 312             Fclose(fd);
 313             fd = NULL;
 314         }
 315         eiu->numFailed++; *eiu->fnp = NULL;
 316         return RPMRC_FAIL;
 317     }
 318
 319     /* Read list of packages from manifest. */
 320     rc = rpmReadPackageManifest(fd, &eiu->argc, &eiu->argv);
 321     if (rc != RPMRC_OK)
 322         rpmlog(RPMLOG_ERR, _("%s: not an rpm package (or package manifest): %s\n"),
 323                *eiu->fnp, Fstrerror(fd));
 324     Fclose(fd);
 325     fd = NULL;
 326
 327     if (rc != RPMRC_OK)
 328         eiu->numFailed++; *eiu->fnp = NULL;
 329
 330     return rc;
 331 }
 332
 333 static int tryReadHeader(rpmts ts, struct rpmEIU * eiu, Header * hdrp)
 334 {
 335    /* Try to read the header from a package file. */
 336    FD_t fd = Fopen(*eiu->fnp, "r.ufdio");
 337    if (fd == NULL || Ferror(fd)) {
 338        rpmlog(RPMLOG_ERR, _("open of %s failed: %s\n"), *eiu->fnp,
 339               Fstrerror(fd));
 340        if (fd != NULL) {
 341            Fclose(fd);
 342            fd = NULL;
 343        }
 344        eiu->numFailed++; *eiu->fnp = NULL;
 345        return RPMRC_FAIL;
 346    }
 347
 348    /* Read the header, verifying signatures (if present). */
 349    eiu->rpmrc = rpmReadPackageFile(ts, fd, *eiu->fnp, hdrp);
 350    Fclose(fd);
 351    fd = NULL;
 352
 353    /* Honor --nomanifest */
 354    if (eiu->rpmrc == RPMRC_NOTFOUND && (giFlags & RPMGI_NOMANIFEST))
 355        eiu->rpmrc = RPMRC_FAIL;
 356
 357    if(eiu->rpmrc == RPMRC_FAIL) {
 358        rpmlog(RPMLOG_ERR, _("%s cannot be installed\n"), *eiu->fnp);
 359        eiu->numFailed++; *eiu->fnp = NULL;
 360    }
 361
 362    return RPMRC_OK;
 363 }
 364
 365
 366 /* On --freshen, verify package is installed and newer */
 367 static int checkFreshenStatus(rpmts ts, Header h)
 368 {
 369     rpmdbMatchIterator mi = NULL;
 370     const char * name = headerGetString(h, RPMTAG_NAME);
 371     const char *arch = headerGetString(h, RPMTAG_ARCH);
 372     Header oldH = NULL;
 373
 374     if (name != NULL)
 375         mi = rpmtsInitIterator(ts, RPMDBI_NAME, name, 0);
 376     if (rpmtsColor(ts) && arch)
 377         rpmdbSetIteratorRE(mi, RPMTAG_ARCH, RPMMIRE_DEFAULT, arch);
 378
 379     while ((oldH = rpmdbNextIterator(mi)) != NULL) {
 380         /* Package is newer than those currently installed. */
 381         if (rpmVersionCompare(oldH, h) < 0)
 382             break;
 383     }
 384
 385     rpmdbFreeIterator(mi);
 386     return (oldH != NULL);
 387 }
 388
 389 /** @todo Generalize --freshen policies. */
 390 int rpmInstall(rpmts ts, struct rpmInstallArguments_s * ia, ARGV_t fileArgv)
 391 {
 392     struct rpmEIU * eiu = xcalloc(1, sizeof(*eiu));
 393     rpmRelocation * relocations;
 394     char * fileURL = NULL;
 395     rpmVSFlags vsflags, ovsflags;
 396     int rc;
 397     int i;
 398
 399     vsflags = setvsFlags(ia);
 400     ovsflags = rpmtsSetVSFlags(ts, (vsflags | RPMVSF_NEEDPAYLOAD));
 401
 402     if (fileArgv == NULL) goto exit;
 403
 404     (void) rpmtsSetFlags(ts, ia->transFlags);
 405
 406     relocations = ia->relocations;
 407
 408     setNotifyFlag(ia, ts);
 409
 410     if ((eiu->relocations = relocations) != NULL) {
 411         while (eiu->relocations->oldPath)
 412             eiu->relocations++;
 413         if (eiu->relocations->newPath == NULL)
 414             eiu->relocations = NULL;
 415     }
 416
 417     /* Build fully globbed list of arguments in argv[argc]. */
 418     for (eiu->fnp = fileArgv; *eiu->fnp != NULL; eiu->fnp++) {
 419         ARGV_t av = NULL;
 420         int ac = 0;
 421         char * fn;
 422
 423         fn = rpmEscapeSpaces(*eiu->fnp);
 424         rc = rpmGlob(fn, &ac, &av);
 425         fn = _free(fn);
 426         if (rc || ac == 0) {
 427             rpmlog(RPMLOG_ERR, _("File not found by glob: %s\n"), *eiu->fnp);
 428             eiu->numFailed++;
 429             continue;
 430         }
 431
 432         argvAppend(&(eiu->argv), av);
 433         argvFree(av);
 434         eiu->argc += ac;
 435     }
 436
 437 restart:
 438     /* Allocate sufficient storage for next set of args. */
 439     if (eiu->pkgx >= eiu->numPkgs) {
 440         eiu->numPkgs = eiu->pkgx + eiu->argc;
 441         eiu->pkgURL = xrealloc(eiu->pkgURL,
 442                         (eiu->numPkgs + 1) * sizeof(*eiu->pkgURL));
 443         memset(eiu->pkgURL + eiu->pkgx, 0,
 444                         ((eiu->argc + 1) * sizeof(*eiu->pkgURL)));
 445         eiu->pkgState = xrealloc(eiu->pkgState,
 446                         (eiu->numPkgs + 1) * sizeof(*eiu->pkgState));
 447         memset(eiu->pkgState + eiu->pkgx, 0,
 448                         ((eiu->argc + 1) * sizeof(*eiu->pkgState)));
 449     }
 450
 451     /* Retrieve next set of args, cache on local storage. */
 452     for (i = 0; i < eiu->argc; i++) {
 453         fileURL = _free(fileURL);
 454         fileURL = eiu->argv[i];
 455         eiu->argv[i] = NULL;
 456
 457         switch (urlIsURL(fileURL)) {
 458         case URL_IS_HTTPS:
 459         case URL_IS_HTTP:
 460         case URL_IS_FTP:
 461         {   char *tfn = NULL;
 462             FD_t tfd;
 463
 464             if (rpmIsVerbose())
 465                 fprintf(stdout, _("Retrieving %s\n"), fileURL);
 466
 467             tfd = rpmMkTempFile(rpmtsRootDir(ts), &tfn);
 468             if (tfd && tfn) {
 469                 Fclose(tfd);
 470                 rc = urlGetFile(fileURL, tfn);
 471             } else {
 472                 rc = -1;
 473             }
 474
 475             if (rc != 0) {
 476                 rpmlog(RPMLOG_ERR,
 477                         _("skipping %s - transfer failed\n"), fileURL);
 478                 eiu->numFailed++;
 479                 eiu->pkgURL[eiu->pkgx] = NULL;
 480                 tfn = _free(tfn);
 481                 break;
 482             }
 483             eiu->pkgState[eiu->pkgx] = 1;
 484             eiu->pkgURL[eiu->pkgx] = tfn;
 485             eiu->pkgx++;
 486         }   break;
 487         case URL_IS_PATH:
 488         case URL_IS_DASH:       /* WRONG WRONG WRONG */
 489         case URL_IS_HKP:        /* WRONG WRONG WRONG */
 490         default:
 491             eiu->pkgURL[eiu->pkgx] = fileURL;
 492             fileURL = NULL;
 493             eiu->pkgx++;
 494             break;
 495         }
 496     }
 497     fileURL = _free(fileURL);
 498
 499     if (eiu->numFailed) goto exit;
 500
 501     /* Continue processing file arguments, building transaction set. */
 502     for (eiu->fnp = eiu->pkgURL+eiu->prevx;
 503          *eiu->fnp != NULL;
 504          eiu->fnp++, eiu->prevx++)
 505     {
 506         Header h = NULL;
 507         const char * fileName;
 508
 509         rpmlog(RPMLOG_DEBUG, "============== %s\n", *eiu->fnp);
 510         (void) urlPath(*eiu->fnp, &fileName);
 511
 512         if (tryReadHeader(ts, eiu, &h) == RPMRC_FAIL)
 513             continue;
 514
 515         if (eiu->rpmrc == RPMRC_NOTFOUND) {
 516             rc = tryReadManifest(eiu);
 517             if (rc == RPMRC_OK) {
 518                 eiu->prevx++;
 519                 goto restart;
 520             }
 521         }
 522
 523         if (headerIsSource(h)) {
 524             rpmlog(RPMLOG_DEBUG, "\tadded source package [%d]\n",
 525                 eiu->numSRPMS);
 526             eiu->sourceURL = xrealloc(eiu->sourceURL,
 527                                 (eiu->numSRPMS + 2) * sizeof(*eiu->sourceURL));
 528             eiu->sourceURL[eiu->numSRPMS] = *eiu->fnp;
 529             *eiu->fnp = NULL;
 530             eiu->numSRPMS++;
 531             eiu->sourceURL[eiu->numSRPMS] = NULL;
 532             continue;
 533         }
 534
 535         if (eiu->relocations) {
 536             struct rpmtd_s prefixes;
 537
 538             headerGet(h, RPMTAG_PREFIXES, &prefixes, HEADERGET_DEFAULT);
 539             if (rpmtdCount(&prefixes) == 1) {
 540                 eiu->relocations->oldPath = xstrdup(rpmtdGetString(&prefixes));
 541                 rpmtdFreeData(&prefixes);
 542             } else {
 543                 rpmlog(RPMLOG_ERR, _("package %s is not relocatable\n"),
 544                        headerGetString(h, RPMTAG_NAME));
 545                 eiu->numFailed++;
 546                 goto exit;
 547             }
 548         }
 549
 550         if (ia->installInterfaceFlags & INSTALL_FRESHEN)
 551             if (checkFreshenStatus(ts, h) != 1) {
 552                 headerFree(h);
 553                 continue;
 554             }
 555
 556         rc = rpmtsAddInstallElement(ts, h, (fnpyKey)fileName,
 557                         (ia->installInterfaceFlags & INSTALL_UPGRADE) != 0,
 558                         relocations);
 559
 560         headerFree(h);
 561         if (eiu->relocations)
 562             eiu->relocations->oldPath = _free(eiu->relocations->oldPath);
 563
 564         switch(rc) {
 565         case 0:
 566             rpmlog(RPMLOG_DEBUG, "\tadded binary package [%d]\n",
 567                         eiu->numRPMS);
 568             break;
 569         case 1:
 570             rpmlog(RPMLOG_ERR,
 571                             _("error reading from file %s\n"), *eiu->fnp);
 572             eiu->numFailed++;
 573             goto exit;
 574             break;
 575         default:
 576             eiu->numFailed++;
 577             goto exit;
 578             break;
 579         }
 580
 581         eiu->numRPMS++;
 582     }
 583
 584     rpmlog(RPMLOG_DEBUG, "found %d source and %d binary packages\n",
 585                 eiu->numSRPMS, eiu->numRPMS);
 586
 587     if (eiu->numFailed) goto exit;
 588
 589     if (eiu->numRPMS) {
 590         int rc = rpmcliTransaction(ts, ia, eiu->numPkgs);
 591         if (rc < 0)
 592             eiu->numFailed += eiu->numRPMS;
 593         else if (rc > 0)
 594             eiu->numFailed += rc;
 595     }
 596
 597     if (eiu->numSRPMS && (eiu->sourceURL != NULL)) {
 598         for (i = 0; i < eiu->numSRPMS; i++) {
 599             rpmdbCheckSignals();
 600             if (eiu->sourceURL[i] != NULL) {
 601                 rc = RPMRC_OK;
 602                 if (!(rpmtsFlags(ts) & RPMTRANS_FLAG_TEST))
 603                     rc = rpmInstallSource(ts, eiu->sourceURL[i], NULL, NULL);
 604                 if (rc != 0)
 605                     eiu->numFailed++;
 606             }
 607         }
 608     }
 609
 610 exit:
 611     if (eiu->pkgURL != NULL) {
 612         for (i = 0; i < eiu->numPkgs; i++) {
 613             if (eiu->pkgURL[i] == NULL) continue;
 614             if (eiu->pkgState[i] == 1)
 615                 (void) unlink(eiu->pkgURL[i]);
 616             eiu->pkgURL[i] = _free(eiu->pkgURL[i]);
 617         }
 618     }
 619     eiu->pkgState = _free(eiu->pkgState);
 620     eiu->pkgURL = _free(eiu->pkgURL);
 621     eiu->argv = _free(eiu->argv);
 622     rc = eiu->numFailed;
 623     free(eiu);
 624
 625     rpmtsEmpty(ts);
 626     rpmtsSetVSFlags(ts, ovsflags);
 627
 628     return rc;
 629 }
 630
 631 int rpmErase(rpmts ts, struct rpmInstallArguments_s * ia, ARGV_const_t argv)
 632 {
 633     char * const * arg;
 634     char *qfmt = NULL;
 635     int numFailed = 0;
 636     int numPackages = 0;
 637     rpmVSFlags vsflags, ovsflags;
 638
 639     if (argv == NULL) return 0;
 640
 641     vsflags = setvsFlags(ia);
 642     ovsflags = rpmtsSetVSFlags(ts, vsflags);
 643
 644     (void) rpmtsSetFlags(ts, ia->transFlags);
 645
 646     setNotifyFlag(ia, ts);
 647
 648     qfmt = rpmExpand("%{?_query_all_fmt}\n", NULL);
 649     for (arg = argv; *arg; arg++) {
 650         rpmdbMatchIterator mi;
 651         int matches = 0;
 652         int erasing = 1;
 653
 654         /* Iterator count isn't reliable with labels, count manually... */
 655         mi = rpmtsInitIterator(ts, RPMDBI_LABEL, *arg, 0);
 656         while (rpmdbNextIterator(mi) != NULL) {
 657             matches++;
 658         }
 659         rpmdbFreeIterator(mi);
 660
 661         if (! matches) {
 662             rpmlog(RPMLOG_ERR, _("package %s is not installed\n"), *arg);
 663             numFailed++;
 664         } else {
 665             Header h;   /* XXX iterator owns the reference */
 666
 667             if (matches > 1 &&
 668                 !(ia->installInterfaceFlags & UNINSTALL_ALLMATCHES)) {
 669                 rpmlog(RPMLOG_ERR, _("\"%s\" specifies multiple packages:\n"),
 670                         *arg);
 671                 numFailed++;
 672                 erasing = 0;
 673             }
 674
 675             mi = rpmtsInitIterator(ts, RPMDBI_LABEL, *arg, 0);
 676             while ((h = rpmdbNextIterator(mi)) != NULL) {
 677                 if (erasing) {
 678                     (void) rpmtsAddEraseElement(ts, h, -1);
 679                     numPackages++;
 680                 } else {
 681                     char *nevra = headerFormat(h, qfmt, NULL);
 682                     rpmlog(RPMLOG_NOTICE, "  %s", nevra);
 683                     free(nevra);
 684                 }
 685             }
 686             rpmdbFreeIterator(mi);
 687         }
 688     }
 689     free(qfmt);
 690
 691     if (numFailed) goto exit;
 692     numFailed = rpmcliTransaction(ts, ia, numPackages);
 693 exit:
 694     rpmtsEmpty(ts);
 695     rpmtsSetVSFlags(ts, ovsflags);
 696
 697     return numFailed;
 698 }
 699
 700 int rpmInstallSource(rpmts ts, const char * arg,
 701                 char ** specFilePtr, char ** cookie)
 702 {
 703     FD_t fd;
 704     int rc;
 705
 706
 707     fd = Fopen(arg, "r.ufdio");
 708     if (fd == NULL || Ferror(fd)) {
 709         rpmlog(RPMLOG_ERR, _("cannot open %s: %s\n"), arg, Fstrerror(fd));
 710         if (fd != NULL) (void) Fclose(fd);
 711         return 1;
 712     }
 713
 714     if (rpmIsVerbose() && specFilePtr != NULL)
 715         fprintf(stdout, _("Installing %s\n"), arg);
 716
 717     {
 718         rpmVSFlags ovsflags =
 719                 rpmtsSetVSFlags(ts, (specFilePtr) ? (rpmtsVSFlags(ts) | RPMVSF_NEEDPAYLOAD) : rpmtsVSFlags(ts));
 720         rpmRC rpmrc = rpmInstallSourcePackage(ts, fd, specFilePtr, cookie);
 721         rc = (rpmrc == RPMRC_OK ? 0 : 1);
 722         rpmtsSetVSFlags(ts, ovsflags);
 723     }
 724     if (rc != 0) {
 725         rpmlog(RPMLOG_ERR, _("%s cannot be installed\n"), arg);
 726         if (specFilePtr && *specFilePtr)
 727             *specFilePtr = _free(*specFilePtr);
 728         if (cookie && *cookie)
 729             *cookie = _free(*cookie);
 730     }
 731
 732     (void) Fclose(fd);
 733
 734     return rc;
 735 }
 736