Salome HOME
52285710dc2cb11bcc365dc4f63df27be9c77505
[modules/geom.git] / src / OBJECT / GEOM_AISShape.cxx
1 // Copyright (C) 2007-2015  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, or (at your option) any later version.
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 /*!
24   \class GEOM_AISShape GEOM_AISShape.hxx
25   \brief ....
26 */
27
28 #include "GEOM_AISShape.hxx"
29 #include "GEOM_AISVector.hxx"
30
31 #include <GEOMUtils.hxx>
32
33 #include <Basics_OCCTVersion.hxx>
34
35 // Open CASCADE Includes
36 #include <AIS_InteractiveContext.hxx>
37 #include <BRep_Tool.hxx>
38 #include <GCPnts_AbscissaPoint.hxx>
39 #include <GeomAdaptor_Curve.hxx>
40 #include <gp_Pnt.hxx>
41 #include <gp_Dir.hxx>
42 #include <gp_Vec.hxx>
43 #include <Graphic3d_AspectFillArea3d.hxx>
44 #include <Graphic3d_AspectLine3d.hxx>
45 #include <Graphic3d_AspectMarker3d.hxx>
46 #include <Graphic3d_AspectText3d.hxx>
47
48 #include <Prs3d_ShadingAspect.hxx>
49 #include <Prs3d_Arrow.hxx>
50 #include <Prs3d_IsoAspect.hxx>
51 #if OCC_VERSION_LARGE > 0x06070200
52 #include <Prs3d_VertexDrawMode.hxx>
53 #endif
54
55 #include <SelectBasics_SensitiveEntity.hxx>
56 #include <SelectMgr_EntityOwner.hxx>
57 #include <StdSelect_BRepOwner.hxx>
58 #include <SelectMgr_IndexedMapOfOwner.hxx>
59 #include <SelectMgr_Selection.hxx>
60 #include <StdSelect_DisplayMode.hxx>
61 #include <StdPrs_ShadedShape.hxx>
62 #include <StdPrs_WFDeflectionShape.hxx>
63
64 #include <TColStd_IndexedMapOfInteger.hxx>
65 #include <TColStd_ListIteratorOfListOfInteger.hxx>
66 #include <TColStd_ListOfInteger.hxx>
67 #include <TopExp.hxx>
68 #include <TopoDS_Shape.hxx>
69 #include <TopTools_IndexedMapOfShape.hxx>
70 #include <TopExp.hxx>
71 #include <TopExp_Explorer.hxx>
72 #include <TopoDS.hxx>
73 #include <TopoDS_Edge.hxx>
74 #include <TopoDS_Shape.hxx>
75 #include <TopoDS_Vertex.hxx>
76
77 #include <TColStd_SequenceOfInteger.hxx>
78
79 #include <V3d_View.hxx>
80
81 #include <SalomeApp_Tools.h>
82 #include <SUIT_Session.h>
83 #include <SUIT_ResourceMgr.h>
84
85 IMPLEMENT_STANDARD_HANDLE (GEOM_AISShape, SALOME_AISShape)
86 IMPLEMENT_STANDARD_RTTIEXT(GEOM_AISShape, SALOME_AISShape)
87
88 GEOM_AISShape::TopLevelDispMode GEOM_AISShape::myTopLevelDm = GEOM_AISShape::TopKeepCurrent;
89 Quantity_Color GEOM_AISShape::myTopLevelColor;
90
91
92 static void getEntityOwners( const Handle(AIS_InteractiveObject)& theObj,
93                              const Handle(AIS_InteractiveContext)& theIC,
94                              SelectMgr_IndexedMapOfOwner& theMap )
95 {
96   if ( theObj.IsNull() || theIC.IsNull() )
97     return;
98
99   TColStd_ListOfInteger modes;
100   theIC->ActivatedModes( theObj, modes );
101
102   TColStd_ListIteratorOfListOfInteger itr( modes );
103   for (; itr.More(); itr.Next() ) {
104     int m = itr.Value();
105     if ( !theObj->HasSelection( m ) )
106       continue;
107
108     Handle(SelectMgr_Selection) sel = theObj->Selection( m );
109
110     for ( sel->Init(); sel->More(); sel->Next() ) {
111       Handle(SelectBasics_SensitiveEntity) entity = sel->Sensitive();
112       if ( entity.IsNull() )
113         continue;
114
115       Handle(SelectMgr_EntityOwner) owner =
116         Handle(SelectMgr_EntityOwner)::DownCast(entity->OwnerId());
117       if ( !owner.IsNull() )
118         theMap.Add( owner );
119     }
120   }
121 }
122
123 static void indicesToOwners( const TColStd_IndexedMapOfInteger& aIndexMap,
124                              const TopoDS_Shape& aMainShape,
125                              const SelectMgr_IndexedMapOfOwner& anAllMap, 
126                              SelectMgr_IndexedMapOfOwner& aToHiliteMap )
127 {
128   TopTools_IndexedMapOfShape aMapOfShapes;
129   TopExp::MapShapes(aMainShape, aMapOfShapes);
130
131   for  ( Standard_Integer i = 1, n = anAllMap.Extent(); i <= n; i++ ) {
132     Handle(StdSelect_BRepOwner) anOwner = Handle(StdSelect_BRepOwner)::DownCast(anAllMap( i ));
133     if ( anOwner.IsNull() || !anOwner->HasShape() )
134       continue;
135
136     const TopoDS_Shape& aSubShape = anOwner->Shape();
137     Standard_Integer aSubShapeId = aMapOfShapes.FindIndex( aSubShape );
138     if ( !aSubShapeId || !aIndexMap.Contains( aSubShapeId ) )
139       continue;
140     
141     if ( !aToHiliteMap.Contains( anOwner ) )
142       aToHiliteMap.Add( anOwner );
143   }
144 }
145
146 GEOM_AISShape::GEOM_AISShape(const TopoDS_Shape& shape,
147                              const Standard_CString aName)
148   : SALOME_AISShape(shape),
149     myName(aName),
150     myDisplayVectors(false),
151     myDisplayVertices(false),
152     myFieldDataType(GEOM::FDT_Double),
153     myFieldDimension(0),
154     myFieldStepRangeMin(0),
155     myFieldStepRangeMax(0)
156 {
157   //rnv: Commented to avoid bug with local selection 
158   //SetHilightMode( CustomHighlight ); // override setting the mode to 0 inside AIS_Shape constructor
159
160   myShadingColor = Quantity_Color( Quantity_NOC_GOLDENROD );
161   myPrevDisplayMode = 0;
162
163   myEdgesInShadingColor = Quantity_Color( Quantity_NOC_GOLDENROD );
164
165   myTopLevel = Standard_False;
166   Graphic3d_MaterialAspect aMatAspect;
167   if ( !HasMaterial() ) {
168         aMatAspect.SetAmbient( 0.5 );
169         aMatAspect.SetDiffuse( 0.5 );
170         aMatAspect.SetEmissive( 0.5 );
171         aMatAspect.SetShininess(0.5 );
172         aMatAspect.SetSpecular( 0.5 );
173         
174         myDrawer->ShadingAspect()->Aspect()->SetFrontMaterial(aMatAspect);
175         myDrawer->ShadingAspect()->Aspect()->SetBackMaterial(aMatAspect);
176   }
177 }
178
179 GEOM_AISShape::~GEOM_AISShape()
180 {
181 }
182
183 void GEOM_AISShape::setIO(const Handle(SALOME_InteractiveObject)& io){
184   SetOwner( io );
185 }
186
187 Handle(SALOME_InteractiveObject) GEOM_AISShape::getIO(){
188   Handle(SALOME_InteractiveObject) IO;
189   if ( !GetOwner().IsNull() )
190     IO = Handle(SALOME_InteractiveObject)::DownCast( GetOwner() );
191   return IO;
192 }
193
194 Standard_Boolean GEOM_AISShape::hasIO(){
195   return !getIO().IsNull();
196 }
197
198 void GEOM_AISShape::setName(const Standard_CString aName)
199 {
200   myName = aName;
201
202   Handle(SALOME_InteractiveObject) IO = getIO();
203   if ( !IO.IsNull() )
204     IO->setName(aName);
205 }
206
207 Standard_CString GEOM_AISShape::getName(){
208   return myName.ToCString();
209 }
210
211 void GEOM_AISShape::Compute(const Handle(PrsMgr_PresentationManager3d)& aPresentationManager,
212                             const Handle(Prs3d_Presentation)& aPrs,
213                             const Standard_Integer aMode)
214 {  
215   if (IsInfinite()) aPrs->SetInfiniteState(Standard_True); //pas de prise en compte lors du FITALL
216
217   Handle(AIS_InteractiveContext) anIC = GetContext();
218   // AKL: use old behavior to avoid keeping object's wireframe
219   //      if to change shape properties (for example: 'Clear Top Level State','Color', 'Isos') 
220   //      calling popup menu over(!) the shape in OCC viewer.
221   anIC->SetToHilightSelected( false );
222
223   bool anIsField = !myFieldStepData.isEmpty();
224   bool anIsColorField = anIsField && myFieldDataType != GEOM::FDT_String;
225   bool anIsTextField = anIsField && myFieldDataType == GEOM::FDT_String;
226
227 #if OCC_VERSION_LARGE > 0x06070200
228   if (isShowVertices())
229     myDrawer->SetVertexDrawMode(Prs3d_VDM_All);
230 #endif
231
232   //   StdSelect_DisplayMode d = (StdSelect_DisplayMode) aMode;
233   bool isTopLev = isTopLevel() && switchTopLevel();
234   switch (aMode) {
235     case Wireframe:
236     case CustomHighlight:
237     {
238       if(isTopLev) {
239               SetColor(topLevelColor());
240               Handle(Prs3d_LineAspect) anAspect = Attributes()->WireAspect();
241               anAspect->SetColor( topLevelColor() );
242               Attributes()->SetWireAspect( anAspect );
243       }
244       if( !isTopLev && anIsColorField && myFieldDimension == 1 )
245         drawField( aPrs, false, aMode == CustomHighlight );
246       else
247         StdPrs_WFDeflectionShape::Add(aPrs,myshape,myDrawer);      
248       break;
249     }
250     case Shading:
251     {
252       shadingMode(aPresentationManager, aPrs, aMode);
253       break;
254     }
255     case ShadingWithEdges:
256     {
257       myDrawer->SetFaceBoundaryDraw( Standard_True );
258       shadingMode(aPresentationManager, aPrs, Shading);
259       if( anIsColorField && myFieldDimension == 1 ) {
260         myDrawer->SetFaceBoundaryDraw( Standard_False );
261         drawField( aPrs );
262       }
263       break;
264     }
265     case TexturedShape:
266     {
267 #ifdef USE_TEXTURED_SHAPE
268         AIS_TexturedShape::Compute(aPresentationManager, aPrs, aMode);
269 #else
270         AIS_Shape::Compute(aPresentationManager, aPrs, aMode);
271 #endif
272     }
273   }
274   if (isShowVectors())
275   {
276     const bool isVector = IsKind(STANDARD_TYPE(GEOM_AISVector));
277     TopExp_Explorer Exp ( myshape, TopAbs_EDGE );
278     for ( ; Exp.More(); Exp.Next() ) {
279       TopoDS_Vertex aV1, aV2;
280       TopoDS_Edge anEdgeE = TopoDS::Edge(Exp.Current());
281       if ( !isVector )
282         // draw curve direction (issue 0021087)
283         anEdgeE.Orientation( TopAbs_FORWARD );
284
285       if ( anEdgeE.IsNull() ) continue;
286
287       TopExp::Vertices(anEdgeE, aV1, aV2);
288       gp_Pnt aP1 = BRep_Tool::Pnt(aV1);
289       gp_Pnt aP2 = BRep_Tool::Pnt(aV2);
290
291       double fp,lp;
292       gp_Vec aDirVec;
293       Handle(Geom_Curve) C = BRep_Tool::Curve(anEdgeE,fp,lp);
294
295       if ( C.IsNull() ) continue;
296
297       if ( anEdgeE.Orientation() == TopAbs_FORWARD )
298         C->D1(lp, aP2, aDirVec);
299       else {
300         C->D1(fp, aP1, aDirVec);
301         aP2 = aP1;
302       }
303
304       GeomAdaptor_Curve aAdC;
305       aAdC.Load(C, fp, lp);
306       Standard_Real aDist = GCPnts_AbscissaPoint::Length(aAdC, fp, lp); 
307      
308       if (aDist > gp::Resolution()) {
309         gp_Dir aDir;
310         if ( anEdgeE.Orientation() == TopAbs_FORWARD )
311           aDir = aDirVec;
312         else
313           aDir = -aDirVec;
314
315         Prs3d_Arrow::Draw(aPrs, aP2, aDir, M_PI/180.*5., aDist/10.);
316       }
317     }
318   }
319
320   // draw color field on vertices
321   if( anIsColorField && myFieldDimension == 0 && aMode != CustomHighlight )
322     drawField( aPrs );
323
324   // draw text field
325   if( anIsTextField )
326     drawField( aPrs, true );
327
328   if( isShowName() )
329     drawName( aPrs );
330
331   //  aPrs->ReCompute(); // for hidden line recomputation if necessary...
332 }
333
334 void GEOM_AISShape::SetShadingColor(const Quantity_Color &aCol)
335 {
336   myShadingColor = aCol;
337 }
338
339 void GEOM_AISShape::SetEdgesInShadingColor(const Quantity_Color &aCol)
340 {
341   myEdgesInShadingColor = aCol;
342 }
343
344 void GEOM_AISShape::SetLabelColor(const Quantity_Color &aCol) {
345   myLabelColor = aCol;
346 }
347
348 void GEOM_AISShape::highlightSubShapes(const TColStd_IndexedMapOfInteger& aIndexMap, 
349                                        const Standard_Boolean aHighlight )
350 {
351   Handle(AIS_InteractiveObject) anObj = this;
352   Handle(AIS_InteractiveContext) anIC = GetContext();
353   if ( anIC.IsNull() || !anIC->HasOpenedContext() ) 
354     return;
355
356   Standard_Boolean isAutoHilight = anIC->AutomaticHilight();
357   anIC->SetAutomaticHilight( false );
358
359   anIC->ClearSelected( false );
360
361   if ( aHighlight ) {
362     SelectMgr_IndexedMapOfOwner anAllMap, aToHiliteMap;
363
364     // Get entity owners for all activated selection modes
365     getEntityOwners( anObj, anIC, anAllMap );
366
367     // Convert <aIndexMap> into the map of owners to highlight/unhighlight
368     indicesToOwners( aIndexMap, Shape(), anAllMap, aToHiliteMap );
369
370
371     for ( Standard_Integer i = 1, n = aToHiliteMap.Extent(); i <= n; i++ )
372       anIC->AddOrRemoveSelected( aToHiliteMap( i ), false );
373   }
374
375   anIC->SetAutomaticHilight( isAutoHilight );
376   anIC->HilightSelected( false );
377 }
378
379 void GEOM_AISShape::SetDisplayVectors(bool isDisplayed)
380 {
381   myDisplayVectors = isDisplayed;
382 }
383
384 void GEOM_AISShape::SetDisplayVertices(bool isDisplayed)
385 {
386   myDisplayVertices = isDisplayed;
387 }
388
389 void GEOM_AISShape::SetDisplayName(bool isDisplayed)
390 {
391   myDisplayName = isDisplayed;
392 }
393
394 void GEOM_AISShape::shadingMode(const Handle(PrsMgr_PresentationManager3d)& aPresentationManager,
395                                 const Handle(Prs3d_Presentation)& aPrs,
396                                 const Standard_Integer aMode)
397 {
398   myDrawer->ShadingAspect()->Aspect()->SetDistinguishOn();
399
400   Graphic3d_MaterialAspect aMatAspect(Graphic3d_NOM_PLASTIC);
401   aMatAspect.SetTransparency(Transparency());
402   Graphic3d_MaterialAspect currentFrontMaterial = myDrawer->ShadingAspect()->Aspect()->FrontMaterial();
403   Graphic3d_MaterialAspect currentBackMaterial  = myDrawer->ShadingAspect()->Aspect()->BackMaterial();
404   myDrawer->ShadingAspect()->Aspect()->SetFrontMaterial( isTopLevel() ? aMatAspect : currentFrontMaterial );
405   myDrawer->ShadingAspect()->Aspect()->SetBackMaterial ( isTopLevel() ? aMatAspect : currentBackMaterial  );
406
407   if( isTopLevel() && switchTopLevel() )
408     myDrawer->ShadingAspect()->SetColor( topLevelColor() );
409   else { 
410     if(myDrawer->ShadingAspect()->Aspect()->FrontMaterial().MaterialType( Graphic3d_MATERIAL_ASPECT ))
411       myDrawer->ShadingAspect()->SetColor(myShadingColor);
412     else
413       myDrawer->ShadingAspect()->SetColor(myDrawer->ShadingAspect()->Aspect()->FrontMaterial().AmbientColor());
414   }
415
416   bool anIsColorField = !myFieldStepData.isEmpty() && myFieldDataType != GEOM::FDT_String;
417   if( anIsColorField && ( myFieldDimension == 2 || myFieldDimension == 3 || myFieldDimension == -1 ) )
418   {
419     drawField( aPrs );
420   }
421   else
422   {
423     // PAL12113: AIS_Shape::Compute() works correctly with shapes containing no faces
424     //StdPrs_ShadedShape::Add(aPrs,myshape,myDrawer);
425 #ifdef USE_TEXTURED_SHAPE
426     AIS_TexturedShape::Compute(aPresentationManager, aPrs, aMode);
427 #else
428     AIS_Shape::Compute(aPresentationManager, aPrs, aMode);
429 #endif
430   }
431 }
432
433 Standard_Boolean GEOM_AISShape::isTopLevel() {
434   return myTopLevel;
435 }
436
437 void GEOM_AISShape::setTopLevel(Standard_Boolean f) {
438   if(f) {
439     if(f != myTopLevel)
440       myPrevDisplayMode = DisplayMode();
441     Standard_Integer dm;
442     switch(topLevelDisplayMode()) {
443       case TopWireFrame :        dm = Wireframe;         break;
444       case TopShading :          dm = Shading;           break;
445       case TopShadingWithEdges : dm = ShadingWithEdges;  break;
446       default :                  dm = myPrevDisplayMode; break;
447     }
448     SetDisplayMode(dm);
449   } else {
450     if(f != myTopLevel)
451       SetDisplayMode(myPrevDisplayMode);
452   }
453   myTopLevel = f;
454 }
455
456 void GEOM_AISShape::setPrevDisplayMode(const Standard_Integer mode) {
457   myPrevDisplayMode = mode;
458 }
459
460 Quantity_Color GEOM_AISShape::topLevelColor() {
461   return myTopLevelColor;
462 }
463
464 void GEOM_AISShape::setTopLevelColor(const Quantity_Color c) {
465   myTopLevelColor = c;
466 }
467
468 GEOM_AISShape::TopLevelDispMode GEOM_AISShape::topLevelDisplayMode() {
469   return myTopLevelDm;
470 }
471 void GEOM_AISShape::setTopLevelDisplayMode(const GEOM_AISShape::TopLevelDispMode dm) {
472   myTopLevelDm = dm;
473 }
474
475 Standard_Boolean GEOM_AISShape::switchTopLevel() {
476   return myTopLevelDm != TopShowAdditionalWActor;
477 }
478
479 Standard_Boolean GEOM_AISShape::toActivate() {
480   return ( myTopLevel && myTopLevelDm == TopShowAdditionalWActor ) ? false : true;
481 }
482
483 void GEOM_AISShape::setFieldStepInfo( const GEOM::field_data_type theFieldDataType,
484                                       const int theFieldDimension,
485                                       const QList<QVariant>& theFieldStepData,
486                                       const TCollection_AsciiString& theFieldStepName,
487                                       const double theFieldStepRangeMin,
488                                       const double theFieldStepRangeMax )
489 {
490   myFieldDataType = theFieldDataType;
491   myFieldDimension = theFieldDimension;
492   myFieldStepData = theFieldStepData;
493   myFieldStepName = theFieldStepName;
494   myFieldStepRangeMin = theFieldStepRangeMin;
495   myFieldStepRangeMax = theFieldStepRangeMax;
496 }
497
498 void GEOM_AISShape::getFieldStepInfo( GEOM::field_data_type& theFieldDataType,
499                                       int& theFieldDimension,
500                                       QList<QVariant>& theFieldStepData,
501                                       TCollection_AsciiString& theFieldStepName,
502                                       double& theFieldStepRangeMin,
503                                       double& theFieldStepRangeMax ) const
504 {
505   theFieldDataType = myFieldDataType;
506   theFieldDimension = myFieldDimension;
507   theFieldStepData = myFieldStepData;
508   theFieldStepName = myFieldStepName;
509   theFieldStepRangeMin = myFieldStepRangeMin;
510   theFieldStepRangeMax = myFieldStepRangeMax;
511 }
512
513 void GEOM_AISShape::drawField( const Handle(Prs3d_Presentation)& thePrs,
514                                const bool theIsString,
515                                const bool theIsHighlight )
516 {
517   if( myFieldStepData.isEmpty() )
518     return;
519
520   QListIterator<QVariant> aFieldStepDataIter( myFieldStepData );
521
522   TopAbs_ShapeEnum aShapeType = TopAbs_SHAPE;
523   switch( myFieldDimension )
524   {
525     case 0: aShapeType = TopAbs_VERTEX; break;
526     case 1: aShapeType = TopAbs_EDGE; break;
527     case 2: aShapeType = TopAbs_FACE; break;
528     case 3: aShapeType = TopAbs_SOLID; break;
529     case -1: aShapeType = TopAbs_VERTEX; break;
530   }
531
532   TopTools_IndexedMapOfShape aShapeMap;
533   TopExp::MapShapes( myshape, aShapeMap );
534
535   TColStd_IndexedMapOfInteger anIndexMap;
536
537   TopExp_Explorer anExp;
538   for( anExp.Init( myshape, aShapeType ); anExp.More(); anExp.Next() )
539   {
540     TopoDS_Shape aSubShape = anExp.Current();
541     if( !aSubShape.IsNull() )
542     {
543       Standard_Integer aSubShapeIndex = aShapeMap.FindIndex( aSubShape );
544       if( anIndexMap.Contains( aSubShapeIndex ) )
545         continue;
546
547       anIndexMap.Add( aSubShapeIndex );
548
549       Handle(Graphic3d_Group) aGroup = Prs3d_Root::NewGroup( thePrs );
550
551       QColor aQColor;
552       QString aString;
553       if( aFieldStepDataIter.hasNext() )
554       {
555         const QVariant& aVariant = aFieldStepDataIter.next();
556         if( theIsString )
557           aString = aVariant.toString();
558         else
559           aQColor = aVariant.value<QColor>();
560       }
561       else
562         break;
563
564       if( theIsString )
565       {
566         gp_Pnt aCenter;
567         if( computeMassCenter( aSubShape, aCenter ) )
568         {
569           Graphic3d_Vertex aVertex( aCenter.X(), aCenter.Y(), aCenter.Z() );
570
571           Handle(Graphic3d_AspectText3d) anAspectText3d = new Graphic3d_AspectText3d();
572           anAspectText3d->SetStyle( Aspect_TOST_ANNOTATION );
573           anAspectText3d->SetColor( myLabelColor );
574           aGroup->SetPrimitivesAspect( anAspectText3d );
575
576           aGroup->Text( aString.toLatin1().constData(), aVertex, 14 );
577         }
578       }
579       else
580       {
581         Quantity_Color aColor( aQColor.redF(), aQColor.greenF(), aQColor.blueF(), Quantity_TOC_RGB );
582         if( myFieldDimension == 0 )
583         {
584           TopoDS_Vertex aVertexShape = TopoDS::Vertex( aSubShape );
585           if( !aVertexShape.IsNull() )
586           {
587             gp_Pnt aPnt = BRep_Tool::Pnt( aVertexShape );
588
589             Handle(Graphic3d_AspectMarker3d) anAspectMarker3d = new Graphic3d_AspectMarker3d();
590             anAspectMarker3d->SetColor( aColor );
591             anAspectMarker3d->SetType( Aspect_TOM_POINT );
592             anAspectMarker3d->SetScale( 10.0 );
593             aGroup->SetPrimitivesAspect( anAspectMarker3d );
594
595             Handle(Graphic3d_ArrayOfPoints) anArray = new Graphic3d_ArrayOfPoints( 1 );
596             anArray->AddVertex( aPnt.X(), aPnt.Y(), aPnt.Z() );
597
598             aGroup->AddPrimitiveArray( anArray );
599           }
600         }
601         else if( myFieldDimension == 1 )
602         {
603           myDrawer->WireAspect()->SetColor( aColor );
604           if( theIsHighlight )
605             myDrawer->WireAspect()->SetWidth( myOwnWidth );
606           else
607             myDrawer->WireAspect()->SetWidth( myOwnWidth + 4 );
608           StdPrs_WFDeflectionShape::Add( thePrs, aSubShape, myDrawer );
609         }
610         else if( myFieldDimension == 2 ||
611                  myFieldDimension == 3 ||
612                  myFieldDimension == -1 )
613         {
614           myDrawer->ShadingAspect()->SetColor( aColor );
615           StdPrs_ShadedShape::Add( thePrs, aSubShape, myDrawer );
616         }
617       }
618     }
619   }
620 }
621
622 void GEOM_AISShape::drawName( const Handle(Prs3d_Presentation)& thePrs )
623 {
624   Handle(Graphic3d_Group) aGroup = Prs3d_Root::NewGroup( thePrs );
625
626   gp_Ax3 anAx3 = GEOMUtils::GetPosition(myshape);
627   gp_Pnt aCenter = anAx3.Location();
628
629   Graphic3d_Vertex aVertex( aCenter.X(), aCenter.Y(), aCenter.Z() );
630
631   Handle(Graphic3d_AspectText3d) anAspectText3d = new Graphic3d_AspectText3d();
632   anAspectText3d->SetStyle( Aspect_TOST_ANNOTATION );
633   anAspectText3d->SetColor( myLabelColor );
634   aGroup->SetPrimitivesAspect( anAspectText3d );
635
636   const char* aName = getIO()->getName();
637   aGroup->Text( TCollection_ExtendedString( aName ), aVertex, 16 );
638 }
639
640 Standard_Boolean GEOM_AISShape::computeMassCenter( const TopoDS_Shape& theShape,
641                                                    gp_Pnt& theCenter )
642 {
643   Standard_Real aX = 0, aY = 0, aZ = 0;
644   Standard_Integer aNbPoints = 0;
645
646   TopExp_Explorer anExp;
647   for( anExp.Init( theShape, TopAbs_VERTEX ); anExp.More(); anExp.Next() )
648   {
649     TopoDS_Vertex aVertex = TopoDS::Vertex( anExp.Current() );
650     if( !aVertex.IsNull() )
651     {
652       gp_Pnt aPnt = BRep_Tool::Pnt( aVertex );
653       aX += aPnt.X();
654       aY += aPnt.Y();
655       aZ += aPnt.Z();
656       aNbPoints++;
657     }
658   }
659
660   if( aNbPoints == 0 )
661     return Standard_False;
662
663   theCenter.SetCoord( aX / (Standard_Real)aNbPoints,
664                       aY / (Standard_Real)aNbPoints,
665                       aZ / (Standard_Real)aNbPoints );
666   return Standard_True;
667 }