e9a59da46a
Fixes #fdo30794 Based on bin/add-modelines script (originally posted in mail 1286706307.1871.1399280959@webmail.messagingengine.com) Signed-off-by: Sebastian Spaeth <Sebastian@SSpaeth.de>
182 lines
5 KiB
C++
182 lines
5 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2000, 2010 Oracle and/or its affiliates.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org 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 Lesser General Public License version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
#include <precomp.h>
|
|
#include "cx_c_pp.hxx"
|
|
|
|
|
|
|
|
// NOT FULLY DECLARED SERVICES
|
|
#include "c_dealer.hxx"
|
|
#include <tokens/parseinc.hxx>
|
|
#include <x_parse.hxx>
|
|
#include "all_toks.hxx"
|
|
|
|
|
|
namespace cpp
|
|
{
|
|
|
|
Context_Preprocessor::Context_Preprocessor( TkpContext & i_rFollowUpContext )
|
|
: Cx_Base(&i_rFollowUpContext),
|
|
pContext_Parent(&i_rFollowUpContext),
|
|
pContext_PP_MacroParams( 0 ),
|
|
pContext_PP_Definition( new Context_PP_Definition(i_rFollowUpContext) )
|
|
{
|
|
pContext_PP_MacroParams = new Context_PP_MacroParams(*pContext_PP_Definition);
|
|
}
|
|
|
|
void
|
|
Context_Preprocessor::ReadCharChain( CharacterSource & io_rText )
|
|
{
|
|
jumpOverWhite( io_rText );
|
|
jumpToWhite( io_rText );
|
|
const char * sPP_Keyword = io_rText.CutToken();
|
|
if ( strcmp(sPP_Keyword, "define") == 0 )
|
|
ReadDefine(io_rText);
|
|
else
|
|
ReadDefault(io_rText);
|
|
}
|
|
|
|
void
|
|
Context_Preprocessor::AssignDealer( Distributor & o_rDealer )
|
|
{
|
|
Cx_Base::AssignDealer(o_rDealer);
|
|
pContext_PP_MacroParams->AssignDealer(o_rDealer);
|
|
pContext_PP_Definition->AssignDealer(o_rDealer);
|
|
}
|
|
|
|
void
|
|
Context_Preprocessor::ReadDefault( CharacterSource & io_rText )
|
|
{
|
|
int o_rCount_BackslashedLineBreaks = 0;
|
|
jumpToEol(io_rText,o_rCount_BackslashedLineBreaks);
|
|
for ( ; o_rCount_BackslashedLineBreaks > 0; --o_rCount_BackslashedLineBreaks )
|
|
Dealer().Deal_Eol();
|
|
|
|
if (io_rText.CurChar() != NULCH)
|
|
jumpOverEol(io_rText);
|
|
io_rText.CutToken();
|
|
Dealer().Deal_Eol();
|
|
SetNewToken(0);
|
|
SetFollowUpContext( pContext_Parent );
|
|
}
|
|
|
|
void
|
|
Context_Preprocessor::ReadDefine( CharacterSource & io_rText )
|
|
{
|
|
jumpOverWhite( io_rText );
|
|
io_rText.CutToken();
|
|
|
|
char cNext = '\0';
|
|
for ( cNext = io_rText.CurChar();
|
|
static_cast<UINT8>(cNext) > 32 AND cNext != '(';
|
|
cNext = io_rText.MoveOn() )
|
|
{ }
|
|
|
|
bool bMacro = cNext == '(';
|
|
|
|
if ( NOT bMacro )
|
|
{
|
|
SetNewToken( new Tok_DefineName(io_rText.CutToken()) );
|
|
SetFollowUpContext( pContext_PP_Definition.Ptr() );
|
|
}
|
|
else
|
|
{
|
|
SetNewToken( new Tok_MacroName(io_rText.CutToken()) );
|
|
io_rText.MoveOn();
|
|
io_rText.CutToken();
|
|
SetFollowUpContext( pContext_PP_MacroParams.Ptr() );
|
|
}
|
|
}
|
|
|
|
|
|
Context_PP_MacroParams::Context_PP_MacroParams( Cx_Base & i_rFollowUpContext )
|
|
: Cx_Base(&i_rFollowUpContext),
|
|
pContext_PP_Definition(&i_rFollowUpContext)
|
|
{
|
|
}
|
|
|
|
void
|
|
Context_PP_MacroParams::ReadCharChain( CharacterSource & io_rText )
|
|
{
|
|
uintt nLen;
|
|
|
|
jumpOverWhite( io_rText );
|
|
// KORR_FUTURE Handling line breaks within macro parameters:
|
|
char cSeparator = jumpTo( io_rText, ',', ')' );
|
|
csv_assert( cSeparator != 0 );
|
|
|
|
static char cBuf[500];
|
|
// KORR_FUTURE, make it still safer, here:
|
|
strcpy( cBuf, io_rText.CutToken() ); // SAFE STRCPY (#100211# - checked)
|
|
for ( nLen = strlen(cBuf);
|
|
nLen > 0 AND cBuf[nLen-1] < 33;
|
|
--nLen )
|
|
{ }
|
|
cBuf[nLen] = '\0';
|
|
SetNewToken( new Tok_MacroParameter(cBuf) );
|
|
|
|
io_rText.MoveOn();
|
|
io_rText.CutToken();
|
|
if ( cSeparator == ',')
|
|
SetFollowUpContext( this );
|
|
else // Must be ')'
|
|
SetFollowUpContext( pContext_PP_Definition );
|
|
}
|
|
|
|
Context_PP_Definition::Context_PP_Definition( TkpContext & i_rFollowUpContext )
|
|
: Cx_Base(&i_rFollowUpContext),
|
|
pContext_Parent(&i_rFollowUpContext)
|
|
{
|
|
}
|
|
|
|
void
|
|
Context_PP_Definition::ReadCharChain( CharacterSource & io_rText )
|
|
{
|
|
int o_rCount_BackslashedLineBreaks = 0;
|
|
jumpToEol(io_rText,o_rCount_BackslashedLineBreaks);
|
|
for ( ; o_rCount_BackslashedLineBreaks > 0; --o_rCount_BackslashedLineBreaks )
|
|
Dealer().Deal_Eol();
|
|
SetNewToken( new Tok_PreProDefinition(io_rText.CutToken()) );
|
|
if (io_rText.CurChar() != NULCH)
|
|
jumpOverEol(io_rText);
|
|
Dealer().Deal_Eol();
|
|
}
|
|
|
|
|
|
} // namespace cpp
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|