############################################################################## # # Copyright (c) 2005 Nexedi SARL and Contributors. All Rights Reserved. # Jerome Perrin <jerome@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 Products.ERP5Type import Permissions, PropertySheet, Constraint from Products.ERP5Type.Core.Folder import Folder from Products.CMFCore.utils import getToolByName from Products.ERP5Form.PreferenceTool import PreferenceTool class Priority: """ names for priorities XXX This was moved to PreferenceTool directly """ SITE = 1 GROUP = 2 USER = 3 class Preference( Folder ): """ A system or user preference TODO: - migrate to ERP5Type the whole preference system """ # CMF Type Definition meta_type = 'ERP5 Preference' portal_type = 'Preference' add_permission = Permissions.AddPortalContent # Declarative properties property_sheets = \ ( PropertySheet.Base , PropertySheet.XMLObject , PropertySheet.DublinCore , PropertySheet.Preference ) # Declarative security security = ClassSecurityInfo() security.declareObjectProtected(Permissions.AccessContentsInformation) def _clearCache(self): """Clear caches used by methods of this preference # TODO: clear different caches according to the preference priority # TODO: (XXX) currently, if one use enables / disables a cache, caches for all other users are reset. This is not good for a system in which users do a lot of preference validation. A better solution is needed for this. But it is not easy because the concept of "per user cache" has been proven to be ambiguous or useless. In theory, a solution could consist in using more keys to select caches or to delete "manually" certain cache keys. """ portal_caches = getToolByName(self.getPortalObject(), 'portal_caches') portal_caches.clearCache(cache_factory_list=('erp5_ui_short',)) def _edit(self, **kw): """edit and clear all caches""" self._clearCache() Folder._edit(self, **kw) def enable(self, **kw): """Workflow method""" self._clearCache() def disable(self, **kw): """Workflow method""" self._clearCache()