1*efeef26fSAndrew Rist /************************************************************** 2cdf0e10cSrcweir * 3*efeef26fSAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one 4*efeef26fSAndrew Rist * or more contributor license agreements. See the NOTICE file 5*efeef26fSAndrew Rist * distributed with this work for additional information 6*efeef26fSAndrew Rist * regarding copyright ownership. The ASF licenses this file 7*efeef26fSAndrew Rist * to you under the Apache License, Version 2.0 (the 8*efeef26fSAndrew Rist * "License"); you may not use this file except in compliance 9*efeef26fSAndrew Rist * with the License. You may obtain a copy of the License at 10cdf0e10cSrcweir * 11*efeef26fSAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0 12cdf0e10cSrcweir * 13*efeef26fSAndrew Rist * Unless required by applicable law or agreed to in writing, 14*efeef26fSAndrew Rist * software distributed under the License is distributed on an 15*efeef26fSAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16*efeef26fSAndrew Rist * KIND, either express or implied. See the License for the 17*efeef26fSAndrew Rist * specific language governing permissions and limitations 18*efeef26fSAndrew Rist * under the License. 19cdf0e10cSrcweir * 20*efeef26fSAndrew Rist *************************************************************/ 21*efeef26fSAndrew Rist 22*efeef26fSAndrew Rist 23cdf0e10cSrcweir #include <docsh.hxx> 24cdf0e10cSrcweir #include "wordvbahelper.hxx" 25cdf0e10cSrcweir #include <comphelper/processfactory.hxx> 26cdf0e10cSrcweir #include <com/sun/star/frame/XController.hpp> 27cdf0e10cSrcweir #include <com/sun/star/text/XTextViewCursorSupplier.hpp> 28cdf0e10cSrcweir #include <com/sun/star/style/XStyleFamiliesSupplier.hpp> 29cdf0e10cSrcweir #include <com/sun/star/container/XNameAccess.hpp> 30cdf0e10cSrcweir #include <com/sun/star/lang/XUnoTunnel.hpp> 31cdf0e10cSrcweir #include <unotxdoc.hxx> 32cdf0e10cSrcweir #include <doc.hxx> 33cdf0e10cSrcweir #include <viewsh.hxx> 34cdf0e10cSrcweir 35cdf0e10cSrcweir using namespace ::com::sun::star; 36cdf0e10cSrcweir using namespace ::ooo::vba; 37cdf0e10cSrcweir 38cdf0e10cSrcweir #define FIRST_PAGE 1; 39cdf0e10cSrcweir 40cdf0e10cSrcweir namespace ooo 41cdf0e10cSrcweir { 42cdf0e10cSrcweir namespace vba 43cdf0e10cSrcweir { 44cdf0e10cSrcweir namespace word 45cdf0e10cSrcweir { 46cdf0e10cSrcweir 47cdf0e10cSrcweir SwDocShell* getDocShell( const uno::Reference< frame::XModel>& xModel ) 48cdf0e10cSrcweir { 49cdf0e10cSrcweir uno::Reference< lang::XUnoTunnel > xTunnel( xModel, uno::UNO_QUERY_THROW ); 50cdf0e10cSrcweir SwXTextDocument* pXDoc = reinterpret_cast< SwXTextDocument * >( sal::static_int_cast< sal_IntPtr >(xTunnel->getSomething(SwXTextDocument::getUnoTunnelId()))); 51cdf0e10cSrcweir return pXDoc ? pXDoc->GetDocShell() : 0; 52cdf0e10cSrcweir } 53cdf0e10cSrcweir 54cdf0e10cSrcweir SwView* getView( const uno::Reference< frame::XModel>& xModel ) 55cdf0e10cSrcweir { 56cdf0e10cSrcweir SwDocShell* pDocShell = getDocShell( xModel ); 57cdf0e10cSrcweir return pDocShell? pDocShell->GetView() : 0; 58cdf0e10cSrcweir } 59cdf0e10cSrcweir 60cdf0e10cSrcweir uno::Reference< text::XTextViewCursor > getXTextViewCursor( const uno::Reference< frame::XModel >& xModel ) throw (uno::RuntimeException) 61cdf0e10cSrcweir { 62cdf0e10cSrcweir uno::Reference< frame::XController > xController = xModel->getCurrentController(); 63cdf0e10cSrcweir uno::Reference< text::XTextViewCursorSupplier > xTextViewCursorSupp( xController, uno::UNO_QUERY_THROW ); 64cdf0e10cSrcweir uno::Reference< text::XTextViewCursor > xTextViewCursor = xTextViewCursorSupp->getViewCursor(); 65cdf0e10cSrcweir return xTextViewCursor; 66cdf0e10cSrcweir } 67cdf0e10cSrcweir 68cdf0e10cSrcweir uno::Reference< style::XStyle > getCurrentPageStyle( const uno::Reference< frame::XModel >& xModel ) throw (uno::RuntimeException) 69cdf0e10cSrcweir { 70cdf0e10cSrcweir uno::Reference< beans::XPropertySet > xCursorProps( getXTextViewCursor( xModel ), uno::UNO_QUERY_THROW ); 71cdf0e10cSrcweir rtl::OUString aPageStyleName; 72cdf0e10cSrcweir xCursorProps->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("PageStyleName"))) >>= aPageStyleName; 73cdf0e10cSrcweir uno::Reference< style::XStyleFamiliesSupplier > xSytleFamSupp( xModel, uno::UNO_QUERY_THROW ); 74cdf0e10cSrcweir uno::Reference< container::XNameAccess > xSytleFamNames( xSytleFamSupp->getStyleFamilies(), uno::UNO_QUERY_THROW ); 75cdf0e10cSrcweir uno::Reference< container::XNameAccess > xPageStyles( xSytleFamNames->getByName( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("PageStyles") ) ), uno::UNO_QUERY_THROW ); 76cdf0e10cSrcweir uno::Reference< style::XStyle > xStyle( xPageStyles->getByName( aPageStyleName ), uno::UNO_QUERY_THROW ); 77cdf0e10cSrcweir 78cdf0e10cSrcweir return xStyle; 79cdf0e10cSrcweir } 80cdf0e10cSrcweir 81cdf0e10cSrcweir sal_Int32 getPageCount( const uno::Reference< frame::XModel>& xModel ) throw (uno::RuntimeException) 82cdf0e10cSrcweir { 83cdf0e10cSrcweir SwDocShell* pDocShell = getDocShell( xModel ); 84cdf0e10cSrcweir ViewShell* pViewSh = pDocShell ? pDocShell->GetDoc()->GetCurrentViewShell() : 0; 85cdf0e10cSrcweir return pViewSh ? pViewSh->GetPageCount() : 0; 86cdf0e10cSrcweir } 87cdf0e10cSrcweir 88cdf0e10cSrcweir } // word 89cdf0e10cSrcweir } // 90cdf0e10cSrcweir } // 91