spec2make.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  */
  10
  11 #include <stdio.h>
  12 #include <stdlib.h>
  13 #include <string.h>
  14 #include <libgen.h>
  15 #include <errno.h>
  16 #include <rpm/rpmlib.h>
  17 #include <rpm/rpmts.h>
  18 #include <rpm/rpmcli.h>
  19 #include <rpm/rpmbuild.h>
  20 #include <rpm/rpmspec.h>
  21
  22 /* from f10 and up, Spec is renamed rpmSpec */
  23 #ifndef _RPMTYPES_H
  24 #define rpmSpec Spec
  25 #endif
  26
  27 #ifndef PATH_MAX
  28 #include <linux/limits.h>
  29 #endif
  30
  31 extern size_t strnlen(const char *s, size_t maxlen);
  32
  33 /* the structure describing the options we take and the defaults */
  34 static struct poptOption optionsTable[] = {
  35   { NULL, '\0', POPT_ARG_INCLUDE_TABLE, rpmBuildPoptTable, 0,
  36     "Build options with [ <specfile> | <tarball> | <source package> ]:",
  37     NULL },
  38
  39   { NULL, '\0', POPT_ARG_INCLUDE_TABLE, rpmcliAllPoptTable, 0,
  40     "Common options for all rpm modes and executables:",
  41     NULL },
  42
  43   POPT_AUTOALIAS
  44   POPT_AUTOHELP
  45   POPT_TABLEEND
  46 };
  47
  48 /* Stolen from rpm/build/spec.c:rpmspecQuery() */
  49 rpmSpec
  50 rpmspecGet(rpmts ts, const char * arg)
  51 {
  52   char * buildRoot = NULL;
  53   int recursing = 0;
  54   char * passPhrase = "";
  55   char *cookie = NULL;
  56   int anyarch = 1;
  57   int force = 1;
  58
  59   if (parseSpec(ts, arg, "/", buildRoot, recursing, passPhrase,
  60                 cookie, anyarch, force)) {
  61     fprintf(stderr, "query of specfile %s failed, can't parse\n", arg);
  62     return NULL;
  63   }
  64
  65   return rpmtsSpec(ts);
  66 }
  67
  68 int
  69 main(int argc, char *argv[])
  70 {
  71   poptContext context;
  72   rpmts ts = NULL;
  73   int ec = 0;
  74   rpmSpec spec;
  75   struct Source *source;
  76   Package pkg;
  77   const char *name, *version, *release, *arch, *unused;
  78   const char *package_name;
  79
  80   /* BEGIN: support to pull out --target from the args list */
  81   int  alen, i;
  82   char *target = NULL;
  83   int args = 1;
  84   int tlen = strlen("--target");
  85
  86
  87   /* walk argv list looking for --target */
  88   while ((args+1)<argc) {
  89     if(strncmp(argv[args],"--target",tlen)==0){
  90       char **dash;
  91
  92       /* get arch component of the --target option */
  93       dash = (char**)strchr(argv[args+1],'-');
  94       if (dash != NULL) *dash=NULL;
  95
  96       /* copy arch component of --target option to target */
  97       alen = strnlen(argv[args+1],32);
  98       target = (char*)malloc(alen+1);
  99       if (target == NULL) return errno;
 100       strncpy(target,argv[args+1],alen);
 101       target[alen]='\0';
 102
 103       /* change argc, argv to take out the "--target xxx" */
 104       for (i=args;i<argc;i++) argv[i]=argv[i+2];
 105       argc-=2;
 106
 107       break;
 108     }
 109     args++;
 110   }
 111   argv[1]=argv[argc-2];
 112   argv[2]=argv[argc-1];
 113   argv[3]=0;
 114   argc=3;
 115   /* END: support to pull out --target from the args list */
 116
 117   /* Parse common options for all rpm modes and executables */
 118   context = rpmcliInit(argc, argv, optionsTable);
 119
 120   /* Create transaction state */
 121   ts = rpmtsCreate();
 122
 123   /* Parse spec file. The rpmcli functions don't allow you to
 124    * access the Spec structure directly, so we call our own
 125    * version of rpmSpecQuery() directly. */
 126   spec = rpmspecGet(ts, argv[1]);
 127   package_name = argv[2];
 128   if (!spec) {
 129     ec = 1;
 130     goto done;
 131   }
 132
 133   /* Print sources */
 134   for (source = spec->sources; source; source = source->next) {
 135     char fullSource[PATH_MAX];
 136
 137     strncpy(fullSource, source->fullSource, sizeof(fullSource));
 138     printf("%s.tarballs += SOURCES/%s\n", package_name, basename(fullSource));
 139     /* computes the SOURCEDIR variable by removing .tar.gz or .tar.bz2 */
 140     {
 141       char *suffixes[] = {".tar.gz",".tgz",".tar.bz2", NULL};
 142       char **suffix;
 143       char *suffix_index;
 144
 145       for (suffix=suffixes ; *suffix ; suffix++) {
 146         printf("# trying %s\n",*suffix);
 147         suffix_index=strstr(fullSource,*suffix);
 148         if (suffix_index) {
 149           char sourcename[PATH_MAX];
 150           size_t len = (size_t)(suffix_index-fullSource);
 151           strncpy(sourcename,fullSource,len);
 152           sourcename[len]='\0';
 153           printf ("%s.source := SOURCES/%s\n",package_name,basename(sourcename));
 154           break;
 155         }
 156       }
 157     }
 158
 159   }
 160
 161   /* Get SRPM name from name of first package */
 162   pkg = spec->packages;
 163   name = version = release = NULL;
 164   (void) headerNVR(pkg->header, &name, &version, &release);
 165   if (name && version && release)
 166     printf("%s.srpm := SRPMS/%s-%s-%s.src.rpm\n",
 167            package_name, name, version, release);
 168
 169   /* Print non-empty packages */
 170   for (pkg = spec->packages; pkg != NULL; pkg = pkg->next) {
 171     name = version = release = arch = NULL;
 172     (void) headerNEVRA(pkg->header, &name, &unused, &version, &release, &arch);
 173     if (name && version && release && arch) {
 174       if (target != NULL) {
 175         if (strcmp(arch,target)!=0) {
 176           arch=target;
 177         }
 178       }
 179       /* skip empty packages */
 180       if (pkg->fileList) {
 181         /* attach (add) rpm path to package */
 182         printf("%s.rpms += RPMS/%s/%s-%s-%s.%s.rpm\n",
 183                package_name, arch, name, version, release, arch);
 184         /* convenience */
 185         printf("%s.rpmnames += %s\n",
 186                package_name, name);
 187         /* attach path to rpm name */
 188         printf("%s.rpm-path := RPMS/%s/%s-%s-%s.%s.rpm\n",
 189                name,arch, name, version, release, arch);
 190         /* attach package to rpm name for backward resolution - should be unique */
 191         printf("%s.package := %s\n",
 192                name,package_name);
 193       }
 194     }
 195   }
 196
 197   /* export some macros to make */
 198   /* note : this relies on pl-specific conventions and might be wrong */
 199   {
 200     char *macros[] = { "release" , "name" , "version" , "taglevel" , NULL } ;
 201     char **nav;
 202     char *macro=malloc(32);
 203     for (nav=macros; *nav; nav++) {
 204       sprintf(macro,"%%{%s}",*nav);
 205       char *value = rpmExpand(macro,NULL);
 206       printf ("%s.rpm-%s := %s\n",package_name,*nav,value);
 207     }
 208   }
 209
 210   /* export arch */
 211   printf ("%s.rpm-arch := %s\n",package_name,target);
 212
 213   spec = freeSpec(spec);
 214
 215  done:
 216   ts = rpmtsFree(ts);
 217   context = rpmcliFini(context);
 218   return ec;
 219 }