]> SALOME platform Git repositories - modules/geom.git/blob - src/OBJECT/GEOM_AISShape.cxx
Salome HOME
b1f7ade349d6fa61e13871b6d6a5bc46318dbfa2
[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       shadingMode(aPresentationManager, aPrs, Shading);
258       if( anIsColorField && myFieldDimension == 1 )
259         drawField( aPrs );
260       else
261         myDrawer->SetFaceBoundaryDraw( Standard_True );
262       break;
263     }
264     case TexturedShape:
265     {
266       if(!isTopLev)
267 #ifdef USE_TEXTURED_SHAPE
268         AIS_TexturedShape::Compute(aPresentationManager, aPrs, aMode);
269 #else
270         AIS_Shape::Compute(aPresentationManager, aPrs, aMode);
271 #endif
272       else 
273         shadingMode(aPresentationManager, aPrs, Shading);
274       break;
275     }
276   }
277   if (isShowVectors())
278   {
279     const bool isVector = IsKind(STANDARD_TYPE(GEOM_AISVector));
280     TopExp_Explorer Exp ( myshape, TopAbs_EDGE );
281     for ( ; Exp.More(); Exp.Next() ) {
282       TopoDS_Vertex aV1, aV2;
283       TopoDS_Edge anEdgeE = TopoDS::Edge(Exp.Current());
284       if ( !isVector )
285         // draw curve direction (issue 0021087)
286         anEdgeE.Orientation( TopAbs_FORWARD );
287
288       if ( anEdgeE.IsNull() ) continue;
289
290       TopExp::Vertices(anEdgeE, aV1, aV2);
291       gp_Pnt aP1 = BRep_Tool::Pnt(aV1);
292       gp_Pnt aP2 = BRep_Tool::Pnt(aV2);
293
294       double fp,lp;
295       gp_Vec aDirVec;
296       Handle(Geom_Curve) C = BRep_Tool::Curve(anEdgeE,fp,lp);
297
298       if ( C.IsNull() ) continue;
299
300       if ( anEdgeE.Orientation() == TopAbs_FORWARD )
301         C->D1(lp, aP2, aDirVec);
302       else {
303         C->D1(fp, aP1, aDirVec);
304         aP2 = aP1;
305       }
306
307       GeomAdaptor_Curve aAdC;
308       aAdC.Load(C, fp, lp);
309       Standard_Real aDist = GCPnts_AbscissaPoint::Length(aAdC, fp, lp); 
310      
311       if (aDist > gp::Resolution()) {
312         gp_Dir aDir;
313         if ( anEdgeE.Orientation() == TopAbs_FORWARD )
314           aDir = aDirVec;
315         else
316           aDir = -aDirVec;
317
318         Prs3d_Arrow::Draw(aPrs, aP2, aDir, M_PI/180.*5., aDist/10.);
319       }
320     }
321   }
322
323   // draw color field on vertices
324   if( anIsColorField && myFieldDimension == 0 && aMode != CustomHighlight )
325     drawField( aPrs );
326
327   // draw text field
328   if( anIsTextField )
329     drawField( aPrs, true );
330
331   if( isShowName() )
332     drawName( aPrs );
333
334   //  aPrs->ReCompute(); // for hidden line recomputation if necessary...
335 }
336
337 void GEOM_AISShape::SetShadingColor(const Quantity_Color &aCol)
338 {
339   myShadingColor = aCol;
340 }
341
342 void GEOM_AISShape::SetEdgesInShadingColor(const Quantity_Color &aCol)
343 {
344   myEdgesInShadingColor = aCol;
345 }
346
347 void GEOM_AISShape::SetLabelColor(const Quantity_Color &aCol) {
348   myLabelColor = aCol;
349 }
350
351 void GEOM_AISShape::highlightSubShapes(const TColStd_IndexedMapOfInteger& aIndexMap, 
352                                        const Standard_Boolean aHighlight )
353 {
354   Handle(AIS_InteractiveObject) anObj = this;
355   Handle(AIS_InteractiveContext) anIC = GetContext();
356   if ( anIC.IsNull() || !anIC->HasOpenedContext() ) 
357     return;
358
359   Standard_Boolean isAutoHilight = anIC->AutomaticHilight();
360   anIC->SetAutomaticHilight( false );
361
362   anIC->ClearSelected( false );
363
364   if ( aHighlight ) {
365     SelectMgr_IndexedMapOfOwner anAllMap, aToHiliteMap;
366
367     // Get entity owners for all activated selection modes
368     getEntityOwners( anObj, anIC, anAllMap );
369
370     // Convert <aIndexMap> into the map of owners to highlight/unhighlight
371     indicesToOwners( aIndexMap, Shape(), anAllMap, aToHiliteMap );
372
373
374     for ( Standard_Integer i = 1, n = aToHiliteMap.Extent(); i <= n; i++ )
375       anIC->AddOrRemoveSelected( aToHiliteMap( i ), false );
376   }
377
378   anIC->SetAutomaticHilight( isAutoHilight );
379   anIC->HilightSelected( false );
380 }
381
382 void GEOM_AISShape::SetDisplayVectors(bool isDisplayed)
383 {
384   myDisplayVectors = isDisplayed;
385 }
386
387 void GEOM_AISShape::SetDisplayVertices(bool isDisplayed)
388 {
389   myDisplayVertices = isDisplayed;
390 }
391
392 void GEOM_AISShape::SetDisplayName(bool isDisplayed)
393 {
394   myDisplayName = isDisplayed;
395 }
396
397 void GEOM_AISShape::shadingMode(const Handle(PrsMgr_PresentationManager3d)& aPresentationManager,
398                                 const Handle(Prs3d_Presentation)& aPrs,
399                                 const Standard_Integer aMode)
400 {
401   myDrawer->ShadingAspect()->Aspect()->SetDistinguishOn();
402
403   Graphic3d_MaterialAspect aMatAspect(Graphic3d_NOM_PLASTIC);
404   aMatAspect.SetTransparency(Transparency());
405   Graphic3d_MaterialAspect currentFrontMaterial = myDrawer->ShadingAspect()->Aspect()->FrontMaterial();
406   Graphic3d_MaterialAspect currentBackMaterial  = myDrawer->ShadingAspect()->Aspect()->BackMaterial();
407   myDrawer->ShadingAspect()->Aspect()->SetFrontMaterial( isTopLevel() ? aMatAspect : currentFrontMaterial );
408   myDrawer->ShadingAspect()->Aspect()->SetBackMaterial ( isTopLevel() ? aMatAspect : currentBackMaterial  );
409
410   if( isTopLevel() && switchTopLevel() )
411     myDrawer->ShadingAspect()->SetColor( topLevelColor() );
412   else { 
413     if(myDrawer->ShadingAspect()->Aspect()->FrontMaterial().MaterialType( Graphic3d_MATERIAL_ASPECT ))
414       myDrawer->ShadingAspect()->SetColor(myShadingColor);
415     else
416       myDrawer->ShadingAspect()->SetColor(myDrawer->ShadingAspect()->Aspect()->FrontMaterial().AmbientColor());
417   }
418
419   bool anIsColorField = !myFieldStepData.isEmpty() && myFieldDataType != GEOM::FDT_String;
420   if( anIsColorField && ( myFieldDimension == 2 || myFieldDimension == 3 || myFieldDimension == -1 ) )
421   {
422     drawField( aPrs );
423   }
424   else
425   {
426     // PAL12113: AIS_Shape::Compute() works correctly with shapes containing no faces
427     //StdPrs_ShadedShape::Add(aPrs,myshape,myDrawer);
428 #ifdef USE_TEXTURED_SHAPE
429     AIS_TexturedShape::Compute(aPresentationManager, aPrs, aMode);
430 #else
431     AIS_Shape::Compute(aPresentationManager, aPrs, aMode);
432 #endif
433   }
434 }
435
436 Standard_Boolean GEOM_AISShape::isTopLevel() {
437   return myTopLevel;
438 }
439
440 void GEOM_AISShape::setTopLevel(Standard_Boolean f) {
441   if(f) {
442     if(f != myTopLevel)
443       myPrevDisplayMode = DisplayMode();
444     Standard_Integer dm;
445     switch(topLevelDisplayMode()) {
446       case TopKeepCurrent :      dm = myPrevDisplayMode; break;
447       case TopWireFrame :        dm = Wireframe;         break;     
448       case TopShadingWithEdges : dm = ShadingWithEdges;  break;
449       default :                  dm = Shading;           break;
450     }
451     SetDisplayMode(dm);
452   } else {
453     if(f != myTopLevel)
454       SetDisplayMode(myPrevDisplayMode);
455   }
456   myTopLevel = f;
457 }
458
459 void GEOM_AISShape::setPrevDisplayMode(const Standard_Integer mode) {
460   myPrevDisplayMode = mode;
461 }
462
463 Quantity_Color GEOM_AISShape::topLevelColor() {
464   return myTopLevelColor;
465 }
466
467 void GEOM_AISShape::setTopLevelColor(const Quantity_Color c) {
468   myTopLevelColor = c;
469 }
470
471 GEOM_AISShape::TopLevelDispMode GEOM_AISShape::topLevelDisplayMode() {
472   return myTopLevelDm;
473 }
474 void GEOM_AISShape::setTopLevelDisplayMode(const GEOM_AISShape::TopLevelDispMode dm) {
475   myTopLevelDm = dm;
476 }
477
478 Standard_Boolean GEOM_AISShape::switchTopLevel() {
479   return myTopLevelDm != TopShowAdditionalWActor;
480 }
481
482 Standard_Boolean GEOM_AISShape::toActivate() {
483   return ( myTopLevel && myTopLevelDm == TopShowAdditionalWActor ) ? false : true;
484 }
485
486 void GEOM_AISShape::setFieldStepInfo( const GEOM::field_data_type theFieldDataType,
487                                       const int theFieldDimension,
488                                       const QList<QVariant>& theFieldStepData,
489                                       const TCollection_AsciiString& theFieldStepName,
490                                       const double theFieldStepRangeMin,
491                                       const double theFieldStepRangeMax )
492 {
493   myFieldDataType = theFieldDataType;
494   myFieldDimension = theFieldDimension;
495   myFieldStepData = theFieldStepData;
496   myFieldStepName = theFieldStepName;
497   myFieldStepRangeMin = theFieldStepRangeMin;
498   myFieldStepRangeMax = theFieldStepRangeMax;
499 }
500
501 void GEOM_AISShape::getFieldStepInfo( GEOM::field_data_type& theFieldDataType,
502                                       int& theFieldDimension,
503                                       QList<QVariant>& theFieldStepData,
504                                       TCollection_AsciiString& theFieldStepName,
505                                       double& theFieldStepRangeMin,
506                                       double& theFieldStepRangeMax ) const
507 {
508   theFieldDataType = myFieldDataType;
509   theFieldDimension = myFieldDimension;
510   theFieldStepData = myFieldStepData;
511   theFieldStepName = myFieldStepName;
512   theFieldStepRangeMin = myFieldStepRangeMin;
513   theFieldStepRangeMax = myFieldStepRangeMax;
514 }
515
516 void GEOM_AISShape::drawField( const Handle(Prs3d_Presentation)& thePrs,
517                                const bool theIsString,
518                                const bool theIsHighlight )
519 {
520   if( myFieldStepData.isEmpty() )
521     return;
522
523   QListIterator<QVariant> aFieldStepDataIter( myFieldStepData );
524
525   TopAbs_ShapeEnum aShapeType = TopAbs_SHAPE;
526   switch( myFieldDimension )
527   {
528     case 0: aShapeType = TopAbs_VERTEX; break;
529     case 1: aShapeType = TopAbs_EDGE; break;
530     case 2: aShapeType = TopAbs_FACE; break;
531     case 3: aShapeType = TopAbs_SOLID; break;
532     case -1: aShapeType = TopAbs_VERTEX; break;
533   }
534
535   TopTools_IndexedMapOfShape aShapeMap;
536   TopExp::MapShapes( myshape, aShapeMap );
537
538   TColStd_IndexedMapOfInteger anIndexMap;
539
540   TopExp_Explorer anExp;
541   for( anExp.Init( myshape, aShapeType ); anExp.More(); anExp.Next() )
542   {
543     TopoDS_Shape aSubShape = anExp.Current();
544     if( !aSubShape.IsNull() )
545     {
546       Standard_Integer aSubShapeIndex = aShapeMap.FindIndex( aSubShape );
547       if( anIndexMap.Contains( aSubShapeIndex ) )
548         continue;
549
550       anIndexMap.Add( aSubShapeIndex );
551
552       Handle(Graphic3d_Group) aGroup = Prs3d_Root::NewGroup( thePrs );
553
554       QColor aQColor;
555       QString aString;
556       if( aFieldStepDataIter.hasNext() )
557       {
558         const QVariant& aVariant = aFieldStepDataIter.next();
559         if( theIsString )
560           aString = aVariant.toString();
561         else
562           aQColor = aVariant.value<QColor>();
563       }
564       else
565         break;
566
567       if( theIsString )
568       {
569         gp_Pnt aCenter;
570         if( computeMassCenter( aSubShape, aCenter ) )
571         {
572           Graphic3d_Vertex aVertex( aCenter.X(), aCenter.Y(), aCenter.Z() );
573
574           Handle(Graphic3d_AspectText3d) anAspectText3d = new Graphic3d_AspectText3d();
575           anAspectText3d->SetStyle( Aspect_TOST_ANNOTATION );
576           anAspectText3d->SetColor( myLabelColor );
577           aGroup->SetPrimitivesAspect( anAspectText3d );
578
579           aGroup->Text( aString.toLatin1().constData(), aVertex, 14 );
580         }
581       }
582       else
583       {
584         Quantity_Color aColor( aQColor.redF(), aQColor.greenF(), aQColor.blueF(), Quantity_TOC_RGB );
585         if( myFieldDimension == 0 )
586         {
587           TopoDS_Vertex aVertexShape = TopoDS::Vertex( aSubShape );
588           if( !aVertexShape.IsNull() )
589           {
590             gp_Pnt aPnt = BRep_Tool::Pnt( aVertexShape );
591
592             Handle(Graphic3d_AspectMarker3d) anAspectMarker3d = new Graphic3d_AspectMarker3d();
593             anAspectMarker3d->SetColor( aColor );
594             anAspectMarker3d->SetType( Aspect_TOM_POINT );
595             anAspectMarker3d->SetScale( 10.0 );
596             aGroup->SetPrimitivesAspect( anAspectMarker3d );
597
598             Handle(Graphic3d_ArrayOfPoints) anArray = new Graphic3d_ArrayOfPoints( 1 );
599             anArray->AddVertex( aPnt.X(), aPnt.Y(), aPnt.Z() );
600
601             aGroup->AddPrimitiveArray( anArray );
602           }
603         }
604         else if( myFieldDimension == 1 )
605         {
606           myDrawer->WireAspect()->SetColor( aColor );
607           if( theIsHighlight )
608             myDrawer->WireAspect()->SetWidth( myOwnWidth );
609           else
610             myDrawer->WireAspect()->SetWidth( myOwnWidth + 4 );
611           StdPrs_WFDeflectionShape::Add( thePrs, aSubShape, myDrawer );
612         }
613         else if( myFieldDimension == 2 ||
614                  myFieldDimension == 3 ||
615                  myFieldDimension == -1 )
616         {
617           myDrawer->ShadingAspect()->SetColor( aColor );
618           StdPrs_ShadedShape::Add( thePrs, aSubShape, myDrawer );
619         }
620       }
621     }
622   }
623 }
624
625 void GEOM_AISShape::drawName( const Handle(Prs3d_Presentation)& thePrs )
626 {
627   Handle(Graphic3d_Group) aGroup = Prs3d_Root::NewGroup( thePrs );
628
629   gp_Ax3 anAx3 = GEOMUtils::GetPosition(myshape);
630   gp_Pnt aCenter = anAx3.Location();
631
632   Graphic3d_Vertex aVertex( aCenter.X(), aCenter.Y(), aCenter.Z() );
633
634   Handle(Graphic3d_AspectText3d) anAspectText3d = new Graphic3d_AspectText3d();
635   anAspectText3d->SetStyle( Aspect_TOST_ANNOTATION );
636   anAspectText3d->SetColor( myLabelColor );
637   aGroup->SetPrimitivesAspect( anAspectText3d );
638
639   const char* aName = getIO()->getName();
640   aGroup->Text( TCollection_ExtendedString( aName ), aVertex, 16 );
641 }
642
643 Standard_Boolean GEOM_AISShape::computeMassCenter( const TopoDS_Shape& theShape,
644                                                    gp_Pnt& theCenter )
645 {
646   Standard_Real aX = 0, aY = 0, aZ = 0;
647   Standard_Integer aNbPoints = 0;
648
649   TopExp_Explorer anExp;
650   for( anExp.Init( theShape, TopAbs_VERTEX ); anExp.More(); anExp.Next() )
651   {
652     TopoDS_Vertex aVertex = TopoDS::Vertex( anExp.Current() );
653     if( !aVertex.IsNull() )
654     {
655       gp_Pnt aPnt = BRep_Tool::Pnt( aVertex );
656       aX += aPnt.X();
657       aY += aPnt.Y();
658       aZ += aPnt.Z();
659       aNbPoints++;
660     }
661   }
662
663   if( aNbPoints == 0 )
664     return Standard_False;
665
666   theCenter.SetCoord( aX / (Standard_Real)aNbPoints,
667                       aY / (Standard_Real)aNbPoints,
668                       aZ / (Standard_Real)aNbPoints );
669   return Standard_True;
670 }