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