src/DriverMED/DriverMED_R_SMESHDS_Document.cxx

   1 //  SMESH DriverMED : driver to read and write 'med' files
   2 //
   3 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
   4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
   5 //
   6 //  This library is free software; you can redistribute it and/or
   7 //  modify it under the terms of the GNU Lesser General Public
   8 //  License as published by the Free Software Foundation; either
   9 //  version 2.1 of the License.
  10 //
  11 //  This library is distributed in the hope that it will be useful,
  12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 //  Lesser General Public License for more details.
  15 //
  16 //  You should have received a copy of the GNU Lesser General Public
  17 //  License along with this library; if not, write to the Free Software
  18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  19 //
  20 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
  21 //
  22 //
  23 //
  24 //  File   : DriverMED_R_SMESHDS_Document.cxx
  25 //  Module : SMESH
  26
  27 using namespace std;
  28 #include "DriverMED_R_SMESHDS_Document.h"
  29 #include "DriverMED_R_SMESHDS_Mesh.h"
  30 #include "utilities.h"
  31
  32 extern "C"
  33 {
  34         void * SMESH_createMEDDocumentReader()
  35         {
  36                 return new DriverMED_R_SMESHDS_Document;
  37         }
  38 }
  39
  40 DriverMED_R_SMESHDS_Document::DriverMED_R_SMESHDS_Document()
  41         :Document_Reader(new DriverMED_R_SMESHDS_Mesh())
  42 {
  43         ;
  44 }
  45
  46 DriverMED_R_SMESHDS_Document::~DriverMED_R_SMESHDS_Document()
  47 {
  48         ;
  49 }
  50
  51 //void DriverMED_R_SMESHDS_Document::SetFile(string aFile) {
  52 //  myFile = aFile;
  53 //}
  54
  55 void DriverMED_R_SMESHDS_Document::Read()
  56 {
  57
  58         med_err ret = 0;
  59         med_idt fid;
  60         med_int nmaa;
  61
  62         int myMeshId;
  63
  64 /****************************************************************************
  65   *                      OUVERTURE DU FICHIER EN LECTURE                      *
  66   ****************************************************************************/
  67         char *file2Read = (char *)myFile.c_str();
  68         fid = MEDouvrir(file2Read, MED_LECT);
  69         if (fid < 0)
  70         {
  71                 fprintf(stderr, ">> ERREUR : ouverture du fichier %s \n", file2Read);
  72                 exit(EXIT_FAILURE);
  73         }
  74
  75   /****************************************************************************
  76   *                      COMBIEN DE MAILLAGES ?                               *
  77   ****************************************************************************/
  78         nmaa = MEDnMaa(fid);
  79         if (nmaa < 0)
  80         {
  81                 fprintf(stderr, ">> ERREUR : lecture du nombre de maillages \n");
  82                 exit(EXIT_FAILURE);
  83         }
  84         printf("Nombre de maillages = %d\n", nmaa);
  85
  86         string myClass = string("SMESHDS_Mesh");
  87         string myExtension = string("MED");
  88
  89         for (int meshIt = 1; meshIt <= nmaa; meshIt++)
  90         {
  91                 myMeshId = myDocument->NewMesh();
  92                 printf("MeshId = %d\n", myMeshId);
  93
  94                 SMDS_Mesh * myMesh = myDocument->GetMesh(myMeshId);
  95                 SCRUTE(myMesh);
  96
  97                 // Handle (SMDS_Mesh) MMM =.........
  98                 //ex SMESHDS_Mesh * myMesh2 =SMESHDS_Mesh *::DownCast(MMM);
  99
 100                 DriverMED_R_SMESHDS_Mesh *myReader = new DriverMED_R_SMESHDS_Mesh;
 101
 102                 myReader->SetMesh(myMesh);
 103                 myReader->SetMeshId(myMeshId);
 104
 105                 //myReader->SetFile(myFile);
 106                 SCRUTE(fid);
 107                 myReader->SetFileId(fid);
 108
 109                 myReader->Add();
 110
 111         }
 112
 113   /****************************************************************************
 114   *                      FERMETURE DU FICHIER                                 *
 115   ****************************************************************************/
 116         ret = MEDfermer(fid);
 117
 118         if (ret != 0)
 119                 fprintf(stderr, ">> ERREUR : erreur a la fermeture du fichier %s\n",
 120                         file2Read);
 121
 122 }