idl/source/objects/basobj.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <sal/config.h>
  21
  22 #include <rtl/character.hxx>
  23
  24 #include <basobj.hxx>
  25 #include <module.hxx>
  26 #include <globals.hxx>
  27 #include <database.hxx>
  28
  29 void SvMetaObject::WriteTab( SvStream & rOutStm, sal_uInt16 nTab )
  30 {
  31     while( nTab-- )
  32         rOutStm.WriteCharPtr( "    " );
  33 }
  34
  35 void SvMetaObject::WriteStars( SvStream & rOutStm )
  36 {
  37     rOutStm.WriteChar( '/' );
  38     for( int i = 6; i > 0; i-- )
  39         rOutStm.WriteCharPtr( "**********" );
  40     rOutStm.WriteChar( '/' ) << endl;
  41 }
  42
  43 void SvMetaObject::Back2Delimiter( SvStream & rOutStm )
  44 {
  45     // write no empty brackets
  46     sal_uLong nPos = rOutStm.Tell();
  47     rOutStm.SeekRel( -1 );
  48     char c = 0;
  49     rOutStm.ReadChar( c );
  50
  51     while( rtl::isAsciiWhiteSpace( static_cast<unsigned char>(c) )
  52            && rOutStm.Tell() != 1 )
  53     {
  54         rOutStm.SeekRel( -2 );
  55         rOutStm.ReadChar( c );
  56     }
  57
  58     if( c == ';' || c == ',' )
  59         rOutStm.SeekRel( -1 );
  60     else
  61         rOutStm.Seek( nPos );
  62 }
  63
  64 SvMetaObject::SvMetaObject()
  65 {
  66 }
  67
  68 void SvMetaObject::SetName( const OString& rName )
  69 {
  70     aName = rName;
  71 }
  72
  73 bool SvMetaObject::ReadNameSvIdl( SvTokenStream & rInStm )
  74 {
  75     sal_uInt32 nTokPos = rInStm.Tell();
  76     SvToken& rTok = rInStm.GetToken_Next();
  77
  78     // read module name
  79     if( rTok.IsIdentifier() )
  80     {
  81         SetName( rTok.GetString() );
  82         return true;
  83     }
  84
  85     rInStm.Seek( nTokPos );
  86     return false;
  87 }
  88
  89 void SvMetaObject::ReadAttributesSvIdl( SvIdlDataBase & ,
  90                                       SvTokenStream & )
  91 {
  92 }
  93
  94 void SvMetaObject::DoReadContextSvIdl( SvIdlDataBase & rBase,
  95                                    SvTokenStream & rInStm )
  96 {
  97     sal_uInt32 nBeginPos = 0; // can not happen with Tell
  98     while( nBeginPos != rInStm.Tell() )
  99     {
 100         nBeginPos = rInStm.Tell();
 101         ReadContextSvIdl( rBase, rInStm );
 102         rInStm.ReadIfDelimiter();
 103     }
 104 }
 105
 106 void SvMetaObject::ReadContextSvIdl( SvIdlDataBase &, SvTokenStream & )
 107 {
 108 }
 109
 110 bool SvMetaObject::ReadSvIdl( SvIdlDataBase & rBase, SvTokenStream & rInStm )
 111 {
 112     sal_uInt32 nTokPos = rInStm.Tell();
 113     bool bOk = true;
 114     if( rInStm.ReadIf( '[' ) )
 115     {
 116         sal_uInt32 nBeginPos = 0; // can not happen with Tell
 117         while( nBeginPos != rInStm.Tell() )
 118         {
 119             nBeginPos = rInStm.Tell();
 120             ReadAttributesSvIdl( rBase, rInStm );
 121             rInStm.ReadIfDelimiter();
 122         }
 123         bOk = rInStm.ReadIf( ']' );
 124     }
 125
 126     if( bOk && rInStm.ReadIf( '{' ) )
 127     {
 128         DoReadContextSvIdl( rBase, rInStm );
 129         bOk = rInStm.ReadIf( '}' );
 130     }
 131
 132     if( !bOk )
 133         rInStm.Seek( nTokPos );
 134     return bOk;
 135 }
 136
 137
 138 SvMetaReference::SvMetaReference()
 139 {
 140 }
 141
 142
 143 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */