# -*- coding: utf-8
# $Id$
#
# Copyright 2001, 2002 by IVA Team and contributors
#
# This file is part of IVA.
#
# IVA 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.
#
# IVA 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 IVA; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

__version__ = "$Revision$"[11:-2]

import AccessControl
import OFS, Globals
import types
import YlTest
#import TestiYlesanne
from OFS import SimpleItem
from TraversableWrapper import Traversable
from Globals import Persistent
from AccessControl import ClassSecurityInfo
from Cruft import Cruft
from common import translate


class YlVahendus(
     Persistent,
     OFS.SimpleItem.Item,
     Traversable,
     AccessControl.Role.RoleManager,
     Cruft     
     ):
     "Ülesannete import/eksport, loomine"
     ylesanneteTyybid=("ValikYlesanne","TekstivastusegaYlesanne",
      "YksikvalikYlesanne", "MitmikvalikYlesanne", 
      "OigeTekstivastusegaYlesanne", "ArvuvahemikuliseVastusegaYlesanne",
      "ProtsentYlesanne", "VastavusYlesanne")
     
     def ylesanneteTolkegaTyybid(self, REQUEST):
       "Tüübid tõlgituna, ZPT tarbeks"
       tulemus={
         "ValikYlesanne": "Yes/No",
         "TekstivastusegaYlesanne": "Paragraph",
         "YksikvalikYlesanne": "Multiple choice",
         "MitmikvalikYlesanne": "Mark all correct", # see on vale?"Multiple choice",
         "OigeTekstivastusegaYlesanne": "Short answer",
         "ArvuvahemikuliseVastusegaYlesanne": "Numerical",
         "ProtsentYlesanne": "Percent",
         "VastavusYlesanne": "Matching"
       }
       return tulemus

     def tekstistYlesanneteLaadimiseVorm(self, REQUEST):
        "Tekstiala sisestuseks"
        tulemus="<form action='tekstistYlesanneteSalvestus'>"+\
          "<textarea name='tekst'></textarea>"+\
          "<input type='submit' value='Saada' />"+\
          "</form><br />"+\
          "<form action='tekstiFailistYlesanneteSalvestus' method='post' enctype='multipart/form-data'>"+\
          "<input type='file' name='fail' />"+\
          "<input type='submit' value='Saada' />"+\
          "</form><br />"
        return self.restrictedTraverse('defaultRender.html')(page=tulemus)
        
     def tekstistYlesanneteSalvestus(self, REQUEST, tekst):
        "Salvestus tase kõrgemale"
        self.aq_parent.lisaYlesanded(self.tekstistYlesanneteMassiiv(tekst))
        REQUEST.RESPONSE.redirect('../index_html')
        
     def tekstiFailistYlesanneteSalvestus(self, fail, REQUEST):
        "Failist lisamine tase kõrgemale"
        self.aq_parent.lisaYlesanded(self.tekstiRidadestYlesanneteMassiiv(fail.readlines()))
        REQUEST.RESPONSE.redirect('../index_html')
        
     def tekstistYlesanneteMassiiv(self, tekst):
        "HotPotatose väljundist lugemine"
        reamassiiv=tekst.split("\n")
        return self.tekstiRidadestYlesanneteMassiiv(reamassiiv)
        
     def tekstiRidadestYlesanneteMassiiv(self, reamassiiv):
        "Read sees massiivina"
        algus=0
        ylesanded=[]
        while algus<len(reamassiiv) and (reamassiiv[algus].split(":"))[1]!="TYPE":
          algus=algus+1
        if algus>=len(reamassiiv):return ylesanded
        while algus<len(reamassiiv):
         ots=algus+1
         while ots<len(reamassiiv) and (len(reamassiiv[ots].split(":"))<2 or (reamassiiv[ots].split(":"))[1]!="TYPE") :
          ots=ots+1
         ylesanded.append(self.tekstiRidadestYlesanne(reamassiiv[algus:ots]))
         algus=ots
        return ylesanded
          
     def tekstiRidadestYlesanne(self, reamassiiv):
        "Saabunud ridade põhjal ülesanne"
        from YlTyybid import *
        yl=None
        tyyp=self.tekstistYlesandeTyyp(reamassiiv)
        if tyyp=="OigeTekstivastusegaYlesanne":
          yl=OigeTekstivastusegaYlesanne('')
        if yl is not None:
          yl.loeTekstistYlesanne(reamassiiv)
        return yl
        
     def tekstistYlesandeTyyp(self, reamassiiv):
        "Tüübi üle otsustamine"
        algrida=reamassiiv[0].split(":")
        tyybitahis=algrida[2].strip()
        if not algrida[1]=="TYPE": return "Tyybita Tundmatu"
        if tyybitahis=="MC": return "MitmikvalikYlesanne"
        if tyybitahis=="M": return "VastavusYlesanne"
        if tyybitahis=="S":
          for x in reamassiiv:
            rida=x.split(":")
            if len(rida)>1:
             if rida[1]=="ANSWER1":
              if rida[4]=="0":
                return "OigeTekstivastusegaYlesanne"
              else:
                return "LynkTestYlesanne"
          return "vastuseta S"
        return "SisuTundmatu"

     def ylesanneteTyypideLoetelu(self, REQUEST):
        "Viited ülesannete tüüpidele"
        tulemus="<h3>L_it_choosing_exercise_type</h3>"
        for x in self.ylesanneteTyybid:
          tulemus=tulemus+"\n"+\
            ("<a href='lisaUusYlesanne?tyyp=%s'>%s</a><br />" %  (x, x))
        return tulemus
        
     def ylesanneteTyybidValikuna(self, REQUEST):
       "Valikmenüü ülesannete lisamiseks"
       #XXX: not used?
       andmed=self.ylesanneteTolkegaTyybid(REQUEST)
       tulemus="<p></p><h2>"+translate(self, 'editing quiz')+"</h2><form action='lisaUusYlesanne'>"+translate(self, 'add exercise')+": <select name='tyyp'>\n"
       for x in andmed.keys():
         tulemus=tulemus+"<option value='"+x+"'>"+andmed[x]+"</option>\n"
       tulemus=tulemus+"</select><input type='submit' value='OK'></form>"
       return tulemus
        
     def lisaUusYlesanne(self, REQUEST, tyyp):
        "Ülesande uus eksemplar"
        import YlTyybid
        from YlTyybid import *
        if tyyp=='ValikYlesanne':
          return ValikYlesanne(translate(self, 'Question text'))
        if tyyp=='TekstivastusegaYlesanne':
          return TekstivastusegaYlesanne(translate(self, 'Question text'))
        if tyyp=='YksikvalikYlesanne':
          return YksikvalikYlesanne(translate(self, 'Question text'))
        if tyyp=='OigeTekstivastusegaYlesanne':
          return OigeTekstivastusegaYlesanne(translate(self, "Question text"))
        if tyyp=='MitmikvalikYlesanne':
          return MitmikvalikYlesanne(translate(self, "Question text"))
        if tyyp=='ArvuvahemikuliseVastusegaYlesanne':
          return ArvuvahemikuliseVastusegaYlesanne(translate(self, "Question text"))
        if tyyp=='ProtsentYlesanne':
          return ProtsentYlesanne(translate(self, "Find the missing component")) 
        if tyyp=='VastavusYlesanne':
          return VastavusYlesanne(translate(self, "Match the pairs"))

Globals.InitializeClass(YlVahendus)
Globals.default__class_init__(YlVahendus)