Salome HOME
yfr : Merge with v1.2
[modules/smesh.git] / src / DriverMED / DriverMED_W_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_W_SMESHDS_Document.cxx
25 //  Module : SMESH
26
27 using namespace std;
28 #include "DriverMED_W_SMESHDS_Document.h"
29 #include "DriverMED_W_SMESHDS_Mesh.h"
30 #include "utilities.h"
31
32 #include <stdio.h>
33
34 extern "C" 
35 {
36   Document_Writer* Wmaker() {
37     return new DriverMED_W_SMESHDS_Document;
38   }
39 }
40
41 DriverMED_W_SMESHDS_Document::DriverMED_W_SMESHDS_Document() {
42 ;
43 }
44
45 DriverMED_W_SMESHDS_Document::~DriverMED_W_SMESHDS_Document() {
46 ;
47 }
48
49 //void DriverMED_W_SMESHDS_Document::SetFile(string aFile) {
50 //myFile = aFile;
51 //}
52
53 //void DriverMED_W_SMESHDS_Document::SetDocument(Handle(SMESHDS_Document)& aDocument) {
54 //myDocument = aDocument;
55 //}
56
57 void DriverMED_W_SMESHDS_Document::Write() {
58
59   med_err ret = 0;
60   med_idt fid;
61   med_int nmaa,numero,nb_of_meshes;
62   med_mode_switch mode_coo;
63   med_connectivite typ_con;
64
65   SCRUTE(myFile);
66   Handle(SMESHDS_Mesh) myMesh;
67
68   /******** Nombre de maillages ********/
69   nb_of_meshes = myDocument->NbMeshes(); //voir avec Yves
70   MESSAGE("nb_of_meshes = "<<nb_of_meshes<<"\n");
71   SCRUTE(nb_of_meshes);
72   //nb_of_meshes = 1;
73   numero = 0;
74
75   string myClass = string("SMESHDS_Mesh");
76   string myExtension = string("MED");
77
78   //while (numero<nb_of_meshes) {
79   //numero++;
80   //myMesh = myDocument->GetMesh(numero);
81
82   myDocument->InitMeshesIterator();
83   if (nb_of_meshes!=0)
84   for (;myDocument->MoreMesh();myDocument->NextMesh()) {
85     numero++;
86     myMesh = myDocument->CurrentMesh();
87
88     DriverMED_W_SMESHDS_Mesh* myWriter = new DriverMED_W_SMESHDS_Mesh;
89
90     myWriter->SetMesh(myMesh);
91     myWriter->SetFile(myFile);
92     //myWriter->SetFileId(fid);
93     myWriter->SetMeshId(numero);
94
95     //myWriter->Write();
96     myWriter->Add();
97   }
98
99
100 }