Salome HOME
c116df3d2a9ffc08011e9b43ac91914c604930e8
[modules/homard.git] / src / HOMARDGUI / HOMARDGUI.cxx
1 // Copyright (C) 2011-2013  CEA/DEN, EDF R&D
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19
20 //  File   : HOMARDGUI.cxx
21 //  Author : Paul RASCLE, EDF
22 //  Module : HOMARD
23
24 #include "HOMARDGUI.h"
25
26 // SALOME Includes
27 #include "Utils_ORB_INIT.hxx"
28 #include "Utils_SINGLETON.hxx"
29 #include "SALOME_LifeCycleCORBA.hxx"
30
31 #include "SUIT_ResourceMgr.h"
32 #include "SUIT_MessageBox.h"
33 #include "SUIT_Session.h"
34 #include "SUIT_ViewWindow.h"
35 #include "SUIT_ViewManager.h"
36 #include <SUIT_Desktop.h>
37
38 #include "CAM_Module.h"
39 #include "OB_Browser.h"
40
41 #include "SALOME_ListIO.hxx"
42 #include "SALOME_ListIteratorOfListIO.hxx"
43
44 #include "SalomeApp_Application.h"
45 #include "SalomeApp_DataModel.h"
46 #include "SalomeApp_Study.h"
47 #include "LightApp_SelectionMgr.h"
48 #include "LightApp_Selection.h"
49 #include <LightApp_Preferences.h>
50 #include "SalomeApp_Module.h"
51 #include "SALOMEconfig.h"
52 #include <SALOME_LifeCycleCORBA.hxx>
53
54 #include <utilities.h>
55
56
57 // QT Includes
58 #include <QMenu>
59 #include "MonCreateCase.h"
60 #include "MonCreateIteration.h"
61 #include "MonPursueIteration.h"
62 #include "MonCreateYACS.h"
63 #include "MonEditBoundaryAn.h"
64 #include "MonEditBoundaryDi.h"
65 #include "MonEditCase.h"
66 #include "MonEditHypothesis.h"
67 #include "MonEditIteration.h"
68 #include "MonEditYACS.h"
69 #include "MonEditZone.h"
70 #include "MonMeshInfo.h"
71 #include "MonIterInfo.h"
72 #include "MonEditFile.h"
73 #include "HomardQtCommun.h"
74
75 // BOOST Includes
76 #include <boost/shared_ptr.hpp>
77
78 //Pour le _CAST
79 #include "SALOMEDS_Study.hxx"
80 #include "HOMARDGUI_Utils.h"
81
82 using namespace std;
83
84 static CORBA::ORB_var _orb;
85
86 //=======================================================================
87 // function : HOMARDGUI()
88 // purpose  : Constructor
89 //=======================================================================
90 HOMARDGUI::HOMARDGUI(const QString&) :
91            SalomeApp_Module( "HOMARD" ) // default name
92 {
93 }
94
95
96 //=======================================================================
97 // function : ~HOMARDGUI()
98 // purpose  : Destructor
99 //=======================================================================
100 HOMARDGUI::~HOMARDGUI()
101 {
102 }
103
104 //=======================================================================
105 // function : InitHOMARDGen
106 // launch HOMARD component and return a handle
107 //=======================================================================
108 HOMARD::HOMARD_Gen_var HOMARDGUI::InitHOMARDGen(SalomeApp_Application* app)
109 {
110   Engines::EngineComponent_var comp = app->lcc()->FindOrLoad_Component( "FactoryServer","HOMARD" );
111   HOMARD::HOMARD_Gen_var clr = HOMARD::HOMARD_Gen::_narrow(comp);
112   ASSERT(!CORBA::is_nil(clr));
113   return clr;
114 }
115
116 //=======================================================================
117 // Module's initialization
118 void HOMARDGUI::initialize( CAM_Application* app )
119 //=======================================================================
120 {
121   SalomeApp_Module::initialize( app );
122   InitHOMARDGen(dynamic_cast<SalomeApp_Application*>( app ));
123   anId = 0;
124   createActions();
125   createMenus();
126   recupPreferences();
127 }
128
129 //================================================
130 // function : createHOMARDAction
131 // create an item in status bar and Homard menu
132 //================================================
133 void HOMARDGUI::createHOMARDAction( const int id, const QString& po_id, const QString& icon_id, const int key, const bool toggle  )
134 {
135 //   MESSAGE("createHOMARDAction");
136   QIcon icon;
137   QWidget* parent = application()->desktop();
138   SUIT_ResourceMgr* resMgr = application()->resourceMgr();
139   QPixmap pix;
140   if ( icon_id.length() )
141      pix = resMgr->loadPixmap( "HOMARD", tr( icon_id .toLatin1().data()) );
142   else
143      pix = resMgr->loadPixmap( "HOMARD", tr( QString( "ICO_%1" ).arg( po_id ).toLatin1().data()), false );
144   if ( !pix.isNull() )
145       icon = QIcon( pix );
146
147   QString tooltip    = tr(QString( "HOM_TOP_%1" ).arg( po_id ).toLatin1().data()),
148           menu       = tr(QString( "HOM_MEN_%1" ).arg( po_id ).toLatin1().data()),
149           status_bar = tr(QString( "HOM_STB_%1" ).arg( po_id ).toLatin1().data());
150
151   createAction( id, tooltip, icon, menu, status_bar, key, parent, toggle, this, SLOT( OnGUIEvent() )  );
152 }
153
154 //================================================
155 // function : createAction
156 // constructs Homard menu
157 // calls createHOMARDAction for each item
158 //================================================
159 void HOMARDGUI::createActions(){
160 //
161   createHOMARDAction( 1101, "NEW_CASE",         "cas_calcule.png"        );
162   createHOMARDAction( 1102, "PURSUE_ITERATION", "iter_poursuite.png"     );
163   createHOMARDAction( 1103, "NEW_ITERATION",    "iter_next.png"          );
164   createHOMARDAction( 1111, "COMPUTE",          "mesh_compute.png"       );
165   createHOMARDAction( 1112, "COMPUTE_PUBLISH",  "mesh_compute.png"       );
166   createHOMARDAction( 1121, "MESH_INFO",        "advanced_mesh_info.png" );
167   createHOMARDAction( 1131, "MESH_PUBLICATION", "mesh_tree_mesh.png"     );
168 //
169   createHOMARDAction( 1201, "EDIT",             "loop.png"         );
170   createHOMARDAction( 1211, "DELETE",           "delete.png"       );
171 //
172   createHOMARDAction( 1301, "MESH_INFO",        "advanced_mesh_info.png" );
173   createHOMARDAction( 1302, "EDIT_MESS_FILE",   "texte.png"              );
174 //
175   createHOMARDAction( 1401, "YACS",             "table_view.png" );
176 //
177 }
178
179 //================================================
180 // function : createPreferences
181 //================================================
182 void HOMARDGUI::createPreferences()
183 {
184   MESSAGE("createPreferences")
185
186   int Onglet, Bloc, Pref ;
187   // 1. Generalites
188   Onglet = addPreference( tr( "PREF_TAB_GENERAL" ) );
189 //   Onglet = addPreference( tr( "PREF_TAB_SETTINGS" ) ) ;
190
191   Bloc = addPreference( tr( "PREF_PUBLICATION" ), Onglet );
192   setPreferenceProperty( Bloc, "columns", 1 );
193
194   Pref = addPreference( tr( "PREF_PUBLICATION_MAILLAGE_IN" ), Bloc, LightApp_Preferences::Bool, "HOMARD", "publish_mesh_in" );
195
196   Pref = addPreference( tr( "PREF_PUBLICATION_MAILLAGE_OUT" ), Bloc, LightApp_Preferences::Bool, "HOMARD", "publish_mesh_out" );
197
198   // 2. YACS
199   Onglet = addPreference( tr( "PREF_YACS" ) ) ;
200
201   Bloc = addPreference( tr( "PREF_YACS_MAX" ), Onglet );
202   setPreferenceProperty( Bloc, "columns", 1 );
203
204   Pref = addPreference( tr( "PREF_YACS_MAX_ITER" ), Bloc, LightApp_Preferences::IntSpin, "HOMARD", "max_iter" );
205   setPreferenceProperty( Pref, "min",  0 );
206   setPreferenceProperty( Pref, "max",  100000000 );
207   setPreferenceProperty( Pref, "step", 1 );
208
209   Pref = addPreference( tr( "PREF_YACS_MAX_NODE" ), Bloc, LightApp_Preferences::IntSpin, "HOMARD", "max_node" );
210   setPreferenceProperty( Pref, "min",  0 );
211   setPreferenceProperty( Pref, "max",  100000000 );
212   setPreferenceProperty( Pref, "step", 1000 );
213
214   Pref = addPreference( tr( "PREF_YACS_MAX_ELEM" ), Bloc, LightApp_Preferences::IntSpin, "HOMARD", "max_elem" );
215   setPreferenceProperty( Pref, "min",  0 );
216   setPreferenceProperty( Pref, "max",  100000000 );
217   setPreferenceProperty( Pref, "step", 1000 );
218 }
219
220
221 //================================================
222 // function : createMenus
223 //================================================
224 void HOMARDGUI::createMenus()
225 {
226   MESSAGE("createMenus")
227 //
228   int HOMARD_Id  = createMenu( tr( "HOM_MEN_HOMARD" ),  -1,  5, 10 );
229   createMenu( 1101, HOMARD_Id, -1 ); //Create_Case
230   createMenu( 1102, HOMARD_Id, -1 ); //Pursue_Iteration
231   createMenu( separator(), HOMARD_Id,-1);
232   createMenu( 1103, HOMARD_Id, -1 ); //Create_Iteration
233   createMenu( 1111, HOMARD_Id, -1 ); //Compute
234   createMenu( 1112, HOMARD_Id, -1 ); //Compute and publish
235 //
236   HOMARD_Id  = createMenu( tr( "HOM_MEN_MODIFICATION" ),  -1,  5, 10 );
237   createMenu( 1201, HOMARD_Id, -1 ); //Edit
238   createMenu( 1211, HOMARD_Id, -1 ); //Delete
239 //
240   HOMARD_Id  = createMenu( tr( "HOM_MEN_INFORMATION" ),  -1,  5, 10 );
241   createMenu( 1301, HOMARD_Id, -1 ); //Information sur un maillage
242   createMenu( 1131, HOMARD_Id, -1 ); //Mesh publication
243   createMenu( separator(), HOMARD_Id,-1);
244   createMenu( 1302, HOMARD_Id, -1 ); //EditAsciiFile pour le fichier listeStd ou bilan
245   createMenu( separator(), HOMARD_Id,-1);
246   createMenu( 1201, HOMARD_Id, -1 ); //Edit
247   createMenu( separator(), HOMARD_Id,-1);
248 //
249   HOMARD_Id  = createMenu( tr( "HOM_MEN_YACS" ),  -1,  5, 10 );
250   createMenu( 1401, HOMARD_Id, -1 ); // Création d'un schéma YACS
251   createMenu( separator(), HOMARD_Id,-1);
252 }
253
254 //================================================
255 // function : recupPreferences
256 //================================================
257 void HOMARDGUI::recupPreferences()
258 {
259   MESSAGE("recupPreferences")
260 //
261 // . La langue
262   SUIT_ResourceMgr* resMgr = getApp()->resourceMgr();
263   _LanguageShort = resMgr->stringValue("language", "language", "en");
264   MESSAGE("_LanguageShort " << _LanguageShort.toStdString().c_str() );
265 //
266 // . Les publications
267   _publish_mesh_in = resMgr->booleanValue("HOMARD", "publish_mesh_in", false );
268   int pu_m_in = 0 ;
269   if ( _publish_mesh_in ) pu_m_in = 1 ;
270 //
271   _publish_mesh_out = resMgr->booleanValue("HOMARD", "publish_mesh_out", false );
272   int pu_m_out = 0 ;
273   if ( _publish_mesh_out ) pu_m_out = 1 ;
274   MESSAGE("_publish_mesh_in " << _publish_mesh_in << ", _publish_mesh_out " << _publish_mesh_out );
275 //
276 // . Enregistrement dans l'objet general
277   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
278   HOMARD::HOMARD_Gen_var homardGen = HOMARDGUI::InitHOMARDGen(app);
279   homardGen->SetLanguageShort(_LanguageShort.toStdString().c_str());
280   homardGen->SetPublisMesh(pu_m_in, pu_m_out);
281 }
282
283 //================================================
284 void HOMARDGUI::OnGUIEvent()
285 //================================================
286 {
287   MESSAGE("OnGUIEvent()")
288   setOrb();
289   const QObject* obj = sender();
290   if ( !obj || !obj->inherits( "QAction" ) )
291        return;
292   int id = actionId((QAction*)obj);
293   bool ret;
294   if ( id != -1 )
295       ret = OnGUIEvent( id );
296   MESSAGE("************** End of OnGUIEvent()");
297 }
298
299 //=======================================================================
300 // Method OnGUIEvent pour Homard
301 //=======================================================================
302 bool HOMARDGUI::OnGUIEvent (int theCommandID)
303 {
304   MESSAGE("OnGUIEvent avec theCommandID = "<<theCommandID);
305   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
306   if ( !app ) return false;
307
308   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
309   if ( !stud ) {
310     MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
311     return false;
312   }
313
314   SUIT_Desktop* parent = application()->desktop();
315   HOMARD::HOMARD_Gen_var homardGen = HOMARDGUI::InitHOMARDGen(app);
316
317   if (!CORBA::is_nil(homardGen))
318   {
319     // Set current study
320     SalomeApp_Study* aSAStudy =dynamic_cast<SalomeApp_Study*>(app->activeStudy());
321     _PTR(Study) aStudy = aSAStudy->studyDS();
322     SALOMEDS::Study_ptr aStudyDS;
323     if (aStudy)
324       aStudyDS = _CAST(Study,aStudy)->GetStudy();
325       homardGen->SetCurrentStudy(aStudyDS);
326    }
327   getApp()->updateObjectBrowser();
328
329
330   SCRUTE(theCommandID);
331   switch (theCommandID)
332   {
333     case 1101: // Creation d un Cas
334     {
335       MESSAGE("command " << theCommandID << " activated");
336       MonCreateCase *aDlg = new MonCreateCase( true,
337                             HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
338       aDlg->show();
339       break;
340     }
341
342     case 1102: // Poursuite d une iteration
343     {
344       MESSAGE("command " << theCommandID << " activated");
345       MonPursueIteration *aDlg = new MonPursueIteration( true,
346                                 HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
347       aDlg->show();
348       break;
349     }
350
351     case 1103: // Creation d une Iteration
352     {
353       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
354       MonCreateIteration *IterDlg = new MonCreateIteration( parent, true,
355                                      HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
356       IterDlg->show();
357       break;
358     }
359
360     case 1111: // Compute une iteration
361     {
362       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
363       try { homardGen->Compute(_ObjectName.toStdString().c_str(), 0, 1, -1, 1); }
364       catch( SALOME::SALOME_Exception& S_ex )
365       {
366         QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
367                                   QObject::tr(CORBA::string_dup(S_ex.details.text)) );
368         getApp()->updateObjectBrowser();
369         return false;
370       }
371       break;
372     }
373
374     case 1112: // Compute une iteration et publication
375     {
376       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
377       try { homardGen->Compute(_ObjectName.toStdString().c_str(), 0, 1, -1, 2); }
378       catch( SALOME::SALOME_Exception& S_ex )
379       {
380         QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
381                                   QObject::tr(CORBA::string_dup(S_ex.details.text)) );
382         getApp()->updateObjectBrowser();
383         return false;
384       }
385       break;
386     }
387
388     case 1121: // Information sur le maillage de l'iteration
389     {
390       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
391       MonIterInfo *IterDlg = new MonIterInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
392       IterDlg->show();
393       break;
394     }
395
396     case 1131: // Publication du maillage de l'iteration
397     {
398       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
399       homardGen->PublishMeshIterInSmesh(_ObjectName.toStdString().c_str());
400       break;
401     }
402
403     case 1132: // Publication du maillage de l'iteration a partir du fichier
404     {
405       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
406       homardGen->PublishResultInSmesh(_ObjectName.toStdString().c_str(), 1);
407       break;
408     }
409
410     case 1201: // Edition d'un objet
411     {
412       MESSAGE("command " << theCommandID << " activated");
413       QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
414       if (nomObjet == QString("")) break;
415       _PTR(SObject) obj = chercheMonObjet();
416       if (obj)
417       {
418         // Edition d'une frontiere discrete
419         if (HOMARD_UTILS::isBoundaryDi(obj))
420         {
421           MonEditBoundaryDi *aDlg = new MonEditBoundaryDi(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
422           aDlg->show();
423         }
424         // Edition d'une frontiere analytique
425         else if (HOMARD_UTILS::isBoundaryAn(obj))
426         {
427           MonEditBoundaryAn *aDlg = new MonEditBoundaryAn(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
428           aDlg->show();
429         }
430         // Edition d'un cas
431         else if (HOMARD_UTILS::isCase(obj))
432         {
433           MonEditCase *aDlg = new MonEditCase(true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
434           aDlg->show();
435         }
436         // Edition d'une hypothese
437         else if (HOMARD_UTILS::isHypo(obj))
438         {
439           MonEditHypothesis *aDlg = new MonEditHypothesis(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen),  _ObjectName, QString(""), QString("")) ;
440           aDlg->show();
441         }
442         // Edition d'une iteration
443         else if (HOMARD_UTILS::isIter(obj))
444         {
445           MonEditIteration *aDlg = new MonEditIteration(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
446           aDlg->show();
447         }
448         // Edition d'un schema YACS
449         else if (HOMARD_UTILS::isYACS(obj))
450         {
451           MESSAGE("appel de MonEditYACS");
452           MonEditYACS *aDlg = new MonEditYACS(true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName) ;
453           aDlg->show();
454         }
455         // Edition d'une zone
456         else if (HOMARD_UTILS::isZone(obj))
457         {
458           MonEditZone *aDlg = new MonEditZone(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
459           aDlg->show();
460         }
461       }
462       break;
463     }
464
465     case 1211: // Suppression d'un objet
466     {
467       MESSAGE("command " << theCommandID << " activated");
468       QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
469       if (nomObjet == QString("")) break;
470       _PTR(SObject) obj = chercheMonObjet();
471       if (obj)
472       {
473         // Suppression d'une frontiere
474         if ( HOMARD_UTILS::isBoundaryDi(obj) || HOMARD_UTILS::isBoundaryAn(obj) )
475         {
476           try
477           { homardGen->DeleteBoundary(_ObjectName.toStdString().c_str()); }
478           catch( SALOME::SALOME_Exception& S_ex )
479           {
480             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
481                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
482             getApp()->updateObjectBrowser();
483             return false;
484           }
485         }
486         // Suppression d'un cas
487         else if (HOMARD_UTILS::isCase(obj))
488         {
489           try
490           { homardGen->DeleteCase(_ObjectName.toStdString().c_str(), 1); }
491           catch( SALOME::SALOME_Exception& S_ex )
492           {
493             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
494                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
495             getApp()->updateObjectBrowser();
496             return false;
497           }
498         }
499         // Suppression d'une hypothese
500         else if (HOMARD_UTILS::isHypo(obj))
501         {
502           try
503           { homardGen->DeleteHypo(_ObjectName.toStdString().c_str()); }
504           catch( SALOME::SALOME_Exception& S_ex )
505           {
506             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
507                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
508             getApp()->updateObjectBrowser();
509             return false;
510           }
511         }
512         // Suppression d'une iteration
513         else if (HOMARD_UTILS::isIter(obj))
514         {
515           try
516           { homardGen->DeleteIteration(_ObjectName.toStdString().c_str(), 1); }
517           catch( SALOME::SALOME_Exception& S_ex )
518           {
519             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
520                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
521             getApp()->updateObjectBrowser();
522             return false;
523           }
524         }
525         // Suppression d'un schema YACS
526         else if (HOMARD_UTILS::isYACS(obj))
527         {
528           try
529           { homardGen->DeleteYACS(_ObjectName.toStdString().c_str(), 1); }
530           catch( SALOME::SALOME_Exception& S_ex )
531           {
532             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
533                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
534             getApp()->updateObjectBrowser();
535             return false;
536           }
537         }
538         // Suppression d'une zone
539         else if (HOMARD_UTILS::isZone(obj))
540         {
541           try
542           { homardGen->DeleteZone(_ObjectName.toStdString().c_str()); }
543           catch( SALOME::SALOME_Exception& S_ex )
544           {
545             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
546                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
547             getApp()->updateObjectBrowser();
548             return false;
549           }
550         }
551       }
552       break;
553     }
554
555     case 1301: // Information sur un maillage
556     {
557       MESSAGE("etape 1301")
558       MESSAGE("command " << theCommandID << " activated");
559       MonMeshInfo *aDlg = new MonMeshInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
560       aDlg->show();
561       break;
562     }
563
564     case 1302: // Affichage de fichier texte
565     {
566       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
567       _PTR(SObject) obj = chercheMonObjet();
568       if ( (obj) && ( HOMARD_UTILS::isFileType(obj,QString("log")) || HOMARD_UTILS::isFileType(obj,QString("Summary")) || HOMARD_UTILS::isFileType(obj,QString("xml")) ) )
569       {
570           MonEditFile *aDlg = new MonEditFile( 0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName, 0 ) ;
571           if ( aDlg->_codret == 0 ) { aDlg->show(); }
572       }
573       break;
574     }
575
576     case 1401: // Création d'un schema YACS
577     {
578       MESSAGE("etape 1401")
579       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
580       MonCreateYACS *aDlg = new MonCreateYACS( true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
581       aDlg->show();
582       break;
583     }
584
585     case 1402: // Ecriture d'un schéma YACS
586     {
587       MESSAGE("etape 1402")
588       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
589       try { homardGen->YACSWrite(_ObjectName.toStdString().c_str()); }
590       catch( SALOME::SALOME_Exception& S_ex )
591       {
592         QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
593                                   QObject::tr(CORBA::string_dup(S_ex.details.text)) );
594         getApp()->updateObjectBrowser();
595         return false;
596       }
597       break;
598     }
599
600   }
601   getApp()->updateObjectBrowser();
602   return true;
603 }
604
605 //=============================================================================
606 /*!
607  *
608  */
609 //=============================================================================
610
611 // Module's engine IOR
612 //=============================================================================
613 QString HOMARDGUI::engineIOR() const
614 //=============================================================================
615 {
616   CORBA::String_var anIOR = getApp()->orb()->object_to_string( InitHOMARDGen(getApp()) );
617   return QString( anIOR.in() );
618 }
619
620 // Module's activation
621 //=============================================================================
622 bool HOMARDGUI::activateModule( SUIT_Study* theStudy )
623 //=============================================================================
624 {
625   bool bOk = SalomeApp_Module::activateModule( theStudy );
626
627   setMenuShown( true );
628   setToolShown( true );
629
630   return bOk;
631 }
632
633 // Module's deactivation
634 //=============================================================================
635 bool HOMARDGUI::deactivateModule( SUIT_Study* theStudy )
636 //=============================================================================
637 {
638   setMenuShown( false );
639   setToolShown( false );
640
641   return SalomeApp_Module::deactivateModule( theStudy );
642 }
643
644 // Default windows
645 //=============================================================================
646 void HOMARDGUI::windows( QMap<int, int>& theMap ) const
647 //=============================================================================
648 {
649   theMap.clear();
650   theMap.insert( SalomeApp_Application::WT_ObjectBrowser, Qt::LeftDockWidgetArea );
651   theMap.insert( SalomeApp_Application::WT_PyConsole,     Qt::BottomDockWidgetArea );
652 }
653
654 //=============================================================================
655 void HOMARDGUI::setOrb()
656 //=============================================================================
657 {
658   try
659   {
660      ORB_INIT &init = *SINGLETON_<ORB_INIT>::Instance();
661      ASSERT(SINGLETON_<ORB_INIT>::IsAlreadyExisting());
662      _orb = init( 0 , 0 );
663   }
664   catch (...)
665   {
666      INFOS("internal error : orb not found");
667      _orb = 0;
668   }
669             ASSERT(! CORBA::is_nil(_orb));
670 }
671 //========================================
672 _PTR(SObject) HOMARDGUI::chercheMonObjet()
673 //========================================
674 {
675   SALOMEDSClient_SObject* aSO = NULL;
676   _PTR(SObject) obj;
677   SALOME_ListIO lst;
678   getApp()->selectionMgr()->selectedObjects( lst );
679   if (  lst.Extent() == 1 )
680   {
681     Handle(SALOME_InteractiveObject) io = lst.First();
682     SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( application()->activeStudy() );
683     _PTR(Study) study = appStudy->studyDS();
684     _PTR(SObject) obj = study->FindObjectID( io->getEntry() );
685     _ObjectName = QString( obj->GetName().c_str() );
686     return obj;
687   }
688   else { return _PTR(SObject)(aSO); }
689 }
690 //=============================================================================
691 void HOMARDGUI::contextMenuPopup( const QString& client, QMenu* menu, QString& title )
692 //=============================================================================
693 {
694   MESSAGE("Debut de contextMenuPopup");
695   _PTR(SObject) obj = chercheMonObjet();
696   if ( obj )
697   {
698     title = QString( obj->GetName().c_str() );
699     _ObjectName = title;
700     SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
701 //
702     QPixmap pix ;
703     bool DeleteObject = false ;
704     bool EditObject = false ;
705 //
706     if ( HOMARD_UTILS::isBoundaryAn(obj) )
707     {
708       EditObject = true ;
709       DeleteObject = true ;
710     }
711     else if ( HOMARD_UTILS::isBoundaryDi(obj) )
712     {
713       EditObject = true ;
714       DeleteObject = true ;
715     }
716     else if ( HOMARD_UTILS::isCase(obj) )
717     {
718       pix = resMgr->loadPixmap( "HOMARD", "table_view.png" );
719       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_YACS").toLatin1().data()), this, SLOT(YACSCreate()));
720       EditObject = true ;
721       DeleteObject = true ;
722     }
723     else if ( HOMARD_UTILS::isHypo(obj) )
724     {
725       EditObject = true ;
726       DeleteObject = true ;
727     }
728     else if ( HOMARD_UTILS::isIter(obj) )
729     {
730       pix = resMgr->loadPixmap( "HOMARD", "iter_next.png" );
731       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_NEW_ITERATION").toLatin1().data()), this, SLOT(NextIter()));
732       pix = resMgr->loadPixmap( "HOMARD", "mesh_compute.png" );
733       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_COMPUTE").toLatin1().data()), this, SLOT(LanceCalcul0()));
734       pix = resMgr->loadPixmap( "HOMARD", "mesh_compute.png" );
735       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_COMPUTE_PUBLISH").toLatin1().data()), this, SLOT(LanceCalcul1()));
736       pix = resMgr->loadPixmap( "HOMARD", "advanced_mesh_info.png" );
737       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_MESH_INFO").toLatin1().data()), this, SLOT(IterInfo()));
738       pix = resMgr->loadPixmap( "HOMARD", "mesh_tree_mesh.png" );
739       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_MESH_PUBLICATION").toLatin1().data()), this, SLOT(MeshPublish0()));
740       EditObject = true ;
741       DeleteObject = true ;
742     }
743     else if ( HOMARD_UTILS::isYACS(obj) )
744     {
745       pix = resMgr->loadPixmap( "HOMARD", "write.png" );
746       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_WRITE").toLatin1().data()), this, SLOT(YACSWrite()));
747       EditObject = true ;
748       DeleteObject = true ;
749     }
750     else if ( HOMARD_UTILS::isZone(obj) )
751     {
752       EditObject = true ;
753       DeleteObject = true ;
754     }
755     else if ( HOMARD_UTILS::isFileType(obj,QString("log")) || HOMARD_UTILS::isFileType(obj,QString("Summary")) || HOMARD_UTILS::isFileType(obj,QString("xml")) )
756     {
757       pix = resMgr->loadPixmap( "HOMARD", "texte.png" );
758       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT_MESS_FILE").toLatin1().data()), this, SLOT(EditAsciiFile()));
759     }
760     else if ( HOMARD_UTILS::isFileType(obj,QString("Mesh")) )
761     {
762       pix = resMgr->loadPixmap( "HOMARD", "mesh_tree_mesh.png" );
763       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_MESH_PUBLICATION").toLatin1().data()), this, SLOT(MeshPublish1()));
764     }
765 //  Ajout d'un menu d'edition pour les objets qui le proposent
766     if ( EditObject )
767     {
768       pix = resMgr->loadPixmap( "HOMARD", "loop.png" );
769       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT").toLatin1().data()), this, SLOT(Edit()));
770     }
771 //  Ajout d'un menu de destruction pour les objets qui le proposent
772     if ( DeleteObject )
773     {
774       pix = resMgr->loadPixmap( "HOMARD", "delete.png" );
775       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_DELETE").toLatin1().data()), this, SLOT(Delete()));
776     }
777   }
778 }
779
780 void HOMARDGUI::NextIter()
781 {
782   this->OnGUIEvent(1103);
783 }
784
785 void HOMARDGUI::LanceCalcul0()
786 {
787   this->OnGUIEvent(1111);
788 }
789
790 void HOMARDGUI::LanceCalcul1()
791 {
792   this->OnGUIEvent(1112);
793 }
794
795 void HOMARDGUI::IterInfo()
796 {
797   this->OnGUIEvent(1121);
798 }
799
800 void HOMARDGUI::MeshPublish0()
801 {
802   this->OnGUIEvent(1131);
803 }
804
805 void HOMARDGUI::MeshPublish1()
806 {
807   this->OnGUIEvent(1132);
808 }
809
810 void HOMARDGUI::Edit()
811 {
812   this->OnGUIEvent(1201);
813 }
814
815 void HOMARDGUI::Delete()
816 {
817   this->OnGUIEvent(1211);
818 }
819
820 void HOMARDGUI::EditAsciiFile()
821 {
822   this->OnGUIEvent(1302);
823 }
824
825 void HOMARDGUI::YACSCreate()
826 {
827   this->OnGUIEvent(1401);
828 }
829 void HOMARDGUI::YACSWrite()
830 {
831   this->OnGUIEvent(1402);
832 }
833
834
835 //
836 //=============================================================================
837 // Export the module
838 //=============================================================================
839 extern "C" {
840   Standard_EXPORT CAM_Module* createModule()
841   {
842     return new HOMARDGUI("");
843   }
844 }
845