00001
00006 #include "system.h"
00007
00008 #include <rpmio_internal.h>
00009 #include <rpmlib.h>
00010
00011 #include "cpio.h"
00012
00013 #include "fsm.h"
00014 #define fsmUNSAFE fsmStage
00015
00016 #include "rpmerr.h"
00017
00018 #define _RPMFI_INTERNAL
00019 #include "rpmfi.h"
00020 #include "rpmte.h"
00021 #include "rpmts.h"
00022 #include "rpmsq.h"
00023
00024 #include "ugid.h"
00025
00026 #include "debug.h"
00027
00028
00029
00030
00031
00032
00033
00034 #define alloca_strdup(_s) strcpy(alloca(strlen(_s)+1), (_s))
00035
00036 #define _FSM_DEBUG 0
00037
00038 int _fsm_debug = _FSM_DEBUG;
00039
00040
00041
00042 int _fsm_threads = 0;
00043
00044
00045
00046
00047
00048 int strict_erasures = 0;
00049
00050
00051 rpmts fsmGetTs(const FSM_t fsm) {
00052 const FSMI_t iter = fsm->iter;
00053
00054 return (iter ? iter->ts : NULL);
00055
00056 }
00057
00058 rpmfi fsmGetFi(const FSM_t fsm)
00059 {
00060 const FSMI_t iter = fsm->iter;
00061
00062 return (iter ? iter->fi : NULL);
00063
00064 }
00065
00066 #define SUFFIX_RPMORIG ".rpmorig"
00067 #define SUFFIX_RPMSAVE ".rpmsave"
00068 #define SUFFIX_RPMNEW ".rpmnew"
00069
00078 static
00079 const char * fsmFsPath( const FSM_t fsm,
00080 const struct stat * st,
00081 const char * subdir,
00082 const char * suffix)
00083
00084
00085 {
00086 const char * s = NULL;
00087
00088 if (fsm) {
00089 int nb;
00090 char * t;
00091 nb = strlen(fsm->dirName) +
00092 (st && !S_ISDIR(st->st_mode) ? (subdir ? strlen(subdir) : 0) : 0) +
00093 (st && !S_ISDIR(st->st_mode) ? (suffix ? strlen(suffix) : 0) : 0) +
00094 strlen(fsm->baseName) + 1;
00095
00096 s = t = xmalloc(nb);
00097 t = stpcpy(t, fsm->dirName);
00098 if (st && !S_ISDIR(st->st_mode))
00099 if (subdir) t = stpcpy(t, subdir);
00100 t = stpcpy(t, fsm->baseName);
00101 if (st && !S_ISDIR(st->st_mode))
00102 if (suffix) t = stpcpy(t, suffix);
00103
00104 }
00105 return s;
00106 }
00107
00113 static void * mapFreeIterator( void * p)
00114
00115
00116 {
00117 FSMI_t iter = p;
00118 if (iter) {
00119
00120 iter->ts = rpmtsFree(iter->ts);
00121
00122 iter->fi = rpmfiUnlink(iter->fi, "mapIterator");
00123 }
00124 return _free(p);
00125 }
00126
00133 static void *
00134 mapInitIterator(rpmts ts, rpmfi fi)
00135
00136 {
00137 FSMI_t iter = NULL;
00138
00139 iter = xcalloc(1, sizeof(*iter));
00140 iter->ts = rpmtsLink(ts, "mapIterator");
00141 iter->fi = rpmfiLink(fi, "mapIterator");
00142 iter->reverse = (rpmteType(fi->te) == TR_REMOVED && fi->action != FA_COPYOUT);
00143 iter->i = (iter->reverse ? (fi->fc - 1) : 0);
00144 iter->isave = iter->i;
00145 return iter;
00146 }
00147
00153 static int mapNextIterator( void * a)
00154
00155 {
00156 FSMI_t iter = a;
00157 int i = -1;
00158
00159 if (iter) {
00160 const rpmfi fi = iter->fi;
00161 if (iter->reverse) {
00162 if (iter->i >= 0) i = iter->i--;
00163 } else {
00164 if (iter->i < fi->fc) i = iter->i++;
00165 }
00166 iter->isave = i;
00167 }
00168 return i;
00169 }
00170
00173
00174 static int cpioStrCmp(const void * a, const void * b)
00175
00176 {
00177 const char * afn = *(const char **)a;
00178 const char * bfn = *(const char **)b;
00179
00180
00181 #ifdef VERY_OLD_BUGGY_RPM_PACKAGES
00182 if (strchr(afn, '/') == NULL)
00183 bfn = strrchr(bfn, '/') + 1;
00184 #endif
00185
00186
00187 if (afn[0] == '.' && afn[1] == '/') afn += 2;
00188 if (bfn[0] == '.' && bfn[1] == '/') bfn += 2;
00189
00190
00191 if (afn[0] == '/') afn += 1;
00192 if (bfn[0] == '/') bfn += 1;
00193
00194 return strcmp(afn, bfn);
00195 }
00196
00197
00204
00205 static int mapFind( FSMI_t iter, const char * fsmPath)
00206
00207 {
00208 int ix = -1;
00209
00210 if (iter) {
00211 const rpmfi fi = iter->fi;
00212 if (fi && fi->fc > 0 && fi->apath && fsmPath && *fsmPath) {
00213 const char ** p = NULL;
00214
00215
00216 if (fi->apath != NULL)
00217 p = bsearch(&fsmPath, fi->apath, fi->fc, sizeof(fsmPath),
00218 cpioStrCmp);
00219
00220 if (p) {
00221 iter->i = p - fi->apath;
00222 ix = mapNextIterator(iter);
00223 }
00224 }
00225 }
00226 return ix;
00227 }
00228
00229
00233 typedef struct dnli_s {
00234 rpmfi fi;
00235
00236 char * active;
00237 int reverse;
00238 int isave;
00239 int i;
00240 } * DNLI_t;
00241
00247 static void * dnlFreeIterator( const void * a)
00248
00249 {
00250 if (a) {
00251 DNLI_t dnli = (void *)a;
00252 if (dnli->active) free(dnli->active);
00253 }
00254 return _free(a);
00255 }
00256
00259 static inline int dnlCount( const DNLI_t dnli)
00260
00261 {
00262 return (dnli ? dnli->fi->dc : 0);
00263 }
00264
00267 static inline int dnlIndex( const DNLI_t dnli)
00268
00269 {
00270 return (dnli ? dnli->isave : -1);
00271 }
00272
00279
00280
00281 static
00282 void * dnlInitIterator( const FSM_t fsm,
00283 int reverse)
00284
00285
00286 {
00287 rpmfi fi = fsmGetFi(fsm);
00288 DNLI_t dnli;
00289 int i, j;
00290
00291 if (fi == NULL)
00292 return NULL;
00293 dnli = xcalloc(1, sizeof(*dnli));
00294 dnli->fi = fi;
00295 dnli->reverse = reverse;
00296
00297 dnli->i = (reverse ? fi->dc : 0);
00298
00299
00300 if (fi->dc) {
00301 dnli->active = xcalloc(fi->dc, sizeof(*dnli->active));
00302
00303
00304
00305 for (i = 0; i < fi->fc; i++)
00306 if (!XFA_SKIPPING(fi->actions[i])) dnli->active[fi->dil[i]] = 1;
00307
00308
00309
00310 for (i = 0; i < fi->fc; i++) {
00311 int dil, dnlen, bnlen;
00312
00313 if (!S_ISDIR(fi->fmodes[i]))
00314 continue;
00315
00316 dil = fi->dil[i];
00317 dnlen = strlen(fi->dnl[dil]);
00318 bnlen = strlen(fi->bnl[i]);
00319
00320 for (j = 0; j < fi->dc; j++) {
00321 const char * dnl;
00322 int jlen;
00323
00324 if (!dnli->active[j] || j == dil)
00325 continue;
00326 dnl = fi->dnl[j];
00327 jlen = strlen(dnl);
00328 if (jlen != (dnlen+bnlen+1))
00329 continue;
00330 if (strncmp(dnl, fi->dnl[dil], dnlen))
00331 continue;
00332 if (strncmp(dnl+dnlen, fi->bnl[i], bnlen))
00333 continue;
00334 if (dnl[dnlen+bnlen] != '/' || dnl[dnlen+bnlen+1] != '\0')
00335 continue;
00336
00337
00338 dnli->active[j] = 0;
00339
00340 break;
00341 }
00342 }
00343
00344
00345 if (!reverse) {
00346 j = 0;
00347 for (i = 0; i < fi->dc; i++) {
00348 if (!dnli->active[i]) continue;
00349 if (j == 0) {
00350 j = 1;
00351 rpmMessage(RPMMESS_DEBUG,
00352 _("========== Directories not explicitly included in package:\n"));
00353 }
00354 rpmMessage(RPMMESS_DEBUG, _("%10d %s\n"), i, fi->dnl[i]);
00355 }
00356 if (j)
00357 rpmMessage(RPMMESS_DEBUG, "==========\n");
00358 }
00359 }
00360 return dnli;
00361 }
00362
00363
00364
00370
00371 static
00372 const char * dnlNextIterator( DNLI_t dnli)
00373
00374 {
00375 const char * dn = NULL;
00376
00377 if (dnli) {
00378 rpmfi fi = dnli->fi;
00379 int i = -1;
00380
00381 if (dnli->active)
00382 do {
00383 i = (!dnli->reverse ? dnli->i++ : --dnli->i);
00384 } while (i >= 0 && i < fi->dc && !dnli->active[i]);
00385
00386 if (i >= 0 && i < fi->dc)
00387 dn = fi->dnl[i];
00388 else
00389 i = -1;
00390 dnli->isave = i;
00391 }
00392 return dn;
00393 }
00394
00395
00396 static void * fsmThread(void * arg)
00397
00398
00399 {
00400 FSM_t fsm = arg;
00401
00402 return ((void *) fsmStage(fsm, fsm->nstage));
00403
00404 }
00405
00406 int fsmNext(FSM_t fsm, fileStage nstage)
00407
00408
00409 {
00410 fsm->nstage = nstage;
00411 if (_fsm_threads)
00412 return rpmsqJoin( rpmsqThread(fsmThread, fsm) );
00413 return fsmStage(fsm, fsm->nstage);
00414 }
00415
00421
00422 static int saveHardLink( FSM_t fsm)
00423
00424
00425
00426
00427
00428 {
00429 struct stat * st = &fsm->sb;
00430 int rc = 0;
00431 int ix = -1;
00432 int j;
00433
00434
00435
00436 for (fsm->li = fsm->links; fsm->li; fsm->li = fsm->li->next) {
00437 if (fsm->li->sb.st_ino == st->st_ino && fsm->li->sb.st_dev == st->st_dev)
00438 break;
00439 }
00440
00441
00442
00443
00444
00445 if (fsm->li == NULL) {
00446 fsm->li = xcalloc(1, sizeof(*fsm->li));
00447 fsm->li->next = NULL;
00448 fsm->li->sb = *st;
00449 fsm->li->nlink = st->st_nlink;
00450 fsm->li->linkIndex = fsm->ix;
00451 fsm->li->createdPath = -1;
00452
00453 fsm->li->filex = xcalloc(st->st_nlink, sizeof(fsm->li->filex[0]));
00454 memset(fsm->li->filex, -1, (st->st_nlink * sizeof(fsm->li->filex[0])));
00455 fsm->li->nsuffix = xcalloc(st->st_nlink, sizeof(*fsm->li->nsuffix));
00456
00457 if (fsm->goal == FSM_PKGBUILD)
00458 fsm->li->linksLeft = st->st_nlink;
00459 if (fsm->goal == FSM_PKGINSTALL)
00460 fsm->li->linksLeft = 0;
00461
00462
00463 fsm->li->next = fsm->links;
00464
00465 fsm->links = fsm->li;
00466 }
00467
00468
00469
00470 if (fsm->goal == FSM_PKGBUILD) --fsm->li->linksLeft;
00471
00472 fsm->li->filex[fsm->li->linksLeft] = fsm->ix;
00473
00474 fsm->li->nsuffix[fsm->li->linksLeft] = fsm->nsuffix;
00475
00476
00477 if (fsm->goal == FSM_PKGINSTALL) fsm->li->linksLeft++;
00478
00479 if (fsm->goal == FSM_PKGBUILD)
00480 return (fsm->li->linksLeft > 0);
00481
00482 if (fsm->goal != FSM_PKGINSTALL)
00483 return 0;
00484
00485 if (!(st->st_size || fsm->li->linksLeft == st->st_nlink))
00486 return 1;
00487
00488
00489 { rpmfi fi = fsmGetFi(fsm);
00490
00491 for (j = fsm->li->linksLeft - 1; j >= 0; j--) {
00492 ix = fsm->li->filex[j];
00493 if (ix < 0 || XFA_SKIPPING(fi->actions[ix]))
00494 continue;
00495 break;
00496 }
00497 }
00498
00499
00500 if (ix < 0 || j < 0)
00501 return 1;
00502
00503
00504 fsm->li->linkIndex = j;
00505 fsm->path = _free(fsm->path);
00506 fsm->ix = ix;
00507 rc = fsmNext(fsm, FSM_MAP);
00508 return rc;
00509 }
00510
00511
00517 static void * freeHardLink( struct hardLink_s * li)
00518
00519 {
00520 if (li) {
00521 li->nsuffix = _free(li->nsuffix);
00522 li->filex = _free(li->filex);
00523 }
00524 return _free(li);
00525 }
00526
00527 FSM_t newFSM(void)
00528 {
00529 FSM_t fsm = xcalloc(1, sizeof(*fsm));
00530 return fsm;
00531 }
00532
00533 FSM_t freeFSM(FSM_t fsm)
00534 {
00535 if (fsm) {
00536 fsm->path = _free(fsm->path);
00537
00538 while ((fsm->li = fsm->links) != NULL) {
00539 fsm->links = fsm->li->next;
00540 fsm->li->next = NULL;
00541 fsm->li = freeHardLink(fsm->li);
00542 }
00543
00544 fsm->dnlx = _free(fsm->dnlx);
00545 fsm->ldn = _free(fsm->ldn);
00546 fsm->iter = mapFreeIterator(fsm->iter);
00547 }
00548 return _free(fsm);
00549 }
00550
00551 int fsmSetup(FSM_t fsm, fileStage goal,
00552 const rpmts ts, const rpmfi fi, FD_t cfd,
00553 unsigned int * archiveSize, const char ** failedFile)
00554 {
00555 size_t pos = 0;
00556 int rc, ec = 0;
00557
00558 fsm->goal = goal;
00559 if (cfd != NULL) {
00560 fsm->cfd = fdLink(cfd, "persist (fsm)");
00561 pos = fdGetCpioPos(fsm->cfd);
00562 fdSetCpioPos(fsm->cfd, 0);
00563 }
00564 fsm->iter = mapInitIterator(ts, fi);
00565
00566 if (fsm->goal == FSM_PKGINSTALL || fsm->goal == FSM_PKGBUILD) {
00567 void * ptr;
00568 fi->archivePos = 0;
00569 ptr = rpmtsNotify(ts, fi->te,
00570 RPMCALLBACK_INST_START, fi->archivePos, fi->archiveSize);
00571 }
00572
00573
00574
00575 fsm->archiveSize = archiveSize;
00576 if (fsm->archiveSize)
00577 *fsm->archiveSize = 0;
00578 fsm->failedFile = failedFile;
00579 if (fsm->failedFile)
00580 *fsm->failedFile = NULL;
00581
00582
00583
00584 memset(fsm->sufbuf, 0, sizeof(fsm->sufbuf));
00585 if (fsm->goal == FSM_PKGINSTALL) {
00586 if (ts && rpmtsGetTid(ts) > 0)
00587 sprintf(fsm->sufbuf, ";%08x", (unsigned)rpmtsGetTid(ts));
00588 }
00589
00590 ec = fsm->rc = 0;
00591 rc = fsmUNSAFE(fsm, FSM_CREATE);
00592 if (rc && !ec) ec = rc;
00593
00594 rc = fsmUNSAFE(fsm, fsm->goal);
00595 if (rc && !ec) ec = rc;
00596
00597
00598 if (fsm->archiveSize && ec == 0)
00599 *fsm->archiveSize = (fdGetCpioPos(fsm->cfd) - pos);
00600
00601
00602
00603 return ec;
00604
00605 }
00606
00607 int fsmTeardown(FSM_t fsm)
00608 {
00609 int rc = fsm->rc;
00610
00611 if (!rc)
00612 rc = fsmUNSAFE(fsm, FSM_DESTROY);
00613
00614 fsm->iter = mapFreeIterator(fsm->iter);
00615 if (fsm->cfd != NULL) {
00616 fsm->cfd = fdFree(fsm->cfd, "persist (fsm)");
00617 fsm->cfd = NULL;
00618 }
00619 fsm->failedFile = NULL;
00620 return rc;
00621 }
00622
00623 static int fsmMapFContext(FSM_t fsm)
00624
00625 {
00626 rpmts ts = fsmGetTs(fsm);
00627 rpmfi fi = fsmGetFi(fsm);
00628 struct stat * st = &fsm->sb;
00629
00630
00631
00632
00633 fsm->fcontext = NULL;
00634 if (ts != NULL && rpmtsSELinuxEnabled(ts) == 1 &&
00635 !(rpmtsFlags(ts) & RPMTRANS_FLAG_NOCONTEXTS))
00636 {
00637 security_context_t scon = NULL;
00638
00639 if ( matchpathcon(fsm->path, st->st_mode, &scon) == 0 && scon != NULL) {
00640
00641 fsm->fcontext = scon;
00642 } else {
00643 int i = fsm->ix;
00644
00645
00646 if (fi && i >= 0 && i < fi->fc)
00647 fsm->fcontext = (fi->fcontexts ? fi->fcontexts[i] : NULL);
00648 }
00649 }
00650 return 0;
00651 }
00652
00653 int fsmMapPath(FSM_t fsm)
00654 {
00655 rpmfi fi = fsmGetFi(fsm);
00656 int rc = 0;
00657 int i;
00658
00659 fsm->osuffix = NULL;
00660 fsm->nsuffix = NULL;
00661 fsm->astriplen = 0;
00662 fsm->action = FA_UNKNOWN;
00663 fsm->mapFlags = 0;
00664
00665 i = fsm->ix;
00666 if (fi && i >= 0 && i < fi->fc) {
00667
00668
00669 fsm->astriplen = fi->astriplen;
00670 fsm->action = (fi->actions ? fi->actions[i] : fi->action);
00671 fsm->fflags = (fi->fflags ? fi->fflags[i] : fi->flags);
00672 fsm->mapFlags = (fi->fmapflags ? fi->fmapflags[i] : fi->mapflags);
00673
00674
00675 fsm->dirName = fi->dnl[fi->dil[i]];
00676 fsm->baseName = fi->bnl[i];
00677
00678
00679
00680 switch (fsm->action) {
00681 case FA_SKIP:
00682 break;
00683 case FA_UNKNOWN:
00684 break;
00685
00686 case FA_COPYOUT:
00687 break;
00688 case FA_COPYIN:
00689 case FA_CREATE:
00690 assert(rpmteType(fi->te) == TR_ADDED);
00691 break;
00692
00693 case FA_SKIPNSTATE:
00694 if (fi->fstates && rpmteType(fi->te) == TR_ADDED)
00695 fi->fstates[i] = RPMFILE_STATE_NOTINSTALLED;
00696 break;
00697
00698 case FA_SKIPNETSHARED:
00699 if (fi->fstates && rpmteType(fi->te) == TR_ADDED)
00700 fi->fstates[i] = RPMFILE_STATE_NETSHARED;
00701 break;
00702
00703 case FA_SKIPCOLOR:
00704 if (fi->fstates && rpmteType(fi->te) == TR_ADDED)
00705 fi->fstates[i] = RPMFILE_STATE_WRONGCOLOR;
00706 break;
00707
00708 case FA_BACKUP:
00709 if (!(fsm->fflags & RPMFILE_GHOST))
00710 switch (rpmteType(fi->te)) {
00711 case TR_ADDED:
00712 fsm->osuffix = SUFFIX_RPMORIG;
00713 break;
00714 case TR_REMOVED:
00715 fsm->osuffix = SUFFIX_RPMSAVE;
00716 break;
00717 }
00718 break;
00719
00720 case FA_ALTNAME:
00721 assert(rpmteType(fi->te) == TR_ADDED);
00722 if (!(fsm->fflags & RPMFILE_GHOST))
00723 fsm->nsuffix = SUFFIX_RPMNEW;
00724 break;
00725
00726 case FA_SAVE:
00727 assert(rpmteType(fi->te) == TR_ADDED);
00728 if (!(fsm->fflags & RPMFILE_GHOST))
00729 fsm->osuffix = SUFFIX_RPMSAVE;
00730 break;
00731 case FA_ERASE:
00732 #if 0
00733 assert(rpmteType(fi->te) == TR_REMOVED);
00734 #endif
00735
00736
00737
00738
00739 break;
00740 default:
00741 break;
00742 }
00743
00744
00745 if ((fsm->mapFlags & CPIO_MAP_PATH) || fsm->nsuffix) {
00746 const struct stat * st = &fsm->sb;
00747 fsm->path = _free(fsm->path);
00748 fsm->path = fsmFsPath(fsm, st, fsm->subdir,
00749 (fsm->suffix ? fsm->suffix : fsm->nsuffix));
00750 }
00751 }
00752 return rc;
00753 }
00754
00755 int fsmMapAttrs(FSM_t fsm)
00756 {
00757 struct stat * st = &fsm->sb;
00758 rpmfi fi = fsmGetFi(fsm);
00759 int i = fsm->ix;
00760
00761 if (fi && i >= 0 && i < fi->fc) {
00762 mode_t perms = (S_ISDIR(st->st_mode) ? fi->dperms : fi->fperms);
00763 mode_t finalMode = (fi->fmodes ? fi->fmodes[i] : perms);
00764 dev_t finalRdev = (fi->frdevs ? fi->frdevs[i] : 0);
00765 int_32 finalMtime = (fi->fmtimes ? fi->fmtimes[i] : 0);
00766 uid_t uid = fi->uid;
00767 gid_t gid = fi->gid;
00768
00769 if (fi->fuser && unameToUid(fi->fuser[i], &uid)) {
00770 if (fsm->goal == FSM_PKGINSTALL)
00771 rpmMessage(RPMMESS_WARNING,
00772 _("user %s does not exist - using root\n"), fi->fuser[i]);
00773 uid = 0;
00774 finalMode &= ~S_ISUID;
00775 }
00776
00777 if (fi->fgroup && gnameToGid(fi->fgroup[i], &gid)) {
00778 if (fsm->goal == FSM_PKGINSTALL)
00779 rpmMessage(RPMMESS_WARNING,
00780 _("group %s does not exist - using root\n"), fi->fgroup[i]);
00781 gid = 0;
00782 finalMode &= ~S_ISGID;
00783 }
00784
00785 if (fsm->mapFlags & CPIO_MAP_MODE)
00786 st->st_mode = (st->st_mode & S_IFMT) | (finalMode & ~S_IFMT);
00787 if (fsm->mapFlags & CPIO_MAP_TYPE) {
00788 st->st_mode = (st->st_mode & ~S_IFMT) | (finalMode & S_IFMT);
00789 if ((S_ISCHR(st->st_mode) || S_ISBLK(st->st_mode))
00790 && st->st_nlink == 0)
00791 st->st_nlink = 1;
00792 st->st_rdev = finalRdev;
00793 st->st_mtime = finalMtime;
00794 }
00795 if (fsm->mapFlags & CPIO_MAP_UID)
00796 st->st_uid = uid;
00797 if (fsm->mapFlags & CPIO_MAP_GID)
00798 st->st_gid = gid;
00799
00800 { rpmts ts = fsmGetTs(fsm);
00801
00802
00803
00804
00805 if (ts != NULL && !(rpmtsFlags(ts) & RPMTRANS_FLAG_NOMD5)) {
00806 fsm->fmd5sum = (fi->fmd5s ? fi->fmd5s[i] : NULL);
00807 fsm->md5sum = (fi->md5s ? (fi->md5s + (16 * i)) : NULL);
00808 } else {
00809 fsm->fmd5sum = NULL;
00810 fsm->md5sum = NULL;
00811 }
00812 }
00813
00814 }
00815 return 0;
00816 }
00817
00823
00824 static int expandRegular( FSM_t fsm)
00825
00826
00827
00828 {
00829 const struct stat * st = &fsm->sb;
00830 int left = st->st_size;
00831 int rc = 0;
00832
00833 rc = fsmNext(fsm, FSM_WOPEN);
00834 if (rc)
00835 goto exit;
00836
00837 if (st->st_size > 0 && (fsm->fmd5sum != NULL || fsm->md5sum != NULL))
00838 fdInitDigest(fsm->wfd, PGPHASHALGO_MD5, 0);
00839
00840 while (left) {
00841
00842 fsm->wrlen = (left > fsm->wrsize ? fsm->wrsize : left);
00843 rc = fsmNext(fsm, FSM_DREAD);
00844 if (rc)
00845 goto exit;
00846
00847 rc = fsmNext(fsm, FSM_WRITE);
00848 if (rc)
00849 goto exit;
00850
00851 left -= fsm->wrnb;
00852
00853
00854 if (!rc && left)
00855 (void) fsmNext(fsm, FSM_NOTIFY);
00856 }
00857
00858 if (st->st_size > 0 && (fsm->fmd5sum || fsm->md5sum)) {
00859 void * md5sum = NULL;
00860 int asAscii = (fsm->md5sum == NULL ? 1 : 0);
00861
00862 (void) Fflush(fsm->wfd);
00863 fdFiniDigest(fsm->wfd, PGPHASHALGO_MD5, &md5sum, NULL, asAscii);
00864
00865 if (md5sum == NULL) {
00866 rc = CPIOERR_MD5SUM_MISMATCH;
00867 goto exit;
00868 }
00869
00870 if (fsm->md5sum != NULL) {
00871 if (memcmp(md5sum, fsm->md5sum, 16))
00872 rc = CPIOERR_MD5SUM_MISMATCH;
00873 } else {
00874 if (strcmp(md5sum, fsm->fmd5sum))
00875 rc = CPIOERR_MD5SUM_MISMATCH;
00876 }
00877 md5sum = _free(md5sum);
00878 }
00879
00880 exit:
00881 (void) fsmNext(fsm, FSM_WCLOSE);
00882 return rc;
00883 }
00884
00885
00892
00893 static int writeFile( FSM_t fsm, int writeData)
00894
00895
00896
00897 {
00898 const char * path = fsm->path;
00899 const char * opath = fsm->opath;
00900 struct stat * st = &fsm->sb;
00901 struct stat * ost = &fsm->osb;
00902 char * symbuf = NULL;
00903 int left;
00904 int xx;
00905 int rc;
00906
00907 st->st_size = (writeData ? ost->st_size : 0);
00908
00909
00910 if (S_ISDIR(st->st_mode)) {
00911 st->st_size = 0;
00912 } else if (S_ISLNK(st->st_mode)) {
00913
00914
00915
00916
00917
00918 rc = fsmUNSAFE(fsm, FSM_READLINK);
00919 if (rc) goto exit;
00920 st->st_size = fsm->rdnb;
00921 symbuf = alloca_strdup(fsm->rdbuf);
00922 }
00923
00924
00925 if (fsm->mapFlags & CPIO_MAP_ABSOLUTE) {
00926
00927 int nb = strlen(fsm->dirName) + strlen(fsm->baseName) + sizeof(".");
00928 char * t = alloca(nb);
00929 *t = '\0';
00930 fsm->path = t;
00931 if (fsm->mapFlags & CPIO_MAP_ADDDOT)
00932 *t++ = '.';
00933 t = stpcpy( stpcpy(t, fsm->dirName), fsm->baseName);
00934
00935 } else if (fsm->mapFlags & CPIO_MAP_PATH) {
00936 rpmfi fi = fsmGetFi(fsm);
00937 fsm->path =
00938 (fi->apath ? fi->apath[fsm->ix] + fi->striplen : fi->bnl[fsm->ix]);
00939 }
00940
00941 rc = fsmNext(fsm, FSM_HWRITE);
00942 fsm->path = path;
00943 if (rc) goto exit;
00944
00945 if (writeData && S_ISREG(st->st_mode)) {
00946 #ifdef HAVE_MMAP
00947 char * rdbuf = NULL;
00948 void * mapped = (void *)-1;
00949 size_t nmapped;
00950 #endif
00951
00952 rc = fsmNext(fsm, FSM_ROPEN);
00953 if (rc) goto exit;
00954
00955
00956 #ifdef HAVE_MMAP
00957 nmapped = 0;
00958 mapped = mmap(NULL, st->st_size, PROT_READ, MAP_SHARED, Fileno(fsm->rfd), 0);
00959 if (mapped != (void *)-1) {
00960 rdbuf = fsm->rdbuf;
00961 fsm->rdbuf = (char *) mapped;
00962 fsm->rdlen = nmapped = st->st_size;
00963 #if defined(MADV_DONTNEED)
00964 xx = madvise(mapped, nmapped, MADV_DONTNEED);
00965 #endif
00966 }
00967 #endif
00968
00969 left = st->st_size;
00970
00971 while (left) {
00972 #ifdef HAVE_MMAP
00973 if (mapped != (void *)-1) {
00974 fsm->rdnb = nmapped;
00975 } else
00976 #endif
00977 {
00978 fsm->rdlen = (left > fsm->rdsize ? fsm->rdsize : left),
00979 rc = fsmNext(fsm, FSM_READ);
00980 if (rc) goto exit;
00981 }
00982
00983
00984 rc = fsmNext(fsm, FSM_DWRITE);
00985 if (rc) goto exit;
00986
00987 left -= fsm->wrnb;
00988 }
00989
00990 #ifdef HAVE_MMAP
00991
00992 if (mapped != (void *)-1) {
00993 xx = msync(mapped, nmapped, MS_ASYNC);
00994 #if defined(MADV_DONTNEED)
00995 xx = madvise(mapped, nmapped, MADV_DONTNEED);
00996 #endif
00997
00998 xx = munmap(mapped, nmapped);
00999
01000 fsm->rdbuf = rdbuf;
01001 }
01002
01003 #endif
01004
01005 } else if (writeData && S_ISLNK(st->st_mode)) {
01006
01007
01008 strcpy(fsm->rdbuf, symbuf);
01009
01010 fsm->rdnb = strlen(symbuf);
01011 rc = fsmNext(fsm, FSM_DWRITE);
01012 if (rc) goto exit;
01013 }
01014
01015 rc = fsmNext(fsm, FSM_PAD);
01016 if (rc) goto exit;
01017
01018 rc = 0;
01019
01020 exit:
01021 if (fsm->rfd != NULL)
01022 (void) fsmNext(fsm, FSM_RCLOSE);
01023
01024 fsm->opath = opath;
01025 fsm->path = path;
01026
01027 return rc;
01028 }
01029
01030
01036 static int writeLinkedFile( FSM_t fsm)
01037
01038
01039
01040 {
01041 const char * path = fsm->path;
01042 const char * nsuffix = fsm->nsuffix;
01043 int iterIndex = fsm->ix;
01044 int ec = 0;
01045 int rc;
01046 int i;
01047
01048 fsm->path = NULL;
01049 fsm->nsuffix = NULL;
01050 fsm->ix = -1;
01051
01052
01053
01054 for (i = fsm->li->nlink - 1; i >= 0; i--) {
01055
01056 if (fsm->li->filex[i] < 0) continue;
01057
01058 fsm->ix = fsm->li->filex[i];
01059
01060 rc = fsmNext(fsm, FSM_MAP);
01061
01062
01063
01064 rc = writeFile(fsm, (i == 0));
01065 if (fsm->failedFile && rc != 0 && *fsm->failedFile == NULL) {
01066 ec = rc;
01067 *fsm->failedFile = xstrdup(fsm->path);
01068 }
01069
01070 fsm->path = _free(fsm->path);
01071 fsm->li->filex[i] = -1;
01072 }
01073
01074
01075
01076 fsm->ix = iterIndex;
01077 fsm->nsuffix = nsuffix;
01078 fsm->path = path;
01079 return ec;
01080 }
01081
01087
01088
01089 static int fsmMakeLinks( FSM_t fsm)
01090
01091
01092
01093 {
01094 const char * path = fsm->path;
01095 const char * opath = fsm->opath;
01096 const char * nsuffix = fsm->nsuffix;
01097 int iterIndex = fsm->ix;
01098 int ec = 0;
01099 int rc;
01100 int i;
01101
01102 fsm->path = NULL;
01103 fsm->opath = NULL;
01104 fsm->nsuffix = NULL;
01105 fsm->ix = -1;
01106
01107 fsm->ix = fsm->li->filex[fsm->li->createdPath];
01108 rc = fsmNext(fsm, FSM_MAP);
01109 fsm->opath = fsm->path;
01110 fsm->path = NULL;
01111
01112 for (i = 0; i < fsm->li->nlink; i++) {
01113 if (fsm->li->filex[i] < 0) continue;
01114 if (fsm->li->createdPath == i) continue;
01115
01116 fsm->ix = fsm->li->filex[i];
01117 fsm->path = _free(fsm->path);
01118 rc = fsmNext(fsm, FSM_MAP);
01119 if (XFA_SKIPPING(fsm->action)) continue;
01120
01121 rc = fsmUNSAFE(fsm, FSM_VERIFY);
01122 if (!rc) continue;
01123 if (!(rc == CPIOERR_ENOENT)) break;
01124
01125
01126 rc = fsmNext(fsm, FSM_LINK);
01127 if (fsm->failedFile && rc != 0 && *fsm->failedFile == NULL) {
01128 ec = rc;
01129
01130 *fsm->failedFile = xstrdup(fsm->path);
01131
01132 }
01133
01134 fsm->li->linksLeft--;
01135 }
01136
01137 fsm->path = _free(fsm->path);
01138 fsm->opath = _free(fsm->opath);
01139
01140 fsm->ix = iterIndex;
01141 fsm->nsuffix = nsuffix;
01142 fsm->path = path;
01143 fsm->opath = opath;
01144 return ec;
01145 }
01146
01147
01148
01154
01155 static int fsmCommitLinks( FSM_t fsm)
01156
01157
01158
01159
01160 {
01161 const char * path = fsm->path;
01162 const char * nsuffix = fsm->nsuffix;
01163 int iterIndex = fsm->ix;
01164 struct stat * st = &fsm->sb;
01165 int rc = 0;
01166 int i;
01167
01168 fsm->path = NULL;
01169 fsm->nsuffix = NULL;
01170 fsm->ix = -1;
01171
01172
01173 for (fsm->li = fsm->links; fsm->li; fsm->li = fsm->li->next) {
01174 if (fsm->li->sb.st_ino == st->st_ino && fsm->li->sb.st_dev == st->st_dev)
01175 break;
01176 }
01177
01178
01179
01180 for (i = 0; i < fsm->li->nlink; i++) {
01181 if (fsm->li->filex[i] < 0) continue;
01182 fsm->ix = fsm->li->filex[i];
01183 rc = fsmNext(fsm, FSM_MAP);
01184 if (!XFA_SKIPPING(fsm->action))
01185 rc = fsmNext(fsm, FSM_COMMIT);
01186 fsm->path = _free(fsm->path);
01187 fsm->li->filex[i] = -1;
01188 }
01189
01190
01191 fsm->ix = iterIndex;
01192 fsm->nsuffix = nsuffix;
01193 fsm->path = path;
01194 return rc;
01195 }
01196
01197
01203 static int fsmRmdirs( FSM_t fsm)
01204
01205
01206
01207 {
01208 const char * path = fsm->path;
01209 void * dnli = dnlInitIterator(fsm, 1);
01210 char * dn = fsm->rdbuf;
01211 int dc = dnlCount(dnli);
01212 int rc = 0;
01213
01214 fsm->path = NULL;
01215
01216 dn[0] = '\0';
01217
01218 if (fsm->ldn != NULL && fsm->dnlx != NULL)
01219 while ((fsm->path = dnlNextIterator(dnli)) != NULL) {
01220 int dnlen = strlen(fsm->path);
01221 char * te;
01222
01223 dc = dnlIndex(dnli);
01224 if (fsm->dnlx[dc] < 1 || fsm->dnlx[dc] >= dnlen)
01225 continue;
01226
01227
01228 te = stpcpy(dn, fsm->path) - 1;
01229 fsm->path = dn;
01230
01231
01232
01233 do {
01234 if (*te == '/') {
01235 *te = '\0';
01236
01237 rc = fsmNext(fsm, FSM_RMDIR);
01238
01239 *te = '/';
01240 }
01241 if (rc)
01242 break;
01243 te--;
01244 } while ((te - fsm->path) > fsm->dnlx[dc]);
01245
01246 }
01247
01248 dnli = dnlFreeIterator(dnli);
01249
01250
01251 fsm->path = path;
01252 return rc;
01253 }
01254
01260 static int fsmMkdirs( FSM_t fsm)
01261
01262
01263
01264
01265
01266 {
01267 struct stat * st = &fsm->sb;
01268 struct stat * ost = &fsm->osb;
01269 const char * path = fsm->path;
01270 mode_t st_mode = st->st_mode;
01271 void * dnli = dnlInitIterator(fsm, 0);
01272 char * dn = fsm->rdbuf;
01273 int dc = dnlCount(dnli);
01274 int rc = 0;
01275 int i;
01276
01277 rpmts ts = fsmGetTs(fsm);
01278
01279 rpmsx sx = rpmtsREContext(ts);
01280
01281 fsm->path = NULL;
01282
01283
01284 dn[0] = '\0';
01285 fsm->dnlx = (dc ? xcalloc(dc, sizeof(*fsm->dnlx)) : NULL);
01286
01287 if (fsm->dnlx != NULL)
01288 while ((fsm->path = dnlNextIterator(dnli)) != NULL) {
01289 int dnlen = strlen(fsm->path);
01290 char * te;
01291
01292 dc = dnlIndex(dnli);
01293 if (dc < 0) continue;
01294 fsm->dnlx[dc] = dnlen;
01295 if (dnlen <= 1)
01296 continue;
01297
01298
01299 if (dnlen <= fsm->ldnlen && !strcmp(fsm->path, fsm->ldn))
01300 continue;
01301
01302
01303
01304 (void) stpcpy(dn, fsm->path);
01305 fsm->path = dn;
01306
01307
01308 for (i = 1, te = dn + 1; *te != '\0'; te++, i++) {
01309 if (*te != '/')
01310 continue;
01311
01312 *te = '\0';
01313
01314
01315
01316 if (i < fsm->ldnlen &&
01317 (fsm->ldn[i] == '/' || fsm->ldn[i] == '\0') &&
01318 !strncmp(fsm->path, fsm->ldn, i))
01319 {
01320 *te = '/';
01321
01322 fsm->dnlx[dc] = (te - dn);
01323 continue;
01324 }
01325
01326
01327
01328 rc = fsmUNSAFE(fsm, FSM_LSTAT);
01329 *te = '/';
01330
01331
01332 if (rc == 0 && S_ISDIR(ost->st_mode)) {
01333
01334 fsm->dnlx[dc] = (te - dn);
01335 } else if (rc == CPIOERR_ENOENT) {
01336 rpmfi fi = fsmGetFi(fsm);
01337 *te = '\0';
01338 st->st_mode = S_IFDIR | (fi->dperms & 07777);
01339 rc = fsmNext(fsm, FSM_MKDIR);
01340 if (!rc) {
01341
01342
01343 if (sx != NULL) {
01344 fsm->fcontext = rpmsxFContext(sx, fsm->path, st->st_mode);
01345 rc = fsmNext(fsm, FSM_LSETFCON);
01346 }
01347 if (fsm->fcontext == NULL)
01348 rpmMessage(RPMMESS_DEBUG,
01349 _("%s directory created with perms %04o, no context.\n"),
01350 fsm->path, (unsigned)(st->st_mode & 07777));
01351 else
01352 rpmMessage(RPMMESS_DEBUG,
01353 _("%s directory created with perms %04o, context %s.\n"),
01354 fsm->path, (unsigned)(st->st_mode & 07777),
01355 fsm->fcontext);
01356 fsm->fcontext = NULL;
01357 }
01358 *te = '/';
01359 }
01360 if (rc)
01361 break;
01362 }
01363 if (rc) break;
01364
01365
01366
01367 if (fsm->ldnalloc < (dnlen + 1)) {
01368 fsm->ldnalloc = dnlen + 100;
01369 fsm->ldn = xrealloc(fsm->ldn, fsm->ldnalloc);
01370 }
01371 if (fsm->ldn != NULL) {
01372 strcpy(fsm->ldn, fsm->path);
01373 fsm->ldnlen = dnlen;
01374 }
01375
01376 }
01377
01378 dnli = dnlFreeIterator(dnli);
01379 sx = rpmsxFree(sx);
01380
01381
01382 fsm->path = path;
01383 st->st_mode = st_mode;
01384
01385 return rc;
01386
01387 }
01388
01389 #ifdef NOTYET
01390
01395 static int fsmStat( FSM_t fsm)
01396
01397
01398 {
01399 int rc = 0;
01400
01401 if (fsm->path != NULL) {
01402 int saveernno = errno;
01403 rc = fsmUNSAFE(fsm, (!(fsm->mapFlags & CPIO_FOLLOW_SYMLINKS)
01404 ? FSM_LSTAT : FSM_STAT));
01405 if (rc == CPIOERR_ENOENT) {
01406 errno = saveerrno;
01407 rc = 0;
01408 fsm->exists = 0;
01409 } else if (rc == 0) {
01410 fsm->exists = 1;
01411 }
01412 } else {
01413
01414 fsm->exists = 0;
01415 }
01416 return rc;
01417 }
01418 #endif
01419
01420 #define IS_DEV_LOG(_x) \
01421 ((_x) != NULL && strlen(_x) >= (sizeof("/dev/log")-1) && \
01422 !strncmp((_x), "/dev/log", sizeof("/dev/log")-1) && \
01423 ((_x)[sizeof("/dev/log")-1] == '\0' || \
01424 (_x)[sizeof("/dev/log")-1] == ';'))
01425
01426
01427
01428 int fsmStage(FSM_t fsm, fileStage stage)
01429 {
01430 #ifdef UNUSED
01431 fileStage prevStage = fsm->stage;
01432 const char * const prev = fileStageString(prevStage);
01433 #endif
01434 static int modulo = 4;
01435 const char * const cur = fileStageString(stage);
01436 struct stat * st = &fsm->sb;
01437 struct stat * ost = &fsm->osb;
01438 int saveerrno = errno;
01439 int rc = fsm->rc;
01440 size_t left;
01441 int i;
01442
01443 #define _fafilter(_a) \
01444 (!((_a) == FA_CREATE || (_a) == FA_ERASE || (_a) == FA_COPYIN || (_a) == FA_COPYOUT) \
01445 ? fileActionString(_a) : "")
01446
01447 if (stage & FSM_DEAD) {
01448
01449 } else if (stage & FSM_INTERNAL) {
01450 if (_fsm_debug && !(stage & FSM_SYSCALL))
01451 rpmMessage(RPMMESS_DEBUG, " %8s %06o%3d (%4d,%4d)%10d %s %s\n",
01452 cur,
01453 (unsigned)st->st_mode, (int)st->st_nlink,
01454 (int)st->st_uid, (int)st->st_gid, (int)st->st_size,
01455 (fsm->path ? fsm->path : ""),
01456 _fafilter(fsm->action));
01457 } else {
01458 fsm->stage = stage;
01459 if (_fsm_debug || !(stage & FSM_VERBOSE))
01460 rpmMessage(RPMMESS_DEBUG, "%-8s %06o%3d (%4d,%4d)%10d %s %s\n",
01461 cur,
01462 (unsigned)st->st_mode, (int)st->st_nlink,
01463 (int)st->st_uid, (int)st->st_gid, (int)st->st_size,
01464 (fsm->path ? fsm->path + fsm->astriplen : ""),
01465 _fafilter(fsm->action));
01466 }
01467 #undef _fafilter
01468
01469
01470 switch (stage) {
01471 case FSM_UNKNOWN:
01472 break;
01473 case FSM_PKGINSTALL:
01474 while (1) {
01475
01476 rc = fsmUNSAFE(fsm, FSM_INIT);
01477
01478
01479 if (rc == CPIOERR_HDR_TRAILER) {
01480 rc = 0;
01481 break;
01482 }
01483
01484
01485 if (rc) {
01486 fsm->postpone = 1;
01487 (void) fsmNext(fsm, FSM_UNDO);
01488 break;
01489 }
01490
01491
01492 rc = fsmNext(fsm, FSM_PROCESS);
01493 if (rc) {
01494 (void) fsmNext(fsm, FSM_UNDO);
01495 break;
01496 }
01497
01498
01499 (void) fsmNext(fsm, FSM_NOTIFY);
01500
01501 rc = fsmNext(fsm, FSM_FINI);
01502 if (rc) {
01503 break;
01504 }
01505 }
01506 break;
01507 case FSM_PKGERASE:
01508 case FSM_PKGCOMMIT:
01509 while (1) {
01510
01511 rc = fsmUNSAFE(fsm, FSM_INIT);
01512
01513
01514 if (rc == CPIOERR_HDR_TRAILER) {
01515 rc = 0;
01516 break;
01517 }
01518
01519
01520 if (fsmNext(fsm, FSM_FINI))
01521 break;
01522 }
01523 break;
01524 case FSM_PKGBUILD:
01525 while (1) {
01526
01527 rc = fsmUNSAFE(fsm, FSM_INIT);
01528
01529
01530 if (rc == CPIOERR_HDR_TRAILER) {
01531 rc = 0;
01532 break;
01533 }
01534
01535
01536 if (rc) {
01537 fsm->postpone = 1;
01538 (void) fsmNext(fsm, FSM_UNDO);
01539 break;
01540 }
01541
01542
01543 rc = fsmNext(fsm, FSM_PROCESS);
01544 if (rc) {
01545 (void) fsmNext(fsm, FSM_UNDO);
01546 break;
01547 }
01548
01549
01550 (void) fsmNext(fsm, FSM_NOTIFY);
01551
01552 if (fsmNext(fsm, FSM_FINI))
01553 break;
01554 }
01555
01556
01557 if (!(fsm->mapFlags & CPIO_ALL_HARDLINKS)) {
01558 int nlink, j;
01559 while ((fsm->li = fsm->links) != NULL) {
01560 fsm->links = fsm->li->next;
01561 fsm->li->next = NULL;
01562
01563
01564 for (j = -1, nlink = 0, i = 0; i < fsm->li->nlink; i++) {
01565 if (fsm->li->filex[i] < 0)
01566 continue;
01567 nlink++;
01568 if (j == -1) j = i;
01569 }
01570
01571
01572 if (j != 0) {
01573 fsm->li->filex[0] = fsm->li->filex[j];
01574 fsm->li->filex[j] = -1;
01575 }
01576
01577 fsm->li->sb.st_nlink = nlink;
01578
01579 fsm->sb = fsm->li->sb;
01580 fsm->osb = fsm->sb;
01581
01582 if (!rc) rc = writeLinkedFile(fsm);
01583
01584 fsm->li = freeHardLink(fsm->li);
01585 }
01586 }
01587
01588 if (!rc)
01589 rc = fsmNext(fsm, FSM_TRAILER);
01590
01591 break;
01592 case FSM_CREATE:
01593 { rpmts ts = fsmGetTs(fsm);
01594 #define _tsmask (RPMTRANS_FLAG_PKGCOMMIT | RPMTRANS_FLAG_COMMIT)
01595 fsm->commit = ((ts && (rpmtsFlags(ts) & _tsmask) &&
01596 fsm->goal != FSM_PKGCOMMIT) ? 0 : 1);
01597 #undef _tsmask
01598 }
01599 fsm->path = _free(fsm->path);
01600 fsm->opath = _free(fsm->opath);
01601 fsm->dnlx = _free(fsm->dnlx);
01602
01603 fsm->ldn = _free(fsm->ldn);
01604 fsm->ldnalloc = fsm->ldnlen = 0;
01605
01606 fsm->rdsize = fsm->wrsize = 0;
01607 fsm->rdbuf = fsm->rdb = _free(fsm->rdb);
01608 fsm->wrbuf = fsm->wrb = _free(fsm->wrb);
01609 if (fsm->goal == FSM_PKGINSTALL || fsm->goal == FSM_PKGBUILD) {
01610 fsm->rdsize = 8 * BUFSIZ;
01611 fsm->rdbuf = fsm->rdb = xmalloc(fsm->rdsize);
01612 fsm->wrsize = 8 * BUFSIZ;
01613 fsm->wrbuf = fsm->wrb = xmalloc(fsm->wrsize);
01614 }
01615
01616 fsm->mkdirsdone = 0;
01617 fsm->ix = -1;
01618 fsm->links = NULL;
01619 fsm->li = NULL;
01620 errno = 0;
01621
01622
01623 if (fsm->goal == FSM_PKGINSTALL) {
01624
01625 rc = fsmNext(fsm, FSM_MKDIRS);
01626
01627 if (!rc) fsm->mkdirsdone = 1;
01628 }
01629
01630 break;
01631 case FSM_INIT:
01632 fsm->path = _free(fsm->path);
01633 fsm->postpone = 0;
01634 fsm->diskchecked = fsm->exists = 0;
01635 fsm->subdir = NULL;
01636 fsm->suffix = (fsm->sufbuf[0] != '\0' ? fsm->sufbuf : NULL);
01637 fsm->action = FA_UNKNOWN;
01638 fsm->osuffix = NULL;
01639 fsm->nsuffix = NULL;
01640
01641 if (fsm->goal == FSM_PKGINSTALL) {
01642
01643 rc = fsmUNSAFE(fsm, FSM_NEXT);
01644 }
01645 if (rc) break;
01646
01647
01648 fsm->ix = ((fsm->goal == FSM_PKGINSTALL)
01649 ? mapFind(fsm->iter, fsm->path) : mapNextIterator(fsm->iter));
01650
01651
01652 if (fsm->ix < 0) {
01653 if (fsm->goal == FSM_PKGINSTALL) {
01654 #if 0
01655 rpmMessage(RPMMESS_WARNING,
01656 _("archive file %s was not found in header file list\n"),
01657 fsm->path);
01658 #endif
01659
01660 if (fsm->failedFile && *fsm->failedFile == NULL)
01661 *fsm->failedFile = xstrdup(fsm->path);
01662
01663 rc = CPIOERR_UNMAPPED_FILE;
01664 } else {
01665 rc = CPIOERR_HDR_TRAILER;
01666 }
01667 break;
01668 }
01669
01670
01671 if (fsm->goal != FSM_PKGINSTALL) {
01672 rpmfi fi = fsmGetFi(fsm);
01673 st->st_mode = fi->fmodes[fsm->ix];
01674 }
01675
01676
01677 rc = fsmNext(fsm, FSM_MAP);
01678 if (rc) break;
01679
01680
01681 #ifdef NOTYET
01682 rc = fsmStat(fsm);
01683 #else
01684 if (fsm->path != NULL &&
01685 !(fsm->goal == FSM_PKGINSTALL && S_ISREG(st->st_mode)))
01686 {
01687 rc = fsmUNSAFE(fsm, (!(fsm->mapFlags & CPIO_FOLLOW_SYMLINKS)
01688 ? FSM_LSTAT : FSM_STAT));
01689 if (rc == CPIOERR_ENOENT) {
01690 errno = saveerrno;
01691 rc = 0;
01692 fsm->exists = 0;
01693 } else if (rc == 0) {
01694 fsm->exists = 1;
01695 }
01696 } else {
01697
01698 fsm->exists = 0;
01699 }
01700 #endif
01701 fsm->diskchecked = 1;
01702 if (rc) break;
01703
01704
01705
01706 if (fsm->goal != FSM_PKGINSTALL)
01707 *st = *ost;
01708
01709
01710
01711 rc = fsmMapAttrs(fsm);
01712 if (rc) break;
01713
01714 fsm->postpone = XFA_SKIPPING(fsm->action);
01715 if (fsm->goal == FSM_PKGINSTALL || fsm->goal == FSM_PKGBUILD) {
01716
01717 if (!S_ISDIR(st->st_mode) && st->st_nlink > 1)
01718 fsm->postpone = saveHardLink(fsm);
01719
01720 }
01721 break;
01722 case FSM_PRE:
01723 break;
01724 case FSM_MAP:
01725 rc = fsmMapPath(fsm);
01726 break;
01727 case FSM_MKDIRS:
01728 rc = fsmMkdirs(fsm);
01729 break;
01730 case FSM_RMDIRS:
01731 if (fsm->dnlx)
01732 rc = fsmRmdirs(fsm);
01733 break;
01734 case FSM_PROCESS:
01735 if (fsm->postpone) {
01736 if (fsm->goal == FSM_PKGINSTALL)
01737 rc = fsmNext(fsm, FSM_EAT);
01738 break;
01739 }
01740
01741 if (fsm->goal == FSM_PKGBUILD) {
01742 if (fsm->fflags & RPMFILE_GHOST)
01743 break;
01744 if (!S_ISDIR(st->st_mode) && st->st_nlink > 1) {
01745 struct hardLink_s * li, * prev;
01746
01747 if (!(fsm->mapFlags & CPIO_ALL_HARDLINKS)) break;
01748 rc = writeLinkedFile(fsm);
01749 if (rc) break;
01750
01751 for (li = fsm->links, prev = NULL; li; prev = li, li = li->next)
01752 if (li == fsm->li)
01753 break;
01754
01755 if (prev == NULL)
01756 fsm->links = fsm->li->next;
01757 else
01758 prev->next = fsm->li->next;
01759 fsm->li->next = NULL;
01760 fsm->li = freeHardLink(fsm->li);
01761 } else {
01762 rc = writeFile(fsm, 1);
01763 }
01764 break;
01765 }
01766
01767 if (fsm->goal != FSM_PKGINSTALL)
01768 break;
01769
01770 if (S_ISREG(st->st_mode)) {
01771 const char * path = fsm->path;
01772 if (fsm->osuffix)
01773 fsm->path = fsmFsPath(fsm, st, NULL, NULL);
01774 rc = fsmUNSAFE(fsm, FSM_VERIFY);
01775
01776 if (rc == 0 && fsm->osuffix) {
01777 const char * opath = fsm->opath;
01778 fsm->opath = fsm->path;
01779 fsm->path = fsmFsPath(fsm, st, NULL, fsm->osuffix);
01780 rc = fsmNext(fsm, FSM_RENAME);
01781 if (!rc)
01782 rpmMessage(RPMMESS_WARNING,
01783 _("%s saved as %s\n"),
01784 (fsm->opath ? fsm->opath : ""),
01785 (fsm->path ? fsm->path : ""));
01786 fsm->path = _free(fsm->path);
01787 fsm->opath = opath;
01788 }
01789
01790
01791 fsm->path = path;
01792
01793 if (!(rc == CPIOERR_ENOENT)) return rc;
01794 rc = expandRegular(fsm);
01795 } else if (S_ISDIR(st->st_mode)) {
01796 mode_t st_mode = st->st_mode;
01797 rc = fsmUNSAFE(fsm, FSM_VERIFY);
01798 if (rc == CPIOERR_ENOENT) {
01799 st->st_mode &= ~07777;
01800 st->st_mode |= 00700;
01801 rc = fsmNext(fsm, FSM_MKDIR);
01802 st->st_mode = st_mode;
01803 }
01804 } else if (S_ISLNK(st->st_mode)) {
01805 const char * opath = fsm->opath;
01806
01807 if ((st->st_size + 1) > fsm->rdsize) {
01808 rc = CPIOERR_HDR_SIZE;
01809 break;
01810 }
01811
01812 fsm->wrlen = st->st_size;
01813 rc = fsmNext(fsm, FSM_DREAD);
01814 if (!rc && fsm->rdnb != fsm->wrlen)
01815 rc = CPIOERR_READ_FAILED;
01816 if (rc) break;
01817
01818
01819 fsm->wrbuf[st->st_size] = '\0';
01820
01821
01822
01823 fsm->opath = fsm->wrbuf;
01824
01825 rc = fsmUNSAFE(fsm, FSM_VERIFY);
01826 if (rc == CPIOERR_ENOENT)
01827 rc = fsmNext(fsm, FSM_SYMLINK);
01828 fsm->opath = opath;
01829 } else if (S_ISFIFO(st->st_mode)) {
01830 mode_t st_mode = st->st_mode;
01831
01832 rc = fsmUNSAFE(fsm, FSM_VERIFY);
01833 if (rc == CPIOERR_ENOENT) {
01834 st->st_mode = 0000;
01835 rc = fsmNext(fsm, FSM_MKFIFO);
01836 st->st_mode = st_mode;
01837 }
01838 } else if (S_ISCHR(st->st_mode) ||
01839 S_ISBLK(st->st_mode) ||
01840 S_ISSOCK(st->st_mode) )
01841 {
01842 rc = fsmUNSAFE(fsm, FSM_VERIFY);
01843 if (rc == CPIOERR_ENOENT)
01844 rc = fsmNext(fsm, FSM_MKNOD);
01845 } else {
01846
01847 if (!IS_DEV_LOG(fsm->path))
01848 rc = CPIOERR_UNKNOWN_FILETYPE;
01849 }
01850 if (!S_ISDIR(st->st_mode) && st->st_nlink > 1) {
01851 fsm->li->createdPath = fsm->li->linkIndex;
01852 rc = fsmMakeLinks(fsm);
01853 }
01854 break;
01855 case FSM_POST:
01856 break;
01857 case FSM_MKLINKS:
01858 rc = fsmMakeLinks(fsm);
01859 break;
01860 case FSM_NOTIFY:
01861 if (fsm->goal == FSM_PKGINSTALL || fsm->goal == FSM_PKGBUILD) {
01862 rpmts ts = fsmGetTs(fsm);
01863 rpmfi fi = fsmGetFi(fsm);
01864 void * ptr;
01865 unsigned int archivePos = fdGetCpioPos(fsm->cfd);
01866 if (archivePos > fi->archivePos) {
01867 fi->archivePos = archivePos;
01868 ptr = rpmtsNotify(ts, fi->te, RPMCALLBACK_INST_PROGRESS,
01869 fi->archivePos, fi->archiveSize);
01870 }
01871 }
01872 break;
01873 case FSM_UNDO:
01874 if (fsm->postpone)
01875 break;
01876 if (fsm->goal == FSM_PKGINSTALL) {
01877 (void) fsmNext(fsm,
01878 (S_ISDIR(st->st_mode) ? FSM_RMDIR : FSM_UNLINK));
01879
01880 #ifdef NOTYET
01881 if (fsm->dnlx)
01882 (void) fsmNext(fsm, FSM_RMDIRS);
01883 #endif
01884 errno = saveerrno;
01885 }
01886
01887 if (fsm->failedFile && *fsm->failedFile == NULL)
01888 *fsm->failedFile = xstrdup(fsm->path);
01889
01890 break;
01891 case FSM_FINI:
01892 if (!fsm->postpone && fsm->commit) {
01893 if (fsm->goal == FSM_PKGINSTALL)
01894 rc = ((!S_ISDIR(st->st_mode) && st->st_nlink > 1)
01895 ? fsmCommitLinks(fsm) : fsmNext(fsm, FSM_COMMIT));
01896 if (fsm->goal == FSM_PKGCOMMIT)
01897 rc = fsmNext(fsm, FSM_COMMIT);
01898 if (fsm->goal == FSM_PKGERASE)
01899 rc = fsmNext(fsm, FSM_COMMIT);
01900 }
01901 fsm->path = _free(fsm->path);
01902 fsm->opath = _free(fsm->opath);
01903
01904 memset(st, 0, sizeof(*st));
01905 memset(ost, 0, sizeof(*ost));
01906
01907 break;
01908 case FSM_COMMIT:
01909
01910 if (fsm->osuffix && fsm->diskchecked &&
01911 (fsm->exists || (fsm->goal == FSM_PKGINSTALL && S_ISREG(st->st_mode))))
01912 {
01913 const char * opath = fsm->opath;
01914 const char * path = fsm->path;
01915 fsm->opath = fsmFsPath(fsm, st, NULL, NULL);
01916 fsm->path = fsmFsPath(fsm, st, NULL, fsm->osuffix);
01917 rc = fsmNext(fsm, FSM_RENAME);
01918 if (!rc) {
01919 rpmMessage(RPMMESS_WARNING, _("%s saved as %s\n"),
01920 (fsm->opath ? fsm->opath : ""),
01921 (fsm->path ? fsm->path : ""));
01922 }
01923 fsm->path = _free(fsm->path);
01924 fsm->path = path;
01925 fsm->opath = _free(fsm->opath);
01926 fsm->opath = opath;
01927 }
01928
01929
01930 if (fsm->goal == FSM_PKGERASE) {
01931 if (fsm->action == FA_ERASE) {
01932 rpmfi fi = fsmGetFi(fsm);
01933 if (S_ISDIR(st->st_mode)) {
01934 rc = fsmNext(fsm, FSM_RMDIR);
01935 if (!rc) break;
01936 switch (rc) {
01937 case CPIOERR_ENOENT:
01938 case CPIOERR_ENOTEMPTY:
01939
01940 if (fsm->fflags & RPMFILE_MISSINGOK)
01941 break;
01942
01943
01944 rpmError(
01945 (strict_erasures ? RPMERR_RMDIR : RPMDEBUG_RMDIR),
01946 _("%s rmdir of %s failed: Directory not empty\n"),
01947 rpmfiTypeString(fi), fsm->path);
01948 break;
01949 default:
01950 rpmError(
01951 (strict_erasures ? RPMERR_RMDIR : RPMDEBUG_RMDIR),
01952 _("%s rmdir of %s failed: %s\n"),
01953 rpmfiTypeString(fi), fsm->path, strerror(errno));
01954 break;
01955 }
01956 } else {
01957 rc = fsmNext(fsm, FSM_UNLINK);
01958 if (!rc) break;
01959 switch (rc) {
01960 case CPIOERR_ENOENT:
01961 if (fsm->fflags & RPMFILE_MISSINGOK)
01962 break;
01963
01964 default:
01965 rpmError(
01966 (strict_erasures ? RPMERR_UNLINK : RPMDEBUG_UNLINK),
01967 _("%s unlink of %s failed: %s\n"),
01968 rpmfiTypeString(fi), fsm->path, strerror(errno));
01969 break;
01970 }
01971 }
01972 }
01973
01974 if (!strict_erasures) rc = 0;
01975 break;
01976 }
01977
01978
01979 if (!S_ISSOCK(st->st_mode) && !IS_DEV_LOG(fsm->path)) {
01980
01981 if (!S_ISDIR(st->st_mode) &&
01982 (fsm->subdir || fsm->suffix || fsm->nsuffix))
01983 {
01984 fsm->opath = fsm->path;
01985 fsm->path = fsmFsPath(fsm, st, NULL, fsm->nsuffix);
01986 rc = fsmNext(fsm, FSM_RENAME);
01987 if (!rc && fsm->nsuffix) {
01988 const char * opath = fsmFsPath(fsm, st, NULL, NULL);
01989 rpmMessage(RPMMESS_WARNING, _("%s created as %s\n"),
01990 (opath ? opath : ""),
01991 (fsm->path ? fsm->path : ""));
01992 opath = _free(opath);
01993 }
01994 fsm->opath = _free(fsm->opath);
01995 }
01996
01997
01998
01999 if (!rc && !getuid()) {
02000 rc = fsmMapFContext(fsm);
02001 if (!rc)
02002 rc = fsmNext(fsm, FSM_LSETFCON);
02003 fsm->fcontext = NULL;
02004 }
02005 if (S_ISLNK(st->st_mode)) {
02006 if (!rc && !getuid())
02007 rc = fsmNext(fsm, FSM_LCHOWN);
02008 } else {
02009 if (!rc && !getuid())
02010 rc = fsmNext(fsm, FSM_CHOWN);
02011 if (!rc)
02012 rc = fsmNext(fsm, FSM_CHMOD);
02013 if (!rc) {
02014 time_t mtime = st->st_mtime;
02015 rpmfi fi = fsmGetFi(fsm);
02016 if (fi->fmtimes)
02017 st->st_mtime = fi->fmtimes[fsm->ix];
02018 rc = fsmNext(fsm, FSM_UTIME);
02019 st->st_mtime = mtime;
02020 }
02021 }
02022 }
02023
02024
02025 if (!rc) rc = fsmNext(fsm, FSM_NOTIFY);
02026 else if (fsm->failedFile && *fsm->failedFile == NULL) {
02027
02028 *fsm->failedFile = fsm->path;
02029
02030 fsm->path = NULL;
02031 }
02032 break;
02033 case FSM_DESTROY:
02034 fsm->path = _free(fsm->path);
02035
02036
02037 while ((fsm->li = fsm->links) != NULL) {
02038 fsm->links = fsm->li->next;
02039 fsm->li->next = NULL;
02040 if (fsm->goal == FSM_PKGINSTALL &&
02041 fsm->commit && fsm->li->linksLeft)
02042 {
02043 for (i = 0 ; i < fsm->li->linksLeft; i++) {
02044 if (fsm->li->filex[i] < 0)
02045 continue;
02046 rc = CPIOERR_MISSING_HARDLINK;
02047 if (fsm->failedFile && *fsm->failedFile == NULL) {
02048 fsm->ix = fsm->li->filex[i];
02049 if (!fsmNext(fsm, FSM_MAP)) {
02050
02051 *fsm->failedFile = fsm->path;
02052
02053 fsm->path = NULL;
02054 }
02055 }
02056 break;
02057 }
02058 }
02059 if (fsm->goal == FSM_PKGBUILD &&
02060 (fsm->mapFlags & CPIO_ALL_HARDLINKS))
02061 {
02062 rc = CPIOERR_MISSING_HARDLINK;
02063 }
02064 fsm->li = freeHardLink(fsm->li);
02065 }
02066 fsm->ldn = _free(fsm->ldn);
02067 fsm->ldnalloc = fsm->ldnlen = 0;
02068 fsm->rdbuf = fsm->rdb = _free(fsm->rdb);
02069 fsm->wrbuf = fsm->wrb = _free(fsm->wrb);
02070 break;
02071 case FSM_VERIFY:
02072 if (fsm->diskchecked && !fsm->exists) {
02073 rc = CPIOERR_ENOENT;
02074 break;
02075 }
02076 if (S_ISREG(st->st_mode)) {
02077 char * path = alloca(strlen(fsm->path) + sizeof("-RPMDELETE"));
02078
02079 (void) stpcpy( stpcpy(path, fsm->path), "-RPMDELETE");
02080
02081
02082
02083
02084
02085 fsm->opath = fsm->path;
02086 fsm->path = path;
02087 rc = fsmNext(fsm, FSM_RENAME);
02088 if (!rc)
02089 (void) fsmNext(fsm, FSM_UNLINK);
02090 else
02091 rc = CPIOERR_UNLINK_FAILED;
02092 fsm->path = fsm->opath;
02093 fsm->opath = NULL;
02094 return (rc ? rc : CPIOERR_ENOENT);
02095 break;
02096 } else if (S_ISDIR(st->st_mode)) {
02097 if (S_ISDIR(ost->st_mode)) return 0;
02098 if (S_ISLNK(ost->st_mode)) {
02099 rc = fsmUNSAFE(fsm, FSM_STAT);
02100 if (rc == CPIOERR_ENOENT) rc = 0;
02101 if (rc) break;
02102 errno = saveerrno;
02103 if (S_ISDIR(ost->st_mode)) return 0;
02104 }
02105 } else if (S_ISLNK(st->st_mode)) {
02106 if (S_ISLNK(ost->st_mode)) {
02107
02108 rc = fsmUNSAFE(fsm, FSM_READLINK);
02109 errno = saveerrno;
02110 if (rc) break;
02111 if (!strcmp(fsm->opath, fsm->rdbuf)) return 0;
02112 }
02113 } else if (S_ISFIFO(st->st_mode)) {
02114 if (S_ISFIFO(ost->st_mode)) return 0;
02115 } else if (S_ISCHR(st->st_mode) || S_ISBLK(st->st_mode)) {
02116 if ((S_ISCHR(ost->st_mode) || S_ISBLK(ost->st_mode)) &&
02117 (ost->st_rdev == st->st_rdev)) return 0;
02118 } else if (S_ISSOCK(st->st_mode)) {
02119 if (S_ISSOCK(ost->st_mode)) return 0;
02120 }
02121
02122 rc = 0;
02123 if (fsm->stage == FSM_PROCESS) rc = fsmNext(fsm, FSM_UNLINK);
02124 if (rc == 0) rc = CPIOERR_ENOENT;
02125 return (rc ? rc : CPIOERR_ENOENT);
02126 break;
02127
02128 case FSM_UNLINK:
02129 if (fsm->mapFlags & CPIO_SBIT_CHECK) {
02130 struct stat stb;
02131 if (Lstat(fsm->path, &stb) == 0 && S_ISREG(stb.st_mode) && (stb.st_mode & 06000) != 0)
02132 chmod(fsm->path, stb.st_mode & 0777);
02133 }
02134 rc = Unlink(fsm->path);
02135 if (_fsm_debug && (stage & FSM_SYSCALL))
02136 rpmMessage(RPMMESS_DEBUG, " %8s (%s) %s\n", cur,
02137 fsm->path, (rc < 0 ? strerror(errno) : ""));
02138 if (rc < 0)
02139 rc = (errno == ENOENT ? CPIOERR_ENOENT : CPIOERR_UNLINK_FAILED);
02140 break;
02141 case FSM_RENAME:
02142 rc = Rename(fsm->opath, fsm->path);
02143 #if defined(ETXTBSY)
02144 if (rc && errno == ETXTBSY) {
02145 char * path = alloca(strlen(fsm->path) + sizeof("-RPMDELETE"));
02146 (void) stpcpy( stpcpy(path, fsm->path), "-RPMDELETE");
02147
02148
02149
02150
02151 rc = Rename(fsm->path, path);
02152 if (!rc) rc = Rename(fsm->opath, fsm->path);
02153 }
02154 #endif
02155 if (_fsm_debug && (stage & FSM_SYSCALL))
02156 rpmMessage(RPMMESS_DEBUG, " %8s (%s, %s) %s\n", cur,
02157 fsm->opath, fsm->path, (rc < 0 ? strerror(errno) : ""));
02158 if (rc < 0) rc = CPIOERR_RENAME_FAILED;
02159 break;
02160 case FSM_MKDIR:
02161 rc = Mkdir(fsm->path, (st->st_mode & 07777));
02162 if (_fsm_debug && (stage & FSM_SYSCALL))
02163 rpmMessage(RPMMESS_DEBUG, " %8s (%s, 0%04o) %s\n", cur,
02164 fsm->path, (unsigned)(st->st_mode & 07777),
02165 (rc < 0 ? strerror(errno) : ""));
02166 if (rc < 0) rc = CPIOERR_MKDIR_FAILED;
02167 break;
02168 case FSM_RMDIR:
02169 rc = Rmdir(fsm->path);
02170 if (_fsm_debug && (stage & FSM_SYSCALL))
02171 rpmMessage(RPMMESS_DEBUG, " %8s (%s) %s\n", cur,
02172 fsm->path, (rc < 0 ? strerror(errno) : ""));
02173 if (rc < 0)
02174 switch (errno) {
02175 case ENOENT: rc = CPIOERR_ENOENT; break;
02176 case ENOTEMPTY: rc = CPIOERR_ENOTEMPTY; break;
02177 default: rc = CPIOERR_RMDIR_FAILED; break;
02178 }
02179 break;
02180 case FSM_LSETFCON:
02181 if (fsm->fcontext == NULL || *fsm->fcontext == '\0'
02182 || !strcmp(fsm->fcontext, "<<none>>"))
02183 break;
02184 rc = lsetfilecon(fsm->path, (security_context_t)fsm->fcontext);
02185 if (_fsm_debug && (stage & FSM_SYSCALL))
02186 rpmMessage(RPMMESS_DEBUG, " %8s (%s, %s) %s\n", cur,
02187 fsm->path, fsm->fcontext,
02188 (rc < 0 ? strerror(errno) : ""));
02189 if (rc < 0) rc = (errno == EOPNOTSUPP ? 0 : CPIOERR_LSETFCON_FAILED);
02190 break;
02191 case FSM_CHOWN:
02192 rc = chown(fsm->path, st->st_uid, st->st_gid);
02193 if (_fsm_debug && (stage & FSM_SYSCALL))
02194 rpmMessage(RPMMESS_DEBUG, " %8s (%s, %d, %d) %s\n", cur,
02195 fsm->path, (int)st->st_uid, (int)st->st_gid,
02196 (rc < 0 ? strerror(errno) : ""));
02197 if (rc < 0) rc = CPIOERR_CHOWN_FAILED;
02198 break;
02199 case FSM_LCHOWN:
02200 #if ! CHOWN_FOLLOWS_SYMLINK
02201 rc = lchown(fsm->path, st->st_uid, st->st_gid);
02202 if (_fsm_debug && (stage & FSM_SYSCALL))
02203 rpmMessage(RPMMESS_DEBUG, " %8s (%s, %d, %d) %s\n", cur,
02204 fsm->path, (int)st->st_uid, (int)st->st_gid,
02205 (rc < 0 ? strerror(errno) : ""));
02206 if (rc < 0) rc = CPIOERR_CHOWN_FAILED;
02207 #endif
02208 break;
02209 case FSM_CHMOD:
02210 rc = chmod(fsm->path, (st->st_mode & 07777));
02211 if (_fsm_debug && (stage & FSM_SYSCALL))
02212 rpmMessage(RPMMESS_DEBUG, " %8s (%s, 0%04o) %s\n", cur,
02213 fsm->path, (unsigned)(st->st_mode & 07777),
02214 (rc < 0 ? strerror(errno) : ""));
02215 if (rc < 0) rc = CPIOERR_CHMOD_FAILED;
02216 break;
02217 case FSM_UTIME:
02218 { struct utimbuf stamp;
02219 stamp.actime = st->st_mtime;
02220 stamp.modtime = st->st_mtime;
02221 rc = utime(fsm->path, &stamp);
02222 if (_fsm_debug && (stage & FSM_SYSCALL))
02223 rpmMessage(RPMMESS_DEBUG, " %8s (%s, 0x%x) %s\n", cur,
02224 fsm->path, (unsigned)st->st_mtime,
02225 (rc < 0 ? strerror(errno) : ""));
02226 if (rc < 0) rc = CPIOERR_UTIME_FAILED;
02227 }
02228 break;
02229 case FSM_SYMLINK:
02230 rc = symlink(fsm->opath, fsm->path);
02231 if (_fsm_debug && (stage & FSM_SYSCALL))
02232 rpmMessage(RPMMESS_DEBUG, " %8s (%s, %s) %s\n", cur,
02233 fsm->opath, fsm->path, (rc < 0 ? strerror(errno) : ""));
02234 if (rc < 0) rc = CPIOERR_SYMLINK_FAILED;
02235 break;
02236 case FSM_LINK:
02237 rc = Link(fsm->opath, fsm->path);
02238 if (_fsm_debug && (stage & FSM_SYSCALL))
02239 rpmMessage(RPMMESS_DEBUG, " %8s (%s, %s) %s\n", cur,
02240 fsm->opath, fsm->path, (rc < 0 ? strerror(errno) : ""));
02241 if (rc < 0) rc = CPIOERR_LINK_FAILED;
02242 break;
02243 case FSM_MKFIFO:
02244 rc = mkfifo(fsm->path, (st->st_mode & 07777));
02245 if (_fsm_debug && (stage & FSM_SYSCALL))
02246 rpmMessage(RPMMESS_DEBUG, " %8s (%s, 0%04o) %s\n", cur,
02247 fsm->path, (unsigned)(st->st_mode & 07777),
02248 (rc < 0 ? strerror(errno) : ""));
02249 if (rc < 0) rc = CPIOERR_MKFIFO_FAILED;
02250 break;
02251 case FSM_MKNOD:
02252
02253 rc = mknod(fsm->path, (st->st_mode & ~07777), st->st_rdev);
02254
02255 if (_fsm_debug && (stage & FSM_SYSCALL))
02256 rpmMessage(RPMMESS_DEBUG, " %8s (%s, 0%o, 0x%x) %s\n", cur,
02257 fsm->path, (unsigned)(st->st_mode & ~07777),
02258 (unsigned)st->st_rdev,
02259 (rc < 0 ? strerror(errno) : ""));
02260 if (rc < 0) rc = CPIOERR_MKNOD_FAILED;
02261 break;
02262 case FSM_LSTAT:
02263 rc = Lstat(fsm->path, ost);
02264 if (_fsm_debug && (stage & FSM_SYSCALL) && rc && errno != ENOENT)
02265 rpmMessage(RPMMESS_DEBUG, " %8s (%s, ost) %s\n", cur,
02266 fsm->path, (rc < 0 ? strerror(errno) : ""));
02267 if (rc < 0) {
02268 rc = (errno == ENOENT ? CPIOERR_ENOENT : CPIOERR_LSTAT_FAILED);
02269 memset(ost, 0, sizeof(*ost));
02270 }
02271 break;
02272 case FSM_STAT:
02273 rc = Stat(fsm->path, ost);
02274 if (_fsm_debug && (stage & FSM_SYSCALL) && rc && errno != ENOENT)
02275 rpmMessage(RPMMESS_DEBUG, " %8s (%s, ost) %s\n", cur,
02276 fsm->path, (rc < 0 ? strerror(errno) : ""));
02277 if (rc < 0) {
02278 rc = (errno == ENOENT ? CPIOERR_ENOENT : CPIOERR_STAT_FAILED);
02279 memset(ost, 0, sizeof(*ost));
02280 }
02281 break;
02282 case FSM_READLINK:
02283
02284
02285 rc = Readlink(fsm->path, fsm->rdbuf, fsm->rdsize - 1);
02286
02287 if (_fsm_debug && (stage & FSM_SYSCALL))
02288 rpmMessage(RPMMESS_DEBUG, " %8s (%s, rdbuf, %d) %s\n", cur,
02289 fsm->path, (int)(fsm->rdsize -1), (rc < 0 ? strerror(errno) : ""));
02290 if (rc < 0) rc = CPIOERR_READLINK_FAILED;
02291 else {
02292 fsm->rdnb = rc;
02293
02294 fsm->rdbuf[fsm->rdnb] = '\0';
02295
02296 rc = 0;
02297 }
02298 break;
02299 case FSM_CHROOT:
02300 break;
02301
02302 case FSM_NEXT:
02303 rc = fsmUNSAFE(fsm, FSM_HREAD);
02304 if (rc) break;
02305 if (!strcmp(fsm->path, CPIO_TRAILER)) {
02306 fsm->path = _free(fsm->path);
02307 rc = CPIOERR_HDR_TRAILER;
02308 }
02309 if (!rc)
02310 rc = fsmNext(fsm, FSM_POS);
02311 break;
02312 case FSM_EAT:
02313 for (left = st->st_size; left > 0; left -= fsm->rdnb) {
02314 fsm->wrlen = (left > fsm->wrsize ? fsm->wrsize : left);
02315 rc = fsmNext(fsm, FSM_DREAD);
02316 if (rc)
02317 break;
02318 }
02319 break;
02320 case FSM_POS:
02321 left = (modulo - (fdGetCpioPos(fsm->cfd) % modulo)) % modulo;
02322 if (left) {
02323 fsm->wrlen = left;
02324 (void) fsmNext(fsm, FSM_DREAD);
02325 }
02326 break;
02327 case FSM_PAD:
02328 left = (modulo - (fdGetCpioPos(fsm->cfd) % modulo)) % modulo;
02329 if (left) {
02330
02331 memset(fsm->rdbuf, 0, left);
02332
02333
02334 fsm->rdnb = left;
02335 (void) fsmNext(fsm, FSM_DWRITE);
02336 }
02337 break;
02338 case FSM_TRAILER:
02339 rc = cpioTrailerWrite(fsm);
02340 break;
02341 case FSM_HREAD:
02342 rc = fsmNext(fsm, FSM_POS);
02343 if (!rc)
02344 rc = cpioHeaderRead(fsm, st);
02345 break;
02346 case FSM_HWRITE:
02347 rc = cpioHeaderWrite(fsm, st);
02348 break;
02349 case FSM_DREAD:
02350
02351 fsm->rdnb = Fread(fsm->wrbuf, sizeof(*fsm->wrbuf), fsm->wrlen, fsm->cfd);
02352
02353 if (_fsm_debug && (stage & FSM_SYSCALL))
02354 rpmMessage(RPMMESS_DEBUG, " %8s (%s, %d, cfd)\trdnb %d\n",
02355 cur, (fsm->wrbuf == fsm->wrb ? "wrbuf" : "mmap"),
02356 (int)fsm->wrlen, (int)fsm->rdnb);
02357 if (fsm->rdnb != fsm->wrlen || Ferror(fsm->cfd))
02358 rc = CPIOERR_READ_FAILED;
02359 if (fsm->rdnb > 0)
02360 fdSetCpioPos(fsm->cfd, fdGetCpioPos(fsm->cfd) + fsm->rdnb);
02361 break;
02362 case FSM_DWRITE:
02363 fsm->wrnb = Fwrite(fsm->rdbuf, sizeof(*fsm->rdbuf), fsm->rdnb, fsm->cfd);
02364 if (_fsm_debug && (stage & FSM_SYSCALL))
02365 rpmMessage(RPMMESS_DEBUG, " %8s (%s, %d, cfd)\twrnb %d\n",
02366 cur, (fsm->rdbuf == fsm->rdb ? "rdbuf" : "mmap"),
02367 (int)fsm->rdnb, (int)fsm->wrnb);
02368 if (fsm->rdnb != fsm->wrnb || Ferror(fsm->cfd))
02369 rc = CPIOERR_WRITE_FAILED;
02370 if (fsm->wrnb > 0)
02371 fdSetCpioPos(fsm->cfd, fdGetCpioPos(fsm->cfd) + fsm->wrnb);
02372 break;
02373
02374 case FSM_ROPEN:
02375 fsm->rfd = Fopen(fsm->path, "r.ufdio");
02376 if (fsm->rfd == NULL || Ferror(fsm->rfd)) {
02377 if (fsm->rfd != NULL) (void) fsmNext(fsm, FSM_RCLOSE);
02378 fsm->rfd = NULL;
02379 rc = CPIOERR_OPEN_FAILED;
02380 break;
02381 }
02382 if (_fsm_debug && (stage & FSM_SYSCALL))
02383 rpmMessage(RPMMESS_DEBUG, " %8s (%s, \"r\") rfd %p rdbuf %p\n", cur,
02384 fsm->path, fsm->rfd, fsm->rdbuf);
02385 break;
02386 case FSM_READ:
02387
02388 fsm->rdnb = Fread(fsm->rdbuf, sizeof(*fsm->rdbuf), fsm->rdlen, fsm->rfd);
02389
02390 if (_fsm_debug && (stage & FSM_SYSCALL))
02391 rpmMessage(RPMMESS_DEBUG, " %8s (rdbuf, %d, rfd)\trdnb %d\n",
02392 cur, (int)fsm->rdlen, (int)fsm->rdnb);
02393 if (fsm->rdnb != fsm->rdlen || Ferror(fsm->rfd))
02394 rc = CPIOERR_READ_FAILED;
02395 break;
02396 case FSM_RCLOSE:
02397 if (fsm->rfd != NULL) {
02398 if (_fsm_debug && (stage & FSM_SYSCALL))
02399 rpmMessage(RPMMESS_DEBUG, " %8s (%p)\n", cur, fsm->rfd);
02400 (void) rpmswAdd(rpmtsOp(fsmGetTs(fsm), RPMTS_OP_DIGEST),
02401 fdstat_op(fsm->rfd, FDSTAT_DIGEST));
02402 (void) Fclose(fsm->rfd);
02403 errno = saveerrno;
02404 }
02405 fsm->rfd = NULL;
02406 break;
02407 case FSM_WOPEN:
02408 fsm->wfd = Fopen(fsm->path, "w.ufdio");
02409 if (fsm->wfd == NULL || Ferror(fsm->wfd)) {
02410 if (fsm->wfd != NULL) (void) fsmNext(fsm, FSM_WCLOSE);
02411 fsm->wfd = NULL;
02412 rc = CPIOERR_OPEN_FAILED;
02413 }
02414 if (_fsm_debug && (stage & FSM_SYSCALL))
02415 rpmMessage(RPMMESS_DEBUG, " %8s (%s, \"w\") wfd %p wrbuf %p\n", cur,
02416 fsm->path, fsm->wfd, fsm->wrbuf);
02417 break;
02418 case FSM_WRITE:
02419 fsm->wrnb = Fwrite(fsm->wrbuf, sizeof(*fsm->wrbuf), fsm->rdnb, fsm->wfd);
02420 if (_fsm_debug && (stage & FSM_SYSCALL))
02421 rpmMessage(RPMMESS_DEBUG, " %8s (wrbuf, %d, wfd)\twrnb %d\n",
02422 cur, (int)fsm->rdnb, (int)fsm->wrnb);
02423 if (fsm->rdnb != fsm->wrnb || Ferror(fsm->wfd))
02424 rc = CPIOERR_WRITE_FAILED;
02425 break;
02426 case FSM_WCLOSE:
02427 if (fsm->wfd != NULL) {
02428 if (_fsm_debug && (stage & FSM_SYSCALL))
02429 rpmMessage(RPMMESS_DEBUG, " %8s (%p)\n", cur, fsm->wfd);
02430 (void) rpmswAdd(rpmtsOp(fsmGetTs(fsm), RPMTS_OP_DIGEST),
02431 fdstat_op(fsm->wfd, FDSTAT_DIGEST));
02432 (void) Fclose(fsm->wfd);
02433 errno = saveerrno;
02434 }
02435 fsm->wfd = NULL;
02436 break;
02437
02438 default:
02439 break;
02440 }
02441
02442
02443 if (!(stage & FSM_INTERNAL)) {
02444 fsm->rc = (rc == CPIOERR_HDR_TRAILER ? 0 : rc);
02445 }
02446 return rc;
02447 }
02448
02449
02450
02451 const char *const fileActionString(fileAction a)
02452 {
02453 switch (a) {
02454 case FA_UNKNOWN: return "unknown";
02455 case FA_CREATE: return "create";
02456 case FA_COPYOUT: return "copyout";
02457 case FA_COPYIN: return "copyin";
02458 case FA_BACKUP: return "backup";
02459 case FA_SAVE: return "save";
02460 case FA_SKIP: return "skip";
02461 case FA_ALTNAME: return "altname";
02462 case FA_ERASE: return "erase";
02463 case FA_SKIPNSTATE: return "skipnstate";
02464 case FA_SKIPNETSHARED: return "skipnetshared";
02465 case FA_SKIPCOLOR: return "skipcolor";
02466 default: return "???";
02467 }
02468
02469 }
02470
02471 const char *const fileStageString(fileStage a) {
02472 switch(a) {
02473 case FSM_UNKNOWN: return "unknown";
02474
02475 case FSM_PKGINSTALL:return "INSTALL";
02476 case FSM_PKGERASE: return "ERASE";
02477 case FSM_PKGBUILD: return "BUILD";
02478 case FSM_PKGCOMMIT: return "COMMIT";
02479 case FSM_PKGUNDO: return "UNDO";
02480
02481 case FSM_CREATE: return "create";
02482 case FSM_INIT: return "init";
02483 case FSM_MAP: return "map";
02484 case FSM_MKDIRS: return "mkdirs";
02485 case FSM_RMDIRS: return "rmdirs";
02486 case FSM_PRE: return "pre";
02487 case FSM_PROCESS: return "process";
02488 case FSM_POST: return "post";
02489 case FSM_MKLINKS: return "mklinks";
02490 case FSM_NOTIFY: return "notify";
02491 case FSM_UNDO: return "undo";
02492 case FSM_FINI: return "fini";
02493 case FSM_COMMIT: return "commit";
02494 case FSM_DESTROY: return "destroy";
02495 case FSM_VERIFY: return "verify";
02496
02497 case FSM_UNLINK: return "Unlink";
02498 case FSM_RENAME: return "Rename";
02499 case FSM_MKDIR: return "Mkdir";
02500 case FSM_RMDIR: return "rmdir";
02501 case FSM_LSETFCON: return "lsetfcon";
02502 case FSM_CHOWN: return "chown";
02503 case FSM_LCHOWN: return "lchown";
02504 case FSM_CHMOD: return "chmod";
02505 case FSM_UTIME: return "utime";
02506 case FSM_SYMLINK: return "symlink";
02507 case FSM_LINK: return "Link";
02508 case FSM_MKFIFO: return "mkfifo";
02509 case FSM_MKNOD: return "mknod";
02510 case FSM_LSTAT: return "Lstat";
02511 case FSM_STAT: return "Stat";
02512 case FSM_READLINK: return "Readlink";
02513 case FSM_CHROOT: return "chroot";
02514
02515 case FSM_NEXT: return "next";
02516 case FSM_EAT: return "eat";
02517 case FSM_POS: return "pos";
02518 case FSM_PAD: return "pad";
02519 case FSM_TRAILER: return "trailer";
02520 case FSM_HREAD: return "hread";
02521 case FSM_HWRITE: return "hwrite";
02522 case FSM_DREAD: return "Fread";
02523 case FSM_DWRITE: return "Fwrite";
02524
02525 case FSM_ROPEN: return "Fopen";
02526 case FSM_READ: return "Fread";
02527 case FSM_RCLOSE: return "Fclose";
02528 case FSM_WOPEN: return "Fopen";
02529 case FSM_WRITE: return "Fwrite";
02530 case FSM_WCLOSE: return "Fclose";
02531
02532 default: return "???";
02533 }
02534
02535 }