src/HOMARDGUI/MonCreateYACS.cxx

   1 // Copyright (C) 2011-2012  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 using namespace std;
  21
  22 #include "MonCreateYACS.h"
  23
  24 #include <QFileDialog>
  25 #include <QMessageBox>
  26
  27 #include "SalomeApp_Tools.h"
  28 #include "HOMARDGUI_Utils.h"
  29 #include "HomardQtCommun.h"
  30 #include <utilities.h>
  31
  32
  33 // ----------------------------------------------------------------------
  34 MonCreateYACS::MonCreateYACS (bool modal, HOMARD::HOMARD_Gen_var myHomardGen0, QString CaseName ):
  35 // ----------------------------------------------------------------------
  36 /* Constructs a MonCreateYACS
  37  * Sets attributes to default values
  38  */
  39 // ----------------------------------------------------------------------
  40   Ui_CreateYACS(),
  41   _aCaseName(CaseName),
  42   _aScriptFile(""),
  43   _aDirName(""),
  44   _aMeshFile(""),
  45   _Type(1)
  46   // La valeur de _Type doit etre la meme que celle dans HOMARD_Gen_i::CreateYACSSchema
  47   // et doit correspondre aux defauts des boutons
  48   {
  49 //     MESSAGE("Debut du constructeur de MonCreateYACS");
  50     myHomardGen=HOMARD::HOMARD_Gen::_duplicate(myHomardGen0);
  51     setupUi(this);
  52     setModal(modal);
  53
  54     InitConnect();
  55
  56     SetNewName() ;
  57
  58     if (_aCaseName != QString(""))
  59       { SetCaseName(); }
  60     else
  61       {setModal(false); /* permet selection du cas dans l arbre d etude */}
  62
  63     adjustSize();
  64 //     MESSAGE("Fin du constructeur de MonCreateYACS");
  65   }
  66
  67 // ----------------------------------------------------------------------
  68 MonCreateYACS::MonCreateYACS(HOMARD::HOMARD_Gen_var myHomardGen0,
  69                              QString caseName):
  70 // ----------------------------------------------------------------------
  71 // Constructeur appele par MonEditYACS
  72 //
  73     myHomardGen(myHomardGen0),
  74     _Name (""),
  75     Chgt (false)
  76     {
  77 //       MESSAGE("Debut du constructeur de MonCreateYACS appele par MonEditYACS");
  78       setupUi(this) ;
  79
  80       setModal(true) ;
  81       InitConnect() ;
  82     }
  83
  84 // ------------------------------------------------------------------------
  85 MonCreateYACS::~MonCreateYACS()
  86 // ------------------------------------------------------------------------
  87 {
  88     // no need to delete child widgets, Qt does it all for us
  89 }
  90 // ------------------------------------------------------------------------
  91 void MonCreateYACS::InitConnect()
  92 // ------------------------------------------------------------------------
  93 {
  94     connect( PBCaseName,     SIGNAL(pressed()), this, SLOT(SetCaseName()));
  95     connect( PBScriptFile,   SIGNAL(pressed()), this, SLOT(SetScriptFile()));
  96     connect( PBDir,          SIGNAL(pressed()), this, SLOT(SetDirName()));
  97     connect( PBMeshFile,     SIGNAL(pressed()), this, SLOT(SetMeshFile()));
  98
  99     connect( RBConstant,     SIGNAL(clicked()), this, SLOT(SetConstant()));
 100     connect( RBVariable,     SIGNAL(clicked()), this, SLOT(SetVariable()));
 101
 102     connect( buttonOk,       SIGNAL(pressed()), this, SLOT(PushOnOK()));
 103     connect( buttonApply,    SIGNAL(pressed()), this, SLOT(PushOnApply()));
 104     connect( buttonCancel,   SIGNAL(pressed()), this, SLOT(close()));
 105     connect( buttonHelp,     SIGNAL(pressed()), this, SLOT(PushOnHelp()));
 106 }
 107 // -------------------------------
 108 bool MonCreateYACS::PushOnApply()
 109 // --------------------------------
 110 {
 111   MESSAGE("PushOnApply");
 112
 113 // Le fichier du script
 114   QString aFileName=LEScriptFile->text().trimmed();
 115   if (aFileName ==QString(""))
 116   {
 117     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 118                               QObject::tr("HOM_SCRIPT_FILE") );
 119     return false;
 120   }
 121
 122 // Le repertoire de calcul
 123   QString aDirName=LEDirName->text().trimmed();
 124   if (aDirName == QString(""))
 125   {
 126     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 127                               QObject::tr("HOM_CASE_DIRECTORY_4") );
 128     return false;
 129   }
 130   if ( aDirName != _aDirName)
 131   { QString CaseNameDir = myHomardGen->VerifieDir( aDirName.toStdString().c_str()) ;
 132     if ( CaseNameDir != "" )
 133     {
 134       INFOS(CaseNameDir.toStdString().c_str());
 135       QString texte ;
 136       texte = QObject::tr("HOM_CASE_DIRECTORY_2") + CaseNameDir ;
 137       QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 138                                 texte );
 139       return false;
 140     }
 141   }
 142   if (chdir(aDirName.toStdString().c_str()) != 0)
 143   {
 144     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 145                               QObject::tr("HOM_CASE_DIRECTORY_3") );
 146     return false;
 147   }
 148
 149 // Le fichier du tout premier maillage
 150   aFileName=LEMeshFile->text().trimmed();
 151   if (aFileName ==QString(""))
 152   {
 153     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 154                               QObject::tr("HOM_CASE_MESH") );
 155     return false;
 156   }
 157   QString aMeshName = HOMARD_QT_COMMUN::LireNomMaillage(aFileName);
 158   if (aMeshName == "" )
 159   {
 160     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 161                               QObject::tr("HOM_MED_FILE_2") );
 162     return false;
 163   }
 164
 165   bool bOK = CreateOrUpdate() ;
 166
 167   if ( bOK ) { HOMARD_UTILS::updateObjBrowser() ; }
 168
 169   return bOK;
 170 }
 171 // ---------------------------------------------------
 172 bool MonCreateYACS:: CreateOrUpdate()
 173 //----------------------------------------------------
 174 //  Creation ou modification du schema
 175 {
 176   MESSAGE("CreateOrUpdate");
 177   bool bOK = true ;
 178
 179   // Le cas
 180   if ( _aCaseName == QString (""))
 181   {
 182     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 183                               QObject::tr("HOM_CASE_NAME") );
 184     return false;
 185   }
 186   // Les donnees
 187   QString aScriptFile=LEScriptFile->text().trimmed();
 188   if ( aScriptFile != _aScriptFile )
 189   {
 190     _aScriptFile = aScriptFile ;
 191     Chgt = true ;
 192   }
 193   QString aDirName=LEDirName->text().trimmed();
 194   if ( aDirName != _aDirName )
 195   {
 196     _aDirName = aDirName ;
 197     Chgt = true ;
 198   }
 199   QString aMeshFile=LEMeshFile->text().trimmed();
 200   if ( aMeshFile != _aMeshFile )
 201   {
 202     _aMeshFile = aMeshFile ;
 203     Chgt = true ;
 204   }
 205
 206   // Creation de l'objet CORBA
 207   try
 208   {
 209     _Name=LEName->text().trimmed();
 210     aYACS=myHomardGen->CreateYACSSchema(CORBA::string_dup(_Name.toStdString().c_str()), CORBA::string_dup(_aCaseName.toStdString().c_str()), CORBA::string_dup(_aScriptFile.toStdString().c_str()), CORBA::string_dup(_aDirName.toStdString().c_str()), CORBA::string_dup(_aMeshFile.toStdString().c_str()));
 211   }
 212   catch( SALOME::SALOME_Exception& S_ex )
 213   {
 214     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
 215                               QObject::tr(CORBA::string_dup(S_ex.details.text)) );
 216     bOK = false;
 217   }
 218
 219   // Options
 220   if ( bOK )
 221   { aYACS->SetType(_Type) ; }
 222
 223   // Ecriture du fichier
 224   if ( bOK )
 225   {
 226     int codret = aYACS->Write() ;
 227     if ( codret != 0 ) { bOK = false ; }
 228   }
 229
 230   return bOK;
 231 }
 232 // ---------------------------
 233 void MonCreateYACS::PushOnOK()
 234 // ---------------------------
 235 {
 236   bool bOK = PushOnApply();
 237   if ( bOK ) this->close();
 238 }
 239 //------------------------------
 240 void MonCreateYACS::PushOnHelp()
 241 //-------------------------------
 242 {
 243   char* LanguageShort = myHomardGen->GetLanguageShort();
 244   HOMARD_UTILS::PushOnHelp(QString("yacs.html"), QString(""), QString(LanguageShort));
 245 }
 246 // -------------------------------------------------
 247 void MonCreateYACS::SetNewName()
 248 // --------------------------------------------------
 249 {
 250
 251   HOMARD::listeYACSs_var MyObjects = myHomardGen->GetAllYACSsName();
 252   int num = 0; QString aName="";
 253   while (aName == QString("") )
 254   {
 255     aName.setNum(num+1) ;
 256     aName.insert(0, QString("YACS_")) ;
 257     for ( int i=0; i<MyObjects->length(); i++)
 258     {
 259       if ( aName ==  QString(MyObjects[i]))
 260       {
 261           num=num+1;
 262           aName="";
 263           break;
 264       }
 265    }
 266   }
 267   LEName->setText(aName);
 268 }
 269 // ------------------------------------------------------------------------
 270 void MonCreateYACS::SetCaseName()
 271 // ------------------------------------------------------------------------
 272 {
 273   MESSAGE ("SetCaseName avec _aCaseName = " << _aCaseName.toStdString() );
 274   if (_aCaseName == QString(""))
 275   {
 276     _aCaseName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("CasHomard"), 1);
 277     if (_aCaseName == QString("")) { raise();return;};
 278   }
 279   LECaseName->setText(_aCaseName);
 280 }
 281 // ------------------------------------------------------------------------
 282 void MonCreateYACS::SetDirName()
 283 // ------------------------------------------------------------------------
 284 {
 285   QString aDirName=QFileDialog::getExistingDirectory ();
 286   if (!(aDirName.isEmpty()))LEDirName->setText(aDirName);
 287 }
 288 // ------------------------------------------------------------------------
 289 void MonCreateYACS::SetScriptFile()
 290 // ------------------------------------------------------------------------
 291 {
 292   QString fileName0 = LEScriptFile->text().trimmed();
 293   QString fileName = HOMARD_QT_COMMUN::PushNomFichier(false);
 294   if (fileName.isEmpty()) fileName = fileName0 ;
 295   LEScriptFile->setText(fileName);
 296 }
 297 // ------------------------------------------------------------------------
 298 void MonCreateYACS::SetMeshFile()
 299 // ------------------------------------------------------------------------
 300 {
 301   QString fileName0 = LEMeshFile->text().trimmed();
 302   QString fileName = HOMARD_QT_COMMUN::PushNomFichier(false);
 303   if (fileName.isEmpty()) fileName = fileName0 ;
 304   LEMeshFile->setText(fileName);
 305 }
 306 // ------------------------------------------------------------------------
 307 void MonCreateYACS::SetConstant()
 308 // ------------------------------------------------------------------------
 309 {
 310   _Type = 1 ;
 311 }
 312 // ------------------------------------------------------------------------
 313 void MonCreateYACS::SetVariable()
 314 // ------------------------------------------------------------------------
 315 {
 316   _Type = 2 ;
 317 }