multisplit
[iramuteq] / listlex.py
index 0de2997..3a11826 100644 (file)
@@ -1,9 +1,10 @@
 # -*- coding: utf-8 -*-
+#Author: Pierre Ratinaud
+#Copyright (c) 2008-2020 Pierre Ratinaud
+#modification pour python 3 : Laurent Mérat, 6x7 - mai 2020
+#License: GNU/GPL
 
 #----------------------------------------------------------------------------
-# Author:       Pierre Ratinaud
-# 
-
 #comes from ListCtrl.py from the demo tool of wxPython:
 # Author:       Robin Dunn & Gary Dumer
 #
 # Licence:      wxWindows license
 #----------------------------------------------------------------------------
 
+#------------------------------------
+# import des modules python
+#------------------------------------
 import os
 import sys
-import  wx
-import  wx.lib.mixins.listctrl  as  listmix
-import cStringIO
 import tempfile
-from functions import exec_rcode, MessageImage, doconcorde
+from operator import itemgetter
+
+import langue
+langue.run()
+
+#------------------------------------
+# import des modules wx
+#------------------------------------
+import wx
+import wx.lib.mixins.listctrl as listmix
+
+#------------------------------------
+# import des fichiers du projet
+#------------------------------------
+from functions import exec_rcode, doconcorde
 from chemins import ffr
 from PrintRScript import barplot
-from dialog import SearchDial, message
-from operator import itemgetter
-#---------------------------------------------------------------------------
+from dialog import SearchDial, message, BarGraphDialog, BarFrame
+
 
 class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSorterMixin):
-    def __init__(self, parent,gparent, dlist, first, menu = True):
-    #def  __init__(self, parent) :
+
+    def __init__(self, parent,gparent, dlist = {}, first = [], usefirst = False, menu = True):
         wx.ListCtrl.__init__( self, parent, -1, style=wx.LC_REPORT|wx.LC_VIRTUAL|wx.LC_HRULES|wx.LC_VRULES)
         self.parent=parent
         self.gparent=gparent
         self.dlist=dlist
         self.first = first
+        self.tgen = False
+        self.tgenlem = False
+        if 'etoiles' in dir(self.gparent) and not usefirst :
+            self.etoiles = self.gparent.etoiles
+        else :
+            self.etoiles = []
+            for val in self.first :
+                if val.startswith('X.') :
+                    val = val.replace('X.', '*')
+                self.etoiles.append(val)
         self.menu = menu
-
-    #def start(self) :
+        #def start(self) :
         search_id = wx.NewId()
         self.parent.Bind(wx.EVT_MENU, self.onsearch, id = search_id)
         self.accel_tbl = wx.AcceleratorTable([(wx.ACCEL_CTRL, ord('F'), search_id)])
         self.SetAcceleratorTable(self.accel_tbl)
-
         self.il = wx.ImageList(16, 16)
         a={"sm_up":"GO_UP","sm_dn":"GO_DOWN","w_idx":"WARNING","e_idx":"ERROR","i_idx":"QUESTION"}
-        for k,v in a.items():
-            s="self.%s= self.il.Add(wx.ArtProvider_GetBitmap(wx.ART_%s,wx.ART_TOOLBAR,(16,16)))" % (k,v)
+        for k,v in list(a.items()):
+            s="self.%s= self.il.Add(wx.ArtProvider.GetBitmap(wx.ART_%s,wx.ART_TOOLBAR,(16,16)))" % (k,v)
             exec(s)
         self.SetImageList(self.il, wx.IMAGE_LIST_SMALL)
-
         tID = wx.NewId()
-
         self.attr1 = wx.ListItemAttr()
         self.attr1.SetBackgroundColour((230, 230, 230))
         self.attr2 = wx.ListItemAttr()
         self.attr2.SetBackgroundColour("light blue")
-        
+        self.attrselected = wx.ListItemAttr()
+        self.attrselected.SetBackgroundColour("red")
+        self.selected = {}
         i=0
-        for name in self.first :
+        for name in ['formes'] + self.etoiles :
             self.InsertColumn(i,name,wx.LIST_FORMAT_LEFT)
             i+=1
-            
         self.SetColumnWidth(0, 180)
-
-        for i in range(1,len(self.first)-1):
-            self.SetColumnWidth(i, self.checkcolumnwidth(len(self.first[i]) * 10))
-        
+        for i in range(0,len(self.etoiles)):
+            self.SetColumnWidth(i + 1, self.checkcolumnwidth(len(self.etoiles[i]) * 10))
         self.itemDataMap = self.dlist
-        self.itemIndexMap = self.dlist.keys()
+        self.itemIndexMap = list(self.dlist.keys())
         self.SetItemCount(len(self.dlist))
-        
-        #listmix.ListCtrlAutoWidthMixin.__init__(self)
-        listmix.ColumnSorterMixin.__init__(self, len(self.first))
-        self.SortListItems(1, 0)
-        
-#-----------------------------------------------------------------------------------------    
+        listmix.ColumnSorterMixin.__init__(self, len(self.first) + 1)
+        self.SortListItems(1, False)
+        #-----------------------------------------------------------------------------------------    
         self.Bind(wx.EVT_LIST_ITEM_SELECTED, self.OnItemSelected, self)
-        
         self.Bind(wx.EVT_LIST_ITEM_ACTIVATED , self.OnPopupTwo, self)
         # for wxMSW
         self.Bind(wx.EVT_COMMAND_RIGHT_CLICK, self.OnRightClick)
-
         # for wxGTK
         self.Bind(wx.EVT_RIGHT_UP, self.OnRightClick)
-
 #-----------------------------------------------------------------------------------------    
-        
+
+    def OnGetItemColumnImage(self, item, col):
+        return -1
+
+    def OnGetItemImage(self, item):
+        pass
+
+    def RefreshData(self, data):
+        self.itemDataMap = data
+        self.itemIndexMap = list(data.keys())
+        self.SetItemCount(len(data))
+        self.Refresh()
+
     def checkcolumnwidth(self, width) :
         if width < 80 :
             return 80
@@ -94,14 +119,23 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
     def OnGetItemText(self, item, col):
         index=self.itemIndexMap[item]
         s = self.itemDataMap[index][col]
-        return s
+        if isinstance(s, (int, float)):
+            return str(s)
+        else:
+            return s #modification pour python 3
 
     def OnGetItemAttr(self, item):
-        if item % 2 :
-            return self.attr1
+        index=self.itemIndexMap[item]
+        if self.IsSelected(index) == False :
+            if item % 2 :
+                return self.attr1
+            else :
+                return self.attr2
         else :
-            return self.attr2
+            return self.attrselected
 
+    def GetItemByWord(self, word):
+        return [ val for val in self.dlist if self.dlist[val][0] == word ][0]
 
     # Used by the ColumnSorterMixin, see wx/lib/mixins/listctrl.py
     def GetListCtrl(self):
@@ -115,12 +149,16 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
         x = event.GetX()
         y = event.GetY()
         item, flags = self.HitTest((x, y))
-
         if flags & wx.LIST_HITTEST_ONITEM:
             self.Select(item)
-
         event.Skip()
 
+    def GetString(self, evt):
+        return self.getselectedwords()[0]
+
+    def GetSelections(self):
+        return self.getselectedwords()
+
     def getColumnText(self, index, col):
         item = self.GetItem(index, col)
         return item.GetText()
@@ -130,15 +168,17 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
         s = self.itemDataMap[index]
         return s
     
-    def SortItems(self,sorter=cmp):
-        items = list(self.itemDataMap.keys())
-        items.sort(sorter)
-        self.itemIndexMap = items
-        # redraw the list
-        self.Refresh()
-    
+#    def SortItems(self,sorter=cmp): # modification pour python 3
+    def SortItems(self, sorter=None):
+        listTemp = sorted(self.itemDataMap.items(),
+            key=lambda x:x[1][self._col], reverse= (self._colSortFlag[self._col]!=True))
+        dlist = dict([[line[0],line[1]] for line in listTemp])
+        self.itemDataMap = dlist
+        self.itemIndexMap = list(dlist.keys())
+        self.Refresh() # redraw the list
+
     def OnItemSelected(self, event):
-        self.currentItem = event.m_itemIndex
+        self.currentItem = event.GetIndex() #event.m_itemIndex
         event.Skip()
 
     def onsearch(self, evt) :
@@ -155,28 +195,35 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
                 self.popupID2 = wx.NewId()
                 self.popupID3 = wx.NewId()
                 self.popup_Tgen_glob = wx.NewId()
+                self.onmaketgen = wx.NewId()
                 self.ID_stcaract = wx.NewId()
-
-                self.Bind(wx.EVT_MENU, self.OnPopupOne, id=self.popupID1)
-                self.Bind(wx.EVT_MENU, self.OnPopupTwo, id=self.popupID2)
-                self.Bind(wx.EVT_MENU, self.OnPopupThree, id=self.popupID3)
-                self.Bind(wx.EVT_MENU, self.OnTgen_glob, id=self.popup_Tgen_glob)
+                self.id_tgendetails = wx.NewId()
+                # on attache les événements aux éléments
+                self.Bind(wx.EVT_MENU, self.OnPopupOne, id = self.popupID1)
+                self.Bind(wx.EVT_MENU, self.OnPopupTwo, id = self.popupID2)
+                self.Bind(wx.EVT_MENU, self.OnPopupThree, id = self.popupID3)
+                self.Bind(wx.EVT_MENU, self.OnTgen_glob, id = self.popup_Tgen_glob)
+                self.Bind(wx.EVT_MENU, self.OnMakeTgen, id = self.onmaketgen)
+                self.Bind(wx.EVT_MENU, self.OnTgenDetails, id = self.id_tgendetails)
                 #self.Bind(wx.EVT_MENU, self.onstcaract, id = self.ID_stcaract)
             # make a menu
             menu = wx.Menu()
             # add some items
-            menu.Append(self.popupID1, u"Formes associées")
-            menu.Append(self.popupID2, u"Concordancier")
-            menu.Append(self.popupID3, "Graphique")
+            menu.Append(self.popupID1, _("Associated forms"))
+            menu.Append(self.popupID2, _("Concordance"))
+            menu.Append(self.popupID3, _("Graphic"))
             menu_stcaract = wx.Menu()
             self.menuid = {}
-            for i, et in enumerate(self.first[1:]) :
-                nid = wx.NewId()
-                self.menuid[nid] = i
-                menu_stcaract.Append(nid, et)
-                self.Bind(wx.EVT_MENU, self.onstcaract, id = nid)
-            menu.AppendMenu(-1, u"Segments de texte caractéristiques", menu_stcaract)
-            #menu.Append(self.popup_Tgen_glob, "Tgen global")
+            if not self.tgen :
+                for i, et in enumerate(self.etoiles) :
+                    nid = wx.NewId()
+                    self.menuid[nid] = i
+                    menu_stcaract.Append(nid, et)
+                    self.Bind(wx.EVT_MENU, self.onstcaract, id = nid)
+                menu.Append(-1, _("Typical text segments"), menu_stcaract) #modifié
+                menu.Append(self.onmaketgen, _("Make Tgen"))
+            else :
+                menu.Append(self.id_tgendetails, _('Tgen details'))
             self.PopupMenu(menu)
             menu.Destroy()
 
@@ -185,7 +232,7 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
         last = self.GetFirstSelected()
         while self.GetNextSelected(last) != -1:
             last = self.GetNextSelected(last)
-            words.append(self.getColumnText(last, 1))
+            words.append(self.getColumnText(last, 0))
         return words
 
     def OnPopupOne(self, event):
@@ -198,11 +245,13 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
         for forme in lems[word].formes :
             rep.append([corpus.getforme(forme).forme, corpus.getforme(forme).freq])
         rep.sort(key = itemgetter(1), reverse = True)
-        win = message(self, u"Formes associées", (300, 200))
-        win.html = '<html>\n' + '<br>'.join([' : '.join([str(val) for val in forme]) for forme in rep]) + '\n</html>'
-        win.HtmlPage.SetPage(win.html)
+        items = dict([[i, '<font face="courier">' + '\t:\t'.join([str(val) for val in forme]) + '</font>'] for i, forme in enumerate(rep)])
+        win = message(self, items, _("Associated forms"), (300, 200))
+        #win = message(self, u"Formes associées", (300, 200))
+        #win.html = '<html>\n' + '<br>'.join([' : '.join([str(val) for val in forme]) for forme in rep]) + '\n</html>'
+        #win.HtmlPage.SetPage(win.html)
         win.Show(True)
-    
+
     def onstcaract(self, evt) :
         ind = self.menuid[evt.Id]
         limite = 50
@@ -214,13 +263,10 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
         parametres = page.parametres
         paneff = self.gparent.ListPanEff
         panchi = self.gparent.ListPan
-        et = self.first[ind+1]
-        if et.startswith(u'X.') :
-            et = et.replace(u'X.', u'*')
+        et = self.etoiles[ind]
         uces = corpus.getucesfrometoile(et)
         self.la = [panchi.dlist[i][0] for i in range(0, len(panchi.dlist)) if panchi.dlist[i][ind+1] >= minind ]
         self.lchi = [panchi.dlist[i][ind+1] for i in range(0, len(panchi.dlist)) if panchi.dlist[i][ind+1] >= minind ]
-        #lfreq = [paneff.dlist[i][ind+1] for i in range(0, len(panchi.dlist)) if panchi.dlist[i][ind+1] >= minind ]
         if max(self.lchi) == float('inf') :
             nchi = []
             for val in self.lchi :
@@ -240,22 +286,28 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
         ntab2 = ntab2[:limite]
         nuces = [val[1] for val in ntab2]
         ucis_txt, ucestxt = doconcorde(corpus, nuces, self.la)
-        win = message(self, u"Segments de texte caractéristiques - %s" % self.first[ind], (750, 600))
-        win.html = '<html>\n' + '<br>'.join(['<br>'.join([ucis_txt[i], '<table bgcolor = #1BF0F7 border=0><tr><td><b>score : %.2f</b></td></tr></table>' % ntab2[i][0], ucestxt[i]]) for i in range(0,len(ucestxt))]) + '\n</html>'
-        win.HtmlPage.SetPage(win.html)
-        #dlg.Destroy()
+        items = dict([[i, '<br>'.join([ucis_txt[i], '<table bgcolor = #1BF0F7 border=0><tr><td><b>score : %.2f</b></td></tr></table><br>' % ntab2[i][0], ucestxt[i]])] for i in range(0,len(ucestxt))])
+        win = message(self, items, ' - '.join([_("Typical text segments"), "%s" % self.first[ind]]), (900, 600))
         win.Show(True)
         
     def OnPopupTwo(self, event):
-        activenotebook = self.parent.nb.GetSelection()
-        page = self.parent.nb.GetPage(activenotebook)
+        if 'nb' in dir(self.parent) :
+            activenotebook = self.parent.nb.GetSelection()
+            page = self.parent.nb.GetPage(activenotebook)
+            corpus = page.corpus
+        else :
+            corpus = self.parent.parent.parent.corpus
+        ira = wx.GetApp().GetTopWindow()
         item=self.getColumnText(self.GetFirstSelected(), 0)
-        corpus = page.corpus
-        uce_ok = corpus.getlemuces(item)
-        win = message(self, u"Concordancier", (750, 600))
-        ucis_txt, ucestxt = doconcorde(corpus, uce_ok, [item])
-        win.html = ('<html>\n<h1>%s</h1>' % item) + '<br>'.join(['<br>'.join([ucis_txt[i], ucestxt[i]]) for i in range(0,len(ucestxt))]) + '\n</html>'
-        win.HtmlPage.SetPage(win.html)
+        if not self.tgen :
+            uce_ok = corpus.getlemuces(item)
+            wordlist = [item]
+        else :
+            uce_ok = corpus.gettgenst(self.tgens[item])
+            wordlist = [val for val in self.tgens[item] if val in corpus.lems]
+        ucis_txt, ucestxt = doconcorde(corpus, uce_ok, wordlist)
+        items = dict([[i, '<br><br>'.join([ucis_txt[i], ucestxt[i]])] for i in range(0,len(ucestxt))])
+        win = message(ira, items, ' - '.join([_("Concordance"), "%s" % item]), (800, 500), uceids = uce_ok)
         win.Show(True)
 
     def getinf(self, txt) :
@@ -264,7 +316,7 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
         elif txt == float('-Inf') :
             return '-Inf'
         else :
-            return `txt`
+            return repr(txt)
 
     def OnPopupThree(self, event) :
         datas = [self.GetItemData(self.GetFirstSelected())]
@@ -273,26 +325,16 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
             last = self.GetNextSelected(last)
             data = self.GetItemData(last)
             datas += [data]
-        colnames = self.first[1:]
+        colnames = self.first
         table = [[self.getinf(val) for val in line[1:]] for line in datas]
         rownames = [val[0] for val in datas]
-        tmpgraph = tempfile.mktemp(dir=self.parent.TEMPDIR)
-        txt = barplot(table, rownames, colnames, self.parent.RscriptsPath['Rgraph'], tmpgraph)
-        tmpscript = tempfile.mktemp(dir=self.parent.TEMPDIR)
-        with open(tmpscript,'w') as f :
-            f.write(txt)
-        exec_rcode(self.parent.RPath, tmpscript, wait = True)
-        win = MessageImage(self, u"Graphique", size=(700, 500))
-        win.addsaveimage(tmpgraph)
-        txt = "<img src='%s'>" % tmpgraph
-        win.HtmlPage.SetPage(txt)
-        win.Show(True)
+        BarFrame(self.parent, table, colnames, rownames)
 
     def OnTgen_glob(self, evt) :
         activenotebook = self.parent.nb.GetSelection()
         page = self.parent.nb.GetPage(activenotebook)
         corpus = page.corpus
-
+        # préparation du script R
         tmpgraph = tempfile.mktemp(dir=self.parent.TEMPDIR)
         intxt = """
         load("%s")
@@ -312,12 +354,55 @@ class ListForSpec(wx.ListCtrl, listmix.ListCtrlAutoWidthMixin, listmix.ColumnSor
         di <- spec.Tgen.glob
         """
         txt = barplot('', '', '', self.parent.RscriptsPath['Rgraph'], tmpgraph, intxt = intxt) 
+        # ecriture du script dans un fichier
         tmpscript = tempfile.mktemp(dir=self.parent.TEMPDIR)
         with open(tmpscript, 'w') as f :
             f.write(txt)
+        # excution du script
         exec_rcode(self.parent.RPath, tmpscript, wait = True)
-        win = MessageImage(self, -1, u"Graphique", size=(700, 500),style = wx.DEFAULT_FRAME_STYLE)
+        win = MessageImage(self, -1, _("Graphic"), size=(700, 500),style = wx.DEFAULT_FRAME_STYLE)
         win.addsaveimage(tmpgraph)
         txt = "<img src='%s'>" % tmpgraph
         win.HtmlPage.SetPage(txt)
         win.Show(True)
+    
+    def OnTgenDetails(self, evt):
+        if 'nb' in dir(self.parent) :
+            activenotebook = self.parent.nb.GetSelection()
+            page = self.parent.nb.GetPage(activenotebook)
+            corpus = page.corpus
+        else :
+            corpus = self.parent.parent.parent.corpus
+        ira = wx.GetApp().GetTopWindow()
+        item=self.getColumnText(self.GetFirstSelected(), 0)
+        wordlist = [val for val in self.tgens[item] if val in corpus.lems]
+        wordlist = dict(list(zip(wordlist,wordlist)))
+        res = dict([[val, self.tgenlem[val]] for val in self.tgenlem if self.tgenlem[val][0] in wordlist])
+        win = ListLexFrame(self, ira, corpus, res, self.etoiles)
+        win.Show()
+
+    def OnMakeTgen(self, evt):
+        self.parent.tree.OnTgenEditor(self.getselectedwords())
+
+
+class ListLexFrame ( wx.Frame ):
+
+    def __init__( self, parent, ira, corpus, data, columns ):
+        wx.Frame.__init__ ( self, parent, id = wx.ID_ANY, title = wx.EmptyString, pos = wx.DefaultPosition, size = wx.Size( 500,300 ), style = wx.DEFAULT_FRAME_STYLE|wx.TAB_TRAVERSAL )
+        self.SetSizeHints( wx.DefaultSize, wx.DefaultSize )
+        bSizer1 = wx.BoxSizer( wx.VERTICAL )
+        self.listlex = ListForSpec(self, ira, data, columns)
+        bSizer1.Add( self.listlex, 5, wx.ALL|wx.EXPAND, 5 )
+        m_sdbSizer1 = wx.StdDialogButtonSizer()
+        self.m_sdbSizer1OK = wx.Button( self, wx.ID_OK )
+        m_sdbSizer1.AddButton( self.m_sdbSizer1OK )
+        self.m_sdbSizer1Cancel = wx.Button( self, wx.ID_CANCEL )
+        m_sdbSizer1.AddButton( self.m_sdbSizer1Cancel )
+        m_sdbSizer1.Realize();
+        bSizer1.Add( m_sdbSizer1, 0, wx.EXPAND, 5 )
+        self.SetSizer( bSizer1 )
+        self.Layout()
+        self.Centre( wx.BOTH )
+
+    def __del__( self ):
+        pass