autodoc/source/parser_i/idl/cx_sub.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*************************************************************************
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * Copyright 2000, 2010 Oracle and/or its affiliates.
   7  *
   8  * OpenOffice.org - a multi-platform office productivity suite
   9  *
  10  * This file is part of OpenOffice.org.
  11  *
  12  * OpenOffice.org is free software: you can redistribute it and/or modify
  13  * it under the terms of the GNU Lesser General Public License version 3
  14  * only, as published by the Free Software Foundation.
  15  *
  16  * OpenOffice.org is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU Lesser General Public License version 3 for more details
  20  * (a copy is included in the LICENSE file that accompanied this code).
  21  *
  22  * You should have received a copy of the GNU Lesser General Public License
  23  * version 3 along with OpenOffice.org.  If not, see
  24  * <http://www.openoffice.org/license.html>
  25  * for a copy of the LGPLv3 License.
  26  *
  27  ************************************************************************/
  28
  29 #include <precomp.h>
  30 #include <s2_luidl/cx_sub.hxx>
  31
  32
  33
  34 // NOT FULLY DECLARED SERVICES
  35 #include <s2_luidl/tokrecv.hxx>
  36 #include <../../parser/inc/tokens/parseinc.hxx>
  37 #include <x_parse2.hxx>
  38 #include <s2_luidl/tk_const.hxx>
  39
  40
  41
  42 namespace csi
  43 {
  44 namespace uidl
  45 {
  46
  47 bool
  48 Cx_Base::PassNewToken()
  49 {
  50     if (pNewToken)
  51     {
  52         rReceiver.Receive(*pNewToken.Release());
  53         return true;
  54     }
  55     return false;
  56 }
  57
  58 TkpContext &
  59 Cx_Base::FollowUpContext()
  60 {
  61     csv_assert(pFollowUpContext != 0);
  62     return *pFollowUpContext;
  63 }
  64
  65 void
  66 Context_MLComment::ReadCharChain( CharacterSource & io_rText )
  67 {
  68     char cNext = NULCH;
  69
  70     do {
  71         do {
  72             cNext = jumpTo(io_rText,'*','\n');
  73             if (cNext == '\n')
  74             {
  75                 Receiver().Increment_CurLine();
  76                 cNext = io_rText.MoveOn();
  77             }
  78             else if (cNext == NULCH)
  79                 throw X_AutodocParser(X_AutodocParser::x_UnexpectedEOF);
  80         } while (cNext != '*');
  81
  82         cNext = jumpOver(io_rText,'*');
  83         if (cNext == NULCH)
  84             throw X_AutodocParser(X_AutodocParser::x_UnexpectedEOF);
  85     } while (cNext != '/');
  86     io_rText.MoveOn();
  87     io_rText.CutToken();
  88     SetToken(0);
  89 }
  90
  91 void
  92 Context_SLComment::ReadCharChain( CharacterSource & io_rText )
  93 {
  94     jumpToEol(io_rText);
  95     if (io_rText.CurChar() != NULCH)
  96         jumpOverEol(io_rText);
  97     io_rText.CutToken();
  98     SetToken(0);
  99
 100     Receiver().Increment_CurLine();
 101 }
 102
 103 void
 104 Context_Praeprocessor::ReadCharChain( CharacterSource & io_rText )
 105 {
 106     jumpToEol(io_rText);
 107     if (io_rText.CurChar() != NULCH)
 108         jumpOverEol(io_rText);
 109     io_rText.CutToken();
 110     SetToken(0);
 111
 112     Receiver().Increment_CurLine();
 113 }
 114
 115 void
 116 Context_Assignment::ReadCharChain( CharacterSource &    io_rText )
 117 {
 118     // KORR_FUTURE
 119     // How to handle new lines within this, so he y get realised by
 120     //  ParserInfo?
 121
 122     char cNext = NULCH;
 123     do {
 124         if ( (cNext = jumpTo(io_rText,';',',','"','}')) == NULCH )
 125             throw X_AutodocParser(X_AutodocParser::x_UnexpectedEOF);
 126         if (cNext == '"')
 127         {
 128             cNext = io_rText.MoveOn();
 129             while (cNext != '"')
 130             {
 131                 if ( (cNext = jumpTo(io_rText,'"','\\')) == NULCH )
 132                     throw X_AutodocParser(X_AutodocParser::x_UnexpectedEOF);
 133                 if (cNext == '\\')
 134                     io_rText.MoveOn();
 135             }
 136             cNext = io_rText.MoveOn();
 137         }   // endif (cNext == '"')
 138     } while (cNext != ';' AND cNext != ',' AND cNext != '}');
 139
 140     if (cNext == ',' OR cNext == ';')
 141         io_rText.MoveOn();
 142     SetToken(new TokAssignment(io_rText.CutToken()));
 143 }
 144
 145
 146 }   // namespace uidl
 147 }   // namespace csi
 148
 149 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */