Salome HOME
Integration of PAL/SALOME V2.1.0c from OCC
[modules/smesh.git] / src / DriverUNV / DriverUNV_W_SMDS_Mesh.cxx
index 80c02b4614bb247213309b0a6a30562de271f4d2..6d834b3fd84cc54f9fd9824a667ee0cd684e91bb 100644 (file)
-using namespace std;
-#include "DriverUNV_W_SMDS_Mesh.h"
-
-#include "SMDS_MeshElement.hxx"
-#include "SMDS_MeshNode.hxx"
-
-
-
-
+//  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
+//  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
+// 
+//  This library is free software; you can redistribute it and/or 
+//  modify it under the terms of the GNU Lesser General Public 
+//  License as published by the Free Software Foundation; either 
+//  version 2.1 of the License. 
+// 
+//  This library is distributed in the hope that it will be useful, 
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of 
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
+//  Lesser General Public License for more details. 
+// 
+//  You should have received a copy of the GNU Lesser General Public 
+//  License along with this library; if not, write to the Free Software 
+//  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
+// 
+//  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
+
+#include <algorithm>
 
-#include <utilities.h>
-
-#define sNODE_UNV_ID "  2411"
-#define sELT_UNV_ID  "  2412"
-#define sUNV_SEPARATOR "    -1"
-#define sNODE_UNV_DESCR "%10d         1         1        11\n"
-#define sELT_SURF_DESC  "%10d        %2d         1         1        11         %1d\n"
-#define sELT_VOLU_DESC  "%10d        %2d         1         1         9         %1d\n"
-#define sELT_BEAM_DESC1 "%10d        %2d         1         1         7         %1d\n"
-#define sELT_BEAM_DESC2 "         0         1         1\n"
-
-DriverUNV_W_SMDS_Mesh::DriverUNV_W_SMDS_Mesh()
-{
-       ;
-}
-
-DriverUNV_W_SMDS_Mesh::~DriverUNV_W_SMDS_Mesh()
-{
-       ;
-}
+#include "DriverUNV_W_SMDS_Mesh.h"
 
-void DriverUNV_W_SMDS_Mesh::SetMesh(SMDS_Mesh * aMesh)
-{
-       myMesh = aMesh;
-}
+#include "SMDS_Mesh.hxx"
 
-void DriverUNV_W_SMDS_Mesh::SetFile(string aFile)
-{
-       myFile = aFile;
-}
+#include "utilities.h"
 
-void DriverUNV_W_SMDS_Mesh::SetFileId(FILE * aFileId)
-{
-       myFileId = aFileId;
-}
+#include "UNV2411_Structure.hxx"
+#include "UNV2412_Structure.hxx"
+#include "UNV_Utilities.hxx"
 
-void DriverUNV_W_SMDS_Mesh::SetMeshId(int aMeshId)
-{
-       myMeshId = aMeshId;
-}
-
-void DriverUNV_W_SMDS_Mesh::Add()
-{
-       ;
-}
+using namespace std;
 
-void DriverUNV_W_SMDS_Mesh::Write()
+Driver_Mesh::Status DriverUNV_W_SMDS_Mesh::Perform()
 {
-
-       int nbNodes, nbCells;
-       int i;
-
-       char *file2Read = (char *)myFile.c_str();
-       myFileId = fopen(file2Read, "w+");
-       if (myFileId < 0)
-       {
-               fprintf(stderr, ">> ERREUR : ouverture du fichier %s \n", file2Read);
-               exit(EXIT_FAILURE);
+  Status aResult = DRS_OK;
+  std::ofstream out_stream(myFile.c_str());
+  try{
+    {
+      using namespace UNV2411;
+      TDataSet aDataSet2411;
+      // Storing SMDS nodes to the UNV file
+      //-----------------------------------
+      MESSAGE("Perform - myMesh->NbNodes() = "<<myMesh->NbNodes());
+      SMDS_NodeIteratorPtr aNodesIter = myMesh->nodesIterator();
+      for(; aNodesIter->more();){
+       const SMDS_MeshNode* aNode = aNodesIter->next();
+       TRecord aRec;
+       aRec.coord[0] = aNode->X();
+       aRec.coord[1] = aNode->Y();
+       aRec.coord[2] = aNode->Z();
+       const TNodeLab& aLabel = aNode->GetID();
+       aDataSet2411.insert(TDataSet::value_type(aLabel,aRec));
+      }
+      MESSAGE("Perform - aDataSet2411.size() = "<<aDataSet2411.size());
+      UNV2411::Write(out_stream,aDataSet2411);
+    }
+    {
+      using namespace UNV2412;
+      TDataSet aDataSet2412;
+      // Storing SMDS Edges
+      MESSAGE("Perform - myMesh->NbEdges() = "<<myMesh->NbEdges());
+      if(myMesh->NbEdges()){
+       SMDS_EdgeIteratorPtr anIter = myMesh->edgesIterator();
+       for(; anIter->more();){
+         const SMDS_MeshEdge* anElem = anIter->next();
+         const TElementLab& aLabel = anElem->GetID();
+         int aNbNodes = anElem->NbNodes();
+         TRecord aRec;
+         aRec.node_labels.reserve(aNbNodes);
+         SMDS_ElemIteratorPtr aNodesIter = anElem->nodesIterator();
+         for(; aNodesIter->more();){
+           const SMDS_MeshElement* aNode = aNodesIter->next();
+           aRec.node_labels.push_back(aNode->GetID());
+         }
+         aRec.fe_descriptor_id = 11;
+         aDataSet2412.insert(TDataSet::value_type(aLabel,aRec));
        }
-       SCRUTE(myMesh);
-  /****************************************************************************
-  *                       NOMBRES D'OBJETS                                    *
-  ****************************************************************************/
-       fprintf(stdout, "\n(****************************)\n");
-       fprintf(stdout, "(* INFORMATIONS GENERALES : *)\n");
-       fprintf(stdout, "(****************************)\n");
-
-       /* Combien de noeuds ? */
-       nbNodes = myMesh->NbNodes();
-
-       /* Combien de mailles, faces ou aretes ? */
-       int nb_of_nodes, nb_of_edges, nb_of_faces, nb_of_volumes;
-       nb_of_edges = myMesh->NbEdges();
-       nb_of_faces = myMesh->NbFaces();
-       nb_of_volumes = myMesh->NbVolumes();
-       nbCells = nb_of_edges + nb_of_faces + nb_of_volumes;
-       SCRUTE(nb_of_edges);
-       SCRUTE(nb_of_faces);
-       SCRUTE(nb_of_volumes);
-
-       fprintf(stdout, "%d %d\n", nbNodes, nbCells);
-       fprintf(myFileId, "%d %d\n", nbNodes, nbCells);
-
-  /****************************************************************************
-  *                       ECRITURE DES NOEUDS                                 *
-  ****************************************************************************/
-       fprintf(stdout, "\n(************************)\n");
-       fprintf(stdout, "(* NOEUDS DU MAILLAGE : *)\n");
-       fprintf(stdout, "(************************)\n");
-
-       fprintf(myFileId, "%s\n", sUNV_SEPARATOR);
-       fprintf(myFileId, "%s\n", sNODE_UNV_ID);
-
-       SMDS_NodeIteratorPtr itNodes=myMesh->nodesIterator();
-       while(itNodes->more())
-       {
-               const SMDS_MeshNode * node = itNodes->next();
-
-               fprintf(myFileId, sNODE_UNV_DESCR, node->GetID());
-               fprintf(myFileId, "%25.16E%25.16E%25.16E\n", node->X(), node->Y(),
-                       node->Z());
+       MESSAGE("Perform - aDataSet2412.size() = "<<aDataSet2412.size());
+      }
+      MESSAGE("Perform - myMesh->NbFaces() = "<<myMesh->NbFaces());
+      if(myMesh->NbFaces()){
+       SMDS_FaceIteratorPtr anIter = myMesh->facesIterator();
+       for(; anIter->more();){
+         const SMDS_MeshFace* anElem = anIter->next();
+         const TElementLab& aLabel = anElem->GetID();
+         int aNbNodes = anElem->NbNodes();
+         TRecord aRec;
+         aRec.node_labels.reserve(aNbNodes);
+         SMDS_ElemIteratorPtr aNodesIter = anElem->nodesIterator();
+         for(; aNodesIter->more();){
+           const SMDS_MeshElement* aNode = aNodesIter->next();
+           aRec.node_labels.push_back(aNode->GetID());
+         }
+         switch(aNbNodes){
+         case 3:
+           aRec.fe_descriptor_id = 41;
+           break;
+         case 4:
+           aRec.fe_descriptor_id = 44;
+           break;
+         default:
+           continue;
+         }
+         aDataSet2412.insert(TDataSet::value_type(aLabel,aRec));
        }
-       fprintf(myFileId, "%s\n", sUNV_SEPARATOR);
-
-  /****************************************************************************
-  *                       ECRITURE DES ELEMENTS                                *
-  ****************************************************************************/
-       fprintf(stdout, "\n(**************************)\n");
-       fprintf(stdout, "(* ELEMENTS DU MAILLAGE : *)\n");
-       fprintf(stdout, "(**************************)");
-       /* Ecriture des connectivites, noms, numeros des mailles */
-
-       fprintf(myFileId, "%s\n", sUNV_SEPARATOR);
-       fprintf(myFileId, "%s\n", sELT_UNV_ID);
-
-       SMDS_EdgeIteratorPtr itEdges=myMesh->edgesIterator();
-       while(itEdges->more())
-       {
-               const SMDS_MeshElement * elem = itEdges->next();
-               SMDS_ElemIteratorPtr itn=elem->nodesIterator();
-
-               switch (elem->NbNodes())
-               {
-               case 2:
-                       fprintf(myFileId, sELT_BEAM_DESC1, elem->GetID(), 21,
-                               elem->NbNodes());
-                       fprintf(myFileId, sELT_BEAM_DESC2);
-                       fprintf(myFileId, "%10d%10d\n", itn->next()->GetID(),
-                               itn->next()->GetID());
-                       break;
-
-               case 3:
-                       fprintf(myFileId, sELT_BEAM_DESC1, elem->GetID(), 24,
-                               elem->NbNodes());
-                       fprintf(myFileId, sELT_BEAM_DESC2);
-                       fprintf(myFileId, "%10d%10d%10d\n", itn->next()->GetID(),
-                               itn->next()->GetID(), itn->next()->GetID());
-
-                       break;
-               }
+       MESSAGE("Perform - aDataSet2412.size() = "<<aDataSet2412.size());
+      }
+      MESSAGE("Perform - myMesh->NbVolumes() = "<<myMesh->NbVolumes());
+      if(myMesh->NbVolumes()){
+       SMDS_VolumeIteratorPtr anIter = myMesh->volumesIterator();
+       for(; anIter->more();){
+         const SMDS_MeshVolume* anElem = anIter->next();
+         const TElementLab& aLabel = anElem->GetID();
+         int aNbNodes = anElem->NbNodes();
+         TRecord aRec;
+         aRec.node_labels.reserve(aNbNodes);
+         SMDS_ElemIteratorPtr aNodesIter = anElem->nodesIterator();
+         for(; aNodesIter->more();){
+           const SMDS_MeshElement* aNode = aNodesIter->next();
+           aRec.node_labels.push_back(aNode->GetID());
+         }
+         switch(aNbNodes){
+         case 4:
+           aRec.fe_descriptor_id = 111;
+           break;
+         case 6:
+           aRec.fe_descriptor_id = 112;
+           swap(aRec.node_labels[1],aRec.node_labels[2]);
+           swap(aRec.node_labels[4],aRec.node_labels[5]);
+           break;
+         case 8:
+           aRec.fe_descriptor_id = 115;
+           break;
+         default:
+           continue;
+         }
+         aDataSet2412.insert(TDataSet::value_type(aLabel,aRec));
        }
-
-       SMDS_FaceIteratorPtr itFaces=myMesh->facesIterator();
-       while(itFaces->more())
-       {
-               const SMDS_MeshElement * elem = itFaces->next();
-
-               switch (elem->NbNodes())
-               {
-               case 3:
-                       // linear triangle
-                       fprintf(myFileId, sELT_SURF_DESC, elem->GetID(), 74,
-                               elem->NbNodes());
-                       break;
-               case 4:
-                       // linear quadrilateral
-                       fprintf(myFileId, sELT_SURF_DESC, elem->GetID(), 71,
-                               elem->NbNodes());
-                       break;
-               case 6:
-                       // parabolic triangle
-                       fprintf(myFileId, sELT_SURF_DESC, elem->GetID(), 72,
-                               elem->NbNodes());
-                       break;
-               case 8:
-                       // parabolic quadrilateral
-                       fprintf(myFileId, sELT_SURF_DESC, elem->GetID(), 75,
-                               elem->NbNodes());
-                       break;
-               default:
-                       fprintf(myFileId, "element not registered\n");
-               }
-
-               SMDS_ElemIteratorPtr itn=elem->nodesIterator();
-               while(itn->more()) fprintf(myFileId, "%10d", itn->next()->GetID());
-
-               fprintf(myFileId, "\n");
-       }
-
-       SMDS_VolumeIteratorPtr itVolumes=myMesh->volumesIterator();
-       while(itVolumes->more())
-       {
-               const SMDS_MeshElement * elem = itVolumes->next();
-
-               switch (elem->NbNodes())
-               {
-               case 4:
-                       // linear tetrahedron
-                       fprintf(myFileId, sELT_SURF_DESC, elem->GetID(), 111,
-                               elem->NbNodes());
-                       break;
-               case 6:
-                       // linear tetrahedron
-                       fprintf(myFileId, sELT_SURF_DESC, elem->GetID(), 112,
-                               elem->NbNodes());
-                       break;
-               case 8:
-                       // linear brick
-                       fprintf(myFileId, sELT_SURF_DESC, elem->GetID(), 115,
-                               elem->NbNodes());
-                       break;
-               }
-
-               SMDS_ElemIteratorPtr itn=elem->nodesIterator();
-               while(itn->more()) fprintf(myFileId, "%10d", itn->next()->GetID());
-
-               fprintf(myFileId, "\n");
-       }
-
-       fprintf(myFileId, "%s\n", sUNV_SEPARATOR);
-
-       fclose(myFileId);
+       MESSAGE("Perform - aDataSet2412.size() = "<<aDataSet2412.size());
+      }
+      UNV2412::Write(out_stream,aDataSet2412);
+    }
+  }catch(const std::exception& exc){
+    INFOS("Follow exception was cought:\n\t"<<exc.what());
+  }catch(...){
+    INFOS("Unknown exception was cought !!!");
+  }
+  return aResult;
 }