1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
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/.
9 * This file incorporates work covered by the following license notice:
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 .
20 #include <config_feature_desktop.h>
22 #include <toolkit/awt/vclxwindows.hxx>
23 #include <toolkit/helper/accessiblefactory.hxx>
24 #include <vcl/accessiblefactory.hxx>
25 #include <standard/vclxaccessiblebutton.hxx>
26 #include <standard/vclxaccessiblecheckbox.hxx>
27 #include <standard/vclxaccessibledropdowncombobox.hxx>
28 #include <standard/vclxaccessiblecombobox.hxx>
29 #include <standard/vclxaccessibledropdownlistbox.hxx>
30 #include <standard/vclxaccessibleedit.hxx>
31 #include <standard/vclxaccessiblefixedhyperlink.hxx>
32 #include <standard/vclxaccessiblefixedtext.hxx>
33 #include <standard/vclxaccessibleheaderbar.hxx>
34 #include <standard/vclxaccessiblelistbox.hxx>
35 #include <standard/vclxaccessibleradiobutton.hxx>
36 #include <standard/vclxaccessiblescrollbar.hxx>
37 #include <standard/vclxaccessibletoolbox.hxx>
38 #include <toolkit/awt/vclxaccessiblecomponent.hxx>
39 #include <standard/vclxaccessiblestatusbar.hxx>
40 #include <standard/vclxaccessibletabcontrol.hxx>
41 #include <standard/vclxaccessibletabpagewindow.hxx>
42 #include <standard/vclxaccessiblemenubar.hxx>
43 #include <standard/vclxaccessiblepopupmenu.hxx>
44 #include <extended/accessibletablistbox.hxx>
45 #include <extended/AccessibleBrowseBox.hxx>
46 #include <extended/accessibleiconchoicectrl.hxx>
47 #include <extended/accessibletabbar.hxx>
48 #include <extended/accessiblelistbox.hxx>
49 #include <extended/AccessibleBrowseBoxHeaderBar.hxx>
50 #include <extended/textwindowaccessibility.hxx>
51 #include <extended/AccessibleBrowseBoxTableCell.hxx>
52 #include <extended/AccessibleBrowseBoxHeaderCell.hxx>
53 #include <extended/AccessibleBrowseBoxCheckBoxCell.hxx>
54 #include <extended/accessibleeditbrowseboxcell.hxx>
55 #include <com/sun/star/accessibility/AccessibleRole.hpp>
56 #include <vcl/lstbox.hxx>
57 #include <vcl/combobox.hxx>
58 #include <extended/AccessibleGridControl.hxx>
59 #include <vcl/accessibletable.hxx>
60 #include <vcl/popupmenuwindow.hxx>
62 #include <floatingwindowaccessible.hxx>
64 using namespace ::accessibility
;
65 using namespace ::com::sun::star::uno
;
66 using namespace ::com::sun::star::awt
;
67 using namespace ::com::sun::star::accessibility
;
68 using namespace ::vcl
;
69 using namespace ::vcl::table
;
73 bool hasFloatingChild(vcl::Window
*pWindow
)
75 vcl::Window
* pChild
= pWindow
->GetAccessibleChildWindow(0);
76 return pChild
&& pChild
->GetType() == WindowType::FLOATINGWINDOW
;
80 class AccessibleFactory
:public ::toolkit::IAccessibleFactory
81 ,public ::vcl::IAccessibleFactory
86 // ::toolkit::IAccessibleFactory
87 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
88 createAccessibleContext( VCLXButton
* _pXWindow
) override
;
89 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
90 createAccessibleContext( VCLXCheckBox
* _pXWindow
) override
;
91 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
92 createAccessibleContext( VCLXRadioButton
* _pXWindow
) override
;
93 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
94 createAccessibleContext( VCLXListBox
* _pXWindow
) override
;
95 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
96 createAccessibleContext( VCLXFixedText
* _pXWindow
) override
;
97 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
98 createAccessibleContext( VCLXFixedHyperlink
* _pXWindow
) override
;
99 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
100 createAccessibleContext( VCLXScrollBar
* _pXWindow
) override
;
101 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
102 createAccessibleContext( VCLXEdit
* _pXWindow
) override
;
103 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
104 createAccessibleContext( VCLXComboBox
* _pXWindow
) override
;
105 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
106 createAccessibleContext( VCLXToolBox
* _pXWindow
) override
;
107 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
108 createAccessibleContext( VCLXHeaderBar
* _pXWindow
) override
;
109 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
110 createAccessibleContext( VCLXWindow
* _pXWindow
) override
;
111 virtual css::uno::Reference
< css::accessibility::XAccessible
>
112 createAccessible( Menu
* _pMenu
, bool _bIsMenuBar
) override
;
114 // ::vcl::IAccessibleFactory
115 virtual vcl::IAccessibleTabListBox
*
116 createAccessibleTabListBox(
117 const css::uno::Reference
< css::accessibility::XAccessible
>& rxParent
,
118 SvHeaderTabListBox
& rBox
121 virtual vcl::IAccessibleBrowseBox
*
122 createAccessibleBrowseBox(
123 const css::uno::Reference
< css::accessibility::XAccessible
>& _rxParent
,
124 vcl::IAccessibleTableProvider
& _rBrowseBox
127 virtual IAccessibleTableControl
*
128 createAccessibleTableControl(
129 const css::uno::Reference
< css::accessibility::XAccessible
>& _rxParent
,
130 IAccessibleTable
& _rTable
133 virtual css::uno::Reference
< css::accessibility::XAccessible
>
134 createAccessibleIconChoiceCtrl(
135 SvtIconChoiceCtrl
& _rIconCtrl
,
136 const css::uno::Reference
< css::accessibility::XAccessible
>& _xParent
139 virtual css::uno::Reference
< css::accessibility::XAccessible
>
140 createAccessibleTabBar(
144 virtual css::uno::Reference
< css::accessibility::XAccessibleContext
>
145 createAccessibleTextWindowContext(
146 VCLXWindow
* pVclXWindow
, TextEngine
& rEngine
, TextView
& rView
149 virtual css::uno::Reference
< css::accessibility::XAccessible
>
150 createAccessibleTreeListBox(
151 SvTreeListBox
& _rListBox
,
152 const css::uno::Reference
< css::accessibility::XAccessible
>& _xParent
155 virtual css::uno::Reference
< css::accessibility::XAccessible
>
156 createAccessibleBrowseBoxHeaderBar(
157 const css::uno::Reference
< css::accessibility::XAccessible
>& rxParent
,
158 vcl::IAccessibleTableProvider
& _rOwningTable
,
159 vcl::AccessibleBrowseBoxObjType _eObjType
162 virtual css::uno::Reference
< css::accessibility::XAccessible
>
163 createAccessibleBrowseBoxTableCell(
164 const css::uno::Reference
< css::accessibility::XAccessible
>& _rxParent
,
165 vcl::IAccessibleTableProvider
& _rBrowseBox
,
166 const css::uno::Reference
< css::awt::XWindow
>& _xFocusWindow
,
172 virtual css::uno::Reference
< css::accessibility::XAccessible
>
173 createAccessibleBrowseBoxHeaderCell(
174 sal_Int32 _nColumnRowId
,
175 const css::uno::Reference
< css::accessibility::XAccessible
>& rxParent
,
176 vcl::IAccessibleTableProvider
& _rBrowseBox
,
177 const css::uno::Reference
< css::awt::XWindow
>& _xFocusWindow
,
178 vcl::AccessibleBrowseBoxObjType _eObjType
181 virtual css::uno::Reference
< css::accessibility::XAccessible
>
182 createAccessibleCheckBoxCell(
183 const css::uno::Reference
< css::accessibility::XAccessible
>& _rxParent
,
184 vcl::IAccessibleTableProvider
& _rBrowseBox
,
185 const css::uno::Reference
< css::awt::XWindow
>& _xFocusWindow
,
188 const TriState
& _eState
,
192 virtual css::uno::Reference
< css::accessibility::XAccessible
>
193 createEditBrowseBoxTableCellAccess(
194 const css::uno::Reference
< css::accessibility::XAccessible
>& _rxParent
,
195 const css::uno::Reference
< css::accessibility::XAccessible
>& _rxControlAccessible
,
196 const css::uno::Reference
< css::awt::XWindow
>& _rxFocusWindow
,
197 vcl::IAccessibleTableProvider
& _rBrowseBox
,
203 virtual ~AccessibleFactory() override
;
206 AccessibleFactory::AccessibleFactory()
210 AccessibleFactory::~AccessibleFactory()
214 Reference
< XAccessible
> AccessibleFactory::createAccessible( Menu
* _pMenu
, bool _bIsMenuBar
)
216 OAccessibleMenuBaseComponent
* pAccessible
;
218 pAccessible
= new VCLXAccessibleMenuBar( _pMenu
);
220 pAccessible
= new VCLXAccessiblePopupMenu( _pMenu
);
221 pAccessible
->SetStates();
225 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXButton
* _pXWindow
)
227 return new VCLXAccessibleButton( _pXWindow
);
230 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXCheckBox
* _pXWindow
)
232 return new VCLXAccessibleCheckBox( _pXWindow
);
235 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXRadioButton
* _pXWindow
)
237 return new VCLXAccessibleRadioButton( _pXWindow
);
240 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXListBox
* _pXWindow
)
242 bool bIsDropDownBox
= false;
243 VclPtr
< ListBox
> pBox
= _pXWindow
->GetAs
< ListBox
>();
245 bIsDropDownBox
= ( ( pBox
->GetStyle() & WB_DROPDOWN
) == WB_DROPDOWN
);
247 if ( bIsDropDownBox
)
248 return new VCLXAccessibleDropDownListBox( _pXWindow
);
250 return new VCLXAccessibleListBox( _pXWindow
);
253 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXFixedText
* _pXWindow
)
255 return new VCLXAccessibleFixedText( _pXWindow
);
258 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXFixedHyperlink
* _pXWindow
)
260 return new VCLXAccessibleFixedHyperlink( _pXWindow
);
263 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXScrollBar
* _pXWindow
)
265 return new VCLXAccessibleScrollBar( _pXWindow
);
268 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXEdit
* _pXWindow
)
270 return new VCLXAccessibleEdit( _pXWindow
);
273 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXComboBox
* _pXWindow
)
275 bool bIsDropDownBox
= false;
276 VclPtr
< ComboBox
> pBox
= _pXWindow
->GetAs
< ComboBox
>();
278 bIsDropDownBox
= ( ( pBox
->GetStyle() & WB_DROPDOWN
) == WB_DROPDOWN
);
280 if ( bIsDropDownBox
)
281 return new VCLXAccessibleDropDownComboBox( _pXWindow
);
283 return new VCLXAccessibleComboBox( _pXWindow
);
286 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXWindow
* _pXWindow
)
288 Reference
< XAccessibleContext
> xContext
;
290 VclPtr
<vcl::Window
> pWindow
= _pXWindow
->GetWindow();
293 WindowType nType
= pWindow
->GetType();
295 if ( nType
== WindowType::MENUBARWINDOW
|| pWindow
->IsMenuFloatingWindow() || pWindow
->IsToolbarFloatingWindow() )
297 Reference
< XAccessible
> xAcc( pWindow
->GetAccessible() );
300 Reference
< XAccessibleContext
> xCont( xAcc
->getAccessibleContext() );
301 if ( pWindow
->GetType() == WindowType::MENUBARWINDOW
||
302 ( xCont
.is() && xCont
->getAccessibleRole() == AccessibleRole::POPUP_MENU
) )
309 else if ( nType
== WindowType::STATUSBAR
)
311 xContext
= new VCLXAccessibleStatusBar(_pXWindow
);
314 else if ( nType
== WindowType::TABCONTROL
)
316 xContext
= new VCLXAccessibleTabControl(_pXWindow
);
319 else if ( nType
== WindowType::TABPAGE
&& pWindow
->GetAccessibleParentWindow() && pWindow
->GetAccessibleParentWindow()->GetType() == WindowType::TABCONTROL
)
321 xContext
= new VCLXAccessibleTabPageWindow( _pXWindow
);
324 else if ( nType
== WindowType::FLOATINGWINDOW
)
326 xContext
= new FloatingWindowAccessible( _pXWindow
);
329 else if ( nType
== WindowType::BORDERWINDOW
&& hasFloatingChild( pWindow
) )
331 // The logic here has to match that of Window::GetAccessibleParentWindow in
332 // vcl/source/window/window.cxx to avoid PopupMenuFloatingWindow
333 // becoming a11y parents of themselves
334 vcl::Window
* pChild
= pWindow
->GetAccessibleChildWindow(0);
335 if (PopupMenuFloatingWindow::isPopupMenu(pChild
))
337 // Get the accessible context from the child window.
338 Reference
<XAccessible
> xAccessible
= pChild
->CreateAccessible();
339 if (xAccessible
.is())
340 xContext
= xAccessible
->getAccessibleContext();
343 xContext
= new FloatingWindowAccessible( _pXWindow
);
346 else if ( ( nType
== WindowType::HELPTEXTWINDOW
) || ( nType
== WindowType::FIXEDLINE
) )
348 xContext
= new VCLXAccessibleFixedText(_pXWindow
);
352 xContext
= new VCLXAccessibleComponent(_pXWindow
);
358 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXToolBox
* _pXWindow
)
360 return new VCLXAccessibleToolBox( _pXWindow
);
363 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleContext( VCLXHeaderBar
* _pXWindow
)
365 return new VCLXAccessibleHeaderBar(_pXWindow
);
368 vcl::IAccessibleTabListBox
* AccessibleFactory::createAccessibleTabListBox(
369 const Reference
< XAccessible
>& rxParent
, SvHeaderTabListBox
& rBox
) const
371 return new AccessibleTabListBox( rxParent
, rBox
);
374 vcl::IAccessibleBrowseBox
* AccessibleFactory::createAccessibleBrowseBox(
375 const Reference
< XAccessible
>& _rxParent
, vcl::IAccessibleTableProvider
& _rBrowseBox
) const
377 return new AccessibleBrowseBoxAccess( _rxParent
, _rBrowseBox
);
380 IAccessibleTableControl
* AccessibleFactory::createAccessibleTableControl(
381 const Reference
< XAccessible
>& _rxParent
, IAccessibleTable
& _rTable
) const
383 return new AccessibleGridControlAccess( _rxParent
, _rTable
);
386 Reference
< XAccessible
> AccessibleFactory::createAccessibleIconChoiceCtrl(
387 SvtIconChoiceCtrl
& _rIconCtrl
, const Reference
< XAccessible
>& _xParent
) const
389 return new AccessibleIconChoiceCtrl( _rIconCtrl
, _xParent
);
392 Reference
< XAccessible
> AccessibleFactory::createAccessibleTabBar( TabBar
& _rTabBar
) const
394 return new AccessibleTabBar( &_rTabBar
);
397 Reference
< XAccessibleContext
> AccessibleFactory::createAccessibleTextWindowContext(
398 VCLXWindow
* pVclXWindow
, TextEngine
& rEngine
, TextView
& rView
) const
400 return new Document( pVclXWindow
, rEngine
, rView
);
403 Reference
< XAccessible
> AccessibleFactory::createAccessibleTreeListBox(
404 SvTreeListBox
& _rListBox
, const Reference
< XAccessible
>& _xParent
) const
406 return new AccessibleListBox( _rListBox
, _xParent
);
409 Reference
< XAccessible
> AccessibleFactory::createAccessibleBrowseBoxHeaderBar(
410 const Reference
< XAccessible
>& rxParent
, vcl::IAccessibleTableProvider
& _rOwningTable
,
411 vcl::AccessibleBrowseBoxObjType _eObjType
) const
413 return new AccessibleBrowseBoxHeaderBar( rxParent
, _rOwningTable
, _eObjType
);
416 Reference
< XAccessible
> AccessibleFactory::createAccessibleBrowseBoxTableCell(
417 const Reference
< XAccessible
>& _rxParent
, vcl::IAccessibleTableProvider
& _rBrowseBox
,
418 const Reference
< XWindow
>& _xFocusWindow
, sal_Int32 _nRowId
, sal_uInt16 _nColId
, sal_Int32 _nOffset
) const
420 return new AccessibleBrowseBoxTableCell( _rxParent
, _rBrowseBox
, _xFocusWindow
,
421 _nRowId
, _nColId
, _nOffset
);
424 Reference
< XAccessible
> AccessibleFactory::createAccessibleBrowseBoxHeaderCell(
425 sal_Int32 _nColumnRowId
, const Reference
< XAccessible
>& rxParent
, vcl::IAccessibleTableProvider
& _rBrowseBox
,
426 const Reference
< XWindow
>& _xFocusWindow
, vcl::AccessibleBrowseBoxObjType _eObjType
) const
428 return new AccessibleBrowseBoxHeaderCell( _nColumnRowId
, rxParent
, _rBrowseBox
,
429 _xFocusWindow
, _eObjType
);
432 Reference
< XAccessible
> AccessibleFactory::createAccessibleCheckBoxCell(
433 const Reference
< XAccessible
>& _rxParent
, vcl::IAccessibleTableProvider
& _rBrowseBox
,
434 const Reference
< XWindow
>& _xFocusWindow
, sal_Int32 _nRowPos
, sal_uInt16 _nColPos
,
435 const TriState
& _eState
, bool _bIsTriState
) const
437 return new AccessibleCheckBoxCell( _rxParent
, _rBrowseBox
, _xFocusWindow
,
438 _nRowPos
, _nColPos
, _eState
, _bIsTriState
);
441 Reference
< XAccessible
> AccessibleFactory::createEditBrowseBoxTableCellAccess(
442 const Reference
< XAccessible
>& _rxParent
, const Reference
< XAccessible
>& _rxControlAccessible
,
443 const Reference
< XWindow
>& _rxFocusWindow
, vcl::IAccessibleTableProvider
& _rBrowseBox
,
444 sal_Int32 _nRowPos
, sal_uInt16 _nColPos
) const
446 return new EditBrowseBoxTableCellAccess( _rxParent
, _rxControlAccessible
,
447 _rxFocusWindow
, _rBrowseBox
, _nRowPos
, _nColPos
);
450 } // anonymous namespace
452 #if HAVE_FEATURE_DESKTOP
453 /* this is the entry point to retrieve a factory for the toolkit-level Accessible/Contexts supplied
456 This function implements the factory function needed in toolkit
457 (of type GetStandardAccComponentFactory).
461 SAL_DLLPUBLIC_EXPORT
void* getStandardAccessibleFactory()
463 ::toolkit::IAccessibleFactory
* pFactory
= new AccessibleFactory
;
469 /** this is the entry point to retrieve a factory for the svtools-level Accessible/Contexts supplied
472 This function implements the factory function needed in svtools
473 (of type GetSvtAccessibilityComponentFactory).
477 SAL_DLLPUBLIC_EXPORT
void* getSvtAccessibilityComponentFactory()
479 ::vcl::IAccessibleFactory
* pFactory
= new AccessibleFactory
;
484 #endif // HAVE_FEATURE_DESKTOP
486 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */