annotate dwt/accessibility/AccessibleFactory.d @ 42:787b5413b0ce

accessibility package
author Frank Benoit <benoit@tionex.de>
date Fri, 11 Jan 2008 05:07:22 +0100
parents
children 8f049b136add
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
42
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1 /*******************************************************************************
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
2 * Copyright (c) 2000, 2006 IBM Corporation and others.
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
3 * All rights reserved. This program and the accompanying materials
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
4 * are made available under the terms of the Eclipse Public License v1.0
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
5 * which accompanies this distribution, and is available at
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
6 * http://www.eclipse.org/legal/epl-v10.html
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
7 *
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
8 * Contributors:
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
9 * IBM Corporation - initial API and implementation
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
10 *******************************************************************************/
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
11 module dwt.accessibility.AccessibleFactory;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
12
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
13
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
14 import dwt.internal.accessibility.gtk.ATK;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
15 import dwt.internal.gtk.OS;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
16 import dwt.accessibility.Accessible;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
17 import dwt.accessibility.ACC;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
18 import dwt.accessibility.AccessibleObject;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
19 import dwt.accessibility.AccessibleControlEvent;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
20 import dwt.accessibility.AccessibleControlListener;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
21
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
22 import dwt.SWT;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
23
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
24 import tango.stdc.stringz;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
25 import tango.io.Stdout;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
26
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
27 class AccessibleFactory {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
28 AtkObjectFactory * handle;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
29 uint objectParentType;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
30 char* widgetTypeName;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
31
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
32 //Callback atkObjectFactoryCB_create_accessible;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
33 //Callback gTypeInfo_base_init_factory;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
34 Accessible[GtkWidget*] accessibles;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
35
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
36 static long[char[]] Types;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
37 static AccessibleFactory[long] Factories;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
38
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
39 static const uint DefaultParentType; //$NON-NLS-1$
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
40 static const char[] FACTORY_PARENTTYPENAME = "AtkObjectFactory";
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
41 static const char[] SWT_TYPE_PREFIX = "SWT";
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
42 static const char[] CHILD_TYPENAME = "Child";
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
43 static const char[] FACTORY_TYPENAME = "SWTFactory";
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
44 static const int[] actionRoles = [
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
45 ACC.ROLE_CHECKBUTTON, ACC.ROLE_COMBOBOX, ACC.ROLE_LINK,
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
46 ACC.ROLE_MENUITEM, ACC.ROLE_PUSHBUTTON, ACC.ROLE_RADIOBUTTON,
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
47 ];
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
48 static const int[] hypertextRoles = [ACC.ROLE_LINK];
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
49 static const int[] selectionRoles = [
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
50 ACC.ROLE_LIST, ACC.ROLE_TABFOLDER, ACC.ROLE_TABLE, ACC.ROLE_TREE,
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
51 ];
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
52 static const int[] textRoles = [
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
53 ACC.ROLE_COMBOBOX, ACC.ROLE_LINK, ACC.ROLE_LABEL, ACC.ROLE_TEXT,
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
54 ];
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
55
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
56 /* AT callbacks*/
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
57 /* interface definitions */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
58 static GTypeInfo* ObjectIfaceDefinition;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
59 static const GInterfaceInfo* ActionIfaceDefinition;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
60 static const GInterfaceInfo* ComponentIfaceDefinition;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
61 static const GInterfaceInfo* HypertextIfaceDefinition;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
62 static const GInterfaceInfo* SelectionIfaceDefinition;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
63 static const GInterfaceInfo* TextIfaceDefinition;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
64
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
65 static this(){
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
66 DefaultParentType = OS.g_type_from_name ("GtkAccessible"); //$NON-NLS-1$
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
67 /* Action interface */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
68 ActionIfaceDefinition = cast(GInterfaceInfo*)OS.g_malloc (GInterfaceInfo.sizeof);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
69 ActionIfaceDefinition.interface_init = &AccessibleFactory.initActionIfaceCB;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
70 /* Component interface */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
71 ComponentIfaceDefinition = cast(GInterfaceInfo*)OS.g_malloc (GInterfaceInfo.sizeof);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
72 ComponentIfaceDefinition.interface_init = &AccessibleFactory.initComponentIfaceCB;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
73 /* Hypertext interface */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
74 HypertextIfaceDefinition = cast(GInterfaceInfo*)OS.g_malloc (GInterfaceInfo.sizeof);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
75 HypertextIfaceDefinition.interface_init = &AccessibleFactory.initHypertextIfaceCB;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
76 /* Selection interface */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
77 SelectionIfaceDefinition = cast(GInterfaceInfo*)OS.g_malloc (GInterfaceInfo.sizeof);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
78 SelectionIfaceDefinition.interface_init = &AccessibleFactory.initSelectionIfaceCB;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
79 /* Text interface */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
80 TextIfaceDefinition =cast(GInterfaceInfo*) OS.g_malloc (GInterfaceInfo.sizeof);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
81 TextIfaceDefinition.interface_init = &AccessibleFactory.initTextIfaceCB;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
82 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
83
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
84 private this (int /*long*/ widgetType) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
85 widgetTypeName = OS.g_type_name (widgetType);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
86 char[] factoryName = FACTORY_TYPENAME ~ fromUtf8z( widgetTypeName ) ~ \0;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
87 if (OS.g_type_from_name (factoryName.ptr) is 0) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
88 /* register the factory */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
89 auto registry = ATK.atk_get_default_registry ();
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
90 auto previousFactory = ATK.atk_registry_get_factory (registry, widgetType);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
91 objectParentType = ATK.atk_object_factory_get_accessible_type (previousFactory);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
92 if (objectParentType is 0) objectParentType = DefaultParentType;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
93 auto factoryParentType = OS.g_type_from_name (FACTORY_PARENTTYPENAME.ptr);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
94 auto typeInfo = cast(GTypeInfo*) OS.g_malloc (GTypeInfo.sizeof);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
95 typeInfo.base_init = &gTypeInfo_base_init_factory;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
96 typeInfo.class_size = AtkObjectFactoryClass.sizeof;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
97 typeInfo.instance_size = AtkObjectFactory.sizeof;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
98 auto swtFactoryType = OS.g_type_register_static (factoryParentType, factoryName.ptr, typeInfo, 0);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
99 ATK.atk_registry_set_factory_type (registry, widgetType, swtFactoryType);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
100 handle = ATK.atk_registry_get_factory (registry, widgetType);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
101 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
102 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
103
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
104 void addAccessible (Accessible accessible) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
105 auto controlHandle = accessible.getControlHandle ();
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
106 accessibles[controlHandle] = accessible;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
107 ATK.atk_object_factory_create_accessible (handle, cast(GObject*)controlHandle);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
108 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
109
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
110 private static extern(C) AtkObject* atkObjectFactory_create_accessible (GObject* widget) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
111 auto widgetType = OS.G_OBJECT_TYPE ( cast(GTypeInstance*)widget);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
112 if( auto factory = widgetType in Factories ){
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
113 with( *factory ){
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
114 Accessible accessible = accessibles[ cast(GtkWidget*) widget ];
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
115 if (accessible is null) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
116 /*
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
117 * we don't care about this control, so create it with the parent's
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
118 * type so that its accessibility callbacks will not pass though here
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
119 */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
120 auto result = cast(AtkObject*) OS.g_object_new (objectParentType, null);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
121 ATK.atk_object_initialize (result, cast(void*)widget);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
122 return result;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
123 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
124 /* if an atk object has already been created for this widget then just return it */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
125 if (accessible.accessibleObject !is null) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
126 return accessible.accessibleObject.handle;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
127 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
128 char[] buffer = fromUtf8z( widgetTypeName ).dup;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
129 auto type = getType (buffer, accessible, objectParentType, ACC.CHILDID_SELF);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
130 AccessibleObject object = new AccessibleObject (type, cast(GtkWidget*)widget, accessible, objectParentType, false);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
131 accessible.accessibleObject = object;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
132 return object.handle;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
133 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
134 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
135 else{
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
136 Stdout.formatln( "AccessibleFactory.atkObjectFactoryCB_create_accessible cannot find factory instance" );
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
137 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
138 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
139
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
140 static int /*long*/ getChildType (Accessible accessible, int childIndex) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
141 return getType (CHILD_TYPENAME, accessible, DefaultParentType, childIndex);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
142 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
143
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
144 static int /*long*/ getDefaultParentType () {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
145 return DefaultParentType;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
146 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
147
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
148 static int /*long*/ getType (char[] widgetTypeName, Accessible accessible, int /*long*/ parentType, int childId) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
149 AccessibleControlEvent event = new AccessibleControlEvent (accessible);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
150 event.childID = childId;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
151 AccessibleControlListener[] listeners = accessible.getControlListeners ();
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
152 for (int i = 0; i < listeners.length; i++) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
153 listeners [i].getRole (event);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
154 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
155 bool action = false, hypertext = false, selection = false, text = false;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
156 if (event.detail !is 0) { /* a role was specified */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
157 for (int i = 0; i < actionRoles.length; i++) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
158 if (event.detail is actionRoles [i]) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
159 action = true;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
160 break;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
161 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
162 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
163 for (int i = 0; i < hypertextRoles.length; i++) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
164 if (event.detail is hypertextRoles [i]) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
165 hypertext = true;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
166 break;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
167 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
168 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
169 for (int i = 0; i < selectionRoles.length; i++) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
170 if (event.detail is selectionRoles [i]) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
171 selection = true;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
172 break;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
173 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
174 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
175 for (int i = 0; i < textRoles.length; i++) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
176 if (event.detail is textRoles [i]) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
177 text = true;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
178 break;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
179 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
180 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
181 } else {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
182 action = hypertext = selection = text = true;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
183 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
184 char[] swtTypeName = SWT_TYPE_PREFIX.dup;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
185 swtTypeName ~= widgetTypeName;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
186 if (action) swtTypeName ~= "Action"; //$NON-NLS-1$
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
187 if (hypertext) swtTypeName ~= "Hypertext"; //$NON-NLS-1$
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
188 if (selection) swtTypeName ~= "Selection"; //$NON-NLS-1$
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
189 if (text) swtTypeName ~= "Text"; //$NON-NLS-1$
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
190
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
191 int /*long*/ type = 0;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
192 if (swtTypeName in Types ) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
193 type = Types[swtTypeName];
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
194 } else {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
195 /* define the type */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
196 GTypeQuery* query = new GTypeQuery ();
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
197 OS.g_type_query (parentType, query);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
198
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
199 GTypeInfo* typeInfo = new GTypeInfo ();
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
200 typeInfo.base_init = &gTypeInfo_base_init_type;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
201 typeInfo.class_size = query.class_size;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
202 typeInfo.instance_size = query.instance_size;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
203 ObjectIfaceDefinition = typeInfo;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
204
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
205 type = OS.g_type_register_static (parentType, toStringz( swtTypeName ), ObjectIfaceDefinition, 0);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
206 OS.g_type_add_interface_static (type, AccessibleObject.ATK_COMPONENT_TYPE, ComponentIfaceDefinition);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
207 if (action) OS.g_type_add_interface_static (type, AccessibleObject.ATK_ACTION_TYPE, ActionIfaceDefinition);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
208 if (hypertext) OS.g_type_add_interface_static (type, AccessibleObject.ATK_HYPERTEXT_TYPE, HypertextIfaceDefinition);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
209 if (selection) OS.g_type_add_interface_static (type, AccessibleObject.ATK_SELECTION_TYPE, SelectionIfaceDefinition);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
210 if (text) OS.g_type_add_interface_static (type, AccessibleObject.ATK_TEXT_TYPE, TextIfaceDefinition);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
211 Types[swtTypeName] = type;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
212 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
213 return type;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
214 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
215
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
216 private static extern(C) void gTypeInfo_base_init_factory (void* klass) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
217 auto atkObjectFactoryClass = ATK.ATK_OBJECT_FACTORY_CLASS (klass);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
218 atkObjectFactoryClass.create_accessible = &atkObjectFactory_create_accessible;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
219 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
220
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
221 private static extern(C) void gTypeInfo_base_init_type (void* klass) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
222 auto objectClass = cast(AtkObjectClass*)klass;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
223 objectClass.get_name = &AccessibleObject.atkObject_get_name;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
224 objectClass.get_description = &AccessibleObject.atkObject_get_description;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
225 objectClass.get_n_children = &AccessibleObject.atkObject_get_n_children;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
226 objectClass.get_role = &AccessibleObject.atkObject_get_role;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
227 objectClass.get_parent = &AccessibleObject.atkObject_get_parent;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
228 objectClass.ref_state_set = &AccessibleObject.atkObject_ref_state_set;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
229 objectClass.get_index_in_parent = &AccessibleObject.atkObject_get_index_in_parent;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
230 objectClass.ref_child = &AccessibleObject.atkObject_ref_child;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
231
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
232 GObjectClass* gObjectClass = OS.G_OBJECT_CLASS ( cast(GTypeClass*)klass);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
233 gObjectClass.finalize = &AccessibleObject.gObjectClass_finalize;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
234 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
235
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
236 private static extern(C) void initActionIfaceCB ( void* g_iface, void* iface_data ) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
237 auto iface = cast(AtkActionIface*)g_iface;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
238 iface.get_keybinding = &AccessibleObject.atkAction_get_keybinding;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
239 iface.get_name = &AccessibleObject.atkAction_get_name;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
240 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
241
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
242 private static extern(C) void initComponentIfaceCB ( void* g_iface, void* iface_data ) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
243 auto iface = cast(AtkComponentIface*)g_iface;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
244 iface.get_extents = &AccessibleObject.atkComponent_get_extents;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
245 iface.get_position = &AccessibleObject.atkComponent_get_position;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
246 iface.get_size = &AccessibleObject.atkComponent_get_size;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
247 iface.ref_accessible_at_point = &AccessibleObject.atkComponent_ref_accessible_at_point;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
248 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
249
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
250 private static extern(C) void initHypertextIfaceCB ( void* g_iface, void* iface_data ) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
251 auto iface = cast(AtkHypertextIface*)g_iface;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
252 iface.get_link = &AccessibleObject.atkHypertext_get_link;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
253 iface.get_link_index = &AccessibleObject.atkHypertext_get_link_index;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
254 iface.get_n_links = &AccessibleObject.atkHypertext_get_n_links;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
255 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
256
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
257 private static extern(C) void initSelectionIfaceCB ( void* g_iface, void* iface_data ) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
258 auto iface = cast(AtkSelectionIface*)g_iface;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
259 iface.is_child_selected = &AccessibleObject.atkSelection_is_child_selected;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
260 iface.ref_selection = &AccessibleObject.atkSelection_ref_selection;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
261 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
262
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
263 private static extern(C) void initTextIfaceCB ( void* g_iface, void* iface_data ) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
264 auto iface = cast(AtkTextIface*)g_iface;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
265 iface.get_caret_offset = &AccessibleObject.atkText_get_caret_offset;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
266 iface.get_character_at_offset = &AccessibleObject.atkText_get_character_at_offset;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
267 iface.get_character_count = &AccessibleObject.atkText_get_character_count;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
268 iface.get_n_selections = &AccessibleObject.atkText_get_n_selections;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
269 iface.get_selection = &AccessibleObject.atkText_get_selection;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
270 iface.get_text = &AccessibleObject.atkText_get_text;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
271 iface.get_text_after_offset = &AccessibleObject.atkText_get_text_after_offset;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
272 iface.get_text_at_offset = &AccessibleObject.atkText_get_text_at_offset;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
273 iface.get_text_before_offset = &AccessibleObject.atkText_get_text_before_offset;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
274 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
275
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
276 static void registerAccessible (Accessible accessible) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
277 /* If DefaultParentType is 0 then OS accessibility is not active */
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
278 if (DefaultParentType is 0) return;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
279 auto controlHandle = accessible.getControlHandle ();
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
280 auto widgetType = OS.G_OBJECT_TYPE ( cast(GTypeInstance*)controlHandle);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
281 AccessibleFactory factory = Factories[widgetType];
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
282 if (factory is null) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
283 factory = new AccessibleFactory (widgetType);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
284 Factories[widgetType] = factory;
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
285 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
286 factory.addAccessible (accessible);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
287 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
288
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
289 void removeAccessible (Accessible accessible) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
290 accessibles.remove (accessible.getControlHandle ());
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
291 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
292
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
293 static void unregisterAccessible (Accessible accessible) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
294 auto controlHandle = accessible.getControlHandle ();
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
295 auto widgetType = OS.G_OBJECT_TYPE (cast(GTypeInstance*)controlHandle);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
296 AccessibleFactory factory = Factories[widgetType];
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
297 if (factory !is null) {
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
298 factory.removeAccessible (accessible);
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
299 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
300 }
787b5413b0ce accessibility package
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
301 }