Salome HOME
Integration of PAL/SALOME V2.1.0c from OCC
[modules/smesh.git] / src / DriverDAT / DriverDAT_W_SMDS_Mesh.cxx
index 8f6a7068d6ea865289302b3bb8f95635c5c44e4a..1f8d5ab61bd45d0ff85d58b30097a54938f08881 100644 (file)
@@ -1,5 +1,3 @@
-//  SMESH DriverDAT : driver to read and write 'dat' files
-//
 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
 // 
 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
 // 
 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
-//
-//
-//
-//  File   : DriverDAT_W_SMDS_Mesh.cxx
-//  Module : SMESH
 
-using namespace std;
+#include <stdio.h>
+
 #include "DriverDAT_W_SMDS_Mesh.h"
 
-#include "SMDS_MeshElement.hxx"
-#include "SMDS_MeshNode.hxx"
+#include "SMDS_Mesh.hxx"
 
 #include "utilities.h"
 
-DriverDAT_W_SMDS_Mesh::DriverDAT_W_SMDS_Mesh()
-{
-       ;
-}
-
-DriverDAT_W_SMDS_Mesh::~DriverDAT_W_SMDS_Mesh()
-{
-       ;
-}
-
-void DriverDAT_W_SMDS_Mesh::SetMesh(SMDS_Mesh * aMesh)
-{
-       myMesh = aMesh;
-}
-
-void DriverDAT_W_SMDS_Mesh::SetFile(string aFile)
-{
-       myFile = aFile;
-}
-
-void DriverDAT_W_SMDS_Mesh::SetFileId(FILE * aFileId)
-{
-       myFileId = aFileId;
-}
-
-void DriverDAT_W_SMDS_Mesh::SetMeshId(int aMeshId)
-{
-       myMeshId = aMeshId;
-}
-
-void DriverDAT_W_SMDS_Mesh::Add()
-{
-       ;
-}
+using namespace std;
 
-void DriverDAT_W_SMDS_Mesh::Write()
+Driver_Mesh::Status DriverDAT_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);
-       }
-       SCRUTE(myMesh);
+  Status aResult = DRS_OK;
+
+  int nbNodes, nbCells;
+  int i;
+  
+  char *file2Read = (char *)myFile.c_str();
+  FILE* aFileId = fopen(file2Read, "w+");
+  if (aFileId < 0) {
+    fprintf(stderr, ">> ERREUR : ouverture du fichier %s \n", file2Read);
+    return DRS_FAIL;
+  }
+  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);
-
+   *                       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(aFileId, "%d %d\n", nbNodes, nbCells);
+  
   /****************************************************************************
-  *                       ECRITURE DES NOEUDS                                 *
-  ****************************************************************************/
-       fprintf(stdout, "\n(************************)\n");
-       fprintf(stdout, "(* NOEUDS DU MAILLAGE : *)\n");
-       fprintf(stdout, "(************************)\n");
-
-       SMDS_NodeIteratorPtr itNodes=myMesh->nodesIterator();
-       while(itNodes->more())
-       {               
-               const SMDS_MeshNode * node = itNodes->next();
-               fprintf(myFileId, "%d %e %e %e\n", node->GetID(), node->X(),
-                       node->Y(), node->Z());
-       }
+   *                       ECRITURE DES NOEUDS                                 *
+   ****************************************************************************/
+  fprintf(stdout, "\n(************************)\n");
+  fprintf(stdout, "(* NOEUDS DU MAILLAGE : *)\n");
+  fprintf(stdout, "(************************)\n");
+  
+  SMDS_NodeIteratorPtr itNodes=myMesh->nodesIterator();
+  while(itNodes->more()){              
+    const SMDS_MeshNode * node = itNodes->next();
+    fprintf(aFileId, "%d %e %e %e\n", node->GetID(), node->X(), node->Y(), node->Z());
+  }
        
   /****************************************************************************
-  *                       ECRITURE DES ELEMENTS                                *
-  ****************************************************************************/
-       fprintf(stdout, "\n(**************************)\n");
-       fprintf(stdout, "(* ELEMENTS DU MAILLAGE : *)\n");
-       fprintf(stdout, "(**************************)");
-       /* Ecriture des connectivites, noms, numeros des mailles */
-
-       SMDS_EdgeIteratorPtr itEdges=myMesh->edgesIterator();
-       while(itEdges->more())
-       {
-               const SMDS_MeshElement * elem = itEdges->next();
-
-               switch (elem->NbNodes())
-               {
-               case 2:
-               {
-                       fprintf(myFileId, "%d %d ", elem->GetID(), 102);
-                       break;
-               }
-               case 3:
-               {
-                       fprintf(myFileId, "%d %d ", elem->GetID(), 103);
-                       break;
-               }
-               }
-
-               SMDS_ElemIteratorPtr it=elem->nodesIterator();
-               while(it->more()) fprintf(myFileId, "%d ", it->next()->GetID());
-
-               fprintf(myFileId, "\n");
-       }
-
-       SMDS_FaceIteratorPtr itFaces=myMesh->facesIterator();
-       while(itFaces->more())
-       {
-               const SMDS_MeshElement * elem = itFaces->next();
-
-               switch (elem->NbNodes())
-               {
-               case 3:
-               {
-                       fprintf(myFileId, "%d %d ", elem->GetID(), 203);
-                       break;
-               }
-               case 4:
-               {
-                       fprintf(myFileId, "%d %d ", elem->GetID(), 204);
-                       break;
-               }
-               case 6:
-               {
-                       fprintf(myFileId, "%d %d ", elem->GetID(), 206);
-                       break;
-               }
-               }
-
-               SMDS_ElemIteratorPtr it=elem->nodesIterator();
-               while(it->more()) fprintf(myFileId, "%d ", it->next()->GetID());
-
-               fprintf(myFileId, "\n");
-       }
-
-       SMDS_VolumeIteratorPtr itVolumes=myMesh->volumesIterator();
-       while(itVolumes->more())
-       {
-               const SMDS_MeshElement * elem = itVolumes->next();
-               
-               switch (elem->NbNodes())
-               {
-               case 8:
-               {
-                       fprintf(myFileId, "%d %d ", elem->GetID(), 308);
-                       break;
-               }
-               }
-
-               SMDS_ElemIteratorPtr it=elem->nodesIterator();
-               while(it->more()) fprintf(myFileId, "%d ", it->next()->GetID());
-
-               fprintf(myFileId, "\n");
-       }
-
-       fclose(myFileId);
+   *                       ECRITURE DES ELEMENTS                                *
+   ****************************************************************************/
+  fprintf(stdout, "\n(**************************)\n");
+  fprintf(stdout, "(* ELEMENTS DU MAILLAGE : *)\n");
+  fprintf(stdout, "(**************************)");
+  /* Ecriture des connectivites, noms, numeros des mailles */
+  
+  SMDS_EdgeIteratorPtr itEdges=myMesh->edgesIterator();
+  while(itEdges->more()){
+    const SMDS_MeshElement * elem = itEdges->next();
+    switch (elem->NbNodes()) {
+    case 2:
+      fprintf(aFileId, "%d %d ", elem->GetID(), 102);
+      break;
+    case 3:
+      fprintf(aFileId, "%d %d ", elem->GetID(), 103);
+      break;
+    }
+    SMDS_ElemIteratorPtr it=elem->nodesIterator();
+    while(it->more()) 
+      fprintf(aFileId, "%d ", it->next()->GetID());
+    fprintf(aFileId, "\n");
+  }
+  
+  SMDS_FaceIteratorPtr itFaces=myMesh->facesIterator();
+  while(itFaces->more()){
+    const SMDS_MeshElement * elem = itFaces->next();
+    switch (elem->NbNodes()) {
+    case 3:
+      fprintf(aFileId, "%d %d ", elem->GetID(), 203);
+      break;
+    case 4:
+      fprintf(aFileId, "%d %d ", elem->GetID(), 204);
+      break;
+    case 6:
+      fprintf(aFileId, "%d %d ", elem->GetID(), 206);
+      break;
+    }
+    SMDS_ElemIteratorPtr it=elem->nodesIterator();
+    while(it->more()) 
+      fprintf(aFileId, "%d ", it->next()->GetID());
+    fprintf(aFileId, "\n");
+  }
+
+  SMDS_VolumeIteratorPtr itVolumes=myMesh->volumesIterator();
+  while(itVolumes->more()){
+    const SMDS_MeshElement * elem = itVolumes->next();
+    switch (elem->NbNodes()) {
+    case 8:
+      fprintf(aFileId, "%d %d ", elem->GetID(), 308);
+      break;
+    }
+
+    SMDS_ElemIteratorPtr it=elem->nodesIterator();
+    while(it->more()) 
+      fprintf(aFileId, "%d ", it->next()->GetID());
+
+    fprintf(aFileId, "\n");
+  }
+  
+  fclose(aFileId);
+
+  return aResult;
 }