translators
[iramuteq] / iramuteq.py
1 #!/bin/env python
2 # -*- coding: utf-8 -*-
3 #Author: Pierre Ratinaud
4 #Copyright (c) 2008-2012, Pierre Ratinaud
5 #License: GNU GPL
6
7 from optparse import OptionParser
8 from wx import BusyCursor
9
10 parser = OptionParser()
11 parser.add_option("-f", "--file", dest="filename",
12                   help="open FILE", metavar="FILE", default=False)
13 (options, args) = parser.parse_args()
14
15 import sys
16 reload(sys)
17 import locale
18 import tempfile
19 import codecs
20 import os
21 from random import randint
22 from ConfigParser import ConfigParser, RawConfigParser
23 import webbrowser
24 import gettext
25 import logging
26 #------------------------------------
27 import wx
28 import wx.lib.agw.aui as aui
29 import wx.html
30 import wx.grid
31 import wx.lib.hyperlink as hl
32 #------------------------------------
33 from functions import BugReport, PlaySound, History
34 from checkversion import NewVersion
35 from guifunct import *
36 from tableau import Tableau
37 from dialog import PrefDialog
38 from tabfrequence import Frequences, FreqMultiple
39 from tabchi2 import ChiSquare
40 #from tabstudent import MakeStudent
41 from tabchddist import ChdCluster
42 from tabafcm import DoAFCM
43 from tabchdalc import AnalyseQuest
44 from tabsimi import DoSimi
45 from tabrsimple import InputText
46 from tabverges import Prototypical
47 from tabsplitvar import SplitMatrixFromVar
48 #from textdist import AnalysePam
49 from textstat import Stat
50 from textaslexico import Lexico
51 from textsimi import SimiTxt, SimiFromCluster
52 from textwordcloud import WordCloud, ClusterCloud
53 from textreinert import Reinert
54 #from textcheckcorpus import checkcorpus
55 from openanalyse import OpenAnalyse
56 from corpus import Builder, SubBuilder
57 from checkinstall import CreateIraDirectory, CheckRPath, FindRPAthWin32, FindRPathNix, CheckRPackages, IsNew, UpgradeConf, CopyConf, RLibsAreInstalled
58 from chemins import RscriptsPath, ConstructConfigPath, ConstructDicoPath, ConstructGlobalPath, PathOut
59 from parse_factiva_xml import ImportFactiva
60 from tools import Extract
61
62 from tree import LeftTree
63 ##########################################################
64 ID_OpenData = wx.NewId()
65 ID_Import = wx.NewId()
66 ID_OpenText = wx.NewId()
67 ID_OnOpenAnalyse = wx.NewId()
68 ID_Freq = wx.NewId()
69 ID_Chi2 = wx.NewId()
70 ID_Student = wx.NewId()
71 ID_CHDSIM = wx.NewId()
72 ID_CHDReinert = wx.NewId()
73 ID_TEXTAFCM = wx.NewId()
74 ID_TEXTSTAT = wx.NewId()
75 ID_ASLEX = wx.NewId()
76 ID_TEXTREINERT = wx.NewId()
77 ID_TEXTPAM = wx.NewId()
78 ID_CHECKCORPUS = wx.NewId()
79 ID_Tabcontent = wx.NewId()
80 ID_AFCM = wx.NewId()
81 ID_SIMI = wx.NewId()
82 ID_CloseTab = wx.NewId()
83 ID_SaveTab = wx.NewId()
84 ID_CreateText = wx.NewId()
85 ID_ACCEUIL = wx.NewId()
86 ID_RESULT = wx.NewId()
87 ID_VIEWDATA = wx.NewId()
88 ID_HTMLcontent = wx.NewId()
89 ID_SimiTxt = wx.NewId()
90 ID_proto = wx.NewId()
91 ID_ImportTXM = wx.NewId()
92 ID_FreqMulti = wx.NewId()
93 ID_Splitfromvar = wx.NewId()
94 ID_Subtxtfrommeta = wx.NewId()
95 ID_Subtxtfromthem = wx.NewId()
96 ID_WC = wx.NewId()
97 ##########################################################
98 #elements de configuration
99 ##########################################################
100 #encodage
101 if sys.platform == 'darwin' :
102     sys.setdefaultencoding('UTF-8')
103     wx.SetDefaultPyEncoding('UTF-8')
104 else :
105     sys.setdefaultencoding(locale.getpreferredencoding())
106
107 #chemin de l'application
108 AppliPath = os.path.abspath(os.path.dirname(os.path.realpath(sys.argv[0])))
109 #chemin des images
110 ImagePath = os.path.join(AppliPath, 'images')
111 #configuration generale
112 DictConfigPath = ConstructGlobalPath(AppliPath)
113 ConfigGlob = ConfigParser()
114 ConfigGlob.read(DictConfigPath['global'])
115 DefaultConf = ConfigParser()
116 DefaultConf.read(DictConfigPath['preferences'])
117 #repertoire de l'utilisateur
118 if os.getenv('HOME') != None:
119     user_home = os.getenv('HOME')
120 else:
121     user_home = os.getenv('HOMEPATH')
122 UserConfigPath = os.path.abspath(os.path.join(user_home, '.iramuteq'))
123 #Si pas de fichiers de config utilisateur, on cree le repertoire
124 CreateIraDirectory(UserConfigPath, AppliPath)
125 #fichiers log pour windows (py2exe)
126 log = logging.getLogger('iramuteq')
127 fh = logging.FileHandler(os.path.join(UserConfigPath,'stdout.log'))
128 formatter = logging.Formatter('%(asctime)s - %(levelname)s - %(message)s')
129 fh.setFormatter(formatter)
130 log.addHandler(fh)
131 if sys.platform != 'win32' and sys.platform != 'darwin':
132     ch = logging.StreamHandler()
133     ch.setFormatter(formatter)
134     log.addHandler(ch)
135 log.setLevel(logging.INFO)
136
137 class writer(object):
138     def write(self, data):
139         if data.strip() != '' :
140             log.info('ERROR : %s' % data)
141
142 class printer(object) :
143     def write(self, data) :
144         if data.strip() != '' :
145             log.info('Print : %s' % data)
146
147 sys.stderr = writer()
148 sys.stdout = printer()
149
150 ConfigPath = ConstructConfigPath(UserConfigPath)
151
152 langues = {'french' : wx.LANGUAGE_FRENCH,
153            'english' : wx.LANGUAGE_ENGLISH,
154            'portuguese' : wx.LANGUAGE_PORTUGUESE,
155            'italian' : wx.LANGUAGE_ITALIAN,
156            'spanish' : wx.LANGUAGE_SPANISH
157            }
158
159 code_langues = {'french' : 'fr_FR',
160                 'english' : 'en',
161                 'portuguese' : 'pt_PT',
162                 'italian' : 'it_IT',
163                 'spanish' : 'es_ES'
164                }
165
166 images_analyses = {
167         'textroot' : 'textroot.png',
168         'alceste' : 'reinert.png',
169         'corpus' : 'textcorpus.png',
170         'wordcloud' :'wordcloud.png',
171         'stat' :'stats.png',
172         'simitxt' : 'simitxt.png',
173         'clustersimitxt' :'clustersimitxt.png',
174         'clustercloud' : 'clustercloud.png',
175         'spec' : 'spec.png',
176         'matroot' : 'matroot.png',
177         'matrix' : 'matrix.png',
178         'freq' : 'frequences.png',
179         'freqmulti' : 'frequences.png',
180         'chi2' : 'chi2.png',
181         'reinertmatrix' : 'reinertmatrix.png',
182         'simimatrix' : 'simimatrix.png',
183         'simiclustermatrix' : 'simimatrix.png',
184         'proto' : 'proto.png',
185          }
186 #####################################################################
187
188 class IraFrame(wx.Frame):
189     def __init__(self, parent, id= -1, title="", pos=wx.DefaultPosition,
190                  size=wx.DefaultSize, style=wx.DEFAULT_FRAME_STYLE | 
191                                             wx.SUNKEN_BORDER | 
192                                             wx.CLIP_CHILDREN):
193         log.info('Starting...')
194         wx.Frame.__init__(self, parent, id, title, pos, size, style)
195         #configuration
196         self.AppliPath = AppliPath
197         self.images_path = os.path.join(AppliPath,'images')
198         self.UserConfigPath = UserConfigPath
199         #self.RscriptsPath = ConstructRscriptsPath(AppliPath)
200         self.RscriptsPath = PathOut(dirout=os.path.join(AppliPath, 'Rscripts'))
201         self.RscriptsPath.basefiles(RscriptsPath)
202         #self.DictPath = ConstructDicoPath(AppliPath)
203         self.DictPath = ConstructDicoPath(UserConfigPath)
204         self.ConfigGlob = ConfigGlob
205         self.ConfigPath = ConstructConfigPath(UserConfigPath)
206         self.pref = RawConfigParser()
207         #workaround for import problem
208         self.SimiFromCluster = SimiFromCluster
209         #langues
210         gettext.install('iramuteq',  os.path.join(AppliPath,'locale'), unicode=True)
211         #langues = ['fr_FR', 'en', 'pt_PT']
212         #for l in langues :
213         #    pass
214         self.preslangue = {}
215         for langue in code_langues :
216             self.preslangue[langue] = gettext.translation("iramuteq", os.path.join(AppliPath,'locale'), languages=[code_langues[langue]])
217         self.setlangue()
218         #self.presLan_fr = gettext.translation("iramuteq", os.path.join(AppliPath,'locale'), languages=['fr_FR'])
219         #self.presLan_en = gettext.translation("iramuteq", os.path.join(AppliPath,'locale'), languages=['en'])
220         # tell FrameManager to manage this frame        
221         #self._mgr = wx.aui.AuiManager()
222         self._mgr = aui.AuiManager()
223         self._mgr.SetManagedWindow(self)
224         self.x = 0
225         # create menu
226 #--------------------------------------------------------------------------------
227         self.images_analyses = images_analyses
228         for img in images_analyses :
229             self.images_analyses[img] = wx.Image(os.path.join(self.images_path, self.images_analyses[img]), wx.BITMAP_TYPE_PNG).Scale(16,16).ConvertToBitmap()
230         self.mb = wx.MenuBar()
231
232         file_menu = wx.Menu()
233         item = wx.MenuItem(file_menu, ID_OpenData, _(u"Open a matrix").decode('utf8'), _(u"Open a matrix").decode('utf8'))
234         #item.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_FILE_OPEN))
235         item.SetBitmap(self.images_analyses['matroot'])
236         file_menu.AppendItem(item)
237         
238         item = wx.MenuItem(file_menu, ID_OpenText, _(u"Open a text corpus").decode('utf8'), _(u"Open a text corpus").decode('utf8'))
239         item.SetBitmap(self.images_analyses['textroot'])
240         file_menu.AppendItem(item)
241         
242         item = wx.MenuItem(file_menu, ID_OnOpenAnalyse, _(u"Open an analysis").decode('utf8'), _(u"Open an analysis").decode('utf8'))
243         item.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_FILE_OPEN))
244         file_menu.AppendItem(item)
245
246         
247         menuFactiva = wx.Menu()
248         fact_from_xml = wx.MenuItem(menuFactiva, wx.ID_ANY, _(u"from xml").decode('utf8'))
249         fact_from_mail = wx.MenuItem(menuFactiva, wx.ID_ANY, _(u"from mail").decode('utf8'))
250         fact_from_txt = wx.MenuItem(menuFactiva, wx.ID_ANY, _(u"from copy/paste").decode('utf8'))
251         menuFactiva.AppendItem(fact_from_xml)
252         menuFactiva.AppendItem(fact_from_mail)
253         menuFactiva.AppendItem(fact_from_txt)
254         file_menu.AppendMenu(-1, _(u"Import from factiva").decode('utf8'), menuFactiva)
255
256         item = wx.MenuItem(file_menu, ID_ImportTXM, _(u"Import from TXM").decode('utf8'), _(u"Import from TXM").decode('utf8'))
257         item.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_FILE_OPEN))
258         file_menu.AppendItem(item)
259
260         menuTools = wx.Menu()
261         splitvar = wx.MenuItem(menuTools, wx.ID_ANY, _(u"Split from variable").decode('utf8'))
262         extractmod = wx.MenuItem(menuTools, wx.ID_ANY, _(u"Extract mods").decode('utf8'))
263         extractthem = wx.MenuItem(menuTools, wx.ID_ANY, _(u"Extract thematics").decode('utf8'))
264         menuTools.AppendItem(splitvar)
265         menuTools.AppendItem(extractmod)
266         menuTools.AppendItem(extractthem)
267         self.ID_splitvar = splitvar.GetId()
268         self.ID_extractmod = extractmod.GetId()
269         self.ID_extractthem = extractthem.GetId()
270         file_menu.AppendMenu(-1, _(u"Tools").decode('utf8'), menuTools)
271
272                
273         #item = wx.MenuItem(file_menu, ID_SaveTab, _(u"Save tab as...").decode('utf8'), _(u"Save tab as...").decode('utf8'))
274         #item.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_FILE_SAVE_AS))
275         #file_menu.AppendItem(item)
276         
277         file_menu.Append(wx.ID_EXIT, _(u"Exit").decode('utf8'))
278         
279         edit_menu = wx.Menu()
280         edit_menu.Append(wx.ID_PREFERENCES, _(u'Preferences').decode('utf8'))
281         
282         view_menu = wx.Menu()
283         view_menu.Append(ID_ACCEUIL, _(u"Home page").decode('utf8'))
284         view_menu.Append(ID_VIEWDATA, _(u"Show data").decode('utf8'))
285         view_menu.Append(ID_RESULT, _(u'Show results').decode('utf8'))
286         #view_menu.AppendSeparator()
287         matrix_menu = wx.Menu()
288         matanalyses = [[ID_Freq, _(u"Frequencies").decode('utf8'), 'freq'],
289                        [ID_Freq, _(u"Multiple  Frequencies").decode('utf8'), 'freqmulti'],
290                        [ID_Chi2, _(u"Chi2").decode('utf8'), 'chi2'],
291                        {'name' : _(u"Clustering").decode('utf8'),
292                         'content' : [[ID_CHDReinert, _(u"Reinert's Method").decode('utf8'), 'reinertmatrix']]},
293                        [ID_SIMI, _(u"Similarities Analysis").decode('utf8'), 'simimatrix'],
294                        [ID_proto, _(u"Prototypical Analysis").decode('utf8'), 'proto'],
295                        [ID_Splitfromvar, _(u"Split from variable").decode('utf8'), '']]
296         
297         for analyse in matanalyses :
298             if not isinstance(analyse, dict) :
299                 item = wx.MenuItem(matrix_menu, analyse[0], analyse[1])
300                 item.SetBitmap(self.images_analyses.get(analyse[2], wx.EmptyBitmap(16,16)))
301                 matrix_menu.AppendItem(item)
302             else :
303                 nmenu = wx.Menu()
304                 for subana in analyse['content'] :
305                     item = wx.MenuItem(nmenu, subana[0], subana[1])
306                     item.SetBitmap(self.images_analyses.get(subana[2], wx.EmptyBitmap(16,16)))
307                     nmenu.AppendItem(item)
308                 matrix_menu.AppendMenu(-1, analyse['name'], nmenu)
309         #item = wx.MenuItem(matrix_menu, ID_Freq, _(u"Frequencies").decode('utf8'))
310         #item.SetBitmap(self.images_analyses['freq'])
311         #matrix_menu.AppendItem(item)
312         #matrix_menu.Append(ID_Freq, _(u"Frequencies").decode('utf8'))
313         #item = wx.MenuItem(matrix_menu, ID_Freq, _(u"Multiple  Frequencies").decode('utf8'))
314         #item.SetBitmap(self.images_analyses['freqmulti'])
315         #matrix_menu.Append(ID_FreqMulti, _(u'Multiple frequencies').decode('utf8'))
316         #matrix_menu.AppendItem(item)
317         #matrix_menu.Append(ID_Chi2, _(u"Chi2").decode('utf8'))
318         #matrix_menu.Append(ID_Student, u"t de Student")
319         #menu_classif = wx.Menu()
320         #menu_classif.Append(ID_CHDReinert, _(u"Reinert's Method").decode('utf8'))
321         #menu_classif.Append(ID_CHDSIM, u"Par matrice des distances")
322         #matrix_menu.AppendMenu(-1, _(u"Clustering").decode('utf8'), menu_classif)
323         #matrix_menu.Append(ID_AFCM, u"AFCM")
324         #matrix_menu.Append(ID_SIMI, _(u"Similarities Analysis").decode('utf8'))
325         #matrix_menu.Append(ID_proto, _(u"Prototypical Analysis").decode('utf8'))
326         ID_RCODE = wx.NewId()
327         #matrix_menu.Append(ID_RCODE, u"Code R...") 
328         #menu_splittab = wx.Menu()
329         #ID_SPLITVAR = wx.NewId()
330         #splitvar = wx.MenuItem(menu_splittab, ID_SPLITVAR, _(u"Split from variable").decode('utf8'))
331         #menu_splittab.AppendItem(splitvar)
332         #matrix_menu.AppendMenu(-1, _(u"Split matrix").decode('utf8'), menu_splittab)
333         self.matrix_menu = matrix_menu
334         
335         text_menu = wx.Menu()
336         analyses_text = [[ID_TEXTSTAT, _(u"Statistics").decode('utf8'), 'stat'],
337                          [ID_ASLEX, _(u"Specificities and CA").decode('utf8'), 'spec'],
338                          {'name' : _(u"Clustering").decode('utf8'),
339                           'content' : [[ID_TEXTREINERT, _(u"Reinert's Method").decode('utf8'), 'alceste']]},
340                          [ID_SimiTxt, _(u"Similarities Analysis").decode('utf8'), 'simitxt'],
341                          [ID_WC, _(u"WordCloud").decode('utf8'), 'wordcloud'],
342                          {'name' : _(u"Sub corpus").decode('utf8'),
343                           'content' : [[ID_Subtxtfrommeta, _(u'Sub corpus from metadata').decode('utf8'), None],
344                                        [ID_Subtxtfromthem, _(u'Sub corpus from thematic').decode('utf8'), None]]},
345                          ]
346         
347         for analyse in analyses_text :
348             if not isinstance(analyse, dict) :
349                 item = wx.MenuItem(text_menu, analyse[0], analyse[1])
350                 item.SetBitmap(self.images_analyses.get(analyse[2], wx.EmptyBitmap(16,16)))
351                 text_menu.AppendItem(item)
352             else :
353                 nmenu = wx.Menu()
354                 for subana in analyse['content'] :
355                     item = wx.MenuItem(nmenu, subana[0], subana[1])
356                     item.SetBitmap(self.images_analyses.get(subana[2], wx.EmptyBitmap(16,16)))
357                     nmenu.AppendItem(item)
358                 text_menu.AppendMenu(-1, analyse['name'], nmenu)
359         #text_menu.Append(ID_CHECKCORPUS, u"Vérifier le corpus")
360 #         text_menu.Append(ID_TEXTSTAT, _(u"Statistics").decode('utf8'))
361 #         text_menu.Append(ID_ASLEX, _(u"Specificities and CA").decode('utf8'))
362 #         #text_menu.Append(ID_TEXTAFCM, u"AFC sur UCI / Vocabulaire")
363 #         menu_classiftxt = wx.Menu()
364 #         menu_classiftxt.Append(ID_TEXTREINERT, _(u"Reinert's Method").decode('utf8'))
365 #         #menu_classiftxt.Append(ID_TEXTPAM, u"Par matrice des distances")
366 #         text_menu.AppendMenu(-1, _(u"Clustering").decode('utf8'), menu_classiftxt)
367 #         text_menu.Append(ID_SimiTxt, _(u"Similarities Analysis").decode('utf8')) 
368 #         
369 #         text_menu.Append(ID_WC, _(u"WordCloud").decode('utf8'))
370         self.text_menu = text_menu
371         
372         help_menu = wx.Menu()
373         help_menu.Append(wx.ID_ABOUT, _(u"About...").decode('utf8'))
374         help_menu.Append(wx.ID_HELP, _(u"Online help...").decode('utf8'))
375         
376         self.mb.Append(file_menu, _(u"File").decode('utf8'))
377         self.mb.Append(edit_menu, _(u"Edition").decode('utf8'))
378         self.mb.Append(view_menu, _(u"View").decode('utf8'))
379         self.mb.Append(matrix_menu, _(u"Matrix analysis").decode('utf8'))
380         self.mb.Append(text_menu, _(u"Text analysis").decode('utf8'))
381         self.mb.Append(help_menu, _(u"Help").decode('utf8'))
382         
383         self.SetMenuBar(self.mb)
384 #--------------------------------------------------------------------
385         self.statusbar = self.CreateStatusBar(2, wx.ST_SIZEGRIP)
386         self.statusbar.SetStatusWidths([-2, -3])
387         self.statusbar.SetStatusText(_(u"Ready").decode('utf8'), 0)
388         self.statusbar.SetStatusText(_(u"Welcome").decode('utf8'), 1)
389
390         # min size for the frame itself isn't completely done.
391         # see the end up FrameManager::Update() for the test
392         # code. For now, just hard code a frame minimum size
393         self.SetMinSize(wx.Size(400, 400))
394
395         # create some toolbars
396         tb1 = wx.ToolBar(self, -1, wx.DefaultPosition, wx.DefaultSize,
397                          wx.TB_FLAT | wx.TB_NODIVIDER)
398         tb1.SetToolBitmapSize(wx.Size(16, 16))
399         tb1.AddLabelTool(ID_OpenData, "OpenData", self.images_analyses['matroot'], shortHelp=_(u"Matrix").decode('utf8'), longHelp=_(u"Open a matrix").decode('utf8'))
400         tb1.AddSeparator()
401         tb1.AddLabelTool(ID_OpenText, "OpenText", self.images_analyses['textroot'], shortHelp=_(u"Text").decode('utf8'), longHelp=_(u"Open a text corpus").decode('utf8'))
402         
403         tb1.Realize()
404         
405         tb_text = wx.ToolBar(self, -1, wx.DefaultPosition, wx.DefaultSize,
406                          wx.TB_FLAT | wx.TB_NODIVIDER)
407         for analyse in analyses_text :
408             if not isinstance(analyse, dict) :
409                 tb_text.AddLabelTool(analyse[0], analyse[1], self.images_analyses.get(analyse[2], wx.EmptyBitmap(16,16)), shortHelp = analyse[1], longHelp = analyse[1])
410             else :
411                 for subana in analyse['content'] :
412                     tb_text.AddLabelTool(subana[0], subana[1], self.images_analyses.get(subana[2], wx.EmptyBitmap(16,16)), shortHelp = subana[1], longHelp = subana[1])
413         tb_text.Realize()
414         
415         tb_mat = wx.ToolBar(self, -1, wx.DefaultPosition, wx.DefaultSize,
416                          wx.TB_FLAT | wx.TB_NODIVIDER)
417         for analyse in matanalyses :
418             if not isinstance(analyse, dict) :
419                 tb_mat.AddLabelTool(analyse[0], analyse[1], self.images_analyses.get(analyse[2], wx.EmptyBitmap(16,16)), shortHelp = analyse[1], longHelp = analyse[1])
420             else :
421                 for subana in analyse['content'] :
422                     tb_mat.AddLabelTool(subana[0], subana[1], self.images_analyses.get(subana[2], wx.EmptyBitmap(16,16)), shortHelp = subana[1], longHelp = subana[1])        
423         tb_mat.Realize()
424 #------------------------------------------------------------------------------------------------
425
426         self.text_ctrl_txt = wx.TextCtrl(self, -1, "", wx.Point(0, 0), wx.Size(200, 200), wx.NO_BORDER | wx.TE_MULTILINE | wx.TE_RICH2 | wx.TE_READONLY)
427                       
428         #self._mgr.AddPane(self.text_ctrl_txt, wx.aui.AuiPaneInfo().
429         #                  Name("Text").CenterPane())                      
430         self._mgr.AddPane(self.text_ctrl_txt, aui.AuiPaneInfo().
431                           Name("Text").CenterPane())
432         #self._mgr.AddPane(IntroPanel(self), wx.aui.AuiPaneInfo().Name("Intro_Text").
433         #                  CenterPane())
434         self._mgr.AddPane(IntroPanel(self), aui.AuiPaneInfo().Name("Intro_Text").
435                           CenterPane())
436         #if not os.path.exists(os.path.join(UserConfigPath, 'history.db')) :
437         #    with open(os.path.join(UserConfigPath, 'history.db'), 'w') as f :
438         #        f.write('')
439         self.history = History(os.path.join(UserConfigPath, 'history.db'))
440         self.tree = LeftTree(self)
441         self._mgr.AddPane(self.tree, aui.AuiPaneInfo().Name("lefttree").Caption(_(u"Historic").decode('utf8')).
442                           Left().MinSize(wx.Size(200,500)).Layer(1).Position(1).CloseButton(False).MaximizeButton(True).
443                           MinimizeButton(True))
444         
445         #self.nb = wx.aui.AuiNotebook(self, -1, wx.DefaultPosition, wx.DefaultSize, wx.aui.AUI_NB_DEFAULT_STYLE | wx.aui.AUI_NB_TAB_EXTERNAL_MOVE | wx.aui.AUI_NB_TAB_MOVE | wx.aui.AUI_NB_TAB_FLOAT| wx.NO_BORDER)
446         self.nb = aui.AuiNotebook(self, -1, wx.DefaultPosition, wx.DefaultSize, aui.AUI_NB_DEFAULT_STYLE | aui.AUI_NB_TAB_EXTERNAL_MOVE | aui.AUI_NB_TAB_MOVE | aui.AUI_NB_TAB_FLOAT| wx.NO_BORDER)
447         notebook_flags =  aui.AUI_NB_DEFAULT_STYLE | aui.AUI_NB_TAB_EXTERNAL_MOVE | aui.AUI_NB_TAB_MOVE | aui.AUI_NB_TAB_FLOAT| wx.NO_BORDER
448         self.nb.SetAGWWindowStyleFlag(notebook_flags)
449         self.nb.SetArtProvider(aui.ChromeTabArt())
450         #self.nb.SetArtProvider(aui.VC8TabArt())
451         #self.nb.parent = self
452         #self._notebook_style = aui.AUI_NB_DEFAULT_STYLE | aui.AUI_NB_TAB_EXTERNAL_MOVE | wx.NO_BORDER
453         #self._mgr.AddPane(self.nb, wx.aui.AuiPaneInfo().
454         #                      Name("Tab_content").
455         #                      CenterPane())
456         self._mgr.AddPane(self.nb, aui.AuiPaneInfo().
457                               Name("Tab_content").
458                               CenterPane())        
459         
460         #self._mgr.AddPane(self.Sheet, wx.aui.AuiPaneInfo().Name("Data").CenterPane())
461         #self._mgr.AddPane(self.Sheet, aui.AuiPaneInfo().Name("Data").CenterPane())
462         self.nb.Bind(aui.EVT_AUINOTEBOOK_PAGE_CLOSE, self.OnCloseTab)
463         self.nb.Bind(aui.EVT_AUINOTEBOOK_PAGE_CHANGED, self.OnPageChanged)
464         # add the toolbars to the manager
465                         
466         #self._mgr.AddPane(tb1, wx.aui.AuiPaneInfo().
467         #                  Name("tb1").Caption("Fichiers").
468         #                  ToolbarPane().Top().
469         #                  LeftDockable(False).RightDockable(False))
470         self._mgr.AddPane(tb1, aui.AuiPaneInfo().
471                           Name("tb1").Caption("Fichiers").
472                           ToolbarPane().Top().
473                           LeftDockable(True).RightDockable(False))
474         
475         self._mgr.AddPane(tb_text, aui.AuiPaneInfo().
476                           Name("tb_text").Caption("analyse_text").
477                           ToolbarPane().Top().
478                           LeftDockable(True).RightDockable(False))
479         
480         self._mgr.AddPane(tb_mat, aui.AuiPaneInfo().
481                           Name("tb_mat").Caption("analyse_matrix").
482                           ToolbarPane().Top().
483                           LeftDockable(True).RightDockable(False))           
484         
485         self._mgr.GetPane('tb_text').Hide()
486         self._mgr.GetPane('tb_mat').Hide()
487         
488         self.ShowAPane("Intro_Text")
489         self._mgr.GetPane("lefttree").Show()
490         self._mgr.GetPane("classif_tb").Hide()
491         # "commit" all changes made to FrameManager   
492         self._mgr.Update()
493
494         # Show How To Use The Closing Panes Event
495 ##################################################################        
496         self.Bind(wx.EVT_MENU, self.OnAcceuil, id=ID_ACCEUIL)
497         self.Bind(wx.EVT_MENU, self.OnViewData, id=ID_VIEWDATA)
498         self.Bind(wx.EVT_MENU, self.ShowTab, id=ID_RESULT)
499         self.Bind(wx.EVT_MENU, self.OnOpenData, id=ID_OpenData)
500         self.Bind(wx.EVT_MENU, self.OnOpenText, id=ID_OpenText)
501         self.Bind(wx.EVT_MENU, self.OnOpenAnalyse, id=ID_OnOpenAnalyse)
502         self.Bind(wx.EVT_MENU, self.import_factiva_xml, fact_from_xml)
503         self.Bind(wx.EVT_MENU, self.import_factiva_mail, fact_from_mail)
504         self.Bind(wx.EVT_MENU, self.import_factiva_txt, fact_from_txt)
505         self.Bind(wx.EVT_MENU, self.ExtractTools, splitvar)
506         self.Bind(wx.EVT_MENU, self.ExtractTools, extractmod)
507         self.Bind(wx.EVT_MENU, self.ExtractTools, extractthem)
508         self.Bind(wx.EVT_MENU, self.OnFreq, id=ID_Freq)
509         self.Bind(wx.EVT_MENU, self.OnFreqMulti, id=ID_FreqMulti)
510         self.Bind(wx.EVT_MENU, self.OnChi2, id=ID_Chi2)
511         self.Bind(wx.EVT_MENU, self.OnStudent, id=ID_Student)
512         self.Bind(wx.EVT_MENU, self.OnCHDSIM, id=ID_CHDSIM)
513         self.Bind(wx.EVT_MENU, self.OnCHDReinert, id=ID_CHDReinert)
514         self.Bind(wx.EVT_MENU, self.OnAFCM, id=ID_AFCM)
515         self.Bind(wx.EVT_MENU, self.OnProto, id=ID_proto)
516         self.Bind(wx.EVT_MENU, self.OnSplitVar, id = ID_Splitfromvar)
517         #self.Bind(wx.EVT_MENU, self.OnRCode, id=ID_RCODE)
518         #self.Bind(wx.EVT_MENU, self.OnSplitVar, id=ID_SPLITVAR)
519         #self.Bind(wx.EVT_MENU, self.OnCheckcorpus, id = ID_CHECKCORPUS)
520         self.Bind(wx.EVT_MENU, self.OnTextStat, id=ID_TEXTSTAT)
521         self.Bind(wx.EVT_MENU, self.OnTextSpec, id=ID_ASLEX)
522         self.Bind(wx.EVT_MENU, self.OnTextAfcm, id=ID_TEXTAFCM)
523         self.Bind(wx.EVT_MENU, self.OnTextReinert, id=ID_TEXTREINERT)
524         self.Bind(wx.EVT_MENU, self.OnPamSimple, id=ID_TEXTPAM)
525         self.Bind(wx.EVT_MENU, self.OnSimiTxt, id=ID_SimiTxt)
526         self.Bind(wx.EVT_MENU, self.OnWordCloud, id=ID_WC)
527         self.Bind(wx.EVT_MENU, self.OnSubText, id = ID_Subtxtfrommeta)
528         self.Bind(wx.EVT_MENU, self.OnSubText, id = ID_Subtxtfromthem)
529         self.Bind(wx.EVT_MENU, self.OnSimiTab, id=ID_SIMI)
530         self.Bind(wx.EVT_MENU, self.OnExit, id=wx.ID_EXIT)
531         #self.Bind(wx.EVT_MENU, self.OnSaveTabAs, id=ID_SaveTab)
532         self.Bind(wx.EVT_MENU, self.OnAbout, id=wx.ID_ABOUT)
533         self.Bind(wx.EVT_MENU, self.OnHelp, id=wx.ID_HELP)
534         self.Bind(wx.EVT_MENU, self.OnPref, id=wx.ID_PREFERENCES)
535         self.Bind(wx.EVT_MENU, self.OnImportTXM, id=ID_ImportTXM)
536         self.Bind(wx.EVT_CLOSE, self.OnClose)
537 ##################################################################
538         flags = self._mgr.GetAGWFlags()
539         #flags &= ~wx.aui.AUI_MGR_TRANSPARENT_HINT
540         #flags &= ~wx.aui.AUI_MGR_VENETIAN_BLINDS_HINT
541         #flags &= ~wx.aui.AUI_MGR_RECTANGLE_HINT
542         flags &= ~(aui.AUI_MGR_RECTANGLE_HINT | aui.AUI_MGR_ALLOW_FLOATING)
543         self._mgr.SetAGWFlags(self._mgr.GetAGWFlags() ^ (aui.AUI_MGR_RECTANGLE_HINT | aui.AUI_MGR_ALLOW_FLOATING))
544         self._mgr.GetArtProvider().SetMetric(aui.AUI_DOCKART_GRADIENT_TYPE, aui.AUI_GRADIENT_HORIZONTAL)
545         self.GetDockArt().SetColor(aui.AUI_DOCKART_ACTIVE_CAPTION_GRADIENT_COLOUR, "#00FFF9")
546         self.DoUpdate()
547
548         self._icon = wx.Icon(os.path.join(ImagePath, "iraicone.ico"), wx.BITMAP_TYPE_ICO)
549         self.SetIcon(self._icon)
550 ##########################
551         self.ctrl = ""
552         self.input_path = [False]
553         self.TEMPDIR = tempfile.mkdtemp('iramuteq')
554         self.FileTabList = []
555         self.listbar=[]
556         self.DictTab = {}
557         self.FreqNum = 0
558         self.colsep = ''
559         self.txtsep = ''
560         self.g_header = False
561         self.g_id = False
562         self.table = ''
563         self.fileforR = ''
564         self.filename = ''
565         self.nastrings = ''
566         self.encode = ''
567         self.SysEncoding = sys.getdefaultencoding()
568         self.syscoding = sys.getdefaultencoding()
569         #print 'SysEncoding',self.SysEncoding
570         if self.SysEncoding == 'mac-roman' : self.SysEncoding = 'MacRoman'
571         self.type = ''
572
573 ##############################################################@
574         self.DisEnSaveTabAs(False)
575         self.ShowMenu('view', False)
576         self.ShowMenu('matrix', False)
577         self.ShowMenu('text', False)
578    
579         self._mgr.Update()
580
581         self.DataPop = False
582         self.DataTxt = False
583         self.Text = ''
584
585         self.lexique = None
586         self.corpus = None
587
588     def finish_init(self) :
589         try :
590             self.pref.read(self.ConfigPath['preferences'])
591             if IsNew(self) :
592                 UpgradeConf(self)
593                 self.pref.read(self.ConfigPath['preferences'])
594                 New = True
595             else :
596                 CopyConf(self)
597                 New = False
598         except :
599             UpgradeConf(self)
600             self.pref.read(self.ConfigPath['preferences'])
601             New = True
602         self.sound = self.pref.getboolean('iramuteq', 'sound')
603         self.check_update = self.pref.getboolean('iramuteq', 'checkupdate')
604         self.version = ConfigGlob.get('DEFAULT', 'version')
605         #configuration des chemins de R
606         self.PathPath = ConfigParser()
607         self.PathPath.read(ConfigPath['path'])
608         BestRPath = False
609         if not CheckRPath(self.PathPath) :
610             if sys.platform == 'win32':
611                 BestRPath = FindRPAthWin32()
612             else:
613                 BestRPath = FindRPathNix()
614             if BestRPath:
615                 self.PathPath.set('PATHS', 'rpath', BestRPath)
616                 with open(ConfigPath['path'], 'w') as f :
617                     self.PathPath.write(f)
618         else:
619             BestRPath = True 
620         if BestRPath :
621             self.RPath = self.PathPath.get('PATHS', 'rpath')
622             if New :
623                 CheckRPackages(self)
624             if not RLibsAreInstalled(self) :
625                 CheckRPackages(self)
626         else :
627             msg = '\n'.join([_(u"Can't find R executable"), _(u"If R is not installed, get it from http://www.r-project.org."),
628                              _(u"If R is installed, report its path in Preferences."),
629                              _(u"IRaMuTeQ does not work without R.")])
630 #            msg = u"""
631 #Le chemin de l'executable de R n'a pas été trouvé.
632 #Si R n'est pas installé, vous devez l'installer (http://www.r-project.org/).
633 #Si R n'est pas installé dans le répertoire par défaut
634 #(souvent C:\Program Files\R\R-2.x.x\R.exe sous windows ou /usr/bin/R sous linux ou Mac Os X)
635 #vous devez signaler le chemin de l'éxecutable de R dans les préférences.""" 
636             dlg = wx.MessageDialog(self, msg, u"Problème de configuration", wx.OK | wx.NO_DEFAULT | wx.ICON_WARNING)
637             dlg.CenterOnParent()
638             if dlg.ShowModal() in [wx.ID_NO, wx.ID_CANCEL]:
639                 pass
640             dlg.Destroy()
641
642     def setlangue(self) :
643         self.pref.read(self.ConfigPath['preferences'])
644         try :
645             guilangue = self.pref.get('iramuteq', 'guilanguage')
646         except :
647             guilangue = DefaultConf.get('iramuteq', 'guilanguage')
648         self.preslangue.get(guilangue, 'english').install()
649
650     def OnVerif(self, evt) :
651         pack = CheckRPackages(self)
652         if pack :
653             dlg = wx.MessageDialog(self, _(u"Installation OK").decode('utf8'), _(u"Installation").decode('utf8'), wx.OK | wx.ICON_INFORMATION | wx.STAY_ON_TOP)
654             dlg.CenterOnParent()
655             if dlg.ShowModal() in [wx.ID_NO, wx.ID_CANCEL]:
656                 evt.Veto()
657
658     def DisEnSaveTabAs(self, DISEN):
659     #Disable SaveTabAs
660         file_menu = self.mb.GetMenu(0)
661         items = file_menu.GetMenuItems()
662         for item in items :
663             if item.GetId() == ID_SaveTab :
664                 item.Enable(DISEN)
665     
666     def ShowMenu(self, menu, Show=True):
667         if menu == 'text' :
668             menu_pos = 4
669             if Show :
670                 self._mgr.GetPane('tb_text').Show()
671             else :
672                 self._mgr.GetPane('tb_text').Hide()   
673         elif menu == 'matrix' :
674             menu_pos = 3
675             if Show :
676                 self._mgr.GetPane('tb_mat').Show()
677             else :
678                 self._mgr.GetPane('tb_mat').Hide()           
679         elif menu == 'view' :
680             menu_pos = 2
681         else :
682             menu_pos = None
683             
684         #menu_pos = self.mb.FindMenu(menu)
685         if not menu_pos is None :
686             self.mb.EnableTop(menu_pos, Show)
687             self.mb.UpdateMenus()
688         self._mgr.Update()
689
690 #--------------------------------------------------------------------
691     def OnClose(self, event):
692         print 'onclose'
693         with open(self.ConfigPath['path'], 'w') as f :
694             self.PathPath.write(f)
695         self._mgr.UnInit()
696         del self._mgr
697         self.Destroy()
698
699     def OnOpenData(self, event):
700         inputname, self.input_path = OnOpen(self, "Data")
701         if inputname:
702             #filename = self.input_path[0]
703             self.tableau = Tableau(self,os.path.abspath(self.input_path[0]))
704             val = get_table_param(self, self.input_path[0])
705             if val == wx.ID_OK :
706                 busy = wx.BusyInfo(_("Please wait...").decode('utf8'), self)
707                 wx.SafeYield()
708                 try :
709                     self.tableau.make_content()
710                     OpenAnalyse(self, self.tableau.parametres)
711                     self.tree.OnItemAppend(self.tableau.parametres)
712                     del busy 
713                 except :
714                     del busy
715                     BugReport(self)
716                 #self.tableau.show_tab()
717
718     def OnOpenAnalyse(self, event):
719         self.AnalysePath = OnOpen(self, "Analyse")
720         OpenAnalyse(self, self.AnalysePath[1][0], True)
721         self.ShowMenu('view')
722
723     def OnOpenText(self, event):
724         inputname, self.input_path = OnOpen(self, "Texte")
725         self.filename = self.input_path[0]
726         if inputname:
727             self.OpenText()
728    
729     def OnViewData(self, event):
730         if self.type == "Data":
731             if not self.DataPop :
732                 self.Sheet.Populate(self.content)
733                 self.DataPop = True
734                 self.DataTxt = False
735             self.ShowAPane(u"Data")
736         elif self.type == "Texte" or self.type == 'Analyse' :
737             if not self.DataTxt :
738                 self.text_ctrl_txt.Clear()
739                 self.text_ctrl_txt.write(self.content)
740                 self.text_ctrl_txt.ShowPosition(0)
741                 self.DataTxt = True
742                 self.DataPop = False
743             self.ShowAPane(u"Text")
744         self._mgr.Update()
745     
746     def OnSubText(self, evt, corpus = None, parametres = None):
747         if corpus is None :
748             corpus = self.tree.getcorpus()
749         if evt.GetId() == ID_Subtxtfrommeta :
750             parametres = {'frommeta' : True}
751         elif evt.GetId() == ID_Subtxtfromthem :
752             parametres = {'fromtheme' : True}
753         builder = SubBuilder(self, corpus, parametres)
754         if builder.res == wx.ID_OK :
755             busy = wx.BusyInfo(_("Please wait...").decode('utf8'), self)
756             wx.SafeYield()
757             corpus = builder.doanalyse()
758             self.history.add(corpus.parametres)
759             self.tree.OnItemAppend(corpus.parametres)
760             OpenAnalyse(self, corpus.parametres)
761             del busy
762             
763     def OpenText(self):
764         dlg = wx.ProgressDialog("Ouverture...",
765                                    "Veuillez patienter...",
766                                    maximum=2,
767                                    parent=self,
768                                    style=wx.PD_APP_MODAL | wx.PD_AUTO_HIDE | wx.PD_ELAPSED_TIME | wx.PD_CAN_ABORT
769                                    )
770         
771         builder =  Builder(self, dlg)
772         if builder.res == wx.ID_OK :
773             try :
774                 corpus = builder.doanalyse()
775                 self.history.add(corpus.parametres)
776                 self.tree.OnItemAppend(corpus.parametres)
777                 OpenAnalyse(self, corpus.parametres)
778             except :
779                 dlg.Destroy()
780                 BugReport(self)
781             else :
782                 count = 1
783                 keepGoing = dlg.Update(count, u"Lecture du fichier")
784                 self.ShowMenu('view')
785                 self.ShowMenu('text')
786                 self.ShowMenu('matrix', False)
787                 self.type = "Texte"
788                 self.DataTxt = False
789                 self.Text = ''
790                 count += 1
791                 keepGoing = dlg.Update(count, u"Chargement du dictionnaire")
792                 dlg.Destroy()
793         #self.OnViewData(wx.EVT_BUTTON)
794         
795     def OnExit(self, event):
796         self.Close()
797
798     def OnAbout(self, event):
799         info = wx.AboutDialogInfo()
800         info.Name = ConfigGlob.get('DEFAULT', 'name')
801         info.Version = ConfigGlob.get('DEFAULT', 'version')
802         info.Copyright = ConfigGlob.get('DEFAULT', 'copyright')
803         info.Description = u"""
804 Interface de R pour les Analyses Multidimensionnelles 
805 de Textes et de Questionnaires
806
807 Un logiciel libre
808 construit avec des logiciels libres.
809
810 Laboratoire LERASS
811
812 REPERE
813 """
814         info.WebSite = ("http://www.iramuteq.org", u"Site web IRaMuTeQ")
815         dev = ConfigGlob.get('DEFAULT', 'dev').decode('utf8').split(';')
816         info.Developers = dev
817         info.License = u"""Iramuteq est un logiciel libre ; vous pouvez le diffuser et/ou le modifier 
818 suivant les termes de la Licence Publique Générale GNU telle que publiée 
819 par la Free Software Foundation ; soit la version 2 de cette licence, 
820 soit (à votre convenance) une version ultérieure.
821
822 Iramuteq est diffusé dans l'espoir qu'il sera utile, 
823 mais SANS AUCUNE GARANTIE ; sans même une garantie implicite 
824 de COMMERCIALISATION ou d'ADÉQUATION À UN USAGE PARTICULIER. 
825 Voyez la Licence Publique Générale GNU pour plus de détails.
826
827 Vous devriez avoir reçu une copie de la Licence Publique Générale GNU
828 avec Iramuteq ; sinon, veuillez écrire à la Free Software Foundation,
829 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, États-Unis."""
830         wx.AboutBox(info)
831
832     def GetDockArt(self):
833         return self._mgr.GetArtProvider()
834
835     def DoUpdate(self):
836         self._mgr.Update()
837
838     def OnPageChanged(self, event) :
839         new = event.GetSelection()
840         nobject = event.GetEventObject()
841         parent = nobject.GetParent()
842         if isinstance(parent, IraFrame) :
843             npage = self.nb.GetPage(new)
844             if 'parametres' in dir(npage) :
845                 self.tree.GiveFocus(uuid=npage.parametres['uuid'])
846                 if npage.parametres.get('matrix', False) :
847                     self.ShowMenu('text', False)
848                     self.ShowMenu('matrix', True)
849                 elif npage.parametres.get('corpus', False) :
850                     self.ShowMenu('text')
851                     self.ShowMenu('matrix', False)
852
853     def OnCloseTab(self, evt):
854         #log.info('Closing tab %s' % str(evt.GetEventObject()))
855         ctrl = evt.GetEventObject()
856         if isinstance(ctrl.GetParent(), aui.AuiNotebook) or isinstance(ctrl.GetParent(), wx.Panel):
857             notebook = True
858         else :
859             notebook = False
860         page = self.nb.GetPage(self.nb.GetSelection())
861         if 'parametres' in dir(page) and isinstance(ctrl.GetParent(), IraFrame) :
862             self.history.rmtab(page.parametres)
863             self.tree.CloseItem(uuid = page.parametres['uuid'])
864         TabTitle = self.nb.GetPageText(self.nb.GetSelection())
865
866         if self.nb.GetPageCount() == 1 and not notebook :
867             self.LastTabClose()
868     
869     def LastTabClose(self) :
870         if self.nb.GetPageCount() == 1 :
871             #self.DisEnSaveTabAs(False)
872             if self.DataTxt :
873                 self.ShowAPane("Text")
874             elif self.DataPop :
875                 self.ShowAPane("Data")
876             else :
877                 self.ShowAPane("Intro_Text")
878
879     def GetStartPosition(self):
880
881         self.x = self.x + 20
882         x = self.x
883         pt = self.ClientToScreen(wx.Point(0, 0))
884         
885         return wx.Point(pt.x + x, pt.y + x)
886     
887     def ShowAPane(self, panel):
888         for pane in self._mgr.GetAllPanes() :
889             if not pane.IsToolbar() and pane.name != 'lefttree': 
890                 pane.Hide()
891         self._mgr.GetPane(panel).Show()
892         self._mgr.Update()
893         
894     def OnAcceuil(self, event):
895         self.ShowAPane(u"Intro_Text")
896         event.Skip()
897     
898     def CreateHTMLCtrl(self):
899         ctrl = wx.html.HtmlWindow(self, -1, wx.DefaultPosition, wx.Size(400, 300))
900         if "gtk2" in wx.PlatformInfo:
901             ctrl.SetStandardFonts()
902         ctrl.SetPage(u"text")        
903         return ctrl
904
905     def ShowTab(self, evt):
906         self.ShowAPane("Tab_content")
907
908 ################################################################
909 #debut des analyses
910 ################################################################
911     def analyse_matrix(self, analyse, analyse_type = '', matrix = None, parametres = None, dlgnb = 1):
912         if matrix is None :
913             matrix = self.tree.getmatrix()
914         if parametres is not None :
915             parametres['type'] = analyse_type
916         else :
917             parametres = {'type' : analyse_type}
918         try :
919         #print 'plus de bug@@@@@@@@@@@@@@@@@@@@@@'
920             analyse(self, matrix, parametres = parametres, dlg = dlgnb)
921         except:
922             BugReport(self)           
923
924     def OnFreq(self, event, matrix = None):
925         self.analyse_matrix(Frequences, analyse_type = 'freq', matrix = matrix, dlgnb = 3)
926     
927     def OnFreqMulti(self, event, matrix = None):
928         self.analyse_matrix(FreqMultiple, analyse_type = 'freqmulti', matrix = matrix, dlgnb = 3)
929
930     def OnChi2(self, event, matrix = None):
931         self.analyse_matrix(ChiSquare, matrix = matrix, analyse_type = 'chi2', dlgnb = 3) 
932
933     def OnSimiTab(self, event, matrix = None):
934         self.analyse_matrix(DoSimi, matrix = matrix, analyse_type = 'simimatrix', dlgnb = 5)
935
936     def OnCHDReinert(self, event, matrix = None):
937         #if matrix is None :
938         #    matrix = self.tree.getmatrix()
939         #AnalyseQuest(self, matrix, parametres = {'type' : 'reinertmatrix'}, dlg = 3)
940         self.analyse_matrix(AnalyseQuest, matrix = matrix, analyse_type = 'reinertmatrix', dlgnb = 5)
941             
942     def OnStudent(self, event):
943         try:
944             MakeStudent(self) 
945         except:
946             BugReport(self)
947
948     def OnRCode(self, event):
949         try:
950             InputText(self)
951         except:
952             BugReport(self)
953
954     def OnCHDSIM(self, event):
955         try:
956         #    print 'ATTENTION!!!!'
957             chdsim = ChdCluster(self)
958             if chdsim.val == wx.ID_OK:
959                 PlaySound(self)
960         except:
961             BugReport(self)
962  
963 #     def OnCHDReinert(self, event):
964 #         try:
965 #          #   print('PLUS DE BUG SUR ALCESTE QUESTIONNAIRE')
966 #             self.quest = AnalyseQuest(self)
967 #             if self.quest.val == wx.ID_OK:
968 #                 PlaySound(self)
969 #         except:
970 #             BugReport(self)
971     
972     def OnProto(self, evt, matrix = None) :
973         self.analyse_matrix(Prototypical, matrix = matrix, analyse_type = 'proto', dlgnb = 3) 
974         #Prototypical(self, {'type' : 'proto'})
975     
976     def OnSplitVar(self, evt, matrix = None):
977         if matrix is None :
978             matrix = self.tree.getmatrix()
979         self.analyse_matrix(SplitMatrixFromVar, matrix = matrix, analyse_type = 'splitvar', parametres = {'pathout': matrix.pathout.dirout}, dlgnb = 3)
980         #matrix = self.tree.getmatrix()
981         
982
983     def OnSimiTxt(self, evt, corpus = None) :
984         #    print 'PLUS DE BUG SUR SIMITXT'
985         try :
986             #self.Text = SimiTxt(self)
987             if corpus is None :
988                 corpus = self.tree.getcorpus()            
989             self.Text = SimiTxt(self, corpus, parametres = {'type': 'simitxt'}, dlg = 3)
990             if self.Text.val == wx.ID_OK :
991                 PlaySound(self)
992         except :
993             BugReport(self)
994     
995     def OnWordCloud(self, evt, corpus = None) :
996         #    print 'PLUS DE BUG SUR WORDCLOUD'
997         try :
998             if corpus is None :
999                 corpus = self.tree.getcorpus()            
1000             self.Text = WordCloud(self, corpus, parametres = {'type' : 'wordcloud'}, dlg = 3)
1001             if self.Text.val == wx.ID_OK :
1002                 PlaySound(self)
1003         except :
1004             BugReport(self)
1005
1006     def OnClusterCloud(self, corpus, parametres = None) :
1007         self.Text = ClusterCloud(self, corpus, parametres = parametres, dlg = 3)
1008
1009     def OnAFCM(self, event):
1010         try:
1011             DoAFCM(self)
1012         except:
1013             BugReport(self)
1014
1015     def OnTextStat(self, event, corpus = None):
1016             #print 'PAS DE BUG SUR TEXT STAT'
1017         try:
1018             if corpus is None :
1019                 corpus = self.tree.getcorpus()
1020             self.Text = Stat(self, corpus, parametres = {'type': 'stat'}, dlg = 7)
1021             
1022             if self.Text.val == wx.ID_OK :
1023                 PlaySound(self)
1024         except:
1025             BugReport(self)
1026         
1027     def OnTextSpec(self, event, corpus = None):  
1028         try:
1029             #self.Text = AsLexico(self)
1030             #print('ATTENTION : PLUS DE BUG SUR LEXICO')
1031             if corpus is None :
1032                 corpus = self.tree.getcorpus()
1033             self.Text = Lexico(self, corpus, parametres = {'type' : 'spec'}, dlg = 3)
1034             if self.Text.val == wx.ID_OK :
1035                 PlaySound(self)
1036         except:
1037             BugReport(self)
1038     
1039     def OnTextAfcm(self, event):
1040         try:
1041             AfcUci(self)
1042             PlaySound(self)
1043         except:
1044             BugReport(self)
1045
1046     def import_factiva_xml(self,event):
1047         try :
1048             ImportFactiva(self, 'xml')
1049         except :
1050             BugReport(self)
1051
1052     def import_factiva_mail(self, evt) :
1053         try :
1054             ImportFactiva(self, 'mail')
1055         except :
1056             BugReport(self)
1057
1058     def import_factiva_txt(self, evt) :
1059         try :
1060             ImportFactiva(self, 'txt')
1061         except :
1062             BugReport(self)
1063
1064     def OnImportTXM(self, evt) :
1065         try :
1066             ImportFactiva(self, 'txm')
1067         except :
1068             BugReport(self)
1069
1070     def ExtractTools(self, evt) :
1071         ID = evt.GetId()
1072         if ID == self.ID_splitvar :
1073             Extract(self, 'splitvar')
1074         elif ID == self.ID_extractmod :
1075             Extract(self, 'mods')
1076         elif ID == self.ID_extractthem :
1077             Extract(self, 'them')
1078
1079     def OnTextReinert(self, event, corpus = None):
1080         try:
1081             #print('ATTENTION : PLUS DE BUG SUR ALCESTE')
1082             #RunAnalyse(self, corpus, Alceste, OptAlceste)
1083             if corpus is None :
1084                 corpus = self.tree.getcorpus()            
1085             self.Text = Reinert(self, corpus, parametres = {'type': 'alceste'}, dlg = 6)
1086             if self.Text.val == wx.ID_OK:
1087                 PlaySound(self)
1088         except:
1089             BugReport(self)
1090
1091     def OnPamSimple(self, event, corpus = None):
1092         try:
1093             if corpus is None :
1094                 corpus = self.tree.getcorpus()
1095             self.Text = AnalysePam(self, corpus, parametres = {'type' : 'pamtxt'}, dlg = 6)
1096             if self.Text.val == wx.ID_OK:
1097                 PlaySound(self)
1098         except:
1099             BugReport(self)
1100
1101     def SimiCluster(self, parametres = {}, fromprof = False, tableau = None) :
1102         self.analyse_matrix(DoSimi, parametres = parametres, analyse_type = 'simiclustermatrix', matrix = tableau, dlgnb = 5)
1103     
1104 #    def OnSimi(self,evt):
1105 #        try :
1106             #print 'ATTENTION !!!! VERGES'
1107             #print 'PLUS DE BUG SUR SIMI'
1108 #            self.res = DoSimi(self, param = None)
1109             #self.res = Verges(self)
1110 #            if self.res.val == wx.ID_OK :
1111 #                PlaySound(self)
1112 #        except :
1113 #            BugReport(self)
1114 #################################################################
1115
1116     def OnHelp(self, event):
1117         webbrowser.open('http://www.iramuteq.org/documentation')
1118     
1119     def OnPref(self, event):
1120         dlg = PrefDialog(self)
1121         dlg.CenterOnParent()
1122         self.val = dlg.ShowModal()
1123
1124     def Upgrade(self) :
1125         if self.check_update:
1126             NewVersion(self)
1127         else:
1128             print 'pas de verif'    
1129         #IsNew(self)
1130         #CheckRPackages(self)
1131
1132     def OnOpenFromCmdl(self):
1133         truepath = True
1134         if options.filename :
1135             if os.path.exists(options.filename):
1136                 self.filename = os.path.abspath(options.filename)
1137             else:
1138                 truepath = False
1139         elif args :
1140             if os.path.exists(os.path.realpath(args[0])):
1141                 self.filename = os.path.abspath(os.path.realpath(args[0]))
1142             else:
1143                 truepath = False
1144         else:
1145             pass
1146         if truepath :
1147             if os.path.splitext(self.filename)[1] in ['.csv', '.xls', '.ods']:
1148                 self.tableau = Tableau(self, self.filename)
1149                 val = get_table_param(self, self.filename)
1150                 if val == wx.ID_OK :
1151                     self.tableau.make_content()
1152                     OpenAnalyse(self, self.tableau.parametres)
1153                     self.tree.OnItemAppend(self.tableau.parametres)
1154                 #get_table_param(self, self.filename)
1155                 #self.tableau.make_content()
1156                 #self.tableau.show_tab()
1157                 #open_data(self, self.filename)
1158             elif os.path.splitext(self.filename)[1] == '.txt':
1159                 self.OpenText()
1160             elif os.path.splitext(self.filename)[1] == '.ira' :
1161                 #self.corpus = Corpus(self)
1162                 #self.Text = OpenAnalyse(self, self.filename)
1163                 OpenAnalyse(self, self.filename)
1164         if not truepath:
1165             print 'ce fichier n\'existe pas'
1166             
1167         
1168
1169 class IntroPanel(wx.Panel):
1170     def __init__(self, parent):
1171         wx.Panel.__init__(self, parent)
1172         col = randint(0, 255)
1173         col1 = randint(0,255)
1174         col2 = randint(0,255)
1175         col = 57
1176         bckgrdcolor = wx.Colour(col, col1, col2)
1177         self.SetBackgroundColour(bckgrdcolor)
1178         txtcolour = wx.Colour(250, 250, 250)
1179         linkcolor = wx.Colour(255, 0, 0)
1180         sizer1 = wx.BoxSizer(wx.VERTICAL)
1181         sizer2 = wx.BoxSizer(wx.VERTICAL)
1182         sizer3 = wx.BoxSizer(wx.HORIZONTAL)
1183         sizer4 = wx.BoxSizer(wx.VERTICAL)
1184         sizer5 = wx.BoxSizer(wx.HORIZONTAL)
1185         grid_sizer_1 = wx.FlexGridSizer(1, 4, 0, 0)
1186         grid_sizer_3 = wx.FlexGridSizer(1, 4, 0, 0)
1187         grid_sizer_2 = wx.FlexGridSizer(1, 3, 0, 0)
1188         PanelPres = wx.Panel(self)
1189         PanelPres.SetBackgroundColour(bckgrdcolor)
1190         label_1 = wx.StaticText(self, -1, u"IRaMuTeQ", size=(-1, -1))
1191         label_1.SetFont(wx.Font(46, wx.TELETYPE, wx.NORMAL, wx.BOLD, 0, "Purisa"))
1192         label_1.SetForegroundColour(wx.RED)
1193         label2 = wx.StaticText(PanelPres, -1 , u'\nVersion ' + ConfigGlob.get('DEFAULT', 'version') + '\n')
1194         label2.SetForegroundColour(txtcolour)
1195         label2.SetBackgroundColour(bckgrdcolor)
1196         #label3 = wx.StaticText(PanelPres, -1 , u'Equipe ')
1197         #label3.SetForegroundColour(txtcolour)
1198         #label3.SetBackgroundColour(bckgrdcolor)
1199         self.hyper2 = hl.HyperLinkCtrl(PanelPres, wx.ID_ANY, u"REPERE", URL="http://repere.no-ip.org/")
1200         self.hyper2.SetColours(linkcolor, linkcolor, "RED")
1201         self.hyper2.SetBackgroundColour(bckgrdcolor)
1202         self.hyper2.EnableRollover(True)
1203         self.hyper2.SetUnderlines(False, False, True)
1204         self.hyper2.SetBold(True)
1205         self.hyper2.UpdateLink()
1206         label_lerass = wx.StaticText(PanelPres, -1, u'Laboratoire ')
1207         label_lerass.SetForegroundColour(txtcolour)
1208         label_lerass.SetBackgroundColour(bckgrdcolor)
1209         self.hyper_lerass = hl.HyperLinkCtrl(PanelPres, -1, u'LERASS', URL="http://www.lerass.com")
1210         self.hyper_lerass.SetColours(linkcolor, linkcolor, "RED")
1211         self.hyper_lerass.SetBackgroundColour(bckgrdcolor)
1212         self.hyper_lerass.EnableRollover(True)
1213         self.hyper_lerass.SetUnderlines(False, False, True)
1214         self.hyper_lerass.SetBold(True)
1215         self.hyper_lerass.UpdateLink()
1216         blank = wx.StaticText(PanelPres, -1, u'\n')
1217         blank1 = wx.StaticText(PanelPres, -1, u'\n')
1218         labellicence = wx.StaticText(PanelPres, -1, _(u"License GNU GPL").decode('utf8'))
1219         labellicence.SetForegroundColour(txtcolour)
1220         labellicence.SetBackgroundColour(bckgrdcolor)
1221         labelcopy = wx.StaticText(PanelPres, -1, ConfigGlob.get('DEFAULT', 'copyright'))
1222         labelcopy.SetForegroundColour(txtcolour)
1223         labelcopy.SetBackgroundColour(bckgrdcolor)
1224         python_img = wx.Image(os.path.join(ImagePath,'python-logo.jpg'), wx.BITMAP_TYPE_ANY).ConvertToBitmap()
1225         r_img = wx.Image(os.path.join(ImagePath,'Rlogo.jpg'), wx.BITMAP_TYPE_ANY).ConvertToBitmap()
1226         lexique_img = wx.Image(os.path.join(ImagePath,'LexTexte4.jpg'), wx.BITMAP_TYPE_ANY).ConvertToBitmap()
1227         but_python = wx.BitmapButton(self, -1, python_img)
1228         but_lexique = wx.BitmapButton(self, -1, lexique_img)
1229         but_r = wx.BitmapButton(self, -1, r_img)
1230         self.Bind(wx.EVT_BUTTON, self.OnPython, but_python)
1231         self.Bind(wx.EVT_BUTTON, self.OnLexique, but_lexique)
1232         self.Bind(wx.EVT_BUTTON, self.OnR, but_r)
1233         
1234         
1235         #grid_sizer_1.Add(label3, 0, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1236         grid_sizer_1.Add(self.hyper2, 0, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1237         grid_sizer_3.Add(label_lerass, 0, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1238         grid_sizer_3.Add(self.hyper_lerass, 0, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1239         sizer4.Add(label_1, 0, wx.ALIGN_CENTER, 5)
1240         sizer2.Add(label2, 0, wx.ALIGN_CENTER, 5)
1241         #sizer2.Add(wx.StaticText(PanelPres, -1, u''), 0, wx.ALIGN_CENTER, 5)
1242         sizer2.Add(wx.StaticText(PanelPres, -1, u''), 0, wx.ALIGN_CENTER, 5)
1243         sizer2.Add(wx.StaticText(PanelPres, -1, u''), 0, wx.ALIGN_CENTER, 5)
1244         sizer2.Add(grid_sizer_3, 0, wx.ALIGN_CENTER, 5)
1245         sizer2.Add(wx.StaticText(PanelPres, -1, u' '), 0, wx.ALIGN_CENTER, 5)
1246         #sizer2.Add(wx.StaticText(PanelPres, -1, u''), 0, wx.ALIGN_CENTER, 5)
1247         #sizer2.Add(wx.StaticText(PanelPres, -1, u''), 0, wx.ALIGN_CENTER, 5)
1248         sizer2.Add(grid_sizer_1, 0, wx.ALIGN_CENTER, 5)
1249         sizer2.Add(labellicence, 0, wx.ALIGN_CENTER, 5)
1250         sizer2.Add(labelcopy, 0, wx.ALIGN_CENTER, 5)
1251         sizer1.Add(sizer4, 1, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1252         PanelPres.SetSizer(sizer2)
1253         sizer5.Add(blank, 1, wx.EXPAND | wx.ALL | wx.ALIGN_CENTER_HORIZONTAL, 2)
1254         sizer5.Add(PanelPres, 1, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1255         sizer5.Add(blank1, 1, wx.ALIGN_CENTER_HORIZONTAL,2)
1256         grid_sizer_2.Add(but_python, 1, wx.ALIGN_CENTER_HORIZONTAL| wx.ALIGN_CENTER_VERTICAL)
1257         grid_sizer_2.Add(but_lexique, 1,wx.ALIGN_CENTER_HORIZONTAL| wx.ALIGN_CENTER_VERTICAL)
1258         grid_sizer_2.Add(but_r, 1, wx.ALIGN_CENTER_HORIZONTAL| wx.ALIGN_CENTER_VERTICAL)
1259         
1260         sizer1.Add(sizer5, 3, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 1)
1261         sizer1.Add(grid_sizer_2, 1, wx.ALIGN_CENTER_HORIZONTAL | wx.ALIGN_CENTER_VERTICAL)
1262         self.SetSizer(sizer1)
1263         sizer1.Fit(self)
1264     
1265     def OnPython(self,evt):
1266         webbrowser.open('http://www.python.org')
1267     
1268     def OnLexique(self,evt):
1269         webbrowser.open('http://www.lexique.org')
1270         
1271     def OnR(self,evt):
1272         webbrowser.open('http://www.r-project.org')
1273
1274 class MySplashScreen(wx.SplashScreen):
1275     def __init__(self):
1276         bmp = wx.Image(os.path.join(ImagePath, 'splash.png')).ConvertToBitmap()
1277         wx.SplashScreen.__init__(self, bmp,
1278                                  wx.SPLASH_CENTRE_ON_SCREEN | wx.SPLASH_TIMEOUT,
1279                                  2000, None, -1)
1280         self.Bind(wx.EVT_CLOSE, self.OnClose)
1281         self.fc = wx.FutureCall(1, self.ShowMain)
1282
1283     def OnClose(self, evt):
1284         evt.Skip()
1285         self.Hide()
1286         
1287         if self.fc.IsRunning():
1288             self.fc.Stop()
1289             self.ShowMain()
1290
1291     def ShowMain(self):
1292         displaySize = wx.DisplaySize()
1293         w = displaySize[0]/1.2
1294         h = displaySize[1]/1.2
1295         frame = IraFrame(None, -1, "IRaMuTeQ " + ConfigGlob.get('DEFAULT', 'version'), size=(w, h))
1296         frame.Show()
1297         frame.finish_init()
1298         frame.Upgrade()
1299         frame.OnOpenFromCmdl()
1300 #        if self.fc.IsRunning():
1301 #            self.Raise()
1302         #wx.CallAfter(frame.ShowTip)
1303         
1304 class MyApp(wx.App):
1305     def OnInit(self):
1306         """
1307         Create and show the splash screen.  It will then create and show
1308         the main frame when it is time to do so.
1309         """
1310         wx.SystemOptions.SetOptionInt("mac.window-plain-transition", 1)
1311         self.SetAppName("Iramuteq")       
1312         splash = MySplashScreen()
1313         splash.Show()
1314         return True
1315
1316 def main():
1317     app = MyApp(False)
1318     app.MainLoop()
1319
1320 if __name__ == '__main__':
1321     __name__ = 'Main'
1322     main()