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 <database.hxx>
  26
  27 void SvMetaObject::WriteTab( SvStream & rOutStm, sal_uInt16 nTab )
  28 {
  29     while( nTab-- )
  30         rOutStm.WriteOString( "    " );
  31 }
  32
  33 void SvMetaObject::WriteStars( SvStream & rOutStm )
  34 {
  35     rOutStm.WriteChar( '/' );
  36     for( int i = 6; i > 0; i-- )
  37         rOutStm.WriteOString( "**********" );
  38     rOutStm.WriteChar( '/' ) << endl;
  39 }
  40
  41 void SvMetaObject::Back2Delimiter( SvStream & rOutStm )
  42 {
  43     // write no empty brackets
  44     sal_uInt64 nPos = rOutStm.Tell();
  45     rOutStm.SeekRel( -1 );
  46     char c = 0;
  47     rOutStm.ReadChar( c );
  48
  49     while( rtl::isAsciiWhiteSpace( static_cast<unsigned char>(c) )
  50            && rOutStm.Tell() != 1 )
  51     {
  52         rOutStm.SeekRel( -2 );
  53         rOutStm.ReadChar( c );
  54     }
  55
  56     if( c == ';' || c == ',' )
  57         rOutStm.SeekRel( -1 );
  58     else
  59         rOutStm.Seek( nPos );
  60 }
  61
  62 SvMetaObject::SvMetaObject()
  63 {
  64 }
  65
  66 void SvMetaObject::SetName( const OString& rName )
  67 {
  68     aName = rName;
  69 }
  70
  71 bool SvMetaObject::ReadNameSvIdl( SvTokenStream & rInStm )
  72 {
  73     sal_uInt32 nTokPos = rInStm.Tell();
  74     SvToken& rTok = rInStm.GetToken_Next();
  75
  76     // read module name
  77     if( rTok.IsIdentifier() )
  78     {
  79         SetName( rTok.GetString() );
  80         return true;
  81     }
  82
  83     rInStm.Seek( nTokPos );
  84     return false;
  85 }
  86
  87 void SvMetaObject::ReadAttributesSvIdl( SvIdlDataBase & ,
  88                                       SvTokenStream & )
  89 {
  90 }
  91
  92 void SvMetaObject::DoReadContextSvIdl( SvIdlDataBase & rBase,
  93                                    SvTokenStream & rInStm )
  94 {
  95     sal_uInt32 nBeginPos = 0; // can not happen with Tell
  96     while( nBeginPos != rInStm.Tell() )
  97     {
  98         nBeginPos = rInStm.Tell();
  99         ReadContextSvIdl( rBase, rInStm );
 100         rInStm.ReadIfDelimiter();
 101     }
 102 }
 103
 104 void SvMetaObject::ReadContextSvIdl( SvIdlDataBase &, SvTokenStream & )
 105 {
 106 }
 107
 108 bool SvMetaObject::ReadSvIdl( SvIdlDataBase & rBase, SvTokenStream & rInStm )
 109 {
 110     sal_uInt32 nTokPos = rInStm.Tell();
 111     bool bOk = true;
 112     if( rInStm.ReadIf( '[' ) )
 113     {
 114         sal_uInt32 nBeginPos = 0; // can not happen with Tell
 115         while( nBeginPos != rInStm.Tell() )
 116         {
 117             nBeginPos = rInStm.Tell();
 118             ReadAttributesSvIdl( rBase, rInStm );
 119             rInStm.ReadIfDelimiter();
 120         }
 121         bOk = rInStm.ReadIf( ']' );
 122     }
 123
 124     if( bOk && rInStm.ReadIf( '{' ) )
 125     {
 126         DoReadContextSvIdl( rBase, rInStm );
 127         bOk = rInStm.ReadIf( '}' );
 128     }
 129
 130     if( !bOk )
 131         rInStm.Seek( nTokPos );
 132     return bOk;
 133 }
 134
 135
 136 SvMetaReference::SvMetaReference()
 137 {
 138 }
 139
 140
 141 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */