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