#!/usr/bin/python2.5

#

# Copyright 2009 the Melange authors.

#

# Licensed under the Apache License, Version 2.0 (the "License");

# you may not use this file except in compliance with the License.

# You may obtain a copy of the License at

#

#   http://www.apache.org/licenses/LICENSE-2.0

#

# Unless required by applicable law or agreed to in writing, software

# distributed under the License is distributed on an "AS IS" BASIS,

# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

# See the License for the specific language governing permissions and

# limitations under the License.

"""Views for Surveys.

"""

__authors__ = [

  '"Daniel Diniz" <ajaksu@gmail.com>',

  '"James Levy" <jamesalexanderlevy@gmail.com>',

  '"Lennard de Rijk" <ljvderijk@gmail.com>',

  ]

import datetime

import re

import string

from google.appengine.ext import db

from django import forms

from django import http

from django.utils import simplejson

from soc.logic import cleaning

from soc.logic import dicts

from soc.logic.helper import timeline

from soc.logic.models.survey import logic as survey_logic

from soc.logic.models.user import logic as user_logic

from soc.models.survey import Survey

from soc.models.survey_record import SurveyRecord

from soc.models.user import User

from soc.views import out_of_band

from soc.views.helper import access

from soc.views.helper import decorators

from soc.views.helper import forms as forms_helper

from soc.views.helper import lists

from soc.views.helper import redirects

from soc.views.helper import responses

from soc.views.helper import surveys

from soc.views.helper import widgets

from soc.views.models import base

DEF_CHOICE_TYPES = set(('selection', 'pick_multi', 'choice', 'pick_quant'))

DEF_TEXT_TYPES = set(('long_answer', 'short_answer'))

DEF_PROPERTY_TYPES = tuple(DEF_CHOICE_TYPES) + tuple(DEF_TEXT_TYPES)

# used in View.getSchemaOptions to map POST values

DEF_BOOL = {'True': True, 'False': False}

DEF_SHORT_ANSWER = ("Short Answer",

                    "Less than 40 characters. Rendered as a text input. "

                    "It's possible to add a free form question (Content) "

                    "and a in-input prompt/example text.")

DEF_CHOICE = (

    "Selection",

    "Can be set as a single choice (selection) or multiple choice "

    "(pick_multi) question. Rendered as a select (single choice) "

    "or a group of checkboxes (multiple choice). It's possible to "

    "add a free form question (Content) and as many free form options "

    "as wanted. Each option can be edited (double-click), deleted "

    "(click on (-) button) or reordered (drag and drop).")

DEF_LONG_ANSWER = (

    "Long Answer",

    "Unlimited length, auto-growing field. Rendered as a textarea. "

    "It's possible to add a free form question (Content) and an in-input "

    "prompt/example text.")

DEF_QUESTION_TYPES = dict(short_answer=DEF_SHORT_ANSWER,

                          long_answer=DEF_LONG_ANSWER, choice=DEF_CHOICE)

# for toCSV and View.exportSerialized

DEF_FIELDS = 'author modified_by'

DEF_PLAIN = 'is_featured content created modified'

class View(base.View):

  """View methods for the Survey model.

  """

  def __init__(self, params=None):

    """Defines the fields and methods required for the base View class

    to provide the user with list, public, create, edit and delete views.

    Params:

      params: a dict with params for this View

    """

    rights = access.Checker(params)

    rights['any_access'] = ['allow']

    rights['show'] = [('checkIsSurveyWritable', survey_logic)]

    rights['create'] = ['checkIsUser']

    rights['edit'] = [('checkIsSurveyWritable', survey_logic)]

    rights['delete'] = ['checkIsDeveloper'] # TODO: fix deletion of Surveys

    rights['list'] = ['checkDocumentList']

    rights['pick'] = ['checkDocumentPick']

    rights['record'] = [('checkHasAny', [

        [('checkIsSurveyReadable', [survey_logic]),

         ('checkIsMySurveyRecord', [survey_logic, 'id'])]

        ])]

    rights['results'] = ['checkIsDeveloper'] # TODO: proper access check

    rights['take'] = [('checkIsSurveyTakeable', survey_logic)]

    new_params = {}

    new_params['logic'] = survey_logic

    new_params['rights'] = rights

    new_params['name'] = 'Survey'

    new_params['sidebar_grouping'] = "Surveys"

    new_params['extra_django_patterns'] = [

         (r'^%(url_name)s/(?P<access_type>take)/%(key_fields)s$',

         'soc.views.models.%(module_name)s.take',

         'Take %(name)s'),

         (r'^%(url_name)s/(?P<access_type>json)/%(scope)s$',

         'soc.views.models.%(module_name)s.json',

         'Export %(name)s as JSON'),

        (r'^%(url_name)s/(?P<access_type>record)/%(key_fields)s$',

         'soc.views.models.%(module_name)s.record',

         'View survey record for %(name)s'),

        (r'^%(url_name)s/(?P<access_type>results)/%(key_fields)s$',

         'soc.views.models.%(module_name)s.results',

         'View survey results for %(name)s'),

        (r'^%(url_name)s/(?P<access_type>show)/user/(?P<link_id>)\w+$',

         'soc.views.models.%(module_name)s.results',

         'View survey results for user'),

        ]

    new_params['export_content_type'] = 'text/text'

    new_params['export_extension'] = '.csv'

    new_params['export_function'] = surveys.toCSV(self)

    new_params['delete_redirect'] = '/'

    new_params['list_key_order'] = [

        'link_id', 'scope_path', 'name', 'short_name', 'title',

        'content', 'prefix','read_access','write_access']

    new_params['edit_template'] = 'soc/survey/edit.html'

    new_params['create_template'] = 'soc/survey/edit.html'

    new_params['public_template'] = 'soc/survey/public.html'

    new_params['record_template'] = 'soc/survey/view_record.html'

    new_params['take_template'] = 'soc/survey/take.html'

    new_params['no_create_raw'] = True

    new_params['no_create_with_scope'] = True

    new_params['no_create_with_key_fields'] = True

    new_params['no_list_raw'] = True

    new_params['sans_link_id_create'] = True

    new_params['sans_link_id_list'] = True

    new_params['create_dynafields'] = [

        {'name': 'link_id',

         'base': forms.fields.CharField,

         'label': 'Survey Link ID',

         },

        ]

    new_params['create_extra_dynaproperties'] = {

        'content': forms.fields.CharField(required=False, label='Description',

            widget=widgets.FullTinyMCE(attrs={'rows': 25, 'cols': 100})),

        'survey_html': forms.fields.CharField(widget=forms.HiddenInput,

                                              required=False),

        'scope_path': forms.fields.CharField(widget=forms.HiddenInput,

                                             required=True),

        'prefix': forms.fields.CharField(widget=widgets.ReadOnlyInput(),

                                        required=True),

        'clean_content': cleaning.clean_html_content('content'),

        'clean_link_id': cleaning.clean_link_id('link_id'),

        'clean_scope_path': cleaning.clean_scope_path('scope_path'),

        'clean': cleaning.validate_document_acl(self, True),

        }

    new_params['extra_dynaexclude'] = ['author', 'created',

                                       'home_for', 'modified_by', 'modified',

                                       'take_survey', 'survey_content']

    new_params['edit_extra_dynaproperties'] = {

        'doc_key_name': forms.fields.CharField(widget=forms.HiddenInput),

        'created_by': forms.fields.CharField(widget=widgets.ReadOnlyInput(),

                                             required=False),

        'last_modified_by': forms.fields.CharField(

                                widget=widgets.ReadOnlyInput(), required=False),

        'clean': cleaning.validate_document_acl(self),

        }

    params = dicts.merge(params, new_params, sub_merge=True)

    super(View, self).__init__(params=params)

  def list(self, request, access_type, page_name=None, params=None,

           filter=None, order=None, **kwargs):

    """See base.View.list.

    """

    return super(View, self).list(request, access_type, page_name=page_name,

                                  params=params, filter=kwargs)

  def _public(self, request, entity, context):

    """Add a preview version of the Survey to the page's context.

    Args:

      request: the django request object

      entity: the entity to make public

      context: the context object

    """

    # construct the form to be shown on the page

    # TODO(ljvderijk) Generate SurveyForm without passing along the logic

    survey_form = surveys.SurveyTakeForm(survey_content=entity.survey_content,

                                         survey_logic=self._params['logic'])

    survey_form.getFields()

    context['survey_form'] = survey_form

    context['page_name'] = "%s titled '%s'" %(

        context['page_name'], entity.title)

    # return True to signal that the page may be displayed

    return True

  def _editPost(self, request, entity, fields):

    """See base.View._editPost().

    Processes POST request items to add new dynamic field names,

    question types, and default prompt values to SurveyContent model.

    """

    user = user_logic.getForCurrentAccount()

    schema = {}

    survey_fields = {}

    if not entity:

      # new Survey

      if 'serialized' in request.POST:

        fields, schema, survey_fields = self.importSerialized(request, fields,

                                                              user)

      fields['author'] = user

    else:

      fields['author'] = entity.author

      schema = self.loadSurveyContent(schema, survey_fields, entity)

    # remove deleted properties from the model

    self.deleteQuestions(schema, survey_fields, request.POST)

    # add new text questions and re-build choice questions

    self.getRequestQuestions(schema, survey_fields, request.POST)

    # get schema options for choice questions

    self.getSchemaOptions(schema, survey_fields, request.POST)

    survey_content = getattr(entity,'survey_content', None)

    # create or update a SurveyContent for this Survey

    survey_content = survey_logic.createSurvey(survey_fields, schema,

                                                survey_content=survey_content)

    # save survey_content for existent survey or pass for creating a new one

    if entity:

      entity.modified_by = user

      entity.survey_content = survey_content

      db.put(entity)

    else:

      fields['survey_content'] = survey_content

    fields['modified_by'] = user

    super(View, self)._editPost(request, entity, fields)

  def loadSurveyContent(self, schema, survey_fields, entity):

    """Populate the schema dict and get text survey questions.

    """

    if hasattr(entity, 'survey_content'):

      # there is a SurveyContent already

      survey_content = entity.survey_content

      schema = eval(survey_content.schema)

      for question_name in survey_content.dynamic_properties():

        # get the current questions from the SurveyContent

        if question_name not in schema:

          continue

        if schema[question_name]['type'] not in DEF_CHOICE_TYPES:

          # Choice questions are always regenerated from request, see

          # self.get_request_questions()

          question = getattr(survey_content, question_name)

          survey_fields[question_name] = question

    return schema

  def deleteQuestions(self, schema, survey_fields, POST):

    """Process the list of questions to delete, from a hidden input.

    """

    deleted = POST.get('__deleted__', '')

    if deleted:

      deleted = deleted.split(',')

      for field in deleted:

        if field in schema:

          del schema[field]

        if field in survey_fields:

          del survey_fields[field]

  def getRequestQuestions(self, schema, survey_fields, POST):

    """Get fields from request.

    We use two field/question naming and processing schemes:

      - Choice questions consist of <input/>s with a common name, being rebuilt

        anew on every edit POST so we can gather ordering, text changes,

        deletions and additions.

      - Text questions only have special survey__* names on creation, afterwards

        they are loaded from the SurveyContent dynamic properties.

    """

    for key, value in POST.items():

      if key.startswith('id_'):

        # Choice question fields, they are always generated from POST contents,

        # as their 'content' is editable and they're reorderable. Also get

        # its field index for handling reordering fields later.

        name, number = key[3:].replace('__field', '').rsplit('_', 1)

        if name not in schema:

          if 'NEW_' + name in POST:

            # new Choice question, set generic type and get its index

            schema[name] = {'type': 'choice'}

        if name in schema and schema[name]['type'] in DEF_CHOICE_TYPES:

          # build an index:content dictionary

          if name in survey_fields:

            if value not in survey_fields[name]:

              survey_fields[name][int(number)] = value

          else:

            survey_fields[name] = {int(number): value}

      elif key.startswith('survey__'): # Text question

        # this is super ugly but unless data is serialized the regex is needed

        prefix = re.compile('survey__([0-9]{1,3})__')

        prefix_match = re.match(prefix, key)

        index = prefix_match.group(0).replace('survey', '').replace('__','')

        index = int(index)

        field_name = prefix.sub('', key)

        field = 'id_' + key

        for ptype in DEF_PROPERTY_TYPES:

          # should only match one

          if ptype + "__" in field_name:

            field_name = field_name.replace(ptype + "__", "")

            if field_name not in schema:

              schema[field_name]= {}

            schema[field_name]["index"] = index

            schema[field_name]["type"] = ptype

        # store text question tooltip from the input/textarea value

        schema[field_name]["tip"] = value

        # add the question as a dynamic property to survey_content

        survey_fields[field_name] = value

  def getSchemaOptions(self, schema, survey_fields, POST):

    """Get question, type, rendering and option order for choice questions.

    """

    RENDER = {'checkboxes': 'multi_checkbox', 'select': 'single_select',

              'radio_buttons': 'quant_radio'}

    RENDER_TYPES = {'select': 'selection',

                    'checkboxes': 'pick_multi',

                    'radio_buttons': 'pick_quant' }

    for key in schema:

      if schema[key]['type'] in DEF_CHOICE_TYPES and key in survey_fields:

        render_for = 'render_for_' + key

        if render_for in POST:

          schema[key]['render'] = RENDER[POST[render_for]]

          schema[key]['type'] = RENDER_TYPES[POST[render_for]]

        # set the choice question's tooltip

        tip_for = 'tip_for_' + key

        schema[key]['tip'] = POST.get(tip_for)

        # handle reordering fields

        ordered = False

        order = 'order_for_' + key

        if order in POST and isinstance(survey_fields[key], dict):

          order = POST[order]

          # 'order_for_name' is jquery serialized from a sortable, so it's in

          # a 'name[]=1&name[]=2&name[]=0' format ('id-li-' is set in our JS)

          order = order.replace('id-li-%s[]=' % key, '')

          order = order.split('&')

          if len(order) == len(survey_fields[key]) and order[0]:

            order = [int(number) for number in order]

            if set(order) == set(survey_fields[key]):

              survey_fields[key] = [survey_fields[key][i] for i in order]

              ordered = True

          if not ordered:

            # we don't have a good ordering to use

            ordered = sorted(survey_fields[key].items())

            survey_fields[key] = [value for index, value in ordered]

      # set 'question' entry (free text label for question) in schema

      question_for = 'NEW_' + key

      if question_for in POST and POST[question_for]:

        schema[key]["question"] = POST[question_for]

      # set wheter the question is required

      required_for = 'required_for_' + key

      schema[key]['required'] = DEF_BOOL[POST[required_for]]

      # set wheter the question allows comments

      comment_for = 'comment_for_' + key

      schema[key]['has_comment'] = DEF_BOOL[POST[comment_for]]

      # set the question index from JS-calculated value

      index_for = 'index_for_' + key

      if index_for in POST:

        schema[key]['index'] = int(POST[index_for].replace('__', ''))

  def createGet(self, request, context, params, seed):

    """Pass the question types for the survey creation template.

    """

    context['question_types'] = DEF_QUESTION_TYPES

    # avoid spurious results from showing on creation

    context['new_survey'] = True

    return super(View, self).createGet(request, context, params, seed)

  def editGet(self, request, entity, context, params=None):

    """Process GET requests for the specified entity.

    Builds the SurveyForm that represents the Survey question contents.

    """

    self._entity = entity

    survey_content = entity.survey_content

    survey_form = surveys.SurveyEditForm(survey_content=survey_content,

                                         survey_logic=params['logic'])

    survey_form.getFields()

    local = dict(survey_form=survey_form, question_types=DEF_QUESTION_TYPES,

                survey_h=entity.survey_content)

    context.update(local)

    params['edit_form'] = surveys.HelperForm(params['edit_form'])

    if entity.survey_end and datetime.datetime.now() > entity.survey_end:

      # are we already passed the survey_end?

      context["passed_survey_end"] = True

    return super(View, self).editGet(request, entity, context, params=params)

  @decorators.merge_params

  @decorators.check_access

  def take(self, request, access_type, page_name=None,

           params=None, **kwargs):

    """View for taking a Survey.

    For Args see base.View().public().

    """

    survey_logic = params['logic']

    try:

      entity = survey_logic.getFromKeyFieldsOr404(kwargs)

    except out_of_band.Error, error:

      return responses.errorResponse(

          error, request, template=params['error_public'])

    template = params['take_template']

    # get the context for this webpage

    context = responses.getUniversalContext(request)

    responses.useJavaScript(context, params['js_uses_all'])

    context['page_name'] = "%s titled '%s'" % (page_name, entity.title)

    context['entity'] = entity

    # try to get an existing SurveyRecord for the current user

    survey_record = self._getSurveyRecordFor(entity, request, params)

    # get an instance of SurveyTakeForm to use

    survey_form = self._getSurveyTakeForm(entity, survey_record, params,

                                          request.POST)

    # fill context with the survey_form and additional information

    context['survey_form'] = survey_form