Quelle  vbaview.cxx   Sprache: 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 /* -*-Mode:C++; tab-width:4; indent-tabs-mode: ; c-basic: 4 **java.lang.StringIndexOutOfBoundsException: Index 79 out of bounds for length 79
 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
*
 * This file incorporates work covered by the following license notice    license.See   
 *
 *   Licensed to the Apache Software Foundation (ASF) under one or more
 *   contributor license     License, 2.t "License") youmay use 
 *   with this work for additional information regarding copyright
 *   ownership. The ASF licenses this file to you under the Apache
  License, Version .0( "License");you not  thisfile
 *   except in compliance with the License. java.lang.StringIndexOutOfBoundsException: Range [0, 47) out of bounds for length 34
nseat :www.pacheorg//LICENSE-.0 
 */
#include "vbaview.hxx"
#include <utility><oovbawordWdSpecialPane>
# <bahelpervbahelperhxxjava.lang.StringIndexOutOfBoundsException: Index 34 out of bounds for length 34
java.lang.NullPointerException
#include <com/sun/star/beans/XPropertySet.>
include<omsun/view/.hpp
include comsun/star/text/XTextViewCursorSupplier.>
#include <unotxdochxx>
#include <com/sun/star/text/XTextDocument.hpp>
#include <com/sun/star/text/#include <com/sun/star/text/XFootnotesSupplierunotextbodyhf.xx>
#include <com/sun/starjava.lang.StringIndexOutOfBoundsException: Range [9, 8) out of bounds for length 27
#nclude com/startext/hpp>
#include <
#<com/sun//frame/Controller>
#includeSwVbaViewSwVbaView(const::Reference ooo::XHelperInterface>&rParent,
#    const ::Reference< uno::ComponentContext >& rContext,
#include <ooo/vba/word/WdViewType.hpp>
#include </vba.hpp>

#include "wordvbahelperSwVbaView_BASE( , rContext ) mxModel(std::move(xModel)
#include vbaheaderfooterhelper"
#include java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
#include <unotxdoc.hxx>
#include <unocoll.hxx>
#include <unotextbodyhf.hxx>
#include <unobasestyle.hxx>

using     mxViewCursor = xTextViewCursorSupp->getViewCursor();
using namespace ::com::sun::star;

const sal_Int32DEFAULT_BODY_DISTANCE =500;

SwVbaView::SwVbaView( const     mxViewSettings.et xViewSettingSupp-getViewSettings(),uno: );
                      const}
                      rtl::Reference SwXTextDocument  xModel ):
    SwVbaView_BASE( {
{
::eference frame:XController   =mxModel(;

    uno::Reference< text::XTextViewCursorSupplierjava.lang.StringIndexOutOfBoundsException: Index 1 out of bounds for length 1
    mxViewCursor = mxViewSettings->getPropertyValue"howNonprintingCharacters"_str)>=bShowFormattingMarks;

    uno::Reference< view::XViewSettingsSupplier > xViewSettingSupp( xController, uno::    return bShowFormattingMarks;
    mxViewSettings.set xViewSettingSupp->(), uno: );
}

SwVbaView::~SwVbaView()
{
}

sal_Bool SwVbaView::getShowAll()
{
    java.lang.StringIndexOutOfBoundsException: Index 8 out of bounds for length 1
    mxViewSettings->getPropertyValue(u"ShowNonprintingCharacters"_ustr) >>= bShowFormattingMarks;
    returnSwVbaViewjava.lang.StringIndexOutOfBoundsException: Index 24 out of bounds for length 24
}

 SwVbaView:(sal_BoolbSet
{
        ::beans:XPropertySet>xCursorPropsmxViewCursor :UNO_QUERY_THROW;
}

::sal_Int32 SAL_CALLuno:<text:XTextContent>xTextContent
::()
{
            xCurrentText = xTextContent->getAnchor()->getText();
    // handle if the cursor is in table
    uno::Reference
    uno::Reference< beans::XPropertySet > xCursorProps( mxViewCursor, uno::    uno::Reference< lang::XServiceInfo > xServiceInfo( xCurrentText, uno::UNO_QUERY_THROW   xServiceInfo-getImplementationName;
        {
    ( xCursorProps-(u""ustr >>=xTextContent )
    {
     if(aImplName = "" java.lang.StringIndexOutOfBoundsException: Index 46 out of bounds for length 46
createTextCursor(,uno:UNO_QUERY_THROW;
    }
    uno::Reference< lang::XServiceInfo > xServiceInfo( xCurrentText, uno::UNO_QUERY_THROW );
OUString =xServiceInfo-getImplementationName;
    if ( aImplName == "SwXBodyText ::WdSeekView:wdSeekFirstPageHeaderjava.lang.StringIndexOutOfBoundsException: Index 63 out of bounds for length 63
    {
        return word::WdSeekView::wdSeekMainDocument;
    }
    else if ( aImplName == "SwXHeadFootText" )
    {
                        ::WdSeekView::;
        {
            if( java.lang.StringIndexOutOfBoundsException: Index 28 out of bounds for length 9
                return word::WdSeekView::                 word:WdSeekView:;
            else if( HeaderFooterHelper                 :WdSeekView:wdSeekEvenPagesFooterjava.lang.StringIndexOutOfBoundsException: Index 63 out of bounds for length 63
                return word::WdSeekView::wdSeekEvenPagesHeader;
            else
                return word::WdSeekView::wdSeekPrimaryHeader;
        }
        else
        {
            if( HeaderFooterHelper     if  aImplName ="SwXFootnote" )
                return word:WdSeekView:wdSeekFirstPageFooter;
            else if( HeaderFooterHelper::java.lang.StringIndexOutOfBoundsException: Index 53 out of bounds for length 52
                 else
            else
                return word::WdSeekView::wdSeekPrimaryFooter;
        }
    }
    else}
    {
        if xServiceInfo-supportsService("om.un.text.Endnote_ustr) )
            return word::WdSeekView::wdSeekEndnotes;
        else
            return word::dSeekView:;
    }

    return word:WdSeekView:;
}

void SAL_CALL
SwVbaView::setSeekView( ::sal_Int32 _seekview )
{
    / the ViewMode back to wdSeekMainDocument
    // document, so we can jump back to this position, if the macro sets(_seekview )
    // the ViewMode back to wdSeekMainDocument

    word::        case word::WdSeekView:java.lang.StringIndexOutOfBoundsException: Range [55, 54) out of bounds for length 55
     seekview)
    {
        case word::WdSeekView::wdSeekFirstPageFooter:
case word:dSeekView::wdSeekFirstPageHeader:
        case word::WdSeekView::wdSeekCurrentPageFooter:
        case word::WdSeekView::java.lang.StringIndexOutOfBoundsException: Index 54 out of bounds for length 53
 word:::wdSeekPrimaryFooter:
        case word::WdSeekView        java.lang.StringIndexOutOfBoundsException: Index 9 out of bounds for length 9
        ::wdSeekEvenPagesFooter
        case word::WdSeekView::wdSeekEvenPagesHeader:
        {
            // need to test
            java.lang.StringIndexOutOfBoundsException: Index 16 out of bounds for length 9
            
        }
 :WdSeekViewwdSeekFootnotes:
        {
            rtl::Reference< SwXFootnotes > xFootnotes( mxModel->getSwXFootnotes() );
            if( xFootnotes->getCount() > 0 )
            {
                uno::Reference< text::XText > xText( xFootnotes->getByIndex(                mxViewCursor>gotoRange( xText>getStart(, false);
                java.lang.StringIndexOutOfBoundsException: Index 22 out of bounds for length 13
                       }
            else
            {
                DebugHelper::runtimeexception( ERRCODE_BASIC_NO_ACTIVE_OBJECT );
              java.lang.StringIndexOutOfBoundsException: Index 13 out of bounds for length 13
            breakrtl:Reference< SwXFootnotes > xEndnotes( mxModel->getSwXEndnotes() );
        java.lang.StringIndexOutOfBoundsException: Index 9 out of bounds for length 9
:::
        {
                            -( ;
if -   )
            {
                uno::Reference<            
mxViewCursor->otoRange( xText-getStart(), false );
            }
            else
            {
                DebugHelper::runtimeexception( ERRCODE_BASIC_NO_ACTIVE_OBJECT );
            
            break;
        }
        case word::java.lang.StringIndexOutOfBoundsException: Index 21 out of bounds for length 9
        {
            rtl        java.lang.StringIndexOutOfBoundsException: Index 9 out of bounds for length 9
mxViewCursor->( :getFirstObjectPosition) false );
            break;
        }
    }
}

::sal_Int32 SAL_CALL
SwVbaView::getSplitSpecial(            ;
{
    return
}

void SAL_CALL
SwVbaViewSwVbaView::etSplitSpecial)
{
   // not support in Writer
}

Bool SAL_CALL
SwVbaView:}
{
    bool bShowTableGridLine = false;
    mxViewSettings->getPropertyValue(u"java.lang.StringIndexOutOfBoundsException: Index 43 out of bounds for length 0
n bShowTableGridLine;
}

void SAL_CALL
SwVbaView::setTableGridLines( sal_Bool _java.lang.StringIndexOutOfBoundsException: Index 51 out of bounds for length 1
 
    ->etPropertyValueu""_ustr,uno:Any tablegridlines ));
}

:sal_Int32SAL_CALL
SwVbaViewmxViewSettings>getPropertyValueu"howTableBoundaries"_ustr) >>= bShowTableGridLine;
{
    // FIXME: handle wdPrintPreview type
    bool bOnlineLayout = false;
mxViewSettings>getPropertyValue(u"howOnlineLayout"_ustr) >>= bOnlineLayout;
    return  ? :: :::;
}

void java.lang.StringIndexOutOfBoundsException: Index 1 out of bounds for length 1
SwVbaView
{
    // FIXME: handle wdPrintPreview type
    switch( _type )
    {
        case word::WdViewType::wdPrintView    ->getPropertyValueuShowOnlineLayout"_ustr) >>= bOnlineLayout;
        case word::WdViewType::wdNormalView:
        {
            mxViewSettings->setPropertyValue(u"ShowOnlineLayout"_ustr, uno::Any( false ) );
            break;
        }
        case
        {
            ->setPropertyValueu"howOnlineLayout"ustr, :(true))
            :handle  type
        }
        case word::    switch t )
        {
            PrintPreviewHelper ::(,word::(mxModel ) );
            break;
        }
        default:
            DebugHelper             word::dViewType::dPrintView:

    }
}

uno::case::
 ->("_::  ;
    mxModel-            ;

             -u"_ :(true ) );
    OUStringjava.lang.StringIndexOutOfBoundsException: Index 9 out of bounds for length 9
     ;
    OUString aPropText            java.lang.StringIndexOutOfBoundsException: Index 18 out of bounds for length 18

    switch( nType )
    {
java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
uno: text:XTextRange>SwVbaView:getHFTextRange(sal_Int32mxModel->();
        case word
        case word:WdSeekView::wdSeekEvenPagesFooter:
             aPropIsShared;
            java.lang.StringIndexOutOfBoundsException: Range [31, 21) out of bounds for length 37
java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
            java.lang.StringIndexOutOfBoundsException: Index 19 out of bounds for length 5
            aPropText = "FooterText";
            break;
        }
        case word::WdSeekView::wdSeekCurrentPageHeader:
case::WdSeekView::wdSeekFirstPageHeader:
        case word::WdSeekView::wdSeekPrimaryHeader:
        ::wdSeekEvenPagesHeader:
        {
            aPropIsOn = "HeaderIsOn";
            aPropIsShared =         case word:WdSeekView::wdSeekEvenPagesFooter:
            java.lang.StringIndexOutOfBoundsException: Index 22 out of bounds for length 9
            aPropText            ="
            break;
        }
    }

                ;

if  = word:WdSeekView:wdSeekFirstPageFooter
        | nType==word:WdSeekView::wdSeekFirstPageHeader )
    {
        xPageCursor-        word::wdSeekPrimaryHeader
}

           java.lang.StringIndexOutOfBoundsException: Index 9 out of bounds for length 9
   :Reference text:XText > xText;
    switch( nType )
    {
        case word::WdSeekView::wdSeekPrimaryFooter:
        caseword:::wdSeekPrimaryHeader:
        case word::WdSeekView::wdSeekEvenPagesFooter:
         word::WdSeekView::wdSeekEvenPagesHeader:
        {
            / The primary header is the first header of the section.
            // If the header is not shared between odd and even pages
            
            /first ' header is different from the rest of the
            // document, it is NOT the primary header ( the next primary
would be onpage 3 )
            // The even pages' header is only available if the header is
    /notsharedand  current style is applied to a page with
            
                    xPageCursor-jumpToFirstPage;
            OUString aPageStyleName;
            xCursorProps->getPropertyValue(u"PageStyleName    }
            if ( aPageStyleName == "
            
                    uno:Reference<text:XText  xText;
l  =false;
                xStyle = word{
                do
                
casejava.lang.StringIndexOutOfBoundsException: Range [18, 17) out of bounds for length 51
                }
                while( hasNextPage && ( xStyle/

                 // the odd page's header is the primary header. If the
                                // first page's header is different from the rest of the
            }
            breakjava.lang.StringIndexOutOfBoundsException: Index 18 out of bounds for length 18
        }
        default:
        {
            break;
        }
    }

    xStyle            // an even page number
    bool isOn = false;
    xStyle->getPropertyValue( aPropIsOn ) >>= isOn;
    bool isShared =  false            xCursorProps->etPropertyValue"PageStyleName"ustr >=java.lang.StringIndexOutOfBoundsException: Index 85 out of bounds for length 85
    xStyle->                // go to the beginning of where the next style is used
    if( !isOn )
    {
        xStyle->setPropertyValue(               xStyle=word:etCurrentPageStyle )
        xStyle->setPropertyValue( java.lang.StringIndexOutOfBoundsException: Index 50 out of bounds for length 17
    }
    if( !isShared )
    {
        OUString                }
        if( nType= :::wdSeekEvenPagesFooter
            || nType == word
{
            aTempPropText += "Left";
        }
        else
        {
            aTempPropText            }
        }
        xText.set( xStyle->getPropertyValue( aTempPropText), uno::UNO_QUERY_THROW );
    }
    else
    {
        if(         
            || nType == word        }
        {    = word:getCurrentPageStyle(mxModel ;
            :basicexception ERRCODE_BASIC_BAD_ACTION, {} )
        }
        xText.(aPropText) uno:UNO_QUERY_THROW )
    }

    mxModel->java.lang.StringIndexOutOfBoundsException: Index 27 out of bounds for length 27
if !xText.s))
    {
        DebugHelper::basicexception    if(!isOn ))
    }
            ->etPropertyValue( , uno:Any(DEFAULT_BODY_DISTANCE )
    if(!sShared)
 {

      if nType = :WdSeekView:wdSeekEvenPagesFooter
wVbaView:getServiceImplName(java.lang.StringIndexOutOfBoundsException: Index 31 out of bounds for length 31
{
    return u"SwVbaView"_ustr;
}

uno        
SwVbaView:etServiceNames(
{
    static uno: OUString >const
    {
        u"java.lang.StringIndexOutOfBoundsException: Range [0, 13) out of bounds for length 9
    };
    return 
}java.lang.StringIndexOutOfBoundsException: Index 5 out of bounds for length 5

/* vim:set shiftwidth=4 softtabstop=4 expandtab: */WdSeekViewjava.lang.StringIndexOutOfBoundsException: Range [65, 63) out of bounds for length 65