"""This module regroups a set of structures that may be used to configure

various places of the generated web interface.

Primary view configuration

``````````````````````````

:primaryview_section:

   where to display a relation in primary view. Value may be one of:

   * 'attributes', display in the attributes section

   * 'relations', display in the relations section (below attributes)

   * 'sideboxes', display in the side boxes (beside attributes)

   * 'hidden', don't display

:primaryview_display_ctrl:

   how to display a relation in primary view. Values are dict with some of the

   following keys:

   :vid:

      identifier of a view to use to display the result set. Defaults depends on

      the section:

      * 'attributes' section: 'reledit' view

      * 'relations' section: 'autolimited' view

      * 'sideboxes' section: 'sidebox' view

   :label:

     label for the relations section or side box

   :limit:

      boolean telling if the results should be limited according to the

      configuration

   :filter:

      callback taking the related result set as argument and returning it

      filtered

   :order:

      int used to control order within a section. When not specified,

      automatically set according to order in which tags are added.

   Notice those values are only considered if the relation is in a displayed

   section (controlled by :attr:`primaryview_section`)

Index view configuration

````````````````````````

:indexview_etype_section:

   entity type category in the index/manage page. May be one of

   * 'application'

   * 'system'

   * 'schema'

   * 'subobject' (not displayed by default)

Actions box configuration

`````````````````````````

:actionbox_appearsin_addmenu:

  simple boolean relation tags used to control the "add entity" submenu.

  Relations whose rtag is True will appears, other won't.

Automatic form configuration

````````````````````````````

:autoform_section:

   where to display a relation in entity form, according to form type.

   `tag_attribute`, `tag_subject_of` and `tag_object_of` methods for this

   relation tags expect two arguments additionaly to the relation key: a

   `formtype` and a `section`.

   formtype may be one of:

   * 'main', the main entity form

   * 'inlined', the form for an entity inlined into another's one

   * 'muledit', the multiple entity (table) form

   section may be one of:

   * 'hidden', don't display

   * 'attributes', display in the attributes section

   * 'relations', display in the relations section, using the generic relation

     selector combobox (available in main form only, and not for attribute

     relation)

   * 'metadata', display in a special metadata form (NOT YET IMPLEMENTED,

     subject to changes)

:autoform_field:

  specify a custom field instance to use for a relation

:autoform_field_kwargs:

  specify a dictionnary of arguments to give to the field constructor for a

  relation. You usually want to use either `autoform_field` or

  `autoform_field_kwargs`, not both. The later won't have any effect if the

  former is specified for a relation.

:autoform_permissions_overrides:

  provide a way to by-pass security checking for dark-corner case where it can't

  be verified properly. XXX documents.

:organization: Logilab

:copyright: 2009 LOGILAB S.A. (Paris, FRANCE), license is LGPL v2.

:contact: http://www.logilab.fr/ -- mailto:contact@logilab.fr

:license: GNU Lesser General Public License, v2.1 - http://www.gnu.org/licenses

"""

__docformat__ = "restructuredtext en"

from warnings import warn

from cubicweb import neg_role

from cubicweb.rtags import (RelationTags, RelationTagsBool, RelationTagsSet,

                            RelationTagsDict, register_rtag, _ensure_str_key)

from cubicweb.schema import META_RTYPES

from cubicweb.web import formwidgets

def card_from_role(card, role):

    if role == 'subject':

        return card[0]

    assert role in ('object', 'sobject'), repr(role)

    return card[1]

# primary view configuration ##################################################

def init_primaryview_section(rtag, sschema, rschema, oschema, role):

    if rtag.get(sschema, rschema, oschema, role) is None:

        card = card_from_role(rschema.rproperty(sschema, oschema, 'cardinality'), role)

        composed = rschema.rproperty(sschema, oschema, 'composite') == neg_role(role)

        if rschema.is_final():

            if rschema.meta or sschema.is_metadata(rschema) \

                    or oschema.type in ('Password', 'Bytes'):

                section = 'hidden'

            else:

                section = 'attributes'

        elif card in '1+':

            section = 'attributes'

        elif composed:

            section = 'relations'

        else:

            section = 'sideboxes'

        rtag.tag_relation((sschema, rschema, oschema, role), section)

primaryview_section = RelationTags('primaryview_section',

                                   init_primaryview_section,

                                   frozenset(('attributes', 'relations',

                                               'sideboxes', 'hidden')))

class DisplayCtrlRelationTags(RelationTagsDict):

    def __init__(self, *args, **kwargs):

        super(DisplayCtrlRelationTags, self).__init__(*args, **kwargs)

        self._counter = 0

    def tag_relation(self, key, tag):

        tag = super(DisplayCtrlRelationTags, self).tag_relation(key, tag)

        self._counter += 1

        tag.setdefault('order', self._counter)

    def tag_subject_of(self, key, tag):

        subj, rtype, obj = key

        if obj != '*':

            self.warning('using explict target type in display_ctrl.tag_subject_of() '

                         'has no effect, use (%s, %s, "*") instead of (%s, %s, %s)',

                         subj, rtype, subj, rtype, obj)

        super(DisplayCtrlRelationTags, self).tag_subject_of((subj, rtype, '*'), tag)

    def tag_object_of(self, key, tag):

        subj, rtype, obj = key

        if subj != '*':

            self.warning('using explict subject type in display_ctrl.tag_object_of() '

                         'has no effect, use ("*", %s, %s) instead of (%s, %s, %s)',

                         rtype, obj, subj, rtype, obj)

        super(DisplayCtrlRelationTags, self).tag_object_of(('*', rtype, obj), tag)

def init_primaryview_display_ctrl(rtag, sschema, rschema, oschema, role):

    if role == 'subject':

        oschema = '*'

        label = rschema.type

    else:

        sschema = '*'

        label = '%s_%s' % (rschema, role)

    rtag.setdefault((sschema, rschema, oschema, role), 'label', label)

    rtag.setdefault((sschema, rschema, oschema, role), 'order', rtag._counter)

primaryview_display_ctrl = DisplayCtrlRelationTags('primaryview_display_ctrl',

                                                   init_primaryview_display_ctrl)

# index view configuration ####################################################

# entity type section in the index/manage page. May be one of

# * 'application'

# * 'system'

# * 'schema'

# * 'hidden'

# * 'subobject' (not displayed by default)

class InitializableDict(dict):

    def __init__(self, *args, **kwargs):

        super(InitializableDict, self).__init__(*args, **kwargs)

        register_rtag(self)

    def init(self, schema, check=True):

        for eschema in schema.entities():

            if eschema.schema_entity():

                self.setdefault(eschema, 'schema')

            elif eschema.is_subobject(strict=True):

                self.setdefault(eschema, 'subobject')

            else:

                self.setdefault(eschema, 'application')

indexview_etype_section = InitializableDict(EmailAddress='subobject',

                                            CWUser='system',

                                            CWGroup='system',

                                            CWPermission='system',

                                            CWCache='system',

                                            BaseTransition='hidden',

                                            )

# autoform.AutomaticEntityForm configuration ##################################

def _formsections_as_dict(formsections):

    result = {}

    for formsection in formsections:

        formtype, section = formsection.split('_', 1)

        result[formtype] = section

    return result

def _card_and_comp(sschema, rschema, oschema, role):

    if role == 'subject':

        card = rschema.rproperty(sschema, oschema, 'cardinality')[0]

        composed = rschema.rproperty(sschema, oschema, 'composite') == 'object'

    else:

        card = rschema.rproperty(sschema, oschema, 'cardinality')[1]

        composed = rschema.rproperty(sschema, oschema, 'composite') == 'subject'

    return card, composed

class AutoformSectionRelationTags(RelationTagsSet):

    """autoform relations'section"""

    bw_tag_map = {

        'primary':   {'main': 'attributes', 'muledit': 'attributes'},

        'secondary': {'main': 'attributes', 'muledit': 'hidden'},

        'metadata':  {'main': 'metadata'},

        'generic':   {'main': 'relations'},

        'generated': {'main': 'hidden'},

        }

    _allowed_form_types = ('main', 'inlined', 'muledit')

    _allowed_values = {'main': ('attributes', 'relations', 'metadata', 'hidden'),

                       'inlined': ('attributes', 'hidden'),

                       'muledit': ('attributes', 'hidden'),

                       }

    @staticmethod

    def _initfunc(self, sschema, rschema, oschema, role):

        formsections = self.init_get(sschema, rschema, oschema, role)

        if formsections is None:

            formsections = self.tag_container_cls()

        sectdict = _formsections_as_dict(formsections)

        if rschema in META_RTYPES:

            sectdict.setdefault('main', 'hidden')

            sectdict.setdefault('muledit', 'hidden')

            sectdict.setdefault('inlined', 'hidden')

        # ensure we have a tag for each form type

        if not 'main' in sectdict:

            if not rschema.is_final() and (

                sectdict.get('inlined') == 'attributes' or

                'inlined_attributes' in self.init_get(sschema, rschema, oschema,

                                                      neg_role(role))):

                sectdict['main'] = 'hidden'

            elif sschema.is_metadata(rschema):

                sectdict['main'] = 'metadata'

            else:

                card, composed = _card_and_comp(sschema, rschema, oschema, role)

                if card in '1+':

                    if not rschema.is_final() and composed:

                        # XXX why? probably because we want it unlined, though

                        # this is not the case by default

                        sectdict['main'] = 'hidden'

                    else:

                        sectdict['main'] = 'attributes'

                        if not 'muledit' in sectdict:

                            sectdict['muledit'] = 'attributes'

                elif rschema.is_final():

                    sectdict['main'] = 'attributes'

                else:

                    sectdict['main'] = 'relations'

        if not 'muledit' in sectdict:

            sectdict['muledit'] = 'hidden'

            if sectdict['main'] == 'attributes':

                card, composed = _card_and_comp(sschema, rschema, oschema, role)

                if card in '1+' and not composed:

                    sectdict['muledit'] = 'attributes'

        if not 'inlined' in sectdict:

            sectdict['inlined'] = 'hidden'

        # recompute formsections and set it to avoid recomputing

        for formtype, section in sectdict.iteritems():

            formsections.add('%s_%s' % (formtype, section))

        key = _ensure_str_key( (sschema, rschema, oschema, role) )

        self._tagdefs[key] = formsections

    def tag_relation(self, key, formtype, section=None):

        if section is None:

            tag = formtype

            for formtype, section in self.bw_tag_map[tag].iteritems():

                warn('[3.6] add tag to autoform section by specifying form '

                     'type and tag. Replace %s by formtype=%s, section=%s'

                     % (tag, formtype, section), DeprecationWarning, stacklevel=2)

                self.tag_relation(key, formtype, section)

        assert formtype in self._allowed_form_types, \

               'formtype should be in (%s), not %s' % (

            ','.join(self._allowed_form_types), formtype)

        assert section in self._allowed_values[formtype], \

               'section for %s should be in (%s), not %s' % (

            formtype, ','.join(self._allowed_values[formtype]), section)

        rtags = self._tagdefs.setdefault(_ensure_str_key(key),

                                         self.tag_container_cls())

        # remove previous section for this form type if any

        if rtags:

            for tag in rtags.copy():

                if tag.startswith(formtype):

                    rtags.remove(tag)

        rtags.add('%s_%s' % (formtype, section))

        return rtags

    def init_get(self, *key):

        return super(AutoformSectionRelationTags, self).get(*key)

    def get(self, *key):

        # overriden to avoid recomputing done in parent classes

        return self._tagdefs[key]

    def relations_by_section(self, entity, formtype, section,

                             permission=None, strict=False):

        """return a list of (relation schema, target schemas, role) for the

        given entity matching categories and permission.

        `strict`:

          bool telling if having local role is enough (strict = False) or not

        """

        tag = '%s_%s' % (formtype, section)

        eschema  = entity.e_schema

        permsoverrides = autoform_permissions_overrides

        if entity.has_eid():

            eid = entity.eid

        else:

            eid = None

            strict = False

        for rschema, targetschemas, role in eschema.relation_definitions(True):

            # check category first, potentially lower cost than checking

            # permission which may imply rql queries

            if tag is not None:

                targetschemas = [tschema for tschema in targetschemas

                                 if tag in self.etype_get(eschema, rschema,

                                                          role, tschema)]

            if not targetschemas:

                continue

            if permission is not None:

                # tag allowing to hijack the permission machinery when

                # permission is not verifiable until the entity is actually

                # created...

                if eid is None and '%s_on_new' % permission in permsoverrides.etype_get(eschema, rschema, role):

                    yield (rschema, targetschemas, role)

                    continue

                if rschema.is_final():

                    if not rschema.has_perm(entity._cw, permission, eid):

                        continue

                elif role == 'subject':

                    if not ((not strict and rschema.has_local_role(permission)) or

                            rschema.has_perm(entity._cw, permission, fromeid=eid)):

                        continue

                    # on relation with cardinality 1 or ?, we need delete perm as well

                    # if the relation is already set

                    if (permission == 'add'

                        and rschema.cardinality(eschema, targetschemas[0], role) in '1?'

                        and eid and entity.related(rschema.type, role)

                        and not rschema.has_perm(entity._cw, 'delete', fromeid=eid,

                                                 toeid=entity.related(rschema.type, role)[0][0])):

                        continue

                elif role == 'object':

                    if not ((not strict and rschema.has_local_role(permission)) or

                            rschema.has_perm(entity._cw, permission, toeid=eid)):