sc/source/ui/view/cellsh4.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <sfx2/request.hxx>
  21 #include <osl/diagnose.h>
  22
  23 #include <cellsh.hxx>
  24 #include <tabvwsh.hxx>
  25 #include <global.hxx>
  26 #include <scmod.hxx>
  27 #include <inputhdl.hxx>
  28 #include <inputwin.hxx>
  29 #include <document.hxx>
  30 #include <officecfg/Office/Calc.hxx>
  31 #include <sc.hrc>
  32
  33 void ScCellShell::ExecuteCursor( SfxRequest& rReq )
  34 {
  35     ScViewData& rData = GetViewData();
  36     ScTabViewShell* pTabViewShell = rData.GetViewShell();
  37     const SfxItemSet*   pReqArgs = rReq.GetArgs();
  38     sal_uInt16          nSlotId  = rReq.GetSlot();
  39     SCCOLROW            nRepeat = 1;
  40     bool                bSel = false;
  41     bool                bKeep = false;
  42
  43     if ( pReqArgs != nullptr )
  44     {
  45         const   SfxPoolItem* pItem;
  46         if (pReqArgs->HasItem(FN_PARAM_1, &pItem))
  47             nRepeat = static_cast<SCCOLROW>(static_cast<const SfxInt16Item*>(pItem)->GetValue());
  48         if (pReqArgs->HasItem(FN_PARAM_2, &pItem))
  49             bSel = static_cast<const SfxBoolItem*>(pItem)->GetValue();
  50     }
  51     else
  52     {
  53         //  evaluate locked selection mode
  54
  55         sal_uInt16 nLocked = pTabViewShell->GetLockedModifiers();
  56         if ( nLocked & KEY_SHIFT )
  57             bSel = true;                // EXT
  58         else if ( nLocked & KEY_MOD1 )
  59         {
  60             // ADD mode: keep the selection, start a new block when marking with shift again
  61             bKeep = true;
  62         }
  63     }
  64
  65     if (bSel)
  66     {
  67         switch (nSlotId)
  68         {
  69             case SID_CURSORDOWN:
  70                 rReq.SetSlot(SID_CURSORDOWN_SEL);
  71             break;
  72             case SID_CURSORUP:
  73                 rReq.SetSlot(SID_CURSORUP_SEL);
  74             break;
  75             case SID_CURSORRIGHT:
  76                 rReq.SetSlot(SID_CURSORRIGHT_SEL);
  77             break;
  78             case SID_CURSORLEFT:
  79                 rReq.SetSlot(SID_CURSORLEFT_SEL);
  80             break;
  81             case SID_CURSORPAGEDOWN:
  82                 rReq.SetSlot(SID_CURSORPAGEDOWN_SEL);
  83             break;
  84             case SID_CURSORPAGEUP:
  85                 rReq.SetSlot(SID_CURSORPAGEUP_SEL);
  86             break;
  87             case SID_CURSORBLKDOWN:
  88                 rReq.SetSlot(SID_CURSORBLKDOWN_SEL);
  89             break;
  90             case SID_CURSORBLKUP:
  91                 rReq.SetSlot(SID_CURSORBLKUP_SEL);
  92             break;
  93             case SID_CURSORBLKRIGHT:
  94                 rReq.SetSlot(SID_CURSORBLKRIGHT_SEL);
  95             break;
  96             case SID_CURSORBLKLEFT:
  97                 rReq.SetSlot(SID_CURSORBLKLEFT_SEL);
  98             break;
  99             default:
 100                 ;
 101         }
 102         ExecuteCursorSel(rReq);
 103         return;
 104     }
 105
 106     SCCOLROW nRTLSign = 1;
 107     if ( rData.GetDocument().IsLayoutRTL( rData.GetTabNo() ) )
 108     {
 109         //! evaluate cursor movement option?
 110         nRTLSign = -1;
 111     }
 112
 113     // once extra, so that the cursor will not be painted too often with ExecuteInputDirect:
 114     pTabViewShell->HideAllCursors();
 115
 116     // #i123629#
 117     if( pTabViewShell->GetCurObjectSelectionType() == OST_Editing )
 118         pTabViewShell->SetForceFocusOnCurCell(true);
 119     else
 120         pTabViewShell->SetForceFocusOnCurCell(false);
 121
 122     // If ScrollLock key is active, cell cursor stays on the current cell while
 123     // scrolling the grid.
 124     bool bScrollLock = false;
 125     // tdf#112876 - allow to disable for special keyboards
 126     if (officecfg::Office::Calc::Input::UseScrollLock::get())
 127     {
 128         KeyIndicatorState eState = pFrameWin->GetIndicatorState();
 129         if (eState & KeyIndicatorState::SCROLLLOCK)
 130             bScrollLock = true;
 131     }
 132     //OS: once for all should do, however!
 133     pTabViewShell->ExecuteInputDirect();
 134     switch ( nSlotId )
 135     {
 136         case SID_CURSORDOWN:
 137             if (bScrollLock)
 138                 pTabViewShell->ScrollY( nRepeat, SC_SPLIT_BOTTOM );
 139             else
 140                 pTabViewShell->MoveCursorRel( 0, nRepeat, SC_FOLLOW_LINE, bSel, bKeep );
 141             break;
 142
 143         case SID_CURSORBLKDOWN:
 144             pTabViewShell->MoveCursorArea( 0, nRepeat, SC_FOLLOW_JUMP, bSel, bKeep, !rReq.IsAPI() );
 145             break;
 146
 147         case SID_CURSORUP:
 148             if (bScrollLock)
 149                 pTabViewShell->ScrollY( -nRepeat, SC_SPLIT_BOTTOM);
 150             else
 151                 pTabViewShell->MoveCursorRel( 0, -nRepeat, SC_FOLLOW_LINE, bSel, bKeep );
 152             break;
 153
 154         case SID_CURSORBLKUP:
 155             pTabViewShell->MoveCursorArea( 0, -nRepeat, SC_FOLLOW_JUMP, bSel, bKeep, !rReq.IsAPI() );
 156             break;
 157
 158         case SID_CURSORLEFT:
 159             if (bScrollLock)
 160                 pTabViewShell->ScrollX( static_cast<SCCOL>(-nRepeat * nRTLSign), SC_SPLIT_LEFT);
 161             else
 162                 pTabViewShell->MoveCursorRel( static_cast<SCCOL>(-nRepeat * nRTLSign), 0, SC_FOLLOW_LINE, bSel, bKeep );
 163             break;
 164
 165         case SID_CURSORBLKLEFT:
 166             pTabViewShell->MoveCursorArea( static_cast<SCCOL>(-nRepeat * nRTLSign), 0, SC_FOLLOW_JUMP, bSel, bKeep, !rReq.IsAPI() );
 167             break;
 168
 169         case SID_CURSORRIGHT:
 170             if (bScrollLock)
 171                 pTabViewShell->ScrollX( static_cast<SCCOL>(nRepeat * nRTLSign), SC_SPLIT_LEFT);
 172             else
 173                 pTabViewShell->MoveCursorRel( static_cast<SCCOL>(nRepeat * nRTLSign), 0, SC_FOLLOW_LINE, bSel, bKeep );
 174             break;
 175
 176         case SID_CURSORBLKRIGHT:
 177             pTabViewShell->MoveCursorArea( static_cast<SCCOL>(nRepeat * nRTLSign), 0, SC_FOLLOW_JUMP, bSel, bKeep, !rReq.IsAPI() );
 178             break;
 179
 180         case SID_CURSORPAGEDOWN:
 181             if (bScrollLock)
 182             {
 183                 SCCOL nPageX;
 184                 SCROW nPageY;
 185                 pTabViewShell->GetPageMoveEndPosition( 0, nRepeat, nPageX, nPageY);
 186                 pTabViewShell->ScrollY( nPageY, SC_SPLIT_BOTTOM);
 187             }
 188             else
 189                 pTabViewShell->MoveCursorPage( 0, nRepeat, SC_FOLLOW_FIX, bSel, bKeep );
 190             break;
 191
 192         case SID_CURSORPAGEUP:
 193             if (bScrollLock)
 194             {
 195                 SCCOL nPageX;
 196                 SCROW nPageY;
 197                 pTabViewShell->GetPageMoveEndPosition( 0, nRepeat, nPageX, nPageY);
 198                 pTabViewShell->ScrollY( -nPageY, SC_SPLIT_BOTTOM);
 199             }
 200             else
 201                 pTabViewShell->MoveCursorPage( 0, -nRepeat, SC_FOLLOW_FIX, bSel, bKeep );
 202             break;
 203
 204         case SID_CURSORPAGERIGHT_: //XXX !!!
 205             if (bScrollLock)
 206             {
 207                 SCCOL nPageX;
 208                 SCROW nPageY;
 209                 pTabViewShell->GetPageMoveEndPosition( static_cast<SCCOL>(nRepeat), 0, nPageX, nPageY);
 210                 pTabViewShell->ScrollX( nPageX, SC_SPLIT_LEFT);
 211             }
 212             else
 213                 pTabViewShell->MoveCursorPage( static_cast<SCCOL>(nRepeat), 0, SC_FOLLOW_FIX, bSel, bKeep );
 214             break;
 215
 216         case SID_CURSORPAGELEFT_: //XXX !!!
 217             if (bScrollLock)
 218             {
 219                 SCCOL nPageX;
 220                 SCROW nPageY;
 221                 pTabViewShell->GetPageMoveEndPosition( static_cast<SCCOL>(nRepeat), 0, nPageX, nPageY);
 222                 pTabViewShell->ScrollX( -nPageX, SC_SPLIT_LEFT);
 223             }
 224             else
 225                 pTabViewShell->MoveCursorPage( static_cast<SCCOL>(-nRepeat), 0, SC_FOLLOW_FIX, bSel, bKeep );
 226             break;
 227
 228         default:
 229             OSL_FAIL("Unknown message in ViewShell (Cursor)");
 230             return;
 231     }
 232
 233     pTabViewShell->ShowAllCursors();
 234
 235     rReq.AppendItem( SfxInt16Item(FN_PARAM_1, static_cast<sal_Int16>(nRepeat)) );
 236     rReq.AppendItem( SfxBoolItem(FN_PARAM_2, bSel) );
 237     rReq.Done();
 238 }
 239
 240 void ScCellShell::GetStateCursor( SAL_UNUSED_PARAMETER SfxItemSet& /* rSet */ )
 241 {
 242 }
 243
 244 void ScCellShell::ExecuteCursorSel( SfxRequest& rReq )
 245 {
 246     sal_uInt16 nSlotId  = rReq.GetSlot();
 247     ScTabViewShell* pViewShell = GetViewData().GetViewShell();
 248     ScInputHandler* pInputHdl = pViewShell->GetInputHandler();
 249     pViewShell->HideAllCursors();
 250     if (pInputHdl && pInputHdl->IsInputMode())
 251     {
 252         // the current cell is in edit mode.  Commit the text before moving on.
 253         pViewShell->ExecuteInputDirect();
 254     }
 255
 256     SCCOLROW nRepeat = 1;
 257     const SfxItemSet* pReqArgs = rReq.GetArgs();
 258     // get repetition
 259     if ( pReqArgs != nullptr )
 260     {
 261         const SfxPoolItem* pItem;
 262         if (pReqArgs->HasItem(FN_PARAM_1, &pItem))
 263             nRepeat = static_cast<SCCOLROW>(static_cast<const SfxInt16Item*>(pItem)->GetValue());
 264     }
 265
 266     SCROW nMovY = nRepeat;
 267     // Horizontal direction depends on whether or not the UI language is RTL.
 268     SCCOL nMovX = nRepeat;
 269     if (GetViewData().GetDocument().IsLayoutRTL(GetViewData().GetTabNo()))
 270     {
 271         // mirror horizontal movement for right-to-left mode.
 272         nMovX = -nRepeat;
 273     }
 274
 275     switch (nSlotId)
 276     {
 277         case SID_CURSORDOWN_SEL:
 278             pViewShell->ExpandBlock(0, nMovY, SC_FOLLOW_LINE);
 279         break;
 280         case SID_CURSORUP_SEL:
 281             pViewShell->ExpandBlock(0, -nMovY, SC_FOLLOW_LINE);
 282         break;
 283         case SID_CURSORRIGHT_SEL:
 284             pViewShell->ExpandBlock(nMovX, 0, SC_FOLLOW_LINE);
 285         break;
 286         case SID_CURSORLEFT_SEL:
 287             pViewShell->ExpandBlock(-nMovX, 0, SC_FOLLOW_LINE);
 288         break;
 289         case SID_CURSORPAGEUP_SEL:
 290             pViewShell->ExpandBlockPage(0, -nMovY);
 291         break;
 292         case SID_CURSORPAGEDOWN_SEL:
 293             pViewShell->ExpandBlockPage(0, nMovY);
 294         break;
 295         case SID_CURSORPAGERIGHT_SEL:
 296             pViewShell->ExpandBlockPage(nMovX, 0);
 297         break;
 298         case SID_CURSORPAGELEFT_SEL:
 299             pViewShell->ExpandBlockPage(-nMovX, 0);
 300         break;
 301         case SID_CURSORBLKDOWN_SEL:
 302             pViewShell->ExpandBlockArea(0, nMovY);
 303         break;
 304         case SID_CURSORBLKUP_SEL:
 305             pViewShell->ExpandBlockArea(0, -nMovY);
 306         break;
 307         case SID_CURSORBLKRIGHT_SEL:
 308             pViewShell->ExpandBlockArea(nMovX , 0);
 309         break;
 310         case SID_CURSORBLKLEFT_SEL:
 311             pViewShell->ExpandBlockArea(-nMovX, 0);
 312         break;
 313         default:
 314             ;
 315     }
 316     pViewShell->ShowAllCursors();
 317
 318     rReq.AppendItem( SfxInt16Item(FN_PARAM_1,static_cast<sal_Int16>(nRepeat)) );
 319     rReq.Done();
 320 }
 321
 322 void ScCellShell::ExecuteMove( SfxRequest& rReq )
 323 {
 324     ScTabViewShell* pTabViewShell   = GetViewData().GetViewShell();
 325     sal_uInt16 nSlotId  = rReq.GetSlot();
 326     const SfxItemSet* pReqArgs = rReq.GetArgs();
 327
 328     if(nSlotId != SID_CURSORTOPOFSCREEN && nSlotId != SID_CURSORENDOFSCREEN)
 329         pTabViewShell->ExecuteInputDirect();
 330     switch ( nSlotId )
 331     {
 332         case SID_NEXT_TABLE:
 333         case SID_NEXT_TABLE_SEL:
 334             pTabViewShell->SelectNextTab( 1, (nSlotId == SID_NEXT_TABLE_SEL) );
 335             break;
 336
 337         case SID_PREV_TABLE:
 338         case SID_PREV_TABLE_SEL:
 339             pTabViewShell->SelectNextTab( -1, (nSlotId == SID_PREV_TABLE_SEL) );
 340             break;
 341
 342         //  cursor movements in range do not originate from Basic,
 343         //  because the ScSbxRange-object changes the marking at input
 344
 345         case SID_NEXT_UNPROTECT:
 346             pTabViewShell->FindNextUnprot( false, !rReq.IsAPI() );
 347             break;
 348
 349         case SID_PREV_UNPROTECT:
 350             pTabViewShell->FindNextUnprot( true, !rReq.IsAPI() );
 351             break;
 352
 353         case SID_CURSORENTERUP:
 354             if (rReq.IsAPI())
 355                 pTabViewShell->MoveCursorRel( 0, -1, SC_FOLLOW_LINE, false );
 356             else
 357                 pTabViewShell->MoveCursorEnter( true );
 358             break;
 359
 360         case SID_CURSORENTERDOWN:
 361             if (rReq.IsAPI())
 362                 pTabViewShell->MoveCursorRel( 0, 1, SC_FOLLOW_LINE, false );
 363             else
 364                 pTabViewShell->MoveCursorEnter( false );
 365             break;
 366
 367         case SID_SELECT_COL:
 368             if (const SfxPoolItem *pColItem, *pModifierItem;
 369                 pReqArgs && pReqArgs->HasItem(FN_PARAM_1, &pColItem)
 370                 && pReqArgs->HasItem(FN_PARAM_2, &pModifierItem))
 371             {
 372                 SCCOL nCol = static_cast<SCCOL>(static_cast<const SfxInt32Item*>(pColItem)->GetValue());
 373                 sal_Int16 nModifier = static_cast<const SfxInt16Item*>(pModifierItem)->GetValue();
 374
 375                 pTabViewShell->MarkColumns( nCol, nModifier );
 376             }
 377             else
 378                 pTabViewShell->MarkColumns();
 379             break;
 380
 381         case SID_SELECT_ROW:
 382             if (const SfxPoolItem *pRowItem, *pModifierItem;
 383                 pReqArgs && pReqArgs->HasItem(FN_PARAM_1, &pRowItem)
 384                 && pReqArgs->HasItem(FN_PARAM_2, &pModifierItem))
 385             {
 386                 SCROW nRow = static_cast<SCROW>(static_cast<const SfxInt32Item*>(pRowItem)->GetValue());
 387                 sal_Int16 nModifier = static_cast<const SfxInt16Item*>(pModifierItem)->GetValue();
 388
 389                 pTabViewShell->MarkRows( nRow, nModifier );
 390             }
 391             else
 392                 pTabViewShell->MarkRows();
 393             break;
 394
 395         case SID_SELECT_NONE:
 396             pTabViewShell->Unmark();
 397             break;
 398
 399         case SID_ALIGNCURSOR:
 400             pTabViewShell->AlignToCursor( GetViewData().GetCurX(), GetViewData().GetCurY(), SC_FOLLOW_JUMP );
 401             break;
 402
 403         case SID_MARKDATAAREA:
 404             pTabViewShell->MarkDataArea();
 405             break;
 406
 407         case SID_MARKARRAYFORMULA:
 408             pTabViewShell->MarkMatrixFormula();
 409             break;
 410
 411         case SID_SETINPUTMODE:
 412             ScModule::get()->SetInputMode(SC_INPUT_TABLE);
 413             break;
 414
 415         case SID_FOCUS_INPUTLINE:
 416             if (ScInputHandler* pHdl = ScModule::get()->GetInputHdl(pTabViewShell))
 417                 if (ScInputWindow* pWin = pHdl->GetInputWindow())
 418                     pWin->SwitchToTextWin();
 419             break;
 420
 421         case SID_CURSORTOPOFSCREEN:
 422             pTabViewShell->MoveCursorScreen( 0, -1, SC_FOLLOW_LINE, false );
 423             break;
 424
 425         case SID_CURSORENDOFSCREEN:
 426             pTabViewShell->MoveCursorScreen( 0, 1, SC_FOLLOW_LINE, false );
 427             break;
 428
 429         default:
 430             OSL_FAIL("Unknown message in ViewShell (Cursor)");
 431             return;
 432     }
 433
 434     rReq.Done();
 435 }
 436
 437 void ScCellShell::ExecutePageSel( SfxRequest& rReq )
 438 {
 439     sal_uInt16              nSlotId  = rReq.GetSlot();
 440     switch ( nSlotId )
 441     {
 442         case SID_CURSORHOME_SEL:        rReq.SetSlot( SID_CURSORHOME );  break;
 443         case SID_CURSOREND_SEL:         rReq.SetSlot( SID_CURSOREND );  break;
 444         case SID_CURSORTOPOFFILE_SEL:   rReq.SetSlot( SID_CURSORTOPOFFILE );  break;
 445         case SID_CURSORENDOFFILE_SEL:   rReq.SetSlot( SID_CURSORENDOFFILE );  break;
 446         default:
 447             OSL_FAIL("Unknown message in ViewShell (ExecutePageSel)");
 448             return;
 449     }
 450     rReq.AppendItem( SfxBoolItem(FN_PARAM_2, true) );
 451     ExecuteSlot( rReq, GetInterface() );
 452 }
 453
 454 void ScCellShell::ExecutePage( SfxRequest& rReq )
 455 {
 456     ScTabViewShell* pTabViewShell   = GetViewData().GetViewShell();
 457     const SfxItemSet*   pReqArgs = rReq.GetArgs();
 458     sal_uInt16              nSlotId  = rReq.GetSlot();
 459     bool                bSel = false;
 460     bool                bKeep = false;
 461
 462     if ( pReqArgs != nullptr )
 463     {
 464         const   SfxPoolItem* pItem;
 465         if (pReqArgs->HasItem(FN_PARAM_2, &pItem))
 466             bSel = static_cast<const SfxBoolItem*>(pItem)->GetValue();
 467     }
 468     else
 469     {
 470         //  evaluate locked selection mode
 471
 472         sal_uInt16 nLocked = pTabViewShell->GetLockedModifiers();
 473         if ( nLocked & KEY_SHIFT )
 474             bSel = true;                // EXT
 475         else if ( nLocked & KEY_MOD1 )
 476         {
 477             // ADD mode: keep the selection, start a new block when marking with shift again
 478             bKeep = true;
 479         }
 480     }
 481
 482     pTabViewShell->ExecuteInputDirect();
 483     switch ( nSlotId )
 484     {
 485         case SID_CURSORHOME:
 486             pTabViewShell->MoveCursorEnd( -1, 0, SC_FOLLOW_LINE, bSel, bKeep );
 487             break;
 488
 489         case SID_CURSOREND:
 490             pTabViewShell->MoveCursorEnd( 1, 0, SC_FOLLOW_JUMP, bSel, bKeep );
 491             break;
 492
 493         case SID_CURSORTOPOFFILE:
 494             pTabViewShell->MoveCursorEnd( -1, -1, SC_FOLLOW_LINE, bSel, bKeep );
 495             break;
 496
 497         case SID_CURSORENDOFFILE:
 498             pTabViewShell->MoveCursorEnd( 1, 1, SC_FOLLOW_JUMP_END, bSel, bKeep );
 499             break;
 500
 501         default:
 502             OSL_FAIL("Unknown message in ViewShell (ExecutePage)");
 503             return;
 504     }
 505
 506     rReq.AppendItem( SfxBoolItem(FN_PARAM_2, bSel) );
 507     rReq.Done();
 508 }
 509
 510 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */