Salome HOME
90225544a7574df286e640c34ebaaed4f4d16862
[modules/homard.git] / src / HOMARDGUI / MonMeshInfo.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 using namespace std;
21
22 #include "MonMeshInfo.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 "MonEditFile.h"
31 #include <utilities.h>
32
33
34 // -----------------------------------------------------------------------------------------
35 MonMeshInfo::MonMeshInfo(QWidget* parent, bool modal, HOMARD::HOMARD_Gen_var myHomardGen0)
36 // -----------------------------------------------------------------------------------------
37 /* Constructs a MonMeshInfo
38  * Inherits from CasHomard
39  * Sets attributes to default values
40  */
41     :
42     Ui_MeshInfo(),
43     _aCaseName(""),_aDirName(""),
44     _BlockSize(0),
45     _Connection(0),
46     _Diametre(0),
47     _Entanglement(0),
48     _Quality(0)
49 {
50       myHomardGen=HOMARD::HOMARD_Gen::_duplicate(myHomardGen0);
51       setupUi(this);
52       setModal(modal);
53       InitConnect();
54
55       SetNewCaseName() ;
56       adjustSize();
57 }
58
59 // ------------------------------------------------------------------------
60 MonMeshInfo::~MonMeshInfo()
61 // ------------------------------------------------------------------------
62 {
63     // no need to delete child widgets, Qt does it all for us
64 }
65 // ------------------------------------------------------------------------
66 void MonMeshInfo::InitConnect()
67 // ------------------------------------------------------------------------
68 {
69     connect( LECaseName,     SIGNAL(textChanged(QString)), this, SLOT(CaseNameChanged()));
70     connect( PushDir,        SIGNAL(pressed()), this, SLOT(SetDirName()));
71     connect( PushFichier,    SIGNAL(pressed()), this, SLOT(SetFileName()));
72
73     connect( CBBlockSize,    SIGNAL(stateChanged(int)), this, SLOT(SetBlockSize()));
74     connect( CBConnection,   SIGNAL(stateChanged(int)), this, SLOT(SetConnection()));
75     connect( CBDiametre,     SIGNAL(stateChanged(int)), this, SLOT(SetDiametre()));
76     connect( CBEntanglement, SIGNAL(stateChanged(int)), this, SLOT(SetEntanglement()));
77     connect( CBQuality,      SIGNAL(stateChanged(int)), this, SLOT(SetQuality()));
78
79     connect( buttonOk,       SIGNAL(pressed()), this, SLOT(PushOnOK()));
80     connect( buttonApply,    SIGNAL(pressed()), this, SLOT(PushOnApply()));
81     connect( buttonCancel,   SIGNAL(pressed()), this, SLOT(close()));
82     connect( buttonHelp,     SIGNAL(pressed()), this, SLOT(PushOnHelp()));
83 }
84 // -------------------------------
85 bool MonMeshInfo::PushOnApply()
86 // --------------------------------
87 {
88   MESSAGE("PushOnApply");
89   QString aCaseName=LECaseName->text().trimmed();
90   if ( aCaseName == "" )
91   {
92     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
93                               QObject::tr("HOM_CASE_NAME") );
94     return false;
95   }
96
97   QString aDirName=LEDirName->text().trimmed();
98   if (aDirName == QString(""))
99   {
100     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
101                               QObject::tr("HOM_CASE_DIRECTORY_1") );
102     return false;
103   }
104   if ((aDirName != _aDirName) and (myHomardGen->VerifieDir( aDirName.toStdString().c_str()) == false))
105   {
106     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
107                               QObject::tr("HOM_CASE_DIRECTORY_2") );
108     return false;
109   }
110   if (chdir(aDirName.toStdString().c_str()) != 0)
111   {
112     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
113                               QObject::tr("HOM_CASE_DIRECTORY_3") );
114     return false;
115   }
116
117   QString aFileName=LEFileName->text().trimmed();
118   if (aFileName ==QString(""))
119   {
120     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
121                               QObject::tr("HOM_CASE_MESH") );
122     return false;
123   }
124
125   QString aMeshName = HOMARD_QT_COMMUN::LireNomMaillage(aFileName);
126   if (aMeshName == "" )
127   {
128     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
129                               QObject::tr("HOM_MED_FILE_2") );
130     return false;
131   }
132   if ( ( _Quality == 0 ) and ( _Diametre == 0 ) and ( _Connection == 0 ) and ( _BlockSize == 0 ) and ( _Entanglement == 0 ) )
133   {
134     QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
135                               QObject::tr("HOM_MESH_INFO") );
136     return false;
137   }
138
139   if (aCaseName != _aCaseName )
140   {
141     _aCaseName = aCaseName;
142     try
143     {
144       myHomardGen->MeshInfo( \
145             CORBA::string_dup(_aCaseName.toStdString().c_str()),  \
146             CORBA::string_dup(aMeshName.toStdString().c_str()),  \
147             CORBA::string_dup(aFileName.toStdString().c_str()),  \
148             CORBA::string_dup(aDirName.toStdString().c_str()),  \
149             _Quality, _Diametre, _Connection, _BlockSize, _Entanglement );
150     }
151     catch( SALOME::SALOME_Exception& S_ex )
152     {
153       QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
154                                 QObject::tr(CORBA::string_dup(S_ex.details.text)) );
155       return false;
156     }
157   }
158
159   // Le bilan de l'analyse a afficher
160   aCase = myHomardGen->GetCase(_aCaseName.toStdString().c_str());
161   string iter0 = aCase->GetIter0Name();
162   HOMARD::HOMARD_Iteration_var aIter =  myHomardGen->GetIteration(iter0.c_str());
163   aFileName = aIter->GetFileInfo() ;
164   MonEditFile *aDlg = new MonEditFile( 0, true, HOMARD::HOMARD_Gen::_duplicate(myHomardGen), aFileName, 1 ) ;
165   if ( aDlg->_codret == 0 ) { aDlg->show(); }
166
167 HOMARD_UTILS::updateObjBrowser();
168   return true;
169 }
170 // ---------------------------
171 void MonMeshInfo::PushOnOK()
172 // ---------------------------
173 {
174   bool bOK = PushOnApply();
175   if ( bOK )  this->close();
176 }
177 //------------------------------
178 void MonMeshInfo::PushOnHelp()
179 //-------------------------------
180 {
181   char* LanguageShort = myHomardGen->GetLanguageShort();
182   HOMARD_UTILS::PushOnHelp(QString("gui_create_case.html"), QString(""), QString(LanguageShort));
183 }
184 // ---------------------------------
185 void MonMeshInfo::SetNewCaseName()
186 // ------------------------------
187 {
188   HOMARD::listeCases_var  MyCases = myHomardGen->GetAllCasesName();
189   int num = 0; QString aCaseName="";
190   while (aCaseName=="" )
191   {
192     aCaseName.setNum(num+1) ;
193     aCaseName.insert(0, QString("Case_")) ;
194     for ( int i=0; i<MyCases->length(); i++)
195     {
196       if ( aCaseName == QString((MyCases)[i]) )
197       {
198         num += 1 ;
199         aCaseName="";
200         break;
201       }
202    }
203   }
204   LECaseName->clear() ;
205   LECaseName->insert(aCaseName);
206 }
207 // ------------------------------------------------------------------------
208 void MonMeshInfo::SetDirName()
209 // ------------------------------------------------------------------------
210 {
211   QString aDirName=QFileDialog::getExistingDirectory ();
212   if (!(aDirName.isEmpty()))LEDirName->setText(aDirName);
213 }
214 // ------------------------------------------------------------------------
215 void MonMeshInfo::SetFileName()
216 // ------------------------------------------------------------------------
217 {
218   QString fileName0 = LEFileName->text().trimmed();
219   QString fileName = HOMARD_QT_COMMUN::PushNomFichier();
220   if (fileName.isEmpty()) fileName = fileName0 ;
221   LEFileName->setText(fileName);
222 }
223 // ------------------------------------------------------------------------
224 void MonMeshInfo::CaseNameChanged()
225 // ------------------------------------------------------------------------
226 {
227   if (_aCaseName != LECaseName->text().trimmed())
228   {
229     LEFileName->setReadOnly(false);
230     PushFichier->show();
231   }
232 }
233 // ------------------------------------------------------------------------
234 void MonMeshInfo::SetBlockSize()
235 // ------------------------------------------------------------------------
236 {
237   MESSAGE("Debut de SetBlockSize ");
238   if ( CBBlockSize->isChecked() ) { _BlockSize = 1 ; }
239   else                            { _BlockSize = 0 ; }
240 }
241 // ------------------------------------------------------------------------
242 void MonMeshInfo::SetConnection()
243 // ------------------------------------------------------------------------
244 {
245   MESSAGE("Debut de SetConnection ");
246   if ( CBConnection->isChecked() ) { _Connection = 1 ; }
247   else                             { _Connection = 0 ; }
248 }
249 // ------------------------------------------------------------------------
250 void MonMeshInfo::SetDiametre()
251 // ------------------------------------------------------------------------
252 {
253   MESSAGE("Debut de SetDiametre ");
254   if ( CBDiametre->isChecked() ) { _Diametre = 1 ; }
255   else                           { _Diametre = 0 ; }
256 }
257 // ------------------------------------------------------------------------
258 void MonMeshInfo::SetEntanglement()
259 // ------------------------------------------------------------------------
260 {
261   MESSAGE("Debut de SetEntanglement ");
262   if ( CBEntanglement->isChecked() ) { _Entanglement = 1 ; }
263   else                               { _Entanglement = 0 ; }
264 }
265 // ------------------------------------------------------------------------
266 void MonMeshInfo::SetQuality()
267 // ------------------------------------------------------------------------
268 {
269   MESSAGE("Debut de SetQuality ");
270   if ( CBQuality->isChecked() ) { _Quality = 1 ; }
271   else                          { _Quality = 0 ; }
272 }