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