Moved from ERP5Wizard.

git-svn-id: https://svn.erp5.org/repos/public/erp5/trunk@25682 20353a03-c40f-0410-a6d1-a30d3c3de9de

product/ERP5/Tool/IntrospectionTool.py

+##############################################################################
+#
+# Copyright (c) 2006 Nexedi SARL and Contributors. All Rights Reserved.
+#                    Ivan Tyagov <ivan@nexedi.com>
+#
+# WARNING: This program as such is intended to be used by professional
+# programmers who take the whole responsability of assessing all potential
+# consequences resulting from its eventual inadequacies and bugs
+# End users who are looking for a ready-to-use solution with commercial
+# garantees and support are strongly adviced to contract a Free Software
+# Service Company
+#
+# This program is Free Software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License
+# as published by the Free Software Foundation; either version 2
+# of the License, or (at your option) any later version.
+#
+# This program 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 General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+#
+##############################################################################
+
+from AccessControl import ClassSecurityInfo
+from Globals import InitializeClass, DTMLFile
+from Products.ERP5Type.Tool.BaseTool import BaseTool
+from Products.ERP5Type import Permissions
+from AccessControl.SecurityManagement import setSecurityManager
+from Products.ERP5Wizard import _dtmldir
+from Products.ERP5Wizard.Tool.WizardTool import _setSuperSecurityManager
+from Products.ERP5Type.Cache import CachingMethod
+
+
+class IntrospectionTool(BaseTool):
+  """
+  This tool provides both local and remote introspection.
+  """
+
+  id = 'portal_introspections'
+  title = 'Introspection Tool'
+  meta_type = 'ERP5 Introspection Tool'
+  portal_type = 'Introspection Tool'
+  allowed_content_types = ('Anonymized Introspection Report', 'User Introspection Report',)
+
+  security = ClassSecurityInfo()
+
+  security.declareProtected(Permissions.ManagePortal, 'manage_overview')
+  manage_overview = DTMLFile('explainIntrospectionTool', _dtmldir )
+
+  security.declareProtected('getERP5MenuItemList', Permissions.View)
+  def getERP5MenuItemList(self, kw):
+    """
+      Returns menu items for a given user
+    """
+    portal = self.getPortalObject()
+    erp5_user_name = kw.pop('erp5_user_name', None)
+    is_portal_manager = portal.portal_membership.checkPermission(Permissions.ManagePortal, \
+                                                                 portal)
+    downgrade_authenticated_user = erp5_user_name is not None and is_portal_manager
+    if downgrade_authenticated_user:
+      # downgrade to desired user
+      original_security_manager = _setSuperSecurityManager(self, erp5_user_name)
+
+    # call the method implementing it
+    erp5_menu_item_list = self._getTypeBasedMethod('getERP5MenuItemList',
+                     fallback_script_id='ERP5Site_getERP5MenuItemList')(**kw)
+
+    if downgrade_authenticated_user:
+      # restore original Security Manager
+      setSecurityManager(original_security_manager)
+
+    return erp5_menu_item_list
+
+InitializeClass(IntrospectionTool)

product/ERP5/__init__.py

@@ -47,7 +47,7 @@ product_path = package_home( globals() )
 from Tool import CategoryTool, SimulationTool, RuleTool, IdTool, TemplateTool,\
                  TestTool, DomainTool, AlarmTool, OrderTool, DeliveryTool,\
                  TrashTool, ContributionTool, NotificationTool, PasswordTool,\
-                 GadgetTool, ContributionRegistryTool
+                 GadgetTool, ContributionRegistryTool, IntrospectionTool
 import ERP5Site
 object_classes = ( ERP5Site.ERP5Site,
                  )
@@ -67,6 +67,7 @@ portal_tools = ( CategoryTool.CategoryTool,
                  NotificationTool.NotificationTool,
                  GadgetTool.GadgetTool,
                  ContributionRegistryTool.ContributionRegistryTool,
+                 IntrospectionTool.IntrospectionTool,
                 )
 content_classes = ()
 content_constructors = ()