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