Salome HOME
Merge from V6_main 06/03/2013
[modules/smesh.git] / src / StdMeshers / StdMeshers_Projection_2D.cxx
1 // Copyright (C) 2007-2012  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 // Copyright (C) 2003-2007  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.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 //
22
23 //  SMESH SMESH : implementaion of SMESH idl descriptions
24 // File      : StdMeshers_Projection_2D.cxx
25 // Module    : SMESH
26 // Created   : Fri Oct 20 11:37:07 2006
27 // Author    : Edward AGAPOV (eap)
28 //
29 #include "StdMeshers_Projection_2D.hxx"
30
31 #include "StdMeshers_ProjectionSource2D.hxx"
32 #include "StdMeshers_ProjectionUtils.hxx"
33 #include "StdMeshers_FaceSide.hxx"
34
35 #include "SMDS_EdgePosition.hxx"
36 #include "SMDS_FacePosition.hxx"
37 #include "SMESHDS_Hypothesis.hxx"
38 #include "SMESHDS_SubMesh.hxx"
39 #include "SMESH_Block.hxx"
40 #include "SMESH_Comment.hxx"
41 #include "SMESH_Gen.hxx"
42 #include "SMESH_Mesh.hxx"
43 #include "SMESH_MesherHelper.hxx"
44 #include "SMESH_Pattern.hxx"
45 #include "SMESH_subMesh.hxx"
46 #include "SMESH_subMeshEventListener.hxx"
47
48 #include "utilities.h"
49
50 #include <BRep_Tool.hxx>
51 #include <Bnd_B2d.hxx>
52 #include <TopExp.hxx>
53 #include <TopExp_Explorer.hxx>
54 #include <TopTools_DataMapIteratorOfDataMapOfShapeShape.hxx>
55 #include <TopTools_ListIteratorOfListOfShape.hxx>
56 #include <TopoDS.hxx>
57 #include <gp_Ax2.hxx>
58 #include <gp_Ax3.hxx>
59
60
61 using namespace std;
62
63 #define RETURN_BAD_RESULT(msg) { MESSAGE(")-: Error: " << msg); return false; }
64
65 namespace TAssocTool = StdMeshers_ProjectionUtils;
66 //typedef StdMeshers_ProjectionUtils TAssocTool;
67
68 //=======================================================================
69 //function : StdMeshers_Projection_2D
70 //purpose  : 
71 //=======================================================================
72
73 StdMeshers_Projection_2D::StdMeshers_Projection_2D(int hypId, int studyId, SMESH_Gen* gen)
74   :SMESH_2D_Algo(hypId, studyId, gen)
75 {
76   _name = "Projection_2D";
77   _compatibleHypothesis.push_back("ProjectionSource2D");
78   _sourceHypo = 0;
79 }
80
81 //================================================================================
82 /*!
83  * \brief Destructor
84  */
85 //================================================================================
86
87 StdMeshers_Projection_2D::~StdMeshers_Projection_2D()
88 {}
89
90 //=======================================================================
91 //function : CheckHypothesis
92 //purpose  : 
93 //=======================================================================
94
95 bool StdMeshers_Projection_2D::CheckHypothesis(SMESH_Mesh&                          theMesh,
96                                                const TopoDS_Shape&                  theShape,
97                                                SMESH_Hypothesis::Hypothesis_Status& theStatus)
98 {
99   list <const SMESHDS_Hypothesis * >::const_iterator itl;
100
101   const list <const SMESHDS_Hypothesis * >&hyps = GetUsedHypothesis(theMesh, theShape);
102   if ( hyps.size() == 0 )
103   {
104     theStatus = HYP_MISSING;
105     return false;  // can't work with no hypothesis
106   }
107
108   if ( hyps.size() > 1 )
109   {
110     theStatus = HYP_ALREADY_EXIST;
111     return false;
112   }
113
114   const SMESHDS_Hypothesis *theHyp = hyps.front();
115
116   string hypName = theHyp->GetName();
117
118   theStatus = HYP_OK;
119
120   if (hypName == "ProjectionSource2D")
121   {
122     _sourceHypo = static_cast<const StdMeshers_ProjectionSource2D *>(theHyp);
123
124     // Check hypo parameters
125
126     SMESH_Mesh* srcMesh = _sourceHypo->GetSourceMesh();
127     SMESH_Mesh* tgtMesh = & theMesh;
128     if ( !srcMesh )
129       srcMesh = tgtMesh;
130
131     // check vertices
132     if ( _sourceHypo->HasVertexAssociation() )
133     {
134       // source vertices
135       TopoDS_Shape edge = TAssocTool::GetEdgeByVertices
136         ( srcMesh, _sourceHypo->GetSourceVertex(1), _sourceHypo->GetSourceVertex(2) );
137       if ( edge.IsNull() ||
138            !SMESH_MesherHelper::IsSubShape( edge, srcMesh ) ||
139            !SMESH_MesherHelper::IsSubShape( edge, _sourceHypo->GetSourceFace() ))
140       {
141         theStatus = HYP_BAD_PARAMETER;
142         SCRUTE((edge.IsNull()));
143         SCRUTE((SMESH_MesherHelper::IsSubShape( edge, srcMesh )));
144         SCRUTE((SMESH_MesherHelper::IsSubShape( edge, _sourceHypo->GetSourceFace() )));
145       }
146       else
147       {
148         // target vertices
149         edge = TAssocTool::GetEdgeByVertices
150           ( tgtMesh, _sourceHypo->GetTargetVertex(1), _sourceHypo->GetTargetVertex(2) );
151         if ( edge.IsNull() || !SMESH_MesherHelper::IsSubShape( edge, tgtMesh ))
152         {
153           theStatus = HYP_BAD_PARAMETER;
154           SCRUTE((edge.IsNull()));
155           SCRUTE((SMESH_MesherHelper::IsSubShape( edge, tgtMesh )));
156         }
157         // PAL16203
158         else if ( !_sourceHypo->IsCompoundSource() &&
159                   !SMESH_MesherHelper::IsSubShape( edge, theShape ))
160         {
161           theStatus = HYP_BAD_PARAMETER;
162           SCRUTE((SMESH_MesherHelper::IsSubShape( edge, theShape )));
163         }
164       }
165     }
166     // check a source face
167     if ( !SMESH_MesherHelper::IsSubShape( _sourceHypo->GetSourceFace(), srcMesh ) ||
168          ( srcMesh == tgtMesh && theShape == _sourceHypo->GetSourceFace() ))
169     {
170       theStatus = HYP_BAD_PARAMETER;
171       SCRUTE((SMESH_MesherHelper::IsSubShape( _sourceHypo->GetSourceFace(), srcMesh )));
172       SCRUTE((srcMesh == tgtMesh));
173       SCRUTE(( theShape == _sourceHypo->GetSourceFace() ));
174     }
175   }
176   else
177   {
178     theStatus = HYP_INCOMPATIBLE;
179   }
180   return ( theStatus == HYP_OK );
181 }
182
183 namespace {
184
185   //================================================================================
186   /*!
187    * \brief define if a node is new or old
188    * \param node - node to check
189    * \retval bool - true if the node existed before Compute() is called
190    */
191   //================================================================================
192
193   bool isOldNode( const SMDS_MeshNode* node/*, const bool is1DComputed*/ )
194   {
195     // old nodes are shared by edges and new ones are shared
196     // only by faces created by mapper
197     //if ( is1DComputed )
198     {
199       bool isOld = node->NbInverseElements(SMDSAbs_Edge) > 0;
200       return isOld;
201     }
202     // else
203     // {
204     //   SMDS_ElemIteratorPtr invFace = node->GetInverseElementIterator(SMDSAbs_Face);
205     //   bool isNew = invFace->more();
206     //   return !isNew;
207     // }
208   }
209
210   //================================================================================
211   /*!
212    * \brief Class to remove mesh built by pattern mapper on edges
213    * and vertices in the case of failure of projection algo.
214    * It does it's job at destruction
215    */
216   //================================================================================
217
218   class MeshCleaner {
219     SMESH_subMesh* sm;
220   public:
221     MeshCleaner( SMESH_subMesh* faceSubMesh ): sm(faceSubMesh) {}
222     ~MeshCleaner() { Clean(sm); }
223     void Release() { sm = 0; } // mesh will not be removed
224     static void Clean( SMESH_subMesh* sm, bool withSub=true )
225     {
226       if ( !sm || !sm->GetSubMeshDS() ) return;
227       // PAL16567, 18920. Remove face nodes as well
228 //       switch ( sm->GetSubShape().ShapeType() ) {
229 //       case TopAbs_VERTEX:
230 //       case TopAbs_EDGE: {
231         SMDS_NodeIteratorPtr nIt = sm->GetSubMeshDS()->GetNodes();
232         SMESHDS_Mesh* mesh = sm->GetFather()->GetMeshDS();
233         while ( nIt->more() ) {
234           const SMDS_MeshNode* node = nIt->next();
235           if ( !isOldNode( node ) )
236             mesh->RemoveNode( node );
237         }
238         // do not break but iterate over DependsOn()
239 //       }
240 //       default:
241         if ( !withSub ) return;
242         SMESH_subMeshIteratorPtr smIt = sm->getDependsOnIterator(false,false);
243         while ( smIt->more() )
244           Clean( smIt->next(), false );
245 //       }
246     }
247   };
248
249   //================================================================================
250   /*!
251    * \brief find new nodes belonging to one free border of mesh on face
252     * \param sm - submesh on edge or vertex containg nodes to choose from
253     * \param face - the face bound by the submesh
254     * \param u2nodes - map to fill with nodes
255     * \param seamNodes - set of found nodes
256     * \retval bool - is a success
257    */
258   //================================================================================
259
260   bool getBoundaryNodes ( SMESH_subMesh*                        sm,
261                           const TopoDS_Face&                    face,
262                           map< double, const SMDS_MeshNode* > & u2nodes,
263                           set< const SMDS_MeshNode* > &         seamNodes)
264   {
265     u2nodes.clear();
266     seamNodes.clear();
267     if ( !sm || !sm->GetSubMeshDS() )
268       RETURN_BAD_RESULT("Null submesh");
269
270     SMDS_NodeIteratorPtr nIt = sm->GetSubMeshDS()->GetNodes();
271     switch ( sm->GetSubShape().ShapeType() ) {
272
273     case TopAbs_VERTEX: {
274       while ( nIt->more() ) {
275         const SMDS_MeshNode* node = nIt->next();
276         if ( isOldNode( node ) ) continue;
277         u2nodes.insert( make_pair( 0., node ));
278         seamNodes.insert( node );
279         return true;
280       }
281       break;
282     }
283     case TopAbs_EDGE: {
284       
285       // Get submeshes of sub-vertices
286       const map< int, SMESH_subMesh * >& subSM = sm->DependsOn();
287       if ( subSM.size() != 2 )
288         RETURN_BAD_RESULT("there must be 2 submeshes of sub-vertices"
289                           " but we have " << subSM.size());
290       SMESH_subMesh* smV1 = subSM.begin()->second;
291       SMESH_subMesh* smV2 = subSM.rbegin()->second;
292       if ( !smV1->IsMeshComputed() || !smV2->IsMeshComputed() )
293         RETURN_BAD_RESULT("Empty vertex submeshes");
294
295       const SMDS_MeshNode* nV1 = 0;
296       const SMDS_MeshNode* nE = 0;
297
298       // Look for nV1 - a new node on V1
299       nIt = smV1->GetSubMeshDS()->GetNodes();
300       while ( nIt->more() && !nE ) {
301         const SMDS_MeshNode* node = nIt->next();
302         if ( isOldNode( node ) ) continue;
303         nV1 = node;
304
305         // Find nE - a new node connected to nV1 and belonging to edge submesh;
306         SMESHDS_SubMesh* smDS = sm->GetSubMeshDS();
307         SMDS_ElemIteratorPtr vElems = nV1->GetInverseElementIterator(SMDSAbs_Face);
308         while ( vElems->more() && !nE ) {
309           const SMDS_MeshElement* elem = vElems->next();
310           int nbNodes = elem->NbNodes();
311           if ( elem->IsQuadratic() )
312             nbNodes /= 2;
313           int iV1 = elem->GetNodeIndex( nV1 );
314           // try next after nV1
315           int iE = SMESH_MesherHelper::WrapIndex( iV1 + 1, nbNodes );
316           if ( smDS->Contains( elem->GetNode( iE ) ))
317             nE = elem->GetNode( iE );
318           if ( !nE ) {
319             // try node before nV1
320             iE = SMESH_MesherHelper::WrapIndex( iV1 - 1, nbNodes );
321             if ( smDS->Contains( elem->GetNode( iE )))
322               nE = elem->GetNode( iE );
323           }
324           if ( nE && elem->IsQuadratic() ) { // find medium node between nV1 and nE
325             if ( Abs( iV1 - iE ) == 1 )
326               nE = elem->GetNode( Min ( iV1, iE ) + nbNodes );
327             else
328               nE = elem->GetNode( elem->NbNodes() - 1 );
329           }
330         }
331       }
332       if ( !nV1 )
333         RETURN_BAD_RESULT("No new node found on V1");
334       if ( !nE )
335         RETURN_BAD_RESULT("new node on edge not found");
336
337       // Get the whole free border of a face
338       list< const SMDS_MeshNode* > bordNodes;
339       list< const SMDS_MeshElement* > bordFaces;
340       if ( !SMESH_MeshEditor::FindFreeBorder (nV1, nE, nV1, bordNodes, bordFaces ))
341         RETURN_BAD_RESULT("free border of a face not found by nodes " <<
342                           nV1->GetID() << " " << nE->GetID() );
343
344       // Insert nodes of the free border to the map until node on V2 encountered
345       SMESHDS_SubMesh* v2smDS = smV2->GetSubMeshDS();
346       list< const SMDS_MeshNode* >::iterator bordIt = bordNodes.begin();
347       bordIt++; // skip nV1
348       for ( ; bordIt != bordNodes.end(); ++bordIt ) {
349         const SMDS_MeshNode* node = *bordIt;
350         if ( v2smDS->Contains( node ))
351           break;
352         if ( node->GetPosition()->GetTypeOfPosition() != SMDS_TOP_EDGE )
353           RETURN_BAD_RESULT("Bad node position type: node " << node->GetID() <<
354                             " pos type " << node->GetPosition()->GetTypeOfPosition());
355         const SMDS_EdgePosition* pos =
356           static_cast<const SMDS_EdgePosition*>(node->GetPosition());
357         u2nodes.insert( make_pair( pos->GetUParameter(), node ));
358         seamNodes.insert( node );
359       }
360       if ( u2nodes.size() != seamNodes.size() )
361         RETURN_BAD_RESULT("Bad node params on edge " << sm->GetId() <<
362                           ", " << u2nodes.size() << " != " << seamNodes.size() );
363       return true;
364     }
365     default:;
366     }
367     RETURN_BAD_RESULT ("Unexpected submesh type");
368
369   } // bool getBoundaryNodes()
370
371   //================================================================================
372   /*!
373    * \brief Preform projection in case if tgtFace.IsPartner( srcFace ) and in case
374    * if projection by transformation is possible
375    */
376   //================================================================================
377
378   bool projectPartner(const TopoDS_Face&                tgtFace,
379                       const TopoDS_Face&                srcFace,
380                       SMESH_Mesh *                      tgtMesh,
381                       SMESH_Mesh *                      srcMesh,
382                       const TAssocTool::TShapeShapeMap& shape2ShapeMap)
383   {
384     MESSAGE("projectPartner");
385     const double tol = 1.e-7*srcMesh->GetMeshDS()->getMaxDim();
386
387     gp_Trsf trsf; // transformation to get location of target nodes from source ones
388     if ( tgtFace.IsPartner( srcFace ))
389     {
390       gp_Trsf srcTrsf = srcFace.Location();
391       gp_Trsf tgtTrsf = tgtFace.Location();
392       trsf = srcTrsf.Inverted() * tgtTrsf;
393     }
394     else
395     {
396       // Try to find the transformation
397
398       // make any local coord systems of src and tgt faces
399       vector<gp_Pnt> srcPP, tgtPP; // 3 points on face boundaries to make axes of CS
400       int tgtNbVert = SMESH_MesherHelper::Count( tgtFace, TopAbs_VERTEX, /*ignoreSame=*/true );
401       int srcNbVert = SMESH_MesherHelper::Count( srcFace, TopAbs_VERTEX, /*ignoreSame=*/true );
402       SMESH_subMesh *         srcSM = srcMesh->GetSubMesh( srcFace );
403       SMESH_subMeshIteratorPtr smIt = srcSM->getDependsOnIterator(/*includeSelf=*/false,false);
404       srcSM = smIt->next(); // sm of a vertex
405       while ( smIt->more() && srcPP.size() < 3 )
406       {
407         srcSM = smIt->next();
408         SMESHDS_SubMesh* srcSmds = srcSM->GetSubMeshDS();
409         if ( !srcSmds ) continue;
410         SMDS_NodeIteratorPtr nIt = srcSmds->GetNodes();
411         while ( nIt->more() )
412         {
413           SMESH_TNodeXYZ p ( nIt->next());
414           bool pOK = false;
415           switch ( srcPP.size() )
416           {
417           case 0: pOK = true; break;
418
419           case 1: pOK = ( srcPP[0].SquareDistance( p ) > 10*tol ); break;
420             
421           case 2:
422             {
423               gp_Vec p0p1( srcPP[0], srcPP[1] ), p0p( srcPP[0], p );
424               // pOK = !p0p1.IsParallel( p0p, tol );
425               pOK = !p0p1.IsParallel( p0p, 3.14/20 ); // angle min 18 degrees
426               break;
427             }
428           }
429           if ( !pOK )
430             continue;
431
432           // find corresponding point on target shape
433           pOK = false;
434           gp_Pnt tgtP;
435           const TopoDS_Shape& tgtShape = shape2ShapeMap( srcSM->GetSubShape(), /*isSrc=*/true );
436           if ( tgtShape.ShapeType() == TopAbs_VERTEX )
437           {
438             tgtP = BRep_Tool::Pnt( TopoDS::Vertex( tgtShape ));
439             if ( srcNbVert == tgtNbVert || tgtPP.empty() )
440               pOK = true;
441             else
442               pOK = (( tgtP.Distance( tgtPP[0] ) > tol*tol ) &&
443                      ( tgtPP.size() == 1 || tgtP.Distance( tgtPP[1] ) > tol*tol ));
444             //cout << "V - nS " << p._node->GetID() << " - nT " << SMESH_Algo::VertexNode(TopoDS::Vertex( tgtShape),tgtMesh->GetMeshDS())->GetID() << endl;
445           }
446           else if ( tgtPP.size() > 0 )
447           {
448             if ( SMESHDS_SubMesh* tgtSmds = tgtMesh->GetMeshDS()->MeshElements( tgtShape ))
449             {
450               double srcDist = srcPP[0].Distance( p );
451               double eTol = BRep_Tool::Tolerance( TopoDS::Edge( tgtShape ));
452               if (eTol < tol) eTol = tol;
453               SMDS_NodeIteratorPtr nItT = tgtSmds->GetNodes();
454               while ( nItT->more() && !pOK )
455               {
456                 const SMDS_MeshNode* n = nItT->next();
457                 tgtP = SMESH_TNodeXYZ( n );
458                 pOK = ( fabs( srcDist - tgtPP[0].Distance( tgtP )) < 2*eTol );
459                 //cout << "E - nS " << p._node->GetID() << " - nT " << n->GetID()<< " OK - " << pOK<< " " << fabs( srcDist - tgtPP[0].Distance( tgtP ))<< " tol " << eTol<< endl;
460               }
461             }
462           }
463           if ( !pOK )
464             continue;
465
466           srcPP.push_back( p );
467           tgtPP.push_back( tgtP );
468         }
469       }
470       if ( srcPP.size() != 3 )
471         return false;
472
473       // make transformation
474       gp_Trsf fromTgtCS, toSrcCS; // from/to global CS
475       gp_Ax2 srcCS( srcPP[0], gp_Vec( srcPP[0], srcPP[1] ), gp_Vec( srcPP[0], srcPP[2]));
476       gp_Ax2 tgtCS( tgtPP[0], gp_Vec( tgtPP[0], tgtPP[1] ), gp_Vec( tgtPP[0], tgtPP[2]));
477       toSrcCS  .SetTransformation( gp_Ax3( srcCS ));
478       fromTgtCS.SetTransformation( gp_Ax3( tgtCS ));
479       fromTgtCS.Invert();
480
481       trsf = fromTgtCS * toSrcCS;
482     }
483
484     // Fill map of src to tgt nodes with nodes on edges
485
486     map<const SMDS_MeshNode* , const SMDS_MeshNode*> src2tgtNodes;
487     map<const SMDS_MeshNode* , const SMDS_MeshNode*>::iterator srcN_tgtN;
488
489     for ( TopExp_Explorer srcEdge( srcFace, TopAbs_EDGE); srcEdge.More(); srcEdge.Next() )
490     {
491       const TopoDS_Shape& tgtEdge = shape2ShapeMap( srcEdge.Current(), /*isSrc=*/true );
492
493       map< double, const SMDS_MeshNode* > srcNodes, tgtNodes;
494       if ( !SMESH_Algo::GetSortedNodesOnEdge( srcMesh->GetMeshDS(),
495                                               TopoDS::Edge( srcEdge.Current() ),
496                                               /*ignoreMediumNodes = */true,
497                                               srcNodes )
498            ||
499            !SMESH_Algo::GetSortedNodesOnEdge( tgtMesh->GetMeshDS(),
500                                               TopoDS::Edge( tgtEdge ),
501                                               /*ignoreMediumNodes = */true,
502                                               tgtNodes )
503            ||
504            srcNodes.size() != tgtNodes.size())
505         return false;
506
507       if ( !tgtEdge.IsPartner( srcEdge.Current() ))
508       {
509         // check that transformation is OK by three nodes
510         gp_Pnt p0S = SMESH_TNodeXYZ( (srcNodes.begin())  ->second);
511         gp_Pnt p1S = SMESH_TNodeXYZ( (srcNodes.rbegin()) ->second);
512         gp_Pnt p2S = SMESH_TNodeXYZ( (++srcNodes.begin())->second);
513
514         gp_Pnt p0T = SMESH_TNodeXYZ( (tgtNodes.begin())  ->second);
515         gp_Pnt p1T = SMESH_TNodeXYZ( (tgtNodes.rbegin()) ->second);
516         gp_Pnt p2T = SMESH_TNodeXYZ( (++tgtNodes.begin())->second);
517
518         // transform source points, they must coincide with target ones
519         if ( p0T.SquareDistance( p0S.Transformed( trsf )) > tol ||
520              p1T.SquareDistance( p1S.Transformed( trsf )) > tol ||
521              p2T.SquareDistance( p2S.Transformed( trsf )) > tol )
522         {
523           //cout << "KO trsf, 3 dist: "
524           //<< p0T.SquareDistance( p0S.Transformed( trsf ))<< ", "
525           //<< p1T.SquareDistance( p1S.Transformed( trsf ))<< ", "
526           //<< p2T.SquareDistance( p2S.Transformed( trsf ))<< ", "<<endl;
527           return false;
528         }
529       }
530
531       map< double, const SMDS_MeshNode* >::iterator u_tn = tgtNodes.begin();
532       map< double, const SMDS_MeshNode* >::iterator u_sn = srcNodes.begin();
533       for ( ; u_tn != tgtNodes.end(); ++u_tn, ++u_sn)
534         src2tgtNodes.insert( make_pair( u_sn->second, u_tn->second ));
535     }
536
537     // Make new faces
538
539     // prepare the helper to adding quadratic elements if necessary
540     SMESH_MesherHelper helper( *tgtMesh );
541     helper.SetSubShape( tgtFace );
542     helper.IsQuadraticSubMesh( tgtFace );
543     helper.SetElementsOnShape( true );
544
545     SMESH_MesherHelper srcHelper( *srcMesh );
546     srcHelper.SetSubShape( srcFace );
547
548     const SMDS_MeshNode* nullNode = 0;
549
550     // indices of nodes to create properly oriented faces
551     int tri1 = 1, tri2 = 2, quad1 = 1, quad3 = 3;
552     if ( trsf.Form() != gp_Identity )
553       std::swap( tri1, tri2 ), std::swap( quad1, quad3 );
554
555     SMESHDS_SubMesh* srcSubDS = srcMesh->GetMeshDS()->MeshElements( srcFace );
556     SMDS_ElemIteratorPtr elemIt = srcSubDS->GetElements();
557     vector< const SMDS_MeshNode* > tgtNodes;
558     while ( elemIt->more() ) // loop on all mesh faces on srcFace
559     {
560       const SMDS_MeshElement* elem = elemIt->next();
561       const int nbN = elem->NbCornerNodes(); 
562       tgtNodes.resize( nbN );
563       for ( int i = 0; i < nbN; ++i ) // loop on nodes of the source element
564       {
565         const SMDS_MeshNode* srcNode = elem->GetNode(i);
566         srcN_tgtN = src2tgtNodes.insert( make_pair( srcNode, nullNode )).first;
567         if ( srcN_tgtN->second == nullNode )
568         {
569           // create a new node
570           gp_Pnt tgtP = gp_Pnt(srcNode->X(),srcNode->Y(),srcNode->Z()).Transformed( trsf );
571           SMDS_MeshNode* n = helper.AddNode( tgtP.X(), tgtP.Y(), tgtP.Z() );
572           srcN_tgtN->second = n;
573
574           gp_Pnt2d srcUV = srcHelper.GetNodeUV( srcFace, srcNode,
575                                                 elem->GetNode( helper.WrapIndex(i+1,nbN)));
576           n->SetPosition( new SMDS_FacePosition( srcUV.X(), srcUV.Y() ));
577         }
578         tgtNodes[i] = srcN_tgtN->second;
579       }
580       // create a new face
581       switch ( nbN )
582       {
583       case 3: helper.AddFace(tgtNodes[0], tgtNodes[tri1], tgtNodes[tri2]); break;
584       case 4: helper.AddFace(tgtNodes[0], tgtNodes[quad1], tgtNodes[2], tgtNodes[quad3]); break;
585       }
586     }
587     return true;
588
589   } //   bool projectPartner()
590
591   //================================================================================
592   /*!
593    * \brief Preform projection in case if the faces are similar in 2D space
594    */
595   //================================================================================
596
597   bool projectBy2DSimilarity(const TopoDS_Face&                tgtFace,
598                              const TopoDS_Face&                srcFace,
599                              SMESH_Mesh *                      tgtMesh,
600                              SMESH_Mesh *                      srcMesh,
601                              const TAssocTool::TShapeShapeMap& shape2ShapeMap,
602                              const bool                        is1DComputed)
603   {
604     // 1) Preparation
605
606     // get ordered src EDGEs
607     TError err;
608     TSideVector srcWires =
609       StdMeshers_FaceSide::GetFaceWires( srcFace, *srcMesh,/*ignoreMediumNodes = */false, err);
610     if ( err && !err->IsOK() )
611       return false;
612
613     // make corresponding sequence of tgt EDGEs
614     TSideVector tgtWires( srcWires.size() );
615     for ( unsigned iW = 0; iW < srcWires.size(); ++iW )
616     {
617       list< TopoDS_Edge > tgtEdges;
618       StdMeshers_FaceSidePtr srcWire = srcWires[iW];
619       TopTools_IndexedMapOfShape edgeMap; // to detect seam edges
620       for ( int iE = 0; iE < srcWire->NbEdges(); ++iE )
621       {
622         tgtEdges.push_back( TopoDS::Edge( shape2ShapeMap( srcWire->Edge( iE ), /*isSrc=*/true)));
623         // reverse a seam edge encountered for the second time
624         const int oldExtent = edgeMap.Extent();
625         edgeMap.Add( tgtEdges.back() );
626         if ( oldExtent == edgeMap.Extent() )
627           tgtEdges.back().Reverse();
628       }
629       tgtWires[ iW ].reset( new StdMeshers_FaceSide( tgtFace, tgtEdges, tgtMesh,
630                                                      /*theIsForward = */ true,
631                                                      /*theIgnoreMediumNodes = */false));
632       if ( is1DComputed &&
633            srcWires[iW]->GetUVPtStruct().size() !=
634            tgtWires[iW]->GetUVPtStruct().size())
635         return false;
636     }
637
638     // 2) Find transformation
639
640     gp_Trsf2d trsf;
641     {
642       // get 2 pairs of corresponding UVs
643       gp_Pnt2d srcP0 = srcWires[0]->Value2d(0.0);
644       gp_Pnt2d srcP1 = srcWires[0]->Value2d(0.333);
645       gp_Pnt2d tgtP0 = tgtWires[0]->Value2d(0.0);
646       gp_Pnt2d tgtP1 = tgtWires[0]->Value2d(0.333);
647
648       // make transformation
649       gp_Trsf2d fromTgtCS, toSrcCS; // from/to global CS
650       gp_Ax2d srcCS( srcP0, gp_Vec2d( srcP0, srcP1 ));
651       gp_Ax2d tgtCS( tgtP0, gp_Vec2d( tgtP0, tgtP1 ));
652       toSrcCS  .SetTransformation( srcCS );
653       fromTgtCS.SetTransformation( tgtCS );
654       fromTgtCS.Invert();
655
656       trsf = fromTgtCS * toSrcCS;
657
658       // check transformation
659       const double tol = 1e-5 * gp_Vec2d( srcP0, srcP1 ).Magnitude();
660       for ( double u = 0.12; u < 1.; u += 0.1 )
661       {
662         gp_Pnt2d srcUV = srcWires[0]->Value2d( u );
663         gp_Pnt2d tgtUV = tgtWires[0]->Value2d( u );
664         gp_Pnt2d tgtUV2 = srcUV.Transformed( trsf );
665         if ( tgtUV.Distance( tgtUV2 ) > tol )
666           return false;
667       }
668     }
669
670     // 3) Projection
671
672     typedef map<const SMDS_MeshNode* , const SMDS_MeshNode*, TIDCompare> TN2NMap;
673     TN2NMap src2tgtNodes;
674     TN2NMap::iterator srcN_tgtN;
675
676     // fill src2tgtNodes in with nodes on EDGEs
677     for ( unsigned iW = 0; iW < srcWires.size(); ++iW )
678       if ( is1DComputed )
679       {
680         const vector<UVPtStruct>& srcUVs = srcWires[iW]->GetUVPtStruct();
681         const vector<UVPtStruct>& tgtUVs = tgtWires[iW]->GetUVPtStruct();
682         for ( unsigned i = 0; i < srcUVs.size(); ++i )
683           src2tgtNodes.insert( make_pair( srcUVs[i].node, tgtUVs[i].node ));
684       }
685       else
686       {
687         for ( int iE = 0; iE < srcWires[iW]->NbEdges(); ++iE )
688         {
689           TopoDS_Vertex srcV = srcWires[iW]->FirstVertex(iE);
690           TopoDS_Vertex tgtV = tgtWires[iW]->FirstVertex(iE);
691           const SMDS_MeshNode* srcNode = SMESH_Algo::VertexNode( srcV, srcMesh->GetMeshDS() );
692           const SMDS_MeshNode* tgtNode = SMESH_Algo::VertexNode( tgtV, tgtMesh->GetMeshDS() );
693           if ( tgtNode && srcNode )
694             src2tgtNodes.insert( make_pair( srcNode, tgtNode ));
695         }
696       }
697
698     // make elements
699
700     SMESHDS_SubMesh* srcSubDS = srcMesh->GetMeshDS()->MeshElements( srcFace );
701
702     SMESH_MesherHelper helper( *tgtMesh );
703     helper.SetSubShape( tgtFace );
704     if ( is1DComputed )
705       helper.IsQuadraticSubMesh( tgtFace );
706     else
707       helper.SetIsQuadratic( srcSubDS->GetElements()->next()->IsQuadratic() );
708     helper.SetElementsOnShape( true );
709     Handle(Geom_Surface) tgtSurface = BRep_Tool::Surface( tgtFace );
710     SMESHDS_Mesh* tgtMeshDS = tgtMesh->GetMeshDS();
711
712     SMESH_MesherHelper srcHelper( *srcMesh );
713     srcHelper.SetSubShape( srcFace );
714
715     const SMDS_MeshNode* nullNode = 0;
716
717     SMDS_ElemIteratorPtr elemIt = srcSubDS->GetElements();
718     vector< const SMDS_MeshNode* > tgtNodes;
719     bool uvOK;
720     while ( elemIt->more() ) // loop on all mesh faces on srcFace
721     {
722       const SMDS_MeshElement* elem = elemIt->next();
723       const int nbN = elem->NbCornerNodes(); 
724       tgtNodes.resize( nbN );
725       for ( int i = 0; i < nbN; ++i ) // loop on nodes of the source element
726       {
727         const SMDS_MeshNode* srcNode = elem->GetNode(i);
728         srcN_tgtN = src2tgtNodes.insert( make_pair( srcNode, nullNode )).first;
729         if ( srcN_tgtN->second == nullNode )
730         {
731           // create a new node
732           gp_Pnt2d srcUV = srcHelper.GetNodeUV( srcFace, srcNode,
733                                                 elem->GetNode( helper.WrapIndex(i+1,nbN)), &uvOK);
734           gp_Pnt2d tgtUV = srcUV.Transformed( trsf );
735           gp_Pnt   tgtP  = tgtSurface->Value( tgtUV.X(), tgtUV.Y() );
736           SMDS_MeshNode* n = tgtMeshDS->AddNode( tgtP.X(), tgtP.Y(), tgtP.Z() );
737           switch ( srcNode->GetPosition()->GetTypeOfPosition() )
738           {
739           case SMDS_TOP_FACE: {
740             tgtMeshDS->SetNodeOnFace( n, helper.GetSubShapeID(), tgtUV.X(), tgtUV.Y() );
741             break;
742           }
743           case SMDS_TOP_EDGE: {
744             TopoDS_Shape srcEdge = srcHelper.GetSubShapeByNode( srcNode, srcHelper.GetMeshDS() );
745             TopoDS_Edge  tgtEdge = TopoDS::Edge( shape2ShapeMap( srcEdge, /*isSrc=*/true ));
746             tgtMeshDS->SetNodeOnEdge( n, TopoDS::Edge( tgtEdge ));
747             double U = srcHelper.GetNodeU( TopoDS::Edge( srcEdge ), srcNode );
748             helper.CheckNodeU( tgtEdge, n, U, Precision::PConfusion());
749             n->SetPosition(SMDS_PositionPtr(new SMDS_EdgePosition( U )));
750             break;
751           }
752           case SMDS_TOP_VERTEX: {
753             TopoDS_Shape srcV = srcHelper.GetSubShapeByNode( srcNode, srcHelper.GetMeshDS() );
754             TopoDS_Shape tgtV = shape2ShapeMap( srcV, /*isSrc=*/true );
755             tgtMeshDS->SetNodeOnVertex( n, TopoDS::Vertex( tgtV ));
756             break;
757           }
758           }
759           srcN_tgtN->second = n;
760         }
761         tgtNodes[i] = srcN_tgtN->second;
762       }
763       // create a new face (with reversed orientation)
764       switch ( nbN )
765       {
766       case 3: helper.AddFace(tgtNodes[0], tgtNodes[2], tgtNodes[1]); break;
767       case 4: helper.AddFace(tgtNodes[0], tgtNodes[3], tgtNodes[2], tgtNodes[1]); break;
768       }
769     }
770     return true;
771
772   } // bool projectBy2DSimilarity(...)
773
774 } // namespace
775
776
777 //=======================================================================
778 //function : Compute
779 //purpose  : 
780 //=======================================================================
781
782 bool StdMeshers_Projection_2D::Compute(SMESH_Mesh& theMesh, const TopoDS_Shape& theShape)
783 {
784   MESSAGE("Projection_2D Compute");
785   if ( !_sourceHypo )
786     return false;
787
788   SMESH_Mesh * srcMesh = _sourceHypo->GetSourceMesh();
789   SMESH_Mesh * tgtMesh = & theMesh;
790   if ( !srcMesh )
791     srcMesh = tgtMesh;
792
793   SMESHDS_Mesh * meshDS = theMesh.GetMeshDS();
794
795   // ---------------------------
796   // Make sub-shapes association
797   // ---------------------------
798
799   TopoDS_Face   tgtFace = TopoDS::Face( theShape.Oriented(TopAbs_FORWARD));
800   TopoDS_Shape srcShape = _sourceHypo->GetSourceFace().Oriented(TopAbs_FORWARD);
801
802   TAssocTool::TShapeShapeMap shape2ShapeMap;
803   TAssocTool::InitVertexAssociation( _sourceHypo, shape2ShapeMap );
804   if ( !TAssocTool::FindSubShapeAssociation( tgtFace, tgtMesh, srcShape, srcMesh,
805                                              shape2ShapeMap)  ||
806        !shape2ShapeMap.IsBound( tgtFace ))
807   {
808     if ( srcShape.ShapeType() == TopAbs_FACE )
809     {
810       int nbE1 = SMESH_MesherHelper::Count( tgtFace, TopAbs_EDGE, /*ignoreSame=*/true );
811       int nbE2 = SMESH_MesherHelper::Count( srcShape, TopAbs_EDGE, /*ignoreSame=*/true );
812       if ( nbE1 != nbE2 )
813         return error(COMPERR_BAD_SHAPE,
814                      SMESH_Comment("Different number of edges in source and target faces: ")
815                      << nbE2 << " and " << nbE1 );
816     }
817     return error(COMPERR_BAD_SHAPE,"Topology of source and target faces seems different" );
818   }
819   TopoDS_Face srcFace = TopoDS::Face( shape2ShapeMap( tgtFace ).Oriented(TopAbs_FORWARD));
820
821   // ----------------------------------------------
822   // Assure that mesh on a source Face is computed
823   // ----------------------------------------------
824
825   SMESH_subMesh* srcSubMesh = srcMesh->GetSubMesh( srcFace );
826   SMESH_subMesh* tgtSubMesh = tgtMesh->GetSubMesh( tgtFace );
827
828   string srcMeshError;
829   if ( tgtMesh == srcMesh ) {
830     if ( !TAssocTool::MakeComputed( srcSubMesh ))
831       srcMeshError = TAssocTool::SourceNotComputedError( srcSubMesh, this );
832   }
833   else {
834     if ( !srcSubMesh->IsMeshComputed() )
835       srcMeshError = TAssocTool::SourceNotComputedError();
836   }
837   if ( !srcMeshError.empty() )
838     return error(COMPERR_BAD_INPUT_MESH, srcMeshError );
839
840   // ===========
841   // Projection
842   // ===========
843
844   // find out if EDGEs are meshed or not
845   bool is1DComputed = false;
846   SMESH_subMeshIteratorPtr smIt = tgtSubMesh->getDependsOnIterator(/*includeSelf=*/false,
847                                                                    /*complexShapeFirst=*/true);
848   while ( smIt->more() && !is1DComputed )
849   {
850     SMESH_subMesh* sm = smIt->next();
851     if ( sm->GetSubShape().ShapeType() == TopAbs_EDGE )
852       is1DComputed = sm->IsMeshComputed();
853   }
854
855   bool done = false;
856
857   if ( !done )
858   {
859     // try to project from the same face with different location
860     done = projectPartner( tgtFace, srcFace, tgtMesh, srcMesh, shape2ShapeMap );
861   }
862   if ( !done )
863   {
864     // projection in case if the faces are similar in 2D space
865     done = projectBy2DSimilarity( tgtFace, srcFace, tgtMesh, srcMesh, shape2ShapeMap, is1DComputed);
866   }
867
868   SMESH_MesherHelper helper( theMesh );
869   helper.SetSubShape( tgtFace );
870
871   if ( !done )
872   {
873     // --------------------
874     // Prepare to mapping 
875     // --------------------
876
877     // Check if node projection to a face is needed
878     Bnd_B2d uvBox;
879     SMDS_ElemIteratorPtr faceIt = srcSubMesh->GetSubMeshDS()->GetElements();
880     int nbFaceNodes = 0;
881     for ( ; nbFaceNodes < 3 && faceIt->more();  ) {
882       const SMDS_MeshElement* face = faceIt->next();
883       SMDS_ElemIteratorPtr nodeIt = face->nodesIterator();
884       while ( nodeIt->more() ) {
885         const SMDS_MeshNode* node = static_cast<const SMDS_MeshNode*>( nodeIt->next() );
886         if ( node->GetPosition()->GetTypeOfPosition() == SMDS_TOP_FACE ) {
887           nbFaceNodes++;
888           uvBox.Add( helper.GetNodeUV( srcFace, node ));
889         }
890       }
891     }
892     const bool toProjectNodes =
893       ( nbFaceNodes > 0 && ( uvBox.IsVoid() || uvBox.SquareExtent() < DBL_MIN ));
894
895     // Find the corresponding source and target vertex
896     // and <theReverse> flag needed to call mapper.Apply()
897
898     TopoDS_Vertex srcV1, tgtV1;
899     bool reverse = false;
900
901     if ( _sourceHypo->HasVertexAssociation() ) {
902       srcV1 = _sourceHypo->GetSourceVertex(1);
903       tgtV1 = _sourceHypo->GetTargetVertex(1);
904     } else {
905       srcV1 = TopoDS::Vertex( TopExp_Explorer( srcFace, TopAbs_VERTEX ).Current() );
906       tgtV1 = TopoDS::Vertex( shape2ShapeMap( srcV1, /*isSrc=*/true ));
907     }
908     list< TopoDS_Edge > tgtEdges, srcEdges;
909     list< int > nbEdgesInWires;
910     SMESH_Block::GetOrderedEdges( tgtFace, tgtEdges, nbEdgesInWires, tgtV1 );
911     SMESH_Block::GetOrderedEdges( srcFace, srcEdges, nbEdgesInWires, srcV1 );
912
913     if ( nbEdgesInWires.front() > 1 ) // possible to find out orientation
914     {
915       TopoDS_Edge srcE1 = srcEdges.front(), tgtE1 = tgtEdges.front();
916       TopoDS_Shape srcE1bis = shape2ShapeMap( tgtE1 );
917       reverse = ( ! srcE1.IsSame( srcE1bis ));
918       if ( reverse &&
919            _sourceHypo->HasVertexAssociation() &&
920            nbEdgesInWires.front() > 2 &&
921            helper.IsRealSeam( tgtEdges.front() ))
922       {
923         // projection to a face with seam EDGE; pb is that GetOrderedEdges()
924         // always puts a seam EDGE first (if possible) and as a result
925         // we can't use only theReverse flag to correctly associate source
926         // and target faces in the mapper. Thus we select srcV1 so that
927         // GetOrderedEdges() to return EDGEs in a needed order
928         list< TopoDS_Edge >::iterator edge = srcEdges.begin();
929         for ( ; edge != srcEdges.end(); ++edge ) {
930           if ( srcE1bis.IsSame( *edge )) {
931             srcV1 = helper.IthVertex( 0, *edge );
932             break;
933           }
934         }
935       }
936     }
937     else if ( nbEdgesInWires.front() == 1 )
938     {
939       // TODO::Compare orientation of curves in a sole edge
940       //RETURN_BAD_RESULT("Not implemented case");
941     }
942     else
943     {
944       RETURN_BAD_RESULT("Bad result from SMESH_Block::GetOrderedEdges()");
945     }
946
947     // Load pattern from the source face
948     SMESH_Pattern mapper;
949     mapper.Load( srcMesh, srcFace, toProjectNodes, srcV1 );
950     if ( mapper.GetErrorCode() != SMESH_Pattern::ERR_OK )
951       return error(COMPERR_BAD_INPUT_MESH,"Can't load mesh pattern from the source face");
952
953     // --------------------
954     // Perform 2D mapping 
955     // --------------------
956
957     // Compute mesh on a target face
958
959     mapper.Apply( tgtFace, tgtV1, reverse );
960     if ( mapper.GetErrorCode() != SMESH_Pattern::ERR_OK )
961       return error("Can't apply source mesh pattern to the face");
962
963     // Create the mesh
964
965     const bool toCreatePolygons = false, toCreatePolyedrs = false;
966     mapper.MakeMesh( tgtMesh, toCreatePolygons, toCreatePolyedrs );
967     if ( mapper.GetErrorCode() != SMESH_Pattern::ERR_OK )
968       return error("Can't make mesh by source mesh pattern");
969
970     // it will remove mesh built by pattern mapper on edges and vertices
971     // in failure case
972     MeshCleaner cleaner( tgtSubMesh );
973
974     // -------------------------------------------------------------------------
975     // mapper doesn't take care of nodes already existing on edges and vertices,
976     // so we must merge nodes created by it with existing ones 
977     // -------------------------------------------------------------------------
978
979     SMESH_MeshEditor::TListOfListOfNodes groupsOfNodes;
980
981     // Make groups of nodes to merge
982
983     // loop on EDGE and VERTEX sub-meshes of a target FACE
984     smIt = tgtSubMesh->getDependsOnIterator(/*includeSelf=*/false,/*complexShapeFirst=*/false);
985     while ( smIt->more() )
986     {
987       SMESH_subMesh*     sm = smIt->next();
988       SMESHDS_SubMesh* smDS = sm->GetSubMeshDS();
989       if ( !smDS || smDS->NbNodes() == 0 )
990         continue;
991       //if ( !is1DComputed && sm->GetSubShape().ShapeType() == TopAbs_EDGE )
992       //break;
993
994       if ( helper.IsDegenShape( sm->GetId() ) ) // to merge all nodes on degenerated
995       {
996         if ( sm->GetSubShape().ShapeType() == TopAbs_EDGE )
997         {
998           groupsOfNodes.push_back( list< const SMDS_MeshNode* >() );
999           SMESH_subMeshIteratorPtr smDegenIt
1000             = sm->getDependsOnIterator(/*includeSelf=*/true,/*complexShapeFirst=*/false);
1001           while ( smDegenIt->more() )
1002             if (( smDS = smDegenIt->next()->GetSubMeshDS() ))
1003             {
1004               SMDS_NodeIteratorPtr nIt = smDS->GetNodes();
1005               while ( nIt->more() )
1006                 groupsOfNodes.back().push_back( nIt->next() );
1007             }
1008         }
1009         continue; // do not treat sm of degen VERTEX
1010       }
1011
1012       // Sort new and old nodes of a submesh separately
1013
1014       bool isSeam = helper.IsRealSeam( sm->GetId() );
1015
1016       enum { NEW_NODES = 0, OLD_NODES };
1017       map< double, const SMDS_MeshNode* > u2nodesMaps[2], u2nodesOnSeam;
1018       map< double, const SMDS_MeshNode* >::iterator u_oldNode, u_newNode, u_newOnSeam, newEnd;
1019       set< const SMDS_MeshNode* > seamNodes;
1020
1021       // mapper puts on a seam edge nodes from 2 edges
1022       if ( isSeam && ! getBoundaryNodes ( sm, tgtFace, u2nodesOnSeam, seamNodes ))
1023         RETURN_BAD_RESULT("getBoundaryNodes() failed");
1024
1025       SMDS_NodeIteratorPtr nIt = smDS->GetNodes();
1026       while ( nIt->more() )
1027       {
1028         const SMDS_MeshNode* node = nIt->next();
1029         bool isOld = isOldNode( node );
1030
1031         if ( !isOld && isSeam ) { // new node on a seam edge
1032           if ( seamNodes.count( node ) )
1033             continue; // node is already in the map
1034         }
1035
1036         // sort nodes on edges by their position
1037         map< double, const SMDS_MeshNode* > & pos2nodes = u2nodesMaps[isOld ? OLD_NODES : NEW_NODES];
1038         switch ( node->GetPosition()->GetTypeOfPosition() )
1039         {
1040         case  SMDS_TOP_VERTEX: {
1041           if ( !is1DComputed && !pos2nodes.empty() )
1042             u2nodesMaps[isOld ? NEW_NODES : OLD_NODES].insert( make_pair( 0, node ));
1043           else
1044             pos2nodes.insert( make_pair( 0, node ));
1045           break;
1046         }
1047         case  SMDS_TOP_EDGE:   {
1048           const SMDS_EdgePosition* pos =
1049             static_cast<const SMDS_EdgePosition*>(node->GetPosition());
1050           pos2nodes.insert( make_pair( pos->GetUParameter(), node ));
1051           break;
1052         }
1053         default:
1054           RETURN_BAD_RESULT("Wrong node position type: "<<
1055                             node->GetPosition()->GetTypeOfPosition());
1056         }
1057       }
1058       const bool mergeNewToOld =
1059         ( u2nodesMaps[ NEW_NODES ].size() == u2nodesMaps[ OLD_NODES ].size() );
1060       const bool mergeSeamToNew =
1061         ( u2nodesMaps[ NEW_NODES ].size() == u2nodesOnSeam.size() );
1062
1063       if ( !mergeNewToOld )
1064         if ( u2nodesMaps[ NEW_NODES ].size() > 0 &&
1065              u2nodesMaps[ OLD_NODES ].size() > 0 )
1066         {
1067           u_oldNode = u2nodesMaps[ OLD_NODES ].begin(); 
1068           newEnd    = u2nodesMaps[ OLD_NODES ].end();
1069           for ( ; u_oldNode != newEnd; ++u_oldNode )
1070             SMESH_Algo::addBadInputElement( u_oldNode->second );
1071           return error( COMPERR_BAD_INPUT_MESH,
1072                         SMESH_Comment( "Existing mesh mismatches the projected 2D mesh on " )
1073                         << ( sm->GetSubShape().ShapeType() == TopAbs_EDGE ? "edge" : "vertex" )
1074                         << " #" << sm->GetId() );
1075         }
1076       if ( isSeam && !mergeSeamToNew ) {
1077         const TopoDS_Shape& seam = sm->GetSubShape();
1078         if ( u2nodesMaps[ NEW_NODES ].size() > 0 &&
1079              u2nodesOnSeam.size()            > 0 &&
1080              seam.ShapeType() == TopAbs_EDGE )
1081         {
1082           int nbE1 = SMESH_MesherHelper::Count( tgtFace, TopAbs_EDGE, /*ignoreSame=*/true );
1083           int nbE2 = SMESH_MesherHelper::Count( srcFace, TopAbs_EDGE, /*ignoreSame=*/true );
1084           if ( nbE1 != nbE2 ) // 2 EDGEs are mapped to a seam EDGE
1085           {
1086             // find the 2 EDGEs of srcFace
1087             TopTools_DataMapIteratorOfDataMapOfShapeShape src2tgtIt( shape2ShapeMap._map2to1 );
1088             for ( ; src2tgtIt.More(); src2tgtIt.Next() )
1089               if ( seam.IsSame( src2tgtIt.Value() ))
1090                 SMESH_Algo::addBadInputElements
1091                   ( srcMesh->GetMeshDS()->MeshElements( src2tgtIt.Key() ));
1092             return error( COMPERR_BAD_INPUT_MESH,
1093                           "Different number of nodes on two edges projected to a seam edge" );
1094           }
1095         }
1096       }
1097
1098       // Make groups of nodes to merge
1099
1100       u_oldNode = u2nodesMaps[ OLD_NODES ].begin(); 
1101       u_newNode = u2nodesMaps[ NEW_NODES ].begin();
1102       newEnd    = u2nodesMaps[ NEW_NODES ].end();
1103       u_newOnSeam = u2nodesOnSeam.begin();
1104       if ( mergeNewToOld )
1105         for ( ; u_newNode != newEnd; ++u_newNode, ++u_oldNode )
1106         {
1107           groupsOfNodes.push_back( list< const SMDS_MeshNode* >() );
1108           groupsOfNodes.back().push_back( u_oldNode->second );
1109           groupsOfNodes.back().push_back( u_newNode->second );
1110           if ( mergeSeamToNew )
1111             groupsOfNodes.back().push_back( (u_newOnSeam++)->second );
1112         }
1113       else if ( mergeSeamToNew )
1114         for ( ; u_newNode != newEnd; ++u_newNode, ++u_newOnSeam )
1115         {
1116           groupsOfNodes.push_back( list< const SMDS_MeshNode* >() );
1117           groupsOfNodes.back().push_back( u_newNode->second );
1118           groupsOfNodes.back().push_back( u_newOnSeam->second );
1119         }
1120
1121     } // loop on EDGE and VERTEX submeshes of a target FACE
1122
1123     // Merge
1124
1125     SMESH_MeshEditor editor( tgtMesh );
1126     int nbFaceBeforeMerge = tgtSubMesh->GetSubMeshDS()->NbElements();
1127     editor.MergeNodes( groupsOfNodes );
1128     int nbFaceAtferMerge = tgtSubMesh->GetSubMeshDS()->NbElements();
1129     if ( nbFaceBeforeMerge != nbFaceAtferMerge && !helper.HasDegeneratedEdges() )
1130       return error(COMPERR_BAD_INPUT_MESH, "Probably invalid node parameters on geom faces");
1131
1132     // ----------------------------------------------------------------
1133     // The mapper can't create quadratic elements, so convert if needed
1134     // ----------------------------------------------------------------
1135
1136     faceIt         = srcSubMesh->GetSubMeshDS()->GetElements();
1137     bool srcIsQuad = faceIt->next()->IsQuadratic();
1138     faceIt         = tgtSubMesh->GetSubMeshDS()->GetElements();
1139     bool tgtIsQuad = faceIt->next()->IsQuadratic();
1140     if ( srcIsQuad && !tgtIsQuad )
1141     {
1142       TIDSortedElemSet tgtFaces;
1143       faceIt = tgtSubMesh->GetSubMeshDS()->GetElements();
1144       while ( faceIt->more() )
1145         tgtFaces.insert( tgtFaces.end(), faceIt->next() );
1146
1147       editor.ConvertToQuadratic(/*theForce3d=*/false, tgtFaces, false);
1148     }
1149
1150     cleaner.Release(); // not to remove mesh
1151
1152   } // end of projection using Pattern mapping
1153
1154
1155   // ---------------------------
1156   // Check elements orientation
1157   // ---------------------------
1158
1159   TopoDS_Face face = TopoDS::Face( theShape );
1160   if ( !theMesh.IsMainShape( tgtFace ))
1161   {
1162     // find the main shape
1163     TopoDS_Shape mainShape = meshDS->ShapeToMesh();
1164     switch ( mainShape.ShapeType() ) {
1165     case TopAbs_SHELL:
1166     case TopAbs_SOLID: break;
1167     default:
1168       TopTools_ListIteratorOfListOfShape ancestIt = theMesh.GetAncestors( face );
1169       for ( ; ancestIt.More(); ancestIt.Next() ) {
1170         TopAbs_ShapeEnum type = ancestIt.Value().ShapeType();
1171         if ( type == TopAbs_SOLID ) {
1172           mainShape = ancestIt.Value();
1173           break;
1174         } else if ( type == TopAbs_SHELL ) {
1175           mainShape = ancestIt.Value();
1176         }
1177       }
1178     }
1179     // find tgtFace in the main solid or shell to know it's true orientation.
1180     TopExp_Explorer exp( mainShape, TopAbs_FACE );
1181     for ( ; exp.More(); exp.Next() ) {
1182       if ( tgtFace.IsSame( exp.Current() )) {
1183         face = TopoDS::Face( exp.Current() );
1184         break;
1185       }
1186     }
1187   }
1188   // Fix orientation
1189   if ( helper.IsReversedSubMesh( face ))
1190   {
1191     SMESH_MeshEditor editor( tgtMesh );
1192     SMDS_ElemIteratorPtr eIt = meshDS->MeshElements( face )->GetElements();
1193     while ( eIt->more() ) {
1194       const SMDS_MeshElement* e = eIt->next();
1195       if ( e->GetType() == SMDSAbs_Face && !editor.Reorient( e ))
1196         RETURN_BAD_RESULT("Pb of SMESH_MeshEditor::Reorient()");
1197     }
1198   }
1199
1200   return true;
1201 }
1202
1203
1204 //=======================================================================
1205 //function : Evaluate
1206 //purpose  : 
1207 //=======================================================================
1208
1209 bool StdMeshers_Projection_2D::Evaluate(SMESH_Mesh&         theMesh,
1210                                         const TopoDS_Shape& theShape,
1211                                         MapShapeNbElems&    aResMap)
1212 {
1213   if ( !_sourceHypo )
1214     return false;
1215
1216   SMESH_Mesh * srcMesh = _sourceHypo->GetSourceMesh();
1217   SMESH_Mesh * tgtMesh = & theMesh;
1218   if ( !srcMesh )
1219     srcMesh = tgtMesh;
1220
1221   // ---------------------------
1222   // Make sub-shapes association
1223   // ---------------------------
1224
1225   TopoDS_Face tgtFace = TopoDS::Face( theShape.Oriented(TopAbs_FORWARD));
1226   TopoDS_Shape srcShape = _sourceHypo->GetSourceFace().Oriented(TopAbs_FORWARD);
1227
1228   TAssocTool::TShapeShapeMap shape2ShapeMap;
1229   TAssocTool::InitVertexAssociation( _sourceHypo, shape2ShapeMap );
1230   if ( !TAssocTool::FindSubShapeAssociation( tgtFace, tgtMesh, srcShape, srcMesh,
1231                                              shape2ShapeMap)  ||
1232        !shape2ShapeMap.IsBound( tgtFace ))
1233     return error(COMPERR_BAD_SHAPE,"Topology of source and target faces seems different" );
1234
1235   TopoDS_Face srcFace = TopoDS::Face( shape2ShapeMap( tgtFace ).Oriented(TopAbs_FORWARD));
1236
1237   // -------------------------------------------------------
1238   // Assure that mesh on a source Face is computed/evaluated
1239   // -------------------------------------------------------
1240
1241   std::vector<int> aVec;
1242
1243   SMESH_subMesh* srcSubMesh = srcMesh->GetSubMesh( srcFace );
1244   if ( srcSubMesh->IsMeshComputed() )
1245   {
1246     aVec.resize( SMDSEntity_Last, 0 );
1247     aVec[SMDSEntity_Node] = srcSubMesh->GetSubMeshDS()->NbNodes();
1248
1249     SMDS_ElemIteratorPtr elemIt = srcSubMesh->GetSubMeshDS()->GetElements();
1250     while ( elemIt->more() )
1251       aVec[ elemIt->next()->GetEntityType() ]++;
1252   }
1253   else
1254   {
1255     MapShapeNbElems  tmpResMap;
1256     MapShapeNbElems& srcResMap = (srcMesh == tgtMesh) ? aResMap : tmpResMap;
1257     if ( !_gen->Evaluate( *srcMesh, srcShape, srcResMap ))
1258       return error(COMPERR_BAD_INPUT_MESH,"Source mesh not evaluatable");
1259     aVec = srcResMap[ srcSubMesh ];
1260     if ( aVec.empty() )
1261       return error(COMPERR_BAD_INPUT_MESH,"Source mesh is wrongly evaluated");
1262   }
1263
1264   SMESH_subMesh * sm = theMesh.GetSubMesh(theShape);
1265   aResMap.insert(std::make_pair(sm,aVec));
1266
1267   return true;
1268 }
1269
1270
1271 //=============================================================================
1272 /*!
1273  * \brief Sets a default event listener to submesh of the source face
1274   * \param subMesh - submesh where algo is set
1275  *
1276  * This method is called when a submesh gets HYP_OK algo_state.
1277  * After being set, event listener is notified on each event of a submesh.
1278  * Arranges that CLEAN event is translated from source submesh to
1279  * the submesh
1280  */
1281 //=============================================================================
1282
1283 void StdMeshers_Projection_2D::SetEventListener(SMESH_subMesh* subMesh)
1284 {
1285   TAssocTool::SetEventListener( subMesh,
1286                                 _sourceHypo->GetSourceFace(),
1287                                 _sourceHypo->GetSourceMesh() );
1288 }