/** \ingroup rpmbuild * \file build/files.c * The post-build, pre-packaging file tree walk to assemble the package * manifest. */ #include "system.h" #define MYALLPERMS 07777 #include #include /* getOutputFrom() */ #include "rpmio_internal.h" #include "rpmbuild.h" #include "buildio.h" #include "debug.h" /*@access Header @*/ /*@access TFI_t @*/ /*@access FD_t @*/ /*@access StringBuf @*/ /* compared with NULL */ #define SKIPWHITE(_x) {while(*(_x) && (xisspace(*_x) || *(_x) == ',')) (_x)++;} #define SKIPNONWHITE(_x){while(*(_x) &&!(xisspace(*_x) || *(_x) == ',')) (_x)++;} #define MAXDOCDIR 1024 /** */ typedef enum specdFlags_e { SPECD_DEFFILEMODE = (1 << 0), SPECD_DEFDIRMODE = (1 << 1), SPECD_DEFUID = (1 << 2), SPECD_DEFGID = (1 << 3), SPECD_DEFVERIFY = (1 << 4), SPECD_FILEMODE = (1 << 8), SPECD_DIRMODE = (1 << 9), SPECD_UID = (1 << 10), SPECD_GID = (1 << 11), SPECD_VERIFY = (1 << 12) } specdFlags; /** */ typedef struct FileListRec_s { struct stat fl_st; #define fl_dev fl_st.st_dev #define fl_ino fl_st.st_ino #define fl_mode fl_st.st_mode #define fl_nlink fl_st.st_nlink #define fl_uid fl_st.st_uid #define fl_gid fl_st.st_gid #define fl_rdev fl_st.st_rdev #define fl_size fl_st.st_size #define fl_mtime fl_st.st_mtime /*@only@*/ const char * diskURL; /* get file from here */ /*@only@*/ const char * fileURL; /* filename in cpio archive */ /*@observer@*/ const char * uname; /*@observer@*/ const char * gname; unsigned flags; specdFlags specdFlags; /* which attributes have been explicitly specified. */ unsigned verifyFlags; /*@only@*/ const char *langs; /* XXX locales separated with | */ } * FileListRec; /** */ typedef struct AttrRec_s { const char * ar_fmodestr; const char * ar_dmodestr; const char * ar_user; const char * ar_group; mode_t ar_fmode; mode_t ar_dmode; } * AttrRec; /** * Package file tree walk data. */ typedef struct FileList_s { /*@only@*/ const char * buildRootURL; int fileCount; int totalFileSize; int processingFailed; int passedSpecialDoc; int isSpecialDoc; int noGlob; unsigned devtype; unsigned devmajor; int devminor; int isDir; int currentFlags; specdFlags currentSpecdFlags; int currentVerifyFlags; struct AttrRec_s cur_ar; struct AttrRec_s def_ar; specdFlags defSpecdFlags; int defVerifyFlags; int nLangs; /*@only@*/ /*@null@*/ const char ** currentLangs; /* Hard coded limit of MAXDOCDIR docdirs. */ /* If you break it you are doing something wrong. */ const char * docDirs[MAXDOCDIR]; int docDirCount; /*@only@*/ FileListRec fileList; int fileListRecsAlloced; int fileListRecsUsed; } * FileList; /** */ static void nullAttrRec(/*@out@*/ AttrRec ar) /*@modifies ar @*/ { ar->ar_fmodestr = NULL; ar->ar_dmodestr = NULL; ar->ar_user = NULL; ar->ar_group = NULL; ar->ar_fmode = 0; ar->ar_dmode = 0; } /** */ static void freeAttrRec(AttrRec ar) /*@modifies ar @*/ { ar->ar_fmodestr = _free(ar->ar_fmodestr); ar->ar_dmodestr = _free(ar->ar_dmodestr); ar->ar_user = _free(ar->ar_user); ar->ar_group = _free(ar->ar_group); /* XXX doesn't free ar (yet) */ /*@-nullstate@*/ return; /*@=nullstate@*/ } /** */ static void dupAttrRec(const AttrRec oar, /*@in@*/ /*@out@*/ AttrRec nar) /*@modifies nar @*/ { if (oar == nar) return; freeAttrRec(nar); nar->ar_fmodestr = (oar->ar_fmodestr ? xstrdup(oar->ar_fmodestr) : NULL); nar->ar_dmodestr = (oar->ar_dmodestr ? xstrdup(oar->ar_dmodestr) : NULL); nar->ar_user = (oar->ar_user ? xstrdup(oar->ar_user) : NULL); nar->ar_group = (oar->ar_group ? xstrdup(oar->ar_group) : NULL); nar->ar_fmode = oar->ar_fmode; nar->ar_dmode = oar->ar_dmode; } #if 0 /** */ static void dumpAttrRec(const char * msg, AttrRec ar) /*@globals fileSystem@*/ /*@modifies fileSystem @*/ { if (msg) fprintf(stderr, "%s:\t", msg); fprintf(stderr, "(%s, %s, %s, %s)\n", ar->ar_fmodestr, ar->ar_user, ar->ar_group, ar->ar_dmodestr); } #endif /* strtokWithQuotes() modified from glibc strtok() */ /* Copyright (C) 1991, 1996 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more details. You should have received a copy of the GNU Library General Public License along with the GNU C Library; see the file COPYING.LIB. If not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /** */ static char *strtokWithQuotes(char *s, char *delim) /*@modifies *s @*/ { static char *olds = NULL; char *token; if (s == NULL) { s = olds; } /* Skip leading delimiters */ s += strspn(s, delim); if (*s == '\0') { return NULL; } /* Find the end of the token. */ token = s; if (*token == '"') { token++; /* Find next " char */ s = strchr(token, '"'); } else { s = strpbrk(token, delim); } /* Terminate it */ if (s == NULL) { /* This token finishes the string */ olds = strchr(token, '\0'); } else { /* Terminate the token and make olds point past it */ *s = '\0'; olds = s+1; } /*@-retalias -temptrans @*/ return token; /*@=retalias =temptrans @*/ } /** */ static void timeCheck(int tc, Header h) /*@globals internalState @*/ /*@modifies internalState @*/ { HGE_t hge = (HGE_t)headerGetEntryMinMemory; HFD_t hfd = headerFreeData; int * mtime; const char ** files; rpmTagType fnt; int count, x; time_t currentTime = time(NULL); x = hge(h, RPMTAG_OLDFILENAMES, &fnt, (void **) &files, &count); x = hge(h, RPMTAG_FILEMTIMES, NULL, (void **) &mtime, NULL); for (x = 0; x < count; x++) { if ((currentTime - mtime[x]) > tc) rpmMessage(RPMMESS_WARNING, _("TIMECHECK failure: %s\n"), files[x]); } files = hfd(files, fnt); } /** */ typedef struct VFA { /*@observer@*/ /*@null@*/ const char * attribute; int flag; } VFA_t; /** */ /*@-exportlocal -exportheadervar@*/ /*@unchecked@*/ VFA_t verifyAttrs[] = { { "md5", RPMVERIFY_MD5 }, { "size", RPMVERIFY_FILESIZE }, { "link", RPMVERIFY_LINKTO }, { "user", RPMVERIFY_USER }, { "group", RPMVERIFY_GROUP }, { "mtime", RPMVERIFY_MTIME }, { "mode", RPMVERIFY_MODE }, { "rdev", RPMVERIFY_RDEV }, { NULL, 0 } }; /*@=exportlocal =exportheadervar@*/ /** * @param buf * @param fl package file tree walk data */ static int parseForVerify(char * buf, FileList fl) /*@modifies buf, fl->processingFailed, fl->currentVerifyFlags, fl->defVerifyFlags, fl->currentSpecdFlags, fl->defSpecdFlags @*/ { char *p, *pe, *q; const char *name; int *resultVerify; int negated; int verifyFlags; specdFlags * specdFlags; if ((p = strstr(buf, (name = "%verify"))) != NULL) { resultVerify = &(fl->currentVerifyFlags); specdFlags = &fl->currentSpecdFlags; } else if ((p = strstr(buf, (name = "%defverify"))) != NULL) { resultVerify = &(fl->defVerifyFlags); specdFlags = &fl->defSpecdFlags; } else return 0; for (pe = p; (pe-p) < strlen(name); pe++) *pe = ' '; SKIPSPACE(pe); if (*pe != '(') { rpmError(RPMERR_BADSPEC, _("Missing '(' in %s %s\n"), name, pe); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Bracket %*verify args */ *pe++ = ' '; for (p = pe; *pe && *pe != ')'; pe++) {}; if (*pe == '\0') { rpmError(RPMERR_BADSPEC, _("Missing ')' in %s(%s\n"), name, p); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Localize. Erase parsed string */ q = alloca((pe-p) + 1); strncpy(q, p, pe-p); q[pe-p] = '\0'; while (p <= pe) *p++ = ' '; negated = 0; verifyFlags = RPMVERIFY_NONE; for (p = q; *p != '\0'; p = pe) { SKIPWHITE(p); if (*p == '\0') break; pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; { VFA_t *vfa; for (vfa = verifyAttrs; vfa->attribute != NULL; vfa++) { if (strcmp(p, vfa->attribute)) /*@innercontinue@*/ continue; verifyFlags |= vfa->flag; /*@innerbreak@*/ break; } if (vfa->attribute) continue; } if (!strcmp(p, "not")) { negated ^= 1; } else { rpmError(RPMERR_BADSPEC, _("Invalid %s token: %s\n"), name, p); fl->processingFailed = 1; return RPMERR_BADSPEC; } } *resultVerify = negated ? ~(verifyFlags) : verifyFlags; *specdFlags |= SPECD_VERIFY; return 0; } #define isAttrDefault(_ars) ((_ars)[0] == '-' && (_ars)[1] == '\0') /** * Parse %dev from file manifest. * @param buf * @param fl package file tree walk data * @return 0 on success */ static int parseForDev(char * buf, FileList fl) /*@modifies buf, fl->processingFailed, fl->noGlob, fl->devtype, fl->devmajor, fl->devminor @*/ { const char * name; const char * errstr = NULL; char *p, *pe, *q; int rc = RPMERR_BADSPEC; /* assume error */ if ((p = strstr(buf, (name = "%dev"))) == NULL) return 0; for (pe = p; (pe-p) < strlen(name); pe++) *pe = ' '; SKIPSPACE(pe); if (*pe != '(') { errstr = "'('"; goto exit; } /* Bracket %dev args */ *pe++ = ' '; for (p = pe; *pe && *pe != ')'; pe++) {}; if (*pe != ')') { errstr = "')'"; goto exit; } /* Localize. Erase parsed string */ q = alloca((pe-p) + 1); strncpy(q, p, pe-p); q[pe-p] = '\0'; while (p <= pe) *p++ = ' '; p = q; SKIPWHITE(p); pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; if (*p == 'b') fl->devtype = 'b'; else if (*p == 'c') fl->devtype = 'c'; else { errstr = "devtype"; goto exit; } p = pe; SKIPWHITE(p); pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; for (pe = p; *pe && xisdigit(*pe); pe++) {} ; if (*pe == '\0') { fl->devmajor = atoi(p); /*@-unsignedcompare @*/ /* LCL: ge is ok */ if (!(fl->devmajor >= 0 && fl->devmajor < 256)) { errstr = "devmajor"; goto exit; } /*@=unsignedcompare @*/ pe++; } else { errstr = "devmajor"; goto exit; } p = pe; SKIPWHITE(p); pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; for (pe = p; *pe && xisdigit(*pe); pe++) {} ; if (*pe == '\0') { fl->devminor = atoi(p); if (!(fl->devminor >= 0 && fl->devminor < 256)) { errstr = "devminor"; goto exit; } pe++; } else { errstr = "devminor"; goto exit; } fl->noGlob = 1; rc = 0; exit: if (rc) { rpmError(RPMERR_BADSPEC, _("Missing %s in %s %s\n"), errstr, name, p); fl->processingFailed = 1; } return rc; } /** * Parse %attr and %defattr from file manifest. * @param buf * @param fl package file tree walk data * @return 0 on success */ static int parseForAttr(char * buf, FileList fl) /*@modifies buf, fl->processingFailed, fl->cur_ar, fl->def_ar, fl->currentSpecdFlags, fl->defSpecdFlags @*/ { const char *name; char *p, *pe, *q; int x; struct AttrRec_s arbuf; AttrRec ar = &arbuf, ret_ar; specdFlags * specdFlags; if ( !buf || !fl ) return 0; if ((p = strstr(buf, (name = "%attr"))) != NULL) { ret_ar = &(fl->cur_ar); specdFlags = &fl->currentSpecdFlags; } else if ((p = strstr(buf, (name = "%defattr"))) != NULL) { ret_ar = &(fl->def_ar); specdFlags = &fl->defSpecdFlags; } else return 0; for (pe = p; (pe-p) < strlen(name); pe++) *pe = ' '; SKIPSPACE(pe); if (*pe != '(') { rpmError(RPMERR_BADSPEC, _("Missing '(' in %s %s\n"), name, pe); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Bracket %*attr args */ *pe++ = ' '; for (p = pe; *pe && *pe != ')'; pe++) {}; if (ret_ar == &(fl->def_ar)) { /* %defattr */ q = pe; q++; SKIPSPACE(q); if (*q != '\0') { rpmError(RPMERR_BADSPEC, _("Non-white space follows %s(): %s\n"), name, q); fl->processingFailed = 1; return RPMERR_BADSPEC; } } /* Localize. Erase parsed string */ q = alloca((pe-p) + 1); strncpy(q, p, pe-p); q[pe-p] = '\0'; while (p <= pe) *p++ = ' '; nullAttrRec(ar); p = q; SKIPWHITE(p); if (*p != '\0') { pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; ar->ar_fmodestr = p; p = pe; SKIPWHITE(p); } if (*p != '\0') { pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; ar->ar_user = p; p = pe; SKIPWHITE(p); } if (*p != '\0') { pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; ar->ar_group = p; p = pe; SKIPWHITE(p); } if (*p != '\0' && ret_ar == &(fl->def_ar)) { /* %defattr */ pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; ar->ar_dmodestr = p; p = pe; SKIPWHITE(p); } if (!(ar->ar_fmodestr && ar->ar_user && ar->ar_group) || *p != '\0') { rpmError(RPMERR_BADSPEC, _("Bad syntax: %s(%s)\n"), name, q); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Do a quick test on the mode argument and adjust for "-" */ if (ar->ar_fmodestr && !isAttrDefault(ar->ar_fmodestr)) { unsigned int ui; x = sscanf(ar->ar_fmodestr, "%o", &ui); if ((x == 0) || (ar->ar_fmode & ~MYALLPERMS)) { rpmError(RPMERR_BADSPEC, _("Bad mode spec: %s(%s)\n"), name, q); fl->processingFailed = 1; return RPMERR_BADSPEC; } ar->ar_fmode = ui; } else ar->ar_fmodestr = NULL; if (ar->ar_dmodestr && !isAttrDefault(ar->ar_dmodestr)) { unsigned int ui; x = sscanf(ar->ar_dmodestr, "%o", &ui); if ((x == 0) || (ar->ar_dmode & ~MYALLPERMS)) { rpmError(RPMERR_BADSPEC, _("Bad dirmode spec: %s(%s)\n"), name, q); fl->processingFailed = 1; return RPMERR_BADSPEC; } ar->ar_dmode = ui; } else ar->ar_dmodestr = NULL; if (!(ar->ar_user && !isAttrDefault(ar->ar_user))) ar->ar_user = NULL; if (!(ar->ar_group && !isAttrDefault(ar->ar_group))) ar->ar_group = NULL; dupAttrRec(ar, ret_ar); /* XXX fix all this */ *specdFlags |= SPECD_UID | SPECD_GID | SPECD_FILEMODE | SPECD_DIRMODE; return 0; } /** * Parse %config from file manifest. * @param buf * @param fl package file tree walk data * @return 0 on success */ static int parseForConfig(char * buf, FileList fl) /*@modifies buf, fl->processingFailed, fl->currentFlags @*/ { char *p, *pe, *q; const char *name; if ((p = strstr(buf, (name = "%config"))) == NULL) return 0; fl->currentFlags = RPMFILE_CONFIG; for (pe = p; (pe-p) < strlen(name); pe++) *pe = ' '; SKIPSPACE(pe); if (*pe != '(') return 0; /* Bracket %config args */ *pe++ = ' '; for (p = pe; *pe && *pe != ')'; pe++) {}; if (*pe == '\0') { rpmError(RPMERR_BADSPEC, _("Missing ')' in %s(%s\n"), name, p); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Localize. Erase parsed string */ q = alloca((pe-p) + 1); strncpy(q, p, pe-p); q[pe-p] = '\0'; while (p <= pe) *p++ = ' '; for (p = q; *p != '\0'; p = pe) { SKIPWHITE(p); if (*p == '\0') break; pe = p; SKIPNONWHITE(pe); if (*pe != '\0') *pe++ = '\0'; if (!strcmp(p, "missingok")) { fl->currentFlags |= RPMFILE_MISSINGOK; } else if (!strcmp(p, "noreplace")) { fl->currentFlags |= RPMFILE_NOREPLACE; } else { rpmError(RPMERR_BADSPEC, _("Invalid %s token: %s\n"), name, p); fl->processingFailed = 1; return RPMERR_BADSPEC; } } return 0; } /** */ static int langCmp(const void * ap, const void * bp) /*@*/ { return strcmp(*(const char **)ap, *(const char **)bp); } /** * Parse %lang from file manifest. * @param buf * @param fl package file tree walk data * @return 0 on success */ static int parseForLang(char * buf, FileList fl) /*@modifies buf, fl->processingFailed, fl->currentLangs, fl->nLangs @*/ { char *p, *pe, *q; const char *name; while ((p = strstr(buf, (name = "%lang"))) != NULL) { for (pe = p; (pe-p) < strlen(name); pe++) *pe = ' '; SKIPSPACE(pe); if (*pe != '(') { rpmError(RPMERR_BADSPEC, _("Missing '(' in %s %s\n"), name, pe); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Bracket %lang args */ *pe++ = ' '; for (pe = p; *pe && *pe != ')'; pe++) {}; if (*pe == '\0') { rpmError(RPMERR_BADSPEC, _("Missing ')' in %s(%s\n"), name, p); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Localize. Erase parsed string */ q = alloca((pe-p) + 1); strncpy(q, p, pe-p); q[pe-p] = '\0'; while (p <= pe) *p++ = ' '; /* Parse multiple arguments from %lang */ for (p = q; *p != '\0'; p = pe) { char *newp; size_t np; int i; SKIPWHITE(p); pe = p; SKIPNONWHITE(pe); np = pe - p; /* Sanity check on locale lengths */ if (np < 1 || (np == 1 && *p != 'C') || np >= 32) { rpmError(RPMERR_BADSPEC, _("Unusual locale length: \"%.*s\" in %%lang(%s)\n"), (int)np, p, q); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Check for duplicate locales */ if (fl->currentLangs != NULL) for (i = 0; i < fl->nLangs; i++) { if (strncmp(fl->currentLangs[i], p, np)) /*@innercontinue@*/ continue; rpmError(RPMERR_BADSPEC, _("Duplicate locale %.*s in %%lang(%s)\n"), (int)np, p, q); fl->processingFailed = 1; return RPMERR_BADSPEC; } /* Add new locale */ fl->currentLangs = xrealloc(fl->currentLangs, (fl->nLangs + 1) * sizeof(*fl->currentLangs)); newp = xmalloc( np+1 ); strncpy(newp, p, np); newp[np] = '\0'; fl->currentLangs[fl->nLangs++] = newp; if (*pe == ',') pe++; /* skip , if present */ } } /* Insure that locales are sorted. */ if (fl->currentLangs) qsort(fl->currentLangs, fl->nLangs, sizeof(*fl->currentLangs), langCmp); return 0; } /** */ /*@-exportlocal -exportheadervar@*/ /*@unchecked@*/ VFA_t virtualFileAttributes[] = { { "%dir", 0 }, /* XXX why not RPMFILE_DIR? */ { "%doc", RPMFILE_DOC }, { "%ghost", RPMFILE_GHOST }, { "%exclude", RPMFILE_EXCLUDE }, { "%readme", RPMFILE_README }, { "%license", RPMFILE_LICENSE }, #if WHY_NOT { "%spec", RPMFILE_SPEC }, { "%config", RPMFILE_CONFIG }, { "%donotuse", RPMFILE_DONOTUSE }, /* XXX WTFO? */ { "%missingok", RPMFILE_CONFIG|RPMFILE_MISSINGOK }, { "%noreplace", RPMFILE_CONFIG|RPMFILE_NOREPLACE }, #endif { NULL, 0 } }; /*@=exportlocal =exportheadervar@*/ /** * Parse simple attributes (e.g. %dir) from file manifest. * @param spec * @param pkg * @param buf * @param fl package file tree walk data * @retval fileName * @return 0 on success */ static int parseForSimple(/*@unused@*/Spec spec, Package pkg, char * buf, FileList fl, /*@out@*/ const char ** fileName) /*@globals rpmGlobalMacroContext @*/ /*@modifies buf, fl->processingFailed, *fileName, fl->currentFlags, fl->docDirs, fl->docDirCount, fl->isDir, fl->passedSpecialDoc, fl->isSpecialDoc, pkg->specialDoc, rpmGlobalMacroContext @*/ { char *s, *t; int res, specialDoc = 0; char specialDocBuf[BUFSIZ]; specialDocBuf[0] = '\0'; *fileName = NULL; res = 0; t = buf; while ((s = strtokWithQuotes(t, " \t\n")) != NULL) { t = NULL; if (!strcmp(s, "%docdir")) { s = strtokWithQuotes(NULL, " \t\n"); if (!s || strtokWithQuotes(NULL, " \t\n")) { rpmError(RPMERR_INTERNAL, _("Only one arg for %%docdir\n")); fl->processingFailed = 1; res = 1; } else if (fl->docDirCount == MAXDOCDIR) { rpmError(RPMERR_INTERNAL, _("Hit limit for %%docdir\n")); fl->processingFailed = 1; res = 1; } else fl->docDirs[fl->docDirCount++] = xstrdup(s); break; } /* Set flags for virtual file attributes */ { VFA_t *vfa; for (vfa = virtualFileAttributes; vfa->attribute != NULL; vfa++) { if (strcmp(s, vfa->attribute)) /*@innercontinue@*/ continue; if (!vfa->flag) { if (!strcmp(s, "%dir")) fl->isDir = 1; /* XXX why not RPMFILE_DIR? */ } else fl->currentFlags |= vfa->flag; /*@innerbreak@*/ break; } /* if we got an attribute, continue with next token */ if (vfa->attribute != NULL) continue; } if (*fileName) { /* We already got a file -- error */ rpmError(RPMERR_BADSPEC, _("Two files on one line: %s\n"), *fileName); fl->processingFailed = 1; res = 1; } /*@-branchstate@*/ if (*s != '/') { if (fl->currentFlags & RPMFILE_DOC) { specialDoc = 1; strcat(specialDocBuf, " "); strcat(specialDocBuf, s); } else { /* not in %doc, does not begin with / -- error */ rpmError(RPMERR_BADSPEC, _("File must begin with \"/\": %s\n"), s); fl->processingFailed = 1; res = 1; } } else { *fileName = s; } /*@=branchstate@*/ } if (specialDoc) { if (*fileName || (fl->currentFlags & ~(RPMFILE_DOC))) { rpmError(RPMERR_BADSPEC, _("Can't mix special %%doc with other forms: %s\n"), (*fileName ? *fileName : "")); fl->processingFailed = 1; res = 1; } else { /* XXX WATCHOUT: buf is an arg */ int custom = 0; { const char *ddir = rpmExpand("%{?_customdocdir}", NULL); if (ddir && *ddir) { custom = 1; } else { const char *n, *v; (void) headerNVR(pkg->header, &n, &v, NULL); ddir = rpmGetPath("%{_docdir}/", n, "-", v, NULL); } strcpy(buf, ddir); ddir = _free(ddir); } /* XXX FIXME: this is easy to do as macro expansion */ if (! fl->passedSpecialDoc) { pkg->specialDoc = newStringBuf(); appendStringBuf(pkg->specialDoc, "DOCDIR=$RPM_BUILD_ROOT"); appendLineStringBuf(pkg->specialDoc, buf); appendLineStringBuf(pkg->specialDoc, "export DOCDIR"); if (!custom) appendLineStringBuf(pkg->specialDoc, "rm -rf \"$DOCDIR\""); appendLineStringBuf(pkg->specialDoc, MKDIR_P " \"$DOCDIR\""); /*@-temptrans@*/ *fileName = buf; /*@=temptrans@*/ fl->passedSpecialDoc = 1; fl->isSpecialDoc = 1; } appendStringBuf(pkg->specialDoc, "cp -prL "); appendStringBuf(pkg->specialDoc, specialDocBuf); appendLineStringBuf(pkg->specialDoc, " \"$DOCDIR\""); appendLineStringBuf(pkg->specialDoc, "chmod -R go-w \"$DOCDIR\""); appendLineStringBuf(pkg->specialDoc, "chmod -R a+rX \"$DOCDIR\""); } } return res; } /** */ static int compareFileListRecs(const void * ap, const void * bp) /*@*/ { const char *a = ((FileListRec)ap)->fileURL; const char *b = ((FileListRec)bp)->fileURL; return strcmp(a, b); } /** * Test if file is located in a %docdir. * @param fl package file tree walk data * @param fileName file path * @return 1 if doc file, 0 if not */ static int isDoc(FileList fl, const char * fileName) /*@*/ { int i; for (i = 0; i < fl->docDirCount; i++) { const char *docdir = fl->docDirs[i]; size_t len = strlen(docdir); if (strncmp(fileName, docdir, len) != 0) continue; if (docdir[len-1] == '/') return 1; if (fileName[len] == '/') return 1; } return 0; } /** * Verify that file attributes scope over hardlinks correctly. * If partial hardlink sets are possible, then add tracking dependency. * @todo Only %lang coloring is checked, %doc et al also need doing. * @param fl package file tree walk data * @return 1 if partial hardlink sets can exist, 0 otherwise. */ static int checkHardLinks(FileList fl) /*@*/ { FileListRec ilp, jlp; int i, j; for (i = 0; i < fl->fileListRecsUsed; i++) { ilp = fl->fileList + i; /* Is this a hard link? */ if (!(S_ISREG(ilp->fl_mode) && ilp->fl_nlink > 1)) continue; /* Find all members of hardlink set. */ for (j = i + 1; j < fl->fileListRecsUsed; j++) { jlp = fl->fileList + j; /* Member of same hardlink set? */ if (!S_ISREG(jlp->fl_mode)) /*@innercontinue@*/ continue; if (ilp->fl_nlink != jlp->fl_nlink) /*@innercontinue@*/ continue; if (ilp->fl_ino != jlp->fl_ino) /*@innercontinue@*/ continue; if (ilp->fl_dev != jlp->fl_dev) /*@innercontinue@*/ continue; /* Identical locale coloring? */ if (!strcmp(ilp->langs, jlp->langs)) continue; return 1; } } return 0; } /** * Add file entries to header. * @todo Should directories have %doc/%config attributes? (#14531) * @todo Remove RPMTAG_OLDFILENAMES, add dirname/basename instead. * @param fl package file tree walk data * @param cpioList * @param h * @param isSrc */ static void genCpioListAndHeader(Spec spec, /*@partial@*/ FileList fl, TFI_t * cpioList, Header h, int isSrc) /*@globals rpmGlobalMacroContext, fileSystem @*/ /*@modifies h, *cpioList, fl->processingFailed, fl->fileList, rpmGlobalMacroContext, fileSystem @*/ { int _addDotSlash = !isSrc; int apathlen = 0; int dpathlen = 0; int skipLen = 0; FileListRec flp; char buf[BUFSIZ]; int i; /* Sort the big list */ qsort(fl->fileList, fl->fileListRecsUsed, sizeof(*(fl->fileList)), compareFileListRecs); /* Generate the header. */ if (! isSrc) { skipLen = 1; } for (i = 0, flp = fl->fileList; i < fl->fileListRecsUsed; i++, flp++) { char *s; /* Merge duplicate entries. */ while (i < (fl->fileListRecsUsed - 1) && !strcmp(flp->fileURL, flp[1].fileURL)) { /* Two entries for the same file found, merge the entries. */ /* Note that an %exclude is a duplication of a file reference */ /* file flags */ flp[1].flags |= flp->flags; if (!(flp[1].flags & RPMFILE_EXCLUDE)) rpmMessage(RPMMESS_WARNING, _("File listed twice: %s\n"), flp->fileURL); /* file mode */ if (S_ISDIR(flp->fl_mode)) { if ((flp[1].specdFlags & (SPECD_DIRMODE | SPECD_DEFDIRMODE)) < (flp->specdFlags & (SPECD_DIRMODE | SPECD_DEFDIRMODE))) flp[1].fl_mode = flp->fl_mode; } else { if ((flp[1].specdFlags & (SPECD_FILEMODE | SPECD_DEFFILEMODE)) < (flp->specdFlags & (SPECD_FILEMODE | SPECD_DEFFILEMODE))) flp[1].fl_mode = flp->fl_mode; } /* uid */ if ((flp[1].specdFlags & (SPECD_UID | SPECD_DEFUID)) < (flp->specdFlags & (SPECD_UID | SPECD_DEFUID))) { flp[1].fl_uid = flp->fl_uid; flp[1].uname = flp->uname; } /* gid */ if ((flp[1].specdFlags & (SPECD_GID | SPECD_DEFGID)) < (flp->specdFlags & (SPECD_GID | SPECD_DEFGID))) { flp[1].fl_gid = flp->fl_gid; flp[1].gname = flp->gname; } /* verify flags */ if ((flp[1].specdFlags & (SPECD_VERIFY | SPECD_DEFVERIFY)) < (flp->specdFlags & (SPECD_VERIFY | SPECD_DEFVERIFY))) flp[1].verifyFlags = flp->verifyFlags; /* XXX to-do: language */ flp++; i++; } /* Skip files that were marked with %exclude. */ if (flp->flags & RPMFILE_EXCLUDE) { AUTO_REALLOC(spec->exclude, spec->excludeCount, 8); spec->exclude[spec->excludeCount++] = xstrdup(flp->fileURL); continue; } /* Omit '/' and/or URL prefix, leave room for "./" prefix */ apathlen += (strlen(flp->fileURL) - skipLen + (_addDotSlash ? 3 : 1)); /* Leave room for both dirname and basename NUL's */ dpathlen += (strlen(flp->diskURL) + 2); /* * Make the header, the OLDFILENAMES will get converted to a * compressed file list write before we write the actual package to * disk. */ (void) headerAddOrAppendEntry(h, RPMTAG_OLDFILENAMES, RPM_STRING_ARRAY_TYPE, &(flp->fileURL), 1); /*@-sizeoftype@*/ if (sizeof(flp->fl_size) != sizeof(uint_32)) { uint_32 psize = (uint_32)flp->fl_size; (void) headerAddOrAppendEntry(h, RPMTAG_FILESIZES, RPM_INT32_TYPE, &(psize), 1); } else { (void) headerAddOrAppendEntry(h, RPMTAG_FILESIZES, RPM_INT32_TYPE, &(flp->fl_size), 1); } (void) headerAddOrAppendEntry(h, RPMTAG_FILEUSERNAME, RPM_STRING_ARRAY_TYPE, &(flp->uname), 1); (void) headerAddOrAppendEntry(h, RPMTAG_FILEGROUPNAME, RPM_STRING_ARRAY_TYPE, &(flp->gname), 1); if (sizeof(flp->fl_mtime) != sizeof(uint_32)) { uint_32 mtime = (uint_32)flp->fl_mtime; (void) headerAddOrAppendEntry(h, RPMTAG_FILEMTIMES, RPM_INT32_TYPE, &(mtime), 1); } else { (void) headerAddOrAppendEntry(h, RPMTAG_FILEMTIMES, RPM_INT32_TYPE, &(flp->fl_mtime), 1); } if (sizeof(flp->fl_mode) != sizeof(uint_16)) { uint_16 pmode = (uint_16)flp->fl_mode; (void) headerAddOrAppendEntry(h, RPMTAG_FILEMODES, RPM_INT16_TYPE, &(pmode), 1); } else { (void) headerAddOrAppendEntry(h, RPMTAG_FILEMODES, RPM_INT16_TYPE, &(flp->fl_mode), 1); } if (sizeof(flp->fl_rdev) != sizeof(uint_16)) { uint_16 prdev = (uint_16)flp->fl_rdev; (void) headerAddOrAppendEntry(h, RPMTAG_FILERDEVS, RPM_INT16_TYPE, &(prdev), 1); } else { (void) headerAddOrAppendEntry(h, RPMTAG_FILERDEVS, RPM_INT16_TYPE, &(flp->fl_rdev), 1); } if (sizeof(flp->fl_dev) != sizeof(uint_32)) { uint_32 pdevice = (uint_32)flp->fl_dev; (void) headerAddOrAppendEntry(h, RPMTAG_FILEDEVICES, RPM_INT32_TYPE, &(pdevice), 1); } else { (void) headerAddOrAppendEntry(h, RPMTAG_FILEDEVICES, RPM_INT32_TYPE, &(flp->fl_dev), 1); } if (sizeof(flp->fl_ino) != sizeof(uint_32)) { uint_32 ino = (uint_32)flp->fl_ino; (void) headerAddOrAppendEntry(h, RPMTAG_FILEINODES, RPM_INT32_TYPE, &(ino), 1); } else { (void) headerAddOrAppendEntry(h, RPMTAG_FILEINODES, RPM_INT32_TYPE, &(flp->fl_ino), 1); } /*@=sizeoftype@*/ (void) headerAddOrAppendEntry(h, RPMTAG_FILELANGS, RPM_STRING_ARRAY_TYPE, &(flp->langs), 1); /* We used to add these, but they should not be needed */ /* (void) headerAddOrAppendEntry(h, RPMTAG_FILEUIDS, * RPM_INT32_TYPE, &(flp->fl_uid), 1); * (void) headerAddOrAppendEntry(h, RPMTAG_FILEGIDS, * RPM_INT32_TYPE, &(flp->fl_gid), 1); */ buf[0] = '\0'; if (S_ISREG(flp->fl_mode)) (void) domd5(flp->diskURL, buf, 1); s = buf; (void) headerAddOrAppendEntry(h, RPMTAG_FILEMD5S, RPM_STRING_ARRAY_TYPE, &s, 1); buf[0] = '\0'; if (S_ISLNK(flp->fl_mode)) { buf[Readlink(flp->diskURL, buf, BUFSIZ)] = '\0'; if (fl->buildRootURL) { const char * buildRoot; (void) urlPath(fl->buildRootURL, &buildRoot); if (buf[0] == '/' && strcmp(buildRoot, "/") && !strncmp(buf, buildRoot, strlen(buildRoot))) { rpmError(RPMERR_BADSPEC, _("Symlink points to BuildRoot: %s -> %s\n"), flp->fileURL, buf); fl->processingFailed = 1; } } } s = buf; (void) headerAddOrAppendEntry(h, RPMTAG_FILELINKTOS, RPM_STRING_ARRAY_TYPE, &s, 1); if (flp->flags & RPMFILE_GHOST) { flp->verifyFlags &= ~(RPMVERIFY_MD5 | RPMVERIFY_FILESIZE | RPMVERIFY_LINKTO | RPMVERIFY_MTIME); } (void) headerAddOrAppendEntry(h, RPMTAG_FILEVERIFYFLAGS, RPM_INT32_TYPE, &(flp->verifyFlags), 1); if (!isSrc && isDoc(fl, flp->fileURL)) flp->flags |= RPMFILE_DOC; /* XXX Should directories have %doc/%config attributes? (#14531) */ if (S_ISDIR(flp->fl_mode)) flp->flags &= ~(RPMFILE_CONFIG|RPMFILE_DOC); (void) headerAddOrAppendEntry(h, RPMTAG_FILEFLAGS, RPM_INT32_TYPE, &(flp->flags), 1); } compressFilelist(h); { TFI_t fi = xcalloc(1, sizeof(*fi)); char * a, * d; fi->type = TR_ADDED; loadFi(h, fi); fi->dnl = _free(fi->dnl); fi->bnl = _free(fi->bnl); fi->dnl = xmalloc(fi->fc * sizeof(*fi->dnl) + dpathlen); d = (char *)(fi->dnl + fi->fc); *d = '\0'; fi->bnl = xmalloc(fi->fc * (sizeof(*fi->bnl) + sizeof(*fi->dil))); /*@-dependenttrans@*/ /* FIX: artifact of spoofing headerGetEntry */ fi->dil = (int *)(fi->bnl + fi->fc); /*@=dependenttrans@*/ fi->apath = xmalloc(fi->fc * sizeof(*fi->apath) + apathlen); a = (char *)(fi->apath + fi->fc); *a = '\0'; fi->actions = xcalloc(sizeof(*fi->actions), fi->fc); fi->fmapflags = xcalloc(sizeof(*fi->fmapflags), fi->fc); fi->astriplen = 0; if (fl->buildRootURL) fi->astriplen = strlen(fl->buildRootURL); fi->striplen = 0; fi->fuser = NULL; fi->fuids = xcalloc(sizeof(*fi->fuids), fi->fc); fi->fgroup = NULL; fi->fgids = xcalloc(sizeof(*fi->fgids), fi->fc); /* Make the cpio list */ for (i = 0, flp = fl->fileList; i < fi->fc; i++, flp++) { char * b; /* Skip (possible) duplicate file entries, use last entry info. */ while (((flp - fl->fileList) < (fl->fileListRecsUsed - 1)) && !strcmp(flp->fileURL, flp[1].fileURL)) flp++; if (flp->flags & RPMFILE_EXCLUDE) { i--; continue; } /* Create disk directory and base name. */ fi->dil[i] = i; /*@-dependenttrans@*/ /* FIX: artifact of spoofing headerGetEntry */ fi->dnl[fi->dil[i]] = d; /*@=dependenttrans@*/ #ifdef IA64_SUCKS_ROCKS (void) stpcpy(d, flp->diskURL); d += strlen(d); #else d = stpcpy(d, flp->diskURL); #endif /* Make room for the dirName NUL, find start of baseName. */ for (b = d; b > fi->dnl[fi->dil[i]] && *b != '/'; b--) b[1] = b[0]; b++; /* dirname's end in '/' */ *b++ = '\0'; /* terminate dirname, b points to basename */ fi->bnl[i] = b; d += 2; /* skip both dirname and basename NUL's */ /* Create archive path, normally adding "./" */ /*@-dependenttrans@*/ /* FIX: xstrdup? nah ... */ fi->apath[i] = a; /*@=dependenttrans@*/ if (_addDotSlash) { #ifdef IA64_SUCKS_ROCKS (void) stpcpy(a, "./"); a += strlen(a); #else a = stpcpy(a, "./"); #endif } #ifdef IA64_SUCKS_ROCKS (void) stpcpy(a, (flp->fileURL + skipLen)); a += strlen(a); #else a = stpcpy(a, (flp->fileURL + skipLen)); #endif a++; /* skip apath NUL */ if (flp->flags & RPMFILE_GHOST) { fi->actions[i] = FA_SKIP; continue; } fi->actions[i] = FA_COPYOUT; fi->fuids[i] = getUidS(flp->uname); fi->fgids[i] = getGidS(flp->gname); if (fi->fuids[i] == (uid_t)-1) fi->fuids[i] = 0; if (fi->fgids[i] == (gid_t)-1) fi->fgids[i] = 0; fi->fmapflags[i] = CPIO_MAP_PATH | CPIO_MAP_TYPE | CPIO_MAP_MODE | CPIO_MAP_UID | CPIO_MAP_GID; if (isSrc) fi->fmapflags[i] |= CPIO_FOLLOW_SYMLINKS; if (S_ISREG(flp->fl_mode) && flp->fl_nlink == 1) fl->totalFileSize += flp->fl_size; else if (S_ISREG(flp->fl_mode) && flp->fl_nlink > 1) { /* Hard links need be counted only once. */ int j = i + 1; FileListRec jlp = flp + 1; int found = 0; for (; j < fi->fc; j++, jlp++) { while (((jlp - fl->fileList) < (fl->fileListRecsUsed - 1)) && !strcmp(jlp->fileURL, jlp[1].fileURL)) jlp++; if (jlp->flags & RPMFILE_EXCLUDE) { j--; continue; } if (jlp->flags & RPMFILE_GHOST) continue; if (!S_ISREG(jlp->fl_mode)) continue; if (flp->fl_nlink != jlp->fl_nlink) continue; if (flp->fl_ino != jlp->fl_ino) continue; if (flp->fl_dev != jlp->fl_dev) continue; found = 1; break; } if (!found) /* last entry in hardlink set */ fl->totalFileSize += flp->fl_size; } } (void) headerAddEntry(h, RPMTAG_SIZE, RPM_INT32_TYPE, &(fl->totalFileSize), 1); /*@-branchstate@*/ if (cpioList) *cpioList = fi; else fi = _free(fi); /*@=branchstate@*/ } } /** */ static /*@null@*/ FileListRec freeFileList(/*@only@*/ FileListRec fileList, int count) /*@*/ { while (count--) { fileList[count].diskURL = _free(fileList[count].diskURL); fileList[count].fileURL = _free(fileList[count].fileURL); fileList[count].langs = _free(fileList[count].langs); } fileList = _free(fileList); return NULL; } /* Written by Alexey Tourbin! */ static int pathIsCanonical(const char *path) { enum { ST_NONE, ST_SLASH, ST_SLASHDOT, ST_SLASHDOTDOT } state = ST_NONE; const char *p = path; while (1) { int c = *p; switch (c) { case '/': switch (state) { case ST_SLASH: case ST_SLASHDOT: case ST_SLASHDOTDOT: return 0; default: state = ST_SLASH; break; } break; case '.': switch (state) { case ST_SLASH: state = ST_SLASHDOT; break; case ST_SLASHDOT: state = ST_SLASHDOTDOT; break; default: state = ST_NONE; break; } break; case '\0': switch (state) { case ST_SLASHDOT: case ST_SLASHDOTDOT: return 0; case ST_SLASH: if (p > path + 1) return 0; return 1; default: return 1; } break; default: state = ST_NONE; break; } p++; } /* not reachable */ return 0; } /* forward ref */ static rpmRC addFile1(FileList fl, const char * diskPath, struct stat * statp); static rpmRC recurseDir(FileList fl, const char * diskPath); /** * Add a file to the package manifest. * @param fl package file tree walk data * @param diskPath path to file * @return RPMRC_OK on success */ static rpmRC addFile(FileList fl, const char * diskPath) { const char *cpioPath = diskPath; /* Path may have prepended buildRootURL, so locate the original filename. */ if (fl->buildRootURL && strcmp(fl->buildRootURL, "/")) { size_t br_len = strlen(fl->buildRootURL); if (strncmp(fl->buildRootURL, cpioPath, br_len) == 0 && (cpioPath[br_len] == '/' || cpioPath[br_len] == '\0')) cpioPath += br_len; else { rpmlog(RPMLOG_ERR, _("File doesn't match buildroot (%s): %s\n"), fl->buildRootURL, cpioPath); fl->processingFailed = 1; return RPMRC_FAIL; } } /* XXX make sure '/' can be packaged also */ if (*cpioPath == '\0') cpioPath = "/"; /* cannot happen?! */ if (*cpioPath != '/') { rpmlog(RPMLOG_ERR, _("File must begin with \"/\": %s\n"), cpioPath); fl->processingFailed = 1; return RPMRC_FAIL; } if (!pathIsCanonical(cpioPath)) { rpmlog(RPMLOG_ERR, _("File path must be canonical: %s\n"), cpioPath); fl->processingFailed = 1; return RPMRC_FAIL; } struct stat statbuf, *statp = &statbuf; { memset(statp, 0, sizeof(*statp)); if (fl->devtype) { time_t now = time(NULL); /* XXX hack up a stat structure for a %dev(...) directive. */ statp->st_nlink = 1; statp->st_rdev = ((fl->devmajor & 0xff) << 8) | (fl->devminor & 0xff); statp->st_dev = statp->st_rdev; statp->st_mode = (fl->devtype == 'b' ? S_IFBLK : S_IFCHR); statp->st_mode |= (fl->cur_ar.ar_fmode & 0777); statp->st_atime = now; statp->st_mtime = now; statp->st_ctime = now; } else if (lstat(diskPath, statp)) { rpmlog(RPMLOG_ERR, _("File not found: %s\n"), diskPath); fl->processingFailed = 1; return RPMRC_FAIL; } } /* intermediate path component must be directories, not symlinks */ { struct stat st; size_t dp_len = strlen(diskPath); char *dp = alloca(dp_len + 1); char *p = dp + dp_len - strlen(cpioPath); strcpy(dp, diskPath); while ((p = strchr(p + 1, '/'))) { *p = '\0'; if (lstat(dp, &st)) { rpmlog(RPMLOG_ERR, _("File not found: %s\n"), diskPath); fl->processingFailed = 1; return RPMRC_FAIL; } if (!S_ISDIR(st.st_mode)) { rpmlog(RPMLOG_ERR, _("File path component must be directory (%s): %s\n"), dp, diskPath); fl->processingFailed = 1; return RPMRC_FAIL; } *p = '/'; } } if ((! fl->isDir) && S_ISDIR(statp->st_mode)) return recurseDir(fl, diskPath); else return addFile1(fl, diskPath, statp); } /* implementation - no expensive tests */ static rpmRC addFile1(FileList fl, const char * diskPath, struct stat * statp) { const char *cpioPath = diskPath; if (fl->buildRootURL && strcmp(fl->buildRootURL, "/")) cpioPath += strlen(fl->buildRootURL); if (*cpioPath == '\0') cpioPath = "/"; assert(*cpioPath == '/'); mode_t fileMode = statp->st_mode; uid_t fileUid = statp->st_uid; gid_t fileGid = statp->st_gid; const char *fileUname; const char *fileGname; if (S_ISDIR(fileMode) && fl->cur_ar.ar_dmodestr) { fileMode &= S_IFMT; fileMode |= fl->cur_ar.ar_dmode; } else if (fl->cur_ar.ar_fmodestr != NULL) { fileMode &= S_IFMT; fileMode |= fl->cur_ar.ar_fmode; } if (fl->cur_ar.ar_user) { fileUname = getUnameS(fl->cur_ar.ar_user); } else { fileUname = getUname(fileUid); } if (fl->cur_ar.ar_group) { fileGname = getGnameS(fl->cur_ar.ar_group); } else { fileGname = getGname(fileGid); } /* Default user/group to builder's user/group */ if (fileUname == NULL) fileUname = getUname(getuid()); if (fileGname == NULL) fileGname = getGname(getgid()); /* Add to the file list */ if (fl->fileListRecsUsed == fl->fileListRecsAlloced) { fl->fileListRecsAlloced += 128; fl->fileList = xrealloc(fl->fileList, fl->fileListRecsAlloced * sizeof(*(fl->fileList))); } { FileListRec flp = &fl->fileList[fl->fileListRecsUsed]; int i; flp->fl_st = *statp; /* structure assignment */ flp->fl_mode = fileMode; flp->fl_uid = fileUid; flp->fl_gid = fileGid; flp->fileURL = xstrdup(cpioPath); flp->diskURL = xstrdup(diskPath); flp->uname = fileUname; flp->gname = fileGname; if (fl->currentLangs && fl->nLangs > 0) { char * ncl; size_t nl = 0; for (i = 0; i < fl->nLangs; i++) nl += strlen(fl->currentLangs[i]) + 1; flp->langs = ncl = xmalloc(nl); for (i = 0; i < fl->nLangs; i++) { const char *ocl; if (i) *ncl++ = '|'; for (ocl = fl->currentLangs[i]; *ocl != '\0'; ocl++) *ncl++ = *ocl; *ncl = '\0'; } } else { flp->langs = xstrdup(""); } flp->flags = fl->currentFlags; flp->specdFlags = fl->currentSpecdFlags; flp->verifyFlags = fl->currentVerifyFlags; } fl->fileListRecsUsed++; fl->fileCount++; return RPMRC_OK; } #include /** * Add directory (and all of its files) to the package manifest. * @param fl package file tree walk data * @param diskPath path to file * @return RPMRC_OK on success */ static rpmRC recurseDir(FileList fl, const char * diskPath) { char * ftsSet[2]; FTS * ftsp; FTSENT * fts; int myFtsOpts = (FTS_COMFOLLOW | FTS_NOCHDIR | FTS_PHYSICAL); rpmRC rc = RPMRC_FAIL; ftsSet[0] = (char *) diskPath; ftsSet[1] = NULL; ftsp = fts_open(ftsSet, myFtsOpts, NULL); while ((fts = fts_read(ftsp)) != NULL) { switch (fts->fts_info) { case FTS_D: /* preorder directory */ case FTS_F: /* regular file */ case FTS_SL: /* symbolic link */ case FTS_SLNONE: /* symbolic link without target */ case FTS_DEFAULT: /* none of the above */ rc = addFile1(fl, fts->fts_accpath, fts->fts_statp); break; case FTS_DOT: /* dot or dot-dot */ case FTS_DP: /* postorder directory */ rc = RPMRC_OK; break; case FTS_NS: /* stat(2) failed */ case FTS_DNR: /* unreadable directory */ case FTS_ERR: /* error; errno is set */ case FTS_DC: /* directory that causes cycles */ case FTS_NSOK: /* no stat(2) requested */ case FTS_INIT: /* initialized only */ case FTS_W: /* whiteout object */ default: rpmlog(RPMLOG_WARNING, "%s: fts error\n", fts->fts_path); rc = RPMRC_FAIL; break; } if (rc) break; } (void) fts_close(ftsp); return rc; } /** * Add a file to a binary package. * @param pkg * @param fl package file tree walk data * @param fileURL * return 0 on success */ static int processBinaryFile(/*@unused@*/ Package pkg, FileList fl, const char * fileURL) /*@globals rpmGlobalMacroContext, fileSystem@*/ /*@modifies *fl, fl->processingFailed, fl->fileList, fl->fileListRecsAlloced, fl->fileListRecsUsed, fl->totalFileSize, fl->fileCount, fl->isDir, rpmGlobalMacroContext, fileSystem @*/ { int doGlob; const char *diskURL = NULL; int rc = 0; doGlob = myGlobPatternP(fileURL); /* Check that file starts with leading "/" */ { const char * fileName; (void) urlPath(fileURL, &fileName); if (*fileName != '/') { rpmError(RPMERR_BADSPEC, _("File needs leading \"/\": %s\n"), fileName); rc = 1; goto exit; } } /* Copy file name or glob pattern removing multiple "/" chars. */ /* * Note: rpmGetPath should guarantee a "canonical" path. That means * that the following pathologies should be weeded out: * //bin//sh * //usr//bin/ * /.././../usr/../bin//./sh */ diskURL = rpmGenPath(fl->buildRootURL, NULL, fileURL); if (doGlob) { const char ** argv = NULL; int argc = 0; int i; if (fl->noGlob) { rpmError(RPMERR_BADSPEC, _("Glob not permitted: %s\n"), diskURL); rc = 1; goto exit; } /*@-branchstate@*/ rc = rpmGlob(diskURL, &argc, &argv); if (rc == 0 && argc >= 1 && !myGlobPatternP(argv[0])) { for (i = 0; i < argc; i++) { rc = addFile(fl, argv[i]); argv[i] = _free(argv[i]); } argv = _free(argv); } else { rpmError(RPMERR_BADSPEC, _("File not found by glob: %s\n"), diskURL); rc = 1; } /*@=branchstate@*/ } else { rc = addFile(fl, diskURL); } exit: diskURL = _free(diskURL); if (rc) fl->processingFailed = 1; return rc; } /** */ static int processPackageFiles(Spec spec, Package pkg, int installSpecialDoc, int test) /*@globals rpmGlobalMacroContext, fileSystem, internalState@*/ /*@modifies spec->macros, pkg->cpioList, pkg->fileList, pkg->specialDoc, pkg->header, rpmGlobalMacroContext, fileSystem, internalState @*/ { HGE_t hge = (HGE_t)headerGetEntryMinMemory; struct FileList_s fl; char *s, **files, **fp; const char *fileName; char buf[BUFSIZ]; struct AttrRec_s arbuf; AttrRec specialDocAttrRec = &arbuf; char *specialDoc = NULL; nullAttrRec(specialDocAttrRec); pkg->cpioList = NULL; if (pkg->fileFile) { const char *ffn; FILE * f; FD_t fd; /* XXX W2DO? urlPath might be useful here. */ if (*pkg->fileFile == '/') { ffn = rpmGetPath(pkg->fileFile, NULL); } else { /* XXX FIXME: add %{_buildsubdir} */ ffn = rpmGetPath("%{_builddir}/", (spec->buildSubdir ? spec->buildSubdir : "") , "/", pkg->fileFile, NULL); } fd = Fopen(ffn, "r.fpio"); if (fd == NULL || Ferror(fd)) { rpmError(RPMERR_BADFILENAME, _("Could not open %%files file %s: %s\n"), ffn, Fstrerror(fd)); return RPMERR_BADFILENAME; } ffn = _free(ffn); /*@+voidabstract@*/ f = fdGetFp(fd); /*@=voidabstract@*/ if (f != NULL) while (fgets(buf, sizeof(buf), f)) { handleComments(buf); if (expandMacros(spec, spec->macros, buf, sizeof(buf))) { rpmError(RPMERR_BADSPEC, _("line: %s\n"), buf); return RPMERR_BADSPEC; } appendStringBuf(pkg->fileList, buf); } (void) Fclose(fd); } /* Init the file list structure */ memset(&fl, 0, sizeof(fl)); /* XXX spec->buildRootURL == NULL, then xstrdup("") is returned */ fl.buildRootURL = rpmGenPath(spec->rootURL, spec->buildRootURL, NULL); fl.fileCount = 0; fl.totalFileSize = 0; fl.processingFailed = 0; fl.passedSpecialDoc = 0; fl.isSpecialDoc = 0; fl.isDir = 0; fl.currentFlags = 0; fl.currentVerifyFlags = 0; fl.noGlob = 0; fl.devtype = 0; fl.devmajor = 0; fl.devminor = 0; nullAttrRec(&fl.cur_ar); nullAttrRec(&fl.def_ar); fl.defVerifyFlags = RPMVERIFY_ALL; fl.nLangs = 0; fl.currentLangs = NULL; fl.currentSpecdFlags = 0; fl.defSpecdFlags = 0; fl.docDirCount = 0; fl.docDirs[fl.docDirCount++] = xstrdup("/usr/doc"); fl.docDirs[fl.docDirCount++] = xstrdup("/usr/man"); fl.docDirs[fl.docDirCount++] = xstrdup("/usr/info"); fl.docDirs[fl.docDirCount++] = xstrdup("/usr/X11R6/man"); fl.docDirs[fl.docDirCount++] = xstrdup("/usr/share/doc"); fl.docDirs[fl.docDirCount++] = xstrdup("/usr/share/man"); fl.docDirs[fl.docDirCount++] = xstrdup("/usr/share/info"); fl.docDirs[fl.docDirCount++] = xstrdup("/usr/lib/perl5/man"); fl.docDirs[fl.docDirCount++] = xstrdup("/usr/share/gtk-doc/html"); fl.docDirs[fl.docDirCount++] = rpmGetPath("%{_docdir}", NULL); fl.docDirs[fl.docDirCount++] = rpmGetPath("%{_mandir}", NULL); fl.docDirs[fl.docDirCount++] = rpmGetPath("%{_infodir}", NULL); fl.fileList = NULL; fl.fileListRecsAlloced = 0; fl.fileListRecsUsed = 0; s = getStringBuf(pkg->fileList); files = splitString(s, strlen(s), '\n'); parseForAttr(rpmExpand("%{?_defattr}", NULL), &fl); for (fp = files; *fp != NULL; fp++) { s = *fp; SKIPSPACE(s); if (*s == '\0') continue; fileName = NULL; /*@-nullpass@*/ /* LCL: buf is NULL ?!? */ strcpy(buf, s); /*@=nullpass@*/ /* Reset for a new line in %files */ fl.isDir = 0; fl.currentFlags = 0; /* turn explicit flags into %def'd ones (gosh this is hacky...) */ fl.currentSpecdFlags = ((unsigned)fl.defSpecdFlags) >> 8; fl.currentVerifyFlags = fl.defVerifyFlags; fl.isSpecialDoc = 0; fl.noGlob = 0; fl.devtype = 0; fl.devmajor = 0; fl.devminor = 0; /* XXX should reset to %deflang value */ if (fl.currentLangs) { int i; for (i = 0; i < fl.nLangs; i++) /*@-unqualifiedtrans@*/ fl.currentLangs[i] = _free(fl.currentLangs[i]); /*@=unqualifiedtrans@*/ fl.currentLangs = _free(fl.currentLangs); } fl.nLangs = 0; dupAttrRec(&fl.def_ar, &fl.cur_ar); /*@-nullpass@*/ /* LCL: buf is NULL ?!? */ if (parseForVerify(buf, &fl)) continue; if (parseForAttr(buf, &fl)) continue; if (parseForDev(buf, &fl)) continue; if (parseForConfig(buf, &fl)) continue; if (parseForLang(buf, &fl)) continue; /*@-nullstate@*/ /* FIX: pkg->fileFile might be NULL */ if (parseForSimple(spec, pkg, buf, &fl, &fileName)) /*@=nullstate@*/ continue; /*@=nullpass@*/ if (fileName == NULL) continue; /*@-branchstate@*/ if (fl.isSpecialDoc) { /* Save this stuff for last */ specialDoc = _free(specialDoc); specialDoc = xstrdup(fileName); dupAttrRec(&fl.cur_ar, specialDocAttrRec); } else { /*@-nullstate@*/ /* FIX: pkg->fileFile might be NULL */ (void) processBinaryFile(pkg, &fl, fileName); /*@=nullstate@*/ } /*@=branchstate@*/ } /* Now process special doc, if there is one */ if (specialDoc) { if (installSpecialDoc) { int rc = doScript(spec, RPMBUILD_STRINGBUF, "%doc", pkg->specialDoc, test); if (rc) fl.processingFailed = 1; } /* Reset for %doc */ fl.isDir = 0; fl.currentFlags = 0; fl.currentVerifyFlags = 0; fl.noGlob = 0; fl.devtype = 0; fl.devmajor = 0; fl.devminor = 0; /* XXX should reset to %deflang value */ if (fl.currentLangs) { int i; for (i = 0; i < fl.nLangs; i++) /*@-unqualifiedtrans@*/ fl.currentLangs[i] = _free(fl.currentLangs[i]); /*@=unqualifiedtrans@*/ fl.currentLangs = _free(fl.currentLangs); } fl.nLangs = 0; dupAttrRec(specialDocAttrRec, &fl.cur_ar); freeAttrRec(specialDocAttrRec); /*@-nullstate@*/ /* FIX: pkg->fileFile might be NULL */ (void) processBinaryFile(pkg, &fl, specialDoc); /*@=nullstate@*/ specialDoc = _free(specialDoc); } freeSplitString(files); if (fl.processingFailed) goto exit; /* Verify that file attributes scope over hardlinks correctly. */ if (checkHardLinks(&fl)) (void) rpmlibNeedsFeature(pkg->header, "PartialHardlinkSets", "4.0.4-1"); genCpioListAndHeader(spec, &fl, (TFI_t *)&pkg->cpioList, pkg->header, 0); if (spec->timeCheck) timeCheck(spec->timeCheck, pkg->header); exit: fl.buildRootURL = _free(fl.buildRootURL); freeAttrRec(&fl.cur_ar); freeAttrRec(&fl.def_ar); if (fl.currentLangs) { int i; for (i = 0; i < fl.nLangs; i++) /*@-unqualifiedtrans@*/ fl.currentLangs[i] = _free(fl.currentLangs[i]); /*@=unqualifiedtrans@*/ fl.currentLangs = _free(fl.currentLangs); } fl.fileList = freeFileList(fl.fileList, fl.fileListRecsUsed); while (fl.docDirCount--) fl.docDirs[fl.docDirCount] = _free(fl.docDirs[fl.docDirCount]); return fl.processingFailed; } void initSourceHeader(Spec spec) { HeaderIterator hi; int_32 tag, type, count; const void * ptr; spec->sourceHeader = headerNew(); /* Only specific tags are added to the source package header */ /*@-branchstate@*/ for (hi = headerInitIterator(spec->packages->header); headerNextIterator(hi, &tag, &type, &ptr, &count); ptr = headerFreeData(ptr, type)) { switch (tag) { case RPMTAG_NAME: case RPMTAG_VERSION: case RPMTAG_RELEASE: case RPMTAG_EPOCH: case RPMTAG_SUMMARY: case RPMTAG_DESCRIPTION: case RPMTAG_PACKAGER: case RPMTAG_DISTRIBUTION: case RPMTAG_DISTURL: case RPMTAG_VENDOR: case RPMTAG_LICENSE: case RPMTAG_GROUP: case RPMTAG_OS: case RPMTAG_ARCH: case RPMTAG_CHANGELOGTIME: case RPMTAG_CHANGELOGNAME: case RPMTAG_CHANGELOGTEXT: case RPMTAG_URL: case RPMTAG_BUILDHOST: case HEADER_I18NTABLE: if (ptr) (void)headerAddEntry(spec->sourceHeader, tag, type, ptr, count); /*@switchbreak@*/ break; default: /* do not copy */ /*@switchbreak@*/ break; } } hi = headerFreeIterator(hi); /*@=branchstate@*/ /* Add the build restrictions */ /*@-branchstate@*/ for (hi = headerInitIterator(spec->buildRestrictions); headerNextIterator(hi, &tag, &type, &ptr, &count); ptr = headerFreeData(ptr, type)) { if (ptr) (void) headerAddEntry(spec->sourceHeader, tag, type, ptr, count); } hi = headerFreeIterator(hi); /*@=branchstate@*/ if (spec->BANames && spec->BACount > 0) { (void) headerAddEntry(spec->sourceHeader, RPMTAG_BUILDARCHS, RPM_STRING_ARRAY_TYPE, spec->BANames, spec->BACount); } } int processSourceFiles(Spec spec) { struct Source *srcPtr; StringBuf sourceFiles; int x, isSpec = 1; struct FileList_s fl; char *s, **files, **fp; Package pkg; sourceFiles = newStringBuf(); /* XXX * XXX This is where the source header for noarch packages needs * XXX to be initialized. */ if (spec->sourceHeader == NULL) initSourceHeader(spec); /* Construct the file list and source entries */ appendLineStringBuf(sourceFiles, spec->specFile); if (spec->sourceHeader != NULL) for (srcPtr = spec->sources; srcPtr != NULL; srcPtr = srcPtr->next) { if (srcPtr->flags & RPMBUILD_ISSOURCE) { (void) headerAddOrAppendEntry(spec->sourceHeader, RPMTAG_SOURCE, RPM_STRING_ARRAY_TYPE, &srcPtr->source, 1); if (srcPtr->flags & RPMBUILD_ISNO) { (void) headerAddOrAppendEntry(spec->sourceHeader, RPMTAG_NOSOURCE, RPM_INT32_TYPE, &srcPtr->num, 1); } } if (srcPtr->flags & RPMBUILD_ISPATCH) { (void) headerAddOrAppendEntry(spec->sourceHeader, RPMTAG_PATCH, RPM_STRING_ARRAY_TYPE, &srcPtr->source, 1); if (srcPtr->flags & RPMBUILD_ISNO) { (void) headerAddOrAppendEntry(spec->sourceHeader, RPMTAG_NOPATCH, RPM_INT32_TYPE, &srcPtr->num, 1); } } { const char * sfn; sfn = rpmGetPath( ((srcPtr->flags & RPMBUILD_ISNO) ? "!" : ""), "%{_sourcedir}/", srcPtr->source, NULL); appendLineStringBuf(sourceFiles, sfn); sfn = _free(sfn); } } for (pkg = spec->packages; pkg != NULL; pkg = pkg->next) { for (srcPtr = pkg->icon; srcPtr != NULL; srcPtr = srcPtr->next) { const char * sfn; sfn = rpmGetPath( ((srcPtr->flags & RPMBUILD_ISNO) ? "!" : ""), "%{_sourcedir}/", srcPtr->source, NULL); appendLineStringBuf(sourceFiles, sfn); sfn = _free(sfn); } } spec->sourceCpioList = NULL; fl.fileList = xcalloc((spec->numSources + 1), sizeof(*fl.fileList)); fl.processingFailed = 0; fl.fileListRecsUsed = 0; fl.totalFileSize = 0; fl.buildRootURL = NULL; s = getStringBuf(sourceFiles); files = splitString(s, strlen(s), '\n'); /* The first source file is the spec file */ x = 0; for (fp = files; *fp != NULL; fp++) { const char * diskURL, *diskPath; FileListRec flp; diskURL = *fp; SKIPSPACE(diskURL); if (! *diskURL) continue; flp = &fl.fileList[x]; flp->flags = isSpec ? RPMFILE_SPECFILE : 0; /* files with leading ! are no source files */ if (*diskURL == '!') { flp->flags |= RPMFILE_GHOST; diskURL++; } (void) urlPath(diskURL, &diskPath); flp->diskURL = xstrdup(diskURL); diskPath = strrchr(diskPath, '/'); if (diskPath) diskPath++; else diskPath = diskURL; flp->fileURL = xstrdup(diskPath); flp->verifyFlags = RPMVERIFY_ALL; if (Stat(diskURL, &flp->fl_st)) { rpmError(RPMERR_BADSPEC, _("Bad file: %s: %s\n"), diskURL, strerror(errno)); fl.processingFailed = 1; } flp->uname = getUname(flp->fl_uid); flp->gname = getGname(flp->fl_gid); flp->langs = xstrdup(""); if (! (flp->uname && flp->gname)) { rpmError(RPMERR_BADSPEC, _("Bad owner/group: %s\n"), diskURL); fl.processingFailed = 1; } isSpec = 0; x++; } fl.fileListRecsUsed = x; freeSplitString(files); if (! fl.processingFailed) { if (spec->sourceHeader != NULL) genCpioListAndHeader(spec, &fl, (TFI_t *)&spec->sourceCpioList, spec->sourceHeader, 1); } sourceFiles = freeStringBuf(sourceFiles); fl.fileList = freeFileList(fl.fileList, fl.fileListRecsUsed); return fl.processingFailed; } /** */ static StringBuf getOutputFrom(const char **argv, const char * writePtr, int writeBytesLeft) /*@globals fileSystem, internalState@*/ /*@modifies fileSystem, internalState@*/ { int progPID; int toProg[2]; int fromProg[2]; int status; void *oldhandler; StringBuf readBuff; int done; /*@-type@*/ /* FIX: cast? */ oldhandler = signal(SIGPIPE, SIG_IGN); /*@=type@*/ toProg[0] = toProg[1] = 0; (void) pipe(toProg); fromProg[0] = fromProg[1] = 0; (void) pipe(fromProg); if (!(progPID = fork())) { (void) close(toProg[1]); (void) close(fromProg[0]); (void) dup2(toProg[0], STDIN_FILENO); /* Make stdin the in pipe */ (void) dup2(fromProg[1], STDOUT_FILENO); /* Make stdout the out pipe */ (void) close(toProg[0]); (void) close(fromProg[1]); if ( rpm_close_all() ) { perror( "rpm_close_all" ); _exit( -1 ); } (void) execvp(argv[0], (char *const *)argv); /* XXX this error message is probably not seen. */ rpmError(RPMERR_EXEC, _("Couldn't exec %s: %s\n"), argv[0], strerror(errno)); _exit(RPMERR_EXEC); } if (progPID < 0) { rpmError(RPMERR_FORK, _("Couldn't fork %s: %s\n"), argv[0], strerror(errno)); return NULL; } (void) close(toProg[0]); (void) close(fromProg[1]); /* Do not block reading or writing from/to prog. */ (void) fcntl(fromProg[0], F_SETFL, O_NONBLOCK); (void) fcntl(toProg[1], F_SETFL, O_NONBLOCK); readBuff = newStringBuf(); do { fd_set ibits, obits; struct timeval tv; int nfd, nbw, nbr; int rc; done = 0; top: /* XXX the select is mainly a timer since all I/O is non-blocking */ FD_ZERO(&ibits); FD_ZERO(&obits); if (fromProg[0] >= 0) { FD_SET(fromProg[0], &ibits); } if (toProg[1] >= 0) { FD_SET(toProg[1], &obits); } tv.tv_sec = 1; tv.tv_usec = 0; nfd = ((fromProg[0] > toProg[1]) ? fromProg[0] : toProg[1]); if ((rc = select(nfd, &ibits, &obits, NULL, &tv)) < 0) { if (errno == EINTR) goto top; break; } /* Write any data to program */ if (toProg[1] >= 0 && FD_ISSET(toProg[1], &obits)) { if (writeBytesLeft) { if ((nbw = write(toProg[1], writePtr, (1024= 0) { /* close write fd */ (void) close(toProg[1]); toProg[1] = -1; } } /* Read any data from prog */ { char buf[BUFSIZ+1]; while ((nbr = read(fromProg[0], buf, sizeof(buf)-1)) > 0) { buf[nbr] = '\0'; appendStringBuf(readBuff, buf); } } /* terminate on (non-blocking) EOF or error */ done = (nbr == 0 || (nbr < 0 && errno != EAGAIN)); } while (!done); /* Clean up */ if (toProg[1] >= 0) (void) close(toProg[1]); if (fromProg[0] >= 0) (void) close(fromProg[0]); /*@-type@*/ /* FIX: cast? */ (void) signal(SIGPIPE, oldhandler); /*@=type@*/ /* Collect status from prog */ (void)waitpid(progPID, &status, 0); if (!WIFEXITED(status) || WEXITSTATUS(status)) { rpmError(RPMERR_EXEC, _("%s failed\n"), argv[0]); return NULL; } if (writeBytesLeft) { rpmError(RPMERR_EXEC, _("failed to write all data to %s\n"), argv[0]); return NULL; } return readBuff; } static StringBuf runPkgScript(Package pkg, const char *body, const char *fileList, int fileListLen) { const char *tmpdir = getenv("TMPDIR"); if (!(tmpdir && *tmpdir)) tmpdir = "/tmp"; char script[strlen(tmpdir) + sizeof("/rpm-tmp.XXXXXX")]; sprintf(script, "%s/rpm-tmp.XXXXXX", tmpdir); int fd = mkstemp(script); assert(fd >= 0); FILE *fp = fdopen(fd, "w"); assert(fp); // script header char *s; int isVerbose = rpmIsVerbose(); if (isVerbose) rpmDecreaseVerbosity(); s = rpmExpand("%{?__spec_autodep_template}\n", NULL); if (isVerbose) rpmIncreaseVerbosity(); fputs(s, fp); free(s); // pkg info const char *N, *V, *R, *A; headerNEVRA(pkg->header, &N, NULL, &V, &R, &A); fprintf(fp, "export RPM_SUBPACKAGE_NAME='%s'\n", N); fprintf(fp, "export RPM_SUBPACKAGE_VERSION='%s'\n", V); fprintf(fp, "export RPM_SUBPACKAGE_RELEASE='%s'\n", R); fprintf(fp, "export RPM_SUBPACKAGE_ARCH='%s'\n", A); // script body fputs(body, fp); fputc('\n', fp); // script footer s = rpmExpand("%{?__spec_autodep_post}\n", NULL); fputs(s, fp); free(s); fclose(fp); // run script char *cmd = rpmExpand("%{?___build_cmd}", " ", script, NULL); rpmMessage(RPMMESS_NORMAL, _("Executing: %s\n"), cmd); const char **argv = NULL; poptParseArgvString(cmd, NULL, &argv); assert(argv); StringBuf out = getOutputFrom(argv, fileList, fileListLen); if (out) unlink(script); free(argv); return out; } /** */ typedef struct { /*@observer@*/ /*@null@*/ const char * msg; /*@observer@*/ const char *argv[3]; rpmTag ntag; rpmTag vtag; rpmTag ftag; int mask; int xor; } DepMsg_t; /** */ /*@-exportlocal -exportheadervar@*/ /*@unchecked@*/ DepMsg_t depMsgs[] = { { "Provides", { "%{?__find_provides}", 0 }, RPMTAG_PROVIDENAME, RPMTAG_PROVIDEVERSION, RPMTAG_PROVIDEFLAGS, 0, -1 }, { "PreReq", { "%{?__find_prereq}", 0 }, RPMTAG_REQUIRENAME, RPMTAG_REQUIREVERSION, RPMTAG_REQUIREFLAGS, RPMSENSE_PREREQ, 0 }, { "Requires", { "%{?__find_requires}", 0 }, -1, -1, RPMTAG_REQUIREFLAGS, /* XXX inherit name/version arrays */ RPMSENSE_PREREQ, RPMSENSE_PREREQ }, { "Requires(interp)", { 0, "interp", 0 }, -1, -1, RPMTAG_REQUIREFLAGS, _notpre(RPMSENSE_INTERP), 0 }, { "Requires(rpmlib)", { 0, "rpmlib", 0 }, -1, -1, RPMTAG_REQUIREFLAGS, _notpre(RPMSENSE_RPMLIB), 0 }, { "Requires(verify)", { 0, "verify", 0 }, -1, -1, RPMTAG_REQUIREFLAGS, RPMSENSE_SCRIPT_VERIFY, 0 }, { "Requires(pre)", { 0, "pre", 0 }, -1, -1, RPMTAG_REQUIREFLAGS, _notpre(RPMSENSE_SCRIPT_PRE), 0 }, { "Requires(post)", { 0, "post", 0 }, -1, -1, RPMTAG_REQUIREFLAGS, _notpre(RPMSENSE_SCRIPT_POST), 0 }, { "Requires(preun)", { 0, "preun", 0 }, -1, -1, RPMTAG_REQUIREFLAGS, _notpre(RPMSENSE_SCRIPT_PREUN), 0 }, { "Requires(postun)", { 0, "postun", 0 }, -1, -1, RPMTAG_REQUIREFLAGS, _notpre(RPMSENSE_SCRIPT_POSTUN), 0 }, { "Conflicts", { "%{?__find_conflicts}", 0 }, RPMTAG_CONFLICTNAME, RPMTAG_CONFLICTVERSION, RPMTAG_CONFLICTFLAGS, 0, -1 }, { "Obsoletes", { "%{?__find_obsoletes}", 0 }, RPMTAG_OBSOLETENAME, RPMTAG_OBSOLETEVERSION, RPMTAG_OBSOLETEFLAGS, 0, -1 }, { 0, { 0 }, 0, 0, 0, 0, 0 } }; /*@=exportlocal =exportheadervar@*/ typedef struct { char *scriptname; int progTag; int scriptTag; } ScriptDep_t; ScriptDep_t scriptDeps[] = { { "pre", RPMTAG_PREINPROG, RPMTAG_PREIN }, { "preun", RPMTAG_PREUNPROG, RPMTAG_PREUN }, { "post", RPMTAG_POSTINPROG, RPMTAG_POSTIN }, { "postun", RPMTAG_POSTUNPROG, RPMTAG_POSTUN }, { NULL, 0, 0 } }; /* Save script conents in a file under buildroot. */ static const char *saveInstScript(Spec spec, Package pkg, const char *scriptname) { ScriptDep_t *sd; int progTag = 0, scriptTag = 0; for (sd = scriptDeps; sd->scriptname; sd++) if (strcmp(scriptname, sd->scriptname) == 0) { progTag = sd->progTag; scriptTag = sd->scriptTag; break; } if (!scriptTag) return NULL; /* similar to runInstScript() */ rpmTagType stt; const char *script = NULL; HGE_t hge = headerGetEntry; HFD_t hfd = headerFreeData; hge(pkg->header, scriptTag, &stt, (void**)&script, NULL); if (!script) return NULL; TFI_t fi = pkg->cpioList; if (!(fi && fi->fc > 0)) /* possibly a packaging bug */ rpmMessage(RPMMESS_WARNING, _("package with no files has %%%s-script\n"), scriptname); rpmTagType ptt; int argc; const char **hdrArgv = NULL; const char **argv = NULL; const char *argv1[1]; hge(pkg->header, progTag, &ptt, (void**)&hdrArgv, &argc); if (hdrArgv && ptt == RPM_STRING_TYPE) { *argv1 = (const char *) hdrArgv; argv = argv1; } else if (argv) { argv = hdrArgv; } else { *argv1 = "/bin/sh"; argv = argv1; argc = 1; } const char *buildroot = NULL; urlPath(spec->buildRootURL, &buildroot); assert(buildroot); const char *N = NULL; headerNVR(pkg->header, &N, NULL, NULL); assert(N); const char *path = NULL; asprintf(&path, "%s/.%s:%s", buildroot, scriptname, N); assert(path); FILE *fp = fopen(path, "w"); if (!fp) { rpmMessage(RPMMESS_ERROR, _("cannot write %s\n"), path); path = _free(path); goto done; } fchmod(fileno(fp), 0755); fprintf(fp, "#!%s", argv[0]); while (--argc > 0) fprintf(fp, " %s", *++argv); fprintf(fp, "\n%s\n", script); fclose(fp); done: hfd(script, stt); hfd(hdrArgv, ptt); return path; } /** */ static int generateDepends(Spec spec, Package pkg, TFI_t cpioList) /*@globals rpmGlobalMacroContext, fileSystem, internalState @*/ /*@modifies cpioList, rpmGlobalMacroContext, fileSystem, internalState @*/ { TFI_t fi = cpioList; StringBuf readBuf; DepMsg_t *dm; int rc = 0; int i; if ( *pkg->autoProv ) addMacro(spec->macros, "_findprov_method", NULL, pkg->autoProv, RMIL_SPEC); if ( *pkg->autoReq ) addMacro(spec->macros, "_findreq_method", NULL, pkg->autoReq, RMIL_SPEC); StringBuf fileListBuf = NULL; int fileListBytes = 0; if (fi && fi->fc > 0) { fileListBuf = newStringBuf(); for (i = 0, fileListBytes = 0; i < fi->fc; i++) { appendStringBuf(fileListBuf, fi->dnl[fi->dil[i]]); fileListBytes += strlen(fi->dnl[fi->dil[i]]); appendLineStringBuf(fileListBuf, fi->bnl[i]); fileListBytes += strlen(fi->bnl[i]) + 1; } } for (dm = depMsgs; dm->msg != NULL; dm++) { int tag = (dm->ftag > 0) ? dm->ftag : dm->ntag, tagflags = 0; char *runBody = 0; /* This will indicate whether we're doing a scriptlet or a filelist */ const char *instScript = NULL; if (!dm->argv) continue; if (dm->argv[0]) { /* filelist slot */ if (!fileListBuf) continue; } else if (dm->argv[1]) { /* scriptlet slot */ instScript = saveInstScript(spec, pkg, dm->argv[1]); if (!instScript) continue; } else { /* neither-nor */ continue; } switch(tag) { case RPMTAG_PROVIDEFLAGS: if (!*pkg->autoProv) continue; tagflags = RPMSENSE_FIND_PROVIDES; /*@switchbreak@*/ break; case RPMTAG_REQUIREFLAGS: if (!*pkg->autoReq && !instScript) continue; tagflags = RPMSENSE_FIND_REQUIRES; if (instScript) /* XXX this just works */ tagflags |= dm->mask | RPMSENSE_PREREQ; /*@switchbreak@*/ break; default: continue; /*@notreached@*/ /*@switchbreak@*/ break; } if (instScript) runBody = rpmExpand("%{?__find_scriptlet_requires}", NULL); else runBody = rpmExpand( dm->argv[0], NULL ); if ( !runBody || !*runBody || '%' == *runBody ) { runBody = _free(runBody); continue; } if (!instScript) { const char **av; for ( av = dm->argv + 1; av[0]; ++av ) { const char *p = xstrdup( runBody ); asprintf( &runBody, "%s %s", p, av[0] ); p = _free( p ); } } rpmMessage(RPMMESS_NORMAL, _("Finding %s (using %s)\n"), dm->msg, runBody); if (instScript) { /* pass extra argument, the script filename */ const char *p = xstrdup( runBody ); asprintf( &runBody, "%s %s", p, instScript); p = _free( p ); } readBuf = runPkgScript(pkg, runBody, instScript ? NULL : getStringBuf(fileListBuf), instScript ? 0 : fileListBytes); if (readBuf == NULL) { rc = RPMERR_EXEC; rpmError(rc, _("Failed to find %s\n"), dm->msg); break; } /* Parse dependencies into header */ rc = parseRCPOT(spec, pkg, getStringBuf(readBuf), tag, 0, tagflags); readBuf = freeStringBuf(readBuf); if (rc) { rpmError(rc, _("Failed to find %s\n"), dm->msg); break; } if (instScript) { /* unlink(instScript); */ instScript = _free(instScript); } } fileListBuf = freeStringBuf(fileListBuf); return rc; } /** */ static void printDepMsg(DepMsg_t * dm, int count, const char ** names, const char ** versions, int *flags) /*@*/ { int hasVersions = (versions != NULL); int hasFlags = (flags != NULL); int bingo = 0; int i; for (i = 0; i < count; i++, names++, versions++, flags++) { if (hasFlags && !((*flags & dm->mask) ^ dm->xor)) continue; /* workaround for legacy PreReq */ if (dm->mask == RPMSENSE_PREREQ && dm->xor == 0 && !isLegacyPreReq (*flags)) continue; if (bingo == 0) { rpmMessage(RPMMESS_NORMAL, "%s:", (dm->msg ? dm->msg : "")); bingo = 1; } /* print comma where appropriate */ if (bingo > 1) rpmMessage(RPMMESS_NORMAL, ","); else bingo = 2; rpmMessage(RPMMESS_NORMAL, " %s", *names); if (hasVersions && !(*versions != NULL && **versions != '\0')) continue; if (!(hasFlags && (*flags && RPMSENSE_SENSEMASK))) continue; rpmMessage(RPMMESS_NORMAL, " "); if (*flags & RPMSENSE_LESS) rpmMessage(RPMMESS_NORMAL, "<"); if (*flags & RPMSENSE_GREATER) rpmMessage(RPMMESS_NORMAL, ">"); if (*flags & RPMSENSE_EQUAL) rpmMessage(RPMMESS_NORMAL, "="); rpmMessage(RPMMESS_NORMAL, " %s", *versions); } if (bingo) rpmMessage(RPMMESS_NORMAL, "\n"); } /** */ static void printDeps(Header h) /*@*/ { HGE_t hge = (HGE_t)headerGetEntryMinMemory; HFD_t hfd = headerFreeData; const char ** names = NULL; rpmTagType dnt = -1; const char ** versions = NULL; rpmTagType dvt = -1; int * flags = NULL; DepMsg_t * dm; int count, xx; for (dm = depMsgs; dm->msg != NULL; dm++) { switch (dm->ntag) { case 0: names = hfd(names, dnt); /*@switchbreak@*/ break; case -1: /*@switchbreak@*/ break; default: names = hfd(names, dnt); if (!hge(h, dm->ntag, &dnt, (void **) &names, &count)) continue; /*@switchbreak@*/ break; } switch (dm->vtag) { case 0: versions = hfd(versions, dvt); /*@switchbreak@*/ break; case -1: /*@switchbreak@*/ break; default: versions = hfd(versions, dvt); xx = hge(h, dm->vtag, &dvt, (void **) &versions, NULL); /*@switchbreak@*/ break; } switch (dm->ftag) { case 0: flags = NULL; /*@switchbreak@*/ break; case -1: /*@switchbreak@*/ break; default: xx = hge(h, dm->ftag, NULL, (void **) &flags, NULL); /*@switchbreak@*/ break; } /*@-noeffect@*/ printDepMsg(dm, count, names, versions, flags); /*@=noeffect@*/ } names = hfd(names, dnt); versions = hfd(versions, dvt); } #include "checkFiles.h" int processBinaryFiles(Spec spec, int installSpecialDoc, int test) { Package pkg; int rc = 0; for (pkg = spec->packages; pkg != NULL; pkg = pkg->next) { const char *n, *v, *r; if (pkg->fileList == NULL) continue; (void) headerNVR(pkg->header, &n, &v, &r); rpmMessage(RPMMESS_NORMAL, _("Processing files: %s-%s-%s\n"), n, v, r); rc = processPackageFiles(spec, pkg, installSpecialDoc, test); if (rc) break; rc = generateDepends(spec, pkg, pkg->cpioList); if (rc) break; /*@-noeffect@*/ printDeps(pkg->header); /*@=noeffect@*/ } if (rc == 0) rc = checkFiles(spec); return rc; }