1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
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/.
9 * This file incorporates work covered by the following license notice:
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 .
20 #include <oox/ole/vbahelper.hxx>
21 #include <rtl/ustrbuf.hxx>
22 #include <osl/diagnose.h>
23 #include <oox/helper/binaryinputstream.hxx>
28 using namespace ::com::sun::star::uno
;
30 bool VbaHelper::readDirRecord( sal_uInt16
& rnRecId
, StreamDataSequence
& rRecData
, BinaryInputStream
& rInStrm
)
32 // read the record header
34 rnRecId
= rInStrm
.readuInt16();
35 nRecSize
= rInStrm
.readInt32();
36 // for no obvious reason, PROJECTVERSION record contains size field of 4, but is 6 bytes long
37 if( rnRecId
== VBA_ID_PROJECTVERSION
)
39 OSL_ENSURE( nRecSize
== 4, "VbaHelper::readDirRecord - unexpected record size for PROJECTVERSION" );
42 // read the record contents into the passed sequence
43 return !rInStrm
.isEof() && (rInStrm
.readData( rRecData
, nRecSize
) == nRecSize
);
46 bool VbaHelper::extractKeyValue( OUString
& rKey
, OUString
& rValue
, const OUString
& rKeyValue
)
48 sal_Int32 nEqSignPos
= rKeyValue
.indexOf( '=' );
51 rKey
= rKeyValue
.copy( 0, nEqSignPos
).trim();
52 rValue
= rKeyValue
.copy( nEqSignPos
+ 1 ).trim();
53 return !rKey
.isEmpty() && !rValue
.isEmpty();
61 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */