Adding upstream version 4:7.4.7.upstream/4%7.4.7upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 395 insertions, 0 deletions

diff --git a/sw/source/uibase/app/applab.cxx b/sw/source/uibase/app/applab.cxx
new file mode 100644
index 000000000..7ee421ed5
--- /dev/null
+++ b/sw/source/uibase/app/applab.cxx
@@ -0,0 +1,395 @@
+/* -*- 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 <config_features.h>
+#include <config_fuzzers.h>
+
+#include <hintids.hxx>
+
+#include <comphelper/string.hxx>
+#include <sfx2/dispatch.hxx>
+#include <sfx2/printer.hxx>
+#include <sfx2/request.hxx>
+#include <sfx2/linkmgr.hxx>
+#include <sfx2/viewfrm.hxx>
+#include <editeng/pbinitem.hxx>
+#include <editeng/ulspitem.hxx>
+#include <editeng/lrspitem.hxx>
+#include <com/sun/star/frame/XModel.hpp>
+#include <osl/diagnose.h>
+#include <fmthdft.hxx>
+#include <fmtanchr.hxx>
+#include <fmtfsize.hxx>
+#include <fmtornt.hxx>
+#include <swwait.hxx>
+#include <gloshdl.hxx>
+#include <swmodule.hxx>
+#include <view.hxx>
+#include <docsh.hxx>
+#include <fldbas.hxx>
+#include <wrtsh.hxx>
+#include <cmdid.h>
+#include <dbmgr.hxx>
+#include <fldmgr.hxx>
+#include <labimg.hxx>
+#include <section.hxx>
+#include <pagedesc.hxx>
+#include <poolfmt.hxx>
+
+#include <strings.hrc>
+#include <swabstdlg.hxx>
+
+#include <IDocumentDeviceAccess.hxx>
+
+#include "appenv.hxx"
+#include <memory>
+
+using namespace ::com::sun::star;
+
+constexpr OUStringLiteral MASTER_LABEL = u"MasterLabel";
+
+static const SwFrameFormat *lcl_InsertBCText( SwWrtShell& rSh, const SwLabItem& rItem,
+                        SwFrameFormat &rFormat,
+                        sal_uInt16 nCol, sal_uInt16 nRow )
+{
+    SfxItemSetFixed<RES_VERT_ORIENT, RES_ANCHOR> aSet( rSh.GetAttrPool() );
+    sal_uInt16 nPhyPageNum, nVirtPageNum;
+    rSh.GetPageNum( nPhyPageNum, nVirtPageNum );
+
+    //anchor frame to page
+    aSet.Put( SwFormatAnchor( RndStdIds::FLY_AT_PAGE, nPhyPageNum ) );
+    aSet.Put( SwFormatHoriOrient( rItem.m_lLeft + static_cast<SwTwips>(nCol) * rItem.m_lHDist,
+                               text::HoriOrientation::NONE, text::RelOrientation::PAGE_FRAME ) );
+    aSet.Put( SwFormatVertOrient( rItem.m_lUpper + static_cast<SwTwips>(nRow) * rItem.m_lVDist,
+                               text::VertOrientation::NONE, text::RelOrientation::PAGE_FRAME ) );
+    const SwFrameFormat *pFormat = rSh.NewFlyFrame(aSet, true,  &rFormat );  // Insert Fly
+    OSL_ENSURE( pFormat, "Fly not inserted" );
+
+    rSh.UnSelectFrame();  //Frame was selected automatically
+
+    rSh.SetTextFormatColl( rSh.GetTextCollFromPool( RES_POOLCOLL_STANDARD ) );
+
+    if(!rItem.m_bSynchron || !(nCol|nRow))
+    {
+        SwAbstractDialogFactory* pFact = SwAbstractDialogFactory::Create();
+        ::GlossarySetActGroup fnSetActGroup = pFact->SetGlossaryActGroupFunc();
+        if ( fnSetActGroup )
+            (*fnSetActGroup)( rItem.m_sGlossaryGroup );
+        SwGlossaryHdl* pGlosHdl = rSh.GetView().GetGlosHdl();
+        pGlosHdl->SetCurGroup(rItem.m_sGlossaryGroup, true);
+        pGlosHdl->InsertGlossary( rItem.m_sGlossaryBlockName );
+    }
+
+    return pFormat;
+}
+
+static const SwFrameFormat *lcl_InsertLabText( SwWrtShell& rSh, const SwLabItem& rItem,
+                        SwFrameFormat &rFormat, SwFieldMgr& rFieldMgr,
+                        sal_uInt16 nCol, sal_uInt16 nRow, bool bLast )
+{
+    SfxItemSetFixed<RES_VERT_ORIENT, RES_ANCHOR> aSet( rSh.GetAttrPool() );
+    sal_uInt16 nPhyPageNum, nVirtPageNum;
+    rSh.GetPageNum( nPhyPageNum, nVirtPageNum );
+
+    //anchor frame to page
+    aSet.Put( SwFormatAnchor( RndStdIds::FLY_AT_PAGE, nPhyPageNum ) );
+    aSet.Put( SwFormatHoriOrient( rItem.m_lLeft + static_cast<SwTwips>(nCol) * rItem.m_lHDist,
+                               text::HoriOrientation::NONE, text::RelOrientation::PAGE_FRAME ) );
+    aSet.Put( SwFormatVertOrient( rItem.m_lUpper + static_cast<SwTwips>(nRow) * rItem.m_lVDist,
+                               text::VertOrientation::NONE, text::RelOrientation::PAGE_FRAME ) );
+    const SwFrameFormat *pFormat = rSh.NewFlyFrame(aSet, true,  &rFormat );  // Insert Fly
+    OSL_ENSURE( pFormat, "Fly not inserted" );
+
+    rSh.UnSelectFrame();  //Frame was selected automatically
+
+    rSh.SetTextFormatColl( rSh.GetTextCollFromPool( RES_POOLCOLL_STANDARD ) );
+
+    // If applicable "next dataset"
+    OUString sDBName;
+    if( (!rItem.m_bSynchron || !(nCol|nRow)) && !(sDBName = InsertLabEnvText( rSh, rFieldMgr, rItem.m_aWriting )).isEmpty() && !bLast )
+    {
+        sDBName = comphelper::string::setToken(sDBName, 3, DB_DELIM, u"True");
+        SwInsertField_Data aData(SwFieldTypesEnum::DatabaseNextSet, 0, sDBName, OUString(), 0, &rSh);
+        rFieldMgr.InsertField( aData );
+    }
+
+    return pFormat;
+}
+
+void SwModule::InsertLab(SfxRequest& rReq, bool bLabel)
+{
+    static sal_uInt16 nLabelTitleNo = 0;
+    static sal_uInt16 nBCTitleNo = 0;
+
+#if HAVE_FEATURE_DBCONNECTIVITY && !ENABLE_FUZZERS
+    // Create DB-Manager
+    std::unique_ptr<SwDBManager> pDBManager(new SwDBManager(nullptr));
+#endif
+
+    // Read SwLabItem from Config
+    SwLabCfgItem aLabCfg(bLabel);
+
+    // Move up Dialog
+    SfxItemSetFixed<FN_LABEL, FN_LABEL> aSet( GetPool() );
+    aSet.Put( aLabCfg.GetItem() );
+
+    SwAbstractDialogFactory* pDialogFactory = SwAbstractDialogFactory::Create();
+
+    ScopedVclPtr<AbstractSwLabDlg> pDlg(pDialogFactory->CreateSwLabDlg(rReq.GetFrameWeld(), aSet,
+#if HAVE_FEATURE_DBCONNECTIVITY && !ENABLE_FUZZERS
+                                                                            pDBManager.get(),
+#else
+                                                                            NULL,
+#endif
+                                                                            bLabel));
+
+    if ( RET_OK != pDlg->Execute() )
+        return;
+
+    // Read dialog, store item in config
+    const SwLabItem& rItem = static_cast<const SwLabItem&>( pDlg->
+                                        GetOutputItemSet()->Get(FN_LABEL));
+    aLabCfg.GetItem() = rItem;
+    aLabCfg.Commit();
+
+    // Create new document
+    SfxObjectShellLock xDocSh( new SwDocShell( SfxObjectCreateMode::STANDARD));
+    xDocSh->DoInitNew();
+
+    // Printer
+    Printer *pPrt = pDlg->GetPrt();
+    if (pPrt)
+    {
+        SwDocShell *pDocSh = static_cast<SwDocShell*>(&*xDocSh);
+        pDocSh->getIDocumentDeviceAccess().setJobsetup(pPrt->GetJobSetup());
+    }
+
+    SfxViewFrame* pViewFrame = SfxViewFrame::DisplayNewDocument( *xDocSh, rReq );
+    if (!pViewFrame)
+        return;
+
+    SwView      *pNewView = static_cast<SwView*>( pViewFrame->GetViewShell());
+    pNewView->AttrChangedNotify(nullptr);// So that SelectShell is being called.
+
+    // Set document title
+    OUString aTmp;
+    if(bLabel)
+    {
+        aTmp = SwResId( STR_LAB_TITLE) +
+            OUString::number(++nLabelTitleNo );
+    }
+    else
+    {
+        aTmp = pDlg->GetBusinessCardStr() +
+            OUString::number( ++nBCTitleNo );
+    }
+    xDocSh->SetTitle( aTmp );
+
+    pViewFrame->GetFrame().Appear();
+
+    // Determine Shell
+    SwWrtShell *pSh = pNewView->GetWrtShellPtr();
+    OSL_ENSURE( pSh, "missing WrtShell" );
+
+    {   // block for locks the dispatcher!!
+
+        SwWait aWait( static_cast<SwDocShell&>(*xDocSh), true );
+
+        CurrShell aCurr(pSh);
+        pSh->SetLabelDoc(rItem.m_bSynchron);
+        pSh->DoUndo( false );
+        pSh->StartAllAction();
+
+        pSh->SetNewDoc();       // Avoid performance problems
+
+        SwPageDesc aDesc = pSh->GetPageDesc( 0 );
+        SwFrameFormat&  rFormat  = aDesc.GetMaster();
+
+        // Borders
+        SvxLRSpaceItem aLRMargin( RES_LR_SPACE );
+        SvxULSpaceItem aULMargin( RES_UL_SPACE );
+        aLRMargin.SetLeft (o3tl::narrowing<sal_uInt16>(rItem.m_lLeft) );
+        aULMargin.SetUpper(o3tl::narrowing<sal_uInt16>(rItem.m_lUpper));
+        aLRMargin.SetRight( 0 );
+        aULMargin.SetLower( 0 );
+        rFormat.SetFormatAttr(aLRMargin);
+        rFormat.SetFormatAttr(aULMargin);
+
+        // Header and footer
+        rFormat.SetFormatAttr(SwFormatHeader(false));
+        aDesc.ChgHeaderShare(false);
+        rFormat.SetFormatAttr(SwFormatFooter(false));
+        aDesc.ChgFooterShare(false);
+
+        aDesc.SetUseOn(UseOnPage::All);                // Site numbering
+
+        // Set page size
+        tools::Long lPgWidth, lPgHeight;
+        lPgWidth  = std::max<sal_Int32>(rItem.m_lPWidth, MINLAY);
+        lPgHeight = std::max<sal_Int32>(rItem.m_lPHeight, MINLAY);
+        rFormat.SetFormatAttr( SwFormatFrameSize( SwFrameSize::Fixed, lPgWidth, lPgHeight ));
+        // Numbering type
+        SvxNumberType aType;
+        aType.SetNumberingType(SVX_NUM_NUMBER_NONE);
+        aDesc.SetNumType( aType );
+
+        // Followup template
+        const SwPageDesc &rFollow = pSh->GetPageDesc( pSh->GetCurPageDesc() );
+        aDesc.SetFollow( &rFollow );
+
+        pPrt = pSh->getIDocumentDeviceAccess().getPrinter( true );
+        SvxPaperBinItem aItem( RES_PAPER_BIN );
+        aItem.SetValue(static_cast<sal_Int8>(pPrt->GetPaperBin()));
+        rFormat.SetFormatAttr(aItem);
+
+        // Determine orientation of the resulting page
+        aDesc.SetLandscape(rItem.m_lPWidth > rItem.m_lPHeight);
+
+        pSh->ChgPageDesc( 0, aDesc );
+
+        // Insert frame
+        std::optional<SwFieldMgr> pFieldMgr;
+        pFieldMgr.emplace();
+        pFieldMgr->SetEvalExpFields(false);
+
+        // Prepare border template
+        SwFrameFormat* pFormat = pSh->GetFrameFormatFromPool( RES_POOLFRM_LABEL );
+        sal_Int32 iResultWidth = rItem.m_lLeft + (rItem.m_nCols - 1) * rItem.m_lHDist + rItem.m_lWidth - rItem.m_lPWidth;
+        sal_Int32 iResultHeight = rItem.m_lUpper + (rItem.m_nRows - 1) * rItem.m_lVDist + rItem.m_lHeight - rItem.m_lPHeight;
+        sal_Int32 iWidth = (iResultWidth > 0 ? rItem.m_lWidth - (iResultWidth / rItem.m_nCols) - 1 : rItem.m_lWidth);
+        sal_Int32 iHeight = (iResultHeight > 0 ? rItem.m_lHeight - (iResultHeight / rItem.m_nRows) - 1 : rItem.m_lHeight);
+        SwFormatFrameSize aFrameSize(  SwFrameSize::Fixed, iWidth, iHeight );
+        pFormat->SetFormatAttr( aFrameSize );
+
+        //frame represents label itself, no border space
+        SvxULSpaceItem aFrameNoULSpace( 0, 0, RES_UL_SPACE );
+        SvxLRSpaceItem aFrameNoLRSpace( 0, 0, 0, 0, RES_LR_SPACE );
+        pFormat->SetFormatAttr( aFrameNoULSpace );
+        pFormat->SetFormatAttr( aFrameNoLRSpace );
+
+        const SwFrameFormat *pFirstFlyFormat = nullptr;
+        if ( rItem.m_bPage )
+        {
+            SwFormatVertOrient aFrameVertOrient( pFormat->GetVertOrient() );
+            aFrameVertOrient.SetVertOrient( text::VertOrientation::TOP );
+            pFormat->SetFormatAttr(aFrameVertOrient);
+
+            for ( sal_Int32 i = 0; i < rItem.m_nRows; ++i )
+            {
+                for ( sal_Int32 j = 0; j < rItem.m_nCols; ++j )
+                {
+                    pSh->Push();
+                    const SwFrameFormat *pTmp = ( bLabel ?
+                                             lcl_InsertLabText( *pSh, rItem, *pFormat, *pFieldMgr, j, i,
+                                               i == rItem.m_nRows - 1 && j == rItem.m_nCols - 1 ) :
+                                             lcl_InsertBCText( *pSh, rItem, *pFormat, j, i ) );
+                    if (!(i|j))
+                    {
+                        pFirstFlyFormat = pTmp;
+
+                        if (rItem.m_bSynchron)
+                        {
+                            // if there is no content in the fly then
+                            // don't leave the fly!!!
+                            pSh->Push();
+                            pSh->StartOfSection();
+                            bool bInFly = nullptr != pSh->WizardGetFly();
+                            pSh->Pop(bInFly ? SwCursorShell::PopMode::DeleteStack : SwCursorShell::PopMode::DeleteCurrent);
+
+                            if( bInFly )
+                                pSh->EndOfSection(true); // select all content
+                                                    // in the fly
+                            else
+                                pSh->SetMark();     // set only the mark
+
+                            SwSectionData aSect(SectionType::Content, MASTER_LABEL);
+                            pSh->InsertSection(aSect);
+                        }
+                    }
+                    else if (rItem.m_bSynchron)
+                    {
+                        SwSectionData aSect(SectionType::FileLink,
+                                pSh->GetUniqueSectionName());
+                        OUString sLinkName =
+                            OUStringChar(sfx2::cTokenSeparator) +
+                            OUStringChar(sfx2::cTokenSeparator) +
+                            MASTER_LABEL;
+                        aSect.SetLinkFileName(sLinkName);
+                        aSect.SetProtectFlag(true);
+                        pSh->Insert(".");   // Dummytext to allocate the Section
+                        pSh->StartOfSection();
+                        pSh->EndOfSection(true); // Select everything in the frame
+                        pSh->InsertSection(aSect);
+                    }
+                    pSh->Pop(SwCursorShell::PopMode::DeleteCurrent);
+                }
+            }
+        }
+        else
+        {
+            pFirstFlyFormat = bLabel ?
+                lcl_InsertLabText( *pSh, rItem, *pFormat, *pFieldMgr,
+                        static_cast< sal_uInt16 >(rItem.m_nCol - 1),
+                        static_cast< sal_uInt16 >(rItem.m_nRow - 1), true ) :
+                lcl_InsertBCText(*pSh, rItem, *pFormat,
+                        static_cast< sal_uInt16 >(rItem.m_nCol - 1),
+                        static_cast< sal_uInt16 >(rItem.m_nRow - 1));
+        }
+
+        //fill the user fields
+        if(!bLabel)
+        {
+            uno::Reference< frame::XModel >  xModel = pSh->GetView().GetDocShell()->GetBaseModel();
+            OSL_ENSURE(pDialogFactory, "SwAbstractDialogFactory fail!");
+            SwLabDlgMethod SwLabDlgUpdateFieldInformation = pDialogFactory->GetSwLabDlgStaticMethod ();
+            SwLabDlgUpdateFieldInformation(xModel, rItem);
+        }
+
+        pFieldMgr->SetEvalExpFields(true);
+        pFieldMgr->EvalExpFields(pSh);
+
+        pFieldMgr.reset();
+
+        if (pFirstFlyFormat)
+            pSh->GotoFly(pFirstFlyFormat->GetName(), FLYCNTTYPE_ALL, false);
+
+        if (pSh->IsAnyDatabaseFieldInDoc())
+            pSh->GetView().ShowUIElement("private:resource/toolbar/mailmerge");
+
+        pSh->EndAllAction();
+        pSh->DoUndo();
+    }
+
+    if( rItem.m_aWriting.indexOf( '<' ) >= 0 )
+    {
+        // Open database browser on recently used database
+        ShowDBObj( *pNewView, pSh->GetDBData() );
+    }
+
+    if( rItem.m_bSynchron )
+    {
+        SfxDispatcher* pDisp = pViewFrame->GetDispatcher();
+        assert(pDisp && "No dispatcher in frame?");
+        pDisp->Execute(FN_SYNC_LABELS, SfxCallMode::ASYNCHRON);
+    }
+    rReq.SetReturnValue(SfxVoidItem(bLabel ? FN_LABEL : FN_BUSINESS_CARD));
+
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */