recherche temporelle

[auf_rh_dae.git] / project / rh / change_list.py

import time, datetime
from django.core.exceptions import SuspiciousOperation
from django.conf import settings
from django.contrib.admin.options import IncorrectLookupParameters
from django.contrib.admin.views.main import ChangeList as DjangoChangeList
from django.contrib.admin.views.main import ALL_VAR, ORDER_VAR, ORDER_TYPE_VAR, PAGE_VAR, SEARCH_VAR, TO_FIELD_VAR, IS_POPUP_VAR, ERROR_FLAG, field_needs_distinct
from django.utils.encoding import force_unicode, smart_str
from django.utils.http import urlencode
from django.db.models import Q


KEY_ANNEE = 'annee'
KEY_DATE_DEBUT = 'date_debut'
KEY_DATE_FIN = 'date_fin'
KEY_STATUT = 'statut'

STATUT_ACTIF = 'Actif'
STATUT_INACTIF = 'Inactif'
STATUT_FUTUR = 'Futur'
STATUT_INCONNU = 'Inconnu'

class ChangeList(DjangoChangeList):

    internal_fields = (KEY_ANNEE, KEY_DATE_DEBUT, KEY_DATE_FIN, KEY_STATUT, )
    STATUT_CHOICES = ('', STATUT_ACTIF, STATUT_INACTIF, STATUT_FUTUR, STATUT_INCONNU )

    def __init__(self, *args, **kwargs):
        super(ChangeList, self).__init__(*args, **kwargs)

    def get_prefix(self):
        return getattr(self.model_admin, 'prefixe_recherche_temporelle', "")

    def get_annees(self):
        prefix = self.get_prefix()
        date_debut = "%s%s" % (prefix, KEY_DATE_DEBUT)
        date_fin = "%s%s" % (prefix, KEY_DATE_FIN)
        annees = self.model.objects.all().values(date_debut, date_fin)
        annees_debut = [d[date_debut].year for d in annees if d[date_debut] is not None]
        annees_fin = [d[date_fin].year for d in annees if d[date_fin] is not None]
        annees = set(annees_debut + annees_fin)
        annees = list(annees)
        annees.sort(reverse=True)
        return annees


    def get_q_inconnu(self, prefix):
        date_debut_nulle = Q(**{"%s%s__isnull" % (prefix, KEY_DATE_DEBUT) : True})
        date_fin_nulle = Q(**{"%s%s__isnull" % (prefix, KEY_DATE_FIN) : True})
        return Q(date_debut_nulle & date_fin_nulle)

    def get_q_range(self, prefix, borne_gauche=None, borne_droite=None):

        date_debut_nulle = Q(**{"%s%s__isnull" % (prefix, KEY_DATE_DEBUT) : True})
        date_fin_nulle = Q(**{"%s%s__isnull" % (prefix, KEY_DATE_FIN) : True})
        date_debut_superieure_ou_egale_a_borne_gauche = Q(**{"%s%s__gte" % (prefix, KEY_DATE_DEBUT) : borne_gauche})
        date_debut_strict_superieure_ou_egale_a_borne_gauche = Q(**{"%s%s__gt" % (prefix, KEY_DATE_DEBUT) : borne_gauche})
        date_debut_inferieure_ou_egale_a_borne_gauche = Q(**{"%s%s__lte" % (prefix, KEY_DATE_DEBUT) : borne_gauche})
        date_fin_superieure_ou_egale_a_borne_gauche = Q(**{"%s%s__gte" % (prefix, KEY_DATE_FIN) : borne_gauche})
        date_fin_inferieure_ou_egale_a_borne_droite = Q(**{"%s%s__lte" % (prefix, KEY_DATE_FIN) : borne_droite})
        date_fin_strict_inferieure_ou_egale_a_borne_droite = Q(**{"%s%s__lt" % (prefix, KEY_DATE_FIN) : borne_droite})
        date_debut_inferieure_ou_egale_a_borne_droite = Q(**{"%s%s__lte" % (prefix, KEY_DATE_DEBUT) : borne_droite})
        date_fin_superieure_ou_egale_a_borne_droite = Q(**{"%s%s__gte" % (prefix, KEY_DATE_FIN) : borne_droite})

        if borne_droite is None:
            q_range = date_debut_strict_superieure_ou_egale_a_borne_gauche

        if borne_gauche is None:
            q_range = date_fin_strict_inferieure_ou_egale_a_borne_droite

        if borne_droite is not None and borne_gauche is not None:
            q_range = (date_debut_superieure_ou_egale_a_borne_gauche & date_fin_inferieure_ou_egale_a_borne_droite) |  \
                          ((date_debut_inferieure_ou_egale_a_borne_gauche | date_debut_nulle) & date_fin_superieure_ou_egale_a_borne_gauche & date_fin_inferieure_ou_egale_a_borne_droite) | \
                          ((date_fin_superieure_ou_egale_a_borne_droite | date_fin_nulle) & date_debut_inferieure_ou_egale_a_borne_droite) | \
                          (date_debut_inferieure_ou_egale_a_borne_gauche & date_fin_superieure_ou_egale_a_borne_droite)

        if borne_droite is None and borne_gauche is None:
            q_range = Q()

        return q_range

    def get_query_set(self):

        lookup_recherche_temporelle = {}
        use_distinct = False

        qs = self.root_query_set
        lookup_params = self.params.copy() # a dictionary of the query string
        for i in (ALL_VAR, ORDER_VAR, ORDER_TYPE_VAR, SEARCH_VAR, IS_POPUP_VAR, TO_FIELD_VAR):
            if i in lookup_params:
                del lookup_params[i]
        for key, value in lookup_params.items():
            if not isinstance(key, str):
                # 'key' will be used as a keyword argument later, so Python
                # requires it to be a string.
                del lookup_params[key]
                lookup_params[smart_str(key)] = value

            # ignorer les param GET pour la recherche temporelle
            if len([i for i in self.internal_fields if key.endswith(i)]) > 0:
                del lookup_params[key]
                lookup_recherche_temporelle[key] = value
                continue

            if not use_distinct:
                # Check if it's a relationship that might return more than one
                # instance
                field_name = key.split('__', 1)[0]
                try:
                    f = self.lookup_opts.get_field_by_name(field_name)[0]
                except models.FieldDoesNotExist:
                    raise IncorrectLookupParameters
                use_distinct = field_needs_distinct(f)

            # if key ends with __in, split parameter into separate values
            if key.endswith('__in'):
                value = value.split(',')
                lookup_params[key] = value

            # if key ends with __isnull, special case '' and false
            if key.endswith('__isnull'):
                if value.lower() in ('', 'false'):
                    value = False
                else:
                    value = True
                lookup_params[key] = value

            if not self.model_admin.lookup_allowed(key, value):
                raise SuspiciousOperation(
                    "Filtering by %s not allowed" % key
                )

        # Apply lookup parameters from the query string.
        try:
            qs = qs.filter(**lookup_params)
        # Naked except! Because we don't have any other way of validating "params".
        # They might be invalid if the keyword arguments are incorrect, or if the
        # values are not in the correct type, so we might get FieldError, ValueError,
        # ValicationError, or ? from a custom field that raises yet something else
        # when handed impossible data.
        except:
            raise IncorrectLookupParameters

        q = Q()
        prefix = self.get_prefix()
        borne_gauche = None
        borne_droite = None
        for k, v in lookup_recherche_temporelle.items():

            if k.endswith(KEY_ANNEE):
                borne_gauche = "%s-01-01" % v
                borne_droite = "%s-12-31" % v

            if k.endswith(KEY_DATE_DEBUT):
                date = time.strptime(v, settings.DATE_INPUT_FORMATS[0])
                borne_gauche = time.strftime("%Y-%m-%d", date)

            if k.endswith(KEY_DATE_FIN):
                date = time.strptime(v, settings.DATE_INPUT_FORMATS[0])
                borne_droite = time.strftime("%Y-%m-%d", date)

            if k.endswith(KEY_STATUT):
                aujourdhui = datetime.date.today()
                if v == STATUT_ACTIF:
                    borne_gauche = aujourdhui
                    borne_droite = aujourdhui
                elif v == STATUT_INACTIF:
                    borne_droite = aujourdhui
                elif v == STATUT_FUTUR:
                    borne_gauche = aujourdhui
                elif v == STATUT_INCONNU:
                    q = q & self.get_q_inconnu(prefix)
                
        q_range = self.get_q_range(prefix, borne_gauche, borne_droite)
        qs = qs.filter(q & q_range)


        # Use select_related() if one of the list_display options is a field
        # with a relationship and the provided queryset doesn't already have
        # select_related defined.
        if not qs.query.select_related:
            if self.list_select_related:
                qs = qs.select_related()
            else:
                for field_name in self.list_display:
                    try:
                        f = self.lookup_opts.get_field(field_name)
                    except models.FieldDoesNotExist:
                        pass
                    else:
                        if isinstance(f.rel, models.ManyToOneRel):
                            qs = qs.select_related()
                            break

        # Set ordering.
        if self.order_field:
            qs = qs.order_by('%s%s' % ((self.order_type == 'desc' and '-' or ''), self.order_field))

        # Apply keyword searches.
        def construct_search(field_name):
            if field_name.startswith('^'):
                return "%s__istartswith" % field_name[1:]
            elif field_name.startswith('='):
                return "%s__iexact" % field_name[1:]
            elif field_name.startswith('@'):
                return "%s__search" % field_name[1:]
            else:
                return "%s__icontains" % field_name

        if self.search_fields and self.query:
            orm_lookups = [construct_search(str(search_field))
                           for search_field in self.search_fields]
            for bit in self.query.split():
                or_queries = [models.Q(**{orm_lookup: bit})
                              for orm_lookup in orm_lookups]
                qs = qs.filter(reduce(operator.or_, or_queries))
            if not use_distinct:
                for search_spec in orm_lookups:
                    field_name = search_spec.split('__', 1)[0]
                    f = self.lookup_opts.get_field_by_name(field_name)[0]
                    if field_needs_distinct(f):
                        use_distinct = True
                        break

        if use_distinct:
            return qs.distinct()
        else:
            return qs

    def get_query_string(self, new_params=None, remove=None):
        if new_params is None: new_params = {}
        if remove is None: remove = []
        p = self.params.copy()
        for r in remove:
            for k in p.keys():
                if k.startswith(r):
                    del p[k]
        for k, v in new_params.items():
            if v is None:
                if k in p:
                    del p[k]
            else:
                p[k] = v
        return '?%s' % urlencode(p)