ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/REPOS_ERICCA/magic/lib/fichier/src/mg_file.cpp
Revision: 740
Committed: Wed Sep 30 22:24:50 2015 UTC (9 years, 7 months ago) by couturad
File size: 77015 byte(s)
Log Message: 
Ajout d'assemblage dans un arbre caractéristique
Modification de la gestion des id de occ avec retro-compatibilité
script adaptable au assemblage

File Contents

# User Rev Content
1 francois 283 //------------------------------------------------------------
2     //------------------------------------------------------------
3     // MAGiC
4     // Jean Christophe Cuilli�e et Vincent FRANCOIS
5     // D�artement de G�ie M�anique - UQTR
6     //------------------------------------------------------------
7     // Le projet MAGIC est un projet de recherche du d�artement
8     // de g�ie m�anique de l'Universit�du Qu�ec �
9     // Trois Rivi�es
10     // Les librairies ne peuvent �re utilis�s sans l'accord
11     // des auteurs (contact : francois@uqtr.ca)
12     //------------------------------------------------------------
13     //------------------------------------------------------------
14     //
15     // mg_file.cpp
16     //
17     //------------------------------------------------------------
18     //------------------------------------------------------------
19     // COPYRIGHT 2000
20     // Version du 02/03/2006 �11H22
21     //------------------------------------------------------------
22     //------------------------------------------------------------
23    
24    
25     #include "gestionversion.h"
26    
27     #pragma hdrstop
28    
29     #include <string.h>
30     #include "mg_file.h"
31 francois 526 #include "mg_sommet_noeud.h"
32 francois 576 #include "mg_arete_element.h"
33     #include "mg_face_element.h"
34     #include "mg_volume_element.h"
35 francois 685 #include "mg_coque_element.h"
36 francois 283 #include "pars_argument.h"
37     #include "parse.h"
38     #ifdef BREP_STEP
39     #include "step_surface.h"
40     #include "step_courbe.h"
41     #include "step_point.h"
42     #endif
43     #ifdef BREP_SAT
44     #include "acis_surface.h"
45     #include "acis_courbe.h"
46     #include "acis_point.h"
47     #endif
48     #include "lc_point.h"
49 francois 310 #include "fem_segment2.h"
50     #include "fem_segment3.h"
51     #include "fem_triangle3.h"
52     #include "fem_triangle6.h"
53     #include "fem_quadrangle4.h"
54     #include "fem_quadrangle8.h"
55     #include "fem_tetra4.h"
56 francois 380 #include "xfem_segment2.h"
57 francois 410 #include "xfem_triangle3.h"
58 francois 339 #include "xfem_tetra4.h"
59 francois 310 #include "fem_tetra10.h"
60     #include "fem_hexa8.h"
61     #include "fem_hexa20.h"
62 francois 283 //OCC
63     #ifdef BREP_OCC
64     #include "occ_surface.h"
65     #include "occ_point.h"
66     #include "occ_courbe.h"
67 couturad 740 #include "occ_fonction.h"
68 francois 283 #include "TopoDS_Shape.hxx"
69     #include "TopoDS.hxx"
70     #endif
71 francois 689 #ifdef CSG_OCC
72 couturad 740 #include "mg_assemblage.h"
73 francois 689 #include "mg_primitive_boite.h"
74 couturad 723 #include "mg_primitive_sphere.h"
75     #include "mg_primitive_cylindre.h"
76 couturad 724 #include "mg_primitive_cone.h"
77     #include "mg_primitive_tore.h"
78 francois 689 #include "mg_primitive_complexe.h"
79     #include "mg_operateur_boolean_union.h"
80 couturad 723 #include "mg_operateur_boolean_difference.h"
81     #include "mg_operateur_boolean_intersection.h"
82 francois 689 #endif
83 francois 283 //---------------------------------------------------------------------------
84     // CAD4FE Headers
85     #ifdef WINDOWS_VERSION
86     #include "CAD4FE_MCEdge.h"
87     #include "CAD4FE_MCFace.h"
88     #include "CAD4FE_MCVertex.h"
89     #include "CAD4FE_PolySurface.h"
90     #include "CAD4FE_PolyCurve.h"
91     #include "CAD4FE_MCNode.h"
92     #include "CAD4FE_MCSegment.h"
93     #include "CAD4FE_MCTriangle.h"
94     #include "CAD4FE_m3d_MCTriangle.h"
95     #endif
96     //---------------------------------------------------------------------------
97    
98    
99     //---------------------------------------------------------------------------
100     #pragma package(smart_init)
101    
102    
103     MG_FILE::MG_FILE(char* chemin):MG_GESTIONNAIRE()
104     {
105     code_de_lecture=lire(chemin);
106     }
107    
108 francois 551 MG_FILE::MG_FILE():MG_GESTIONNAIRE()
109     {
110     }
111    
112 francois 283 MG_FILE::~MG_FILE()
113     {
114     }
115    
116     int MG_FILE::get_code_de_lecture(void)
117     {
118     return code_de_lecture;
119     }
120    
121     long MG_FILE::cid(std::string str)
122     {
123     const char *p=str.c_str();
124     if (*p=='$') return atol(p+1);
125     return -1;
126     }
127    
128 francois 551
129    
130    
131    
132     void MG_FILE::lire_NOEUD(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
133     {
134     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
135     long idtopo=cid(param[2].argument[0]);
136     double x=atof(param[3].argument[0].c_str());
137     double y=atof(param[4].argument[0].c_str());
138     double z=atof(param[5].argument[0].c_str());
139     int ori=atoi(param[6].argument[0].c_str());
140     MG_ELEMENT_TOPOLOGIQUE* topo;
141     if (idtopo>-1)
142     {
143     topo=mggeo->get_mg_sommetid(idtopo);
144     if (topo==NULL) topo=mggeo->get_mg_areteid(idtopo);
145     if (topo==NULL) topo=mggeo->get_mg_faceid(idtopo);
146     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
147     }
148     else topo=NULL;
149     MG_NOEUD* noeud=new MG_NOEUD(id,topo,x,y,z,ori);
150     mgmai->ajouter_mg_noeud(noeud);
151     }
152    
153     void MG_FILE::lire_SEGMENT(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
154     {
155     parse.decode(data.c_str(),"@,@,@,@",param+2);
156     long idtopo=cid(param[2].argument[0]);
157     long idn1=cid(param[3].argument[0]);
158     long idn2=cid(param[4].argument[0]);
159     int ori=atoi(param[5].argument[0].c_str());
160     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
161     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
162     MG_ELEMENT_TOPOLOGIQUE* topo;
163     if (idtopo>-1)
164     {
165     topo=mggeo->get_mg_areteid(idtopo);
166     if (topo==NULL) topo=mggeo->get_mg_faceid(idtopo);
167     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
168     }
169     else topo=NULL;
170     MG_SEGMENT* seg=new MG_SEGMENT(id,topo,noeud1,noeud2,ori);
171     mgmai->ajouter_mg_segment(seg);
172     }
173    
174    
175     void MG_FILE::lire_TRIANGLE(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
176     {
177     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
178     long idtopo=cid(param[2].argument[0]);
179     long idn1=cid(param[3].argument[0]);
180     long idn2=cid(param[4].argument[0]);
181     long idn3=cid(param[5].argument[0]);
182     int ori=atoi(param[6].argument[0].c_str());
183     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
184     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
185     MG_NOEUD* noeud3=mgmai->get_mg_noeudid(idn3);
186     MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
187     if (idtopo>-1)
188     {
189     topo=mggeo->get_mg_faceid(idtopo);
190     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
191     }
192     mgmai->ajouter_mg_triangle(topo,noeud1,noeud2,noeud3,ori,id);
193     }
194    
195     void MG_FILE::lire_QUADRANGLE(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
196     {
197     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
198     long idtopo=cid(param[2].argument[0]);
199     long idn1=cid(param[3].argument[0]);
200     long idn2=cid(param[4].argument[0]);
201     long idn3=cid(param[5].argument[0]);
202     long idn4=cid(param[6].argument[0]);
203     int ori=atoi(param[7].argument[0].c_str());
204     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
205     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
206     MG_NOEUD* noeud3=mgmai->get_mg_noeudid(idn3);
207     MG_NOEUD* noeud4=mgmai->get_mg_noeudid(idn4);
208     MG_ELEMENT_TOPOLOGIQUE* topo;
209     if (idtopo>-1)
210     {
211     topo=mggeo->get_mg_faceid(idtopo);
212     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
213     }
214     else topo=NULL;
215     mgmai->ajouter_mg_quadrangle(topo,noeud1,noeud2,noeud3,noeud4,ori,id);
216     }
217    
218    
219     void MG_FILE::lire_TETRA(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
220     {
221     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
222     long idtopo=cid(param[2].argument[0]);
223     long idn1=cid(param[3].argument[0]);
224     long idn2=cid(param[4].argument[0]);
225     long idn3=cid(param[5].argument[0]);
226     long idn4=cid(param[6].argument[0]);
227     int ori=atoi(param[7].argument[0].c_str());
228     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
229     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
230     MG_NOEUD* noeud3=mgmai->get_mg_noeudid(idn3);
231     MG_NOEUD* noeud4=mgmai->get_mg_noeudid(idn4);
232     MG_ELEMENT_TOPOLOGIQUE* topo;
233     if (idtopo>-1) topo=mggeo->get_mg_volumeid(idtopo);
234     else topo=NULL;
235     if (noeud1&&noeud2&&noeud3&&noeud4) mgmai->ajouter_mg_tetra(topo,noeud1,noeud2,noeud3,noeud4,ori,id);
236     }
237    
238     void MG_FILE::lire_HEXA(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
239     {
240     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@",param+2);
241     long idtopo=cid(param[2].argument[0]);
242     long idn1=cid(param[3].argument[0]);
243     long idn2=cid(param[4].argument[0]);
244     long idn3=cid(param[5].argument[0]);
245     long idn4=cid(param[6].argument[0]);
246     long idn5=cid(param[7].argument[0]);
247     long idn6=cid(param[8].argument[0]);
248     long idn7=cid(param[9].argument[0]);
249     long idn8=cid(param[10].argument[0]);
250     int ori=atoi(param[11].argument[0].c_str());
251     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
252     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
253     MG_NOEUD* noeud3=mgmai->get_mg_noeudid(idn3);
254     MG_NOEUD* noeud4=mgmai->get_mg_noeudid(idn4);
255     MG_NOEUD* noeud5=mgmai->get_mg_noeudid(idn5);
256     MG_NOEUD* noeud6=mgmai->get_mg_noeudid(idn6);
257     MG_NOEUD* noeud7=mgmai->get_mg_noeudid(idn7);
258     MG_NOEUD* noeud8=mgmai->get_mg_noeudid(idn8);
259     MG_ELEMENT_TOPOLOGIQUE* topo;
260     if (idtopo>-1) topo=mggeo->get_mg_volumeid(idtopo);
261     else topo=NULL;
262     mgmai->ajouter_mg_hexa(topo,noeud1,noeud2,noeud3,noeud4,noeud5,noeud6,noeud7,noeud8,ori,id);
263     }
264    
265    
266    
267    
268    
269    
270    
271    
272 francois 283 int MG_FILE::lire(char* chemin)
273     {
274     FILE *in;
275 francois 706 //char ligne[3000];
276 francois 283 in=fopen(chemin,"rt");
277     if (in==NULL) return 0;
278     PARS_ARGUMENT param[100];
279     PARSE parse;
280    
281     MG_GEOMETRIE *mggeo;
282 francois 689 MG_ARBRE* arbre;
283 francois 283 #ifdef WINDOWS_VERSION
284     std::multimap<CAD4FE::MCVertex*, unsigned long> mapMergedRefVertices;
285     #endif
286     bool updatedMergedRefVertices = false;
287    
288     do
289     {
290     int ierr;
291     std::string ligne=parse.lire(in,';',&ierr);
292     parse.decode(ligne.c_str(),"@;",param);
293     const char *chaine=param[0].argument[0].c_str();
294     if ((chaine[0]=='/') && (chaine[1]=='/'))
295     {
296     if ((chaine[2]=='*')&&(chaine[3]=='i'))
297     {
298     unsigned long id;
299     sscanf(chaine,"//*i:%lu;",&id);
300     entiteidmax=id;
301     }
302     }
303     else if (param[0].argument[0]!="FIN")
304     {
305     parse.decode(ligne.c_str(),"%@=@(@);",param);
306     std::string entite=param[1].argument[0];
307     long id=atol(param[0].argument[0].c_str());
308     std::string data=param[2].argument[0] ;
309     MG_MAILLAGE *mgmai;
310     FEM_MAILLAGE *femmai;
311     if (entite=="GEOMETRIE")
312     {
313     parse.decode(data.c_str(),"@,@,@,@",param+2);
314     double unite=atof(param[2].argument[0].c_str());
315     std::string typegeo=param[3].argument[0];
316     std::string chemin=param[4].argument[0];
317 francois 576 if (typegeo=="VIRTUEL")
318     {
319     mggeo=new MG_GEOMETRIE((char*)typegeo.c_str(),id,(char*)chemin.c_str(),unite);
320     ajouter_mg_geometrie(mggeo);
321     }
322 francois 283 #ifdef BREP_STEP
323     if (typegeo=="STEP")
324     {
325 couturad 740 mggeo=new MG_GEOMETRIE((char*)"STEP",id,(char *)chemin.c_str(),unite);
326 francois 283 ajouter_mg_geometrie(mggeo);
327     }
328     #endif
329     #ifdef BREP_SAT
330     if (typegeo=="ACIS")
331     {
332 couturad 740 mggeo=new MG_GEOMETRIE((char*)"ACIS",id,(char *)chemin.c_str(),unite);
333 francois 283 ajouter_mg_geometrie(mggeo);
334     }
335     #endif
336    
337     #ifdef BREP_OCC
338     if (typegeo=="OCC")
339     {
340     mggeo=new MG_GEOMETRIE((char*)"OCC",id,chemin.c_str(),unite);
341     ajouter_mg_geometrie(mggeo);
342     }
343 couturad 740 if (typegeo=="OCCV2015")
344     {
345     mggeo=new MG_GEOMETRIE((char*)"OCCV2015",id,chemin.c_str(),unite);
346     ajouter_mg_geometrie(mggeo);
347     }
348 francois 283 #endif
349    
350     std::string nommat="";
351     if (param[5].argument[0]!="")
352     nommat=param[5].argument[0];
353     mggeo->change_gest_materiau((char*)nommat.c_str());
354     }
355 francois 689 #ifdef CSG_OCC
356     if (entite=="ARBRE")
357     {
358     parse.decode(data.c_str(),"@",param+2);
359     std::string nom=param[2].argument[0];
360     arbre=new MG_ARBRE(id,nom.c_str());
361     ajouter_mg_arbre(arbre);
362     }
363 couturad 740 if (entite == "ASSEMBLAGE")
364     {
365     parse.decode(data.c_str(),"@,@,(&)",param+2);
366     std::string nom=param[2].argument[0];
367     int nb_primitive = atoi((char*)param[3].argument[0].c_str());
368     MG_ASSEMBLAGE *mgassembl=new MG_ASSEMBLAGE(id,nom.c_str());
369     for(int i=0;i<nb_primitive;i++)
370     {
371     unsigned long id2 = cid(param[4].argument[i]);
372     MG_PRIMITIVE *prim = arbre->get_mg_primitiveid(id2);
373     mgassembl->ajouter_mg_primitive(prim);
374     }
375     arbre->ajouter_mg_assemblage(mgassembl);
376     }
377 francois 689 if (entite=="BOITE")
378     {
379     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
380     double x1=atof((char*)param[2].argument[0].c_str());
381     double y1=atof((char*)param[3].argument[0].c_str());
382     double z1=atof((char*)param[4].argument[0].c_str());
383     double x2=atof((char*)param[5].argument[0].c_str());
384     double y2=atof((char*)param[6].argument[0].c_str());
385     double z2=atof((char*)param[7].argument[0].c_str());
386     MG_PRIMITIVE_BOITE *b=new MG_PRIMITIVE_BOITE(id,x1,y1,z1,x2,y2,z2);
387     b->construit();
388     arbre->ajouter_mg_primitive(b);
389     }
390 couturad 723 if (entite=="SPHERE")
391 francois 689 {
392 couturad 723 parse.decode(data.c_str(),"@,@,@,@",param+2);
393     double centre_x=atof((char*)param[2].argument[0].c_str());
394     double centre_y=atof((char*)param[3].argument[0].c_str());
395     double centre_z=atof((char*)param[4].argument[0].c_str());
396     double rayon=atof((char*)param[5].argument[0].c_str());
397     MG_PRIMITIVE_SPHERE *b=new MG_PRIMITIVE_SPHERE(id,centre_x,centre_y,centre_z,rayon);
398     b->construit();
399     arbre->ajouter_mg_primitive(b);
400     }
401     if (entite=="CYLINDRE")
402     {
403     parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
404     double extremite_x=atof((char*)param[2].argument[0].c_str());
405     double extremite_y=atof((char*)param[3].argument[0].c_str());
406     double extremite_z=atof((char*)param[4].argument[0].c_str());
407     double longitude=atof((char*)param[5].argument[0].c_str());
408     double latitude=atof((char*)param[6].argument[0].c_str());
409     double rayon=atof((char*)param[7].argument[0].c_str());
410     double longueur=atof((char*)param[8].argument[0].c_str());
411     MG_PRIMITIVE_CYLINDRE *b=new MG_PRIMITIVE_CYLINDRE(id,extremite_x,extremite_y,extremite_z,longitude,latitude,rayon,longueur);
412     b->construit();
413     arbre->ajouter_mg_primitive(b);
414     }
415 couturad 724 if (entite=="TORE")
416     {
417     parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
418     double centre_x=atof((char*)param[2].argument[0].c_str());
419     double centre_y=atof((char*)param[3].argument[0].c_str());
420     double centre_z=atof((char*)param[4].argument[0].c_str());
421     double longitude=atof((char*)param[5].argument[0].c_str());
422     double latitude=atof((char*)param[6].argument[0].c_str());
423     double rayon_cercle=atof((char*)param[7].argument[0].c_str());
424     double rayon_tore=atof((char*)param[8].argument[0].c_str());
425     MG_PRIMITIVE_TORE *b=new MG_PRIMITIVE_TORE(id,centre_x,centre_y,centre_z,longitude,latitude,rayon_cercle,rayon_tore);
426     b->construit();
427     arbre->ajouter_mg_primitive(b);
428     }
429     if (entite=="CONE")
430     {
431     parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
432     double base_x=atof((char*)param[2].argument[0].c_str());
433     double base_y=atof((char*)param[3].argument[0].c_str());
434     double base_z=atof((char*)param[4].argument[0].c_str());
435     double longitude=atof((char*)param[5].argument[0].c_str());
436     double latitude=atof((char*)param[6].argument[0].c_str());
437     double rayon=atof((char*)param[7].argument[0].c_str());
438     double hauteur=atof((char*)param[8].argument[0].c_str());
439     MG_PRIMITIVE_CONE *b=new MG_PRIMITIVE_CONE(id,base_x,base_y,base_z,longitude,latitude,rayon,hauteur);
440     b->construit();
441     arbre->ajouter_mg_primitive(b);
442     }
443 couturad 723 if (entite=="UNION")
444     {
445 francois 689 parse.decode(data.c_str(),"@,@,@",param+2);
446     int sem=atoi((char*)param[2].argument[0].c_str());
447     long id1=cid((char*)param[3].argument[0].c_str());
448     long id2=cid((char*)param[4].argument[0].c_str());
449     MG_PRIMITIVE *p1=arbre->get_mg_primitiveid(id1);
450     MG_PRIMITIVE *p2=arbre->get_mg_primitiveid(id2);
451     MG_OPERATEUR_BOOLEAN_UNION *op=new MG_OPERATEUR_BOOLEAN_UNION(id,sem,p1,p2);
452     arbre->ajouter_mg_operateur_boolean(op);
453     }
454 couturad 723 if (entite=="DIFFERENCE")
455     {
456     parse.decode(data.c_str(),"@,@,@",param+2);
457     int sem=atoi((char*)param[2].argument[0].c_str());
458     long id1=cid((char*)param[3].argument[0].c_str());
459     long id2=cid((char*)param[4].argument[0].c_str());
460     MG_PRIMITIVE *p1=arbre->get_mg_primitiveid(id1);
461     MG_PRIMITIVE *p2=arbre->get_mg_primitiveid(id2);
462     MG_OPERATEUR_BOOLEAN_DIFFERENCE *op=new MG_OPERATEUR_BOOLEAN_DIFFERENCE(id,sem,p1,p2);
463     arbre->ajouter_mg_operateur_boolean(op);
464     }
465     if (entite=="INTERSECTION")
466     {
467     parse.decode(data.c_str(),"@,@,@",param+2);
468     int sem=atoi((char*)param[2].argument[0].c_str());
469     long id1=cid((char*)param[3].argument[0].c_str());
470     long id2=cid((char*)param[4].argument[0].c_str());
471     MG_PRIMITIVE *p1=arbre->get_mg_primitiveid(id1);
472     MG_PRIMITIVE *p2=arbre->get_mg_primitiveid(id2);
473     MG_OPERATEUR_BOOLEAN_INTERSECTION *op=new MG_OPERATEUR_BOOLEAN_INTERSECTION(id,sem,p1,p2);
474     arbre->ajouter_mg_operateur_boolean(op);
475     }
476 francois 689 if (entite=="PRIM_COMPLEXE")
477     {
478     parse.decode(data.c_str(),"@",param+2);
479     long id1=cid((char*)param[2].argument[0].c_str());
480     MG_OPERATEUR_BOOLEAN *op=arbre->get_mg_operateur_booleanid(id1);
481     MG_PRIMITIVE* p=op->construit(id);
482     arbre->ajouter_mg_primitive(p);
483     }
484    
485    
486    
487    
488     #endif
489 francois 283 if (entite=="GEOMETRIE_EPS")
490     {
491     parse.decode(data.c_str(),"@",param+2);
492     double val=atof((char*)param[2].argument[0].c_str());
493     mggeo->change_valeur_precision(val);
494     }
495     if (entite=="GROUPE_TOPOLOGIQUE")
496     {
497     parse.decode(data.c_str(),"@,(&)",param+2);
498     MG_GROUPE_TOPOLOGIQUE* mggt=new MG_GROUPE_TOPOLOGIQUE(id);
499     mggeo->ajouter_mg_groupe_topologique(mggt);
500     int nb=atoi(param[2].argument[0].c_str());
501     for (int i=0;i<nb;i++)
502     {
503     unsigned long id2=cid(param[3].argument[i].c_str());
504     MG_ELEMENT_TOPOLOGIQUE* ele;
505     ele=mggeo->get_mg_sommetid(id2);
506     if (ele==NULL) ele=mggeo->get_mg_areteid(id2);
507     if (ele==NULL) ele=mggeo->get_mg_faceid(id2);
508     if (ele==NULL) ele=mggeo->get_mg_volumeid(id2);
509     if (ele!=NULL) mggt->ajouter(ele);
510     }
511    
512     }
513 francois 711 if (entite=="GEOM_FONCTION")
514     {
515     parse.decode(data.c_str(),"@,@,(&)",param+2);
516     int dim=atoi((char*)param[2].argument[0].c_str());
517     MG_GEOM_FONCTION *gf=new MG_GEOM_FONCTION(id,dim);
518     mggeo->ajouter_mg_geom_fonction(gf);
519     int nb=atoi(param[3].argument[0].c_str());
520     for (int i=0;i<nb;i++)
521     {
522     parse.decode(param[4].argument[i].c_str(),"(&)",param+5);
523     double *coo=new double[dim];
524     for (int j=0;j<dim;j++)
525     coo[j]=atof(param[5].argument[j].c_str());
526     gf->ajouter_point(coo);
527     delete [] coo;
528     }
529    
530     }
531    
532 francois 283 if (entite=="VOLUME")
533     {
534     parse.decode(data.c_str(),"@,@,@,@,(&)",param+2);
535     MG_VOLUME* mgvol=new MG_VOLUME(param[2].argument[0],id);
536     mggeo->ajouter_mg_volume(mgvol);
537     int nummat=atoi((char*)param[4].argument[0].c_str());
538     mgvol->change_num_materiau(nummat);
539     int nb=atoi(param[5].argument[0].c_str());
540     if (nb!=0)
541     {
542     for (int i=0;i<nb;i++)
543     {
544     parse.decode(param[6].argument[i].c_str(),"(@,@)",param+7);
545     char nom[3];
546     double val;
547     strcpy(nom,param[7].argument[0].c_str());
548     val=atof(param[8].argument[0].c_str());
549     mgvol->ajouter_ccf(nom,val);
550     }
551     }
552     }
553     if (entite=="COQUE")
554     {
555     parse.decode(data.c_str(),"@,@,@,@,(&)",param+2);
556     MG_COQUE* mgcoq=new MG_COQUE(param[2].argument[0],id);
557     mggeo->ajouter_mg_coque(mgcoq);
558     int nummat=atoi((char*)param[4].argument[0].c_str());
559     mgcoq->change_num_materiau(nummat);
560     int nb=atoi(param[5].argument[0].c_str());
561     if (nb!=0)
562     {
563     for (int i=0;i<nb;i++)
564     {
565     parse.decode(param[6].argument[i].c_str(),"(@,@)",param+7);
566     char nom[3];
567     double val;
568     strcpy(nom,param[7].argument[0].c_str());
569     val=atof(param[8].argument[0].c_str());
570     mgcoq->ajouter_ccf(nom,val);
571     }
572     }
573     }
574     if (entite=="POUTRE")
575     {
576     parse.decode(data.c_str(),"@,@,@,@,(&)",param+2);
577     MG_POUTRE* mgpoutre=new MG_POUTRE(param[2].argument[0],id);
578     mggeo->ajouter_mg_poutre(mgpoutre);
579     int nummat=atoi((char*)param[4].argument[0].c_str());
580     mgpoutre->change_num_materiau(nummat);
581     int nb=atoi(param[5].argument[0].c_str());
582     if (nb!=0)
583     {
584     for (int i=0;i<nb;i++)
585     {
586     parse.decode(param[6].argument[i].c_str(),"(@,@)",param+7);
587     char nom[3];
588     double val;
589     strcpy(nom,param[7].argument[0].c_str());
590     val=atof(param[8].argument[0].c_str());
591     mgpoutre->ajouter_ccf(nom,val);
592     }
593     }
594     }
595     if (entite=="COQUILLE")
596     {
597     parse.decode(data.c_str(),"@,@",param+2);
598     long ident=cid(param[2].argument[0]);
599     MG_VOLUME* mgvol=mggeo->get_mg_volumeid(ident);
600     MG_COQUE* mgcoq=mggeo->get_mg_coqueid(ident);
601     if (mgvol!=NULL)
602     {
603     MG_COQUILLE* mgcoq=new MG_COQUILLE(id,mgvol);
604     mggeo->ajouter_mg_coquille(mgcoq,mgvol);
605     }
606     if (mgcoq!=NULL)
607     {
608     MG_COQUILLE* mgcoquille=new MG_COQUILLE(id,mgcoq);
609     mggeo->ajouter_mg_coquille(mgcoquille,mgcoq);
610     }
611    
612     }
613     #ifdef BREP_STEP
614     if (entite=="SURFACE_STEP")
615     {
616     parse.decode(data.c_str(),"@",param+2);
617     long idstepsuf=atol(param[2].argument[0].c_str());
618 couturad 740 ST_SURFACE *stsurf=mggeo->get_gest_step().lst_surface.getid(idstepsuf);
619 francois 283 STEP_SURFACE* stepsurf=new STEP_SURFACE(id,stsurf);
620     mggeo->ajouter_mg_surface(stepsurf);
621     }
622     if (entite=="COURBE_STEP")
623     {
624     parse.decode(data.c_str(),"@",param+2);
625     long idstepcur=atol(param[2].argument[0].c_str());
626 couturad 740 ST_COURBE *stcur=mggeo->get_gest_step().lst_courbe.getid(idstepcur);
627 francois 283 STEP_COURBE* stepcur=new STEP_COURBE(id,stcur);
628     mggeo->ajouter_mg_courbe(stepcur);
629     }
630    
631     if (entite=="POINT_STEP")
632     {
633     parse.decode(data.c_str(),"@",param+2);
634     long idsteppt=atol(param[2].argument[0].c_str());
635 couturad 740 ST_POINT *stpt=mggeo->get_gest_step().lst_point.getid(idsteppt);
636 francois 283 STEP_POINT* steppt=new STEP_POINT(id,stpt);
637     mggeo->ajouter_mg_point(steppt);
638     }
639    
640     #endif
641     #ifdef BREP_SAT
642     if (entite=="SURFACE_SAT")
643     {
644     parse.decode(data.c_str(),"@",param+2);
645     long idsatsuf=atol(param[2].argument[0].c_str());
646 couturad 740 SAT_SURFACE *satsurf=mggeo->get_gest_sat().lst_surface.getid(idsatsuf);
647 francois 283 ACIS_SURFACE* acissurf=new ACIS_SURFACE(id,satsurf);
648     mggeo->ajouter_mg_surface(acissurf);
649     }
650     if (entite=="COURBE_SAT")
651     {
652     parse.decode(data.c_str(),"@",param+2);
653     long idsatcur=atol(param[2].argument[0].c_str());
654 couturad 740 SAT_COURBE *satcur=mggeo->get_gest_sat().lst_courbe.getid(idsatcur);
655 francois 283 ACIS_COURBE* aciscur=new ACIS_COURBE(id,satcur);
656     mggeo->ajouter_mg_courbe(aciscur);
657     }
658    
659     if (entite=="POINT_SAT")
660     {
661     parse.decode(data.c_str(),"@",param+2);
662     long idsatpt=atol(param[2].argument[0].c_str());
663 couturad 740 SAT_POINT *satpt=mggeo->get_gest_sat().lst_point.getid(idsatpt);
664 francois 283 ACIS_POINT* acispt=new ACIS_POINT(id,satpt);
665     mggeo->ajouter_mg_point(acispt);
666     }
667    
668     #endif
669    
670     #ifdef BREP_OCC
671    
672     if (entite=="SURFACE_OCC")
673     {
674     parse.decode(data.c_str(),"@",param+2);
675     long idocc=atol(param[2].argument[0].c_str());
676 couturad 740 const TopoDS_Shape& occshape=mggeo->get_occ_fonction().GetShape(idocc);
677 francois 283 TopoDS_Face occface=TopoDS::Face(occshape);
678 couturad 740 OCC_SURFACE* occsurf=new OCC_SURFACE(id,occface,mggeo->get_occ_fonction());
679 francois 283 mggeo->ajouter_mg_surface(occsurf);
680     }
681     if (entite=="COURBE_OCC")
682     {
683     parse.decode(data.c_str(),"@",param+2);
684     long idocc=atol(param[2].argument[0].c_str());
685 couturad 740 const TopoDS_Shape& occshape=mggeo->get_occ_fonction().GetShape(idocc);
686 francois 283 TopoDS_Edge occedge=TopoDS::Edge(occshape);
687 couturad 740 OCC_COURBE* occcrb=new OCC_COURBE(id,occedge, mggeo->get_occ_fonction());
688 francois 283 mggeo->ajouter_mg_courbe(occcrb);
689     }
690     if (entite=="POINT_OCC")
691     {
692     parse.decode(data.c_str(),"@",param+2);
693     long idocc=atol(param[2].argument[0].c_str());
694 couturad 740 const TopoDS_Shape& occshape=mggeo->get_occ_fonction().GetShape(idocc);
695 francois 283 TopoDS_Vertex occvertex=TopoDS::Vertex(occshape);
696 couturad 740 OCC_POINT* occpoint=new OCC_POINT(id,occvertex, mggeo->get_occ_fonction());
697 francois 283 mggeo->ajouter_mg_point(occpoint);
698     }
699     #endif
700     #ifdef WINDOWS_VERSION
701     if (entite=="CAD4FE_POLYCURVE")
702     {
703     CAD4FE::PolyCurve * polycurve = NULL;
704     parse.decode(data.c_str(),"@,(&)",param+2);
705     int nb = atoi(param[2].argument[0].c_str());
706    
707     if (nb == 0)
708     {
709     printf("PolyCurve %d is formed with reference vertex : ", id);
710     parse.decode(param[3].argument[0].c_str(),"@",param+4);
711     int idRefVertex;
712     idRefVertex=cid(param[4].argument[0].c_str());
713     printf("%d ;\n ", idRefVertex);
714     MG_SOMMET * refVertex = mggeo->get_mg_sommetid(idRefVertex);
715     polycurve = new CAD4FE::PolyCurve(refVertex);
716     }
717     else
718     {
719     printf("PolyCurve %d is formed with reference edges : ", id);
720     polycurve = new CAD4FE::PolyCurve;
721     for (int i=0;i<nb;i++)
722     {
723     parse.decode(param[3].argument[i].c_str(),"@",param+4);
724     int idRefEdge;
725     idRefEdge=cid(param[4].argument[0].c_str());
726     printf("%d ; ", idRefEdge);
727     MG_ARETE * refEdge = mggeo->get_mg_areteid(idRefEdge);
728     CAD4FE::PolyCurve tmpPC(refEdge);
729     polycurve->Merge(tmpPC);
730     }
731     printf("\n");
732     }
733    
734     polycurve->change_id(id);
735     mggeo->ajouter_mg_courbe(polycurve);
736     }
737    
738    
739     if (entite=="CAD4FE_POLYSURFACE")
740     {
741     CAD4FE::PolySurface * polysurface = new CAD4FE::PolySurface;
742     polysurface->change_id(id);
743     mggeo->ajouter_mg_surface(polysurface);
744    
745     parse.decode(data.c_str(),"@,(&)",param+2);
746    
747     int nb = atoi(param[2].argument[0].c_str());
748     printf("PolySurface %d is formed with reference faces : ", id);
749     for (int i=0;i<nb;i++)
750     {
751     parse.decode(param[3].argument[i].c_str(),"@",param+4);
752     int idRefFace;
753     idRefFace=cid(param[4].argument[0].c_str());
754     printf("%d ; ", idRefFace);
755    
756     MG_FACE * refFace = mggeo->get_mg_faceid(idRefFace);
757     CAD4FE::PolySurface tmpSF(refFace);
758     polysurface->Merge(tmpSF);
759     }
760    
761     printf("\n");
762     }
763     if (entite=="CAD4FE_MCEDGE")
764     {
765     parse.decode(data.c_str(),"@,@,@,@,@,@,(&)",param+2);
766    
767     std::string idOriginal = param[2].argument[0];
768     long idPolyCurve=cid(param[3].argument[0]);
769     CAD4FE::PolyCurve * polycurve = (CAD4FE::PolyCurve *) mggeo->get_mg_courbeid(idPolyCurve);
770    
771     // sense is not used because a MCEdge always has
772     // a sense = 1 !
773     // (because polycurve domain is equal to mcEdge domain)
774     CAD4FE::MCEdge * mcEdge = new CAD4FE::MCEdge(idOriginal, polycurve);
775     mcEdge->change_id(id);
776     mggeo->ajouter_mg_arete(mcEdge);
777    
778     int nb=atoi(param[7].argument[0].c_str());
779     if (nb!=0)
780     {
781     for (int i=0;i<nb;i++)
782     {
783     parse.decode(param[8].argument[i].c_str(),"(@,@)",param+9);
784     char nom[3];
785     double val;
786     strcpy(nom,param[9].argument[0].c_str());
787     val=atof(param[10].argument[0].c_str());
788     mcEdge->ajouter_ccf(nom,val);
789     }
790     }
791     }
792     if (entite=="CAD4FE_MCFACE")
793     {
794     parse.decode(data.c_str(),"@,@,@,@,@,(&)",param+2);
795    
796     std::string idOriginal = param[2].argument[0];
797     long idPolySurface=cid(param[3].argument[0]);
798     CAD4FE::PolySurface * polysurface = (CAD4FE::PolySurface *) mggeo->get_mg_surfaceid(idPolySurface);
799    
800     CAD4FE::MCFace * mcFace = new CAD4FE::MCFace(idOriginal, polysurface);
801     mcFace->change_id(id);
802     mggeo->ajouter_mg_face(mcFace);
803    
804     int nb=atoi(param[6].argument[0].c_str());
805     if (nb!=0)
806     {
807     for (int i=0;i<nb;i++)
808     {
809     parse.decode(param[7].argument[i].c_str(),"(@,@)",param+8);
810     char nom[3];
811     double val;
812     strcpy(nom,param[8].argument[0].c_str());
813     val=atof(param[9].argument[0].c_str());
814     mcFace->ajouter_ccf(nom,val);
815     }
816     }
817     }
818     if (entite=="CAD4FE_MCVERTEX")
819     {
820     parse.decode(data.c_str(),"@,@,@,(&),@,(&)",param+2);
821     std::string idOriginal = param[2].argument[0];
822     long idsom=cid(param[3].argument[0]);
823     MG_SOMMET * mgsom = mggeo->get_mg_sommetid(idsom);
824     CAD4FE::MCVertex * mcVertex = new CAD4FE::MCVertex(mgsom);
825     mcVertex->change_id(id);
826     mggeo->ajouter_mg_sommet(mcVertex);
827     int nb_ref_vertex=atoi(param[4].argument[0].c_str());
828     if (nb_ref_vertex!=0)
829     {
830     for (int i=0;i<nb_ref_vertex;i++)
831     {
832     unsigned long idRefVertex=cid(param[5].argument[i]);
833     mcVertex->GetMergedRefVertices()[idRefVertex] = NULL;
834     mapMergedRefVertices.insert(std::make_pair(mcVertex,idRefVertex));
835     }
836     }
837     int nb_ccf=atoi(param[4+2].argument[0].c_str());
838     if (nb_ccf!=0)
839     {
840     for (int i=0;i<nb_ccf;i++)
841     {
842     parse.decode(param[5+2].argument[i].c_str(),"(@,@)",param+6+2);
843     char nom_ccf[3];
844     double val_ccf;
845     strcpy(nom_ccf,param[6+2].argument[0].c_str());
846     val_ccf=atof(param[7+2].argument[0].c_str());
847     mgsom->ajouter_ccf(nom_ccf,val_ccf);
848     }
849     }
850     }
851     #endif
852     if (entite=="FACE")
853     {
854     parse.decode(data.c_str(),"@,@,(@),@,@,(&)",param+2);
855     long idsurf=cid(param[3].argument[0]);
856     int sens=atoi(param[5].argument[0].c_str());
857     MG_SURFACE* mgsurf=mggeo->get_mg_surfaceid(idsurf);
858     MG_FACE* mgface=new MG_FACE(param[2].argument[0],id,mgsurf,sens);
859     mggeo->ajouter_mg_face(mgface);
860     int nb=atoi(param[6].argument[0].c_str());
861     if (nb!=0)
862     {
863     for (int i=0;i<nb;i++)
864     {
865     parse.decode(param[7].argument[i].c_str(),"(@,@)",param+8);
866     char nom[3];
867     double val;
868     strcpy(nom,param[8].argument[0].c_str());
869     val=atof(param[9].argument[0].c_str());
870     mgface->ajouter_ccf(nom,val);
871     }
872     }
873     }
874     if (entite=="COFACE")
875     {
876     parse.decode(data.c_str(),"@,@,@",param+2);
877     long idface=cid(param[2].argument[0]);
878     long idcoq=cid(param[3].argument[0]);
879     int sens=atoi(param[4].argument[0].c_str());
880     MG_FACE* mgface=mggeo->get_mg_faceid(idface);
881     MG_COQUILLE* mgcoq=mggeo->get_mg_coquilleid(idcoq);
882     MG_COFACE* mgcoface=mggeo->ajouter_mg_coface(id,mgface,mgcoq,sens);
883     mgcoq->ajouter_mg_coface(mgcoface);
884     }
885     if (entite=="BOUCLE")
886     {
887     parse.decode(data.c_str(),"@,(@)",param+2);
888     long ident=cid(param[2].argument[0]);
889     MG_FACE* mgface=mggeo->get_mg_faceid(ident);
890     MG_POUTRE* mgpoutre=mggeo->get_mg_poutreid(ident);
891     if (mgface!=NULL)
892     {
893     MG_BOUCLE* mgbou=new MG_BOUCLE(id,mgface);
894     mggeo->ajouter_mg_boucle(mgbou,mgface);
895     }
896     if (mgpoutre!=NULL)
897     {
898     MG_BOUCLE* mgbou=new MG_BOUCLE(id,mgpoutre);
899     mggeo->ajouter_mg_boucle(mgbou,mgpoutre);
900     }
901     }
902     if (entite=="POINT")
903     {
904     parse.decode(data.c_str(),"@,@,@",param+2);
905     double xyz[3];
906     xyz[0]=atof(param[2].argument[0].c_str());
907     xyz[1]=atof(param[3].argument[0].c_str());
908     xyz[2]=atof(param[4].argument[0].c_str());
909     LC_POINT* point=new LC_POINT(id,xyz);
910     mggeo->ajouter_mg_point(point);
911     }
912     if (entite=="SOMMET")
913     {
914     parse.decode(data.c_str(),"@,@,@,(&)",param+2);
915     long idpoint=cid(param[3].argument[0]);
916     MG_POINT* mgpt=mggeo->get_mg_pointid(idpoint);
917     MG_SOMMET* mgsom=new MG_SOMMET(param[2].argument[0],id,mgpt);
918     mggeo->ajouter_mg_sommet(mgsom);
919     int nb=atoi(param[4].argument[0].c_str());
920     if (nb!=0)
921     {
922     for (int i=0;i<nb;i++)
923     {
924     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
925     char nom[3];
926     double val;
927     strcpy(nom,param[6].argument[0].c_str());
928     val=atof(param[7].argument[0].c_str());
929     mgsom->ajouter_ccf(nom,val);
930     }
931     }
932     }
933 francois 576 if (entite=="ARETE_ELEMENT")
934     {
935     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
936     MG_ARETE_ELEMENT* are=new MG_ARETE_ELEMENT(id);
937     mggeo->ajouter_mg_arete(are);
938     int nb=atoi(param[4].argument[0].c_str());
939     if (nb!=0)
940     {
941     for (int i=0;i<nb;i++)
942     {
943     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
944     char nom[3];
945     double val;
946     strcpy(nom,param[6].argument[0].c_str());
947     val=atof(param[7].argument[0].c_str());
948     are->ajouter_ccf(nom,val);
949     }
950     }
951     }
952     if (entite=="FACE_ELEMENT")
953     {
954     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
955     MG_FACE_ELEMENT* face=new MG_FACE_ELEMENT(id);
956     mggeo->ajouter_mg_face(face);
957     int nb=atoi(param[4].argument[0].c_str());
958     if (nb!=0)
959     {
960     for (int i=0;i<nb;i++)
961     {
962     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
963     char nom[3];
964     double val;
965     strcpy(nom,param[6].argument[0].c_str());
966     val=atof(param[7].argument[0].c_str());
967     face->ajouter_ccf(nom,val);
968     }
969     }
970     }
971 francois 685 if (entite=="COQUE_ELEMENT")
972     {
973     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
974     MG_COQUE_ELEMENT* coq=new MG_COQUE_ELEMENT(id);
975     mggeo->ajouter_mg_coque(coq);
976     int nbele=atoi(param[2].argument[0].c_str());
977     for (int i=0;i<nbele;i++)
978     {
979     unsigned long idele=cid(param[3].argument[i].c_str());
980     coq->ajouter_element(idele);
981     }
982     int nb=atoi(param[4].argument[0].c_str());
983     if (nb!=0)
984     {
985     for (int i=0;i<nb;i++)
986     {
987     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
988     char nom[3];
989     double val;
990     strcpy(nom,param[6].argument[0].c_str());
991     val=atof(param[7].argument[0].c_str());
992     coq->ajouter_ccf(nom,val);
993     }
994     }
995     }
996 francois 576 if (entite=="VOLUME_ELEMENT")
997     {
998     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
999     MG_VOLUME_ELEMENT* vol=new MG_VOLUME_ELEMENT(id);
1000     mggeo->ajouter_mg_volume(vol);
1001     int nb=atoi(param[4].argument[0].c_str());
1002     if (nb!=0)
1003     {
1004     for (int i=0;i<nb;i++)
1005     {
1006     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
1007     char nom[3];
1008     double val;
1009     strcpy(nom,param[6].argument[0].c_str());
1010     val=atof(param[7].argument[0].c_str());
1011     vol->ajouter_ccf(nom,val);
1012     }
1013     }
1014     }
1015 francois 526 if (entite=="SOMMET_NOEUD")
1016     {
1017     parse.decode(data.c_str(),"@,@,(&)",param+2);
1018     long idnoeud=cid(param[2].argument[0]);
1019     MG_SOMMET_NOEUD* mgsom=new MG_SOMMET_NOEUD(id,idnoeud);
1020     mggeo->ajouter_mg_sommet(mgsom);
1021     int nb=atoi(param[3].argument[0].c_str());
1022     if (nb!=0)
1023     {
1024     for (int i=0;i<nb;i++)
1025     {
1026     parse.decode(param[4].argument[i].c_str(),"(@,@)",param+5);
1027     char nom[3];
1028     double val;
1029     strcpy(nom,param[5].argument[0].c_str());
1030     val=atof(param[6].argument[0].c_str());
1031     mgsom->ajouter_ccf(nom,val);
1032     }
1033     }
1034     }
1035 francois 283 if (entite=="ARETE")
1036     {
1037     parse.decode(data.c_str(),"@,@,@,@,@,@,(&)",param+2);
1038     long idcur=cid(param[3].argument[0]);
1039     int sens=atoi(param[6].argument[0].c_str());
1040     MG_COURBE* mgcur=mggeo->get_mg_courbeid(idcur);
1041     MG_ARETE* mgarete=new MG_ARETE(param[2].argument[0],id,mgcur,sens);
1042     mggeo->ajouter_mg_arete(mgarete);
1043     int nb=atoi(param[7].argument[0].c_str());
1044     if (nb!=0)
1045     {
1046     for (int i=0;i<nb;i++)
1047     {
1048     parse.decode(param[8].argument[i].c_str(),"(@,@)",param+9);
1049     char nom[3];
1050     double val;
1051     strcpy(nom,param[9].argument[0].c_str());
1052     val=atof(param[10].argument[0].c_str());
1053     mgarete->ajouter_ccf(nom,val);
1054     }
1055     }
1056     }
1057     if (entite=="COSOMMET")
1058     {
1059     parse.decode(data.c_str(),"@,@,@",param+2);
1060     long idsom=cid(param[2].argument[0]);
1061     long idarete=cid(param[3].argument[0]);
1062     int num=atoi(param[4].argument[0].c_str());
1063     MG_SOMMET* mgsom=mggeo->get_mg_sommetid(idsom);
1064     MG_ARETE* mgarete=mggeo->get_mg_areteid(idarete);
1065     MG_COSOMMET* mgcosom=mggeo->ajouter_mg_cosommet(id,mgarete,mgsom);
1066     if (num==1) mgarete->changer_cosommet1(mgcosom);
1067     if (num==2) mgarete->changer_cosommet2(mgcosom);
1068     }
1069     if (entite=="COARETE")
1070     {
1071     parse.decode(data.c_str(),"@,@,@",param+2);
1072     long idarete=cid(param[2].argument[0]);
1073     long idboucle=cid(param[3].argument[0]);
1074     int sens=atoi(param[4].argument[0].c_str());
1075     MG_ARETE* mgarete=mggeo->get_mg_areteid(idarete);
1076     MG_BOUCLE* mgboucle=mggeo->get_mg_boucleid(idboucle);
1077     MG_COARETE* mgcoarete=mggeo->ajouter_mg_coarete(id,mgarete,mgboucle,sens);
1078     mgboucle->ajouter_mg_coarete(mgcoarete);
1079     }
1080     if (entite=="VISU_COURBE")
1081     {
1082     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
1083     double xyz1[3];
1084     double xyz2[3];
1085     xyz1[0]=atof(param[2].argument[0].c_str());
1086     xyz1[1]=atof(param[3].argument[0].c_str());
1087     xyz1[2]=atof(param[4].argument[0].c_str());
1088     xyz2[0]=atof(param[5].argument[0].c_str());
1089     xyz2[1]=atof(param[6].argument[0].c_str());
1090     xyz2[2]=atof(param[7].argument[0].c_str());
1091     MG_VISU_COURBE* mgcrb=new MG_VISU_COURBE(id,xyz1,xyz2);
1092     mggeo->ajouter_mg_visu_courbe(mgcrb);
1093     }
1094     if (entite=="MAILLAGE")
1095     {
1096     parse.decode(data.c_str(),"@",param+2);
1097     long idgeo=cid(param[2].argument[0]);
1098 francois 626 mggeo=get_mg_geometrieid(idgeo);
1099 francois 283 mgmai=new MG_MAILLAGE(id,mggeo);
1100     ajouter_mg_maillage(mgmai);
1101     }
1102 francois 465 if (entite=="MAILLAGE_STRUCTURE")
1103     {
1104     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@",param+2);
1105     long idgeo=cid(param[2].argument[0]);
1106 francois 626 mggeo=get_mg_geometrieid(idgeo);
1107 francois 465 mgmai=new MG_MAILLAGE(id,mggeo);
1108     ajouter_mg_maillage(mgmai);
1109     double xmin=atof(param[3].argument[0].c_str());
1110     double ymin=atof(param[4].argument[0].c_str());
1111     double zmin=atof(param[5].argument[0].c_str());
1112     double xmax=atof(param[6].argument[0].c_str());
1113     double ymax=atof(param[7].argument[0].c_str());
1114     double zmax=atof(param[8].argument[0].c_str());
1115     int nx=atoi(param[9].argument[0].c_str());
1116     int ny=atoi(param[10].argument[0].c_str());
1117     int nz=atoi(param[11].argument[0].c_str());
1118     BOITE_3D b(xmin,ymin,zmin,xmax,ymax,zmax);
1119     mgmai->change_param_structure(b,nx,ny,nz);
1120     }
1121 francois 283 if (entite=="FEM_MAILLAGE")
1122     {
1123     parse.decode(data.c_str(),"@,@,@",param+2);
1124     int degre=atoi(param[2].argument[0].c_str());
1125     long idmai=cid(param[3].argument[0]);
1126     long idgeo=cid(param[4].argument[0]);
1127 francois 626 mggeo=get_mg_geometrieid(idgeo);
1128     mgmai=get_mg_maillageid(idmai);
1129 francois 283 femmai=new FEM_MAILLAGE(id,mggeo,mgmai,degre);
1130     ajouter_fem_maillage(femmai);
1131     }
1132 francois 465 if (entite=="FEM_MAILLAGE_STRUCTURE")
1133     {
1134     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@,@,@",param+2);
1135     int degre=atoi(param[2].argument[0].c_str());
1136     long idmai=cid(param[3].argument[0]);
1137     long idgeo=cid(param[4].argument[0]);
1138 francois 626 mggeo=get_mg_geometrieid(idgeo);
1139     mgmai=get_mg_maillageid(idmai);
1140 francois 465 femmai=new FEM_MAILLAGE(id,mggeo,mgmai,degre);
1141     ajouter_fem_maillage(femmai);
1142     double xmin=atof(param[5].argument[0].c_str());
1143     double ymin=atof(param[6].argument[0].c_str());
1144     double zmin=atof(param[7].argument[0].c_str());
1145     double xmax=atof(param[8].argument[0].c_str());
1146     double ymax=atof(param[9].argument[0].c_str());
1147     double zmax=atof(param[10].argument[0].c_str());
1148     int nx=atoi(param[11].argument[0].c_str());
1149     int ny=atoi(param[12].argument[0].c_str());
1150     int nz=atoi(param[13].argument[0].c_str());
1151     BOITE_3D b(xmin,ymin,zmin,xmax,ymax,zmax);
1152     femmai->change_param_structure(b,nx,ny,nz);
1153     }
1154 francois 551 if (entite=="NOEUD") lire_NOEUD(id,parse,param,data,mgmai,mggeo);
1155 francois 283 if (entite=="FEM_NOEUD")
1156     {
1157     parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
1158     long idtopo=cid(param[2].argument[0]);
1159     long idmai=cid(param[3].argument[0]);
1160     double x=atof(param[4].argument[0].c_str());
1161     double y=atof(param[5].argument[0].c_str());
1162     double z=atof(param[6].argument[0].c_str());
1163     int num=atoi(param[7].argument[0].c_str());
1164     int numopt=atoi(param[8].argument[0].c_str());
1165     MG_ELEMENT_MAILLAGE* elmai;
1166     if (idmai>-1)
1167     {
1168     elmai=mgmai->get_mg_noeudid(idmai);
1169     if (elmai==NULL) elmai=mgmai->get_mg_segmentid(idmai);
1170     if (elmai==NULL) elmai=mgmai->get_mg_triangleid(idmai);
1171     if (elmai==NULL) elmai=mgmai->get_mg_tetraid(idmai);
1172     }
1173     else elmai=NULL;
1174     FEM_NOEUD* noeud;
1175     if (elmai!=NULL) noeud=new FEM_NOEUD(id,elmai,x,y,z);
1176     else
1177     {
1178     MG_ELEMENT_TOPOLOGIQUE* topo;
1179     if (idtopo>-1)
1180     {
1181     topo=mggeo->get_mg_sommetid(idtopo);
1182     if (topo==NULL) topo=mggeo->get_mg_areteid(idtopo);
1183     if (topo==NULL) topo=mggeo->get_mg_faceid(idtopo);
1184     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
1185     }
1186     else topo=NULL;
1187     noeud=new FEM_NOEUD(id,topo,x,y,z);
1188     }
1189     noeud->change_numero(num);
1190     noeud->change_numero_opt(numopt);
1191     femmai->ajouter_fem_noeud(noeud);
1192     }
1193     if (entite=="FEM_NOEUD_DEF")
1194     {
1195     parse.decode(data.c_str(),"@,@,@",param+2);
1196     double x=atof(param[2].argument[0].c_str());
1197     double y=atof(param[3].argument[0].c_str());
1198     double z=atof(param[4].argument[0].c_str());
1199     FEM_NOEUD* noeud=femmai->get_fem_noeudid(id);
1200     noeud->change_dx(x);
1201     noeud->change_dy(y);
1202     noeud->change_dz(z);
1203     femmai->active_deforme();
1204     }
1205 francois 325 if (entite=="FEM_NOEUD_REAC")
1206     {
1207     parse.decode(data.c_str(),"@,@,@",param+2);
1208     double x=atof(param[2].argument[0].c_str());
1209     double y=atof(param[3].argument[0].c_str());
1210     double z=atof(param[4].argument[0].c_str());
1211     FEM_NOEUD* noeud=femmai->get_fem_noeudid(id);
1212     noeud->change_rx(x);
1213     noeud->change_ry(y);
1214     noeud->change_rz(z);
1215 francois 339 femmai->active_reaction();;
1216 francois 325 }
1217 francois 551 if (entite=="SEGMENT") lire_SEGMENT(id,parse,param,data,mgmai,mggeo);
1218 francois 399 if (entite=="FEM_ELEMENT_NOEUD")
1219     {
1220     parse.decode(data.c_str(),"@,@,@",param+2);
1221     long idtopo=cid(param[2].argument[0]);
1222     long idmai=cid(param[3].argument[0]);
1223     long idn1=cid(param[4].argument[0]);
1224     FEM_NOEUD* tab[1];
1225     tab[0]=femmai->get_fem_noeudid(idn1);
1226     MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1227     if (idtopo>-1)
1228     topo=mggeo->get_mg_sommetid(idtopo);
1229     MG_ELEMENT_MAILLAGE* elmai;
1230     if (idmai>-1)
1231     elmai=mgmai->get_mg_noeudid(idmai);
1232     else elmai=NULL;
1233     FEM_ELEMENT0* fem=new FEM_ELEMENT0(id,topo,elmai,tab);
1234     femmai->ajouter_fem_element0(fem);
1235     }
1236 francois 283 if (entite=="FEM_SEGMENT2")
1237     {
1238     parse.decode(data.c_str(),"@,@,@,@",param+2);
1239 francois 378 long idtopo=cid(param[2].argument[0]);
1240 francois 283 long idmai=cid(param[3].argument[0]);
1241     long idn1=cid(param[4].argument[0]);
1242     long idn2=cid(param[5].argument[0]);
1243     FEM_NOEUD* tab[2];
1244     tab[0]=femmai->get_fem_noeudid(idn1);
1245     tab[1]=femmai->get_fem_noeudid(idn2);
1246 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1247     if (idtopo>-1)
1248     topo=mggeo->get_mg_areteid(idtopo);
1249     MG_ELEMENT_MAILLAGE* elmai;
1250 francois 283 if (idmai>-1)
1251     elmai=mgmai->get_mg_segmentid(idmai);
1252     else elmai=NULL;
1253 francois 378 FEM_SEGMENT2* seg=new FEM_SEGMENT2(id,topo,elmai,tab);
1254 francois 309 femmai->ajouter_fem_element1(seg);
1255 francois 283 }
1256     if (entite=="FEM_SEGMENT3")
1257     {
1258     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
1259 francois 378 long idtopo=cid(param[2].argument[0]);
1260     long idmai=cid(param[3].argument[0]);
1261 francois 283 long idn1=cid(param[4].argument[0]);
1262     long idn2=cid(param[5].argument[0]);
1263     long idn3=cid(param[6].argument[0]);
1264     FEM_NOEUD* tab[3];
1265     tab[0]=femmai->get_fem_noeudid(idn1);
1266     tab[1]=femmai->get_fem_noeudid(idn2);
1267     tab[2]=femmai->get_fem_noeudid(idn3);
1268     MG_ELEMENT_MAILLAGE* elmai;
1269 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1270     if (idtopo>-1)
1271     topo=mggeo->get_mg_areteid(idtopo);
1272     if (idmai>-1)
1273 francois 283 elmai=mgmai->get_mg_segmentid(idmai);
1274     else elmai=NULL;
1275 francois 378 FEM_SEGMENT3* seg=new FEM_SEGMENT3(id,topo,elmai,tab);
1276 francois 309 femmai->ajouter_fem_element1(seg);
1277 francois 283 }
1278 francois 551 if (entite=="TRIANGLE") lire_TRIANGLE(id,parse,param,data,mgmai,mggeo);
1279     if (entite=="QUADRANGLE") lire_QUADRANGLE(id,parse,param,data,mgmai,mggeo);
1280 francois 283 if (entite=="FEM_TRIANGLE3")
1281     {
1282     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
1283 francois 378 long idtopo=cid(param[2].argument[0]);
1284 francois 283 long idmai=cid(param[3].argument[0]);
1285     long idn1=cid(param[4].argument[0]);
1286     long idn2=cid(param[5].argument[0]);
1287     long idn3=cid(param[6].argument[0]);
1288     FEM_NOEUD* tab[3];
1289     tab[0]=femmai->get_fem_noeudid(idn1);
1290     tab[1]=femmai->get_fem_noeudid(idn2);
1291     tab[2]=femmai->get_fem_noeudid(idn3);
1292     MG_ELEMENT_MAILLAGE* elmai;
1293     if (idmai>-1)
1294     elmai=mgmai->get_mg_triangleid(idmai);
1295     else elmai=NULL;
1296 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1297     if (idtopo>-1)
1298 francois 383 topo=mggeo->get_mg_faceid(idtopo);
1299 francois 378 FEM_TRIANGLE3* tri=new FEM_TRIANGLE3(id,topo,elmai,tab);
1300 francois 309 femmai->ajouter_fem_element2(tri);
1301 francois 283 }
1302     if (entite=="FEM_TRIANGLE6")
1303     {
1304     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@",param+2);
1305 francois 378 long idtopo=cid(param[2].argument[0]);
1306 francois 283 long idmai=cid(param[3].argument[0]);
1307     long idn1=cid(param[4].argument[0]);
1308     long idn2=cid(param[5].argument[0]);
1309     long idn3=cid(param[6].argument[0]);
1310     long idn4=cid(param[7].argument[0]);
1311     long idn5=cid(param[8].argument[0]);
1312     long idn6=cid(param[9].argument[0]);
1313     FEM_NOEUD* tab[6];
1314     tab[0]=femmai->get_fem_noeudid(idn1);
1315     tab[1]=femmai->get_fem_noeudid(idn2);
1316     tab[2]=femmai->get_fem_noeudid(idn3);
1317     tab[3]=femmai->get_fem_noeudid(idn4);
1318     tab[4]=femmai->get_fem_noeudid(idn5);
1319     tab[5]=femmai->get_fem_noeudid(idn6);
1320     MG_ELEMENT_MAILLAGE* elmai;
1321     if (idmai>-1)
1322     elmai=mgmai->get_mg_triangleid(idmai);
1323     else elmai=NULL;
1324 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1325     if (idtopo>-1)
1326 francois 383 topo=mggeo->get_mg_faceid(idtopo);
1327 francois 378 FEM_TRIANGLE6* tri=new FEM_TRIANGLE6(id,topo,elmai,tab);
1328 francois 309 femmai->ajouter_fem_element2(tri);
1329 francois 283 }
1330 francois 310 if (entite=="FEM_QUADRANGLE4")
1331     {
1332     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
1333 francois 378 long idtopo=cid(param[2].argument[0]);
1334     long idmai=cid(param[3].argument[0]);
1335 francois 310 long idn1=cid(param[4].argument[0]);
1336     long idn2=cid(param[5].argument[0]);
1337     long idn3=cid(param[6].argument[0]);
1338     long idn4=cid(param[7].argument[0]);
1339     FEM_NOEUD* tab[4];
1340     tab[0]=femmai->get_fem_noeudid(idn1);
1341     tab[1]=femmai->get_fem_noeudid(idn2);
1342     tab[2]=femmai->get_fem_noeudid(idn3);
1343     tab[3]=femmai->get_fem_noeudid(idn4);
1344     MG_ELEMENT_MAILLAGE* elmai;
1345     if (idmai>-1)
1346     elmai=mgmai->get_mg_quadrangleid(idmai);
1347     else elmai=NULL;
1348 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1349     if (idtopo>-1)
1350 francois 383 topo=mggeo->get_mg_faceid(idtopo);
1351 francois 378 FEM_QUADRANGLE4* quad=new FEM_QUADRANGLE4(id,topo,elmai,tab);
1352 francois 310 femmai->ajouter_fem_element2(quad);
1353     }
1354     if (entite=="FEM_QUADRANGLE8")
1355     {
1356     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@",param+2);
1357 francois 378 long idtopo=cid(param[2].argument[0]);
1358     long idmai=cid(param[3].argument[0]);
1359 francois 310 long idn1=cid(param[4].argument[0]);
1360     long idn2=cid(param[5].argument[0]);
1361     long idn3=cid(param[6].argument[0]);
1362     long idn4=cid(param[7].argument[0]);
1363     long idn5=cid(param[8].argument[0]);
1364     long idn6=cid(param[9].argument[0]);
1365     long idn7=cid(param[10].argument[0]);
1366     long idn8=cid(param[11].argument[0]);
1367     FEM_NOEUD* tab[8];
1368     tab[0]=femmai->get_fem_noeudid(idn1);
1369     tab[1]=femmai->get_fem_noeudid(idn2);
1370     tab[2]=femmai->get_fem_noeudid(idn3);
1371     tab[3]=femmai->get_fem_noeudid(idn4);
1372     tab[4]=femmai->get_fem_noeudid(idn5);
1373     tab[5]=femmai->get_fem_noeudid(idn6);
1374     tab[6]=femmai->get_fem_noeudid(idn7);
1375     tab[7]=femmai->get_fem_noeudid(idn8);
1376     MG_ELEMENT_MAILLAGE* elmai;
1377     if (idmai>-1)
1378     elmai=mgmai->get_mg_quadrangleid(idmai);
1379     else elmai=NULL;
1380 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1381     if (idtopo>-1)
1382 francois 383 topo=mggeo->get_mg_faceid(idtopo);
1383 francois 378 FEM_QUADRANGLE8* quad=new FEM_QUADRANGLE8(id,topo,elmai,tab);
1384 francois 310 femmai->ajouter_fem_element2(quad);
1385     }
1386 francois 551 if (entite=="TETRAEDRE") lire_TETRA(id,parse,param,data,mgmai,mggeo);
1387    
1388     if (entite=="HEXAEDRE") lire_HEXA(id,parse,param,data,mgmai,mggeo);
1389 francois 283 if (entite=="FEM_TETRA4")
1390     {
1391 francois 339 parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
1392 francois 378 long idtopo=cid(param[2].argument[0]);
1393     long idmai=cid(param[3].argument[0]);
1394 francois 283 long idn1=cid(param[4].argument[0]);
1395     long idn2=cid(param[5].argument[0]);
1396     long idn3=cid(param[6].argument[0]);
1397     long idn4=cid(param[7].argument[0]);
1398 francois 339 long etat=atoi(param[8].argument[0].c_str());
1399 francois 283 FEM_NOEUD* tab[4];
1400     tab[0]=femmai->get_fem_noeudid(idn1);
1401     tab[1]=femmai->get_fem_noeudid(idn2);
1402     tab[2]=femmai->get_fem_noeudid(idn3);
1403     tab[3]=femmai->get_fem_noeudid(idn4);
1404     MG_ELEMENT_MAILLAGE* elmai;
1405     if (idmai>-1)
1406     elmai=mgmai->get_mg_tetraid(idmai);
1407     else elmai=NULL;
1408 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1409     if (idtopo>-1)
1410 francois 393 topo=mggeo->get_mg_volumeid(idtopo);
1411 francois 378 FEM_TETRA4* tet=new FEM_TETRA4(id,topo,elmai,tab);
1412 francois 410 tet->change_etat(0,etat);
1413 francois 309 femmai->ajouter_fem_element3(tet);
1414 francois 283 }
1415 francois 399 if (entite=="XFEM_ELEMENT_NOEUD")
1416 francois 339 {
1417 francois 380 parse.decode(data.c_str(),"@,@,@,@",param+2);
1418 francois 399 unsigned long idele=cid(param[2].argument[0]);
1419     unsigned long idtopo=cid(param[3].argument[0]);
1420     unsigned long idn1=cid(param[4].argument[0]);
1421 francois 380 int etat=atoi(param[5].argument[0].c_str());
1422 francois 399 MG_ELEMENT_TOPOLOGIQUE* topo=mggeo->get_mg_sommetid(idtopo);
1423     FEM_ELEMENT_MAILLAGE* mai=femmai->get_fem_element0id(idele);
1424     if (mai==NULL) mai=femmai->get_fem_element1id(idele);
1425     if (mai==NULL) mai=femmai->get_fem_element2id(idele);
1426     if (mai==NULL) mai=femmai->get_fem_element3id(idele);
1427 francois 380 FEM_NOEUD* tab[4];
1428     tab[0]=femmai->get_fem_noeudid(idn1);
1429 francois 399 XFEM_ELEMENT0* xele=new XFEM_ELEMENT0(id,mai,topo,tab);
1430     femmai->ajouter_xfem_element0(xele);
1431     xele->change_etat(etat);
1432     }
1433     if (entite=="XFEM_SEGMENT2")
1434     {
1435     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
1436     unsigned long idele=cid(param[2].argument[0]);
1437     unsigned long idtopo=cid(param[3].argument[0]);
1438     unsigned long idn1=cid(param[4].argument[0]);
1439     unsigned long idn2=cid(param[5].argument[0]);
1440     int etat=atoi(param[6].argument[0].c_str());
1441     FEM_ELEMENT_MAILLAGE* mai=femmai->get_fem_element1id(idele);
1442     if (mai==NULL) mai=femmai->get_fem_element2id(idele);
1443     if (mai==NULL) mai=femmai->get_fem_element3id(idele);
1444     MG_ELEMENT_TOPOLOGIQUE* topo=mggeo->get_mg_areteid(idtopo);
1445     FEM_NOEUD* tab[4];
1446     tab[0]=femmai->get_fem_noeudid(idn1);
1447 francois 380 tab[1]=femmai->get_fem_noeudid(idn2);
1448 francois 399 XFEM_SEGMENT2* xseg=new XFEM_SEGMENT2(id,mai,topo,tab);
1449 francois 380 femmai->ajouter_xfem_element1(xseg);
1450 francois 399 xseg->change_etat(etat);
1451 francois 380 }
1452 francois 410 if (entite=="XFEM_TRIANGLE3")
1453     {
1454     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
1455     unsigned long idtet=cid(param[2].argument[0]);
1456     unsigned long idtopo=cid(param[3].argument[0]);
1457     unsigned long idn1=cid(param[4].argument[0]);
1458     unsigned long idn2=cid(param[5].argument[0]);
1459     unsigned long idn3=cid(param[6].argument[0]);
1460     int etat=atoi(param[7].argument[0].c_str());
1461     FEM_ELEMENT_MAILLAGE* mai=femmai->get_fem_element3id(idtet);
1462     MG_ELEMENT_TOPOLOGIQUE* topo=mggeo->get_mg_volumeid(idtopo);
1463     FEM_NOEUD* tab[3];
1464     tab[0]=femmai->get_fem_noeudid(idn1);
1465     tab[1]=femmai->get_fem_noeudid(idn2);
1466     tab[2]=femmai->get_fem_noeudid(idn3);
1467     XFEM_TRIANGLE3* xtri=new XFEM_TRIANGLE3(id,mai,topo,tab);
1468     femmai->ajouter_xfem_element2(xtri);
1469     xtri->change_etat(etat);
1470     }
1471 francois 380 if (entite=="XFEM_TETRA4")
1472     {
1473 francois 399 parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
1474 francois 339 unsigned long idtet=cid(param[2].argument[0]);
1475 francois 399 unsigned long idtopo=cid(param[3].argument[0]);
1476     unsigned long idn1=cid(param[4].argument[0]);
1477     unsigned long idn2=cid(param[5].argument[0]);
1478     unsigned long idn3=cid(param[6].argument[0]);
1479     unsigned long idn4=cid(param[7].argument[0]);
1480     int etat=atoi(param[8].argument[0].c_str());
1481 francois 408 FEM_ELEMENT_MAILLAGE* mai=femmai->get_fem_element3id(idtet);
1482 francois 399 MG_ELEMENT_TOPOLOGIQUE* topo=mggeo->get_mg_volumeid(idtopo);
1483     FEM_NOEUD* tab[4];
1484 francois 378 tab[0]=femmai->get_fem_noeudid(idn1);
1485     tab[1]=femmai->get_fem_noeudid(idn2);
1486     tab[2]=femmai->get_fem_noeudid(idn3);
1487     tab[3]=femmai->get_fem_noeudid(idn4);
1488 francois 399 XFEM_TETRA4* xtet=new XFEM_TETRA4(id,mai,topo,tab);
1489 francois 339 femmai->ajouter_xfem_element3(xtet);
1490 francois 383 xtet->change_etat(etat);
1491 francois 339 }
1492 francois 283 if (entite=="FEM_TETRA10")
1493     {
1494     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@,@,@",param+2);
1495 francois 378 long idtopo=cid(param[2].argument[0]);
1496     long idmai=cid(param[3].argument[0]);
1497 francois 283 long idn1=cid(param[4].argument[0]);
1498     long idn2=cid(param[5].argument[0]);
1499     long idn3=cid(param[6].argument[0]);
1500     long idn4=cid(param[7].argument[0]);
1501     long idn5=cid(param[8].argument[0]);
1502     long idn6=cid(param[9].argument[0]);
1503     long idn7=cid(param[10].argument[0]);
1504     long idn8=cid(param[11].argument[0]);
1505     long idn9=cid(param[12].argument[0]);
1506     long idn10=cid(param[13].argument[0]);
1507     FEM_NOEUD* tab[10];
1508     tab[0]=femmai->get_fem_noeudid(idn1);
1509     tab[1]=femmai->get_fem_noeudid(idn2);
1510     tab[2]=femmai->get_fem_noeudid(idn3);
1511     tab[3]=femmai->get_fem_noeudid(idn4);
1512     tab[4]=femmai->get_fem_noeudid(idn5);
1513     tab[5]=femmai->get_fem_noeudid(idn6);
1514     tab[6]=femmai->get_fem_noeudid(idn7);
1515     tab[7]=femmai->get_fem_noeudid(idn8);
1516     tab[8]=femmai->get_fem_noeudid(idn9);
1517     tab[9]=femmai->get_fem_noeudid(idn10);
1518     MG_ELEMENT_MAILLAGE* elmai;
1519     if (idmai>-1)
1520     elmai=mgmai->get_mg_tetraid(idmai);
1521     else elmai=NULL;
1522 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1523     if (idtopo>-1)
1524 francois 393 topo=mggeo->get_mg_volumeid(idtopo);
1525 francois 378 FEM_TETRA10* tet=new FEM_TETRA10(id,topo,elmai,tab);
1526 francois 309 femmai->ajouter_fem_element3(tet);
1527 francois 283 }
1528 francois 310 if (entite=="FEM_HEXA8")
1529     {
1530     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@",param+2);
1531 francois 378 long idtopo=cid(param[2].argument[0]);
1532     long idmai=cid(param[3].argument[0]);
1533 francois 310 long idn1=cid(param[4].argument[0]);
1534     long idn2=cid(param[5].argument[0]);
1535     long idn3=cid(param[6].argument[0]);
1536     long idn4=cid(param[7].argument[0]);
1537     long idn5=cid(param[8].argument[0]);
1538     long idn6=cid(param[9].argument[0]);
1539     long idn7=cid(param[10].argument[0]);
1540     long idn8=cid(param[11].argument[0]);
1541     FEM_NOEUD* tab[8];
1542     tab[0]=femmai->get_fem_noeudid(idn1);
1543     tab[1]=femmai->get_fem_noeudid(idn2);
1544     tab[2]=femmai->get_fem_noeudid(idn3);
1545     tab[3]=femmai->get_fem_noeudid(idn4);
1546     tab[4]=femmai->get_fem_noeudid(idn5);
1547     tab[5]=femmai->get_fem_noeudid(idn6);
1548     tab[6]=femmai->get_fem_noeudid(idn7);
1549     tab[7]=femmai->get_fem_noeudid(idn8);
1550     MG_ELEMENT_MAILLAGE* elmai;
1551     if (idmai>-1)
1552     elmai=mgmai->get_mg_hexaid(idmai);
1553     else elmai=NULL;
1554 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1555     if (idtopo>-1)
1556 francois 393 topo=mggeo->get_mg_volumeid(idtopo);
1557 francois 378 FEM_HEXA8* hex=new FEM_HEXA8(id,topo,elmai,tab);
1558 francois 310 femmai->ajouter_fem_element3(hex);
1559     }
1560     if (entite=="FEM_HEXA20")
1561     {
1562     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@",param+2);
1563 francois 378 long idtopo=cid(param[2].argument[0]);
1564     long idmai=cid(param[3].argument[0]);
1565 francois 310 long idn1=cid(param[4].argument[0]);
1566     long idn2=cid(param[5].argument[0]);
1567     long idn3=cid(param[6].argument[0]);
1568     long idn4=cid(param[7].argument[0]);
1569     long idn5=cid(param[8].argument[0]);
1570     long idn6=cid(param[9].argument[0]);
1571     long idn7=cid(param[10].argument[0]);
1572     long idn8=cid(param[11].argument[0]);
1573     long idn9=cid(param[12].argument[0]);
1574     long idn10=cid(param[13].argument[0]);
1575     long idn11=cid(param[14].argument[0]);
1576     long idn12=cid(param[15].argument[0]);
1577     long idn13=cid(param[16].argument[0]);
1578     long idn14=cid(param[17].argument[0]);
1579     long idn15=cid(param[18].argument[0]);
1580     long idn16=cid(param[19].argument[0]);
1581     long idn17=cid(param[20].argument[0]);
1582     long idn18=cid(param[21].argument[0]);
1583     long idn19=cid(param[22].argument[0]);
1584     long idn20=cid(param[23].argument[0]);
1585     FEM_NOEUD* tab[20];
1586     tab[0]=femmai->get_fem_noeudid(idn1);
1587     tab[1]=femmai->get_fem_noeudid(idn2);
1588     tab[2]=femmai->get_fem_noeudid(idn3);
1589     tab[3]=femmai->get_fem_noeudid(idn4);
1590     tab[4]=femmai->get_fem_noeudid(idn5);
1591     tab[5]=femmai->get_fem_noeudid(idn6);
1592     tab[6]=femmai->get_fem_noeudid(idn7);
1593     tab[7]=femmai->get_fem_noeudid(idn8);
1594     tab[8]=femmai->get_fem_noeudid(idn9);
1595     tab[9]=femmai->get_fem_noeudid(idn10);
1596     tab[10]=femmai->get_fem_noeudid(idn11);
1597     tab[11]=femmai->get_fem_noeudid(idn12);
1598     tab[12]=femmai->get_fem_noeudid(idn13);
1599     tab[13]=femmai->get_fem_noeudid(idn14);
1600     tab[14]=femmai->get_fem_noeudid(idn15);
1601     tab[15]=femmai->get_fem_noeudid(idn16);
1602     tab[16]=femmai->get_fem_noeudid(idn17);
1603     tab[17]=femmai->get_fem_noeudid(idn18);
1604     tab[18]=femmai->get_fem_noeudid(idn19);
1605     tab[19]=femmai->get_fem_noeudid(idn20);
1606     MG_ELEMENT_MAILLAGE* elmai;
1607     if (idmai>-1)
1608     elmai=mgmai->get_mg_hexaid(idmai);
1609     else elmai=NULL;
1610 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1611     if (idtopo>-1)
1612 francois 393 topo=mggeo->get_mg_volumeid(idtopo);
1613 francois 378 FEM_HEXA20* hex=new FEM_HEXA20(id,topo,elmai,tab);
1614 francois 310 femmai->ajouter_fem_element3(hex);
1615     }
1616 francois 283 if (entite=="SOLUTION")
1617     {
1618 francois 377 parse.decode(data.c_str(),"@,@,@,@,@,@,(&)",param+2);
1619 francois 283 int typeentite=atoi(param[2].argument[0].c_str());
1620 francois 377 int typesolution=atoi(param[3].argument[0].c_str());
1621     std::string nomsol=param[4].argument[0];
1622     long idmai=cid(param[5].argument[0]);
1623     int nb=atoi(param[6].argument[0].c_str());
1624     std::string chemin=param[7].argument[0];
1625 francois 283 MG_MAILLAGE* mai=get_mg_maillageid(idmai);
1626 francois 377 MG_SOLUTION* sol=new MG_SOLUTION(id,mai,nb,(char*)chemin.c_str(),SOL_EXISTANTE,nomsol,typeentite,typesolution);
1627 francois 283 ajouter_mg_solution(sol);
1628     for (int i=0;i<nb;i++)
1629 francois 377 sol->change_legende(i,param[8].argument[i]);
1630 francois 283 }
1631     if (entite=="FEM_SOLUTION")
1632     {
1633 francois 375 parse.decode(data.c_str(),"@,@,@,@,@,@,(&)",param+2);
1634 francois 283 int typeentite=atoi(param[2].argument[0].c_str());
1635 francois 375 int typesolution=atoi(param[3].argument[0].c_str());
1636     std::string nomsol=param[4].argument[0];
1637     long idmai=cid(param[5].argument[0]);
1638     int nb=atoi(param[6].argument[0].c_str());
1639     std::string chemin=param[7].argument[0];
1640 francois 283 FEM_MAILLAGE* mai=get_fem_maillageid(idmai);
1641 francois 375 FEM_SOLUTION* sol=new FEM_SOLUTION(id,mai,nb,(char*)chemin.c_str(),SOL_EXISTANTE,nomsol,typeentite,typesolution);
1642 francois 283 ajouter_fem_solution(sol);
1643     for (int i=0;i<nb;i++)
1644 francois 375 sol->change_legende(i,param[8].argument[i]);
1645 francois 283 }
1646     #ifdef WINDOWS_VERSION
1647     if (entite=="CAD4FE_MCSEGMENT")
1648     {
1649     parse.decode(data.c_str(),"@,@,@",param+2);
1650     long idtopo=cid(param[2].argument[0]);
1651     long idn1=cid(param[3].argument[0]);
1652     long idn2=cid(param[4].argument[0]);
1653     CAD4FE::MCNode* noeud1=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn1);
1654     CAD4FE::MCNode* noeud2=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn2);
1655     MG_ELEMENT_TOPOLOGIQUE* topo;
1656     if (idtopo>-1)
1657     {
1658     topo=mggeo->get_mg_areteid(idtopo);
1659     if (topo==NULL) topo=mggeo->get_mg_faceid(idtopo);
1660     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
1661     }
1662     else topo=NULL;
1663     CAD4FE::MCSegment * seg = new CAD4FE::MCSegment(id,topo,noeud1,noeud2);
1664     mgmai->ajouter_mg_segment(seg);
1665     }
1666     if (entite=="CAD4FE_MCNODE")
1667     {
1668     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
1669     long idRefTopo=cid(param[2].argument[0]);
1670     long idMCTopo=cid(param[3].argument[0]);
1671     double x=atof(param[4].argument[0].c_str());
1672     double y=atof(param[5].argument[0].c_str());
1673     double z=atof(param[6].argument[0].c_str());
1674     MG_ELEMENT_TOPOLOGIQUE* refTopo=NULL;
1675     if (refTopo==NULL) refTopo=mggeo->get_mg_sommetid(idRefTopo);
1676     if (refTopo==NULL) refTopo=mggeo->get_mg_areteid(idRefTopo);
1677     if (refTopo==NULL) refTopo=mggeo->get_mg_faceid(idRefTopo);
1678     if (refTopo==NULL) refTopo=mggeo->get_mg_volumeid(idRefTopo);
1679     MG_ELEMENT_TOPOLOGIQUE* mcTopo=NULL;
1680     if (mcTopo==NULL) mcTopo=mggeo->get_mg_sommetid(idMCTopo);
1681     if (mcTopo==NULL) mcTopo=mggeo->get_mg_areteid(idMCTopo);
1682     if (mcTopo==NULL) mcTopo=mggeo->get_mg_faceid(idMCTopo);
1683     if (mcTopo==NULL) mcTopo=mggeo->get_mg_volumeid(idMCTopo);
1684    
1685     if (mcTopo->get_dimension()==0)
1686     {
1687     if (updatedMergedRefVertices == false)
1688     {
1689     for (std::multimap<CAD4FE::MCVertex * , unsigned long>::iterator itMergedRefVertices = mapMergedRefVertices.begin();
1690     itMergedRefVertices != mapMergedRefVertices.end();
1691     itMergedRefVertices++)
1692     {
1693     CAD4FE::MCVertex * v = itMergedRefVertices->first;
1694     MG_SOMMET * refV = NULL;
1695     unsigned long id = itMergedRefVertices->second;
1696     refV = (MG_SOMMET *) mggeo->get_mg_sommetid(id);
1697     v->MergeRefVertex(refV);
1698     }
1699    
1700     updatedMergedRefVertices = true;
1701     }
1702     }
1703    
1704     CAD4FE::MCNode* noeud=new CAD4FE::MCNode(id,mcTopo,refTopo,x,y,z);
1705     mgmai->ajouter_mg_noeud(noeud);
1706     }
1707     if (entite=="CAD4FE_MCTRIANGLE")
1708     {
1709     parse.decode(data.c_str(),"@,@,@,@",param+2);
1710     long idtopo=cid(param[2].argument[0]);
1711     long idn1=cid(param[3].argument[0]);
1712     long idn2=cid(param[4].argument[0]);
1713     long idn3=cid(param[5].argument[0]);
1714     CAD4FE::MCNode* noeud1=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn1);
1715     CAD4FE::MCNode* noeud2=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn2);
1716     CAD4FE::MCNode* noeud3=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn3);
1717     CAD4FE::MCSegment* mgsegment[3];
1718     CAD4FE::MCNode *mgnoeud[3]={noeud1,noeud2,noeud3};
1719     // la topo. d'un MCTriangle est obligatoirement une MCFace
1720     CAD4FE::MCFace* mcFace=(CAD4FE::MCFace*)mggeo->get_mg_faceid(idtopo);
1721     for (int i=0;i<3;i++)
1722     {
1723     mgsegment[i]=(CAD4FE::MCSegment*)mgmai->get_mg_segment(mgnoeud[i]->get_id(),mgnoeud[(i+1)%3]->get_id());
1724     if (mgsegment[i]==NULL)
1725     {
1726     mgsegment[i]=new CAD4FE::MCSegment(mcFace,mgnoeud[i],mgnoeud[(i+1)%3]);
1727     mgmai->ajouter_mg_segment(mgsegment[i]);
1728     }
1729     }
1730     CAD4FE::M3D_MCTriangle *triangle = new CAD4FE::M3D_MCTriangle(id,mcFace,noeud1,noeud2,noeud3,mgsegment[0],mgsegment[1],mgsegment[2]);
1731     mgmai->ajouter_mg_triangle(triangle);
1732     }
1733     #endif
1734     }
1735     }
1736     while (param[0].argument[0]!="FIN");
1737 francois 526 LISTE_MG_GEOMETRIE::iterator itgeo;
1738     for (MG_GEOMETRIE* geo=get_premier_geometrie(itgeo);geo;geo=get_suivant_geometrie(itgeo))
1739     {
1740     LISTE_MG_SOMMET::iterator itsom;
1741     for (MG_SOMMET* som=geo->get_premier_sommet(itsom);som;som=geo->get_suivant_sommet(itsom))
1742     if (som->est_un_sommet_noeud())
1743     {
1744     MG_SOMMET_NOEUD* somno=(MG_SOMMET_NOEUD*)som;
1745     unsigned long idnoeud=somno->get_id_mg_noeud();
1746     MG_NOEUD* noeud;
1747     LISTE_MG_MAILLAGE::iterator itmai;
1748     for (MG_MAILLAGE* mai=get_premier_mg_maillage(itmai);mai;mai=get_suivant_mg_maillage(itmai))
1749     if (mai->get_mg_noeudid(idnoeud)!=NULL) noeud=mai->get_mg_noeudid(idnoeud);
1750     somno->change_mg_noeud(noeud);
1751     }
1752 francois 685 LISTE_MG_COQUE::iterator itcoq;
1753     for (MG_COQUE* coq=geo->get_premier_coque(itcoq);coq;coq=geo->get_suivant_coque(itcoq))
1754     if (coq->est_une_coque_element())
1755     {
1756     MG_COQUE_ELEMENT* coque=(MG_COQUE_ELEMENT*)coq;
1757     int nbele=coque->get_nb_liste_id();
1758     MG_MAILLAGE* mgmai=NULL;
1759     for (int i=0;i<nbele;i++)
1760     {
1761     unsigned long eleid=coque->get_liste_id(i);
1762     if (i==0)
1763     {
1764     LISTE_MG_MAILLAGE::iterator itmai;
1765     for (MG_MAILLAGE* mai=get_premier_mg_maillage(itmai);mai;mai=get_suivant_mg_maillage(itmai))
1766     {
1767     if (mai->get_mg_triangleid(eleid)!=NULL) mgmai=mai;
1768     if (mai->get_mg_quadrangleid(eleid)!=NULL) mgmai=mai;
1769     }
1770     }
1771     MG_ELEMENT_MAILLAGE* ele=NULL;
1772     if (ele==NULL) ele=mgmai->get_mg_triangleid(eleid);
1773     if (ele==NULL) ele=mgmai->get_mg_quadrangleid(eleid);
1774     coque->ajouter_element(ele);
1775     }
1776    
1777     }
1778 francois 526 }
1779 francois 283 #ifdef WINDOWS_VERSION
1780     if (updatedMergedRefVertices == false)
1781     {
1782     for (std::multimap<CAD4FE::MCVertex * , unsigned long>::iterator itMergedRefVertices = mapMergedRefVertices.begin();
1783     itMergedRefVertices != mapMergedRefVertices.end();
1784     itMergedRefVertices++)
1785     {
1786     CAD4FE::MCVertex * v = itMergedRefVertices->first;
1787     MG_SOMMET * refV = NULL;
1788     unsigned long id = itMergedRefVertices->second;
1789     refV = (MG_SOMMET *) mggeo->get_mg_sommetid(id);
1790     v->MergeRefVertex(refV);
1791     }
1792    
1793     updatedMergedRefVertices = true;
1794     }
1795    
1796     #endif
1797     fclose(in);
1798     return 1;
1799     }
1800    
1801    
1802    
1803