""" Classes for displaying, browsing and organizing the archive
"""


import OSAS_helpers
from AccessControl import ClassSecurityInfo
from Products.PageTemplates.PageTemplateFile import PageTemplateFile
from OFS.Folder import Folder
from OFS.SimpleItem import SimpleItem
from Globals import InitializeClass,package_home
import zLOG
import os
import os.path
import stat
import xml.dom.minidom
from types import *
import xmlrpclib
from OSAS_helpers import *


class OSAS_storeOnline(SimpleItem):
    """Webfrontend für das Storagesystem
    liefert Browserumgebung 
    """
    meta_type="OSAS_StoreOnline__neu"
    
    security=ClassSecurityInfo()

    _v_fileSystem={} #chache fuer filesystem
    _v_metaFiles={} #chache fuer indexMeta
    def getMetaFile(self,path):
        """get index.meta and translate it to HTML"""
        """Lies Metafile ein
        @param path: Pfad des index.met        
        @return: index.meta file
        """
        html=[]
        server=xmlrpclib.Server(self.serverUrl)
        

        f=server.getFile(path+"/index.meta")
        
        if not f:
              
              return self.getMetaInfoFromIndexMeta(path)
              #return "NO_METADATA"
        else:
                      
           dom = xml.dom.minidom.parseString(f)
           
           try:
               name=getText(dom.getElementsByTagName("name")[0].childNodes)
           except:
               name="NOT_DEFINED!!!"
           try:
               creator=getText(dom.getElementsByTagName("creator")[0].childNodes)
           except:
               creator="NOT_DEFINED!!!"

           try:
               creation_date=getText(dom.getElementsByTagName("archive-creation-date")[0].childNodes)
           except:
               creation_date="NOT_DEFINED!!!"

           try:
               description=getText(dom.getElementsByTagName("description")[0].childNodes)
           except:
               description="NOT_DEFINED!!!"

           try:
            type=getText(dom.getElementsByTagName("content-type")[0].childNodes) 
           except:
            type=""
           if type=="scanned document":
                    html="<h3>Document: "+name+"</h3>"
           elif type=="folder":
                    html="<h3>Folder: "+name+"</h3>"
           else:
                    html="<h3>Document: "+name+"</h3>"

           html=html+"<p><i>created by: "+creator+" at: "+creation_date+"</i></p>" 
           html=html+"<h4>Description</h4><p>"+description+"</p>"
           try:
            bib = dom.getElementsByTagName("meta")[0].getElementsByTagName("bib")[0]
            if bib.attributes.has_key('type'):
              html=html+"<h4>Info ("+bib.attributes['type'].value+")</h4>"
            else:
              html=html+"<h4>Info</h4>"
            html=html+getBib(bib.childNodes)

           except:
            """none"""

    #        html=html.encode('utf-8','replace')+getBib(bib.childNodes).encode('utf-8','replace')

           return html


    def getMetaInfoFromIndexMeta(self,path):
        """metadaten zu path als html aus dem index.meta file zu path (meta tag im file bzw. dir container)
        @param path: Pfad auf das Object relativ zum rootFolderName
        @return: metadata als html
        """
        xmlInfos=self.findEntryInIndexMeta(path)
        if xmlInfos:
            return OSAS_helpers.getMetaInfoFromXML(path,xmlInfos)
        else:
            return ""
   
    def findEntryInIndexMeta(self,path):
        """Finde im naechstgelegenden index.meta relativ zu path den entprechenden Eintrag fuer diesen Pfad.
        @param path: Pfad auf das Object relativ zum rootFolderName
        @return: den Teil von Index.meta der Informationen zu path enthaelt, None wenn error.
        """
        
        server=xmlrpclib.Server(self.serverUrl)
        indexMeta=server.findIndexMeta(path) # suche index.meta
        
        if not indexMeta:
            return None

        realPath=os.path.split(indexMeta)[0]
        path=os.path.normpath(path)

        try:
            
            dom=xml.dom.minidom.parseString(server.getFile(indexMeta))
        except:
            zLOG.LOG("OSAS_browser (findEntryInIndexMeta)",zLOG.ERROR,"Cannot parse: %s"%indexMeta)
        #ist path ein directory? 
        dirs=dom.getElementsByTagName('dir')
        for dir in dirs:
            pathes=dir.getElementsByTagName('path')
            if pathes:
                pathX=OSAS_helpers.getText(pathes[0].childNodes)
            else:
                pathX=""
            names=dir.getElementsByTagName('name')
            if names:
                name=OSAS_helpers.getText(names[0].childNodes)
            else:
                name=""

            checkpath=os.path.normpath(os.path.join(realPath,pathX,name))
            if checkpath==path:
                
                return dir.toxml()

        #ist path ein file?
        files=dom.getElementsByTagName('file')
        for dir in dirs:
            pathes=dir.getElementsByTagName('path')
            if pathes:
                pathX=OSAS_helpers.getText(pathes[0].childNodes)
            else:
                pathX=""
            names=dir.getElementsByTagName('name')
            if names:
                name=OSAS_helpers.getText(names[0].childNodes)
            else:
                name=""

            checkpath=os.path.normpath(os.path.join(realPath,pathX,name))
            if checkpath==path:
                
                return dir.toxml()

        
        return None


    def getSubDirsFromIndexMeta(self,path):
        
        """Gebe alle path untergeordenten Objekte aus
        @param path: optional, default ist "", Pfad auf das Object relativ zum rootFolderName
        @return: Directory [pfad auf das Objekt]->(fileType,''), fileType ist hierbei OSAS_dir_archive falls Object ein directory und OSAS_file_archive falls das Object ein File ist,der zweite Eintrag des Tupels ist zur Zeit immer '', spaeter wird hier die Beschreibung gemaess Metadaten stehen, wie bei readObjectsFromPath.
        @todo: Rueckgabe einer Beschreibung gemaess Metadaten
        """
        ret={}
        server=xmlrpclib.Server(self.serverUrl)
        indexMeta,stats=server.findIndexMetaWithStats(path)#findex index.meta zu path.

        if not indexMeta:
            return ret

        realPath=os.path.split(indexMeta)[0]
        path=path.replace(realPath,"")
        if path and (path[0]==os.sep): #falls am Anfang os.sep steht lösche dieses.
            path=path[1:]



        #teste ob schon im cache
        
        if self._v_metaFiles.has_key(path) and (self._v_metaFiles[path][0]==stats[stat.ST_MTIME]):
            return self._v_metaFiles[path][1]

        try:
            dom=xml.dom.minidom.parseString(server.getFile(indexMeta))
        except:
            zLOG.LOG("OSAS_browser (getSubDirsFromIndexMeta)",zLOG.ERROR,"Cannot parse: %s"%indexMeta)
            return ret

        dirs=[]
        dirs=dom.getElementsByTagName('dir')+dom.getElementsByTagName('file')
    
        for dir in dirs:
            pathes=dir.getElementsByTagName('path')
            if pathes:
                pathX=OSAS_helpers.getText(pathes[0].childNodes)
            else:
                pathX=""
            names=dir.getElementsByTagName('name')
            if names:
                name=OSAS_helpers.getText(names[0].childNodes)
            else:
                name=""

            #print "PP",pathX,path
            if pathX==path:
                if dir.tagName=="dir":
                    fileType="OSAS_dir_archive"
                else:
                    fileType="OSAS_file_archive"

                object=os.path.join(realPath,pathX,name)
                ret[object.encode('utf-8')]=(fileType,'')

        self._v_metaFiles[path]=(stats[stat.ST_MTIME],ret) # speicher im chache
      
        return ret

        
    
    def __init__(self,id,serverUrl):
        """initialize a new instance
        @param id: Zope id"""
        self.id = id
        self.serverUrl = serverUrl
    

    security.declareProtected('View','index_html')
    def index_html(self):
        """main view either standard template zpt/storeOnline_index_html.zpt or storeOnline_index.html in tree"""
        if hasattr(self,'storeOnline_index.html'):
            return getattr(self,'storeOnline_index.html')()
        else:
            pt=PageTemplateFile(os.path.join(package_home(globals()),'zpt','storeOnline_index_html.zpt')).__of__(self)
            return pt()


    def findIndexMeta(self,path=""):
        """finde Rueckwaerts im Baum von Pfad ausgehend, dass erste index.meta file
        @keyword path: default ist "", Pfad auf das Object relativ zum rootFolderName
        @return: None falls kein index.meta existiert sonst Pfad auf das index.meta
        """
        realPath=os.path.normpath(os.path.join(self.rootFolderName,path))
        #suche index.meta
        server=xmlrpclib.Server(self.serverUrl)
        return server.findIndexMeta(realPath)
        

  

   

    def readObjectsFromPath(self,path="",metaDataId=None):
        """Liest files aus dem path und speichert im cache _v_filesystem.

        @keyword path : path relativ zum root folder des Storagesystems
        @keyword metaDataId: Optional, id des OSAS_Metadata Object, dass benutzt werden soll, generisch wird das erste Object, dass in parent gefunden wird angezeigt.
        @return: directory der Form [pfad zum Objekt] -> (fileType,metadatum als String)
        """
        server=xmlrpclib.Server(self.serverUrl)             
        realPath=os.path.normpath(os.path.join(self.rootFolderName,path))

        if metaDataId:
            metaData=getattr(self,metaDataId)
            if not (getattr(metaData,'meta_type','')=='OSAS_Metadata__neu'):
                zLOG.LOG('OSAS_browser (readObjectsFromPath)',zLOG.ERROR,"%s is not OSAS_Metadata")
                metaData=None
        else:
            metaDatas=self.ZopeFind(self.aq_parent,obj_metatypes=['OSAS_Metadata__neu'],search_sub=1)
            if metaDatas:
                metaData=metaDatas[0][1]
            else:
                zLOG.LOG('OSAS_browser (readObjectsFromPath)',zLOG.INFO,"There is no OSAS_Metadata Object")
                metaData=None
                
        #print "md",metaData
        if realPath.find(self.rootFolderName) <0: #versuch auf Pfad unterhalb des Rootfolder zuzugreifen
            return {}
            
        
       
        
        stats=server.getStat(realPath)

        if not stats:
            return None
        
        #teste ob schon im cache
        if self._v_fileSystem.has_key(realPath) and (self._v_fileSystem[realPath][0]==stats[stat.ST_MTIME]):
            
            return self._v_fileSystem[realPath][1]

        dir=server.listdir(realPath)
        
        
        ret={}
        for filename in dir:
            object=os.path.join(realPath,filename)
            fileType=OSAS_helpers.checkOSASFileType(object,server)

            if fileType:
                if metaData:
                 
                    ret[object]=(fileType,metaData.getDisplayFieldsAsStr(object))
                else:
                    ret[object]=(fileType,'')
            
        self._v_fileSystem[realPath]=(stats[stat.ST_MTIME],ret) # speicher im chache
        
        return ret

    def giveHandlers(self,path,type):
        """teste ob fuer diesen Typ, handler definiert sind und gibt einen entsprechenden Link zurueck, der das Object mit diesem Handler ausfuehrt. Die Handler mussen im parent ordner des browser oder einem Subordner davon liegen. 
        @param path: Pfad auf das Objekt
        @param type: Typ des Objektes
        @return: (string) html-Fragment, link der das Objekt mit diesem Handler anzeigt.
        """
        ret=[]
        
        for handler in self.ZopeFind(self.aq_parent,obj_metatypes=['OSAS_HandlerObject__neu'],search_sub=1):
            if type in handler[1].objectTypes:
		try:
                 path=path.replace(getattr(handler[1],'ignorePath',''),'')
                except:
	 	   pass
                url=handler[1].prefix%path
                text=handler[1].title
                string="""<a target="_blank" href="%s">%s</a>"""%(url,text)
                ret.append(string)
        return ret
                      
        
    def generateTree(self,path=""):
        """erzeuge liest die Objekte aus die im Pfad gespeichert sind
        
        @keyword path: optional mit default='', Pfad relativ zu rootFolderName
        @return: List von Tripeln, (link_html,array of handlers,metainformationen) hierbei ist
         - (string) link_html ein html-Fragement, falls das Objekt vom Typ OSAS_dir ist, ist dies ein Link auf dieses Verzeichnis, sonst der Dateiname
         - (string) handler sind die Ergebnisse von giveHandlers fuer dieses Objekt
         - (string) metainformationen die Metainformationen zum Objekt als Ergebnis von readObjectsFromPath
        """
        objects=self.readObjectsFromPath(path)
        if not objects:
            objects={}


        im=self.getSubDirsFromIndexMeta(path)
        for key in im.keys():
            #virtuelle pfade hinzufuegen
            
            if not objects.has_key(key):
                objects[key]=im[key]
                
        
        def sortLow(x,y):
            return cmp(x.lower(),y.lower())
        
        ret=[]
        
        objectSorted=objects.keys()
        objectSorted.sort(sortLow)
        for object in objectSorted:
            handler=self.giveHandlers(object,objects[object][0])
            if objects[object][0]=="OSAS_dir":
                
                string="""<a href="?path=%s">%s</a>"""%(object,os.path.split(object)[1])
                
                ret.append((string,handler,objects[object][1]))
            elif objects[object][0]=="OSAS_dir_archive":
                string="""<a href="?path=%s">%s (A)</a>"""%(object,os.path.split(object)[1])
                
                ret.append((string,handler,objects[object][1]))
            else:
                ret.append((os.path.split(object)[1],handler,objects[object][1]))

                     
        return ret


    def path_to_link(self,pathTmp=""):
        """generates navigation bar for viewfiles
        @keyword pathTmp: optional, generisch="", pfad der erstellt werden soll
        @return: html Fragment, pathTmp zerlegt, dass jeder Teil von Pfad unterhalb von rootFolderName direkt angesprunden werden kann.
        """

        path=os.path.normpath(os.path.join(self.rootFolderName,pathTmp))
        
        URL=self.absolute_url()
        string=""
        
        tmppath=os.path.dirname(path)
        i=0
        pathes=[[path, os.path.basename(path)]]

        while not (len(tmppath)==1):

              i=i+1
              if i>20: break

              pathes.append([tmppath, os.path.basename(tmppath)])
              tmppath=os.path.dirname(tmppath)

        while i>=0:
            if pathes[i][0].find(self.rootFolderName) <0: #versuch auf Pfad unterhalb des Rootfolder zuzugreifen
                string=string+"<a>"+pathes[i][1]+"</a>/"
            else:
                string=string+"<a href="+URL+"?path="+pathes[i][0]+">"+pathes[i][1]+"</a>/"
            
            i=i-1
        return string


InitializeClass(OSAS_storeOnline)
	
def manage_addOSAS_storeOnlineForm(self):
    """interface for adding the OSAS_storeOnline"""
    pt=PageTemplateFile(os.path.join(package_home(globals()),'zpt','addStoreOnline.zpt')).__of__(self)
    return pt()

def manage_addOSAS_storeOnline(self,id,RESPONSE=None):
    """add the OSAS_storeOnline
    @param id: id
    """
    newObj=OSAS_storeOnline(id)
    self._setObject(id,newObj)
    if RESPONSE is not None:
        RESPONSE.redirect('manage_main')