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