parseSpec.c

   1 /*
   2  * Parses RPM spec file into Makefile fragment. See
   3  *
   4  * http://fedora.redhat.com/docs/drafts/rpm-guide-en/ch-programming-c.html
   5  *
   6  * Mark Huang <mlhuang@cs.princeton.edu>
   7  * Copyright (C) 2006 The Trustees of Princeton University
   8  *
   9  * $Id: parseSpec.c,v 1.3 2006/03/09 16:30:33 mlhuang Exp $
  10  */
  11
  12 #include <stdio.h>
  13 #include <stdlib.h>
  14 #include <string.h>
  15 #include <libgen.h>
  16 #include <errno.h>
  17 #include <rpm/rpmlib.h>
  18 #include <rpm/rpmts.h>
  19 #include <rpm/rpmcli.h>
  20 #include <rpm/rpmbuild.h>
  21 #include <rpm/rpmspec.h>
  22
  23 /* the structure describing the options we take and the defaults */
  24 static struct poptOption optionsTable[] = {
  25         { NULL, '\0', POPT_ARG_INCLUDE_TABLE, rpmcliAllPoptTable, 0,
  26           "Common options for all rpm modes and executables:",
  27           NULL },
  28
  29         POPT_AUTOALIAS
  30         POPT_AUTOHELP
  31         POPT_TABLEEND
  32 };
  33
  34 /* Stolen from rpm/build/spec.c:rpmspecQuery() */
  35 Spec
  36 rpmspecGet(rpmts ts, const char * arg)
  37 {
  38         char * buildRoot = NULL;
  39         int recursing = 0;
  40         char * passPhrase = "";
  41         char *cookie = NULL;
  42         int anyarch = 1;
  43         int force = 1;
  44
  45         if (parseSpec(ts, arg, "/", buildRoot, recursing, passPhrase,
  46                       cookie, anyarch, force)) {
  47                 fprintf(stderr, "query of specfile %s failed, can't parse\n", arg);
  48                 return NULL;
  49         }
  50
  51         return rpmtsSpec(ts);
  52 }
  53
  54 int
  55 main(int argc, char *argv[])
  56 {
  57         poptContext context;
  58         rpmts ts = NULL;
  59         int ec = 0;
  60         Spec spec;
  61         struct Source *source;
  62         Package pkg;
  63         const char *name, *version, *release, *arch, *unused;
  64
  65         /* BEGIN: support to pull out --target from the args list */
  66         int  alen, i;
  67         char *target = NULL;
  68         int args = 1;
  69         int tlen = strlen("--target");
  70
  71         /* walk argv list looking for --target */
  72 #if 0
  73         while ((args+1)<argc) {
  74           if(strncmp(argv[args],"--target",tlen)==0){
  75             char **dash;
  76
  77             /* get arch component of the --target option */
  78             dash = (char**)strchr(argv[args+1],'-');
  79             if (dash != NULL) *dash=NULL;
  80
  81             /* copy arch component of --target option to target */
  82             alen = strnlen(argv[args+1],32);
  83             target = (char*)malloc(alen);
  84             if (target == NULL) return errno;
  85             strncpy(target,argv[args+1],alen);
  86
  87             /* change argc, argv to take out the "--target xxx" */
  88             for (i=args;i<argc;i++) argv[i]=argv[i+2];
  89             argc-=2;
  90
  91             break;
  92           }
  93         }
  94         argv[1]=argv[argc-1];
  95         argv[2]=0;
  96 #endif
  97         /* END: support to pull out --target from the args list */
  98
  99         /* Parse common options for all rpm modes and executables */
 100         context = rpmcliInit(argc, argv, optionsTable);
 101
 102         exit(0);
 103
 104         /* Create transaction state */
 105         ts = rpmtsCreate();
 106
 107         /* Parse spec file. The rpmcli functions don't allow you to
 108          * access the Spec structure directly, so we call our own
 109          * version of rpmSpecQuery() directly. */
 110         spec = rpmspecGet(ts, argv[1]);
 111         if (!spec)
 112                 goto done;
 113
 114         /* Print sources */
 115         for (source = spec->sources; source; source = source->next) {
 116                 char fullSource[PATH_MAX];
 117
 118                 strncpy(fullSource, source->fullSource, sizeof(fullSource));
 119                 printf("SOURCES += SOURCES/%s\n", basename(fullSource));
 120         }
 121
 122         /* Get SRPM name from name of first package */
 123         pkg = spec->packages;
 124         name = version = release = NULL;
 125         (void) headerNVR(pkg->header, &name, &version, &release);
 126         if (name && version && release)
 127                 printf("SRPM := SRPMS/%s-%s-%s.src.rpm\n",
 128                        name, version, release);
 129
 130         /* Print non-empty packages */
 131         for (pkg = spec->packages; pkg != NULL; pkg = pkg->next) {
 132                 name = version = release = arch = NULL;
 133                 (void) headerNEVRA(pkg->header, &name, &unused, &version, &release, &arch);
 134                 if (name && version && release && arch) {
 135                         if (!pkg->fileList)
 136                                 printf("# Empty\n# ");
 137
 138                         if (target != NULL) {
 139                           if (strcmp(arch,target)!=0) {
 140                             arch=target;
 141                           }
 142                         }
 143                         printf("RPMS += RPMS/%s/%s-%s-%s.%s.rpm\n",
 144                                arch, name, version, release, arch);
 145                 }
 146         }
 147
 148         spec = freeSpec(spec);
 149
 150  done:
 151         ts = rpmtsFree(ts);
 152         context = rpmcliFini(context);
 153         return ec;
 154 }