1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
|
'encoding UTF-8 Do not remove or change this line!
'**************************************************************************
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
* Copyright 2000, 2010 Oracle and/or its affiliates.
*
* OpenOffice.org - a multi-platform office productivity suite
*
* This file is part of OpenOffice.org.
*
* OpenOffice.org is free software: you can redistribute it and/or modify
* it under the terms of the GNU Lesser General Public License version 3
* only, as published by the Free Software Foundation.
*
* OpenOffice.org is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Lesser General Public License version 3 for more details
* (a copy is included in the LICENSE file that accompanied this code).
*
* You should have received a copy of the GNU Lesser General Public License
* version 3 along with OpenOffice.org. If not, see
* <http://www.openoffice.org/license.html>
* for a copy of the LGPLv3 License.
*
'/******************************************************************************
'*
'* owner : joerg.skottke@sun.com
'*
'* short description : Extension Update Test
'*
'\******************************************************************************
testcase tExtensionManagerResources()
' Test is based on issue #i86913 and the common rules for update tests (QA)
' We need to know if the user may change extension parameters. This is the case
' when a) the user is root/Administrator or b) the office was installed
' for the current user only
dim bUserIsAdmin as boolean : bUserIsAdmin = hCheckForAdministratorPermissions()
dim iBreakCounter as integer : iBreakCounter = 0
dim iFilterItems as integer
const MAX_ITERATIONS = 50
const FILTER_ITEMS = 9 ' This is the number of filters/extension types we know
printlog( "Ressource test for the Extension Manager UI" )
ToolsPackageManager
kontext "PackageManager"
if ( PackageManager.exists( 1 ) ) then
' OOo comes with a few preinstalled, shared - extensions. We need at least one.
' This test is bound to fail if we have a user-installed extension at the
' first position of the Extension Manager UI list. There is no way we can
' check that for now. However, this is hardly ever the case.
if ( BrowsePackages.getItemCount() = 0 ) then
warnlog( "This test requires at least one extension to be installed." )
printlog( "Some of the controls are not available or disabled." )
goto endsub
endif
call dialogtest( PackageManager )
kontext "PackgeManager"
printlog( "Add..." )
Add.click()
kontext "OeffnenDlg"
if ( OeffnenDlg.exists( 1 ) ) then
iFilterItems = DateiTyp.getItemCount
if ( iFilterItems <> FILTER_ITEMS ) then
warnlog( "The file type filter list is incorrect" )
printlog( "Expected: " & FILTER_ITEMS )
printlog( "Found...: " & iFilterItems )
else
printlog( "The number of filters in Add Extensions Dialog is ok" )
endif
Oeffnendlg.cancel()
else
warnlog( "File Open dialog did not open" )
endif
kontext "PackageManager"
printlog( "Check for updates..." )
updates.click()
kontext "ExtensionUpdate"
if ( ExtensionUpdate.exists( 2 ) ) then
call dialogtest( ExtensionUpdate )
ExtensionUpdate.cancel()
ExtensionUpdate.notExists( 3 )
else
warnlog( "Extenson Update dialog did not open" )
endif
kontext "PackageManager"
printlog( "Controls belonging to extensions" )
BrowsePackages.select( 1 )
printlog( "Extension name.......: " & BrowsePackages.getItemText( 1 , 1 ) )
printlog( "Extension version....: " & BrowsePackages.getItemText( 1 , 2 ) )
printlog( "Extension description: " & BrowsePackages.getItemText( 1 , 3 ) )
if ( options.exists() ) then
if ( options.isEnabled() ) then
printlog( "Extension has options" )
options.click()
kontext "OptionenDlg"
OptionenDLg.close()
WaitSlot()
else
warnlog( "Extension Options button visible but disabled" )
endif
else
printlog( "Extension Options button does not exist, no options available" )
endif
if ( bUserIsAdmin ) then
' If the user is Admin or the office was installed in the users
' home directory we have access to the extensions that reside in
' the shared layer. This means that the user can remove and disable
' these extensions.
kontext "PackageManager"
BrowsePackages.select( 1 )
if ( disable.exists() ) then
if ( disable.isEnabled() ) then
disable.click()
kontext "Active"
if ( Active.exists( 1 ) ) then
printlog( "Disable extension: Warning for other office instance. Good." )
active.ok()
else
warnlog( "No warning for other office instances running" )
endif
' We now re-enable the extensions. Depending on the "size"
' of the extension it might take the Extension Manager UI
' a few seconds to complete the "disable" action. We need to
' wait for that.
kontext "PackageManager"
BrowsePackages.select( 1 )
iBreakCounter = 0
do while( not enable.exists() )
iBreakCounter = iBreakCounter + 1
wait( 100 )
if ( iBreakCounter = MAX_ITERATIONS ) then
warnlog( "Extension not ready within timeframe. Aborting" )
goto endsub
endif
loop
enable.click()
kontext "Active"
if ( Active.exists( 1 ) ) then
printlog( "Enable extension: Warning for other office instance. Good." )
active.ok()
else
warnlog( "No warning for other office instances running" )
endif
' The Extension Manager UI remembers when it has warned about
' other running instances of the office, so the next time we try
' to disable/enable the extension there should be no warning.
kontext "PackageManager"
iBreakCounter = 0
do while( not disable.exists() )
iBreakCounter = iBreakCounter + 1
wait( 100 )
if ( iBreakCounter = MAX_ITERATIONS ) then
warnlog( "Extension not ready within timeframe. Aborting" )
goto endsub
endif
loop
disable.click()
kontext "Active"
if ( Active.exists( 1 ) ) then
warnlog( "There should be no warning when disabling the extension a second time" )
active.ok()
else
printlog( "Disable extension: No warning for other office instances. Good." )
endif
kontext "PackageManager"
iBreakCounter = 0
do while( not enable.exists() )
iBreakCounter = iBreakCounter + 1
wait( 100 )
if ( iBreakCounter = MAX_ITERATIONS ) then
warnlog( "Extension not ready within timeframe. Aborting" )
goto endsub
endif
loop
enable.click()
kontext "Active"
if ( Active.exists( 1 ) ) then
warnlog( "There should be no warning when enabling the extension a second time" )
active.ok()
else
printlog( "Enable extension: No warning for other office instances. Good." )
endif
WaitSlot()
else
warnlog( "User should be able to disable shared extension" )
endif
else
warnlog( "Cannot disable extension. It might be disabled already or defunct" )
endif
kontext "PackageManager"
iBreakCounter = 0
do while( not remove.isEnabled() )
iBreakCounter = iBreakCounter + 1
wait( 100 )
if ( iBreakCounter = MAX_ITERATIONS ) then
warnlog( "Extension not ready within timeframe. Aborting" )
goto endsub
endif
loop
kontext "PackageManager"
if ( remove.isEnabled() ) then
remove.click()
' Note: First time we try to remove an extension we should get a
' warning that we must make sure that no other office instances
' are running. If this warning is missing we actually remove the
' extension which leaves the installation in an inconsistent
' state. In a "real life" installation this would not work, in a
' "user space" installation we have to reinstall. Bad that is.
kontext "Active"
if ( Active.exists( 1 ) ) then
printlog( "Remove extension: Warning for other office instances. Good." )
active.cancel()
else
warnlog( "No warning for other office instances running" )
warnlog( "Installation inconsistency: Extension was removed!" )
endif
WaitSlot()
' Note: Like for the disable/enable buttons we should not get
' a warning for another running office instance when removing
' an extension for the second time.
else
warnlog( "User should be able to remove extension" )
endif
else
' if the user does not have Administrator rights he may neither
' he may neither disable or remove extensions.
kontext "PackageManager"
if ( disable.isEnabled() ) then
warnlog( "Disable-button enabled for shared extension" )
endif
kontext "PackageManager"
if ( remove.isEnabled() ) then
warnlog( "Remove-button enabled for shared extension" )
endif
endif
kontext "PackageManager"
PackageManager.close()
else
warnlog( "Extension Manager UI did not open" )
endif
endcase
|