Line data Source code
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 :
22 : #include "cellsh.hxx"
23 : #include "tabvwsh.hxx"
24 : #include "global.hxx"
25 : #include "scmod.hxx"
26 : #include "inputhdl.hxx"
27 : #include "inputwin.hxx"
28 : #include "document.hxx"
29 : #include "sc.hrc"
30 :
31 : #include "vcl/svapp.hxx"
32 :
33 11 : void ScCellShell::ExecuteCursor( SfxRequest& rReq )
34 : {
35 11 : ScViewData* pData = GetViewData();
36 11 : ScTabViewShell* pTabViewShell = pData->GetViewShell();
37 11 : const SfxItemSet* pReqArgs = rReq.GetArgs();
38 11 : sal_uInt16 nSlotId = rReq.GetSlot();
39 11 : SCsCOLROW nRepeat = 1;
40 11 : sal_Bool bSel = false;
41 11 : sal_Bool bKeep = false;
42 :
43 11 : if ( pReqArgs != NULL )
44 : {
45 : const SfxPoolItem* pItem;
46 11 : if (pReqArgs->HasItem(FN_PARAM_1, &pItem))
47 0 : nRepeat = static_cast<SCsCOLROW>(((const SfxInt16Item*)pItem)->GetValue());
48 11 : if (pReqArgs->HasItem(FN_PARAM_2, &pItem))
49 0 : bSel = ((const SfxBoolItem*)pItem)->GetValue();
50 : }
51 : else
52 : {
53 : // evaluate locked selection mode
54 :
55 0 : sal_uInt16 nLocked = pTabViewShell->GetLockedModifiers();
56 0 : if ( nLocked & KEY_SHIFT )
57 0 : bSel = sal_True; // EXT
58 0 : else if ( nLocked & KEY_MOD1 )
59 : {
60 : // ADD mode: keep the selection, start a new block when marking with shift again
61 0 : bKeep = true;
62 : }
63 : }
64 :
65 11 : if (bSel)
66 : {
67 0 : switch (nSlotId)
68 : {
69 : case SID_CURSORDOWN:
70 0 : rReq.SetSlot(SID_CURSORDOWN_SEL);
71 0 : break;
72 : case SID_CURSORUP:
73 0 : rReq.SetSlot(SID_CURSORUP_SEL);
74 0 : break;
75 : case SID_CURSORRIGHT:
76 0 : rReq.SetSlot(SID_CURSORRIGHT_SEL);
77 0 : break;
78 : case SID_CURSORLEFT:
79 0 : rReq.SetSlot(SID_CURSORLEFT_SEL);
80 0 : break;
81 : case SID_CURSORPAGEDOWN:
82 0 : rReq.SetSlot(SID_CURSORPAGEDOWN_SEL);
83 0 : break;
84 : case SID_CURSORPAGEUP:
85 0 : rReq.SetSlot(SID_CURSORPAGEUP_SEL);
86 0 : break;
87 : case SID_CURSORPAGERIGHT:
88 0 : rReq.SetSlot(SID_CURSORPAGERIGHT_SEL);
89 0 : break;
90 : case SID_CURSORPAGELEFT:
91 0 : rReq.SetSlot(SID_CURSORPAGELEFT_SEL);
92 0 : break;
93 : case SID_CURSORBLKDOWN:
94 0 : rReq.SetSlot(SID_CURSORBLKDOWN_SEL);
95 0 : break;
96 : case SID_CURSORBLKUP:
97 0 : rReq.SetSlot(SID_CURSORBLKUP_SEL);
98 0 : break;
99 : case SID_CURSORBLKRIGHT:
100 0 : rReq.SetSlot(SID_CURSORBLKRIGHT_SEL);
101 0 : break;
102 : case SID_CURSORBLKLEFT:
103 0 : rReq.SetSlot(SID_CURSORBLKLEFT_SEL);
104 0 : break;
105 : default:
106 : ;
107 : }
108 0 : ExecuteCursorSel(rReq);
109 0 : return;
110 : }
111 :
112 11 : SCsCOLROW nRTLSign = 1;
113 11 : if ( pData->GetDocument()->IsLayoutRTL( pData->GetTabNo() ) )
114 : {
115 : //! evaluate cursor movement option?
116 0 : nRTLSign = -1;
117 : }
118 :
119 : // once extra, so that the cursor will not be painted too often with ExecuteInputDirect:
120 11 : pTabViewShell->HideAllCursors();
121 :
122 : //OS: once for all should do, however!
123 11 : pTabViewShell->ExecuteInputDirect();
124 11 : switch ( nSlotId )
125 : {
126 : case SID_CURSORDOWN:
127 0 : pTabViewShell->MoveCursorRel( 0, nRepeat, SC_FOLLOW_LINE, bSel, bKeep );
128 0 : break;
129 :
130 : case SID_CURSORBLKDOWN:
131 2 : pTabViewShell->MoveCursorArea( 0, nRepeat, SC_FOLLOW_JUMP, bSel, bKeep );
132 2 : break;
133 :
134 : case SID_CURSORUP:
135 0 : pTabViewShell->MoveCursorRel( 0, -nRepeat, SC_FOLLOW_LINE, bSel, bKeep );
136 0 : break;
137 :
138 : case SID_CURSORBLKUP:
139 3 : pTabViewShell->MoveCursorArea( 0, -nRepeat, SC_FOLLOW_JUMP, bSel, bKeep );
140 3 : break;
141 :
142 : case SID_CURSORLEFT:
143 0 : pTabViewShell->MoveCursorRel( static_cast<SCsCOL>(-nRepeat * nRTLSign), 0, SC_FOLLOW_LINE, bSel, bKeep );
144 0 : break;
145 :
146 : case SID_CURSORBLKLEFT:
147 3 : pTabViewShell->MoveCursorArea( static_cast<SCsCOL>(-nRepeat * nRTLSign), 0, SC_FOLLOW_JUMP, bSel, bKeep );
148 3 : break;
149 :
150 : case SID_CURSORRIGHT:
151 0 : pTabViewShell->MoveCursorRel( static_cast<SCsCOL>(nRepeat * nRTLSign), 0, SC_FOLLOW_LINE, bSel, bKeep );
152 0 : break;
153 :
154 : case SID_CURSORBLKRIGHT:
155 3 : pTabViewShell->MoveCursorArea( static_cast<SCsCOL>(nRepeat * nRTLSign), 0, SC_FOLLOW_JUMP, bSel, bKeep );
156 3 : break;
157 :
158 : case SID_CURSORPAGEDOWN:
159 0 : pTabViewShell->MoveCursorPage( 0, nRepeat, SC_FOLLOW_FIX, bSel, bKeep );
160 0 : break;
161 :
162 : case SID_CURSORPAGEUP:
163 0 : pTabViewShell->MoveCursorPage( 0, -nRepeat, SC_FOLLOW_FIX, bSel, bKeep );
164 0 : break;
165 :
166 : case SID_CURSORPAGERIGHT_: //XXX !!!
167 0 : pTabViewShell->MoveCursorPage( static_cast<SCsCOL>(nRepeat), 0, SC_FOLLOW_FIX, bSel, bKeep );
168 0 : break;
169 :
170 : case SID_CURSORPAGELEFT_: //XXX !!!
171 0 : pTabViewShell->MoveCursorPage( static_cast<SCsCOL>(-nRepeat), 0, SC_FOLLOW_FIX, bSel, bKeep );
172 0 : break;
173 :
174 : default:
175 : OSL_FAIL("Unknown message in ViewShell (Cursor)");
176 0 : return;
177 : }
178 :
179 11 : pTabViewShell->ShowAllCursors();
180 :
181 11 : rReq.AppendItem( SfxInt16Item(FN_PARAM_1, static_cast<sal_Int16>(nRepeat)) );
182 11 : rReq.AppendItem( SfxBoolItem(FN_PARAM_2, bSel) );
183 11 : rReq.Done();
184 : }
185 :
186 13 : void ScCellShell::GetStateCursor( SfxItemSet& /* rSet */ )
187 : {
188 13 : }
189 :
190 2 : void ScCellShell::ExecuteCursorSel( SfxRequest& rReq )
191 : {
192 2 : sal_uInt16 nSlotId = rReq.GetSlot();
193 2 : ScTabViewShell* pViewShell = GetViewData()->GetViewShell();
194 2 : ScInputHandler* pInputHdl = pViewShell->GetInputHandler();
195 2 : pViewShell->HideAllCursors();
196 2 : if (pInputHdl && pInputHdl->IsInputMode())
197 : {
198 : // the current cell is in edit mode. Commit the text before moving on.
199 0 : pViewShell->ExecuteInputDirect();
200 : }
201 :
202 2 : SCsCOLROW nRepeat = 1;
203 2 : const SfxItemSet* pReqArgs = rReq.GetArgs();
204 : // get repetition
205 2 : if ( pReqArgs != NULL )
206 : {
207 : const SfxPoolItem* pItem;
208 2 : if (pReqArgs->HasItem(FN_PARAM_1, &pItem))
209 2 : nRepeat = static_cast<SCsCOLROW>(((const SfxInt16Item*)pItem)->GetValue());
210 : }
211 :
212 2 : SCsROW nMovY = nRepeat;
213 : // Horizontal direction depends on whether or not the UI language is RTL.
214 2 : SCsCOL nMovX = nRepeat;
215 2 : if (GetViewData()->GetDocument()->IsLayoutRTL(GetViewData()->GetTabNo()))
216 : {
217 : // mirror horizontal movement for right-to-left mode.
218 0 : nMovX = -nRepeat;
219 : }
220 :
221 2 : switch (nSlotId)
222 : {
223 : case SID_CURSORDOWN_SEL:
224 1 : pViewShell->ExpandBlock(0, nMovY, SC_FOLLOW_LINE);
225 1 : break;
226 : case SID_CURSORUP_SEL:
227 0 : pViewShell->ExpandBlock(0, -nMovY, SC_FOLLOW_LINE);
228 0 : break;
229 : case SID_CURSORRIGHT_SEL:
230 1 : pViewShell->ExpandBlock(nMovX, 0, SC_FOLLOW_LINE);
231 1 : break;
232 : case SID_CURSORLEFT_SEL:
233 0 : pViewShell->ExpandBlock(-nMovX, 0, SC_FOLLOW_LINE);
234 0 : break;
235 : case SID_CURSORPAGEUP_SEL:
236 0 : pViewShell->ExpandBlockPage(0, -nMovY);
237 0 : break;
238 : case SID_CURSORPAGEDOWN_SEL:
239 0 : pViewShell->ExpandBlockPage(0, nMovY);
240 0 : break;
241 : case SID_CURSORPAGERIGHT_SEL:
242 0 : pViewShell->ExpandBlockPage(nMovX, 0);
243 0 : break;
244 : case SID_CURSORPAGELEFT_SEL:
245 0 : pViewShell->ExpandBlockPage(-nMovX, 0);
246 0 : break;
247 : case SID_CURSORBLKDOWN_SEL:
248 0 : pViewShell->ExpandBlockArea(0, nMovY);
249 0 : break;
250 : case SID_CURSORBLKUP_SEL:
251 0 : pViewShell->ExpandBlockArea(0, -nMovY);
252 0 : break;
253 : case SID_CURSORBLKRIGHT_SEL:
254 0 : pViewShell->ExpandBlockArea(nMovX , 0);
255 0 : break;
256 : case SID_CURSORBLKLEFT_SEL:
257 0 : pViewShell->ExpandBlockArea(-nMovX, 0);
258 0 : break;
259 : default:
260 : ;
261 : }
262 2 : pViewShell->ShowAllCursors();
263 :
264 2 : rReq.AppendItem( SfxInt16Item(FN_PARAM_1,static_cast<sal_Int16>(nRepeat)) );
265 2 : rReq.Done();
266 2 : }
267 :
268 0 : void ScCellShell::ExecuteMove( SfxRequest& rReq )
269 : {
270 0 : ScTabViewShell* pTabViewShell = GetViewData()->GetViewShell();
271 0 : sal_uInt16 nSlotId = rReq.GetSlot();
272 :
273 0 : if(nSlotId != SID_CURSORTOPOFSCREEN && nSlotId != SID_CURSORENDOFSCREEN)
274 0 : pTabViewShell->ExecuteInputDirect();
275 0 : switch ( nSlotId )
276 : {
277 : case SID_NEXT_TABLE:
278 : case SID_NEXT_TABLE_SEL:
279 0 : pTabViewShell->SelectNextTab( 1, (nSlotId == SID_NEXT_TABLE_SEL) );
280 0 : break;
281 :
282 : case SID_PREV_TABLE:
283 : case SID_PREV_TABLE_SEL:
284 0 : pTabViewShell->SelectNextTab( -1, (nSlotId == SID_PREV_TABLE_SEL) );
285 0 : break;
286 :
287 : // cursor movements in range do not originate from Basic,
288 : // because the ScSbxRange-object changes the marking at input
289 :
290 : case SID_NEXT_UNPROTECT:
291 0 : pTabViewShell->FindNextUnprot( false, !rReq.IsAPI() );
292 0 : break;
293 :
294 : case SID_PREV_UNPROTECT:
295 0 : pTabViewShell->FindNextUnprot( sal_True, !rReq.IsAPI() );
296 0 : break;
297 :
298 : case SID_CURSORENTERUP:
299 0 : if (rReq.IsAPI())
300 0 : pTabViewShell->MoveCursorRel( 0, -1, SC_FOLLOW_LINE, false );
301 : else
302 0 : pTabViewShell->MoveCursorEnter( sal_True );
303 0 : break;
304 :
305 : case SID_CURSORENTERDOWN:
306 0 : if (rReq.IsAPI())
307 0 : pTabViewShell->MoveCursorRel( 0, 1, SC_FOLLOW_LINE, false );
308 : else
309 0 : pTabViewShell->MoveCursorEnter( false );
310 0 : break;
311 :
312 : case SID_SELECT_COL:
313 0 : pTabViewShell->MarkColumns();
314 0 : break;
315 :
316 : case SID_SELECT_ROW:
317 0 : pTabViewShell->MarkRows();
318 0 : break;
319 :
320 : case SID_SELECT_NONE:
321 0 : pTabViewShell->Unmark();
322 0 : break;
323 :
324 : case SID_ALIGNCURSOR:
325 0 : pTabViewShell->AlignToCursor( GetViewData()->GetCurX(), GetViewData()->GetCurY(), SC_FOLLOW_JUMP );
326 0 : break;
327 :
328 : case SID_MARKDATAAREA:
329 0 : pTabViewShell->MarkDataArea();
330 0 : break;
331 :
332 : case SID_MARKARRAYFORMULA:
333 0 : pTabViewShell->MarkMatrixFormula();
334 0 : break;
335 :
336 : case SID_SETINPUTMODE:
337 0 : SC_MOD()->SetInputMode( SC_INPUT_TABLE );
338 0 : break;
339 :
340 : case SID_FOCUS_INPUTLINE:
341 : {
342 0 : ScInputHandler* pHdl = SC_MOD()->GetInputHdl( pTabViewShell );
343 0 : if (pHdl)
344 : {
345 0 : ScInputWindow* pWin = pHdl->GetInputWindow();
346 0 : if (pWin)
347 0 : pWin->SwitchToTextWin();
348 : }
349 : }
350 0 : break;
351 :
352 : case SID_CURSORTOPOFSCREEN:
353 0 : pTabViewShell->MoveCursorScreen( 0, -1, SC_FOLLOW_LINE, false );
354 0 : break;
355 :
356 : case SID_CURSORENDOFSCREEN:
357 0 : pTabViewShell->MoveCursorScreen( 0, 1, SC_FOLLOW_LINE, false );
358 0 : break;
359 :
360 : default:
361 : OSL_FAIL("Unknown message in ViewShell (Cursor)");
362 0 : return;
363 : }
364 :
365 0 : rReq.Done();
366 : }
367 :
368 0 : void ScCellShell::ExecutePageSel( SfxRequest& rReq )
369 : {
370 0 : sal_uInt16 nSlotId = rReq.GetSlot();
371 0 : switch ( nSlotId )
372 : {
373 0 : case SID_CURSORHOME_SEL: rReq.SetSlot( SID_CURSORHOME ); break;
374 0 : case SID_CURSOREND_SEL: rReq.SetSlot( SID_CURSOREND ); break;
375 0 : case SID_CURSORTOPOFFILE_SEL: rReq.SetSlot( SID_CURSORTOPOFFILE ); break;
376 0 : case SID_CURSORENDOFFILE_SEL: rReq.SetSlot( SID_CURSORENDOFFILE ); break;
377 : default:
378 : OSL_FAIL("Unknown message in ViewShell (ExecutePageSel)");
379 0 : return;
380 : }
381 0 : rReq.AppendItem( SfxBoolItem(FN_PARAM_2, sal_True) );
382 0 : ExecuteSlot( rReq, GetInterface() );
383 : }
384 :
385 0 : void ScCellShell::ExecutePage( SfxRequest& rReq )
386 : {
387 0 : ScTabViewShell* pTabViewShell = GetViewData()->GetViewShell();
388 0 : const SfxItemSet* pReqArgs = rReq.GetArgs();
389 0 : sal_uInt16 nSlotId = rReq.GetSlot();
390 0 : sal_Bool bSel = false;
391 0 : sal_Bool bKeep = false;
392 :
393 0 : if ( pReqArgs != NULL )
394 : {
395 : const SfxPoolItem* pItem;
396 0 : if (pReqArgs->HasItem(FN_PARAM_2, &pItem))
397 0 : bSel = ((const SfxBoolItem*)pItem)->GetValue();
398 : }
399 : else
400 : {
401 : // evaluate locked selection mode
402 :
403 0 : sal_uInt16 nLocked = pTabViewShell->GetLockedModifiers();
404 0 : if ( nLocked & KEY_SHIFT )
405 0 : bSel = sal_True; // EXT
406 0 : else if ( nLocked & KEY_MOD1 )
407 : {
408 : // ADD mode: keep the selection, start a new block when marking with shift again
409 0 : bKeep = true;
410 : }
411 : }
412 :
413 0 : pTabViewShell->ExecuteInputDirect();
414 0 : switch ( nSlotId )
415 : {
416 : case SID_CURSORHOME:
417 0 : pTabViewShell->MoveCursorEnd( -1, 0, SC_FOLLOW_LINE, bSel, bKeep );
418 0 : break;
419 :
420 : case SID_CURSOREND:
421 0 : pTabViewShell->MoveCursorEnd( 1, 0, SC_FOLLOW_JUMP, bSel, bKeep );
422 0 : break;
423 :
424 : case SID_CURSORTOPOFFILE:
425 0 : pTabViewShell->MoveCursorEnd( -1, -1, SC_FOLLOW_LINE, bSel, bKeep );
426 0 : break;
427 :
428 : case SID_CURSORENDOFFILE:
429 0 : pTabViewShell->MoveCursorEnd( 1, 1, SC_FOLLOW_JUMP, bSel, bKeep );
430 0 : break;
431 :
432 : default:
433 : OSL_FAIL("Unknown message in ViewShell (ExecutePage)");
434 0 : return;
435 : }
436 :
437 0 : rReq.AppendItem( SfxBoolItem(FN_PARAM_2, bSel) );
438 0 : rReq.Done();
439 93 : }
440 :
441 :
442 :
443 :
444 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|