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