tagmanager/nsis.c

   1 /*
   2 *   $Id$
   3 *
   4 *   Copyright (c) 2000-2002, Darren Hiebert
   5 *   Copyright (c) 2009-2010, Enrico Tröger
   6 *
   7 *   This source code is released for free distribution under the terms of the
   8 *   GNU General Public License.
   9 *
  10 *   This module contains functions for generating tags for NSIS scripts (based on sh.c).
  11 */
  12
  13 /*
  14 *   INCLUDE FILES
  15 */
  16 #include "general.h"    /* must always come first */
  17
  18 #include <string.h>
  19
  20 #include "parse.h"
  21 #include "read.h"
  22 #include "main.h"
  23 #include "vstring.h"
  24
  25 /*
  26 *   DATA DEFINITIONS
  27 */
  28 typedef enum {
  29         K_SECTION,
  30         K_FUNCTION,
  31         K_VARIABLE
  32 } NsisKind;
  33
  34 static kindOption NsisKinds [] = {
  35         { TRUE, 'n', "namespace", "sections"},
  36         { TRUE, 'f', "function", "functions"},
  37         { TRUE, 'v', "variable", "variables"}
  38 };
  39
  40 /*
  41 *   FUNCTION DEFINITIONS
  42 */
  43
  44 static void findNsisTags (void)
  45 {
  46         vString *name = vStringNew ();
  47         const unsigned char *line;
  48
  49         while ((line = fileReadLine ()) != NULL)
  50         {
  51                 const unsigned char* cp = line;
  52
  53                 while (isspace (*cp))
  54                         cp++;
  55
  56                 if (*cp == '#' || *cp == ';')
  57                         continue;
  58
  59                 /* functions */
  60                 if (strncasecmp ((const char*) cp, "function", (size_t) 8) == 0 &&
  61                         isspace ((int) cp [8]))
  62                 {
  63                         cp += 8;
  64                         /* skip all whitespace */
  65                         while (isspace ((int) *cp))
  66                                 ++cp;
  67                         while (isalnum ((int) *cp) || *cp == '_' || *cp == '-' || *cp == '.' || *cp == '!')
  68                         {
  69                                 vStringPut (name, (int) *cp);
  70                                 ++cp;
  71                         }
  72                         vStringTerminate (name);
  73                         makeSimpleTag (name, NsisKinds, K_FUNCTION);
  74                         vStringClear (name);
  75                 }
  76                 /* variables */
  77                 else if (strncasecmp ((const char*) cp, "var", (size_t) 3) == 0 &&
  78                         isspace ((int) cp [3]))
  79                 {
  80                         cp += 3;
  81                         /* skip all whitespace */
  82                         while (isspace ((int) *cp))
  83                                 ++cp;
  84                         /* skip any flags */
  85                         while (*cp == '/')
  86                         {
  87                                 ++cp;
  88                                 while (! isspace ((int) *cp))
  89                                         ++cp;
  90                                 while (isspace ((int) *cp))
  91                                         ++cp;
  92                         }
  93                         while (isalnum ((int) *cp) || *cp == '_')
  94                         {
  95                                 vStringPut (name, (int) *cp);
  96                                 ++cp;
  97                         }
  98                         vStringTerminate (name);
  99                         makeSimpleTag (name, NsisKinds, K_VARIABLE);
 100                         vStringClear (name);
 101                 }
 102                 /* sections */
 103                 else if (strncasecmp ((const char*) cp, "section", (size_t) 7) == 0  &&
 104                                  isspace ((int) cp [7]))
 105                 {
 106                         boolean in_quotes = FALSE;
 107                         cp += 7;
 108                         /* skip all whitespace */
 109                         while (isspace ((int) *cp))
 110                         ++cp;
 111                         while (isalnum ((int) *cp) || isspace ((int) *cp) ||
 112                                    *cp == '_' || *cp == '-' || *cp == '.' || *cp == '!' || *cp == '"')
 113                         {
 114                                 if (*cp == '"')
 115                                 {
 116                                         if (in_quotes)
 117                                                 break;
 118                                         else
 119                                         {
 120                                                 in_quotes = TRUE;
 121                                                 ++cp;
 122                                                 continue;
 123                                         }
 124                                 }
 125                                 vStringPut (name, (int) *cp);
 126                                 ++cp;
 127                         }
 128                         vStringTerminate (name);
 129                         makeSimpleTag (name, NsisKinds, K_SECTION);
 130                         vStringClear (name);
 131                 }
 132         }
 133         vStringDelete (name);
 134 }
 135
 136 extern parserDefinition* NsisParser (void)
 137 {
 138         static const char *const extensions [] = {
 139                 "nsi", "nsh", NULL
 140         };
 141         parserDefinition* def = parserNew ("NSIS");
 142         def->kinds      = NsisKinds;
 143         def->kindCount  = KIND_COUNT (NsisKinds);
 144         def->extensions = extensions;
 145         def->parser     = findNsisTags;
 146         return def;
 147 }
 148
 149 /* vi:set tabstop=8 shiftwidth=4: */