Release-1.1.2-20000423

1 files changed, 729 insertions, 0 deletions

diff --git a/addon/configgen/config_templ.l b/addon/configgen/config_templ.l
new file mode 100644
index 0000000..a86156c
--- /dev/null
+++ b/addon/configgen/config_templ.l
@@ -0,0 +1,729 @@
+/******************************************************************************
+ *
+ * $Id$
+ *
+ * Copyright (C) 1997-2000 by Dimitri van Heesch.
+ *
+ * Permission to use, copy, modify, and distribute this software and its
+ * documentation under the terms of the GNU General Public License is hereby 
+ * granted. No representations are made about the suitability of this software 
+ * for any purpose. It is provided "as is" without express or implied warranty.
+ * See the GNU General Public License for more details.
+ *
+ */
+
+%{
+
+/*
+ *	includes
+ */
+#include <stdio.h>
+#include <stdlib.h>
+#include <iostream.h>
+#include <assert.h>
+#include <ctype.h>
+
+#include <qfileinfo.h>
+#include <qdir.h>
+#include <qtextstream.h>
+#include <qregexp.h>
+  
+#include "config.h"
+#include "version.h"
+  
+#ifdef DOXYWIZARD  
+#include <stdarg.h>
+void err(const char *fmt, ...)
+{
+  va_list args;
+  va_start(args, fmt);
+  vfprintf(stderr, fmt, args);
+  va_end(args); 
+}
+void warn(const char *fmt, ...)
+{
+  va_list args;
+  va_start(args, fmt);
+  vfprintf(stderr, fmt, args);
+  va_end(args);
+}
+#else
+#include "doxygen.h"
+#include "message.h"
+#include "pre.h"
+#include "version.h"
+#include "language.h"
+#endif
+
+#define YY_NEVER_INTERACTIVE 1
+#define YY_NO_UNPUT
+  
+/* -----------------------------------------------------------------
+ *
+ *	exported variables
+ */
+  
+#CONFIG Config
+
+/* -----------------------------------------------------------------
+ *
+ *	static variables
+ */
+  
+static const char * inputString;
+static int	    inputPosition;
+static int          yyLineNr;
+static QCString     tmpString;
+static QCString *   s=0;
+static bool    *    b=0;
+static QStrList *   l=0;
+static int          lastState;
+static QCString     elemStr;
+//static QCString     tabSizeString;
+//static QCString     colsInAlphaIndexString;
+#CONFIG Static
+
+/* -----------------------------------------------------------------
+ */
+#undef	YY_INPUT
+#define	YY_INPUT(buf,result,max_size) result=yyread(buf,max_size);
+
+static int yyread(char *buf,int max_size)
+{
+    int c=0;
+    while( c < max_size && inputString[inputPosition] )
+    {
+	*buf = inputString[inputPosition++] ;
+	c++; buf++;
+    }
+    return c;
+}
+
+%}
+
+%option noyywrap
+
+%x      Start
+%x	SkipComment
+%x      GetString
+%x      GetBool
+%x      GetStrList
+%x      GetQuotedString
+%x      GetEnvVar
+
+%%
+
+<*>\0x0d
+<Start,GetString,GetStrList,GetBool>"#"	{ BEGIN(SkipComment); }
+#CONFIG Rules
+<Start>[a-z_A-Z0-9]+			{ err("Warning: ignoring unknown tag `%s' at line %d\n",yytext,yyLineNr); }
+<GetString,GetBool>\n			{ yyLineNr++; BEGIN(Start); }
+<GetStrList>\n				{ 
+  					  yyLineNr++; 
+					  if (!elemStr.isEmpty())
+					  {
+					    //printf("elemStr1=`%s'\n",elemStr.data());
+					    l->append(elemStr);
+					  }
+					  BEGIN(Start); 
+					}
+<GetStrList>[ \t]+			{
+  				          if (!elemStr.isEmpty())
+					  {
+					    //printf("elemStr2=`%s'\n",elemStr.data());
+  					    l->append(elemStr);
+					  }
+					  elemStr.resize(0);
+  					}
+<GetString>[^ \"\t\r\n]+		{ (*s)+=yytext; }
+<GetString,GetStrList>"\""		{ lastState=YY_START;
+  					  BEGIN(GetQuotedString); 
+                                          tmpString.resize(0); 
+					}
+  /*
+<GetString,GetStrList,GetQuotedString>"\$\("	{
+  				          //printf(">> Enter env\n"); 
+  					  lastEnvState=YY_START;
+  					  BEGIN(GetEnvVar);
+  					}
+<GetEnvVar>[a-z_A-Z0-9]+")"		{
+  					  yytext[yyleng-1]='\0';
+					  const char *env=getenv(yytext);
+					  int i;
+					  int l=strlen(env);
+					  //printf("env name=`%s' text=`%s'\n",yytext,env);
+					  for (i=l-1;i>=0;i--) unput(env[i]);
+					  BEGIN(lastEnvState);
+  					}
+  */
+<GetQuotedString>"\""|"\n" 		{ 
+  					  //printf("Quoted String = `%s'\n",tmpString.data());
+  					  if (lastState==GetString)
+					    (*s)+=tmpString;
+					  else
+					    elemStr+=tmpString;
+					  if (*yytext=='\n')
+					  {
+					    err("Warning: Missing end quote (\") on line %d\n",yyLineNr);
+					    yyLineNr++;
+					  }
+					  BEGIN(lastState);
+  					}
+<GetQuotedString>"\\\""			{
+  					  tmpString+='"';
+  					}
+<GetQuotedString>.			{ tmpString+=*yytext; }
+<GetBool>[a-zA-Z]+			{ 
+  					  QCString bs=yytext; 
+  					  bs=bs.upper();
+  					  if (bs=="YES")
+					    *b=TRUE;
+					  else if (bs=="NO")
+					    *b=FALSE;
+					  else 
+					  {
+					    *b=FALSE; 
+					    warn("Warning: Invalid value `%s' for "
+						 "boolean tag in line %d; use YES or NO\n",
+						 bs.data(),yyLineNr);
+					  }
+					}
+<GetStrList>[^ \#\"\t\r\n]+		{
+  					  elemStr+=yytext;
+  					}
+<SkipComment>\n				{ yyLineNr++; BEGIN(Start); }
+<SkipComment>\\[ \r\t]*\n		{ yyLineNr++; BEGIN(Start); }
+<*>\\[ \r\t]*\n				{ yyLineNr++; }
+<*>.					
+<*>\n					{ yyLineNr++ ; }
+
+%%
+
+/*@ ----------------------------------------------------------------------------
+ */
+
+
+void dumpConfig()
+{
+#CONFIG Dump
+}
+
+void Config::init()
+{
+#CONFIG Init
+}
+
+static void writeBoolValue(QTextStream &t,bool v)
+{
+  if (v) t << "YES"; else t << "NO";
+}
+
+static void writeIntValue(QTextStream &t,int i)
+{
+  t << i;
+}
+
+static void writeStringValue(QTextStream &t,QCString &s)
+{
+  const char *p=s.data();
+  char c;
+  bool hasBlanks=FALSE;
+  if (p)
+  {
+    while ((c=*p++)!=0 && !hasBlanks) hasBlanks = (c==' ' || c=='\n' || c=='\t');
+    if (hasBlanks) 
+      t << "\"" << s << "\"";
+    else
+      t << s;
+  }
+}
+
+static void writeStringList(QTextStream &t,QStrList &l)
+{
+  const char *p = l.first();
+  bool first=TRUE;
+  while (p)
+  {
+    char c;
+    const char *s=p;
+    bool hasBlanks=FALSE;
+    while ((c=*p++)!=0 && !hasBlanks) hasBlanks = (c==' ' || c=='\n' || c=='\t');
+    if (!first) t << "                       ";
+    first=FALSE;
+    if (hasBlanks) t << "\"" << s << "\""; else t << s;
+    p = l.next();
+    if (p) t << " \\" << endl;
+  }
+}
+
+void writeTemplateConfig(QFile *f,bool sl)
+{
+  QTextStream t(f);
+#ifdef DOXYWIZARD
+  t << "# Doxygen configuration generated by Doxywizard version " << versionString << endl;
+#else
+  t << "# Doxyfile " << versionString << endl << endl;
+#endif
+  if (!sl)
+  {
+    t << "# This file describes the settings to be used by doxygen for a project\n";
+    t << "#\n";
+    t << "# All text after a hash (#) is considered a comment and will be ignored\n";
+    t << "# The format is:\n";
+    t << "#       TAG = value [value, ...]\n";
+    t << "# Values that contain spaces should be placed between quotes (\" \")\n";
+  }
+#CONFIG Template
+}
+
+void configStrToVal()
+{
+  if (tabSizeString.isEmpty())
+  {
+    Config::tabSize=8;
+  }
+  else
+  {
+    bool ok;
+    int ts = tabSizeString.toInt(&ok);
+    if (!ok || ts<1 || ts>16)
+    {
+      warn("Warning: argument of TAB_SIZE is not a valid number, using tab size of 8 spaces!\n");
+      ts=8;
+    }
+    Config::tabSize = ts;
+  }
+  
+  if (colsInAlphaIndexString.isEmpty())
+  {
+    Config::colsInAlphaIndex=5;
+  }
+  else
+  {
+    bool ok;
+    int cols = colsInAlphaIndexString.toInt(&ok);
+    if (!ok || cols<1 || cols>20)
+    {
+      warn("Warning: argument of COLS_IN_ALPHA_INDEX is not a valid number in the range [1..20]!\n"
+	   "Using the default of 5 columns!\n");
+      cols = 5;
+    }
+    Config::colsInAlphaIndex=cols;
+  }
+}
+
+static void substEnvVarsInString(QCString &s)
+{
+  QRegExp re("\\$([a-z_A-Z0-9]+)");
+  int p=0;
+  int i,l;
+  //printf("substEnvVarInString(%s) start\n",s.data());
+  while ((i=re.match(s,p,&l))!=-1)
+  {
+    //printf("Found environment var s.mid(%d,%d)=`%s'\n",i+2,l-3,s.mid(i+2,l-3).data());
+    QCString env=getenv(s.mid(i+2,l-3));
+    substEnvVarsInString(env); // recursively expand variables if needed.
+    s = s.left(i)+env+s.right(s.length()-i-l);
+    p=i+l;
+  }
+  //printf("substEnvVarInString(%s) end\n",s.data());
+}
+
+static void substEnvVarsInStrList(QStrList &sl)
+{
+  char *s = sl.first();
+  while (s)
+  {
+    QCString result(s);
+    substEnvVarsInString(result);
+    
+    int l=result.length();
+    int i,p=0;
+    // skip spaces
+    // search for a "word"
+    for (i=0;i<l;i++)
+    {
+      char c;
+      // skip until start of new word
+      for (;i<l && ((c=result.at(i))==' ' || c=='\t');i++) 
+      p=i; // p marks the start index of the word
+      // skip until end of a word
+      for (;i<l && ((c=result.at(i))!=' ' && c!='\t' && c!='"');i++);
+      if (i<l) // not at the end of the string
+      {
+	if (c=='"') // word within quotes
+	{
+	  p=i+1;
+	  for (i++;i<l;i++)
+	  {
+	    c=result.at(i);
+	    if (c=='"') // end quote
+	    {
+	      // replace the string in the list and go to the next item.
+	      sl.insert(sl.at(),result.mid(p,i-p)); // insert new item before current item.
+	      sl.next();                 // current item is now the old item
+	      p=i+1;
+	      break; 
+	    }
+	    else if (c=='\\') // skip escaped stuff
+	    {
+	      i++;
+	    }
+	  }
+	}
+	else if (c==' ' || c=='\t') // separator
+	{
+	  // replace the string in the list and go to the next item.
+	  sl.insert(sl.at(),result.mid(p,i-p)); // insert new item before current item.
+	  sl.next();                 // current item is now the old item
+	  p=i+1;
+	}
+      }
+    }
+    if (p!=l) // add the leftover as a string
+    {
+      // replace the string in the list and go to the next item.
+      sl.insert(sl.at(),result.right(l-p)); // insert new item before current item.
+      sl.next();                 // current item is now the old item
+    }
+    
+    // remove the old unexpanded string from the list
+    i=sl.at();
+    sl.remove(); // current item index changes if the last element is removed.
+    if (sl.at()==i)     // not last item
+      s = sl.current();
+    else                // just removed last item
+      s = 0;
+  }
+}
+
+
+void substituteEnvironmentVars()
+{
+#CONFIG Substenv
+}
+
+void checkConfig()
+{
+  //if (!projectName.isEmpty())
+  //{
+  //  projectName[0]=toupper(projectName[0]);
+  //}
+
+
+  // set default man page extension if non is given by the user
+  if (Config::manExtension.isEmpty())
+  {
+    Config::manExtension=".3";
+  }
+  
+  Config::paperType = Config::paperType.lower().stripWhiteSpace(); 
+  if (Config::paperType.isEmpty())
+  {
+    Config::paperType = "a4wide";
+  }
+  if (Config::paperType!="a4" && Config::paperType!="a4wide" && Config::paperType!="letter" && 
+      Config::paperType!="legal" && Config::paperType!="executive")
+  {
+    err("Error: Unknown page type specified");
+  }
+  
+  Config::outputLanguage=Config::outputLanguage.stripWhiteSpace();
+  if (Config::outputLanguage.isEmpty())
+  {
+    Config::outputLanguage = "English";
+#ifndef DOXYWIZARD
+    setTranslator("English");
+#endif
+  }
+  else
+  {
+#ifndef DOXYWIZARD
+    if (!setTranslator(Config::outputLanguage))
+    {
+      err("Error: Output language %s not supported! Using English instead.\n",
+	  Config::outputLanguage.data());
+    }
+#endif
+  }
+  
+  // Test to see if output directory is valid
+  if (Config::outputDir.isEmpty()) 
+    Config::outputDir=QDir::currentDirPath();
+  else
+  {
+    QDir dir(Config::outputDir);
+    if (!dir.exists())
+    {
+      dir.setPath(QDir::currentDirPath());
+      if (!dir.mkdir(Config::outputDir))
+      {
+        err("Error: tag OUTPUT_DIRECTORY: Output directory `%s' does not "
+	    "exist and cannot be created\n",Config::outputDir.data());
+        exit(1);
+      }
+      else if (!Config::quietFlag)
+      {
+	err("Notice: Output directory `%s' does not exist. "
+	    "I have created it for you.\n", Config::outputDir.data());
+      }
+      dir.cd(Config::outputDir);
+    }
+    Config::outputDir=dir.absPath();
+  }
+
+  if (Config::htmlOutputDir.isEmpty() && Config::generateHtml)
+  {
+    Config::htmlOutputDir=Config::outputDir+"/html";
+  }
+  else if (Config::htmlOutputDir && Config::htmlOutputDir[0]!='/')
+  {
+    Config::htmlOutputDir.prepend(Config::outputDir+'/');
+  }
+  QDir htmlDir(Config::htmlOutputDir);
+  if (Config::generateHtml && !htmlDir.exists() && 
+      !htmlDir.mkdir(Config::htmlOutputDir))
+  {
+    err("Could not create output directory %s\n",Config::htmlOutputDir.data());
+    exit(1);
+  }
+  
+  if (Config::latexOutputDir.isEmpty() && Config::generateLatex)
+  {
+    Config::latexOutputDir=Config::outputDir+"/latex";
+  }
+  else if (Config::latexOutputDir && Config::latexOutputDir[0]!='/')
+  {
+    Config::latexOutputDir.prepend(Config::outputDir+'/');
+  }
+  QDir latexDir(Config::latexOutputDir);
+  if (Config::generateLatex && !latexDir.exists() && 
+      !latexDir.mkdir(Config::latexOutputDir))
+  {
+    err("Could not create output directory %s\n",Config::latexOutputDir.data());
+    exit(1);
+  }
+  
+  if (Config::rtfOutputDir.isEmpty() && Config::generateRTF)
+  {
+    Config::rtfOutputDir=Config::outputDir+"/rtf";
+  }
+  else if (Config::rtfOutputDir && Config::rtfOutputDir[0]!='/')
+  {
+    Config::rtfOutputDir.prepend(Config::outputDir+'/');
+  }
+  QDir rtfDir(Config::rtfOutputDir);
+  if (Config::generateRTF && !rtfDir.exists() && 
+      !rtfDir.mkdir(Config::rtfOutputDir))
+  {
+    err("Could not create output directory %s\n",Config::rtfOutputDir.data());
+    exit(1);
+  }
+
+  if (Config::manOutputDir.isEmpty() && Config::generateMan)
+  {
+    Config::manOutputDir=Config::outputDir+"/man";
+  }
+  else if (Config::manOutputDir && Config::manOutputDir[0]!='/')
+  {
+    Config::manOutputDir.prepend(Config::outputDir+'/');
+  }
+  QDir manDir(Config::manOutputDir);
+  if (Config::generateMan && !manDir.exists() && 
+      !manDir.mkdir(Config::manOutputDir))
+  {
+    err("Could not create output directory %s\n",Config::manOutputDir.data());
+    exit(1);
+  }
+  
+  // Test to see if HTML header is valid
+  if (!Config::headerFile.isEmpty())
+  {
+    QFileInfo fi(Config::headerFile);
+    if (!fi.exists())
+    {
+      err("Error: tag HTML_HEADER: header file `%s' "
+	  "does not exist\n",Config::headerFile.data());
+      exit(1);
+    }
+  }
+  // Test to see if HTML footer is valid
+  if (!Config::footerFile.isEmpty())
+  {
+    QFileInfo fi(Config::footerFile);
+    if (!fi.exists())
+    {
+      err("Error: tag HTML_FOOTER: footer file `%s' "
+	  "does not exist\n",Config::footerFile.data());
+      exit(1);
+    }
+  }
+  // Test to see if LaTeX header is valid
+  if (!Config::latexHeaderFile.isEmpty())
+  {
+    QFileInfo fi(Config::latexHeaderFile);
+    if (!fi.exists())
+    {
+      err("Error: tag LATEX_HEADER: header file `%s' "
+	  "does not exist\n",Config::latexHeaderFile.data());
+      exit(1);
+    }
+  }
+  // check include path
+  char *s=Config::includePath.first();
+  while (s)
+  {
+    QFileInfo fi(s);
+    if (!fi.exists()) err("Warning: tag INCLUDE_PATH: include path `%s' "
+	                  "does not exist\n",s);
+#ifndef DOXYWIZARD
+    addSearchDir(fi.absFilePath());
+#endif
+    s=Config::includePath.next();
+  }
+  // check input
+  if (Config::inputSources.count()==0)
+  {
+    err("Error: tag INPUT: no input files specified after the INPUT tag.\n");
+    exit(1);
+  }
+  else
+  {
+    s=Config::inputSources.first();
+    while (s)
+    {
+      QFileInfo fi(s);
+      if (!fi.exists())
+      {
+	err("Error: tag INPUT: input source `%s' does not exist\n",s);
+	exit(1);
+      }
+      s=Config::inputSources.next();
+    }
+  }
+
+  // add default pattern if needed
+  if (Config::filePatternList.count()==0)
+  {
+    Config::filePatternList.append("*");
+  }
+
+  // add default pattern if needed
+  if (Config::examplePatternList.count()==0)
+  {
+    Config::examplePatternList.append("*");
+  }
+
+  // add default pattern if needed
+  //if (Config::imagePatternList.count()==0)
+  //{
+  //  Config::imagePatternList.append("*");
+  //}
+  
+  // more checks needed if and only if the search engine is enabled.
+  if (Config::searchEngineFlag)
+  {
+    // check cgi name
+    if (Config::cgiName.isEmpty())
+    {
+      err("Error: tag CGI_NAME: no cgi script name after the CGI_NAME tag.\n");
+      exit(1);
+    }
+    // check cgi URL
+    if (Config::cgiURL.isEmpty())
+    {
+      err("Error: tag CGI_URL: no URL to cgi directory specified.\n");
+      exit(1);
+    }
+    else if (Config::cgiURL.left(7)!="http://")
+    {
+      err("Error: tag CGI_URL: URL to cgi directory is invalid (must "
+	  "start with http://).\n");
+      exit(1);
+    }
+    // check documentation URL
+    if (Config::docURL.isEmpty())
+    {
+      Config::docURL = Config::outputDir.copy().prepend("file://").append("html");
+    }
+    else if (Config::docURL.left(7)!="http://" && Config::docURL.left(7)!="file://")
+    {
+      err("Error: tag DOC_URL: URL to documentation is invalid or "
+	  "not absolute.\n"); 
+      exit(1);
+    }
+    // check absolute documentation path
+    if (Config::docAbsPath.isEmpty())
+    {
+      Config::docAbsPath = Config::outputDir+"/html"; 
+    }
+    else if (Config::docAbsPath[0]!='/' && Config::docAbsPath[1]!=':')
+    {
+      err("Error: tag DOC_ABSPATH: path is not absolute!\n");
+      exit(1);
+    }
+    // check path to doxysearch
+    if (Config::binAbsPath.isEmpty())
+    {
+      err("Error: tag BIN_ABSPATH: no absolute path to doxysearch "
+	  "specified.\n");
+      exit(1);
+    }
+    else if (Config::binAbsPath[0]!='/' && Config::binAbsPath[1]!=':')
+    {
+      err("Error: tag BIN_ABSPATH: path is not absolute!\n");
+      exit(1);
+    }
+
+    // check perl path
+    bool found=FALSE;
+    if (Config::perlPath.isEmpty())
+    {
+      QFileInfo fi;
+      fi.setFile("/usr/bin/perl");
+      if (fi.exists()) 
+      {
+	Config::perlPath="/usr/bin/perl";
+        found=TRUE;
+      }
+      else
+      {
+	fi.setFile("/usr/local/bin/perl");
+	if (fi.exists())
+        {
+  	  Config::perlPath="/usr/local/bin/perl";
+          found=TRUE;
+        }
+      }
+    }
+    if (!found)
+    {
+      QFileInfo fi(Config::perlPath);
+      if (!fi.exists())
+      {
+        warn("Warning: tag PERL_PATH: perl interpreter not found at default or"
+            "user specified (%s) location\n",
+        Config::perlPath.data());
+      }
+    }
+  }
+
+#if defined(_WIN32)
+  if (Config::haveDotFlag) _putenv("DOTFONTPATH=.");
+#endif
+  
+}
+
+void parseConfig(const QCString &s)
+{
+  inputString   = s;
+  inputPosition = 0;
+  yyLineNr      = 1;
+  configYYrestart( configYYin );
+  BEGIN( Start );
+  configYYlex();
+}
+
+//extern "C" { // some bogus code to keep the compiler happy
+//  int  configYYwrap() { return 1 ; }
+//}