开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 编辑器/阅读器 > 查看源码
options.c
资源名称：vim53src.zip　[点击查看]
上传用户：gddssl
上传日期：2007-01-06
资源大小：1003k
文件大小：32k
源码类别：

编辑器/阅读器

开发平台：

DOS

options.c：源码内容
  1. /*****************************************************************************
  2. *   $Id: options.c,v 6.11 1998/08/04 03:25:29 darren Exp $
  3. *
  4. *   Copyright (c) 1996-1998, Darren Hiebert
  5. *
  6. *   This source code is released for free distribution under the terms of the
  7. *   GNU General Public License.
  8. *
  9. *   This module contains functions to process command line options.
  10. *****************************************************************************/
  12. /*============================================================================
  13. =   Include files
  14. ============================================================================*/
  15. #ifdef HAVE_CONFIG_H
  16. # include <config.h>
  17. #endif
  19. #ifdef DEBUG
  20. # include <assert.h>
  21. #endif
  23. #include "ctags.h"
  25. /*============================================================================
  26. =   Defines
  27. ============================================================================*/
  29. /*----------------------------------------------------------------------------
  30.  *  Miscellaneous defines
  31.  *--------------------------------------------------------------------------*/
  33. #define CTAGS_INVOCATION  "
  34.   Usage: ctags [-aBeFnNRux] [-{f|o} name] [-h list] [-i [+-=]types]n
  35.                [-I list] [-L file] [-p path] [--append] [--excmd=n|p|m]n
  36.                [--format=level] [--help] [--if0] [--lang=lang] [--recurse]n
  37.        [--sort] [--totals] [--version] file(s)n"
  39. #define ETAGS_INVOCATION  "
  40.   Usage: etags [-aRx] [-{f|o} name] [-h list] [-i [+-=]types] [-I list]n
  41.                [-L file] [-p path] [--append] [--help] [--if0] [--lang=lang]n
  42.        [--recurse] [--totals] [--version] file(s)n"
  44. #define CTAGS_ENVIRONMENT "CTAGS"
  45. #define ETAGS_ENVIRONMENT "ETAGS"
  47. /*  The following separators are permitted for list options.
  48.  */
  49. #define EXTENSION_SEPARATORS   "."
  50. #define IGNORE_SEPARATORS   ", tn"
  52. #ifndef DEFAULT_FILE_FORMAT
  53. # define DEFAULT_FILE_FORMAT 2
  54. #endif
  56. /*============================================================================
  57. =   Data declarations
  58. ============================================================================*/
  59. typedef struct {
  60.     int usedByEtags;
  61.     const char *const description;
  62. } optionDescription;
  64. /*============================================================================
  65. =   Data definitions
  66. ============================================================================*/
  68. /*----------------------------------------------------------------------------
  69. -   Globally shared
  70. ----------------------------------------------------------------------------*/
  72. static const char *const CExtensionList[] = {
  73.     "c", NULL
  74. };
  75. static const char *const CppExtensionList[] = {
  76. #if !defined(MSDOS) && !defined(WIN32) && !defined(OS2)
  77.     "C",
  78. #endif
  79.     "c++", "cc", "cpp", "cxx", NULL
  80. };
  81. static const char *const JavaExtensionList[] = {
  82.     "java", NULL
  83. };
  84. static const char *const HeaderExtensionList[] = {
  85.     "h", "H", "hh", "hpp", "hxx", "h++", NULL
  86. };
  88. optionValues Option = {
  89.     {
  90. TRUE, /* -ic */
  91. TRUE, /* -id */
  92. TRUE, /* -ie */
  93. TRUE, /* -if */
  94. TRUE, /* -ig */
  95. TRUE, /* -ii */
  96. FALSE, /* -im */
  97. TRUE, /* -in */
  98. FALSE, /* -ip */
  99. TRUE, /* -is */
  100. TRUE, /* -it */
  101. TRUE, /* -iu */
  102. TRUE, /* -iv */
  103. FALSE, /* -ix */
  104. FALSE, /* -iC */
  105. FALSE, /* -iF */
  106. TRUE, /* -iS */
  107.     },
  108.     { NULL, 0, 0 }, /* -I */
  109.     FALSE, /* -a */
  110.     FALSE, /* -B */
  111.     FALSE, /* -e */
  112. #ifdef MACROS_USE_PATTERNS
  113.     EX_PATTERN, /* -n, --excmd */
  114. #else
  115.     EX_MIX, /* -n, --excmd */
  116. #endif
  117.     NULL, /* -p */
  118.     FALSE, /* -R */
  119.     TRUE, /* -u, --sort */
  120.     FALSE, /* -x */
  121.     NULL, /* -L */
  122.     NULL, /* -o */
  123.     HeaderExtensionList,/* -h */
  124. #ifdef DEBUG
  125.     0, 0, /* -D, -b */
  126. #endif
  127.     FALSE, /* started as etags */
  128.     FALSE, /* brace formatting */
  129.     DEFAULT_FILE_FORMAT,/* --format */
  130.     FALSE, /* --if0 */
  131.     LANG_AUTO, /* --lang */
  132.     { /* --langmap */
  133. CExtensionList,
  134. CppExtensionList,
  135. JavaExtensionList,
  136.     },
  137.     FALSE /* --totals */
  138. };
  140. /*----------------------------------------------------------------------------
  141. -   Locally used only
  142. ----------------------------------------------------------------------------*/
  144. static optionDescription LongOptionDescription[] = {
  145.  {1,"  -a   Append the tags to an existing tag file."},
  146. #ifdef DEBUG
  147.  {1,"  -b <line>"},
  148.  {1,"       Set break line."},
  149. #endif
  150.  {0,"  -B   Use backward searching patterns (?...?)."},
  151. #ifdef DEBUG
  152.  {1,"  -D <level>"},
  153.  {1,"       Set debug level."},
  154. #endif
  155.  {0,"  -e   Output tag file for use with Emacs."},
  156.  {1,"  -f <name>"},
  157.  {1,"       Output tags to the specified file (default is "tags"; or "TAGS""},
  158.  {1,"       if -e is specified). If specified as "-", tags are written to"},
  159.  {1,"       standard output."},
  160.  {0,"  -F   Use forward searching patterns (/.../) (default)."},
  161.  {1,"  -h <list>"},
  162.  {1,"       Specifies a list of file extensions used for headers."},
  163.  {1,"       The default list is ".h.H.hh.hpp.hxx.h++"."},
  164.  {1,"  -i <types>"},
  165.  {1,"       Specifies the list of tag types to include in the output file."},
  166.  {1,"       "Types" is a group of letters designating the types of tags"},
  167.  {1,"       affected. Each letter or group of letters may be preceded by"},
  168.  {1,"       either a '+' sign (default, if omitted) to add it to those already"},
  169.  {1,"       included, a '-' sign to exclude it from the list (e.g. to exclude"},
  170.  {1,"       a default tag type), or an '=' sign to include its corresponding"},
  171.  {1,"       tag type at the exclusion of those not listed. A space separating"},
  172.  {1,"       the option letter from the list is optional. The following tag"},
  173.  {1,"       types are supported (default settings are on except as noted):"},
  174.  {1,"          c   class names"},
  175.  {1,"          d   macro definitions"},
  176.  {1,"          e   enumerators (values inside an enumeration)"},
  177.  {1,"          f   function (or method) definitions"},
  178.  {1,"          g   enumeration names"},
  179.  {1,"          i   interface names (Java only)"},
  180.  {1,"          m   data members [off]"},
  181.  {1,"          n   namespace names (C++ only)"},
  182.  {1,"          p   function prototypes [off]"},
  183.  {1,"          s   structure names"},
  184.  {1,"          t   typedefs"},
  185.  {1,"          u   union names"},
  186.  {1,"          v   variable definitions"},
  187.  {1,"          x   external variable declarations [off]"},
  188.  {1,"       In addition, the following modifiers are accepted:"},
  189.  {1,"          C   include extra, class-qualified member tag entries [off]"},
  190.  {1,"          F   include source filenames as tags [off]"},
  191.  {1,"          S   include static tags"},
  192.  {1,"  -I <list | file>"},
  193.  {1,"       A list of tokens to ignore is read from either the command line,"},
  194.  {1,"       or the specified file (if leading character is '.', '/', or '\')."},
  195.  {1,"       Particularly useful when a function definition or declaration"},
  196.  {1,"       contains some special macro before the parameter list."},
  197.  {1,"  -L <file>"},
  198.  {1,"       A list of source file names are read from the specified file."},
  199.  {1,"       If specified as "-", then standard input is read."},
  200.  {0,"  -n   Equivalent to --excmd=number."},
  201.  {0,"  -N   Equivalent to --excmd=pattern."},
  202.  {1,"  -o   Alternative for -f."},
  203.  {1,"  -p <path>"},
  204.  {1,"       Default path to use for all (relative path) filenames."},
  205. #ifdef RECURSE_SUPPORTED
  206.  {1,"  -R   Equivalent to --recurse=yes."},
  207. #else
  208.  {1,"  -R   Not supported on this platform."},
  209. #endif
  210.  {0,"  -u   Equivalent to --sort=no."},
  211.  {1,"  -x   Print a tabular cross reference file to standard output."},
  212.  {1,"  --append=[yes|no]"},
  213.  {1,"       Indicates whether tags should be appended to existing tag file"},
  214.  {1,"       (default=no)."},
  215.  {0,"  --excmd=number|pattern|mix"},
  216. #ifdef MACROS_USE_PATTERNS
  217.  {0,"       Uses the specified type of EX command to locate tags (default=pattern)."},
  218. #else
  219.  {0,"       Uses the specified type of EX command to locate tags (default=mix)."},
  220. #endif
  221.  {0,"  --format=level"},
  222. #if DEFAULT_FILE_FORMAT==1
  223.  {0,"       Forces output of specified tag file format (default=1)."},
  224. #else
  225.  {0,"       Forces output of specified tag file format (default=2)."},
  226. #endif
  227.  {1,"  --help"},
  228.  {1,"       Prints this option summary."},
  229.  {1,"  --if0=[yes|no]"},
  230.  {1,"       Indicates whether code within #if 0 conditional branches should"},
  231.  {1,"       be examined for tags (default=no)."},
  232.  {1,"  --lang=[c|c++|java]"},
  233.  {1,"       Forces specified language, disabling automatic selection."},
  234.  {1,"  --recurse=[yes|no]"},
  235. #ifdef RECURSE_SUPPORTED
  236.  {1,"       Recurse into directories supplied on command line (default=no)."},
  237. #else
  238.  {1,"       Not supported on this platform."},
  239. #endif
  240.  {0,"  --sort=[yes|no]"},
  241.  {0,"       Indicates whether tags should be sorted (default=yes)."},
  242.  {1,"  --totals=[yes|no]"},
  243.  {1,"       Prints statistics about source and tag files (default=no)."},
  244.  {1,"  --version"},
  245.  {1,"       Prints a version identifier to standard output."},
  246.  {1, NULL}
  247. };
  249. /*  Contains a set of strings describing the set of "features" compiled into
  250.  *  the code.
  251.  */
  252. static const char *const Features[] = {
  253. #ifdef DEBUG
  254.     "debug",
  255. #endif
  256. #ifdef WIN32
  257.     "win32",
  258. #endif
  259. #ifdef DJGPP
  260.     "msdos_32",
  261. #else
  262. # ifdef MSDOS
  263.     "msdos_16",
  264. # endif
  265. #endif
  266. #ifdef OS2
  267.     "os2",
  268. #endif
  269. #ifdef AMIGA
  270.     "amiga",
  271. #endif
  272. #ifndef EXTERNAL_SORT
  273.     "internal_sort",
  274. #endif
  275.     NULL
  276. };
  278. /*============================================================================
  279. =   Function prototypes
  280. ============================================================================*/
  281. static void printfFeatureList __ARGS((FILE *const where));
  282. static void printProgramIdentification __ARGS((FILE *const where));
  283. static void printInvocationDescription __ARGS((FILE *const where));
  284. static void printOptionDescriptions __ARGS((const optionDescription *const optDesc, FILE *const where));
  285. static void printHelp __ARGS((const optionDescription *const optDesc, FILE *const where));
  286. static char *readOptionArg __ARGS((const int option, char **const pArg, char *const *const argList, int *const pArgNum));
  287. static unsigned int countExtensions __ARGS((const char *const list));
  288. static const char *const *readExtensionList __ARGS((const char *const list));
  289. static void clearTagList __ARGS((void));
  290. static void applyTagInclusionList __ARGS((const char *const list));
  291. static char *saveString __ARGS((const char *const string));
  292. static void resizeIgnoreList __ARGS((void));
  293. static void saveIgnoreToken __ARGS((const char *const ignoreToken));
  294. static void readIgnoreList __ARGS((char *const list));
  295. static void readIgnoreListFromFile __ARGS((const char *const fileName));
  296. static void processHeaderListOption __ARGS((const int option, char **const argP, char *const *const argList, int *const argNumP));
  297. static void processIgnoreOption __ARGS((const int option, char **const argP, char *const *const argList, int *const argNumP));
  298. static boolean getBooleanOption __ARGS((const char *const optionName, const char *const parameter, const boolean defaultValue));
  299. static void processExcmdOption __ARGS((const char *const optionName, const char *const parameter));
  300. static void processFormatOption __ARGS((const char *const optionName, const char *const parameter));
  301. static langType getLangType __ARGS((const char *const name));
  302. static void processLangOption __ARGS((const char *const optionName, const char *const parameter));
  303. static void installLangMap __ARGS((char *const map));
  304. static void processLangMapOption __ARGS((const char *const optionName, const char *const parameter));
  305. static void processLongOption __ARGS((const char *const optionString));
  306. static void processCompoundOption __ARGS((const int option, char **const pArg, char *const *const argList, int *const pArgNum));
  307. static boolean processSimpleOption __ARGS((const int option));
  308. static void parseStringToArgs __ARGS((const char *const string, char *parsedBuffer, char **const argList, const unsigned int maxArgs));
  309. static unsigned int countStringWords __ARGS((const char *const string));
  310. static char **creatArgListForString __ARGS((const char *const string));
  312. /*============================================================================
  313. =   Function definitions
  314. ============================================================================*/
  316. static void printfFeatureList( where )
  317.     FILE *const where;
  318. {
  319.     int i;
  321.     for (i = 0 ; Features[i] != NULL ; ++i)
  322.     {
  323. if (i == 0)
  324.     fputs(" (", where);
  325. fprintf(where, "%s+%s", (i>0 ? ", " : ""), Features[i]);
  326.     }
  327.     fputs(i>0 ? ")" : "", where);
  328. }
  330. static void printProgramIdentification( where )
  331.     FILE *const where;
  332. {
  333.     fprintf(where, "%s %s, by %s", PROGRAM_NAME, PROGRAM_VERSION, AUTHOR_NAME);
  334.     printfFeatureList(where);
  335.     fputs("n", where);
  336. }
  338. static void printInvocationDescription( where )
  339.     FILE *const where;
  340. {
  341.     if (Option.startedAsEtags)
  342. fprintf(where, ETAGS_INVOCATION);
  343.     else
  344. fprintf(where, CTAGS_INVOCATION);
  345. }
  347. static void printOptionDescriptions( optDesc, where )
  348.     const optionDescription *const optDesc;
  349.     FILE *const where;
  350. {
  351.     int i;
  353.     for (i = 0 ; optDesc[i].description != NULL ; ++i)
  354.     {
  355. if (! Option.startedAsEtags || optDesc[i].usedByEtags)
  356. {
  357.     fputs(optDesc[i].description, where);
  358.     fputc('n', where);
  359. }
  360.     }
  361. }
  363. static void printHelp( optDesc, where )
  364.     const optionDescription *const optDesc;
  365.     FILE *const where;
  366. {
  368.     printProgramIdentification(where);
  369.     fputs("n", where);
  370.     printInvocationDescription(where);
  371.     fputs("n", where);
  372.     printOptionDescriptions(optDesc, where);
  373. }
  375. static char *readOptionArg( option, pArg, argList, pArgNum )
  376.     const int option;
  377.     char **const pArg;
  378.     char *const *const argList;
  379.     int *const pArgNum;
  380. {
  381.     char *list;
  383.     if ((*pArg)[0] != '')     /* does list immediately follow option? */
  384.     {
  385. list = *pArg;
  386. *pArg += strlen(*pArg);
  387.     }
  388.     else if ((list = argList[++(*pArgNum)]) == NULL) /* at least 1 more arg? */
  389. error(FATAL, "-%c: Parameter missing", option);
  391.     DebugStatement( if (debug(DEBUG_OPTION)) fputs(list, errout); )
  393.     return list;
  394. }
  396. /*  Reads a list of file extensions.
  397.  */
  398. static unsigned int countExtensions( list )
  399.     const char *const list;
  400. {
  401.     unsigned int count = 0;
  402.     const char *p;
  404.     /*  Increase count by one if list does not begin with a separator.
  405.      */
  406.     if (strchr(EXTENSION_SEPARATORS, list[0]) == NULL)
  407. ++count;
  409.     for (p = list  ;  *p != ''  ;  ++p)
  410.     {
  411. if (strchr(EXTENSION_SEPARATORS, *p) != NULL)
  412.     ++count;
  413.     }
  414.     return count + 1;
  415. }
  417. static const char *const *readExtensionList( list )
  418.     const char *const list;
  419. {
  420.     int extIndex = 0;
  421.     const char *extension;
  422.     const unsigned int numExtensions = countExtensions(list);
  423.     char *const extensionList  = (char *)malloc(strlen(list) + 1);
  424.     const char **const extensionArray = (const char **)malloc(
  425. (numExtensions + 1) * sizeof(char *));
  427.     if (extensionList == NULL  ||  extensionArray == NULL)
  428. error(FATAL | PERROR, "");
  429.     strcpy(extensionList, list);
  430.     extension = strtok(extensionList, EXTENSION_SEPARATORS);
  431.     while (extension != NULL)
  432.     {
  433. DebugStatement( if (debug(DEBUG_STATUS))
  434.     printf("extension: %sn", extension); )
  435. extensionArray[extIndex++] = extension;
  436. extension = strtok(NULL, EXTENSION_SEPARATORS);
  437.     }
  438.     extensionArray[extIndex] = NULL;
  440.     return extensionArray;
  441. }
  443. static void clearTagList()
  444. {
  445.     Option.include.classNames = FALSE; /* -ic */
  446.     Option.include.defines = FALSE; /* -id */
  447.     Option.include.enumerators = FALSE; /* -ie */
  448.     Option.include.functions = FALSE; /* -if */
  449.     Option.include.enumNames = FALSE; /* -ig */
  450.     Option.include.interfaceNames = FALSE; /* -ii */
  451.     Option.include.members = FALSE; /* -im */
  452.     Option.include.namespaceNames = FALSE; /* -in */
  453.     Option.include.prototypes = FALSE; /* -ip */
  454.     Option.include.structNames = FALSE; /* -is */
  455.     Option.include.typedefs = FALSE; /* -it */
  456.     Option.include.unionNames = FALSE; /* -iu */
  457.     Option.include.variables = FALSE; /* -iC */
  458.     Option.include.sourceFiles = FALSE; /* -iF */
  459.     Option.include.statics = FALSE; /* -iS */
  460. }
  462. static void applyTagInclusionList( list )
  463.     const char *const list;
  464. {
  465.     boolean mode = TRUE; /* default mode is to add following types */
  466.     const char *p;
  468.     for (p = list  ;  *p != ''  ;  ++p)
  469. switch (*p)
  470. {
  471.     case '=': /* exclusive mode; ONLY types following are included */
  472. clearTagList();
  473. mode = TRUE;
  474. break;
  476.     case '+': mode = TRUE; break; /* include types following */
  477.     case '-': mode = FALSE; break; /* exclude types following */
  479.     case 'c': Option.include.classNames = mode; break;
  480.     case 'd': Option.include.defines = mode; break;
  481.     case 'e': Option.include.enumerators = mode; break;
  482.     case 'f': Option.include.functions = mode; break;
  483.     case 'g': Option.include.enumNames = mode; break;
  484.     case 'i': Option.include.interfaceNames = mode; break;
  485.     case 'm': Option.include.members = mode; break;
  486.     case 'n': Option.include.namespaceNames = mode; break;
  487.     case 'p': Option.include.prototypes = mode; break;
  488.     case 's': Option.include.structNames = mode; break;
  489.     case 't': Option.include.typedefs = mode; break;
  490.     case 'u': Option.include.unionNames = mode; break;
  491.     case 'v': Option.include.variables = mode; break;
  492.     case 'x': Option.include.externVars = mode; break;
  493.     case 'C': Option.include.classPrefix = mode; break;
  494.     case 'F': Option.include.sourceFiles = mode; break;
  495.     case 'S': Option.include.statics = mode; break;
  497.     default: error(FATAL, "-i: Invalid tag option '%c'", *p); break;
  498. }
  499. }
  501. /*  Determines whether or not "name" should be ignored, per the ignore list.
  502.  */
  503. extern boolean isIgnoreToken( name )
  504.     const char *const name;
  505. {
  506.     boolean ignore = FALSE;
  507.     unsigned int i;
  509.     for (i = 0  ;  i < Option.ignore.count ; ++i)
  510.     {
  511. if (strcmp(Option.ignore.list[i], name) == 0)
  512. {
  513.     ignore = TRUE;
  514.     break;
  515. }
  516.     }
  517.     return ignore;
  518. }
  520. static char *saveString( string )
  521.     const char *const string;
  522. {
  523.     char *const here = (char *)malloc(strlen(string) + 1);
  525.     if (here == NULL)
  526. error(FATAL | PERROR, "");
  527.     strcpy(here, string);
  529.     return here;
  530. }
  532. static void resizeIgnoreList()
  533. {
  534.     size_t newSize;
  536.     Option.ignore.max = Option.ignore.count + 10;
  537.     newSize = Option.ignore.max * sizeof(char *);
  539.     if (Option.ignore.list == NULL)
  540. Option.ignore.list = (char **)malloc(newSize);
  541.     else
  542. Option.ignore.list = (char **)realloc(Option.ignore.list, newSize);
  543.     if (Option.ignore.list == NULL)
  544. error(FATAL | PERROR, "cannot create ignore list");
  545. }
  547. static void saveIgnoreToken( ignoreToken )
  548.     const char *const ignoreToken;
  549. {
  550.     const unsigned int i = Option.ignore.count++;
  552.     if (Option.ignore.count > Option.ignore.max)
  553. resizeIgnoreList();
  554.     Option.ignore.list[i] = saveString(ignoreToken);
  555.     DebugStatement( if (debug(DEBUG_STATUS))
  556. printf("ignore token: %sn", ignoreToken); )
  557. }
  559. static void readIgnoreList( list )
  560.     char *const list;
  561. {
  562.     const char *token = strtok(list, IGNORE_SEPARATORS);
  564.     while (token != NULL)
  565.     {
  566. saveIgnoreToken(token);
  567. token = strtok(NULL, IGNORE_SEPARATORS);
  568.     }
  569. }
  571. static void readIgnoreListFromFile( fileName )
  572.     const char *const fileName;
  573. {
  574.     FILE *const fp = fopen(fileName, "r");
  576.     if (fp == NULL)
  577. error(FATAL | PERROR, "cannot open "%s"", fileName);
  578.     else
  579.     {
  580. char ignoreToken[MaxNameLength];
  582. while (fscanf(fp, "%255s", ignoreToken) == 1)
  583.     saveIgnoreToken(ignoreToken);
  584.     }
  585. }
  587. extern void freeIgnoreList()
  588. {
  589.     while (Option.ignore.count > 0)
  590. free(Option.ignore.list[--Option.ignore.count]);
  592.     if (Option.ignore.list != NULL)
  593. free(Option.ignore.list);
  595.     Option.ignore.list = NULL;
  596.     Option.ignore.max = 0;
  597. }
  599. static void processHeaderListOption( option, argP, argList, argNumP )
  600.     const int option;
  601.     char **const argP;
  602.     char *const *const argList;
  603.     int *const argNumP;
  604. {
  605.     char *const list = readOptionArg(option, argP, argList, argNumP);
  607.     /*  Check to make sure that the user did not enter "ctags -h *.c"
  608.      *  by testing to see if the list is a filename that exists.
  609.      */
  610.     if (doesFileExist(list) == 0)
  611. error(FATAL, "-h: Invalid list");
  612.     else
  613.     {
  614. DebugStatement( if (debug(DEBUG_STATUS))
  615.     printf("Header Extensions:n"); )
  616. Option.headerExt = readExtensionList(list);
  617.     }
  618. }
  620. static void processIgnoreOption( option, argP, argList, argNumP )
  621.     const int option;
  622.     char **const argP;
  623.     char *const *const argList;
  624.     int *const argNumP;
  625. {
  626.     char *const list = readOptionArg(option, argP, argList, argNumP);
  628.     if (strchr("./\", list[0]) != NULL)
  629. readIgnoreListFromFile(list);
  630.     else
  631. readIgnoreList(list);
  632. }
  634. static boolean getBooleanOption( optionName, parameter, defaultValue )
  635.     const char *const optionName;
  636.     const char *const parameter;
  637.     const boolean defaultValue;
  638. {
  639.     boolean selection = defaultValue;
  641.     if (parameter[0] == '')
  642. selection = defaultValue;
  643.     else if (strcmp(parameter, "0") == 0  ||  strcmp(parameter, "no") == 0)
  644. selection = FALSE;
  645.     else if (strcmp(parameter, "1") == 0  ||  strcmp(parameter, "yes") == 0)
  646. selection = TRUE;
  647.     else
  648. error(FATAL, "Invalid value for option --%s", optionName);
  650.     return selection;
  651. }
  653. static void processExcmdOption( optionName, parameter )
  654.     const char *const optionName;
  655.     const char *const parameter;
  656. {
  657.     switch (*parameter)
  658.     {
  659. case 'm': Option.locate = EX_MIX; break;
  660. case 'n': Option.locate = EX_LINENUM; break;
  661. case 'p': Option.locate = EX_PATTERN; break;
  662. default:
  663.     error(FATAL, "Invalid value for option --%s", optionName);
  664.     break;
  665.     }
  666. }
  668. static void processFormatOption( optionName, parameter )
  669.     const char *const optionName;
  670.     const char *const parameter;
  671. {
  672.     unsigned int format;
  674.     if (sscanf(parameter, "%u", &format) < 1)
  675. error(FATAL, "Missing or invalid value for "--%s" option",optionName);
  676.     else if (format <= (unsigned int)MaxSupportedTagFormat)
  677. Option.tagFileFormat = format;
  678.     else
  679. error(FATAL, "Unsupported value for "--%s" option", optionName);
  680. }
  682. extern const char *getLanguageName( language )
  683.     const langType language;
  684. {
  685.     static const char *const names[] = { "c", "c++", "java" };
  687.     DebugStatement( if (sizeof(names)/sizeof(names[0]) != LANG_COUNT)
  688. error(FATAL, "LangNames array not consistent with LANG enumeration"); )
  690.     return names[(int)language];
  691. }
  693. extern boolean strequiv( s1, s2 )
  694.     const char *s1;
  695.     const char *s2;
  696. {
  697.     boolean equivalent;
  699.     if (strcmp(s1, s2) == 0)
  700. equivalent = TRUE;
  701.     else
  702.     {
  703. equivalent = TRUE;
  704. do
  705. {
  706.     if (toupper(*s1) != toupper(*s2))
  707.     {
  708. equivalent = FALSE;
  709. break;
  710.     }
  711. } while (*s1++ != ''  &&  *s2++ != '');
  712.     }
  713.     return equivalent;
  714. }
  716. static langType getLangType( name )
  717.     const char *const name;
  718. {
  719.     unsigned int i;
  720.     langType language = LANG_IGNORE;
  722.     for (i = 0  ;  i < LANG_COUNT  ;  ++i)
  723.     {
  724.          if (strequiv(name, getLanguageName((langType)i)))
  725.  {
  726.     language = (langType)i;
  727.     break;
  728.  }
  729.     }
  730.     return language;
  731. }
  733. static void processLangOption( optionName, parameter )
  734.     const char *const optionName;
  735.     const char *const parameter;
  736. {
  737.     const langType language = getLangType(parameter);
  739.     if (language == LANG_IGNORE)
  740. error(FATAL, "Invalid value for option --%s", optionName);
  741.     else
  742. Option.language = language;
  743. }
  745. static void installLangMap( map )
  746.     char *const map;
  747. {
  748.     char *const separator = strchr(map, ':');
  750.     if (separator != NULL)
  751.     {
  752. langType language;
  754. *separator = '';
  755. language = getLangType(map);
  756. if (language == LANG_IGNORE)
  757.     error(FATAL, "Invalid language specified for option --langmap");
  758. DebugStatement( if (debug(DEBUG_STATUS))
  759.     printf("%s map:n", map); )
  760. Option.langMap[(int)language] = readExtensionList(separator + 1);
  761.     }
  762. }
  764. static void processLangMapOption( optionName, parameter )
  765.     const char *const __unused__ optionName;
  766.     const char *const parameter;
  767. {
  768.     char *const maps = (char *)malloc(strlen(parameter) + 1);
  769.     char *map = maps;
  771.     if (maps == NULL)
  772. error(FATAL | PERROR, "");
  773.     strcpy(maps, parameter);
  775.     DebugStatement( if (debug(DEBUG_STATUS))
  776. printf("Language-extension maps:n"); )
  777.     while (map != NULL)
  778.     {
  779. char *end = strchr(parameter, ',');
  781. if (end != NULL)
  782.     *end = '';
  783. installLangMap(map);
  784. if (end != NULL)
  785.     map = end + 1;
  786. else
  787.     map = NULL;
  788.     }
  789.     free(maps);
  790. }
  792. static void processLongOption( optionString )
  793.     const char *const optionString;
  794. {
  795.     enum { MaxOptionName = 10 };
  796.     char optionName[MaxOptionName + 1];
  797.     const char *const equal = strchr(optionString, '=');
  798.     const char *parameter = (equal == NULL) ? "" : equal + 1;
  799.     const size_t optionLength = (equal == NULL) ? strlen(optionString) :
  800.        (equal - optionString);
  802.     DebugStatement( if (debug(DEBUG_OPTION))
  803. fprintf(errout, "Option: --%sn", optionString); )
  805.     strncpy(optionName, optionString, optionLength);
  806.     if (optionLength < (size_t)MaxOptionName)
  807. optionName[optionLength] = '';
  808.     else
  809. optionName[(size_t)MaxOptionName] = '';
  811. #define isOption(string) (strcmp(optionName, string) == 0)
  812.     if (isOption("append"))
  813. Option.append = getBooleanOption(optionName, parameter, TRUE);
  814.     else if (isOption("excmd"))
  815. processExcmdOption(optionName, parameter);
  816.     else if (isOption("format"))
  817. processFormatOption(optionName, parameter);
  818.     else if (isOption("help"))
  819. { printHelp(LongOptionDescription, stdout); exit(0); }
  820.     else if (isOption("if0"))
  821. Option.if0 = getBooleanOption(optionName, parameter, TRUE);
  822.     else if (isOption("lang"))
  823. processLangOption(optionName, parameter);
  824.     else if (isOption("langmap"))
  825. processLangMapOption(optionName, parameter);
  826.     else if (isOption("recurse"))
  827. #ifdef RECURSE_SUPPORTED
  828. Option.recurse = getBooleanOption(optionName, parameter, TRUE);
  829. #else
  830. error(FATAL, "--%s option not supported on this host", optionName);
  831. #endif
  832.     else if (isOption("sort"))
  833. Option.sorted = getBooleanOption(optionName, parameter, TRUE);
  834.     else if (isOption("totals"))
  835. Option.printTotals = getBooleanOption(optionName, parameter, TRUE);
  836.     else if (isOption("version"))
  837.     {
  838. printProgramIdentification(stdout);
  839. exit(0);
  840.     }
  841.     else
  842. error(FATAL, "Unknown option: --%s", optionName);
  843. #undef isOption
  844. }
  846. static void processCompoundOption( option, pArg, argList, pArgNum )
  847.     const int option;
  848.     char **const pArg;
  849.     char *const *const argList;
  850.     int *const pArgNum;
  851. {
  852.     char *param;
  854.     DebugStatement( if (debug(DEBUG_OPTION) && option != '-')
  855. fprintf(errout, "Option: -%c ", option); )
  856.     switch (option)
  857.     {
  858.     /* Options requiring parameters.
  859.      */
  860.     case 'f':
  861.     case 'o': Option.tagFileName=readOptionArg(option, pArg, argList,pArgNum);
  862. break;
  863.     case 'h': processHeaderListOption(option, pArg, argList, pArgNum);
  864. break;
  865.     case 'i': param = readOptionArg(option, pArg, argList, pArgNum);
  866. applyTagInclusionList(param);
  867. break;
  868.     case 'I': processIgnoreOption(option, pArg, argList, pArgNum);
  869. break;
  870.     case 'L': Option.fileList = readOptionArg(option, pArg, argList, pArgNum);
  871. break;
  872.     case 'p': Option.path = readOptionArg(option, pArg, argList, pArgNum);
  873. break;
  874. #ifdef DEBUG
  875.     case 'D': param = readOptionArg(option, pArg, argList, pArgNum);
  876. Option.debugLevel = atoi(param);
  877. break;
  878.     case 'b': param = readOptionArg(option, pArg, argList, pArgNum);
  879. if (atol(param) < 0)
  880.     error(FATAL, "-%c: Invalid line number", option);
  881. Option.breakLine = atol(param);
  882. break;
  883. #endif
  884.     default: error(FATAL, "Unknown option: -%c", option); break;
  885.     }
  886.     DebugStatement( if (debug(DEBUG_OPTION)) fputs("n", errout); )
  887. }
  889. static boolean processSimpleOption( option )
  890.     const int option;
  891. {
  892.     boolean handled = TRUE;
  894.     switch (option)
  895.     {
  896. case 'a': Option.append = TRUE; break;
  897. case 'B': Option.backward = TRUE; break;
  898. case 'e': Option.etags = TRUE;
  899. Option.sorted = FALSE; break;
  900. case 'F': Option.backward = FALSE; break;
  901. case 'n': Option.locate = EX_LINENUM; break;
  902. case 'N': Option.locate = EX_PATTERN; break;
  903. case 'R':
  904. #ifdef RECURSE_SUPPORTED
  905. Option.recurse = TRUE; break;
  906. #else
  907. error(FATAL, "-R option not supported on this host");
  908. #endif
  909. case 'u': Option.sorted = FALSE; break;
  910. case 'w':
  911. case 'W': break;
  912. case 'x': Option.xref = TRUE; break;
  914. case '?': printHelp(LongOptionDescription, stdout);
  915. exit(0);
  917. default: handled = FALSE; break;
  918.     }
  920.     DebugStatement( if (handled && debug(DEBUG_OPTION))
  921. fprintf(errout, "Option: -%cn", option); )
  923.     return handled;
  924. }
  926. extern char *const *parseOptions( argList )
  927.     char *const *const argList;
  928. {
  929.     int argNum;
  931.     for (argNum = 0  ;  argList[argNum] != NULL  ;  ++argNum)
  932.     {
  933. char *arg = argList[argNum];
  934. int c;
  936. if (*arg++ != '-') /* stop at first non-option switch */
  937.     break;
  938. else if (*arg == '-') /* double dash: "--" */
  939.     processLongOption(arg + 1);
  940. else while ((c = *arg++) != '')
  941. {
  942.     if (! processSimpleOption(c))
  943. processCompoundOption(c, &arg, argList, &argNum);
  944. }
  945.     }
  946.     return &argList[argNum];
  947. }
  949. /*----------------------------------------------------------------------------
  950. *- Conversion of string into arg list
  951. ----------------------------------------------------------------------------*/
  953. static void parseStringToArgs( string, parsedBuffer, argList, maxArgs )
  954.     const char *const string;
  955.     char *parsedBuffer;
  956.     char **const argList;
  957.     const unsigned int maxArgs;
  958. {
  959.     boolean argInProgress = FALSE;
  960.     unsigned int count = 0;
  961.     const char *src;
  963.     for (src = string  ;  *src != ''  ;  ++src)
  964.     {
  965. if (*src == ' ') /* designates end of argument */
  966. {
  967.     if (argInProgress)
  968.     {
  969. *parsedBuffer++ = ''; /* terminate arg in progress */
  970. argInProgress = FALSE;
  971. if (count >= maxArgs)
  972.     break;
  973.     }
  974. }
  975. else
  976. {
  977.     if (! argInProgress)
  978.     {
  979. argInProgress = TRUE;
  980. argList[count++] = parsedBuffer; /* point to new arg */
  981.     }
  982.     if (*src == '\') /* next character is literal */
  983. ++src; /* skip over '\' */
  984.     *parsedBuffer++ = *src;
  985. }
  986.     }
  987.     *parsedBuffer = ''; /* null terminate last argument */
  988.     argList[count] = NULL; /* terminate list */
  989. }
  991. static unsigned int countStringWords( string )
  992.     const char *const string;
  993. {
  994.     const char *const whiteSpace = " tn";
  995.     const char *p = string;
  996.     unsigned int numWords = 0;
  998.     p += strspn(p, whiteSpace); /* skip over leading spaces */
  999.     while (*p != '')
  1000.     {
  1001. ++numWords;
  1002. p += strcspn(p, whiteSpace); /* skip to white space */
  1003. p += strspn(p, whiteSpace); /* skip to non-white space */
  1004.     }
  1005.     return numWords;
  1006. }
  1008. static char **creatArgListForString( string )
  1009.     const char *const string;
  1010. {
  1011.     const unsigned int numWords = countStringWords(string);
  1012.     char **argList = NULL;
  1014.     if (string != NULL  &&  string[0] != '')
  1015.     {
  1016. /*  We place the parsed string at the end of the memory block, past
  1017.  *  the bottom of the argument table.
  1018.  */
  1019. const size_t argListSize= (numWords + 1) * sizeof(char *);
  1020. const size_t blockSize = argListSize + strlen(string) + 1;
  1022. argList = (char **)malloc(blockSize);
  1023. if (argList != NULL)
  1024.     parseStringToArgs(string, (char *)argList + argListSize,
  1025.       argList, numWords);
  1026.     }
  1027.     return argList;
  1028. }
  1030. extern void *parseEnvironmentOptions()
  1031. {
  1032.     const char *envOptions = NULL;
  1033.     char **argList = NULL;
  1035.     if (Option.startedAsEtags)
  1036. envOptions = getenv(ETAGS_ENVIRONMENT);
  1037.     if (envOptions == NULL)
  1038. envOptions = getenv(CTAGS_ENVIRONMENT);
  1039.     if (envOptions != NULL  &&  envOptions[0] != '')
  1040.     {
  1041. argList = creatArgListForString(envOptions);
  1042. parseOptions(argList);
  1043.     }
  1044.     return argList;
  1045. }
  1047. /* vi:set tabstop=8 shiftwidth=4: */