src/hdrmacro.c

   1 /*
   2  * Copyright 1993, 2000 Christopher Seiwald.
   3  * This file is part of Jam - see jam.c for Copyright information.
   4  *
   5  * This program is free software: you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation, version 3 of the License ONLY.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  16  */
  17 /*
  18  * hdrmacro.c - handle header files that define macros used in
  19  *              #include statements.
  20  *
  21  *  we look for lines like "#define MACRO  <....>" or '#define MACRO  "    "'
  22  *  in the target file. When found, we
  23  *
  24  *  we then phony up a rule invocation like:
  25  *
  26  *  $(HDRRULE) <target> : <resolved included files> ;
  27  *
  28  * External routines:
  29  *    headers1() - scan a target for "#include MACRO" lines and try
  30  *                 to resolve them when needed
  31  *
  32  * Internal routines:
  33  *    headers1() - using regexp, scan a file and build include LIST
  34  */
  35 #include "jam.h"
  36 #include "lists.h"
  37 #include "parse.h"
  38 #include "compile.h"
  39 #include "rules.h"
  40 #include "variable.h"
  41 #include "re9.h"
  42 #include "hdrmacro.h"
  43 #include "hash.h"
  44 #include "newstr.h"
  45 #include "dstrings.h"
  46
  47
  48 /* this type is used to store a dictionary of file header macros */
  49 typedef struct header_macro {
  50   const char *symbol;
  51   const char *filename; /* we could maybe use a LIST here ?? */
  52 } HEADER_MACRO;
  53
  54 static struct hash *header_macros_hash = 0;
  55
  56
  57 /*
  58  * headers() - scan a target for include files and call HDRRULE
  59  */
  60 //#define MAXINC  (10)
  61
  62 void macro_headers (TARGET *t) {
  63   regexp_t *re;
  64   re9_sub_t mt[4];
  65   int line_size = 16384;
  66   char *buf; /* line_size size */
  67   dstring_t buf1, buf2;
  68   FILE *f;
  69   if (DEBUG_HEADER) printf("macro header scan for %s\n", t->name);
  70   /* this regexp is used to detect lines of the form */
  71   /* "#define MACRO <....>" or "#define MACRO "....." */
  72   /* in the header macro files */
  73   if ((f = fopen(t->boundname, "r")) == 0) return;
  74   re = regexp_compile("^\\s*#\\s*define\\s+([A-Za-z_][A-Za-z0-9_]*)\\s+[<\"]([^\">]+)[\">].*$", 0);
  75   if ((buf = malloc(line_size)) == NULL) { fprintf(stderr, "FATAL: out of memory!\n"); abort(); }
  76   dstr_init(&buf1);
  77   dstr_init(&buf2);
  78   while (fgets(buf, sizeof(buf), f)) {
  79     HEADER_MACRO var, *v = &var;
  80     mt[0].sp = mt[0].ep = NULL;
  81     if (regexp_execute(re, buf, mt, 4) > 0) {
  82       int l1 = mt[1].ep-mt[1].sp;
  83       int l2 = mt[2].ep-mt[2].sp;
  84       if (l1 > 0 && l2 > 0) {
  85         dstr_set_buf(&buf1, mt[1].sp, l1);
  86         dstr_set_buf(&buf2, mt[2].sp, l2);
  87         /* we detected a line that looks like "#define MACRO filename */
  88         if (DEBUG_HEADER) printf("macro '%s' used to define filename '%s' in '%s'\n", dstr_cstr(&buf1), dstr_cstr(&buf2), t->boundname);
  89         /* add macro definition to hash table */
  90         if (!header_macros_hash) header_macros_hash = hashinit(sizeof(HEADER_MACRO), "hdrmacros");
  91         v->symbol = (const char *)dstr_cstr(&buf1);
  92         v->filename = 0;
  93         if (hashenter(header_macros_hash, (HASHDATA **)&v)) {
  94           v->symbol = newstr(dstr_cstr(&buf1)); /* never freed */
  95           v->filename = newstr(dstr_cstr(&buf2)); /* never freed */
  96         }
  97       }
  98       /* XXXX: FOR NOW, WE IGNORE MULTIPLE MACRO DEFINITIONS! */
  99       /*       WE MIGHT AS WELL USE A LIST TO STORE THEM */
 100     }
 101   }
 102   dstr_done(&buf2);
 103   dstr_done(&buf1);
 104   free(buf);
 105   fclose(f);
 106   regexp_free(re);
 107 }
 108
 109
 110 const char *macro_header_get (const char *macro_name) {
 111   HEADER_MACRO var, *v = &var;
 112   v->symbol = (char*)macro_name;
 113   if (header_macros_hash && hashcheck(header_macros_hash, (HASHDATA **)&v)) {
 114     if (DEBUG_HEADER) printf("### macro '%s' evaluated to '%s'\n", macro_name, v->filename);
 115     return (const char *)v->filename;
 116   }
 117   return 0;
 118 }