1 files changed, 345 insertions, 0 deletions
diff --git a/sc/source/ui/miscdlgs/tabopdlg.cxx b/sc/source/ui/miscdlgs/tabopdlg.cxx
new file mode 100644
index 000000000..7e9be6ea8
--- /dev/null
+++ b/sc/source/ui/miscdlgs/tabopdlg.cxx
@@ -0,0 +1,345 @@
+/* -*- 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 <sfx2/dispatch.hxx>
+#include <vcl/svapp.hxx>
+#include <vcl/weld.hxx>
+
+#include <uiitems.hxx>
+#include <document.hxx>
+#include <scresid.hxx>
+#include <sc.hrc>
+#include <strings.hrc>
+#include <reffact.hxx>
+
+#include <tabopdlg.hxx>
+
+
+ScTabOpDlg::ScTabOpDlg(SfxBindings* pB, SfxChildWindow* pCW, weld::Window* pParent,
+                       ScDocument* pDocument,
+                       const ScRefAddress& rCursorPos )
+    : ScAnyRefDlgController(pB, pCW, pParent, "modules/scalc/ui/multipleoperationsdialog.ui",
+                            "MultipleOperationsDialog")
+    , theFormulaCell(rCursorPos)
+    , pDoc(pDocument)
+    , nCurTab(theFormulaCell.Tab())
+    , bDlgLostFocus(false)
+    , errMsgNoFormula(ScResId(STR_NOFORMULASPECIFIED))
+    , errMsgNoColRow(ScResId(STR_NOCOLROW))
+    , errMsgWrongFormula(ScResId(STR_WRONGFORMULA))
+    , errMsgWrongRowCol(ScResId(STR_WRONGROWCOL))
+    , errMsgNoColFormula(ScResId(STR_NOCOLFORMULA))
+    , errMsgNoRowFormula(ScResId(STR_NOROWFORMULA))
+    , m_pEdActive(nullptr)
+    , m_xFtFormulaRange(m_xBuilder->weld_label("formulasft"))
+    , m_xEdFormulaRange(new formula::RefEdit(m_xBuilder->weld_entry("formulas")))
+    , m_xRBFormulaRange(new formula::RefButton(m_xBuilder->weld_button("formulasref")))
+    , m_xFtRowCell(m_xBuilder->weld_label("rowft"))
+    , m_xEdRowCell(new formula::RefEdit(m_xBuilder->weld_entry("row")))
+    , m_xRBRowCell(new formula::RefButton(m_xBuilder->weld_button("rowref")))
+    , m_xFtColCell(m_xBuilder->weld_label("colft"))
+    , m_xEdColCell(new formula::RefEdit(m_xBuilder->weld_entry("col")))
+    , m_xRBColCell(new formula::RefButton(m_xBuilder->weld_button("colref")))
+    , m_xBtnOk(m_xBuilder->weld_button("ok"))
+    , m_xBtnCancel(m_xBuilder->weld_button("cancel"))
+{
+    m_xEdFormulaRange->SetReferences(this, m_xFtFormulaRange.get());
+    m_xRBFormulaRange->SetReferences(this, m_xEdFormulaRange.get());
+
+    m_xEdRowCell->SetReferences(this, m_xFtRowCell.get());
+    m_xRBRowCell->SetReferences(this, m_xEdRowCell.get());
+
+    m_xEdColCell->SetReferences(this, m_xFtColCell.get());
+    m_xRBColCell->SetReferences(this, m_xEdColCell.get());
+
+    Init();
+}
+
+ScTabOpDlg::~ScTabOpDlg()
+{
+}
+
+void ScTabOpDlg::Init()
+{
+    m_xBtnOk->connect_clicked( LINK( this, ScTabOpDlg, BtnHdl ) );
+    m_xBtnCancel->connect_clicked( LINK( this, ScTabOpDlg, BtnHdl ) );
+
+    Link<formula::RefEdit&,void> aEditLink = LINK( this, ScTabOpDlg, GetEditFocusHdl );
+    m_xEdFormulaRange->SetGetFocusHdl( aEditLink );
+    m_xEdRowCell->SetGetFocusHdl( aEditLink );
+    m_xEdColCell->SetGetFocusHdl( aEditLink );
+
+    Link<formula::RefButton&,void> aButtonLink = LINK( this, ScTabOpDlg, GetButtonFocusHdl );
+    m_xRBFormulaRange->SetGetFocusHdl( aButtonLink );
+    m_xRBRowCell->SetGetFocusHdl( aButtonLink );
+    m_xRBColCell->SetGetFocusHdl( aButtonLink );
+
+    aEditLink = LINK( this, ScTabOpDlg, LoseEditFocusHdl );
+    m_xEdFormulaRange->SetLoseFocusHdl( aEditLink );
+    m_xEdRowCell->SetLoseFocusHdl( aEditLink );
+    m_xEdColCell->SetLoseFocusHdl( aEditLink );
+
+    aButtonLink = LINK( this, ScTabOpDlg, LoseButtonFocusHdl );
+    m_xRBFormulaRange->SetLoseFocusHdl( aButtonLink );
+    m_xRBRowCell->SetLoseFocusHdl( aButtonLink );
+    m_xRBColCell->SetLoseFocusHdl( aButtonLink );
+
+    m_xEdFormulaRange->GrabFocus();
+    m_pEdActive = m_xEdFormulaRange.get();
+}
+
+void ScTabOpDlg::Close()
+{
+    DoClose( ScTabOpDlgWrapper::GetChildWindowId() );
+}
+
+void ScTabOpDlg::SetActive()
+{
+    if ( bDlgLostFocus )
+    {
+        bDlgLostFocus = false;
+        if (m_pEdActive)
+            m_pEdActive->GrabFocus();
+    }
+    else
+        m_xDialog->grab_focus();
+
+    RefInputDone();
+}
+
+void ScTabOpDlg::SetReference( const ScRange& rRef, ScDocument& rDocP )
+{
+    if (!m_pEdActive)
+        return;
+
+    ScAddress::Details aDetails(rDocP.GetAddressConvention(), 0, 0);
+
+    if ( rRef.aStart != rRef.aEnd )
+        RefInputStart(m_pEdActive);
+
+    OUString      aStr;
+    ScRefFlags      nFmt = ( rRef.aStart.Tab() == nCurTab )
+                            ? ScRefFlags::RANGE_ABS
+                            : ScRefFlags::RANGE_ABS_3D;
+
+    if (m_pEdActive == m_xEdFormulaRange.get())
+    {
+        theFormulaCell.Set( rRef.aStart, false, false, false);
+        theFormulaEnd.Set( rRef.aEnd, false, false, false);
+        aStr = rRef.Format(rDocP, nFmt, aDetails);
+    }
+    else if (m_pEdActive == m_xEdRowCell.get())
+    {
+        theRowCell.Set( rRef.aStart, false, false, false);
+        aStr = rRef.aStart.Format(nFmt, &rDocP, aDetails);
+    }
+    else if (m_pEdActive == m_xEdColCell.get())
+    {
+        theColCell.Set( rRef.aStart, false, false, false);
+        aStr = rRef.aStart.Format(nFmt, &rDocP, aDetails);
+    }
+
+    m_pEdActive->SetRefString( aStr );
+}
+
+void ScTabOpDlg::RaiseError( ScTabOpErr eError )
+{
+    const OUString* pMsg = &errMsgNoFormula;
+    formula::RefEdit* pEd  = m_xEdFormulaRange.get();
+
+    switch ( eError )
+    {
+        case TABOPERR_NOFORMULA:
+            pMsg = &errMsgNoFormula;
+            pEd  = m_xEdFormulaRange.get();
+            break;
+
+        case TABOPERR_NOCOLROW:
+            pMsg = &errMsgNoColRow;
+            pEd  = m_xEdRowCell.get();
+            break;
+
+        case TABOPERR_WRONGFORMULA:
+            pMsg = &errMsgWrongFormula;
+            pEd  = m_xEdFormulaRange.get();
+            break;
+
+        case TABOPERR_WRONGROW:
+            pMsg = &errMsgWrongRowCol;
+            pEd  = m_xEdRowCell.get();
+            break;
+
+        case TABOPERR_NOCOLFORMULA:
+            pMsg = &errMsgNoColFormula;
+            pEd  = m_xEdFormulaRange.get();
+            break;
+
+        case TABOPERR_WRONGCOL:
+            pMsg = &errMsgWrongRowCol;
+            pEd  = m_xEdColCell.get();
+            break;
+
+        case TABOPERR_NOROWFORMULA:
+            pMsg = &errMsgNoRowFormula;
+            pEd  = m_xEdFormulaRange.get();
+            break;
+    }
+
+    std::unique_ptr<weld::MessageDialog> xBox(Application::CreateMessageDialog(m_xDialog.get(),
+                                              VclMessageType::Error, VclButtonsType::OkCancel, *pMsg));
+    xBox->run();
+    pEd->GrabFocus();
+}
+
+static bool lcl_Parse( const OUString& rString, const ScDocument& rDoc, SCTAB nCurTab,
+                ScRefAddress& rStart, ScRefAddress& rEnd )
+{
+    bool bRet = false;
+    const formula::FormulaGrammar::AddressConvention eConv = rDoc.GetAddressConvention();
+    if ( rString.indexOf(':') != -1 )
+        bRet = ConvertDoubleRef( rDoc, rString, nCurTab, rStart, rEnd, eConv );
+    else
+    {
+        bRet = ConvertSingleRef( rDoc, rString, nCurTab, rStart, eConv );
+        rEnd = rStart;
+    }
+    return bRet;
+}
+
+// Handler:
+
+IMPL_LINK(ScTabOpDlg, BtnHdl, weld::Button&, rBtn, void)
+{
+    if (&rBtn == m_xBtnOk.get())
+    {
+        ScTabOpParam::Mode eMode = ScTabOpParam::Column;
+        sal_uInt16 nError = 0;
+
+        // The following code checks:
+        // 1. do the strings contain correct cell references / defined names?
+        // 2. is formula range row if row is empty or column if column is empty
+        //    or single reference if both?
+        // 3. is at least one of row or column non-empty?
+
+        if (m_xEdFormulaRange->GetText().isEmpty())
+            nError = TABOPERR_NOFORMULA;
+        else if (m_xEdRowCell->GetText().isEmpty() &&
+                 m_xEdColCell->GetText().isEmpty())
+            nError = TABOPERR_NOCOLROW;
+        else if ( !lcl_Parse( m_xEdFormulaRange->GetText(), *pDoc, nCurTab,
+                                theFormulaCell, theFormulaEnd ) )
+            nError = TABOPERR_WRONGFORMULA;
+        else
+        {
+            const formula::FormulaGrammar::AddressConvention eConv = pDoc->GetAddressConvention();
+            if (!m_xEdRowCell->GetText().isEmpty())
+            {
+                if (!ConvertSingleRef( *pDoc, m_xEdRowCell->GetText(), nCurTab,
+                                       theRowCell, eConv ))
+                    nError = TABOPERR_WRONGROW;
+                else
+                {
+                    if (m_xEdColCell->GetText().isEmpty() &&
+                        theFormulaCell.Col() != theFormulaEnd.Col())
+                        nError = TABOPERR_NOCOLFORMULA;
+                    else
+                        eMode = ScTabOpParam::Row;
+                }
+            }
+            if (!m_xEdColCell->GetText().isEmpty())
+            {
+                if (!ConvertSingleRef( *pDoc, m_xEdColCell->GetText(), nCurTab,
+                                       theColCell, eConv ))
+                    nError = TABOPERR_WRONGCOL;
+                else
+                {
+                    if (eMode == ScTabOpParam::Row)                         // both
+                    {
+                        eMode = ScTabOpParam::Both;
+                        ConvertSingleRef( *pDoc, m_xEdFormulaRange->GetText(), nCurTab,
+                                          theFormulaCell, eConv );
+                    }
+                    else if (theFormulaCell.Row() != theFormulaEnd.Row())
+                        nError = TABOPERR_NOROWFORMULA;
+                    else
+                        eMode = ScTabOpParam::Column;
+                }
+            }
+        }
+
+        if (nError)
+            RaiseError( static_cast<ScTabOpErr>(nError) );
+        else
+        {
+            ScTabOpParam aOutParam(theFormulaCell, theFormulaEnd, theRowCell, theColCell, eMode);
+            ScTabOpItem  aOutItem( SID_TABOP, &aOutParam );
+
+            SetDispatcherLock( false );
+            SwitchToDocument();
+            GetBindings().GetDispatcher()->ExecuteList(SID_TABOP,
+                                      SfxCallMode::SLOT | SfxCallMode::RECORD,
+                                      { &aOutItem });
+            response(RET_OK);
+        }
+    }
+    else if (&rBtn == m_xBtnCancel.get())
+        response(RET_CANCEL);
+}
+
+IMPL_LINK( ScTabOpDlg, GetEditFocusHdl, formula::RefEdit&, rCtrl, void )
+{
+    if (&rCtrl == m_xEdFormulaRange.get())
+        m_pEdActive = m_xEdFormulaRange.get();
+    else if (&rCtrl == m_xEdRowCell.get())
+        m_pEdActive = m_xEdRowCell.get();
+    else if (&rCtrl == m_xEdColCell.get())
+        m_pEdActive = m_xEdColCell.get();
+    else
+        m_pEdActive = nullptr;
+
+    if( m_pEdActive )
+        m_pEdActive->SelectAll();
+}
+
+IMPL_LINK( ScTabOpDlg, GetButtonFocusHdl, formula::RefButton&, rCtrl, void )
+{
+    if (&rCtrl == m_xRBFormulaRange.get())
+        m_pEdActive = m_xEdFormulaRange.get();
+    else if (&rCtrl == m_xRBRowCell.get())
+        m_pEdActive = m_xEdRowCell.get();
+    else if (&rCtrl == m_xRBColCell.get())
+        m_pEdActive = m_xEdColCell.get();
+    else
+        m_pEdActive = nullptr;
+
+    if( m_pEdActive )
+        m_pEdActive->SelectAll();
+}
+
+IMPL_LINK_NOARG(ScTabOpDlg, LoseEditFocusHdl, formula::RefEdit&, void)
+{
+    bDlgLostFocus = !m_xDialog->has_toplevel_focus();
+}
+
+IMPL_LINK_NOARG(ScTabOpDlg, LoseButtonFocusHdl, formula::RefButton&, void)
+{
+    bDlgLostFocus = !m_xDialog->has_toplevel_focus();
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */