src/HOMARDGUI/HOMARDGUI.cxx

   1 // Copyright (C) 2011-2022  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, or (at your option) any later version.
   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 : Gerald NICOLAS, EDF
  22 //  Module : HOMARD
  23
  24 #include "HOMARDGUI.h"
  25
  26 // SALOME Includes
  27 #include "OpUtil.hxx"
  28 #include "SALOME_LifeCycleCORBA.hxx"
  29
  30 #include "SUIT_ResourceMgr.h"
  31 #include "SUIT_MessageBox.h"
  32 #include "SUIT_Session.h"
  33 #include "SUIT_ViewWindow.h"
  34 #include "SUIT_ViewManager.h"
  35 #include <SUIT_Desktop.h>
  36
  37 #include "CAM_Module.h"
  38 #include "OB_Browser.h"
  39
  40 #include "SALOME_ListIO.hxx"
  41
  42 #include "SalomeApp_Application.h"
  43 #include "SalomeApp_DataModel.h"
  44 #include "SalomeApp_Study.h"
  45 #include "LightApp_SelectionMgr.h"
  46 #include "LightApp_Selection.h"
  47 #include <LightApp_Preferences.h>
  48 #include "SalomeApp_Module.h"
  49 #include "SALOMEconfig.h"
  50 #include <SALOME_LifeCycleCORBA.hxx>
  51 #include <SALOME_NamingService_Abstract.hxx>
  52 #include <SALOME_KernelServices.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 "MonEditBoundaryCAO.h"
  64 #include "MonEditBoundaryAn.h"
  65 #include "MonEditBoundaryDi.h"
  66 #include "MonEditCase.h"
  67 #include "MonEditHypothesis.h"
  68 #include "MonEditIteration.h"
  69 #include "MonEditYACS.h"
  70 #include "MonEditZone.h"
  71 #include "MonMeshInfo.h"
  72 #include "MonIterInfo.h"
  73 #include "MonEditFile.h"
  74 #include "HomardQtCommun.h"
  75
  76 // BOOST Includes
  77 #include <boost/shared_ptr.hpp>
  78
  79 //Pour le _CAST
  80 #include "SALOMEDS_Study.hxx"
  81 #include "HOMARDGUI_Utils.h"
  82
  83 using namespace std;
  84
  85 static CORBA::ORB_var _orb;
  86
  87 //=======================================================================
  88 // function : HOMARDGUI()
  89 // purpose  : Constructor
  90 //=======================================================================
  91 HOMARDGUI::HOMARDGUI(const QString&) :
  92            SalomeApp_Module( "HOMARD" ) // default name
  93 {
  94 }
  95 //=======================================================================
  96 // function : ~HOMARDGUI()
  97 // purpose  : Destructor
  98 //=======================================================================
  99 HOMARDGUI::~HOMARDGUI()
 100 {
 101 }
 102
 103 //=======================================================================
 104 // function : InitHOMARDGen
 105 // launch HOMARD component and return a handle
 106 //=======================================================================
 107 HOMARD::HOMARD_Gen_var HOMARDGUI::InitHOMARDGen(SalomeApp_Application* app)
 108 {
 109   Engines::EngineComponent_var comp;
 110   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", "yacs_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", "yacs_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", "yacs_max_elem" );
 215   setPreferenceProperty( Pref, "min",  0 );
 216   setPreferenceProperty( Pref, "max",  100000000 );
 217   setPreferenceProperty( Pref, "step", 1000 );
 218
 219   Bloc = addPreference( tr( "PREF_YACS_CONVERGENCE" ), Onglet );
 220   setPreferenceProperty( Bloc, "columns", 1 );
 221
 222   Pref = addPreference( tr( "PREF_YACS_TYPE_TEST" ), Bloc, LightApp_Preferences::Selector, "HOMARD", "yacs_type_test" );
 223   QStringList aListOfTypeTest;
 224   aListOfTypeTest << "None";
 225   aListOfTypeTest << "VTest > VRef";
 226   aListOfTypeTest << "VTest < VRef";
 227   setPreferenceProperty( Pref, "strings", aListOfTypeTest );
 228 }
 229
 230
 231 //================================================
 232 // function : createMenus
 233 //================================================
 234 void HOMARDGUI::createMenus()
 235 {
 236   MESSAGE("createMenus")
 237 //
 238   int HOMARD_Id  = createMenu( tr( "HOM_MEN_HOMARD" ),  -1,  5, 10 );
 239   createMenu( 1101, HOMARD_Id, -1 ); //Create_Case
 240   createMenu( 1102, HOMARD_Id, -1 ); //Pursue_Iteration
 241   createMenu( separator(), HOMARD_Id,-1);
 242   createMenu( 1103, HOMARD_Id, -1 ); //Create_Iteration
 243   createMenu( 1111, HOMARD_Id, -1 ); //Compute
 244   createMenu( 1112, HOMARD_Id, -1 ); //Compute and publish
 245 //
 246   HOMARD_Id  = createMenu( tr( "HOM_MEN_MODIFICATION" ),  -1,  5, 10 );
 247   createMenu( 1201, HOMARD_Id, -1 ); //Edit
 248   createMenu( 1211, HOMARD_Id, -1 ); //Delete
 249 //
 250   HOMARD_Id  = createMenu( tr( "HOM_MEN_INFORMATION" ),  -1,  5, 10 );
 251   createMenu( 1301, HOMARD_Id, -1 ); //Information sur un maillage
 252   createMenu( 1131, HOMARD_Id, -1 ); //Mesh publication
 253   createMenu( separator(), HOMARD_Id,-1);
 254   createMenu( 1302, HOMARD_Id, -1 ); //EditAsciiFile pour le fichier listeStd ou bilan
 255   createMenu( separator(), HOMARD_Id,-1);
 256   createMenu( 1201, HOMARD_Id, -1 ); //Edit
 257   createMenu( separator(), HOMARD_Id,-1);
 258 //
 259   HOMARD_Id  = createMenu( tr( "HOM_MEN_YACS" ),  -1,  5, 10 );
 260   createMenu( 1401, HOMARD_Id, -1 ); // Création d'un schéma YACS
 261   createMenu( separator(), HOMARD_Id,-1);
 262 }
 263
 264 //================================================
 265 // function : recupPreferences
 266 // Pour chaque valeur, le defaut est la valeur definie dans HOMARD_Gen
 267 // . Si la recuperation dans config/salome s'est bien passee a la creation de HOMARD_Gen,
 268 //   ces valeurs sont les valeurs definies.
 269 // . Si cela ne s'est pas bien passe, ce sont les valeurs par defaut de HOMARD_Gen
 270 //================================================
 271 void HOMARDGUI::recupPreferences()
 272 {
 273   INFOS("recupPreferences")
 274 //
 275 // A. Declarations
 276 //
 277   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
 278   HOMARD::HOMARD_Gen_var homardGen = HOMARDGUI::InitHOMARDGen(app);
 279   int defaut_i ;
 280   std::string defaut_s ;
 281   QString QString_v ;
 282 //
 283 // B. Les valeurs
 284 // B.1. La langue
 285 //
 286   SUIT_ResourceMgr* resMgr0 = getApp()->resourceMgr();
 287   QString lang = resMgr0->stringValue( resMgr0->langSection(), "language", "en" );
 288   INFOS ("Récupération de lang = " << lang.toStdString().c_str() );
 289   defaut_s = homardGen->GetLanguageShort();
 290   INFOS ("Récupération de defaut_s = " << defaut_s.c_str() );
 291   SUIT_ResourceMgr* resMgr = getApp()->resourceMgr();
 292   _LanguageShort = resMgr->stringValue("language", "language", QString(defaut_s.c_str()) );
 293   INFOS ("Récupération de LanguageShort = " << _LanguageShort.toStdString().c_str() );
 294 //
 295 // B.2. Les publications
 296   bool publish_mesh ;
 297 //
 298   _PublisMeshIN = homardGen->GetPublisMeshIN();
 299   if ( _PublisMeshIN == 1 ) { publish_mesh = true ;  }
 300   else                      { publish_mesh = false ; }
 301   publish_mesh = resMgr->booleanValue("HOMARD", "publish_mesh_in", publish_mesh );
 302   if ( publish_mesh ) { _PublisMeshIN = 1 ; }
 303   else                { _PublisMeshIN = 0 ; }
 304 //
 305   _PublisMeshOUT = homardGen->GetPublisMeshOUT();
 306   if ( _PublisMeshOUT == 1 ) { publish_mesh = true ;  }
 307   else                       { publish_mesh = false ; }
 308   publish_mesh = resMgr->booleanValue("HOMARD", "publish_mesh_out", publish_mesh );
 309   if ( publish_mesh ) { _PublisMeshOUT = 1 ; }
 310   else                { _PublisMeshOUT = 0 ; }
 311 //
 312 // B.3. Les maximum pour YACS
 313 //
 314   defaut_i = homardGen->GetYACSMaxIter();
 315   _YACSMaxIter = resMgr->integerValue("HOMARD", "yacs_max_iter", defaut_i );
 316 //
 317   defaut_i = homardGen->GetYACSMaxNode();
 318   _YACSMaxNode = resMgr->integerValue("HOMARD", "yacs_max_node", defaut_i );
 319 //
 320   defaut_i = homardGen->GetYACSMaxElem();
 321   _YACSMaxElem = resMgr->integerValue("HOMARD", "yacs_max_elem", defaut_i );
 322 //
 323 // B.4. La convergence pour YACS
 324 //
 325   defaut_i = homardGen->GetYACSConvergenceType();
 326   if ( defaut_i == 1 )      { QString_v = tr("VTest > VRef") ; }
 327   else if ( defaut_i == 2 ) { QString_v = tr("VTest < VRef") ; }
 328   else                      { QString_v = tr("None") ; }
 329   QString_v = resMgr->stringValue ( "HOMARD", "yacs_type_test", QString_v );
 330   if ( ( QString_v == "VTest > VRef" ) || ( QString_v == "VTest &gt; VRef" ) )      { _YACSTypeTest = 1 ; }
 331   else if ( ( QString_v == "VTest < VRef" ) || ( QString_v == "VTest &lt; VRef" ) ) { _YACSTypeTest = 2 ; }
 332   else                                                                              { _YACSTypeTest = 0 ; }
 333 //
 334 // C. Enregistrement dans l'objet general
 335 //
 336   INFOS ("Enregistrement de LanguageShort = " << _LanguageShort.toStdString().c_str() );
 337   INFOS ("Enregistrement de PublisMeshIN = " << _PublisMeshIN<<", PublisMeshOUT = "<< _PublisMeshOUT);
 338   INFOS ("Enregistrement de YACSMaxIter = " << _YACSMaxIter<<", YACSMaxNode = "<< _YACSMaxNode<<", YACSMaxElem = "<< _YACSMaxElem);
 339   INFOS ("Enregistrement de YACSTypeTest = " << _YACSTypeTest);
 340 //
 341   homardGen->SetLanguageShort(_LanguageShort.toStdString().c_str());
 342   homardGen->SetPublisMesh(_PublisMeshIN, _PublisMeshOUT);
 343   homardGen->SetYACSMaximum(_YACSMaxIter, _YACSMaxNode, _YACSMaxElem);
 344 //
 345   homardGen->SetYACSConvergenceType(_YACSTypeTest);
 346 }
 347
 348 //================================================
 349 void HOMARDGUI::OnGUIEvent()
 350 //================================================
 351 {
 352   MESSAGE("OnGUIEvent()")
 353   setOrb();
 354   const QObject* obj = sender();
 355   if ( !obj || !obj->inherits( "QAction" ) ) { return; }
 356   int id = actionId((QAction*)obj);
 357   if ( id != -1 ) { bool ret = OnGUIEvent( id ); }
 358   MESSAGE("Fin de OnGUIEvent()");
 359 }
 360
 361 //=======================================================================
 362 // Method OnGUIEvent pour Homard
 363 //=======================================================================
 364 bool HOMARDGUI::OnGUIEvent (int theCommandID)
 365 {
 366   MESSAGE("OnGUIEvent avec theCommandID = "<<theCommandID);
 367 // A. Controles
 368   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
 369   if ( !app ) return false;
 370
 371   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
 372   if ( !stud )
 373   {
 374     MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
 375     return false;
 376   }
 377
 378   SUIT_Desktop* parent = application()->desktop();
 379
 380   HOMARD::HOMARD_Gen_var homardGen = HOMARDGUI::InitHOMARDGen(app);
 381
 382   if (!CORBA::is_nil(homardGen))
 383     homardGen->UpdateStudy();
 384
 385   getApp()->updateObjectBrowser();
 386
 387 // B. Choix selon les commandes
 388   SCRUTE(theCommandID);
 389   switch (theCommandID)
 390   {
 391     case 1101: // Creation d un Cas
 392     {
 393       MESSAGE("command " << theCommandID << " activated");
 394       MonCreateCase *aDlg = new MonCreateCase( true,
 395                             HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
 396       aDlg->show();
 397       break;
 398     }
 399
 400     case 1102: // Poursuite d une iteration
 401     {
 402       MESSAGE("command " << theCommandID << " activated");
 403       MonPursueIteration *aDlg = new MonPursueIteration( true,
 404                                 HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
 405       aDlg->show();
 406       break;
 407     }
 408
 409     case 1103: // Creation d une Iteration
 410     {
 411       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 412       MonCreateIteration *IterDlg = new MonCreateIteration( parent, true,
 413                                      HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
 414       IterDlg->show();
 415       break;
 416     }
 417
 418     case 1111: // Compute une iteration
 419     {
 420       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 421       try { homardGen->Compute(_ObjectName.toStdString().c_str(), 0, 1, -1, 1); }
 422       catch( SALOME::SALOME_Exception& S_ex )
 423       {
 424         QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 425                                   QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 426         getApp()->updateObjectBrowser();
 427         return false;
 428       }
 429       break;
 430     }
 431
 432     case 1112: // Compute une iteration et publication
 433     {
 434       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 435       try { homardGen->Compute(_ObjectName.toStdString().c_str(), 0, 1, -1, 2); }
 436       catch( SALOME::SALOME_Exception& S_ex )
 437       {
 438         QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 439                                   QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 440         getApp()->updateObjectBrowser();
 441         return false;
 442       }
 443       break;
 444     }
 445
 446     case 1121: // Information sur le maillage de l'iteration
 447     {
 448       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 449       MonIterInfo *IterDlg = new MonIterInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
 450       IterDlg->show();
 451       break;
 452     }
 453
 454     case 1131: // Publication du maillage de l'iteration
 455     {
 456       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 457       homardGen->PublishMeshIterInSmesh(_ObjectName.toStdString().c_str());
 458       break;
 459     }
 460
 461     case 1132: // Publication du maillage de l'iteration a partir du fichier
 462     {
 463       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 464       homardGen->PublishResultInSmesh(_ObjectName.toStdString().c_str(), 1);
 465       break;
 466     }
 467
 468     case 1201: // Edition d'un objet
 469     {
 470       MESSAGE("command " << theCommandID << " activated");
 471       QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
 472       if (nomObjet == QString("")) break;
 473       _PTR(SObject) obj = chercheMonObjet();
 474       if (obj)
 475       {
 476         // Edition d'une frontiere CAO
 477         if (HOMARD_UTILS::isBoundaryCAO(obj))
 478         {
 479           MonEditBoundaryCAO *aDlg = new MonEditBoundaryCAO(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
 480           aDlg->show();
 481         }
 482         // Edition d'une frontiere discrete
 483         else if (HOMARD_UTILS::isBoundaryDi(obj))
 484         {
 485           MonEditBoundaryDi *aDlg = new MonEditBoundaryDi(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
 486           aDlg->show();
 487         }
 488         // Edition d'une frontiere analytique
 489         else if (HOMARD_UTILS::isBoundaryAn(obj))
 490         {
 491           MonEditBoundaryAn *aDlg = new MonEditBoundaryAn(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
 492           aDlg->show();
 493         }
 494         // Edition d'un cas
 495         else if (HOMARD_UTILS::isCase(obj))
 496         {
 497           MonEditCase *aDlg = new MonEditCase(true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
 498           aDlg->show();
 499         }
 500         // Edition d'une hypothese
 501         else if (HOMARD_UTILS::isHypo(obj))
 502         {
 503           MonEditHypothesis *aDlg = new MonEditHypothesis(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen),  _ObjectName, QString(""), QString("")) ;
 504           aDlg->show();
 505         }
 506         // Edition d'une iteration
 507         else if (HOMARD_UTILS::isIter(obj))
 508         {
 509           MonEditIteration *aDlg = new MonEditIteration(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
 510           aDlg->show();
 511         }
 512         // Edition d'un schema YACS
 513         else if (HOMARD_UTILS::isYACS(obj))
 514         {
 515           MESSAGE("appel de MonEditYACS");
 516           MonEditYACS *aDlg = new MonEditYACS(true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName) ;
 517           aDlg->show();
 518         }
 519         // Edition d'une zone
 520         else if (HOMARD_UTILS::isZone(obj))
 521         {
 522           MonEditZone *aDlg = new MonEditZone(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
 523           aDlg->show();
 524         }
 525       }
 526       break;
 527     }
 528
 529     case 1211: // Suppression d'un objet
 530     {
 531       MESSAGE("command " << theCommandID << " activated");
 532       QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
 533       if (nomObjet == QString("")) break;
 534       _PTR(SObject) obj = chercheMonObjet();
 535       if (obj)
 536       {
 537         // Suppression d'une frontiere
 538         if ( HOMARD_UTILS::isBoundaryCAO(obj) || HOMARD_UTILS::isBoundaryDi(obj) || HOMARD_UTILS::isBoundaryAn(obj) )
 539         {
 540           try
 541           { homardGen->DeleteBoundary(_ObjectName.toStdString().c_str()); }
 542           catch( SALOME::SALOME_Exception& S_ex )
 543           {
 544             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 545                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 546             getApp()->updateObjectBrowser();
 547             return false;
 548           }
 549         }
 550         // Suppression d'un cas
 551         else if (HOMARD_UTILS::isCase(obj))
 552         {
 553           try
 554           { homardGen->DeleteCase(_ObjectName.toStdString().c_str(), 1); }
 555           catch( SALOME::SALOME_Exception& S_ex )
 556           {
 557             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 558                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 559             getApp()->updateObjectBrowser();
 560             return false;
 561           }
 562         }
 563         // Suppression d'une hypothese
 564         else if (HOMARD_UTILS::isHypo(obj))
 565         {
 566           try
 567           { homardGen->DeleteHypo(_ObjectName.toStdString().c_str()); }
 568           catch( SALOME::SALOME_Exception& S_ex )
 569           {
 570             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 571                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 572             getApp()->updateObjectBrowser();
 573             return false;
 574           }
 575         }
 576         // Suppression d'une iteration
 577         else if (HOMARD_UTILS::isIter(obj))
 578         {
 579           try
 580           { homardGen->DeleteIteration(_ObjectName.toStdString().c_str(), 1); }
 581           catch( SALOME::SALOME_Exception& S_ex )
 582           {
 583             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 584                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 585             getApp()->updateObjectBrowser();
 586             return false;
 587           }
 588         }
 589         // Suppression d'un schema YACS
 590         else if (HOMARD_UTILS::isYACS(obj))
 591         {
 592           try
 593           { homardGen->DeleteYACS(_ObjectName.toStdString().c_str(), 1); }
 594           catch( SALOME::SALOME_Exception& S_ex )
 595           {
 596             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 597                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 598             getApp()->updateObjectBrowser();
 599             return false;
 600           }
 601         }
 602         // Suppression d'une zone
 603         else if (HOMARD_UTILS::isZone(obj))
 604         {
 605           try
 606           { homardGen->DeleteZone(_ObjectName.toStdString().c_str()); }
 607           catch( SALOME::SALOME_Exception& S_ex )
 608           {
 609             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 610                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 611             getApp()->updateObjectBrowser();
 612             return false;
 613           }
 614         }
 615       }
 616       break;
 617     }
 618
 619     case 1301: // Information sur un maillage
 620     {
 621       MESSAGE("etape 1301")
 622       MESSAGE("command " << theCommandID << " activated");
 623       MonMeshInfo *aDlg = new MonMeshInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
 624       aDlg->show();
 625       break;
 626     }
 627
 628     case 1302: // Affichage de fichier texte
 629     {
 630       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 631       _PTR(SObject) obj = chercheMonObjet();
 632       if ( (obj) && ( HOMARD_UTILS::isFileType(obj,QString("log")) || HOMARD_UTILS::isFileType(obj,QString("Summary")) || HOMARD_UTILS::isFileType(obj,QString("xml")) ) )
 633       {
 634           MonEditFile *aDlg = new MonEditFile( 0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName, 0 ) ;
 635           if ( aDlg->_codret == 0 ) { aDlg->show(); }
 636       }
 637       break;
 638     }
 639
 640     case 1401: // Création d'un schema YACS
 641     {
 642       MESSAGE("etape 1401")
 643       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 644       MonCreateYACS *aDlg = new MonCreateYACS( true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
 645       aDlg->show();
 646       break;
 647     }
 648
 649     case 1402: // Ecriture d'un schéma YACS
 650     {
 651       MESSAGE("etape 1402")
 652       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
 653       try { homardGen->YACSWrite(_ObjectName.toStdString().c_str()); }
 654       catch( SALOME::SALOME_Exception& S_ex )
 655       {
 656         QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 657                                   QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 658         getApp()->updateObjectBrowser();
 659         return false;
 660       }
 661       break;
 662     }
 663
 664   }
 665   getApp()->updateObjectBrowser();
 666   return true;
 667 }
 668
 669 //=============================================================================
 670 /*!
 671  *
 672  */
 673 //=============================================================================
 674
 675 // Module's engine IOR
 676 //=============================================================================
 677 QString HOMARDGUI::engineIOR() const
 678 //=============================================================================
 679 {
 680   CORBA::String_var anIOR = getApp()->orb()->object_to_string( InitHOMARDGen(getApp()) );
 681   return QString( anIOR.in() );
 682 }
 683
 684 // Module's activation
 685 //=============================================================================
 686 bool HOMARDGUI::activateModule( SUIT_Study* theStudy )
 687 //=============================================================================
 688 {
 689   bool bOk = SalomeApp_Module::activateModule( theStudy );
 690
 691   setMenuShown( true );
 692   setToolShown( true );
 693
 694   return bOk;
 695 }
 696
 697 // Module's deactivation
 698 //=============================================================================
 699 bool HOMARDGUI::deactivateModule( SUIT_Study* theStudy )
 700 //=============================================================================
 701 {
 702   setMenuShown( false );
 703   setToolShown( false );
 704
 705   return SalomeApp_Module::deactivateModule( theStudy );
 706 }
 707
 708 // Default windows
 709 //=============================================================================
 710 void HOMARDGUI::windows( QMap<int, int>& theMap ) const
 711 //=============================================================================
 712 {
 713   theMap.clear();
 714   theMap.insert( SalomeApp_Application::WT_ObjectBrowser, Qt::LeftDockWidgetArea );
 715 #ifndef DISABLE_PYCONSOLE
 716   theMap.insert( SalomeApp_Application::WT_PyConsole,     Qt::BottomDockWidgetArea );
 717 #endif
 718 }
 719
 720 //=============================================================================
 721 void HOMARDGUI::setOrb()
 722 //=============================================================================
 723 {
 724   try
 725   {
 726      _orb = KERNEL::GetRefToORB();
 727   }
 728   catch (...)
 729   {
 730      INFOS("internal error : orb not found");
 731      _orb = 0;
 732   }
 733             ASSERT(! CORBA::is_nil(_orb));
 734 }
 735 //========================================
 736 _PTR(SObject) HOMARDGUI::chercheMonObjet()
 737 //========================================
 738 {
 739   SALOMEDSClient_SObject* aSO = NULL;
 740   _PTR(SObject) obj;
 741   SALOME_ListIO lst;
 742   getApp()->selectionMgr()->selectedObjects( lst );
 743   if (  lst.Extent() == 1 )
 744   {
 745     Handle(SALOME_InteractiveObject) io = lst.First();
 746     SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( application()->activeStudy() );
 747     _PTR(Study) study = appStudy->studyDS();
 748     _PTR(SObject) obj = study->FindObjectID( io->getEntry() );
 749     _ObjectName = QString( obj->GetName().c_str() );
 750     return obj;
 751   }
 752   else { return _PTR(SObject)(aSO); }
 753 }
 754 //=============================================================================
 755 void HOMARDGUI::contextMenuPopup( const QString& client, QMenu* menu, QString& title )
 756 //=============================================================================
 757 {
 758   MESSAGE("Debut de contextMenuPopup");
 759   _PTR(SObject) obj = chercheMonObjet();
 760   if ( obj )
 761   {
 762     title = QString( obj->GetName().c_str() );
 763     _ObjectName = title;
 764     SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
 765 //
 766     QPixmap pix ;
 767     bool DeleteObject = false ;
 768     bool EditObject = false ;
 769 //
 770     if ( HOMARD_UTILS::isBoundaryCAO(obj) )
 771     {
 772       EditObject = true ;
 773       DeleteObject = true ;
 774     }
 775     else if ( HOMARD_UTILS::isBoundaryAn(obj) )
 776     {
 777       EditObject = true ;
 778       DeleteObject = true ;
 779     }
 780     else if ( HOMARD_UTILS::isBoundaryDi(obj) )
 781     {
 782       EditObject = true ;
 783       DeleteObject = true ;
 784     }
 785     else if ( HOMARD_UTILS::isCase(obj) )
 786     {
 787       pix = resMgr->loadPixmap( "HOMARD", "table_view.png" );
 788       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_YACS").toLatin1().data()), this, SLOT(YACSCreate()));
 789       EditObject = true ;
 790       DeleteObject = true ;
 791     }
 792     else if ( HOMARD_UTILS::isHypo(obj) )
 793     {
 794       EditObject = true ;
 795       DeleteObject = true ;
 796     }
 797     else if ( HOMARD_UTILS::isIter(obj) )
 798     {
 799       pix = resMgr->loadPixmap( "HOMARD", "iter_next.png" );
 800       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_NEW_ITERATION").toLatin1().data()), this, SLOT(NextIter()));
 801       pix = resMgr->loadPixmap( "HOMARD", "mesh_compute.png" );
 802       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_COMPUTE").toLatin1().data()), this, SLOT(LanceCalcul0()));
 803       pix = resMgr->loadPixmap( "HOMARD", "mesh_compute.png" );
 804       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_COMPUTE_PUBLISH").toLatin1().data()), this, SLOT(LanceCalcul1()));
 805       pix = resMgr->loadPixmap( "HOMARD", "advanced_mesh_info.png" );
 806       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_MESH_INFO").toLatin1().data()), this, SLOT(IterInfo()));
 807       pix = resMgr->loadPixmap( "HOMARD", "mesh_tree_mesh.png" );
 808       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_MESH_PUBLICATION").toLatin1().data()), this, SLOT(MeshPublish0()));
 809       EditObject = true ;
 810       DeleteObject = true ;
 811     }
 812     else if ( HOMARD_UTILS::isYACS(obj) )
 813     {
 814       pix = resMgr->loadPixmap( "HOMARD", "write.png" );
 815       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_WRITE").toLatin1().data()), this, SLOT(YACSWrite()));
 816       EditObject = true ;
 817       DeleteObject = true ;
 818     }
 819     else if ( HOMARD_UTILS::isZone(obj) )
 820     {
 821       EditObject = true ;
 822       DeleteObject = true ;
 823     }
 824     else if ( HOMARD_UTILS::isFileType(obj,QString("log")) || HOMARD_UTILS::isFileType(obj,QString("Summary")) || HOMARD_UTILS::isFileType(obj,QString("xml")) )
 825     {
 826       pix = resMgr->loadPixmap( "HOMARD", "texte.png" );
 827       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT_MESS_FILE").toLatin1().data()), this, SLOT(EditAsciiFile()));
 828     }
 829     else if ( HOMARD_UTILS::isFileType(obj,QString("Mesh")) )
 830     {
 831       pix = resMgr->loadPixmap( "HOMARD", "mesh_tree_mesh.png" );
 832       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_MESH_PUBLICATION").toLatin1().data()), this, SLOT(MeshPublish1()));
 833     }
 834 //  Ajout d'un menu d'edition pour les objets qui le proposent
 835     if ( EditObject )
 836     {
 837       pix = resMgr->loadPixmap( "HOMARD", "loop.png" );
 838       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT").toLatin1().data()), this, SLOT(Edit()));
 839     }
 840 //  Ajout d'un menu de destruction pour les objets qui le proposent
 841     if ( DeleteObject )
 842     {
 843       pix = resMgr->loadPixmap( "HOMARD", "delete.png" );
 844       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_DELETE").toLatin1().data()), this, SLOT(Delete()));
 845     }
 846   }
 847 }
 848
 849 void HOMARDGUI::NextIter()
 850 {
 851   this->OnGUIEvent(1103);
 852 }
 853
 854 void HOMARDGUI::LanceCalcul0()
 855 {
 856   this->OnGUIEvent(1111);
 857 }
 858
 859 void HOMARDGUI::LanceCalcul1()
 860 {
 861   this->OnGUIEvent(1112);
 862 }
 863
 864 void HOMARDGUI::IterInfo()
 865 {
 866   this->OnGUIEvent(1121);
 867 }
 868
 869 void HOMARDGUI::MeshPublish0()
 870 {
 871   this->OnGUIEvent(1131);
 872 }
 873
 874 void HOMARDGUI::MeshPublish1()
 875 {
 876   this->OnGUIEvent(1132);
 877 }
 878
 879 void HOMARDGUI::Edit()
 880 {
 881   this->OnGUIEvent(1201);
 882 }
 883
 884 void HOMARDGUI::Delete()
 885 {
 886   this->OnGUIEvent(1211);
 887 }
 888
 889 void HOMARDGUI::EditAsciiFile()
 890 {
 891   this->OnGUIEvent(1302);
 892 }
 893
 894 void HOMARDGUI::YACSCreate()
 895 {
 896   this->OnGUIEvent(1401);
 897 }
 898 void HOMARDGUI::YACSWrite()
 899 {
 900   this->OnGUIEvent(1402);
 901 }
 902
 903
 904 //
 905 //=============================================================================
 906 // Export the module
 907 //=============================================================================
 908 extern "C" {
 909   Standard_EXPORT CAM_Module* createModule()
 910   {
 911     return new HOMARDGUI("");
 912   }
 913 }
 914