From 6be86147f292b3178413bc644853ad80b620042e Mon Sep 17 00:00:00 2001
From: marha <marha@users.sourceforge.net>
Date: Fri, 19 Nov 2010 12:14:18 +0000
Subject: Reintegrate tools from trunk

---
 tools/mhmake/src/mhmakelexer.l | 910 -----------------------------------------
 1 file changed, 910 deletions(-)
 delete mode 100644 tools/mhmake/src/mhmakelexer.l

(limited to 'tools/mhmake/src/mhmakelexer.l')

diff --git a/tools/mhmake/src/mhmakelexer.l b/tools/mhmake/src/mhmakelexer.l
deleted file mode 100644
index eb27ab9ed..000000000
--- a/tools/mhmake/src/mhmakelexer.l
+++ /dev/null
@@ -1,910 +0,0 @@
-/*  This file is part of mhmake.
- *
- *  Copyright (C) 2001-2009 Marc Haesen
- *
- *  Mhmake is free software: you can redistribute it and/or modify
- *  it under the terms of the GNU General Public License as published by
- *  the Free Software Foundation, either version 3 of the License, or
- *  (at your option) any later version.
- *
- *  Mhmake is distributed in the hope that it will be useful,
- *  but WITHOUT ANY WARRANTY; without even the implied warranty of
- *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- *  GNU General Public License for more details.
- *
- *  You should have received a copy of the GNU General Public License
- *  along with Mhmake.  If not, see <http://www.gnu.org/licenses/>.
-*/
-
-/* $Rev$ */
-
-/* -------------- declaration section -------------- */
-%name mhmakelexer
-%header{
-#include "mhmakeparser.h"
-#include "fileinfo.h"
-#include "rule.h"
-#include "util.h"
-
-static uint32 LoadMakMd5(refptr<fileinfo> &Target)
-{
-  string FileName=Target->GetFullFileName();
-  FileName+=".md5_32";
-  FILE *pFile=fopen(FileName.c_str(),"rb");
-  if (!pFile)
-    return 0;
-  uint32 Md5_32=0;
-  fread(&Md5_32,sizeof(Md5_32),1,pFile);
-  fclose(pFile);
-  Target->SetCommandsMd5_32(Md5_32);
-  return Md5_32;
-}
-
-static void SaveMakMd5(refptr<fileinfo> &Target)
-{
-  string FileName=Target->GetFullFileName();
-  FileName+=".md5_32";
-  FILE *pFile=fopen(FileName.c_str(),"wb");
-  if (!pFile)
-  {
-    cout << "Error creating file "<<FileName<<endl;
-    throw(1);
-  }
-  Target->WriteMd5_32(pFile);
-  fclose(pFile);
-}
-
-%}
-
-%define LEX_PARAM TOKENVALUE &theValue
-%define MEMBERS public: \
-        struct INSTACK\
-        {\
-          YY_BUFFER_STATE m_BufferState;\
-          string m_FileName;\
-          int m_Line;\
-          INSTACK(YY_BUFFER_STATE BufferState,string FileName,int Line) :\
-            m_BufferState(BufferState),m_FileName(FileName),m_Line(Line) {}\
-        };\
-        int m_Line;\
-        int m_BraceIndent;\
-        int m_IndentSkip;\
-        iterstack<int> m_IndentStack;\
-        bool m_IgnoreIncludeError;\
-        string m_InputFileName; \
-        string m_curtoken; \
-        iterstack<INSTACK> m_IncludeStack; \
-        mhmakeparser *m_pParser;\
-        mhmakeparser *GetParser()\
-        {\
-          return m_pParser;\
-        }
-
-%define CONSTRUCTOR_INIT : m_Line(1), m_BraceIndent(0)
-
-/* -------------- rules section -------------- */
-%x INCLUDE IFDEF IF IFNDEF SKIPUNTILELSEORENDIF QUOTE MAKEEXPRES SINGLEQUOTE COMMANDPARSE
-%x IFEQ IFNEQ ERRORMACRO MESSAGEMACRO REPARSEMACRO LOAD_MAKEFILE
-
-%%
-
- /*---------------------------------------------------------------------------*/
-[ \t\r]*\n[ ][ \t]* |
-[ \t\r]*\n {
-  PRINTF(("%s %d: NEWLINE:\n",m_InputFileName.c_str(),m_Line));
-  m_Line++;
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-^[s\-]?include {
-  PRINTF(("%s %d: INCLUDE: ",m_InputFileName.c_str(),m_Line));
-  BEGIN(INCLUDE);
-  if (yytext[0]=='-' || yytext[0]=='s')
-    m_IgnoreIncludeError=true;
-  else
-    m_IgnoreIncludeError=false;
-  return mhmakeparser::INCLUDEMAK;  // Return a newline to be sure that the previous line is completely parse by yacc (in case it is a variable definition)
-}
-
- /*****************************************************************************/
-<INCLUDE>[ \t]*      /* eat the whitespace */
- /*---------------------------------------------------------------------------*/
-<INCLUDE>[^\r\n]+ { /* got the include file name */
-  mhmakeparser *pParser=GetParser();
-
-  string IncludeFileNames=pParser->ExpandExpression((const char*)yytext);
-  PRINTF(("%s -> %s\n",yytext,IncludeFileNames.c_str()));
-
-  const char *pTmp=IncludeFileNames.c_str();
-  while (*pTmp)
-  {
-    string IncludeFileName;
-    pTmp=NextItem(pTmp,IncludeFileName);
-    if (!IncludeFileName.empty())
-    {
-      PRINTF(("%s -> %s\n",yytext,IncludeFileName.c_str()));
-      refptr<fileinfo> pInclude=GetFileInfo(IncludeFileName,pParser->GetMakeDir());
-      /* Already build the include file, in case we already have a rule for it. */
-      if (pInclude->GetRule())
-      {
-        uint32 Md5_32=LoadMakMd5(pInclude);
-        pParser->BuildTarget(pInclude);
-        if (!pInclude->CompareMd5_32(Md5_32))
-          SaveMakMd5(pInclude);
-      }
-
-      pParser->AddIncludedMakefile(pInclude);
-
-      string strToInclude=pInclude->GetFullFileName();
-      FILE *pTmp = ::fopen(strToInclude.c_str(), "r" );
-      if ( ! pTmp )
-      {
-        if (!m_IgnoreIncludeError)
-        {
-          iterstack<INSTACK>::reverse_iterator StackIt=m_IncludeStack.rbegin();
-          while (StackIt!=m_IncludeStack.rend())
-          {
-            cout<<" in "<<StackIt->m_FileName<<" ("<<StackIt->m_Line<<")";
-            StackIt++;
-          }
-          cout<<endl;
-          cout<<"Warning error opening file "<<strToInclude<<" in "<<m_InputFileName<<" ("<<m_Line<<")\n";
-          pParser->IncludeAfterBuild(strToInclude);
-        }
-      }
-      else
-      {
-        m_IncludeStack.push(INSTACK(YY_mhmakelexer_CURRENT_BUFFER,m_InputFileName,m_Line));
-        m_Line=1;
-
-        yyin=pTmp;
-        m_InputFileName=strToInclude;
-
-        YY_mhmakelexer_SWITCH_TO_BUFFER(YY_mhmakelexer_CREATE_BUFFER( yyin, YY_BUF_SIZE ) );
-      }
-
-    }
-  }
-
-  BEGIN(INITIAL);
-}
-
- /*---------------------------------------------------------------------------*/
-load_makefile {
-  PRINTF(("%s %d: LOAD_MAKEFILE:\n",m_InputFileName.c_str(),m_Line));
-  BEGIN(LOAD_MAKEFILE);
-  return mhmakeparser::NEWLINE;  // Return a newline to be sure that the previous line is completely parse by yacc (in case it is a variable definition)
-}
-
- /*****************************************************************************/
-<LOAD_MAKEFILE>[^\r\n]+ {
-  string ListOfMakefiles=GetParser()->ExpandExpression((const char*)yytext);
-  PRINTF(("%s %d: LOAD_MAKEFILE: '%s'\n",m_InputFileName.c_str(),m_Line,ListOfMakefiles.c_str()));
-
-  const char *pTmp=ListOfMakefiles.c_str();
-  while (*pTmp)
-  {
-    string Item;
-    pTmp=NextCharItem(pTmp,Item,';');
-    if (Item.empty())
-    {
-      cerr << m_InputFileName << "("<<m_Line<<"): Error in load_makefile statement\n";
-      throw(1);
-    }
-    GetParser()->AddMakefileToMakefilesToLoad(Item);
-  }
-
-}
- /*---------------------------------------------------------------------------*/
-<LOAD_MAKEFILE>\r?\n {
-  m_Line++;
-  BEGIN(INITIAL);
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-[\ \t]+ {
-  PRINTF(("%s %d: SPACE:\n",m_InputFileName.c_str(),m_Line));
-  return mhmakeparser::SPACE;
-}
-
- /*---------------------------------------------------------------------------*/
-[\ t]*=[ \t]*\\[ \t\r]*\n[ \t]* {
-  PRINTF(("%s %d: EQUAL: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  m_Line++;
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::EQUAL;
-}
-
-[\ t]*=[ \t]* {
-  PRINTF(("%s %d: EQUAL: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::EQUAL;
-}
-
- /*---------------------------------------------------------------------------*/
-[\ t]*:=[ \t]*\\[ \t\r]*\n[ \t]* {
-  m_Line++;
-  PRINTF(("%s %d: IMEQUAL: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::IMEQUAL;
-}
-
-[ \t]*:=[ \t]* {
-  PRINTF(("%s %d: IMEQUAL: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::IMEQUAL;
-}
-
- /*---------------------------------------------------------------------------*/
-[\ t]*\?=[ \t]*\\[ \t\r]*\n[ \t]* {
-  m_Line++;
-  PRINTF(("%s %d: IMEQUAL: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::OPTEQUAL;
-}
-
-[ \t]*\?=[ \t]* {
-  PRINTF(("%s %d: IMEQUAL: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::OPTEQUAL;
-}
-
- /*---------------------------------------------------------------------------*/
-[\ t]*\+=[ \t]*\\[ \t\r]*\n[ \t]* {
-  PRINTF(("%s %d: PEQUAL: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  m_Line++;
-  return mhmakeparser::PEQUAL;
-}
-
-[ \t]*\+=[ \t]* {
-  PRINTF(("%s %d: PEQUAL: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::PEQUAL;
-}
-
- /*---------------------------------------------------------------------------*/
-[\ t]*;[ \t]*\\[ \t\r]*\n[ \t]* {
-  PRINTF(("%s %d: -SEMICOLON (NEWLINE): %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  m_curtoken=g_EmptyString;
-  m_Line++;
-  BEGIN(COMMANDPARSE);
-  return mhmakeparser::NEWLINE;
-}
-
-[ \t]*;[ \t]* {
-  PRINTF(("%s %d: -SEMICOLON (NEWLINE): %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  m_curtoken=g_EmptyString;
-  BEGIN(COMMANDPARSE);
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-[\ t]*::[ \t]*\\[ \t\r]*\n[ \t]* {
-  PRINTF(("%s %d: DOUBLECOLON: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  m_Line++;
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::DOUBLECOLON;
-}
-
-[ \t]*::[ \t]* {
-  PRINTF(("%s %d: DOUBLECOLON: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::DOUBLECOLON;
-}
-
- /*---------------------------------------------------------------------------*/
-[\ t]*:[ \t]*\\[ \t\r]*\n[ \t]* {
-  PRINTF(("%s %d: COLON: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  m_Line++;
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::COLON;
-}
-
-[ \t]*:[ \t]* {
-  PRINTF(("%s %d: COLON: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::COLON;
-}
-
- /*---------------------------------------------------------------------------*/
-, {
-  PRINTF(("%s %d: COMMA: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::COMMA;
-}
-
- /*---------------------------------------------------------------------------*/
-^[ \t]*endif {
-  if (m_IndentStack.size())
-  {
-    m_IndentStack.pop();
-    PRINTF(("%s %d: %s: depth %d\n",m_InputFileName.c_str(),m_Line,yytext,m_IndentStack.size()));
-  }
-  else
-  {
-     cerr << "Unexpected endif at line "<<m_Line<<" of "<<m_InputFileName.c_str()<<endl;
-     throw(1);
-  }
-}
-
- /*---------------------------------------------------------------------------*/
-^[ \t]*ifdef[ \t]*\\[ \t\r]*\n[ \t]* {
-  BEGIN(IFDEF);
-  m_Line++;
-  return mhmakeparser::NEWLINE;
-}
-
-^[ \t]*ifdef[ \t]+ {
-  BEGIN(IFDEF);
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-^[ \t]*if[ \t]*\\[ \t\r]*\n[ \t]* {
-  BEGIN(IF);
-  m_Line++;
-  return mhmakeparser::NEWLINE;
-}
-
-^[ \t]*if[ \t]+ {
-  BEGIN(IF);
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-^[ \t]*ifndef[ \t]*\\[ \t\r]*\n[ \t]* {
-  BEGIN(IFNDEF);
-  m_Line++;
-  return mhmakeparser::NEWLINE;
-}
-
-^[ \t]*ifndef[ \t]+ {
-  BEGIN(IFNDEF);
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-^[ \t]*ifeq[ \t]*\\[ \t\r]*\n[ \t]* {
-  BEGIN(IFEQ);
-  m_curtoken=g_EmptyString;
-  m_Line++;
-  return mhmakeparser::NEWLINE;
-}
-
-^[ \t]*ifeq[ \t]+ {
-  BEGIN(IFEQ);
-  m_curtoken=g_EmptyString;
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-^[ \t]*ifneq[ \t]*\\[ \t\r]*\n[ \t]* {
-  BEGIN(IFNEQ);
-  m_curtoken=g_EmptyString;
-  m_Line++;
-  return mhmakeparser::NEWLINE;
-}
-
-^[ \t]*ifneq[ \t]+ {
-  BEGIN(IFNEQ);
-  m_curtoken=g_EmptyString;
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-^[ \t]*else[ \t]* {
-  if (m_IndentStack.size() && (!m_IndentStack.top()))
-  {
-    PRINTF(("%s %d: skipping else: depth %d\n",m_InputFileName.c_str(),m_Line,m_IndentStack.size()));
-    m_IndentSkip=m_IndentStack.size();
-    m_IndentStack.top()=1;
-    BEGIN(SKIPUNTILELSEORENDIF);
-  }
-  else
-  {
-     cerr << "Unexpected else at line "<<m_Line<<" of file "<< m_InputFileName.c_str() << endl;
-     throw(1);
-  }
-}
-
- /*****************************************************************************/
-<IFEQ>\n {
-  unput( yytext[0] );
-  m_IndentStack.push(0);
-  if (GetParser()->IsEqual(m_curtoken))
-  {
-    PRINTF(("%s %d: Not Skipping ifeq %s: depth %d\n",m_InputFileName.c_str(),m_Line,m_curtoken.c_str(),m_IndentStack.size()));
-    BEGIN(INITIAL);
-  }
-  else
-  {
-    PRINTF(("%s %d: Skipping ifeq %s: depth %d\n",m_InputFileName.c_str(),m_Line,m_curtoken.c_str(),m_IndentStack.size()));
-    m_IndentSkip=m_IndentStack.size();
-    BEGIN(SKIPUNTILELSEORENDIF);
-  }
-}
-
-<IFEQ,IFNEQ>[ \t]*\\[ \t\r]*\n[ \t]* { m_Line++; m_curtoken += g_SpaceString;}
-
-<IFEQ,IFNEQ>\r    /* skip */
-
-<IFEQ,IFNEQ>[^\\\r\n]+ |
-<IFEQ,IFNEQ>\\                        { m_curtoken += (const char *)yytext; }
-
- /*****************************************************************************/
-<IFNEQ>\n {
-  unput( yytext[0] );
-  m_IndentStack.push(0);
-  if (!GetParser()->IsEqual(m_curtoken))
-  {
-    PRINTF(("%s %d: Not Skipping ifneq %s: depth %d\n",m_InputFileName.c_str(),m_Line,m_curtoken.c_str(),m_IndentStack.size()));
-    BEGIN(INITIAL);
-  }
-  else
-  {
-    PRINTF(("%s %d: Skipping ifneq %s: depth %d\n",m_InputFileName.c_str(),m_Line,m_curtoken.c_str(),m_IndentStack.size()));
-    m_IndentSkip=m_IndentStack.size();
-    BEGIN(SKIPUNTILELSEORENDIF);
-  }
-}
-
- /*****************************************************************************/
-<IF,IFDEF,IFNDEF>[ \t\r]*  /* skip */
-
- /*---------------------------------------------------------------------------*/
-<IF>[a-zA-Z0-9_]+ {
-  m_IndentStack.push(0);
-  string Val=GetParser()->ExpandVar((const char *)yytext);
-  if (Val.empty() || Val=="0")
-  {
-    PRINTF(("%s %d: Skipping if %s: depth %d\n",m_InputFileName.c_str(),m_Line,yytext,m_IndentStack.size()));
-    m_IndentSkip=m_IndentStack.size();
-    BEGIN(SKIPUNTILELSEORENDIF);
-  }
-  else
-  {
-    PRINTF(("%s %d: Not Skipping if %s: depth %d\n",m_InputFileName.c_str(),m_Line,yytext,m_IndentStack.size()));
-    BEGIN(INITIAL);
-  }
-}
-
- /*---------------------------------------------------------------------------*/
-<IFDEF>[a-zA-Z0-9_]+ {
-  m_IndentStack.push(0);
-  if (GetParser()->IsDefined((const char *)yytext))
-  {
-    PRINTF(("%s %d: Not Skipping ifdef %s: depth %d\n",m_InputFileName.c_str(),m_Line,yytext,m_IndentStack.size()));
-    BEGIN(INITIAL);
-  }
-  else
-  {
-    PRINTF(("%s %d: Skipping ifdef %s: depth %d\n",m_InputFileName.c_str(),m_Line,yytext,m_IndentStack.size()));
-    m_IndentSkip=m_IndentStack.size();
-    BEGIN(SKIPUNTILELSEORENDIF);
-  }
-}
-
- /*****************************************************************************/
-<IFNDEF>[a-zA-Z0-9_]+ {
-  m_IndentStack.push(0);
-  if (!GetParser()->IsDefined((const char *)yytext)) {
-    PRINTF(("%s %d: Not Skipping ifndef %s: depth %d\n",m_InputFileName.c_str(),m_Line,yytext,m_IndentStack.size()));
-    BEGIN(INITIAL);
-  }
-  else
-  {
-    PRINTF(("%s %d: Skipping ifndef %s: depth %d\n",m_InputFileName.c_str(),m_Line,yytext,m_IndentStack.size()));
-    m_IndentSkip=m_IndentStack.size();
-    BEGIN(SKIPUNTILELSEORENDIF);
-  }
-}
-
- /*****************************************************************************/
-<SKIPUNTILELSEORENDIF>\n[ ]*endif {
-  m_Line++;
-  if (!m_IndentStack.size())
-  {
-    cerr << "Unexpected endif at line "<<m_Line<<" of "<<m_InputFileName.c_str()<<endl;
-    throw(1);
-  }
-  else
-  {
-    m_IndentStack.pop();
-    PRINTF(("%s %d: endif: depth %d\n",m_InputFileName.c_str(),m_Line,m_IndentStack.size()));
-    if (m_IndentStack.size()==m_IndentSkip-1) BEGIN(INITIAL);
-  }
-}
-
- /*---------------------------------------------------------------------------*/
-<SKIPUNTILELSEORENDIF>\n[ ]*else {
-  m_Line++;
-  PRINTF(("%s %d: else: depth %d\n",m_InputFileName.c_str(),m_Line,m_IndentStack.size()));
-  if (m_IndentStack.top())
-  {
-    cerr << "Unexpected else at line "<<m_Line<<" of file "<< m_InputFileName.c_str() << endl;
-    throw(1);
-  }
-  m_IndentStack.top()=1;
-  if (m_IndentStack.size()==m_IndentSkip)
-  {
-    BEGIN(INITIAL);
-  }
-}
-
- /*---------------------------------------------------------------------------*/
-<SKIPUNTILELSEORENDIF>\n[ ]*if(def|ndef|eq|neq) {
-  m_Line++;
-  m_IndentStack.push(0);
-  PRINTF(("%s %d: %s: depth %d\n",m_InputFileName.c_str(),m_Line,yytext+1,m_IndentStack.size()));
-}
-
- /*---------------------------------------------------------------------------*/
-<SKIPUNTILELSEORENDIF>[a-zA-Z]+    /* skip */
- /*---------------------------------------------------------------------------*/
-<SKIPUNTILELSEORENDIF>[^a-zA-Z\n]+ /* skip */
- /*---------------------------------------------------------------------------*/
-<SKIPUNTILELSEORENDIF>\n[ ]*[a-zA-Z]+ m_Line++;
- /*---------------------------------------------------------------------------*/
-<SKIPUNTILELSEORENDIF>\n {
-  m_Line++;
-}
-
- /*---------------------------------------------------------------------------*/
-[ \t]*#[^\n]* {
-  PRINTF(("%s %d: -COMMENT: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-}
-
- /*---------------------------------------------------------------------------*/
-[ \t]*\\[ \t\r]*\n[ \t]* {
-  PRINTF(("%s %d: SPACE:\n",m_InputFileName.c_str(),m_Line));
-  m_Line++;
-  return mhmakeparser::SPACE;
-}
-
- /*---------------------------------------------------------------------------*/
-\.PHONY {
-  PRINTF(("%s %d: .PHONY: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::PHONY;
-}
-
- /*---------------------------------------------------------------------------*/
-export {
-  PRINTF(("%s %d: export: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::EXPORT;
-}
-
-
- /*---------------------------------------------------------------------------*/
-[a-zA-Z]:[a-zA-Z0-9\\\._\~\-%\@<&/]+\\[ \t\r]*\n {
-  int EndIndex=::strlen((const char*)yytext);
-  while (strchr(" \t\r\n\\",yytext[--EndIndex]));
-  yyless(EndIndex+1);
-
-  PRINTF(("%s %d: STRING: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::STRING;
-}
-
-[a-zA-Z]:[a-zA-Z0-9\\\._\~\-%\@<&/]+ {
-  PRINTF(("%s %d: STRING: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::STRING;
-}
-
- /*---------------------------------------------------------------------------*/
-([a-zA-Z0-9\\\._\~\-\+%\@<&;/\*]|\\\ |\\#)+\\[ \t\r]*\n  {
-  int EndIndex=::strlen((const char*)yytext);
-  while (strchr(" \t\r\n\\",yytext[--EndIndex]));
-  yyless(EndIndex+1);
-
-  PRINTF(("%s %d: STRING: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::STRING;
-}
-
-([a-zA-Z0-9\\\._\~\-\+%\@<&;/\*]|\\\ |\\#)+\+=  {
-  int Len;
-  PRINTF(("%s %d: STRING: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  Len=strlen((const char *)yytext)-2;
-  yyless(Len);
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::STRING;
-}
-
-([a-zA-Z0-9\\\._\~\-\+%\@<&;/\*]|\\\ |\\#)+  {
-  PRINTF(("%s %d: STRING: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::STRING;
-}
-
- /*---------------------------------------------------------------------------*/
-\"  {
-  BEGIN(QUOTE);
-  yymore();
-}
-
- /*---------------------------------------------------------------------------*/
-\' {
-  BEGIN(SINGLEQUOTE);
-  yymore();
-}
-
- /*---------------------------------------------------------------------------*/
-\$\(  {
-  m_BraceIndent++;
-  PRINTF(("%s %d: BEGIN MACRO $(: %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  BEGIN(MAKEEXPRES);
-  yymore();
-}
-
- /*---------------------------------------------------------------------------*/
-\$\([ \t]*error[ \t]+ {
-  m_BraceIndent++;
-  PRINTF(("%s %d: BEGIN ERROR MACRO $(: %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  BEGIN(ERRORMACRO);
-  m_curtoken=g_EmptyString;
-}
-
- /*---------------------------------------------------------------------------*/
-\$\([ \t]*message[ \t]+ {
-  m_BraceIndent++;
-  PRINTF(("%s %d: BEGIN MESSAGE MACRO $(: %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  BEGIN(MESSAGEMACRO);
-  m_curtoken=g_EmptyString;
-}
-
- /*---------------------------------------------------------------------------*/
-\$\([ \t]*reparse[ \t]+ {
-  m_BraceIndent++;
-  PRINTF(("%s %d: BEGIN REPARSE MACRO $(: %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  BEGIN(REPARSEMACRO);
-  m_curtoken=g_EmptyString;
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-\(   {
-  PRINTF(("%s %d: OPENBRACE: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::OPENBRACE;
-}
-
- /*---------------------------------------------------------------------------*/
-\)   {
-  PRINTF(("%s %d: CLOSEBRACE: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  return mhmakeparser::CLOSEBRACE;
-}
-
- /*---------------------------------------------------------------------------*/
-\$[<@/] {
-  PRINTF(("%s %d: DOLLAREXPR: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::DOLLAREXPR;
-}
-
- /*---------------------------------------------------------------------------*/
-[ \t\r]*\n\t[ \t]* {
-  /* token newline */
-  PRINTF(("%s %d: NEWLINE\n",m_InputFileName.c_str(),m_Line));
-  m_Line++;
-  m_curtoken=g_EmptyString;
-  BEGIN(COMMANDPARSE);
-  return mhmakeparser::NEWLINE;
-}
-
- /*---------------------------------------------------------------------------*/
-[^\n] {
-  PRINTF(("%s %d: ANYCHAR: %d: %s\n",m_InputFileName.c_str(),m_Line,m_Line,yytext));
-}
-
- /*****************************************************************************/
-
-<COMMANDPARSE>[ \t\r]*\n {
-  PRINTF(("%s %d: COMMAND: %d: %s\n",m_InputFileName.c_str(),m_Line,m_Line,m_curtoken.c_str()));
-  theValue.theString=m_curtoken;
-  m_Line++;
-  BEGIN(INITIAL);
-  return mhmakeparser::COMMAND;
-}
-
- /*---------------------------------------------------------------------------*/
-<COMMANDPARSE>[ \t\r]*\n\t[ \t]* {
-  PRINTF(("%s %d: COMMAND: %s\n",m_InputFileName.c_str(),m_Line,m_curtoken.c_str()));
-  theValue.theString=m_curtoken;
-  m_Line++;
-  m_curtoken=g_EmptyString;
-  return mhmakeparser::COMMAND;
-}
-
- /*---------------------------------------------------------------------------*/
-<COMMANDPARSE>[ \t]*\\[ \t\r]*\n[ \t]* {
-  m_Line++;
-  m_curtoken+=g_SpaceString;
-}
-
- /*---------------------------------------------------------------------------*/
-<COMMANDPARSE>[ ]+ {
-  m_curtoken+=g_SpaceString;
-}
-
- /*---------------------------------------------------------------------------*/
-<COMMANDPARSE>[^ \r\n#\\]+ |
-<COMMANDPARSE>\\ {
-  m_curtoken+=(const char *)yytext;
-}
-
- /*---------------------------------------------------------------------------*/
-<COMMANDPARSE>[ \t]*\\#[^\n]* {
-  char ToAdd[100];
-  int i=0;
-  int nChars=(strchr((const char *)yytext,'#')-(char*)yytext)+1;
-  while (strchr(" \t",yytext[i]))
-  {
-    ToAdd[i]=yytext[i];
-    i++;
-  }
-  ToAdd[i++]='#';
-  ToAdd[i++]=0;
-  m_curtoken+=ToAdd;
-  yyless(nChars);
-}
-
- /*---------------------------------------------------------------------------*/
-<COMMANDPARSE>[ \t]*#[^\n]* {
-  PRINTF(("%s %d: -COMMENT: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-}
-
- /*****************************************************************************/
-<QUOTE>\" {
-  PRINTF(("%s %d: QUOTEDSTRING: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  BEGIN(INITIAL);
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::STRING;
-}
-
- /*---------------------------------------------------------------------------*/
-<QUOTE>\r /* skip */
-
-<QUOTE>[^\\\"\r\n]+  |
-<QUOTE>\\            |
-<QUOTE>\\\"          |
-<QUOTE>\\#  {
-  yymore();
-}
-
- /*****************************************************************************/
-<SINGLEQUOTE>\' {
-  PRINTF(("%s %d: QUOTEDSTRING: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-  BEGIN(INITIAL);
-  theValue.theString=(const char *)yytext;
-  return mhmakeparser::STRING;
-}
-
- /*---------------------------------------------------------------------------*/
-<SINGLEQUOTE>\r /* skip */
-
-<SINGLEQUOTE>[^\\\'\r\n]+ |
-<SINGLEQUOTE>\\           |
-<SINGLEQUOTE>\\\'         |
-<SINGLEQUOTE>\\# {
-  yymore();
-}
-
- /*****************************************************************************/
-<ERRORMACRO>\) {
-  m_BraceIndent--;
-  PRINTF(("%s %d: CLOSE BRACE ERROR MACRO ): %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  if (!m_BraceIndent)
-  {
-    PRINTF(("%s %d: ERRORMACRO: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-    yyless(0);
-    cerr<<GetParser()->ExpandExpression((const char*)yytext)<<endl;
-    throw(1);
-  } else {
-    yymore();
-  }
-}
-
- /*****************************************************************************/
-<MESSAGEMACRO>\) {
-  m_BraceIndent--;
-  PRINTF(("%s %d: CLOSE BRACE MESSAGE MACRO ): %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  if (!m_BraceIndent)
-  {
-    PRINTF(("%s %d: MESSAGEMACRO: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-    yytext[strlen((const char*)yytext)-1]=0;
-    cerr<<GetParser()->ExpandExpression((const char*)yytext)<<endl;
-    BEGIN(INITIAL);
-  } else {
-    yymore();
-  }
-}
-
- /*****************************************************************************/
-<REPARSEMACRO>\) {
-  m_BraceIndent--;
-  PRINTF(("%s %d: CLOSE BRACE REPARSE MACRO ): %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  if (!m_BraceIndent)
-  {
-    PRINTF(("%s %d: REPARSEMACRO: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-    string Deps=GetParser()->ExpandExpression((const char*)yytext);
-    PRINTF(("%s %d: REPARSEMACRO expanded: %s\n",m_InputFileName.c_str(),m_Line,Deps.c_str()));
-    string::const_reverse_iterator It=Deps.rbegin()+1; // +1 because we don't want the latest brace
-    string::const_reverse_iterator ItBeg=Deps.rend();
-    while (It!= ItBeg)
-    {
-      char Char=*It++;
-      if (Char==';') Char='\n';
-      unput(Char);
-    }
-    BEGIN(INITIAL);
-  }
-  else
-  {
-    yymore();
-  }
-}
-
- /*****************************************************************************/
-<MAKEEXPRES>\) {
-  m_BraceIndent--;
-  PRINTF(("%s %d: CLOSE BRACE MAKEEXPRES MACRO ): %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  if (!m_BraceIndent)
-  {
-    PRINTF(("%s %d: DOLLAREXPR: %s\n",m_InputFileName.c_str(),m_Line,yytext));
-    BEGIN(INITIAL);
-    theValue.theString=(const char *)yytext;
-    return mhmakeparser::DOLLAREXPR;
-  }
-  else
-  {
-    yymore();
-  }
-}
-
- /*---------------------------------------------------------------------------*/
-<MAKEEXPRES,ERRORMACRO,MESSAGEMACRO,REPARSEMACRO>\$\( {
-  m_BraceIndent++;
-  PRINTF(("%s %d: MACRO extra $(: %d\n",m_InputFileName.c_str(),m_Line,m_BraceIndent));
-  yymore();
-}
-
- /*---------------------------------------------------------------------------*/
-<MAKEEXPRES,ERRORMACRO,MESSAGEMACRO,REPARSEMACRO>[^$\(\)\r\n]+ |
-<MAKEEXPRES,ERRORMACRO,MESSAGEMACRO,REPARSEMACRO>\$        |
-<MAKEEXPRES,ERRORMACRO,MESSAGEMACRO,REPARSEMACRO>\( {
-  yymore();
-}
-<MAKEEXPRES,ERRORMACRO,MESSAGEMACRO,REPARSEMACRO>\r?\n {
-  m_Line++;
-}
-
-<SKIPUNTILELSEORENDIF><<EOF>> {
-  cerr << "Missing endif or else statement. #else or #endif used?\n";
-  throw(1);
-}
-
-<<EOF>> {
-  if (m_BraceIndent)
-  {
-    cerr << "Missing closing ) of macro usage in "<<m_InputFileName.c_str()<<".\n";
-    throw(1);
-  }
-  if (!m_IncludeStack.size())
-  {
-    if (m_IndentStack.size())
-    {
-      cerr << "Missing endif or else statement in "<<m_InputFileName.c_str()<<". #else or #endif used?\n";
-      throw(1);
-    }
-    yyterminate();
-  }
-  else
-  {
-    ::fclose(YY_mhmakelexer_CURRENT_BUFFER->yy_input_file);
-    YY_mhmakelexer_DELETE_BUFFER(YY_mhmakelexer_CURRENT_BUFFER);
-    INSTACK *pInStack=&m_IncludeStack.top();
-    YY_mhmakelexer_SWITCH_TO_BUFFER(pInStack->m_BufferState);
-    m_InputFileName=pInStack->m_FileName;
-    m_Line=pInStack->m_Line;
-    m_IncludeStack.pop();
-  }
-}
-%%
-
-- 
cgit v1.2.3