##############################################################################
#
# Copyright (c) 2002 Nexedi SARL and Contributors. All Rights Reserved.
#                    Jean-Paul Smets-Solanes <jp@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 Products.ERP5Type.Globals import InitializeClass, DTMLFile, get_request
from AccessControl import ClassSecurityInfo
from Acquisition import aq_base
from Products.PythonScripts.Utility import allow_class
from Products.Formulator.DummyField import fields
from Products.Formulator.Form import ZMIForm
from zLOG import LOG, WARNING

from urllib import quote
from warnings import warn
from Products.ERP5Type import PropertySheet

from Form import ERP5Form
from Form import create_settings_form as Form_create_settings_form
from Selection import Selection

def create_settings_form():
    form = Form_create_settings_form()
    report_method = fields.StringField(
         'report_method',
         title='Report Method',
         description=('The method to get a list of items (object, form,'
                      ' parameters) to aggregate in a single Report'),
         default='',
         required=0)

    form.add_fields([report_method])
    return form

manage_addReport = DTMLFile("dtml/report_add", globals())

def addERP5Report(self, id, title="", REQUEST=None):
    """Add form to folder.
    id     -- the id of the new form to add
    title  -- the title of the form to add
    Result -- empty string
    """
    # add actual object
    id = self._setObject(id, ERP5Report(id, title))
    # respond to the add_and_edit button if necessary
    add_and_edit(self, id, REQUEST)
    return ''

class ERP5Report(ERP5Form):
    """
        An ERP5Form which allows to aggregate a list of 
        forms each of which is rendered on an object with parameters.

        Application: create an accounting book from ERP5 objects 

        - Display the total of each account (report)

        - List all accounts

        - Display the transactions of each account (one form with listbox)

        - List all clients

        - Display the transactions of each client (one form with listbox)

        - List all vendors

        - Display the transactions of each vendor (one form with listbox)

        TODO:
        - Make sure that multiple reports can be run in parallel without conflicts

        - Make sure that multiple reports can be run in parallel without losing
          consistency (ie. concurrent update of the selection)
    """
    meta_type = "ERP5 Report"
    icon = "www/Form.png"

    # Declarative Security
    security = ClassSecurityInfo()

    # Declarative properties
    property_sheets = ( PropertySheet.Base
                      , PropertySheet.SimpleItem)

    # Constructors
    constructors =   (manage_addReport, addERP5Report)

    # This is a patched dtml formOrder
    security.declareProtected('View management screens', 'formOrder')
    formOrder = DTMLFile('dtml/formOrder', globals())

    # Default Attributes
    report_method = None

    # Special Settings
    settings_form = create_settings_form()

    # Default Attributes
    pt = 'report_view'

    # Proxy method to PageTemplate
    def __call__(self, *args, **kwargs):
        warn("ERP5Report to be obsolete, please use ReportBox and normal ERP5Form instead.", DeprecationWarning)
        if not self.report_method:
          raise KeyError, 'report method is not set on the report'

        if not kwargs.has_key('args'):
          kwargs['args'] = args
        form = self
        obj = getattr(form, 'aq_parent', None)
        if obj is not None:
          container = obj.aq_inner.aq_parent
        else:
          container = None
        pt = getattr(self, self.pt)

        report_method = getattr(obj, self.report_method)
        extra_context = self.pt_getContext()
        extra_context['options'] = kwargs
        extra_context['form'] = self
        extra_context['request'] = get_request()
        extra_context['container'] = container ## PROBLEM NOT TAKEN INTO ACCOUNT
        extra_context['here'] = obj
        extra_context['report_method'] = report_method
        return pt.pt_render(extra_context=extra_context)

    def _exec(self, bound_names, args, kw):
        pt = getattr(self,self.pt)
        return pt._exec(self, bound_names, args, kw)

def add_and_edit(self, id, REQUEST):
    """Helper method to point to the object's management screen if
    'Add and Edit' button is pressed.
    id -- id of the object we just added
    """
    if REQUEST is None:
        return
    try:
        u = self.DestinationURL()
    except AttributeError:
        u = REQUEST['URL1']
    if REQUEST['submit'] == " Add and Edit ":
        u = "%s/%s" % (u, quote(id))
    REQUEST.RESPONSE.redirect(u+'/manage_main')

def manage_add_report(self, id, title="", unicode_mode=0, REQUEST=None):
    """Add form to folder.
    id     -- the id of the new form to add
    title  -- the title of the form to add
    Result -- empty string
    """
    # add actual object
    id = self._setObject(id, ZMIForm(id, title, unicode_mode))
    # respond to the add_and_edit button if necessary
    add_and_edit(self, id, REQUEST)
    return ''

class ReportSection:
  """ A section in an ERP5Report.

  ERP5 Reports are made of sections, which are some standards ERP5 Forms
  rendered in a single document.
  To create a report section, you have to define which object will be
  the context of the form, the id of the form, and dictionnaries to
  override the values of the selection parameters in the constructor of
  the ReportSection.
  """
  meta_type = "ReportSection"
  security = ClassSecurityInfo()

  def __init__(self, path='',
                     form_id='',
                     method_id=None,
                     title=None,
                     translated_title=None,
                     level=1,
                     param_list=None,
                     param_dict=None,
                     selection_name=None,
                     selection_params=None,
                     listbox_display_mode=None,
                     selection_columns=None,
                     selection_stats=None,
                     selection_sort_order=None,
                     selection_report_path=None,
                     selection_report_list=None,
                     temporary_selection=True):
    """A report section contains instructions to render a section of a report.
      Typically it will render a given form on a given context with specified
      selection parameter or different listbox configuration.
      Some report section simply define a title.

      The following parameters can be provided:

        * path: The path to the document used as a context of this section.
        * form_id: The ID of the ERP5 Form for this section.
        * method_id: The ID of a method that will return a temp document to use
            as a context for this section.
        * title: The title of the section, displayed in the report and in the
            outline if the report style supports it.
        * translated_title: deprecated. Simply pass a Message to title instead.
        * level: The heading level of the title. 1 correspond to a top level
            title, 9 to a small title.
        * param_list: ?
        * param_dict ?
        * selection_name: The name of the selection used in the report section.
        * selection_params: A dictionary of selection parameters which will be
            used during the rendering of the report section.
        * selection_columns: A list of tuples (column_name, column_title) that
            will be used in the listbox contained in this report section.
        * listbox_display_mode: The mode used to display the listbox, using
            the same values as SelectionTool.setListboxDisplayMode.
        * selection_stats: ?
        * selection_sort_order: ?
        * selection_report_path: The root category for this report section
        * selection_report_list: The list of infolded categories (defaults to
            all)
        * temporary_selection: If set to False, the selection will be written
             which is specified by selection_name.
    """

    self.path = path
    self.form_id = form_id
    self.title = title
    if translated_title is not None:
      warn("Don't use translated_title, but title directly", DeprecationWarning)
    self.translated_title = translated_title
    self.level = level
    self.selection_name = selection_name
    self.selection_params = selection_params
    self.listbox_display_mode = listbox_display_mode
    self.selection_columns = selection_columns
    self.selection_stats = selection_stats
    self.selection_sort_order = selection_sort_order
    self.selection_report_path = selection_report_path
    self.selection_report_list = selection_report_list
    self.param_dict = param_dict or {}
    self.param_list = param_list or []
    self.method_id = method_id
    self.temporary_selection = temporary_selection

  security.declarePublic('getTitle')
  def getTitle(self):
    return self.title

  security.declarePublic('getTranslatedTitle')
  def getTranslatedTitle(self):
    # deprecated: use title instead (with a translated string)
    return self.translated_title

  security.declarePublic('getLevel')
  def getLevel(self):
    return self.level

  security.declarePublic('getPath')
  def getPath(self):
    return self.path

  security.declarePublic('getObject')
  def getObject(self, context):
    object = context.getPortalObject().restrictedTraverse(self.path)
    if self.method_id is not None:

      object = getattr(object, self.method_id)(*self.param_list, **self.param_dict)
    return object

  security.declarePublic('getFormId')
  def getFormId(self):
    return self.form_id

  def pushRequest(self):
    self = aq_base(self)
    if hasattr(self, '_REQUEST'):
      raise ValueError, "can not replace the backupped REQUEST"
    self._REQUEST = {'form': {}, 'other': {},}
    REQUEST = get_request()
    self._REQUEST['form'].update(REQUEST.form)
    self._REQUEST['other'].update(REQUEST.other)
    REQUEST.form.update(self.param_dict)

  def popRequest(self):
    self = aq_base(self)
    if not hasattr(self, '_REQUEST'):
      raise ValueError, "no backupped REQUEST"
    REQUEST = get_request()
    REQUEST.form.clear()
    REQUEST.other.clear()
    REQUEST.form.update(self._REQUEST['form'])
    REQUEST.other.update(self._REQUEST['other'])
    del self._REQUEST
    
  security.declarePublic('pushReport')
  def pushReport(self, context, render_prefix=None):
    self.pushRequest()

    REQUEST = get_request()
    portal_selections = context.portal_selections
    selection_list = [self.selection_name]
    # when the Form which is specified by form_id, has a listbox, make prefixed_selection_name.
    # which is based on specified selection_name in the listbox.
    form_id = self.getFormId()
    if form_id:
      listbox = getattr(getattr(context, form_id), 'listbox', None)
      if listbox is not None:
        selection_name = listbox.get_value('selection_name')
        if render_prefix is not None:
          selection_name = '%s_%s' % (render_prefix, selection_name)
          REQUEST.other['prefixed_selection_name'] = selection_name
        selection_list.append(selection_name)
    # save report's selection and orignal form's selection,
    #as ListBox will overwrite it
    for selection_name in filter(lambda x: x is not None, selection_list):
      if self.temporary_selection:
        portal_selections.pushSelection(selection_name)
      else:
        if portal_selections.getSelectionFor(selection_name) is None:
          portal_selections.setSelectionFor(selection_name, Selection())

      if self.selection_report_list is not None:
        selection = portal_selections.getSelectionFor(selection_name,
                                                      REQUEST=REQUEST)
        selection.edit(report_list=self.selection_report_list)
      if self.selection_report_path is not None:
        selection = portal_selections.getSelectionFor(selection_name,
                                                      REQUEST=REQUEST)
        selection.edit(report_path=self.selection_report_path)
      if self.listbox_display_mode is not None:
        # XXX Dirty fix, to be able to change the display mode in form_view
        REQUEST.list_selection_name = selection_name
        portal_selections.setListboxDisplayMode(REQUEST,
                                                self.listbox_display_mode,
                                                selection_name=selection_name)
      if self.selection_params is not None:
        params = portal_selections.getSelectionParamsFor(selection_name,
                                                         REQUEST=REQUEST)
        params.update(self.selection_params)
        portal_selections.setSelectionParamsFor(selection_name,
                                                params,
                                                REQUEST=REQUEST)
      if self.selection_columns is not None:
        portal_selections.setSelectionColumns(selection_name,
                                              self.selection_columns,
                                              REQUEST=REQUEST)
      if self.selection_sort_order is not None:
        portal_selections.setSelectionSortOrder(selection_name,
                                                self.selection_sort_order,
                                                REQUEST=REQUEST)
      if self.selection_stats is not None:
        portal_selections.setSelectionStats(selection_name,
                                            self.selection_stats,
                                            REQUEST=REQUEST)

    # When rendering a report section with a listbox, listbox gets parameters
    # from request.form and edits selection with those parameters, so if you
    # happen to pass explicitly selection params that have the same name as
    # some request parameters (some dialog fields) but different values,
    # listbox would not use your explicit parameters, but the ones from
    # REQUEST.form, so we remove eventual request parameters that have the same
    # name of selections parameters passed explicitly.
    for selection_parameter in (self.selection_params or ()):
      REQUEST.form.pop(selection_parameter, None)

  security.declarePublic('popReport')
  def popReport(self, context, render_prefix=None):
    self.popRequest()

    portal_selections = context.portal_selections
    selection_list = []
    form_id = self.getFormId()
    if form_id:
      listbox = getattr(getattr(context, form_id), 'listbox', None)
      if listbox is not None:
        selection_list.append(listbox.get_value('selection_name'))
    selection_list.append(self.selection_name)
    if self.temporary_selection:
      for selection_name in selection_list:
        if selection_name is not None:
          portal_selections.popSelection(selection_name)

InitializeClass(ReportSection)
allow_class(ReportSection)