- Grand Renaming of rpm data types.
[platform/upstream/rpm.git] / build.c
diff --git a/build.c b/build.c
index 654f5b2..5e2e1d8 100644 (file)
--- a/build.c
+++ b/build.c
@@ -1,47 +1,50 @@
+/** \ingroup rpmcli
+ * Parse spec file and build package.
+ */
+
 #include "system.h"
 
+#include <rpmcli.h>
 #include <rpmbuild.h>
-#include <rpmurl.h>
+
+#include "rpmps.h"
+#include "rpmte.h"
+#include "rpmts.h"
 
 #include "build.h"
-#include "install.h"
+#include "debug.h"
 
-static int checkSpec(Header h)
+/*@access rpmts @*/    /* XXX compared with NULL @*/
+/*@access rpmdb @*/            /* XXX compared with NULL @*/
+/*@access FD_t @*/             /* XXX compared with NULL @*/
+
+/**
+ */
+static int checkSpec(rpmts ts, Header h)
+       /*@globals fileSystem, internalState @*/
+       /*@modifies ts, h, fileSystem, internalState @*/
 {
-    char *rootdir = NULL;
-    rpmdb db = NULL;
-    int mode = O_RDONLY;
-    rpmTransactionSet ts;
-    struct rpmDependencyConflict * conflicts;
-    int numConflicts;
+    rpmps ps;
     int rc;
 
-    if (!headerIsEntry(h, RPMTAG_REQUIREFLAGS))
+    if (!headerIsEntry(h, RPMTAG_REQUIRENAME)
+     && !headerIsEntry(h, RPMTAG_CONFLICTNAME))
        return 0;
 
-    if (rpmdbOpen(rootdir, &db, mode, 0644)) {
-       const char *dn;
-       dn = rpmGetPath( (rootdir ? rootdir : ""), "%{_dbpath}", NULL);
-       rpmMessage(RPMMESS_ERROR, _("cannot open %s/packages.rpm\n"), dn);
-       xfree(dn);
-       exit(EXIT_FAILURE);
-    }
-    ts = rpmtransCreateSet(db, rootdir);
+    rc = rpmtsAddPackage(ts, h, NULL, 0, NULL);
 
-    rc = rpmtransAddPackage(ts, h, NULL, NULL, 0, NULL);
+    rc = rpmtsCheck(ts);
 
-    rc = rpmdepCheck(ts, &conflicts, &numConflicts);
-    if (rc == 0 && conflicts) {
-       rpmMessage(RPMMESS_ERROR, _("failed build dependencies:\n"));
-       printDepProblems(stderr, conflicts, numConflicts);
-       rpmdepFreeConflicts(conflicts, numConflicts);
+    ps = rpmtsGetProblems(ts);
+    if (rc == 0 && ps) {
+       rpmMessage(RPMMESS_ERROR, _("Failed build dependencies:\n"));
+       printDepProblems(stderr, ps);
        rc = 1;
     }
+    ps = rpmpsFree(ps);
 
-    if (ts)
-       rpmtransFree(ts);
-    if (db)
-       rpmdbClose(db);
+    /* XXX nuke the added package. */
+    rpmtsClean(ts);
 
     return rc;
 }
@@ -51,7 +54,11 @@ static int checkSpec(Header h)
  * angielsku...
  */
 /* XXX this is still a dumb test but at least it's i18n aware */
-static int isSpecFile(const char *specfile)
+/**
+ */
+static int isSpecFile(const char * specfile)
+       /*@globals fileSystem @*/
+       /*@modifies fileSystem @*/
 {
     char buf[256];
     const char * s;
@@ -60,13 +67,13 @@ static int isSpecFile(const char *specfile)
     int checking;
 
     fd = Fopen(specfile, "r.ufdio");
-    if (Ferror(fd)) {
-       /* XXX Fstrerror */
-       fprintf(stderr, _("Unable to open spec file %s: %s\n"), specfile, Fstrerror(fd));
+    if (fd == NULL || Ferror(fd)) {
+       rpmError(RPMERR_OPEN, _("Unable to open spec file %s: %s\n"),
+               specfile, Fstrerror(fd));
        return 0;
     }
     count = Fread(buf, sizeof(buf[0]), sizeof(buf), fd);
-    Fclose(fd);
+    (void) Fclose(fd);
 
     checking = 1;
     for (s = buf; count--; s++) {
@@ -74,82 +81,104 @@ static int isSpecFile(const char *specfile)
        case '\r':
        case '\n':
            checking = 1;
-           break;
+           /*@switchbreak@*/ break;
        case ':':
            checking = 0;
-           break;
+           /*@switchbreak@*/ break;
        default:
            if (checking && !(isprint(*s) || isspace(*s))) return 0;
-           break;
+           /*@switchbreak@*/ break;
        }
     }
     return 1;
 }
 
-static int buildForTarget(const char *arg, struct rpmBuildArguments *ba,
-       const char *passPhrase, int fromTarball, char *cookie,
-       int force, int nodeps)
+/**
+ */
+static int buildForTarget(rpmts ts, const char * arg, BTA_t ba)
+       /*@globals rpmGlobalMacroContext,
+               fileSystem, internalState @*/
+       /*@modifies ts, rpmGlobalMacroContext,
+               fileSystem, internalState @*/
 {
+    const char * passPhrase = ba->passPhrase;
+    const char * cookie = ba->cookie;
     int buildAmount = ba->buildAmount;
-    const char *buildRoot = ba->buildRootOverride;
-    int test = ba->noBuild;
-    FILE *f;
-    const char * specfile;
-    struct stat statbuf;
+    const char * buildRootURL = NULL;
+    const char * specFile;
+    const char * specURL;
+    int specut;
     char buf[BUFSIZ];
     Spec spec = NULL;
+    int rc;
 
+#ifndef        DYING
     rpmSetTables(RPM_MACHTABLE_BUILDARCH, RPM_MACHTABLE_BUILDOS);
+#endif
 
-    if (fromTarball) {
-       const char *specDir;
+    /*@-branchstate@*/
+    if (ba->buildRootOverride)
+       buildRootURL = rpmGenPath(NULL, ba->buildRootOverride, NULL);
+    /*@=branchstate@*/
+
+    /*@-compmempass@*/ /* FIX: static zcmds heartburn */
+    if (ba->buildMode == 't') {
+       FILE *fp;
+       const char * specDir;
        const char * tmpSpecFile;
-       char * cmd, *s;
-       int res;
+       char * cmd, * s;
+       rpmCompressedMagic res = COMPRESSED_OTHER;
+       /*@observer@*/ static const char *zcmds[] =
+               { "cat", "gunzip", "bunzip2", "cat" };
 
        specDir = rpmGetPath("%{_specdir}", NULL);
 
+       /* XXX Using mkstemp is difficult here. */
+       /* XXX FWIW, default %{_specdir} is root.root 0755 */
        {   char tfn[64];
            strcpy(tfn, "rpm-spec.XXXXXX");
+           /*@-unrecog@*/
            tmpSpecFile = rpmGetPath("%{_specdir}/", mktemp(tfn), NULL);
+           /*@=unrecog@*/
        }
 
+       (void) isCompressed(arg, &res);
+
        cmd = alloca(strlen(arg) + 50 + strlen(tmpSpecFile));
-       sprintf(cmd, "gunzip < %s | tar xOvf - Specfile 2>&1 > %s",
-                       arg, tmpSpecFile);
-       if (!(f = popen(cmd, "r"))) {
-           fprintf(stderr, _("Failed to open tar pipe: %s\n"), 
-                       strerror(errno));
-           xfree(specDir);
-           xfree(tmpSpecFile);
+       sprintf(cmd, "%s < %s | tar xOvf - Specfile 2>&1 > %s",
+                       zcmds[res & 0x3], arg, tmpSpecFile);
+       if (!(fp = popen(cmd, "r"))) {
+           rpmError(RPMERR_POPEN, _("Failed to open tar pipe: %m\n"));
+           specDir = _free(specDir);
+           tmpSpecFile = _free(tmpSpecFile);
            return 1;
        }
-       if ((!fgets(buf, sizeof(buf) - 1, f)) || !strchr(buf, '/')) {
+       if ((!fgets(buf, sizeof(buf) - 1, fp)) || !strchr(buf, '/')) {
            /* Try again */
-           pclose(f);
-
-           sprintf(cmd, "gunzip < %s | tar xOvf - \\*.spec 2>&1 > %s", arg,
-                   tmpSpecFile);
-           if (!(f = popen(cmd, "r"))) {
-               fprintf(stderr, _("Failed to open tar pipe: %s\n"), 
-                       strerror(errno));
-               xfree(specDir);
-               xfree(tmpSpecFile);
+           (void) pclose(fp);
+
+           sprintf(cmd, "%s < %s | tar xOvf - \\*.spec 2>&1 > %s",
+                   zcmds[res & 0x3], arg, tmpSpecFile);
+           if (!(fp = popen(cmd, "r"))) {
+               rpmError(RPMERR_POPEN, _("Failed to open tar pipe: %m\n"));
+               specDir = _free(specDir);
+               tmpSpecFile = _free(tmpSpecFile);
                return 1;
            }
-           if (!fgets(buf, sizeof(buf) - 1, f)) {
+           if (!fgets(buf, sizeof(buf) - 1, fp)) {
                /* Give up */
-               fprintf(stderr, _("Failed to read spec file from %s\n"), arg);
-               unlink(tmpSpecFile);
-               xfree(specDir);
-               xfree(tmpSpecFile);
+               rpmError(RPMERR_READ, _("Failed to read spec file from %s\n"),
+                       arg);
+               (void) unlink(tmpSpecFile);
+               specDir = _free(specDir);
+               tmpSpecFile = _free(tmpSpecFile);
                return 1;
            }
        }
-       pclose(f);
+       (void) pclose(fp);
 
        cmd = s = buf;
-       while (*cmd) {
+       while (*cmd != '\0') {
            if (*cmd == '/') s = cmd + 1;
            cmd++;
        }
@@ -160,18 +189,19 @@ static int buildForTarget(const char *arg, struct rpmBuildArguments *ba,
        s = cmd + strlen(cmd) - 1;
        *s = '\0';
 
-       specfile = s = alloca(strlen(specDir) + strlen(cmd) + 5);
+       specURL = s = alloca(strlen(specDir) + strlen(cmd) + 5);
        sprintf(s, "%s/%s", specDir, cmd);
        res = rename(tmpSpecFile, s);
-       xfree(specDir);
-       xfree(tmpSpecFile);
+       specDir = _free(specDir);
        
        if (res) {
-           fprintf(stderr, _("Failed to rename %s to %s: %s\n"),
-                   tmpSpecFile, s, strerror(errno));
-           unlink(tmpSpecFile);
+           rpmError(RPMERR_RENAME, _("Failed to rename %s to %s: %m\n"),
+                       tmpSpecFile, s);
+           (void) unlink(tmpSpecFile);
+           tmpSpecFile = _free(tmpSpecFile);
            return 1;
        }
+       tmpSpecFile = _free(tmpSpecFile);
 
        /* Make the directory which contains the tarball the source 
           directory for this run */
@@ -189,43 +219,49 @@ static int buildForTarget(const char *arg, struct rpmBuildArguments *ba,
 
        addMacro(NULL, "_sourcedir", NULL, buf, RMIL_TARBALL);
     } else {
-       specfile = arg;
+       specURL = arg;
+    }
+    /*@=compmempass@*/
+
+    specut = urlPath(specURL, &specFile);
+    if (*specFile != '/') {
+       char *s = alloca(BUFSIZ);
+       (void)getcwd(s, BUFSIZ);
+       strcat(s, "/");
+       strcat(s, arg);
+       specURL = s;
     }
 
-    switch (urlIsURL(specfile)) {
-    case URL_IS_UNKNOWN:
-       if (arg[0] == '/') {
-           specfile = arg;
-       } else {
-           char *s = alloca(BUFSIZ);
-           (void)getcwd(s, BUFSIZ);
-           strcat(s, "/");
-           strcat(s, arg);
-           specfile = s;
+    if (specut != URL_IS_DASH) {
+       struct stat st;
+       if (Stat(specURL, &st) < 0) {
+           rpmError(RPMERR_STAT, _("failed to stat %s: %m\n"), specURL);
+           rc = 1;
+           goto exit;
        }
-       stat(specfile, &statbuf);
-       if (! S_ISREG(statbuf.st_mode)) {
-           fprintf(stderr, _("File is not a regular file: %s\n"), specfile);
-           return 1;
+       if (! S_ISREG(st.st_mode)) {
+           rpmError(RPMERR_NOTREG, _("File %s is not a regular file.\n"),
+               specURL);
+           rc = 1;
+           goto exit;
        }
 
        /* Try to verify that the file is actually a specfile */
-       if (!isSpecFile(specfile)) {
-           fprintf(stderr, _("File %s does not appear to be a specfile.\n"),
-               specfile);
-           return 1;
+       if (!isSpecFile(specURL)) {
+           rpmError(RPMERR_BADSPEC,
+               _("File %s does not appear to be a specfile.\n"), specURL);
+           rc = 1;
+           goto exit;
        }
-       break;
-    default:
-       break;
     }
     
     /* Parse the spec file */
 #define        _anyarch(_f)    \
 (((_f)&(RPMBUILD_PREP|RPMBUILD_BUILD|RPMBUILD_INSTALL|RPMBUILD_PACKAGEBINARY)) == 0)
-    if (parseSpec(&spec, specfile, ba->rootdir, buildRoot, 0, passPhrase,
-       cookie, _anyarch(buildAmount), force)) {
-           return 1;
+    if (parseSpec(&spec, specURL, ba->rootdir, buildRootURL, 0, passPhrase,
+               cookie, _anyarch(buildAmount), ba->force)) {
+       rc = 1;
+       goto exit;
     }
 #undef _anyarch
 
@@ -233,36 +269,36 @@ static int buildForTarget(const char *arg, struct rpmBuildArguments *ba,
     initSourceHeader(spec);
 
     /* Check build prerequisites */
-    if (!nodeps && checkSpec(spec->sourceHeader)) {
-       freeSpec(spec);
-       return 1;
+    if (!ba->noDeps && checkSpec(ts, spec->sourceHeader)) {
+       rc = 1;
+       goto exit;
     }
 
-    if (buildSpec(spec, buildAmount, test)) {
-       freeSpec(spec);
-       return 1;
+    if (buildSpec(spec, buildAmount, ba->noBuild)) {
+       rc = 1;
+       goto exit;
     }
     
-    if (fromTarball) unlink(specfile);
+    if (ba->buildMode == 't')
+       (void) Unlink(specURL);
+    rc = 0;
 
-    freeSpec(spec);
-    
-    return 0;
+exit:
+    spec = freeSpec(spec);
+    buildRootURL = _free(buildRootURL);
+    return rc;
 }
 
-int build(const char *arg, struct rpmBuildArguments *ba, const char *passPhrase,
-         int fromTarball, char *cookie, const char * rcfile, int force,
-         int nodeps)
+int build(rpmts ts, const char * arg, BTA_t ba, const char * rcfile)
 {
     char *t, *te;
     int rc = 0;
-    char *targets = ba->targets;
+    char * targets = ba->targets;
 #define        buildCleanMask  (RPMBUILD_RMSOURCE|RPMBUILD_RMSPEC)
     int cleanFlags = ba->buildAmount & buildCleanMask;
 
     if (targets == NULL) {
-       rc =  buildForTarget(arg, ba, passPhrase, fromTarball, cookie,
-               force, nodeps);
+       rc =  buildForTarget(ts, arg, ba);
        goto exit;
     }
 
@@ -278,7 +314,7 @@ int build(const char *arg, struct rpmBuildArguments *ba, const char *passPhrase,
        target = alloca(te-t+1);
        strncpy(target, t, (te-t));
        target[te-t] = '\0';
-       if (*te)
+       if (*te != '\0')
            te++;
        else    /* XXX Perform clean-up after last target build. */
            ba->buildAmount |= cleanFlags;
@@ -286,105 +322,17 @@ int build(const char *arg, struct rpmBuildArguments *ba, const char *passPhrase,
        printf(_("Building for target %s\n"), target);
 
        /* Read in configuration for target. */
-       freeMacros(NULL);       /* XXX macros from CLI are destroyed too */
-       rpmReadConfigFiles(rcfile, target);
-       rc = buildForTarget(arg, ba, passPhrase, fromTarball, cookie,
-               force, nodeps);
+       rpmFreeMacros(NULL);
+       (void) rpmReadConfigFiles(rcfile, target);
+       rc = buildForTarget(ts, arg, ba);
        if (rc)
            break;
     }
 
 exit:
     /* Restore original configuration. */
-    freeMacros(NULL);  /* XXX macros from CLI are destroyed too */
-    rpmReadConfigFiles(rcfile, NULL);
-    return rc;
-}
+    rpmFreeMacros(NULL);
+    (void) rpmReadConfigFiles(rcfile, NULL);
 
-#define        POPT_USECATALOG         1000
-#define        POPT_NOLANG             1001
-#define        POPT_RMSOURCE           1002
-#define        POPT_RMBUILD            1003
-#define        POPT_BUILDROOT          1004
-#define        POPT_BUILDARCH          1005
-#define        POPT_BUILDOS            1006
-#define        POPT_TARGETPLATFORM     1007
-#define        POPT_NOBUILD            1008
-#define        POPT_SHORTCIRCUIT       1009
-#define        POPT_RMSPEC             1010
-
-extern int noLang;
-static int noBuild = 0;
-static int useCatalog = 0;
-
-static void buildArgCallback( /*@unused@*/ poptContext con,
-       /*@unused@*/ enum poptCallbackReason reason,
-       const struct poptOption * opt, const char * arg, const void * data)
-{
-    struct rpmBuildArguments * rba = (struct rpmBuildArguments *) data;
-
-    switch (opt->val) {
-    case POPT_USECATALOG: rba->useCatalog = 1; break;
-    case POPT_NOBUILD: rba->noBuild = 1; break;
-    case POPT_NOLANG: rba->noLang = 1; break;
-    case POPT_SHORTCIRCUIT: rba->shortCircuit = 1; break;
-    case POPT_RMSOURCE: rba->buildAmount |= RPMBUILD_RMSOURCE; break;
-    case POPT_RMSPEC: rba->buildAmount |= RPMBUILD_RMSPEC; break;
-    case POPT_RMBUILD: rba->buildAmount |= RPMBUILD_RMBUILD; break;
-    case POPT_BUILDROOT:
-       if (rba->buildRootOverride) {
-           fprintf(stderr, _("buildroot already specified"));
-           exit(EXIT_FAILURE);
-           /*@notreached@*/
-       }
-       rba->buildRootOverride = xstrdup(arg);
-       break;
-    case POPT_BUILDARCH:
-       fprintf(stderr, _("--buildarch has been obsoleted.  Use the --target option instead.\n")); 
-       exit(EXIT_FAILURE);
-       /*@notreached@*/ break;
-    case POPT_BUILDOS:
-       fprintf(stderr, _("--buildos has been obsoleted.  Use the --target option instead.\n")); 
-       exit(EXIT_FAILURE);
-       /*@notreached@*/ break;
-    case POPT_TARGETPLATFORM:
-       if (rba->targets) {
-           int len = strlen(rba->targets) + 1 + strlen(arg) + 1;
-           rba->targets = xrealloc(rba->targets, len);
-           strcat(rba->targets, ",");
-       } else {
-           rba->targets = xmalloc(strlen(arg) + 1);
-           rba->targets[0] = '\0';
-       }
-       strcat(rba->targets, arg);
-       break;
-    }
+    return rc;
 }
-
-struct poptOption rpmBuildPoptTable[] = {
-       { NULL, '\0', POPT_ARG_CALLBACK | POPT_CBFLAG_INC_DATA,
-               buildArgCallback, 0, NULL, NULL },
-       { "buildarch", '\0', POPT_ARG_STRING, 0,  POPT_BUILDARCH,
-               N_("override build architecture"), "ARCH" },
-       { "buildos", '\0', POPT_ARG_STRING, 0,  POPT_BUILDOS,
-               N_("override build operating system"), "OS" },
-       { "buildroot", '\0', POPT_ARG_STRING, 0,  POPT_BUILDROOT,
-               N_("override build root"), "DIRECTORY" },
-       { "clean", '\0', 0, 0, POPT_RMBUILD,
-               N_("remove build tree when done"), NULL},
-       { "nobuild", '\0', 0, &noBuild,  POPT_NOBUILD,
-               N_("do not execute any stages of the build"), NULL },
-       { "nolang", '\0', 0, &noLang, POPT_NOLANG,
-               N_("do not accept I18N msgstr's from specfile"), NULL},
-       { "rmsource", '\0', 0, 0, POPT_RMSOURCE,
-               N_("remove sources when done"), NULL},
-       { "rmspec", '\0', 0, 0, POPT_RMSPEC,
-               N_("remove specfile when done"), NULL},
-       { "short-circuit", '\0', 0, 0,  POPT_SHORTCIRCUIT,
-               N_("skip straight to specified stage (only for c,i)"), NULL },
-       { "target", '\0', POPT_ARG_STRING, 0,  POPT_TARGETPLATFORM,
-               N_("override target platform"), "CPU-VENDOR-OS" },
-       { "usecatalog", '\0', 0, &useCatalog, POPT_USECATALOG,
-               N_("lookup I18N strings in specfile catalog"), NULL},
-       { 0, 0, 0, 0, 0,        NULL, NULL }
-};