iramuteq.org Git - iramuteq/blob - 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()