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