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