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