ba0a57702c
For some functions and all kinds of Exceptions. CannotConvertException CloseVetoException DisposedException EmptyUndoStackException ErrorCodeIOException Exception GridInvalidDataException GridInvalidModelException IOException IllegalAccessException IllegalArgumentException IllegalTypeException IndexOutOfBoundsException NoMasterException NoSuchElementException NoSupportException PropertyVetoException RuntimeException SAXException ScannerException StorageWrappedTargetException UnsupportedFlavorException VetoException WrappedTargetException ZipIOException throwGenericSQLException throwIllegallArgumentException createInstance createInstanceWithContext forName getByName getPackageManager getPropertyValue getUnpackedValueOrDefault getValueByName hasPropertyByName openKey setName setPropertyValue supportsService bash command: for i in `cat list`; do git grep "$i\s*(\s*OUString(\s*\"" -- '*.[hc]xx' | cut -d ':' -f1 | sort -u | xargs sed -i -e "s/\(\<$i\s*(\)\s*OUString(\s*\(\"[^\")\\]*\"\)\s*)\s*/\1\2/g" -e "s/\($i.*\)\"+ /\1\" + /g"; done Change-Id: Iaf8e641b0abf28c082906014f87a183517630535 Reviewed-on: https://gerrit.libreoffice.org/4624 Tested-by: LibreOffice gerrit bot <gerrit@libreoffice.org> Reviewed-by: Thomas Arnhold <thomas@arnhold.org> Tested-by: Thomas Arnhold <thomas@arnhold.org>
237 lines
10 KiB
C++
237 lines
10 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*
|
|
* This file is part of the LibreOffice project.
|
|
*
|
|
* This Source Code Form is subject to the terms of the Mozilla Public
|
|
* License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
*
|
|
* This file incorporates work covered by the following license notice:
|
|
*
|
|
* Licensed to the Apache Software Foundation (ASF) under one or more
|
|
* contributor license agreements. See the NOTICE file distributed
|
|
* with this work for additional information regarding copyright
|
|
* ownership. The ASF licenses this file to you under the Apache
|
|
* License, Version 2.0 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy of
|
|
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
|
|
*/
|
|
|
|
#include "vbatables.hxx"
|
|
#include "vbatable.hxx"
|
|
#include "vbarange.hxx"
|
|
#include <com/sun/star/text/XTextTable.hpp>
|
|
#include <com/sun/star/text/XTextTablesSupplier.hpp>
|
|
#include <com/sun/star/text/XTextDocument.hpp>
|
|
#include <com/sun/star/lang/XServiceInfo.hpp>
|
|
#include <com/sun/star/text/XText.hpp>
|
|
#include <com/sun/star/table/XCellRange.hpp>
|
|
|
|
using namespace ::ooo::vba;
|
|
using namespace css;
|
|
|
|
static uno::Reference< container::XIndexAccess > lcl_getTables( const uno::Reference< frame::XModel >& xDoc )
|
|
{
|
|
uno::Reference< container::XIndexAccess > xTables;
|
|
uno::Reference< text::XTextTablesSupplier > xSupp( xDoc, uno::UNO_QUERY );
|
|
if ( xSupp.is() )
|
|
xTables.set( xSupp->getTextTables(), uno::UNO_QUERY_THROW );
|
|
return xTables;
|
|
}
|
|
|
|
static uno::Any lcl_createTable( const uno::Reference< XHelperInterface >& xParent, const uno::Reference< uno::XComponentContext >& xContext, const uno::Reference< frame::XModel >& xDocument, const uno::Any& aSource )
|
|
{
|
|
uno::Reference< text::XTextTable > xTextTable( aSource, uno::UNO_QUERY_THROW );
|
|
uno::Reference< text::XTextDocument > xTextDocument( xDocument, uno::UNO_QUERY_THROW );
|
|
uno::Reference< word::XTable > xTable( new SwVbaTable( xParent, xContext, xTextDocument, xTextTable ) );
|
|
return uno::makeAny( xTable );
|
|
}
|
|
|
|
static bool lcl_isInHeaderFooter( const uno::Reference< text::XTextTable >& xTable )
|
|
{
|
|
uno::Reference< text::XTextContent > xTextContent( xTable, uno::UNO_QUERY_THROW );
|
|
uno::Reference< text::XText > xText = xTextContent->getAnchor()->getText();
|
|
uno::Reference< lang::XServiceInfo > xServiceInfo( xText, uno::UNO_QUERY_THROW );
|
|
OUString aImplName = xServiceInfo->getImplementationName();
|
|
if ( aImplName == "SwXHeadFootText" )
|
|
return true;
|
|
return false;
|
|
}
|
|
|
|
typedef ::cppu::WeakImplHelper1< css::container::XEnumeration > EnumBase;
|
|
typedef ::cppu::WeakImplHelper2< container::XIndexAccess, container::XNameAccess > TableCollectionHelper_Base;
|
|
typedef std::vector< uno::Reference< text::XTextTable > > XTextTableVec;
|
|
|
|
class TableCollectionHelper : public TableCollectionHelper_Base
|
|
{
|
|
XTextTableVec mxTables;
|
|
XTextTableVec::iterator cachePos;
|
|
|
|
public:
|
|
TableCollectionHelper( const uno::Reference< frame::XModel >& xDocument )
|
|
{
|
|
// only count the tables in the body text, not in the header/footer
|
|
uno::Reference< container::XIndexAccess > xTables = lcl_getTables( xDocument );
|
|
sal_Int32 nCount = xTables->getCount();
|
|
for( sal_Int32 i = 0; i < nCount; i++ )
|
|
{
|
|
uno::Reference< text::XTextTable > xTable( xTables->getByIndex( i ) , uno::UNO_QUERY_THROW );
|
|
if( !lcl_isInHeaderFooter( xTable ) )
|
|
mxTables.push_back( xTable );
|
|
}
|
|
cachePos = mxTables.begin();
|
|
}
|
|
// XIndexAccess
|
|
virtual sal_Int32 SAL_CALL getCount( ) throw (uno::RuntimeException)
|
|
{
|
|
return mxTables.size();
|
|
}
|
|
virtual uno::Any SAL_CALL getByIndex( sal_Int32 Index ) throw (lang::IndexOutOfBoundsException, lang::WrappedTargetException, uno::RuntimeException)
|
|
{
|
|
if ( Index < 0 || Index >= getCount() )
|
|
throw lang::IndexOutOfBoundsException();
|
|
uno::Reference< text::XTextTable > xTable( mxTables[ Index ], uno::UNO_QUERY_THROW );
|
|
return uno::makeAny( xTable );
|
|
}
|
|
// XElementAccess
|
|
virtual uno::Type SAL_CALL getElementType( ) throw (uno::RuntimeException) { return text::XTextTable::static_type(0); }
|
|
virtual ::sal_Bool SAL_CALL hasElements( ) throw (uno::RuntimeException) { return getCount() > 0 ; }
|
|
// XNameAcess
|
|
virtual uno::Any SAL_CALL getByName( const OUString& aName ) throw (container::NoSuchElementException, lang::WrappedTargetException, uno::RuntimeException)
|
|
{
|
|
if ( !hasByName(aName) )
|
|
throw container::NoSuchElementException();
|
|
uno::Reference< text::XTextTable > xTable( *cachePos, uno::UNO_QUERY_THROW );
|
|
return uno::makeAny( xTable );
|
|
}
|
|
virtual uno::Sequence< OUString > SAL_CALL getElementNames( ) throw (uno::RuntimeException)
|
|
{
|
|
uno::Sequence< OUString > sNames( mxTables.size() );
|
|
OUString* pString = sNames.getArray();
|
|
XTextTableVec::iterator it = mxTables.begin();
|
|
XTextTableVec::iterator it_end = mxTables.end();
|
|
for ( ; it != it_end; ++it, ++pString )
|
|
{
|
|
uno::Reference< container::XNamed > xName( *it, uno::UNO_QUERY_THROW );
|
|
*pString = xName->getName();
|
|
}
|
|
return sNames;
|
|
}
|
|
virtual ::sal_Bool SAL_CALL hasByName( const OUString& aName ) throw (uno::RuntimeException)
|
|
{
|
|
cachePos = mxTables.begin();
|
|
XTextTableVec::iterator it_end = mxTables.end();
|
|
for ( ; cachePos != it_end; ++cachePos )
|
|
{
|
|
uno::Reference< container::XNamed > xName( *cachePos, uno::UNO_QUERY_THROW );
|
|
if ( aName.equalsIgnoreAsciiCase( xName->getName() ) )
|
|
break;
|
|
}
|
|
return ( cachePos != it_end );
|
|
}
|
|
};
|
|
|
|
class TableEnumerationImpl : public EnumBase
|
|
{
|
|
uno::Reference< XHelperInterface > mxParent;
|
|
uno::Reference< uno::XComponentContext > mxContext;
|
|
uno::Reference< frame::XModel > mxDocument;
|
|
uno::Reference< container::XIndexAccess > mxIndexAccess;
|
|
sal_Int32 mnCurIndex;
|
|
public:
|
|
TableEnumerationImpl( const uno::Reference< XHelperInterface >& xParent, const uno::Reference< uno::XComponentContext > & xContext, const uno::Reference< frame::XModel >& xDocument, const uno::Reference< container::XIndexAccess >& xIndexAccess ) : mxParent( xParent ), mxContext( xContext ), mxDocument( xDocument ), mxIndexAccess( xIndexAccess ), mnCurIndex(0)
|
|
{
|
|
}
|
|
virtual ::sal_Bool SAL_CALL hasMoreElements( ) throw (uno::RuntimeException)
|
|
{
|
|
return ( mnCurIndex < mxIndexAccess->getCount() );
|
|
}
|
|
virtual uno::Any SAL_CALL nextElement( ) throw (container::NoSuchElementException, lang::WrappedTargetException, uno::RuntimeException)
|
|
{
|
|
if ( !hasMoreElements() )
|
|
throw container::NoSuchElementException();
|
|
return lcl_createTable( mxParent, mxContext, mxDocument, mxIndexAccess->getByIndex( mnCurIndex++ ) );
|
|
}
|
|
|
|
};
|
|
|
|
SwVbaTables::SwVbaTables( const uno::Reference< XHelperInterface >& xParent, const uno::Reference< uno::XComponentContext > & xContext, const uno::Reference< frame::XModel >& xDocument ) : SwVbaTables_BASE( xParent, xContext , uno::Reference< container::XIndexAccess >( new TableCollectionHelper( xDocument ) ) ), mxDocument( xDocument )
|
|
{
|
|
}
|
|
|
|
|
|
uno::Reference< word::XTable > SAL_CALL
|
|
SwVbaTables::Add( const uno::Reference< word::XRange >& Range, const uno::Any& NumRows, const uno::Any& NumColumns, const uno::Any& /*DefaultTableBehavior*/, const uno::Any& /*AutoFitBehavior*/ ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
sal_Int32 nCols = 0;
|
|
sal_Int32 nRows = 0;
|
|
SwVbaRange* pVbaRange = dynamic_cast< SwVbaRange* >( Range.get() );
|
|
// Preconditions
|
|
if ( !( pVbaRange && ( NumRows >>= nRows ) && ( NumColumns >>= nCols ) ) )
|
|
throw uno::RuntimeException(); // #FIXME better exception??
|
|
if ( nCols <= 0 || nRows <= 0 )
|
|
throw uno::RuntimeException(); // #FIXME better exception??
|
|
|
|
uno::Reference< frame::XModel > xModel( pVbaRange->getDocument(), uno::UNO_QUERY_THROW );
|
|
uno::Reference< lang::XMultiServiceFactory > xMsf( xModel, uno::UNO_QUERY_THROW );
|
|
uno::Reference< text::XTextRange > xTextRange = pVbaRange->getXTextRange();
|
|
|
|
uno::Reference< text::XTextTable > xTable;
|
|
xTable.set( xMsf->createInstance("com.sun.star.text.TextTable"), uno::UNO_QUERY_THROW );
|
|
|
|
xTable->initialize( nRows, nCols );
|
|
uno::Reference< text::XText > xText = xTextRange->getText();
|
|
uno::Reference< text::XTextContent > xContext( xTable, uno::UNO_QUERY_THROW );
|
|
|
|
xText->insertTextContent( xTextRange, xContext, true );
|
|
|
|
// move the current cursor to the first table cell
|
|
uno::Reference< table::XCellRange > xCellRange( xTable, uno::UNO_QUERY_THROW );
|
|
uno::Reference< text::XText> xFirstCellText( xCellRange->getCellByPosition(0, 0), uno::UNO_QUERY_THROW );
|
|
word::getXTextViewCursor( mxDocument )->gotoRange( xFirstCellText->getStart(), sal_False );
|
|
|
|
uno::Reference< word::XTable > xVBATable( new SwVbaTable( mxParent, mxContext, pVbaRange->getDocument(), xTable ) );
|
|
return xVBATable;
|
|
}
|
|
|
|
uno::Reference< container::XEnumeration > SAL_CALL
|
|
SwVbaTables::createEnumeration() throw (uno::RuntimeException)
|
|
{
|
|
return new TableEnumerationImpl( mxParent, mxContext, mxDocument, m_xIndexAccess );
|
|
}
|
|
|
|
// ScVbaCollectionBaseImpl
|
|
uno::Any
|
|
SwVbaTables::createCollectionObject( const uno::Any& aSource )
|
|
{
|
|
return lcl_createTable( mxParent, mxContext, mxDocument, aSource );
|
|
}
|
|
|
|
// XHelperInterface
|
|
OUString
|
|
SwVbaTables::getServiceImplName()
|
|
{
|
|
return OUString("SwVbaTables");
|
|
}
|
|
|
|
// XEnumerationAccess
|
|
uno::Type SAL_CALL
|
|
SwVbaTables::getElementType() throw (uno::RuntimeException)
|
|
{
|
|
return word::XTable::static_type(0);
|
|
}
|
|
|
|
uno::Sequence<OUString>
|
|
SwVbaTables::getServiceNames()
|
|
{
|
|
static uno::Sequence< OUString > aServiceNames;
|
|
if ( aServiceNames.getLength() == 0 )
|
|
{
|
|
aServiceNames.realloc( 1 );
|
|
aServiceNames[ 0 ] = OUString("ooo.vba.word.Tables" );
|
|
}
|
|
return aServiceNames;
|
|
}
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|