wuiadmin.py@ 57761

Last change on this file since 57761 was 56295, checked in by vboxsync, 10 years ago
ValidationKit: Updated (C) year.
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 43.7 KB

Line
1	# -- coding: utf-8 --
2	# $Id: wuiadmin.py 56295 2015-06-09 14:29:55Z vboxsync $
3
4	"""
5	Test Manager Core - WUI - Admin Main page.
6	"""
7
8	__copyright__ = \
9	"""
10	Copyright (C) 2012-2015 Oracle Corporation
11
12	This file is part of VirtualBox Open Source Edition (OSE), as
13	available from http://www.virtualbox.org. This file is free software;
14	you can redistribute it and/or modify it under the terms of the GNU
15	General Public License (GPL) as published by the Free Software
16	Foundation, in version 2 as it comes in the "COPYING" file of the
17	VirtualBox OSE distribution. VirtualBox OSE is distributed in the
18	hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
19
20	The contents of this file may alternatively be used under the terms
21	of the Common Development and Distribution License Version 1.0
22	(CDDL) only, as it comes in the "COPYING.CDDL" file of the
23	VirtualBox OSE distribution, in which case the provisions of the
24	CDDL are applicable instead of those of the GPL.
25
26	You may elect to license modified versions of this file under the
27	terms and conditions of either the GPL or the CDDL or both.
28	"""
29	__version__ = "$Revision: 56295 $"
30
31
32	# Standard python imports.
33	import cgitb;
34	import sys;
35
36	# Validation Kit imports.
37	from common import webutils
38	from testmanager import config;
39	from testmanager.core.buildsource import BuildSourceLogic, BuildSourceData
40	from testmanager.core.build import BuildCategoryLogic, BuildCategoryData, BuildLogic, BuildData;
41	from testmanager.core.globalresource import GlobalResourceLogic, GlobalResourceData
42	from testmanager.core.schedulerbase import SchedulerBase
43	from testmanager.core.schedgroup import SchedGroupLogic, SchedGroupData, SchedGroupDataEx
44	from testmanager.core.systemlog import SystemLogLogic
45	from testmanager.core.testbox import TestBoxData, TestBoxLogic
46	from testmanager.core.testcase import TestCaseLogic, TestCaseData, TestCaseDataEx
47	from testmanager.core.useraccount import UserAccountLogic, UserAccountData
48	from testmanager.core.testgroup import TestGroupLogic, TestGroupDataEx;
49	from testmanager.core.failurecategory import FailureCategoryLogic, FailureCategoryData
50	from testmanager.core.failurereason import FailureReasonLogic, FailureReasonData
51	from testmanager.core.buildblacklist import BuildBlacklistLogic, BuildBlacklistData
52	from testmanager.webui.wuibase import WuiDispatcherBase, WuiException
53	from testmanager.webui.wuiadminbuild import WuiAdminBuild, WuiAdminBuildList
54	from testmanager.webui.wuiadminsystemlog import WuiAdminSystemLogList
55	from testmanager.webui.wuiadminbuildsource import WuiAdminBuildSrc, WuiAdminBuildSrcList;
56	from testmanager.webui.wuiadminbuildcategory import WuiAdminBuildCat, WuiAdminBuildCatList;
57	from testmanager.webui.wuiadminglobalrsrc import WuiGlobalResource, WuiGlobalResourceList
58	from testmanager.webui.wuiadmintestbox import WuiTestBoxList, WuiTestBox
59	from testmanager.webui.wuiadmintestcase import WuiTestCase, WuiTestCaseList
60	from testmanager.webui.wuiadminuseraccount import WuiUserAccountList, WuiUserAccount
61	from testmanager.webui.wuiadmintestgroup import WuiTestGroup, WuiTestGroupList;
62	from testmanager.webui.wuiadminschedgroup import WuiSchedGroup, WuiAdminSchedGroupList;
63	from testmanager.webui.wuiadminbuildblacklist import WuiAdminBuildBlacklist, WuiAdminListOfBlacklistItems
64	from testmanager.webui.wuifailurecategory import WuiFailureCategory, WuiFailureCategoryList
65	from testmanager.webui.wuiadminfailurereason import WuiAdminFailureReason, WuiAdminFailureReasonList
66
67
68	class WuiAdmin(WuiDispatcherBase):
69	"""
70	WUI Admin main page.
71	"""
72
73	## The name of the script.
74	ksScriptName = 'admin.py'
75
76
77	## @name Actions
78	## @{
79	ksActionSystemLogList = 'SystemLogList'
80
81	ksActionUserList = 'UserList'
82	ksActionUserAdd = 'UserAdd'
83	ksActionUserEdit = 'UserEdit'
84	ksActionUserAddPost = 'UserAddPost'
85	ksActionUserEditPost = 'UserEditPost'
86	ksActionUserDelPost = 'UserDelPost'
87
88	ksActionTestBoxList = 'TestBoxList'
89	ksActionTestBoxListPost = 'TestBoxListPost'
90	ksActionTestBoxAdd = 'TestBoxAdd'
91	ksActionTestBoxAddPost = 'TestBoxAddPost'
92	ksActionTestBoxEdit = 'TestBoxEdit'
93	ksActionTestBoxEditPost = 'TestBoxEditPost'
94	ksActionTestBoxDetails = 'TestBoxDetails'
95	ksActionTestBoxRemovePost = 'TestBoxRemove'
96	ksActionTestBoxesRegenQueues = 'TestBoxesRegenQueues';
97
98	ksActionTestCaseList = 'TestCaseList'
99	ksActionTestCaseAdd = 'TestCaseAdd'
100	ksActionTestCaseAddPost = 'TestCaseAddPost'
101	ksActionTestCaseClone = 'TestCaseClone'
102	ksActionTestCaseDetails = 'TestCaseDetails'
103	ksActionTestCaseEdit = 'TestCaseEdit'
104	ksActionTestCaseEditPost = 'TestCaseEditPost'
105	ksActionTestCaseDoRemove = 'TestCaseDoRemove'
106
107	ksActionGlobalRsrcShowAll = 'GlobalRsrcShowAll'
108	ksActionGlobalRsrcShowAdd = 'GlobalRsrcShowAdd'
109	ksActionGlobalRsrcShowEdit = 'GlobalRsrcShowEdit'
110	ksActionGlobalRsrcAdd = 'GlobalRsrcAddPost'
111	ksActionGlobalRsrcEdit = 'GlobalRsrcEditPost'
112	ksActionGlobalRsrcDel = 'GlobalRsrcDelPost'
113
114	ksActionBuildList = 'BuildList'
115	ksActionBuildAdd = 'BuildAdd'
116	ksActionBuildAddPost = 'BuildAddPost'
117	ksActionBuildClone = 'BuildClone'
118	ksActionBuildDetails = 'BuildDetails'
119	ksActionBuildDoRemove = 'BuildDoRemove'
120	ksActionBuildEdit = 'BuildEdit'
121	ksActionBuildEditPost = 'BuildEditPost'
122
123	ksActionBuildBlacklist = 'BuildBlacklist';
124	ksActionBuildBlacklistAdd = 'BuildBlacklistAdd';
125	ksActionBuildBlacklistAddPost = 'BuildBlacklistAddPost';
126	ksActionBuildBlacklistClone = 'BuildBlacklistClone';
127	ksActionBuildBlacklistDetails = 'BuildBlacklistDetails';
128	ksActionBuildBlacklistDoRemove = 'BuildBlacklistDoRemove';
129	ksActionBuildBlacklistEdit = 'BuildBlacklistEdit';
130	ksActionBuildBlacklistEditPost = 'BuildBlacklistEditPost';
131
132	ksActionFailureCategoryList = 'FailureCategoryList'
133	ksActionFailureCategoryShowAdd = 'FailureCategoryShowAdd'
134	ksActionFailureCategoryShowEdit = 'FailureCategoryShowEdit'
135	ksActionFailureCategoryAdd = 'FailureCategoryAdd'
136	ksActionFailureCategoryEdit = 'FailureCategoryEdit'
137	ksActionFailureCategoryDel = 'FailureCategoryDel'
138
139	ksActionFailureReasonList = 'FailureReasonList'
140	ksActionFailureReasonShowAdd = 'FailureReasonShowAdd'
141	ksActionFailureReasonShowEdit = 'FailureReasonShowEdit'
142	ksActionFailureReasonAdd = 'FailureReasonAdd'
143	ksActionFailureReasonEdit = 'FailureReasonEdit'
144	ksActionFailureReasonDel = 'FailureReasonDel'
145
146	ksActionBuildSrcList = 'BuildSrcList'
147	ksActionBuildSrcAdd = 'BuildSrcAdd'
148	ksActionBuildSrcAddPost = 'BuildSrcAddPost'
149	ksActionBuildSrcClone = 'BuildSrcClone'
150	ksActionBuildSrcDetails = 'BuildSrcDetails'
151	ksActionBuildSrcEdit = 'BuildSrcEdit'
152	ksActionBuildSrcEditPost = 'BuildSrcEditPost'
153	ksActionBuildSrcDoRemove = 'BuildSrcDoRemove'
154
155	ksActionBuildCategoryList = 'BuildCategoryList'
156	ksActionBuildCategoryAdd = 'BuildCategoryAdd'
157	ksActionBuildCategoryAddPost = 'BuildCategoryAddPost'
158	ksActionBuildCategoryClone = 'BuildCategoryClone';
159	ksActionBuildCategoryDetails = 'BuildCategoryDetails';
160	ksActionBuildCategoryDoRemove = 'BuildCategoryDoRemove';
161
162	ksActionTestGroupList = 'TestGroupList'
163	ksActionTestGroupAdd = 'TestGroupAdd'
164	ksActionTestGroupAddPost = 'TestGroupAddPost'
165	ksActionTestGroupClone = 'TestGroupClone'
166	ksActionTestGroupDetails = 'TestGroupDetails'
167	ksActionTestGroupDoRemove = 'TestGroupDoRemove'
168	ksActionTestGroupEdit = 'TestGroupEdit'
169	ksActionTestGroupEditPost = 'TestGroupEditPost'
170	ksActionTestCfgRegenQueues = 'TestCfgRegenQueues'
171
172	ksActionSchedGroupList = 'SchedGroupList'
173	ksActionSchedGroupAdd = 'SchedGroupAdd';
174	ksActionSchedGroupAddPost = 'SchedGroupAddPost';
175	ksActionSchedGroupClone = 'SchedGroupClone';
176	ksActionSchedGroupDetails = 'SchedGroupDetails';
177	ksActionSchedGroupDoRemove = 'SchedGroupDel';
178	ksActionSchedGroupEdit = 'SchedGroupEdit';
179	ksActionSchedGroupEditPost = 'SchedGroupEditPost';
180	## @}
181
182	def __init__(self, oSrvGlue):
183	WuiDispatcherBase.__init__(self, oSrvGlue, self.ksScriptName);
184
185	self._sTemplate = 'template.html';
186
187	# Use short form to avoid hitting the right margin (130) when using lambda.
188	d = self._dDispatch; # pylint: disable=C0103
189
190	#
191	# System Log actions.
192	#
193	d[self.ksActionSystemLogList] = lambda: self._actionGenericListing(SystemLogLogic, WuiAdminSystemLogList)
194
195	#
196	# User Account actions.
197	#
198	d[self.ksActionUserList] = lambda: self._actionGenericListing(UserAccountLogic, WuiUserAccountList)
199	d[self.ksActionUserAdd] = lambda: self._actionGenericFormAdd(UserAccountData, WuiUserAccount)
200	d[self.ksActionUserEdit] = lambda: self._actionGenericFormEdit(UserAccountData, WuiUserAccount,
201	UserAccountData.ksParam_uid);
202	d[self.ksActionUserAddPost] = lambda: self._actionGenericFormAddPost(UserAccountData, UserAccountLogic,
203	WuiUserAccount, self.ksActionUserList)
204	d[self.ksActionUserEditPost] = lambda: self._actionGenericFormEditPost(UserAccountData, UserAccountLogic,
205	WuiUserAccount, self.ksActionUserList)
206	d[self.ksActionUserDelPost] = lambda: self._actionGenericDoRemove(UserAccountLogic,
207	UserAccountData.ksParam_uid,
208	self.ksActionUserList)
209
210	#
211	# TestBox actions.
212	#
213	d[self.ksActionTestBoxList] = lambda: self._actionGenericListing(TestBoxLogic, WuiTestBoxList);
214	d[self.ksActionTestBoxListPost] = self._actionTestBoxListPost;
215	d[self.ksActionTestBoxAdd] = lambda: self._actionGenericFormAdd(TestBoxData, WuiTestBox);
216	d[self.ksActionTestBoxAddPost] = lambda: self._actionGenericFormAddPost(TestBoxData, TestBoxLogic,
217	WuiTestBox, self.ksActionTestBoxList);
218	d[self.ksActionTestBoxDetails] = lambda: self._actionGenericFormDetails(TestBoxData, TestBoxLogic, WuiTestBox,
219	'idTestBox', 'idGenTestBox');
220	d[self.ksActionTestBoxEdit] = lambda: self._actionGenericFormEdit(TestBoxData, WuiTestBox,
221	TestBoxData.ksParam_idTestBox);
222	d[self.ksActionTestBoxEditPost] = lambda: self._actionGenericFormEditPost(TestBoxData, TestBoxLogic,
223	WuiTestBox, self.ksActionTestBoxList);
224	d[self.ksActionTestBoxRemovePost] = lambda: self._actionGenericDoRemove(TestBoxLogic,
225	TestBoxData.ksParam_idTestBox,
226	self.ksActionTestBoxList)
227	d[self.ksActionTestBoxesRegenQueues] = self._actionRegenQueuesCommon;
228
229	#
230	# Test Case actions.
231	#
232	d[self.ksActionTestCaseList] = lambda: self._actionGenericListing(TestCaseLogic, WuiTestCaseList);
233	d[self.ksActionTestCaseAdd] = lambda: self._actionGenericFormAdd(TestCaseDataEx, WuiTestCase);
234	d[self.ksActionTestCaseAddPost] = lambda: self._actionGenericFormAddPost(TestCaseDataEx, TestCaseLogic,
235	WuiTestCase, self.ksActionTestCaseList);
236	d[self.ksActionTestCaseClone] = lambda: self._actionGenericFormClone( TestCaseDataEx, WuiTestCase,
237	'idTestCase', 'idGenTestCase');
238	d[self.ksActionTestCaseDetails] = lambda: self._actionGenericFormDetails(TestCaseDataEx, TestCaseLogic,
239	WuiTestCase, 'idTestCase',
240	'idGenTestCase');
241	d[self.ksActionTestCaseEdit] = lambda: self._actionGenericFormEdit(TestCaseDataEx, WuiTestCase,
242	TestCaseDataEx.ksParam_idTestCase);
243	d[self.ksActionTestCaseEditPost] = lambda: self._actionGenericFormEditPost(TestCaseDataEx, TestCaseLogic,
244	WuiTestCase, self.ksActionTestCaseList);
245	d[self.ksActionTestCaseDoRemove] = lambda: self._actionGenericDoRemove(TestCaseLogic,
246	TestCaseData.ksParam_idTestCase,
247	self.ksActionTestCaseList);
248
249	#
250	# Global Resource actions
251	#
252	d[self.ksActionGlobalRsrcShowAll] = lambda: self._actionGenericListing(GlobalResourceLogic, WuiGlobalResourceList)
253	d[self.ksActionGlobalRsrcShowAdd] = lambda: self._actionGlobalRsrcShowAddEdit(WuiAdmin.ksActionGlobalRsrcAdd)
254	d[self.ksActionGlobalRsrcShowEdit] = lambda: self._actionGlobalRsrcShowAddEdit(WuiAdmin.ksActionGlobalRsrcEdit)
255	d[self.ksActionGlobalRsrcAdd] = lambda: self._actionGlobalRsrcAddEdit(WuiAdmin.ksActionGlobalRsrcAdd)
256	d[self.ksActionGlobalRsrcEdit] = lambda: self._actionGlobalRsrcAddEdit(WuiAdmin.ksActionGlobalRsrcEdit)
257	d[self.ksActionGlobalRsrcDel] = lambda: self._actionGenericDoDelOld(GlobalResourceLogic,
258	GlobalResourceData.ksParam_idGlobalRsrc,
259	self.ksActionGlobalRsrcShowAll)
260
261	#
262	# Build Source actions
263	#
264	d[self.ksActionBuildSrcList] = lambda: self._actionGenericListing(BuildSourceLogic, WuiAdminBuildSrcList)
265	d[self.ksActionBuildSrcAdd] = lambda: self._actionGenericFormAdd(BuildSourceData, WuiAdminBuildSrc);
266	d[self.ksActionBuildSrcAddPost] = lambda: self._actionGenericFormAddPost(BuildSourceData, BuildSourceLogic,
267	WuiAdminBuildSrc, self.ksActionBuildSrcList);
268	d[self.ksActionBuildSrcClone] = lambda: self._actionGenericFormClone( BuildSourceData, WuiAdminBuildSrc,
269	'idBuildSrc');
270	d[self.ksActionBuildSrcDetails] = lambda: self._actionGenericFormDetails(BuildSourceData, BuildSourceLogic,
271	WuiAdminBuildSrc, 'idBuildSrc');
272	d[self.ksActionBuildSrcDoRemove] = lambda: self._actionGenericDoRemove(BuildSourceLogic,
273	BuildSourceData.ksParam_idBuildSrc,
274	self.ksActionBuildSrcList);
275	d[self.ksActionBuildSrcEdit] = lambda: self._actionGenericFormEdit(BuildSourceData, WuiAdminBuildSrc,
276	BuildSourceData.ksParam_idBuildSrc);
277	d[self.ksActionBuildSrcEditPost] = lambda: self._actionGenericFormEditPost(BuildSourceData, BuildSourceLogic,
278	WuiAdminBuildSrc,
279	self.ksActionBuildSrcList);
280
281
282	#
283	# Build actions
284	#
285	d[self.ksActionBuildList] = lambda: self._actionGenericListing(BuildLogic, WuiAdminBuildList)
286	d[self.ksActionBuildAdd] = lambda: self._actionGenericFormAdd(BuildData, WuiAdminBuild)
287	d[self.ksActionBuildAddPost] = lambda: self._actionGenericFormAddPost(BuildData, BuildLogic, WuiAdminBuild,
288	self.ksActionBuildList)
289	d[self.ksActionBuildClone] = lambda: self._actionGenericFormClone( BuildData, WuiAdminBuild, 'idBuild');
290	d[self.ksActionBuildDetails] = lambda: self._actionGenericFormDetails(BuildData, BuildLogic,
291	WuiAdminBuild, 'idBuild');
292	d[self.ksActionBuildDoRemove] = lambda: self._actionGenericDoRemove(BuildLogic, BuildData.ksParam_idBuild,
293	self.ksActionBuildList);
294	d[self.ksActionBuildEdit] = lambda: self._actionGenericFormEdit(BuildData, WuiAdminBuild,
295	BuildData.ksParam_idBuild);
296	d[self.ksActionBuildEditPost] = lambda: self._actionGenericFormEditPost(BuildData, BuildLogic, WuiAdminBuild,
297	self.ksActionBuildList)
298
299	#
300	# Build Black List actions
301	#
302	d[self.ksActionBuildBlacklist] = lambda: self._actionGenericListing(BuildBlacklistLogic,
303	WuiAdminListOfBlacklistItems);
304	d[self.ksActionBuildBlacklistAdd] = lambda: self._actionGenericFormAdd(BuildBlacklistData, WuiAdminBuildBlacklist);
305	d[self.ksActionBuildBlacklistAddPost] = lambda: self._actionGenericFormAddPost(BuildBlacklistData, BuildBlacklistLogic,
306	WuiAdminBuildBlacklist,
307	self.ksActionBuildBlacklist);
308	d[self.ksActionBuildBlacklistClone] = lambda: self._actionGenericFormClone(BuildBlacklistData,
309	WuiAdminBuildBlacklist,
310	'idBlacklisting');
311	d[self.ksActionBuildBlacklistDetails] = lambda: self._actionGenericFormDetails(BuildBlacklistData,
312	BuildBlacklistLogic,
313	WuiAdminBuildBlacklist,
314	'idBlacklisting');
315	d[self.ksActionBuildBlacklistDoRemove] = lambda: self._actionGenericDoRemove(BuildBlacklistLogic,
316	BuildBlacklistData.ksParam_idBlacklisting,
317	self.ksActionBuildBlacklist)
318	d[self.ksActionBuildBlacklistEdit] = lambda: self._actionGenericFormEdit(BuildBlacklistData,
319	WuiAdminBuildBlacklist,
320	BuildBlacklistData.ksParam_idBlacklisting);
321	d[self.ksActionBuildBlacklistEditPost] = lambda: self._actionGenericFormEditPost(BuildBlacklistData,
322	BuildBlacklistLogic,
323	WuiAdminBuildBlacklist,
324	self.ksActionBuildBlacklist)
325
326
327	#
328	# Failure Category actions
329	#
330	d[self.ksActionFailureCategoryList] = lambda: self._actionGenericListing(
331	FailureCategoryLogic,
332	WuiFailureCategoryList)
333
334	d[self.ksActionFailureCategoryShowAdd] = lambda: self._actionGenericFormAdd(
335	FailureCategoryData,
336	WuiFailureCategory)
337
338	d[self.ksActionFailureCategoryShowEdit] = lambda: self._actionGenericFormEditL(
339	FailureCategoryLogic,
340	FailureCategoryData.ksParam_idFailureCategory,
341	WuiFailureCategory)
342
343	d[self.ksActionFailureCategoryAdd] = lambda: self._actionGenericFormAddPost(
344	FailureCategoryData,
345	FailureCategoryLogic,
346	WuiFailureCategory,
347	self.ksActionFailureCategoryList)
348
349	d[self.ksActionFailureCategoryEdit] = lambda: self._actionGenericFormEditPost(
350	FailureCategoryData,
351	FailureCategoryLogic,
352	WuiFailureCategory,
353	self.ksActionFailureCategoryList)
354
355	d[self.ksActionFailureCategoryDel] = lambda: self._actionGenericDoDelOld(
356	FailureCategoryLogic,
357	FailureCategoryData.ksParam_idFailureCategory,
358	self.ksActionFailureCategoryList)
359
360	#
361	# Failure Reason actions
362	#
363	d[self.ksActionFailureReasonList] = lambda: self._actionGenericListing(
364	FailureReasonLogic,
365	WuiAdminFailureReasonList)
366
367	d[self.ksActionFailureReasonShowAdd] = lambda: self._actionGenericFormAdd(
368	FailureReasonData,
369	WuiAdminFailureReason)
370
371	d[self.ksActionFailureReasonShowEdit] = lambda: self._actionGenericFormEditL(
372	FailureReasonLogic,
373	FailureReasonData.ksParam_idFailureReason,
374	WuiAdminFailureReason)
375
376	d[self.ksActionFailureReasonAdd] = lambda: self._actionGenericFormAddPost(
377	FailureReasonData,
378	FailureReasonLogic,
379	WuiAdminFailureReason,
380	self.ksActionFailureReasonList)
381
382	d[self.ksActionFailureReasonEdit] = lambda: self._actionGenericFormEditPost(
383	FailureReasonData,
384	FailureReasonLogic,
385	WuiAdminFailureReason,
386	self.ksActionFailureReasonList)
387
388	d[self.ksActionFailureReasonDel] = lambda: self._actionGenericDoDelOld(FailureReasonLogic,
389	FailureReasonData.ksParam_idFailureReason,
390	self.ksActionFailureReasonList)
391
392	#
393	# Build Category actions
394	#
395	d[self.ksActionBuildCategoryList] = lambda: self._actionGenericListing(BuildCategoryLogic, WuiAdminBuildCatList);
396	d[self.ksActionBuildCategoryAdd] = lambda: self._actionGenericFormAdd(BuildCategoryData, WuiAdminBuildCat);
397	d[self.ksActionBuildCategoryAddPost] = lambda: self._actionGenericFormAddPost(BuildCategoryData, BuildCategoryLogic,
398	WuiAdminBuildCat,
399	self.ksActionBuildCategoryList);
400	d[self.ksActionBuildCategoryClone] = lambda: self._actionGenericFormClone( BuildCategoryData, WuiAdminBuildCat,
401	'idBuildCategory');
402	d[self.ksActionBuildCategoryDetails] = lambda: self._actionGenericFormDetails(BuildCategoryData, BuildCategoryLogic,
403	WuiAdminBuildCat, 'idBuildCategory');
404	d[self.ksActionBuildCategoryDoRemove] = lambda: self._actionGenericDoRemove(BuildCategoryLogic,
405	BuildCategoryData.ksParam_idBuildCategory,
406	self.ksActionBuildCategoryList)
407
408	#
409	# Test Group actions
410	#
411	d[self.ksActionTestGroupList] = lambda: self._actionGenericListing(TestGroupLogic, WuiTestGroupList);
412	d[self.ksActionTestGroupAdd] = lambda: self._actionGenericFormAdd(TestGroupDataEx, WuiTestGroup);
413	d[self.ksActionTestGroupAddPost] = lambda: self._actionGenericFormAddPost(TestGroupDataEx, TestGroupLogic,
414	WuiTestGroup, self.ksActionTestGroupList);
415	d[self.ksActionTestGroupClone] = lambda: self._actionGenericFormClone( TestGroupDataEx, WuiTestGroup,
416	'idTestGroup');
417	d[self.ksActionTestGroupDetails] = lambda: self._actionGenericFormDetails(TestGroupDataEx, TestGroupLogic,
418	WuiTestGroup, 'idTestGroup');
419	d[self.ksActionTestGroupEdit] = lambda: self._actionGenericFormEdit(TestGroupDataEx, WuiTestGroup,
420	TestGroupDataEx.ksParam_idTestGroup);
421	d[self.ksActionTestGroupEditPost] = lambda: self._actionGenericFormEditPost(TestGroupDataEx, TestGroupLogic,
422	WuiTestGroup, self.ksActionTestGroupList);
423	d[self.ksActionTestGroupDoRemove] = lambda: self._actionGenericDoRemove(TestGroupLogic,
424	TestGroupDataEx.ksParam_idTestGroup,
425	self.ksActionTestGroupList)
426	d[self.ksActionTestCfgRegenQueues] = self._actionRegenQueuesCommon;
427
428	#
429	# Scheduling Group actions
430	#
431	d[self.ksActionSchedGroupList] = lambda: self._actionGenericListing(SchedGroupLogic, WuiAdminSchedGroupList)
432	d[self.ksActionSchedGroupAdd] = lambda: self._actionGenericFormAdd(SchedGroupDataEx, WuiSchedGroup);
433	d[self.ksActionSchedGroupClone] = lambda: self._actionGenericFormClone( SchedGroupDataEx, WuiSchedGroup,
434	'idSchedGroup');
435	d[self.ksActionSchedGroupDetails] = lambda: self._actionGenericFormDetails(SchedGroupDataEx, SchedGroupLogic,
436	WuiSchedGroup, 'idSchedGroup');
437	d[self.ksActionSchedGroupEdit] = lambda: self._actionGenericFormEdit(SchedGroupDataEx, WuiSchedGroup,
438	SchedGroupData.ksParam_idSchedGroup);
439	d[self.ksActionSchedGroupAddPost] = lambda: self._actionGenericFormAddPost(SchedGroupDataEx, SchedGroupLogic,
440	WuiSchedGroup, self.ksActionSchedGroupList);
441	d[self.ksActionSchedGroupEditPost] = lambda: self._actionGenericFormEditPost(SchedGroupDataEx, SchedGroupLogic,
442	WuiSchedGroup, self.ksActionSchedGroupList);
443	d[self.ksActionSchedGroupDoRemove] = lambda: self._actionGenericDoRemove(SchedGroupLogic,
444	SchedGroupData.ksParam_idSchedGroup,
445	self.ksActionSchedGroupList)
446
447	self._aaoMenus = \
448	[
449	[
450	'Builds', self._sActionUrlBase + self.ksActionBuildList,
451	[
452	[ 'Builds', self._sActionUrlBase + self.ksActionBuildList ],
453	[ 'Blacklist', self._sActionUrlBase + self.ksActionBuildBlacklist ],
454	[ 'Build Sources', self._sActionUrlBase + self.ksActionBuildSrcList ],
455	[ 'Build Categories', self._sActionUrlBase + self.ksActionBuildCategoryList ],
456	[ 'New Build', self._sActionUrlBase + self.ksActionBuildAdd ],
457	[ 'New Blacklisting', self._sActionUrlBase + self.ksActionBuildBlacklistAdd ],
458	[ 'New Build Source', self._sActionUrlBase + self.ksActionBuildSrcAdd],
459	[ 'New Build Category', self._sActionUrlBase + self.ksActionBuildCategoryAdd ],
460	]
461	],
462	[
463	'Failure Reasons', self._sActionUrlBase + self.ksActionFailureReasonList,
464	[
465	[ 'Failure Categories', self._sActionUrlBase + self.ksActionFailureCategoryList ],
466	[ 'Failure Reasons', self._sActionUrlBase + self.ksActionFailureReasonList ],
467	[ 'New Failure Category', self._sActionUrlBase + self.ksActionFailureCategoryShowAdd ],
468	[ 'New Failure Reason', self._sActionUrlBase + self.ksActionFailureReasonShowAdd ],
469	]
470	],
471	[
472	'System', self._sActionUrlBase + self.ksActionSystemLogList,
473	[
474	[ 'System Log', self._sActionUrlBase + self.ksActionSystemLogList ],
475	[ 'User Accounts', self._sActionUrlBase + self.ksActionUserList ],
476	[ 'New User', self._sActionUrlBase + self.ksActionUserAdd ],
477	]
478	],
479	[
480	'TestBoxes', self._sActionUrlBase + self.ksActionTestBoxList,
481	[
482	[ 'TestBoxes', self._sActionUrlBase + self.ksActionTestBoxList ],
483	[ 'Scheduling Groups', self._sActionUrlBase + self.ksActionSchedGroupList ],
484	[ 'New TestBox', self._sActionUrlBase + self.ksActionTestBoxAdd ],
485	[ 'New Scheduling Group', self._sActionUrlBase + self.ksActionSchedGroupAdd ],
486	[ 'Regenerate All Scheduling Queues', self._sActionUrlBase + self.ksActionTestBoxesRegenQueues ],
487	]
488	],
489	[
490	'Test Config', self._sActionUrlBase + self.ksActionTestGroupList,
491	[
492	[ 'Test Cases', self._sActionUrlBase + self.ksActionTestCaseList ],
493	[ 'Test Groups', self._sActionUrlBase + self.ksActionTestGroupList ],
494	[ 'Global Resources', self._sActionUrlBase + self.ksActionGlobalRsrcShowAll ],
495	[ 'New Test Case', self._sActionUrlBase + self.ksActionTestCaseAdd ],
496	[ 'New Test Group', self._sActionUrlBase + self.ksActionTestGroupAdd ],
497	[ 'New Global Resource', self._sActionUrlBase + self.ksActionGlobalRsrcShowAdd ],
498	[ 'Regenerate All Scheduling Queues', self._sActionUrlBase + self.ksActionTestCfgRegenQueues ],
499	]
500	],
501	[
502	'> Test Results', 'index.py?' + webutils.encodeUrlParams(self._dDbgParams), []
503	],
504	];
505
506
507	def _actionDefault(self):
508	"""Show the default admin page."""
509	self._sAction = self.ksActionTestBoxList;
510	return self._actionGenericListing(TestBoxLogic, WuiTestBoxList);
511
512	def _actionGenericDoDelOld(self, oCoreObjectLogic, sCoreObjectIdFieldName, sRedirectAction):
513	"""
514	Delete entry (using oLogicType.remove).
515
516	@param oCoreObjectLogic A *Logic class
517
518	@param sCoreObjectIdFieldName Name of HTTP POST variable that
519	contains object ID information
520
521	@param sRedirectAction An action for redirect user to
522	in case of operation success
523	"""
524	iCoreDataObjectId = self.getStringParam(sCoreObjectIdFieldName) # STRING?!?!
525	self._checkForUnknownParameters()
526
527	try:
528	self._sPageTitle = None
529	self._sPageBody = None
530	self._sRedirectTo = self._sActionUrlBase + sRedirectAction
531	return oCoreObjectLogic(self._oDb).remove(self._oCurUser.uid, iCoreDataObjectId)
532	except Exception as oXcpt:
533	self._oDb.rollback();
534	self._sPageTitle = 'Unable to delete record'
535	self._sPageBody = str(oXcpt);
536	if config.g_kfDebugDbXcpt:
537	self._sPageBody += cgitb.html(sys.exc_info());
538	self._sRedirectTo = None
539
540	return False
541
542	def _actionGenericDoRemove(self, oLogicType, sParamId, sRedirAction):
543	"""
544	Delete entry (using oLogicType.removeEntry).
545
546	oLogicType is a class that implements addEntry.
547
548	sParamId is the name (ksParam_...) of the HTTP variable hold the ID of
549	the database entry to delete.
550
551	sRedirAction is what action to redirect to on success.
552	"""
553	idEntry = self.getIntParam(sParamId, iMin = 1, iMax = 0x7fffffe)
554	fCascade = self.getBoolParam('fCascadeDelete', False);
555	self._checkForUnknownParameters()
556
557	try:
558	self._sPageTitle = None
559	self._sPageBody = None
560	self._sRedirectTo = self._sActionUrlBase + sRedirAction;
561	return oLogicType(self._oDb).removeEntry(self._oCurUser.uid, idEntry, fCascade = fCascade, fCommit = True);
562	except Exception as oXcpt:
563	self._oDb.rollback();
564	self._sPageTitle = 'Unable to delete entry';
565	self._sPageBody = str(oXcpt);
566	if config.g_kfDebugDbXcpt:
567	self._sPageBody += cgitb.html(sys.exc_info());
568	self._sRedirectTo = None;
569	return False;
570
571
572	#
573	# System Category.
574	#
575
576	# (all generic)
577
578	#
579	# TestBox & Scheduling Category.
580	#
581
582	def _actionTestBoxListPost(self):
583	"""Actions on a list of testboxes."""
584
585	# Parameters.
586	aidTestBoxes = self.getListOfIntParams(TestBoxData.ksParam_idTestBox, iMin = 1, aiDefaults = []);
587	sListAction = self.getStringParam(self.ksParamListAction);
588	if sListAction in [asDesc[0] for asDesc in WuiTestBoxList.kasTestBoxActionDescs]:
589	idAction = None;
590	else:
591	asActionPrefixes = [ 'setgroup-', ];
592	i = 0;
593	while i < len(asActionPrefixes) and not sListAction.startswith(asActionPrefixes[i]):
594	i += 1;
595	if i >= len(asActionPrefixes):
596	raise WuiException('Parameter "%s" has an invalid value: "%s"' % (self.ksParamListAction, sListAction,));
597	idAction = sListAction[len(asActionPrefixes[i]):];
598	if not idAction.isdigit():
599	raise WuiException('Parameter "%s" has an invalid value: "%s"' % (self.ksParamListAction, sListAction,));
600	idAction = int(idAction);
601	sListAction = sListAction[:len(asActionPrefixes[i]) - 1];
602	self._checkForUnknownParameters();
603
604
605	# Take action.
606	if sListAction is 'none':
607	pass;
608	else:
609	oLogic = TestBoxLogic(self._oDb);
610	aoTestBoxes = []
611	for idTestBox in aidTestBoxes:
612	aoTestBoxes.append(TestBoxData().initFromDbWithId(self._oDb, idTestBox));
613
614	if sListAction in [ 'enable', 'disable' ]:
615	fEnable = sListAction == 'enable';
616	for oTestBox in aoTestBoxes:
617	if oTestBox.fEnabled != fEnable:
618	oTestBox.fEnabled = fEnable;
619	oLogic.editEntry(oTestBox, self._oCurUser.uid, fCommit = False);
620	elif sListAction == 'setgroup':
621	for oTestBox in aoTestBoxes:
622	if oTestBox.idSchedGroup != idAction:
623	oTestBox.idSchedGroup = idAction;
624	oLogic.editEntry(oTestBox, self._oCurUser.uid, fCommit = False);
625	else:
626	for oTestBox in aoTestBoxes:
627	if oTestBox.enmPendingCmd != sListAction:
628	oTestBox.enmPendingCmd = sListAction;
629	oLogic.editEntry(oTestBox, self._oCurUser.uid, fCommit = False);
630	self._oDb.commit();
631
632	# Re-display the list.
633	self._sPageTitle = None;
634	self._sPageBody = None;
635	self._sRedirectTo = self._sActionUrlBase + self.ksActionTestBoxList;
636	return True;
637
638	## @todo scheduling groups code goes here...
639
640	def _actionRegenQueuesCommon(self):
641	"""
642	Common code for ksActionTestBoxesRegenQueues and ksActionTestCfgRegenQueues.
643
644	Too lazy to put this in some separate place right now.
645	"""
646	self._checkForUnknownParameters();
647	## @todo should also be changed to a POST with a confirmation dialog preceeding it.
648
649	self._sPageTitle = 'Regenerate All Scheduling Queues';
650	self._sPageBody = '';
651	aoGroups = SchedGroupLogic(self._oDb).getAll();
652	for oGroup in aoGroups:
653	self._sPageBody += '<h3>%s (ID %#d)</h3>' % (webutils.escapeElem(oGroup.sName), oGroup.idSchedGroup);
654	try:
655	(aoErrors, asMessages) = SchedulerBase.recreateQueue(self._oDb, self._oCurUser.uid, oGroup.idSchedGroup, 2);
656	except Exception as oXcpt:
657	self._oDb.rollback();
658	self._sPageBody += '<p>SchedulerBase.recreateQueue threw an exception: %s</p>' \
659	% (webutils.escapeElem(str(oXcpt)),);
660	self._sPageBody += cgitb.html(sys.exc_info());
661	else:
662	if len(aoErrors) == 0:
663	self._sPageBody += '<p>Successfully regenerated.</p>';
664	else:
665	for oError in aoErrors:
666	if oError[1] is None:
667	self._sPageBody += '<p>%s.</p>' % (webutils.escapeElem(oError[0]),);
668	## @todo links.
669	#elif isinstance(oError[1], TestGroupData):
670	# self._sPageBody += '<p>%s.</p>' % (webutils.escapeElem(oError[0]),);
671	#elif isinstance(oError[1], TestGroupCase):
672	# self._sPageBody += '<p>%s.</p>' % (webutils.escapeElem(oError[0]),);
673	else:
674	self._sPageBody += '<p>%s. [Cannot link to %s]</p>' \
675	% (webutils.escapeElem(oError[0]), webutils.escapeElem(str(oError[1])));
676	for sMsg in asMessages:
677	self._sPageBody += '<p>%s<p>\n' % (webutils.escapeElem(sMsg),);
678	return True;
679
680
681
682	#
683	# Test Config Category.
684	#
685
686	def _actionGlobalRsrcShowAddEdit(self, sAction): # pylint: disable=C0103
687	"""Show Global Resource creation or edit dialog"""
688
689	oGlobalResourceLogic = GlobalResourceLogic(self._oDb)
690	if sAction == WuiAdmin.ksActionGlobalRsrcEdit:
691	idGlobalRsrc = self.getIntParam(GlobalResourceData.ksParam_idGlobalRsrc, iDefault = -1)
692	oData = oGlobalResourceLogic.getById(idGlobalRsrc)
693	else:
694	oData = GlobalResourceData()
695	oData.convertToParamNull()
696
697	self._checkForUnknownParameters()
698
699	oContent = WuiGlobalResource(oData)
700	(self._sPageTitle, self._sPageBody) = oContent.showAddModifyPage(sAction)
701
702	return True
703
704	def _actionGlobalRsrcAddEdit(self, sAction):
705	"""Add or modify Global Resource record"""
706
707	oData = GlobalResourceData()
708	oData.initFromParams(self, fStrict=True)
709
710	self._checkForUnknownParameters()
711
712	if self._oSrvGlue.getMethod() != 'POST':
713	raise WuiException('Expected "POST" request, got "%s"' % (self._oSrvGlue.getMethod(),))
714
715	oGlobalResourceLogic = GlobalResourceLogic(self._oDb)
716	dErrors = oData.validateAndConvert(self._oDb);
717	if len(dErrors) == 0:
718	if sAction == WuiAdmin.ksActionGlobalRsrcAdd:
719	oGlobalResourceLogic.addGlobalResource(self._oCurUser.uid, oData)
720	elif sAction == WuiAdmin.ksActionGlobalRsrcEdit:
721	idGlobalRsrc = self.getStringParam(GlobalResourceData.ksParam_idGlobalRsrc)
722	oGlobalResourceLogic.editGlobalResource(self._oCurUser.uid, idGlobalRsrc, oData)
723	else:
724	raise WuiException('Invalid parameter.')
725	self._sPageTitle = None;
726	self._sPageBody = None;
727	self._sRedirectTo = self._sActionUrlBase + self.ksActionGlobalRsrcShowAll;
728	else:
729	oContent = WuiGlobalResource(oData)
730	(self._sPageTitle, self._sPageBody) = oContent.showAddModifyPage(sAction, dErrors=dErrors)
731
732	return True
733
734	def _generatePage(self):
735	"""Override parent handler in order to change page titte"""
736	if self._sPageTitle is not None:
737	self._sPageTitle = 'Test Manager Admin - ' + self._sPageTitle
738
739	return WuiDispatcherBase._generatePage(self)

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/ValidationKit/testmanager/webui/wuiadmin.py@ 57761

Download in other formats: