-using namespace std;
-#include "DriverUNV_W_SMDS_Mesh.h"
-
-#include "SMDS_MeshElement.hxx"
-#include "SMDS_MeshNode.hxx"
-
-
-
-
+// Copyright (C) 2007-2013 CEA/DEN, EDF R&D, OPEN CASCADE
+//
+// Copyright (C) 2003-2007 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.salome-platform.org/ or email : webmaster.salome@opencascade.com
+//
+
+#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"
+#include "SMDS_QuadraticEdge.hxx"
+#include "SMDS_QuadraticFaceOfNodes.hxx"
+#include "SMDS_PolyhedralVolumeOfNodes.hxx"
+#include "SMESHDS_GroupBase.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 "UNV164_Structure.hxx"
+#include "UNV2411_Structure.hxx"
+#include "UNV2412_Structure.hxx"
+#include "UNV2417_Structure.hxx"
+#include "UNV2420_Structure.hxx"
+#include "UNV_Utilities.hxx"
-void DriverUNV_W_SMDS_Mesh::SetMeshId(int aMeshId)
-{
- myMeshId = aMeshId;
-}
+#include <Basics_Utils.hxx>
-void DriverUNV_W_SMDS_Mesh::Add()
-{
- ;
+using namespace std;
+using namespace UNV;
+
+namespace{
+ typedef std::vector<size_t> TConnect;
+
+ int GetConnect(const SMDS_ElemIteratorPtr& theNodesIter,
+ TConnect& theConnect)
+ {
+ theConnect.clear();
+ for(; theNodesIter->more();){
+ const SMDS_MeshElement* anElem = theNodesIter->next();
+ theConnect.push_back(anElem->GetID());
+ }
+ return theConnect.size();
+ }
+
}
-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);
- }
- 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());
- }
- 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;
- }
- }
-
- 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);
+ Kernel_Utils::Localizer loc;
+ Status aResult = DRS_OK;
+ std::ofstream out_stream(myFile.c_str());
+ try{
+
+ UNV164::Write( out_stream ); // unit system
+ UNV2420::Write( out_stream, myMeshName ); // Coordinate system
+
+ {
+ using namespace UNV2411;
+ TDataSet aDataSet2411;
+ // Storing SMDS nodes to the UNV file
+ //-----------------------------------
+ MESSAGE("Perform - myMesh->NbNodes() = "<<myMesh->NbNodes());
+ SMDS_NodeIteratorPtr aNodesIter = myMesh->nodesIterator();
+ TRecord aRec;
+ while ( aNodesIter->more() )
+ {
+ const SMDS_MeshNode* aNode = aNodesIter->next();
+ aRec.label = aNode->GetID();
+ aRec.coord[0] = aNode->X();
+ aRec.coord[1] = aNode->Y();
+ aRec.coord[2] = aNode->Z();
+ aDataSet2411.push_back( aRec );
+ }
+ MESSAGE("Perform - aDataSet2411.size() = "<<aDataSet2411.size());
+ UNV2411::Write(out_stream,aDataSet2411);
+ }
+ {
+ using namespace UNV2412;
+ TDataSet aDataSet2412;
+ TConnect aConnect;
+
+ // Storing SMDS Edges
+ MESSAGE("Perform - myMesh->NbEdges() = "<<myMesh->NbEdges());
+ if(myMesh->NbEdges()){
+ SMDS_EdgeIteratorPtr anIter = myMesh->edgesIterator();
+ while( anIter->more() )
+ {
+ const SMDS_MeshEdge* anElem = anIter->next();
+ int aNbNodes = anElem->NbNodes();
+ TRecord aRec;
+ aRec.label = anElem->GetID();
+ aRec.node_labels.reserve(aNbNodes);
+ if( anElem->IsQuadratic() ) {
+ aRec.fe_descriptor_id = 22;
+ } else {
+ aRec.fe_descriptor_id = 11;
+ }
+ SMDS_NodeIteratorPtr aNodesIter = anElem->nodesIteratorToUNV();
+ while( aNodesIter->more())
+ {
+ const SMDS_MeshNode* aNode = aNodesIter->next();
+ aRec.node_labels.push_back( aNode->GetID() );
+ }
+ aDataSet2412.push_back(aRec);
+ }
+ MESSAGE("Perform - aDataSet2412.size() = "<<aDataSet2412.size());
+ }
+
+ MESSAGE("Perform - myMesh->NbFaces() = "<<myMesh->NbFaces());
+ if ( myMesh->NbFaces() )
+ {
+ SMDS_FaceIteratorPtr anIter = myMesh->facesIterator();
+ while ( anIter->more())
+ {
+ const SMDS_MeshFace* anElem = anIter->next();
+ if ( anElem->IsPoly() ) continue;
+ int aNbNodes = anElem->NbNodes();
+ TRecord aRec;
+ aRec.label = anElem->GetID();
+ aRec.node_labels.reserve(aNbNodes);
+ SMDS_NodeIteratorPtr aNodesIter = anElem->nodesIteratorToUNV();
+ while( aNodesIter->more() ) {
+ const SMDS_MeshNode* 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;
+ case 6: aRec.fe_descriptor_id = 42; break;
+ case 7: aRec.fe_descriptor_id = 42; break;
+ case 8: aRec.fe_descriptor_id = 45; break;
+ case 9: aRec.fe_descriptor_id = 45; aRec.node_labels.resize( 8 ); break;
+ default:
+ continue;
+ }
+ aDataSet2412.push_back(aRec);
+ }
+ MESSAGE("Perform - aDataSet2412.size() = "<<aDataSet2412.size());
+ }
+
+ MESSAGE("Perform - myMesh->NbVolumes() = "<<myMesh->NbVolumes());
+ if ( myMesh->NbVolumes() )
+ {
+ SMDS_VolumeIteratorPtr anIter = myMesh->volumesIterator();
+ while ( anIter->more())
+ {
+ const SMDS_MeshVolume* anElem = anIter->next();
+ if ( anElem->IsPoly() )
+ continue;
+ int aNbNodes = anElem->NbNodes();
+ int anId = -1;
+ switch(aNbNodes) {
+ case 4: anId = 111; break;
+ case 6: anId = 112; break;
+ case 8: anId = 115; break;
+ case 10: anId = 118; break;
+ case 13: anId = 114; break;
+ case 15: anId = 113; break;
+ case 20:
+ case 27: anId = 116; aNbNodes = 20; break;
+ default:
+ continue;
+ }
+ if(anId>0){
+ TRecord aRec;
+ aRec.label = anElem->GetID();
+ aRec.fe_descriptor_id = anId;
+ aRec.node_labels.reserve(aNbNodes);
+ SMDS_NodeIteratorPtr aNodesIter = anElem->nodesIteratorToUNV();
+ while ( aNodesIter->more() && aRec.node_labels.size() < aNbNodes )
+ {
+ const SMDS_MeshElement* aNode = aNodesIter->next();
+ aRec.node_labels.push_back(aNode->GetID());
+ }
+ aDataSet2412.push_back(aRec);
+ }
+ }
+ MESSAGE("Perform - aDataSet2412.size() = "<<aDataSet2412.size());
+ }
+ UNV2412::Write(out_stream,aDataSet2412);
+ }
+ {
+ using namespace UNV2417;
+ if (myGroups.size() > 0) {
+ TDataSet aDataSet2417;
+ TGroupList::const_iterator aIter = myGroups.begin();
+ for (; aIter != myGroups.end(); aIter++) {
+ SMESHDS_GroupBase* aGroupDS = *aIter;
+ TRecord aRec;
+ aRec.GroupName = aGroupDS->GetStoreName();
+
+ int i;
+ SMDS_ElemIteratorPtr aIter = aGroupDS->GetElements();
+ if (aGroupDS->GetType() == SMDSAbs_Node) {
+ aRec.NodeList.resize(aGroupDS->Extent());
+ i = 0;
+ while (aIter->more()) {
+ const SMDS_MeshElement* aElem = aIter->next();
+ aRec.NodeList[i] = aElem->GetID();
+ i++;
+ }
+ } else {
+ aRec.ElementList.resize(aGroupDS->Extent());
+ i = 0;
+ while (aIter->more()) {
+ const SMDS_MeshElement* aElem = aIter->next();
+ aRec.ElementList[i] = aElem->GetID();
+ i++;
+ }
+ }
+ // 0019936: EDF 794 SMESH : Export UNV : Node color and group id
+ //aDataSet2417.insert(TDataSet::value_type(aGroupDS->GetID(), aRec));
+ aDataSet2417.insert(TDataSet::value_type(aGroupDS->GetID()+1, aRec));
+ }
+ UNV2417::Write(out_stream,aDataSet2417);
+ myGroups.clear();
+ }
+ }
+ /* {
+ using namespace UNV2417;
+ TDataSet aDataSet2417;
+ for ( TGroupsMap::iterator it = myGroupsMap.begin(); it != myGroupsMap.end(); it++ ) {
+ SMESH_Group* aGroup = it->second;
+ SMESHDS_GroupBase* aGroupDS = aGroup->GetGroupDS();
+ if ( aGroupDS ) {
+ TRecord aRec;
+ aRec.GroupName = aGroup->GetName();
+ int i;
+ SMDS_ElemIteratorPtr aIter = aGroupDS->GetElements();
+ if (aGroupDS->GetType() == SMDSAbs_Node) {
+ aRec.NodeList.resize(aGroupDS->Extent());
+ i = 0;
+ while (aIter->more()) {
+ const SMDS_MeshElement* aElem = aIter->next();
+ aRec.NodeList[i] = aElem->GetID();
+ i++;
+ }
+ } else {
+ aRec.ElementList.resize(aGroupDS->Extent());
+ i = 0;
+ while (aIter->more()) {
+ const SMDS_MeshElement* aElem = aIter->next();
+ aRec.ElementList[i] = aElem->GetID();
+ i++;
+ }
+ }
+ aDataSet2417.insert(TDataSet::value_type(aGroupDS->GetID(), aRec));
+ }
+ }
+ UNV2417::Write(out_stream,aDataSet2417);
+ }*/
+
+ out_stream.flush();
+ out_stream.close();
+ if (!check_file(myFile))
+ EXCEPTION(runtime_error,"ERROR: Output file not good.");
+ }
+ catch(const std::exception& exc){
+ INFOS("Follow exception was cought:\n\t"<<exc.what());
+ throw;
+ }
+ catch(...){
+ INFOS("Unknown exception was cought !!!");
+ throw;
+ }
+ return aResult;
}