occt/src/AIS/AIS_LocalContext.cxx

// File:	AIS_LocalContext.cxx
// Created:	Fri Jan 17 13:36:48 1997
// Author:	Robert COUBLANC
//		<rob@robox.paris1.matra-dtv.fr>
//Modified by ROB : Traque des UpdateConversion intempestifs.

#define BUC60688       //GG 25/05/00 Add SetSensitivity() methods.

#define BUC60722        //GG_040900 Disable detection on an unviewable object

#define IMP160701 	//SZV Add InitDetected(),MoreDetected(),NextDetected(),
//                       DetectedCurrentShape(),DetectedCurrentObject()
//                       methods

#define ALE70590	//GG  Avoid raise especially under W2000-SP2
//		when opening many local context due to a
//		system error in the selection name computation routine.
//		Many thanks to Philippe CARRET for the helpfull he has 
//		give to accelerate the resolution of this problem.

#include <AIS_LocalContext.ixx>
#include <SelectMgr_OrFilter.hxx>
#include <SelectMgr_CompositionFilter.hxx>
#include <AIS_LocalStatus.hxx>
#include <AIS_Shape.hxx>
#include <TColStd_ListIteratorOfListOfInteger.hxx>
#include <AIS_ListIteratorOfListOfInteractive.hxx>
#include <AIS_ListOfInteractive.hxx>
#include <AIS_DataMapIteratorOfDataMapOfSelStat.hxx>
#include <TopAbs_ShapeEnum.hxx>
#include <Graphic3d_Structure.hxx>
#include <Prs3d_LineAspect.hxx>
#include <Prs3d_PlaneAspect.hxx>
#include <Prs3d_PointAspect.hxx>
#include <Prs3d_Presentation.hxx>
#include <Aspect_TypeOfMarker.hxx>
#include <StdSelect_ShapeTypeFilter.hxx>
#include <AIS_Selection.hxx>
#include <V3d_Viewer.hxx>
#include <V3d_View.hxx>
#include <Visual3d_TransientManager.hxx>
#include <Visual3d_View.hxx>

#ifdef ALE70590
#include <stdio.h>
#else
#include <Standard_SStream.hxx>
#endif

static TCollection_AsciiString AIS_Local_SelName(const Standard_Address address,
                                                 const Standard_Integer anIndex)
{
//  TCollection_AsciiString SelName;
#ifdef ALE70590
  char string[100];
  sprintf(string,"%p_%d", address, anIndex);	// works under any system 
  TCollection_AsciiString SelName(string);
#else
  Standard_SStream stream;
  stream<<address;	// something is wrong here using the SStream because
//		the following access to rdbuf crash for an unknown reason 
//		especially under W2000 with SP2 and sometime under WNT and W98.
//		NOTE that stream is not ended by a NULL char and it's probably
//		one of the reasons why this crash.
//		In any case the resulting ascii string give a wrong and random
//		name under WINDOWS !
  TCollection_AsciiString SelName(stream.rdbuf()->str());
//  SelName = TCollection_AsciiString("AIS_Local_");
  TCollection_AsciiString theind(anIndex);
  SelName += "_";
  SelName += theind;
#endif
  return SelName;
}


//=======================================================================
//function : AIS_LocalContext
//purpose  : 
//=======================================================================


AIS_LocalContext::AIS_LocalContext(){}

AIS_LocalContext::AIS_LocalContext(const Handle(AIS_InteractiveContext)& aCtx,
				   const Standard_Integer Index,
				   const Standard_Boolean LoadDisplayed,
				   const Standard_Boolean AcceptStandardModes,
				   const Standard_Boolean AcceptEraseOfTemp,
				   const Standard_Boolean BothViewers):
myCTX(aCtx),
myLoadDisplayed(LoadDisplayed),
myAcceptStdMode(AcceptStandardModes),
myAcceptErase(AcceptEraseOfTemp),
mySM(aCtx->SelectionManager()),
myMainVS(new StdSelect_ViewerSelector3d(aCtx->MainSelector()->Projector())),
myFilters(new SelectMgr_OrFilter()),
myAutoHilight(Standard_True),
mylastindex(0),
mylastgood(0),
myCurDetected(0)
#ifdef IMP160701
,myAISCurDetected(0)
#endif
{
  myMainPM = aCtx->MainPrsMgr();
  mySelName = AIS_Local_SelName(this, Index);
  AIS_Selection::CreateSelection(mySelName.ToCString());

  mySM->Add(myMainVS);
  if(myLoadDisplayed) LoadContextObjects();
  Process(Standard_False);

}


//=======================================================================
//function : SetContext
//purpose  : 
//=======================================================================

void AIS_LocalContext::SetContext(const Handle(AIS_InteractiveContext)& aCtx)
{  myCTX = aCtx;}

//=======================================================================
//function : Display
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::Display(const Handle(AIS_InteractiveObject)& anInteractive,
					   const Standard_Integer WhichMode,
					   const Standard_Boolean AllowShapeDecomposition,
					   const Standard_Integer ActivationMode)
{
  if(myActiveObjects.IsBound(anInteractive)){
    const Handle(AIS_LocalStatus)& STAT = myActiveObjects(anInteractive);
    
    if(STAT->DisplayMode() == -1){
      if(!myMainPM->IsDisplayed(anInteractive,WhichMode))
	myMainPM->Display(anInteractive,WhichMode);
      if(STAT->IsTemporary())
	STAT->SetDisplayMode(WhichMode);
    }
    else if(STAT->DisplayMode()!=WhichMode && STAT->IsTemporary()){
      myMainPM->Erase(anInteractive,STAT->DisplayMode());
      STAT->SetDisplayMode(WhichMode);
      if(!myMainPM->IsDisplayed(anInteractive,WhichMode))
	myMainPM->Display(anInteractive,WhichMode);
    }
    
    if(ActivationMode!=-1){
      if(!STAT->IsActivated(ActivationMode)){
	STAT->ClearSelectionModes();
	mySM->Load(anInteractive,myMainVS);
	STAT->AddSelectionMode(ActivationMode);
	mySM->Activate(anInteractive,ActivationMode,myMainVS);
      }
    }
  }
  else {
    Handle(AIS_LocalStatus) Att = new AIS_LocalStatus();
    
    if(anInteractive->AcceptShapeDecomposition() && AllowShapeDecomposition)
      Att->SetDecomposition(Standard_True);
    else 
      Att->SetDecomposition(Standard_False);
    // status temporary or not
    if(myCTX->DisplayStatus(anInteractive) == AIS_DS_None ||
       myCTX->DisplayStatus(anInteractive) == AIS_DS_Temporary)
      Att->SetTemporary(Standard_True);
    else
      Att->SetTemporary(Standard_False); 


    
    if(!myCTX->IsDisplayed(anInteractive,WhichMode)){
      
      //storing information....
      Att->SetDisplayMode(WhichMode);
      if (ActivationMode!=-1)
	Att->AddSelectionMode(ActivationMode);
      Standard_Integer HiMod = anInteractive->HasHilightMode()? anInteractive->HilightMode(): WhichMode;
      Att->SetHilightMode(HiMod);

      if(!myMainPM->IsDisplayed(anInteractive,WhichMode))
	myMainPM->Display(anInteractive,WhichMode);
      
      if(ActivationMode!=-1){
	mySM->Load(anInteractive,myMainVS);
	mySM->Activate(anInteractive,ActivationMode,myMainVS);
      }
    }
    else{
      Standard_Integer HiMod = anInteractive->HasHilightMode()? anInteractive->HilightMode(): WhichMode;
      Att->SetHilightMode(HiMod);
    }
    myActiveObjects.Bind(anInteractive,Att);
  }  
  Process(anInteractive);

  
  

  return Standard_True;
}

//=======================================================================
//function : Load
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::
Load(const Handle(AIS_InteractiveObject)& anInteractive,
     const Standard_Boolean AllowShapeDecomposition,
     const Standard_Integer ActivationMode)
{
  if(myActiveObjects.IsBound(anInteractive)) return Standard_False;
  Handle(AIS_LocalStatus) Att = new AIS_LocalStatus();
  
  if(anInteractive->AcceptShapeDecomposition() && AllowShapeDecomposition)
    Att->SetDecomposition(Standard_True);
  else 
    Att->SetDecomposition(Standard_False);
  
  if(!myCTX->IsDisplayed(anInteractive))
    Att->SetTemporary(Standard_True);
  else
    Att->SetTemporary(Standard_False);
  Att->SetDisplayMode(-1);
  
  //storing information....
  if(ActivationMode!=-1)
    Att->AddSelectionMode(ActivationMode);
  Standard_Integer HiMod = anInteractive->HasHilightMode()? anInteractive->HilightMode():0;
  Att->SetHilightMode(HiMod);
  //Action
  
  mySM->Load(anInteractive,myMainVS);
  if(ActivationMode != -1){
    mySM->Activate(anInteractive,ActivationMode,myMainVS);
  }
  myActiveObjects.Bind(anInteractive,Att);
  Process(anInteractive);
  return Standard_True;
}

//=======================================================================
//function : ClearPrs
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::
ClearPrs(const Handle(AIS_InteractiveObject)& anInteractive,
	 const Standard_Integer aMode)
{
  if(!myActiveObjects.IsBound(anInteractive))
    return Standard_False;

  Standard_Boolean jobdone(Standard_False);
  const Handle(AIS_LocalStatus)& STAT = myActiveObjects(anInteractive);
  
  //Display step
  if(STAT->IsSubIntensityOn()) {
    STAT->SubIntensityOff();
    if(STAT->HilightMode()==aMode)
      myMainPM->Unhighlight(anInteractive,STAT->HilightMode());
  }
  myMainPM->Clear(anInteractive,aMode); // correction connexions 23/09/97
  jobdone = Standard_True;
  if(STAT->DisplayMode()==aMode)
    STAT->SetDisplayMode(-1);
  return jobdone;
}
//=======================================================================
//function : Erase
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::
Erase(const Handle(AIS_InteractiveObject)& anInteractive)
{
  if(!myActiveObjects.IsBound(anInteractive))
    return Standard_False;
  const Handle(AIS_LocalStatus)& STAT = myActiveObjects(anInteractive);
  
  //Display step
  if(STAT->IsSubIntensityOn()) {
    STAT->SubIntensityOff();
    myMainPM->Unhighlight(anInteractive,STAT->HilightMode());
  }

  Standard_Boolean status(Standard_False);

  if(STAT->DisplayMode()!=-1) {
    if(IsSelected(anInteractive))
      AddOrRemoveSelected(anInteractive);
    if(myMainPM->IsHighlighted(anInteractive,STAT->HilightMode()))
      myMainPM->Unhighlight(anInteractive,STAT->HilightMode());
    myMainPM->Erase(anInteractive,STAT->DisplayMode());
    STAT->SetDisplayMode(-1);
    status = Standard_True;
  }
  if(STAT->IsTemporary()){
    if(myMainPM->IsDisplayed(anInteractive,STAT->HilightMode()))
      myMainPM->Erase(anInteractive,STAT->HilightMode());
  }
  //selection step
  
  TColStd_ListIteratorOfListOfInteger It(STAT->SelectionModes());
  for(;It.More();It.Next())
    mySM->Deactivate(anInteractive,It.Value(),myMainVS);
  //  STAT->ClearSelectionModes();
  return status;
}


//=======================================================================
//function : SetShapeDecomposition
//purpose  : 
//=======================================================================

void AIS_LocalContext::SetShapeDecomposition(const Handle(AIS_InteractiveObject)& aStoredObject, 
						const Standard_Boolean aStatus)
{
  if(!myActiveObjects.IsBound(aStoredObject)) return;
  
  if(aStatus == myActiveObjects(aStoredObject)->Decomposed()) 
    return;
  
  myActiveObjects(aStoredObject)->SetDecomposition(aStatus);

  Process(aStoredObject);
}

//=======================================================================
//function : Clear
//purpose  : 
//=======================================================================

void AIS_LocalContext::Clear(const AIS_ClearMode aType)
{
  switch (aType){
  case AIS_CM_All:
    {
      ClearObjects();
      myFilters->Clear();
      while(!myListOfStandardMode.IsEmpty())
	DeactivateStandardMode(AIS_Shape::SelectionType(myListOfStandardMode.Last()));
      break;
    }
  case AIS_CM_Interactive:
    ClearObjects();
    break;
  case AIS_CM_Filters:
    myFilters->Clear();
    break;
  case AIS_CM_StandardModes:
    {
      while(!myListOfStandardMode.IsEmpty())
	DeactivateStandardMode(AIS_Shape::SelectionType(myListOfStandardMode.Last()));
      break;
    }
  case AIS_CM_TemporaryShapePrs:
    ClearDetected();
  }
  UpdateSort();
}
//=======================================================================
//function : ActivateMode
//purpose  : 
//=======================================================================

void AIS_LocalContext::ActivateMode(const Handle(AIS_InteractiveObject)& aSelectable,
				       const Standard_Integer aMode)
{
  if(!myActiveObjects.IsBound(aSelectable)) return;
//  if(myActiveObjects(aSelectable)->SelectionMode()!=aMode)
//    mySM->Deactivate(aSelectable,aMode,myMainVS);
  if(aMode != -1){
    myActiveObjects(aSelectable)->AddSelectionMode(aMode);
    mySM->Activate(aSelectable,aMode,myMainVS);
  }
  UpdateSort();
}
//=======================================================================
//function : ActivateMode
//purpose  : 
//=======================================================================

void AIS_LocalContext::DeactivateMode(const Handle(AIS_InteractiveObject)& aSelectable,
					 const Standard_Integer aMode)
{
  if(!myActiveObjects.IsBound(aSelectable)) return;
  
  if(aMode==-1) return;
  
  myActiveObjects(aSelectable)->RemoveSelectionMode(aMode);
  mySM->Deactivate(aSelectable,aMode,myMainVS);
  UpdateSort();
  
}
//=======================================================================
//function : ActivateMode
//purpose  : 
//=======================================================================

void AIS_LocalContext::Deactivate(const Handle(AIS_InteractiveObject)& aSelectable)
{
  if(!myActiveObjects.IsBound(aSelectable)) return;
  
  mySM->Deactivate(aSelectable,myMainVS);
  myActiveObjects(aSelectable)->ClearSelectionModes();
  UpdateSort();
}

//=======================================================================
//function : Remove
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::Remove(const Handle(AIS_InteractiveObject)& aSelectable)
{
  if(!myActiveObjects.IsBound(aSelectable)) return Standard_False;

  if(IsSelected(aSelectable))
    AddOrRemoveSelected(aSelectable,Standard_False);
    
  const Handle(AIS_LocalStatus)& Att = myActiveObjects(aSelectable);
  
  TColStd_ListIteratorOfListOfInteger It;
  Standard_Boolean jobdone(Standard_False);
  // it is checked which were the temporary attributes 
  // and they are set to 0

  // desactivate standard modes
  if(Att->Decomposed()){
    for(It.Initialize(myListOfStandardMode);It.More();It.Next()){
      mySM->Deactivate(aSelectable,It.Value(),myMainVS);
    }
  }
  
  // if object or temporary presentations...
  if(Att->IsTemporary())
    {
      if(Att->IsSubIntensityOn())
	myMainPM->Unhighlight(aSelectable,Att->HilightMode());
      
      // remove if bug on clear correct...
      myMainPM->Erase(aSelectable,Att->DisplayMode());
      myMainPM->Clear(aSelectable,Att->DisplayMode());
      if(myMainPM->IsDisplayed(aSelectable,Att->HilightMode()))
	myMainPM->Erase(aSelectable,Att->HilightMode());
      //	myMainPM->Clear(aSelectable,Att->HilightMode());
      jobdone = Standard_True;
    }
  // if below intensity
  else
    {
      if(Att->IsSubIntensityOn())
	myCTX->SubIntensityOff(aSelectable);
    }
  // desactivate stored proper modes
  for(It.Initialize(Att->SelectionModes());It.More();It.Next()){
    mySM->Deactivate(aSelectable,It.Value(),myMainVS);
  }
// pop : si je laisses cela plantes dans les elements de construction  
//       alors a toi de jouer ROB
//  RemoveSelected(aSelectable);

  if(IsSelected(aSelectable))
    AddOrRemoveSelected(aSelectable);
  myActiveObjects.UnBind(aSelectable);

  //Last detected object keeps for lastindex initialization.
  Handle(SelectMgr_EntityOwner) aLastPicked = myMainVS->OnePicked();

  UpdateSort();

  //Object removes from SelectMgr
  if( mySM->Contains(aSelectable) )
    mySM->Remove(aSelectable);

  //Object removes from Detected sequence
  AIS_SequenceOfInteractive detectAIS;

  Standard_Integer i = 1;
  for(i = 1 ; i < myAISDetectedSeq.Length(); i++)
  {
    Handle(AIS_InteractiveObject) anObj = DetectedCurrentObject();
    if( !anObj.IsNull() && anObj != aSelectable )
      myAISDetectedSeq.Remove( i );
  }

  Standard_Integer aHM = aSelectable->HasHilightMode() ? aSelectable->HilightMode() : 0;

  //EntityOwners remove from AIS_Selection
  Handle(AIS_Selection) aSel = AIS_Selection::Selection(mySelName.ToCString());
  AIS_NListTransient::Iterator anIter(aSel->Objects()); 
  AIS_NListTransient removeEntites;
  for(; anIter.More(); anIter.Next()){
    const Handle(Standard_Transient)& Tr = anIter.Value();
    if (!Tr.IsNull()){
      const Handle(SelectMgr_EntityOwner)& anOwnr = *((const Handle(SelectMgr_EntityOwner)*) &Tr);
      if(anOwnr->Selectable() == aSelectable){
        removeEntites.Append(Tr);
        if(IsSelected(anOwnr))
          anOwnr->Unhilight(myMainPM, aHM);//Unhilight selected
      }
    }
  }
  AIS_NListTransient::Iterator anIterRemove(removeEntites); 
  for(; anIterRemove.More(); anIterRemove.Next())
    aSel->Select(anIterRemove.Value());//EntityOwner removes from the selection data

  //EntityOwners remove from myMapOfOwner
  SelectMgr_IndexedMapOfOwner ownersToKeep; 
  const Handle(V3d_Viewer)& aViewer = myCTX->CurrentViewer();
  for(i = 1; i <= myMapOfOwner.Extent(); i++){
    const Handle(SelectMgr_EntityOwner)& anOwner = myMapOfOwner(i) ;
    if(!anOwner.IsNull())
      if(anOwner->Selectable() != aSelectable)
        ownersToKeep.Add(anOwner);
      else
      {
        if(anOwner->IsHilighted(myMainPM, aHM))
        {
          for(aViewer->InitActiveViews(); aViewer->MoreActiveViews(); aViewer->NextActiveViews())
            Unhilight(anOwner, aViewer->ActiveView());
        }
      }
  }
  myMapOfOwner.Clear();
  myMapOfOwner.Assign(ownersToKeep);
  mylastindex = myMapOfOwner.FindIndex(aLastPicked);

  return Standard_True;
}

//=======================================================================
//function : ActivateStandardMode
//purpose  : 
//=======================================================================

void AIS_LocalContext::ActivateStandardMode(const TopAbs_ShapeEnum aType)
{
  
  //check if it is not in the list
  TColStd_ListIteratorOfListOfInteger It(myListOfStandardMode);
  for(;It.More();It.Next())
    if(It.Value()==aType)  return;
  Standard_Integer IMode = AIS_Shape::SelectionMode(aType);
  

  // create a hidden filter answering ok to the type except for :
  // if the type is shape...
  // if the filters already impact at the type <aType>
  if(aType != TopAbs_SHAPE){
    if(myStdFilters[IMode].IsNull())
      myStdFilters[IMode] = new StdSelect_ShapeTypeFilter(aType);
    if(!HasFilters(aType))
      myFilters->Add(myStdFilters[IMode]);
  }
  
  // the mode is activated for all objects of type Shape 
  // accepting the decomposition in standard mode.
  myListOfStandardMode.Append(IMode);
  
  AIS_DataMapIteratorOfDataMapOfSelStat ItM(myActiveObjects);

  for(;ItM.More();ItM.Next()){
#ifdef BUC60722
    AIS_DisplayStatus DS = 
	myCTX->DisplayStatus(Handle(AIS_InteractiveObject)::DownCast(ItM.Key()));
    if( ItM.Value()->Decomposed() && (DS != AIS_DS_FullErased)  )
#else
    if(ItM.Value()->Decomposed())
#endif
      myCTX->SelectionManager()->Activate(ItM.Key(),
					  IMode,
					  myMainVS);
  }
  
}

//=======================================================================
//function : DeActivateStandardMode
//purpose  : 
//=======================================================================

void AIS_LocalContext::DeactivateStandardMode(const TopAbs_ShapeEnum aType)
{
  TColStd_ListIteratorOfListOfInteger It(myListOfStandardMode);
  Standard_Integer IMode = AIS_Shape::SelectionMode(aType);
  for(;It.More();It.Next())
    if(It.Value()==IMode) {
      AIS_DataMapIteratorOfDataMapOfSelStat ItM(myActiveObjects);
      
      for(;ItM.More();ItM.Next()){
	if(ItM.Value()->Decomposed()){
	  myCTX->SelectionManager()->Deactivate(ItM.Key(),
						IMode,
						myMainVS);
	  ItM.Value()->RemoveSelectionMode(IMode);
	}
      }
      myListOfStandardMode.Remove(It);
      if(myFilters->IsIn(myStdFilters[IMode]))
	myFilters->Remove(myStdFilters[IMode]);
      UpdateSort();
      return;
    }	
  UpdateSort();
}

//=======================================================================
//function : AddFilter
//purpose  : 
//=======================================================================

void AIS_LocalContext::AddFilter(const Handle(SelectMgr_Filter)& aFilter)
{
  // it is checked if the filter impacts at the type of active sub-shape 
  // for which a filter of type has been already implemented...

  TColStd_ListIteratorOfListOfInteger It(myListOfStandardMode);
  
  for(;It.More();It.Next()){
    if(aFilter->ActsOn(AIS_Shape::SelectionType(It.Value())))
      if(myFilters->IsIn(myStdFilters[It.Value()]))
	myFilters->Remove(myStdFilters[It.Value()]);
  } 
  myFilters->Add(aFilter);
}

//=======================================================================
//function : RemoveFilter
//purpose  : 
//=======================================================================

void AIS_LocalContext::RemoveFilter(const Handle(SelectMgr_Filter)& aFilter)
{
  if(myFilters->IsIn(aFilter)) myFilters->Remove(aFilter);
  
  // it is checked if the filter for type standard is active.
  // if yes, it is checked there are still similarities among the
  // remaining filters...
  //     otherwise, the standard filter is restored to
  //     continu selecting active modes...
  TColStd_ListIteratorOfListOfInteger It(myListOfStandardMode);
  TopAbs_ShapeEnum SE;
  for(;It.More();It.Next()){
    SE = AIS_Shape::SelectionType(It.Value());
    if(aFilter->ActsOn(SE))
      if(!HasFilters(SE))
	myFilters->Add(myStdFilters[It.Value()]);
  }
}



Standard_Boolean AIS_LocalContext::HasSameProjector(const Handle(Select3D_Projector)& thePrj) const
{
  const Handle(Select3D_Projector)& aCurPrj = myMainVS->Projector();
  if (aCurPrj->Perspective() != thePrj->Perspective())
    return Standard_False;  
  if (aCurPrj->Perspective() && aCurPrj->Focus() != thePrj->Focus())
    return Standard_False;
  const gp_GTrsf& aCurTrsf = aCurPrj->Transformation();
  const gp_GTrsf& aPrjTrsf = thePrj->Transformation();

  for (Standard_Integer i = 1; i <= 3; ++i)
  {
    for (Standard_Integer j = 1; j <= 3 ; ++j)
    {
      if (aCurTrsf.Value (i, j) != aPrjTrsf.Value (i, j))
        return Standard_False;
    }
  }

  return Standard_True;
}


//=======================================================================
//function : Terminate
//purpose  : 
//=======================================================================

void AIS_LocalContext::Terminate( const Standard_Boolean updateviewer )
{
  ClearDetected();
  Clear();
  myMapOfOwner.Clear();
  
  mylastindex=0;
  // clear the selector...
  myMainVS->Clear();
  myCTX->SelectionManager()->Remove(myMainVS);
  

  AIS_Selection::SetCurrentSelection(mySelName.ToCString());
  Handle(AIS_Selection) S = AIS_Selection::CurrentSelection();
  Handle(Standard_Transient) Tr;
  for(S->Init();S->More();S->Next()){
    Tr = S->Value();
    (*((Handle(SelectMgr_EntityOwner)*)&Tr))->State(0);
  }

      
  AIS_Selection::Select();
  AIS_Selection::Remove(mySelName.ToCString());

  // CLE
  // const Handle(V3d_Viewer)& Vwr = myCTX->CurrentViewer();
  Handle(V3d_Viewer) Vwr = myCTX->CurrentViewer();
  // ENDCLE
  Handle(V3d_View) curV;
  for(Vwr->InitActiveViews();Vwr->MoreActiveViews();Vwr->NextActiveViews()){
    curV = Vwr->ActiveView(); 
    Visual3d_TransientManager::ClearDraw( curV->View(), updateviewer );
  }


#ifdef DEB
  Handle(V3d_View) BidV;
  myMainVS->ClearAreas(BidV);
  myMainVS->ClearSensitive(BidV);
  
#endif
}


//=======================================================================
//function : SubIntensity
//purpose  : 
//=======================================================================

void AIS_LocalContext::SubIntensityOn(const Handle(AIS_InteractiveObject)& anObject)
{
  if(!myActiveObjects.IsBound(anObject)) return;
  
  const Handle(AIS_LocalStatus)& Att = myActiveObjects(anObject);

  if(Att->IsTemporary()) 
    myMainPM->Color(anObject,myCTX->SubIntensityColor(),Att->DisplayMode());
  
  Att->SubIntensityOn();
}
//=======================================================================
//function : SubIntensity
//purpose  : 
//=======================================================================

void AIS_LocalContext::SubIntensityOff(const Handle(AIS_InteractiveObject)& anObject)
{
  if(!myActiveObjects.IsBound(anObject)) return;
  
  const Handle(AIS_LocalStatus)& Att = myActiveObjects(anObject);

  if(Att->IsTemporary()) 
    myMainPM->Unhighlight(anObject);
  Att->SubIntensityOff();
}


//=======================================================================
//function : Hilight
//purpose  : 
//=======================================================================

void AIS_LocalContext::Hilight(const  Handle(AIS_InteractiveObject)& anObject)
{
  if(!myActiveObjects.IsBound(anObject)){
    Standard_Integer HiMod = anObject->HasHilightMode()? anObject->HilightMode() : 0; 
    Handle(AIS_LocalStatus) Att = new AIS_LocalStatus(Standard_True,
						      Standard_False,
						      -1,-1,HiMod);
    myActiveObjects.Bind(anObject,Att);
    
  }
  const Handle(AIS_LocalStatus)& Att = myActiveObjects(anObject);
  myMainPM->Color(anObject,myCTX->HilightColor(),Att->HilightMode());
  Att->SubIntensityOn();
}
//=======================================================================
//function : Hilight
//purpose  : 
//=======================================================================

void AIS_LocalContext::Hilight(const  Handle(AIS_InteractiveObject)& anObject,
			       const Quantity_NameOfColor Col)
{
  if(!myActiveObjects.IsBound(anObject)){
    Standard_Integer HiMod = anObject->HasHilightMode()? anObject->HilightMode() : 0; 
    Handle(AIS_LocalStatus) Att = new AIS_LocalStatus(Standard_True,
						      Standard_False,
						      -1,-1,HiMod);
    myActiveObjects.Bind(anObject,Att);
    
  }
  const Handle(AIS_LocalStatus)& Att = myActiveObjects(anObject);
  myMainPM->Color(anObject,Col,Att->HilightMode());
  Att->SubIntensityOn();
  Att->SetHilightColor(Col);
}

//=======================================================================
//function : Unhilight
//purpose  : 
//=======================================================================

void AIS_LocalContext::Unhilight(const Handle(AIS_InteractiveObject)& anObject)
{
  if(!myActiveObjects.IsBound(anObject)) return;
  
  // chieck if by hazard the object is somewhere else...
  Standard_Integer Indx;
  Standard_Boolean IsSomeWhereElse  = 
    myCTX->IsInLocal(anObject,Indx) && Indx != myCTX->IndexOfCurrentLocal();
  
  const Handle(AIS_LocalStatus)& Att = myActiveObjects(anObject);
  myMainPM->Unhighlight(anObject,Att->HilightMode());
  if(Att->IsTemporary() && Att->DisplayMode()==-1)
    if(!IsSomeWhereElse)
      myMainPM->Erase(anObject,Att->HilightMode());
  
  Att->SubIntensityOff();
  Att->SetHilightColor(Quantity_NOC_WHITE);
}


//=======================================================================
//function : IsIn
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::
IsIn(const Handle(AIS_InteractiveObject)& anObject) const 
{
  return myActiveObjects.IsBound(anObject);
}

//=======================================================================
//function : IsHilighted
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::IsHilighted(const Handle(AIS_InteractiveObject)& anObject) const 
{
  if(!myActiveObjects.IsBound(anObject)) return Standard_False;
  return myActiveObjects(anObject)->IsSubIntensityOn();
}

Standard_Boolean AIS_LocalContext::IsHilighted(const Handle(AIS_InteractiveObject)& anObject,
					       Standard_Boolean& WithColor,
					       Quantity_NameOfColor& HiCol) const 
{
  if(!myActiveObjects.IsBound(anObject)) return Standard_False;
  if( myActiveObjects(anObject)->IsSubIntensityOn()){
    HiCol = myActiveObjects(anObject)->HilightColor();
    if(HiCol==Quantity_NOC_WHITE)
      WithColor = Standard_True;
    else
      WithColor = Standard_False;
    return Standard_True;
  }
  return Standard_False;
}


void AIS_LocalContext::SetDisplayPriority(const Handle(AIS_InteractiveObject)& anObject,
					  const Standard_Integer Prior)
{
  if(!myActiveObjects.IsBound(anObject)) return;
  const Handle(AIS_LocalStatus)& STAT = myActiveObjects(anObject);
  if(STAT->DisplayMode()==-1) return;
  myMainPM->SetDisplayPriority(anObject,STAT->DisplayMode(),Prior);
  if(STAT->IsSubIntensityOn())
    myMainPM->SetDisplayPriority(anObject,STAT->HilightMode(),Prior);
  
  
}


//=======================================================================
//function : DisplayedObjects
//purpose  : 
//=======================================================================
Standard_Integer AIS_LocalContext::DisplayedObjects(TColStd_MapOfTransient& theMap) const
{
  Standard_Integer NbDisp(0);
  for(AIS_DataMapIteratorOfDataMapOfSelStat it(myActiveObjects);it.More();it.Next()){
    const Handle(SelectMgr_SelectableObject)& SO = it.Key();
    if(!theMap.Contains(SO))
      if(it.Value()->DisplayMode()!=-1){
	theMap.Add(SO);
	NbDisp++;
      }
  }
  return NbDisp;
}


//=======================================================================
//function : IsDisplayed
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::IsDisplayed(const Handle(AIS_InteractiveObject)& anObject) const 
{
  if(!myActiveObjects.IsBound(anObject)) return Standard_False;
  return (myActiveObjects(anObject)->DisplayMode()!=-1);
}

//=======================================================================
//function : IsDisplayed
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::IsDisplayed(const Handle(AIS_InteractiveObject)& anObject,
						  const Standard_Integer aMode) const 
{
  if(!myActiveObjects.IsBound(anObject)) return Standard_False;
  return (myActiveObjects(anObject)->DisplayMode()==aMode);
}

//=======================================================================
//function : SelectionModes
//purpose  : 
//=======================================================================

const TColStd_ListOfInteger& AIS_LocalContext::
SelectionModes(const Handle(AIS_InteractiveObject)& anObject) const 
{
  return myActiveObjects(anObject)->SelectionModes(); 
}

//=======================================================================
//function : Status
//purpose  : 
//=======================================================================

TCollection_AsciiString AIS_LocalContext::Status() const 
{
  TCollection_AsciiString t;
  return t;
}

const Handle(AIS_LocalStatus)& AIS_LocalContext::Status(const Handle(AIS_InteractiveObject)& anObject) const 
{
  return myActiveObjects(anObject);
}

//=======================================================================
//function : LoadContextObjects
//purpose  : 
//=======================================================================

void AIS_LocalContext::LoadContextObjects()
{
  AIS_ListIteratorOfListOfInteractive It;
  if(myLoadDisplayed) {
    AIS_ListOfInteractive LL;
    myCTX->DisplayedObjects(LL,Standard_True);
    Handle(AIS_LocalStatus) Att;
    for (It.Initialize(LL);It.More();It.Next()){
      Att= new AIS_LocalStatus();
      Att->SetDecomposition((It.Value()->AcceptShapeDecomposition() && myAcceptStdMode));
      Att->SetTemporary(Standard_False);
      Att->SetHilightMode(It.Value()->HasHilightMode()? It.Value()->HilightMode(): 0);
      
      myActiveObjects.Bind(It.Value(),Att);
    }
  }
}

void AIS_LocalContext::UnloadContextObjects()
{
  AIS_ListIteratorOfListOfInteractive It;
  if(myLoadDisplayed) 
  {
    AIS_ListOfInteractive LL;
    myCTX->DisplayedObjects(LL,Standard_True);
    
    for (It.Initialize(LL);It.More();It.Next())
    {
      myActiveObjects.UnBind(It.Value());
    }
  }
}
//=======================================================================
//function : Process
//purpose  : 
//=======================================================================

void AIS_LocalContext::Process(const Handle(SelectMgr_SelectableObject)& anObject,
			       const Standard_Boolean WithProj)
{ 
  if(!myActiveObjects.IsBound(anObject)) return;
  if(myActiveObjects(anObject)->Decomposed())
    ActivateStandardModes(anObject,WithProj);
  else
    {
      TColStd_ListIteratorOfListOfInteger It(myActiveObjects(anObject)->SelectionModes());
      for(;It.More();It.Next())
	myCTX->SelectionManager()->Activate(anObject,It.Value(),myMainVS,WithProj);
    }
}

//=======================================================================
//function : Process
//purpose  : 
//=======================================================================

void AIS_LocalContext::Process(const Standard_Boolean WithProj)
{ 

  myMainVS->Clear();
  
  AIS_DataMapIteratorOfDataMapOfSelStat It(myActiveObjects);
  
  for(;It.More();It.Next()){
    myCTX->SelectionManager()->Load(It.Key(),myMainVS);
    if(It.Value()->Decomposed()) 
      ActivateStandardModes(It.Key(),WithProj);
    else if( myCTX->GetAutoActivateSelection() )
    {
      It.Value()->AddSelectionMode(0);
      myCTX->SelectionManager()->Activate(It.Key(),0,myMainVS,WithProj);
    }
  }

}

//=======================================================================
//function : ActivateModes
//purpose  : 
//=======================================================================

void AIS_LocalContext::ActivateStandardModes(const Handle(SelectMgr_SelectableObject)& anObject,
					     const Standard_Boolean WithProj)
{ 
  if(!myActiveObjects.IsBound(anObject)) return;
  
  TColStd_ListIteratorOfListOfInteger itl (myListOfStandardMode);

  const Handle(AIS_LocalStatus)&  LS = myActiveObjects(anObject);
  if(LS->Decomposed()){
    for(;itl.More();itl.Next()){
      myCTX->SelectionManager()->Activate(anObject,itl.Value(),myMainVS,WithProj);
      LS->AddSelectionMode(itl.Value());
    }
  }
}


//=======================================================================
//function : ClearObjects
//purpose  : 
//=======================================================================

void AIS_LocalContext::ClearObjects()
{
  AIS_DataMapIteratorOfDataMapOfSelStat It(myActiveObjects);
  for(;It.More();It.Next())
    {
      Handle(AIS_InteractiveObject) SO =
	Handle(AIS_InteractiveObject)::DownCast(It.Key());
      
      const Handle(AIS_LocalStatus)& CurAtt = It.Value();
      //TColStd_ListIteratorOfListOfInteger ItL;
      // if object is temporary the presentations managed by myMainPM are removed
      AIS_DisplayStatus TheDS = myCTX->DisplayStatus(SO);
      
      if(TheDS != AIS_DS_Displayed){
	if(myMainPM->IsDisplayed(SO,CurAtt->DisplayMode())){
	  if(CurAtt->IsSubIntensityOn()&&
	     myMainPM->IsHighlighted(SO,CurAtt->HilightMode()))
	    myMainPM->Unhighlight(SO,CurAtt->HilightMode());
	  myMainPM->Erase(SO,CurAtt->DisplayMode());
	}
	
	if(CurAtt->IsTemporary()){
	  myMainPM->Erase(SO,CurAtt->DisplayMode());}
//	  myMainPM->Clear(SO,CurAtt->DisplayMode());}
      }
      else {
	if (CurAtt->IsSubIntensityOn()){
	  myCTX->SubIntensityOff(Handle(AIS_InteractiveObject)::DownCast(SO));}
	Standard_Integer DiMo = SO->HasDisplayMode()?
	  SO->DisplayMode():myCTX->DisplayMode();
	if(CurAtt->DisplayMode()!=-1 &&
	   CurAtt->DisplayMode()!= DiMo)
	  myMainPM->Erase(SO,CurAtt->DisplayMode());
      }
      
      TColStd_ListIteratorOfListOfInteger ITL(CurAtt->SelectionModes());
      for(;ITL.More();ITL.Next())
	mySM->Deactivate(SO,ITL.Value(),myMainVS);
      
      if(CurAtt->IsTemporary())
	mySM->Remove(SO,myMainVS);
      
    }
  ClearSelected( Standard_False );
  myActiveObjects.Clear();
//  myMainVS->ClearAreas();myMainVS->ClearSensitive();
}


Standard_Boolean AIS_LocalContext::IsDecompositionOn() const 
{return !myListOfStandardMode.IsEmpty();}




//=======================================================================
//function : HasAlreadyFilters
//purpose  : 
//=======================================================================

Standard_Boolean AIS_LocalContext::
HasFilters(const TopAbs_ShapeEnum aType) const 
{
  return myFilters->ActsOn(aType);
}

void AIS_LocalContext::ClearDetected()
{
  for(Standard_Integer I=1;I<=myMapOfOwner.Extent();I++){
    
    if(!myMapOfOwner(I).IsNull()){
      if(myMapOfOwner(I)->IsHilighted(myMainPM))
	myMapOfOwner(I)->Unhilight(myMainPM);
      else if (myMapOfOwner(I)->IsHilighted(myCTX->CollectorPrsMgr()))
	myMapOfOwner(I)->Unhilight(myCTX->CollectorPrsMgr());
      
      else{
	const Handle(SelectMgr_SelectableObject)& SO = 
	  myMapOfOwner.FindKey(I)->Selectable();
	if(myActiveObjects.IsBound(SO)){
	  const Handle(AIS_LocalStatus)& Att = myActiveObjects(SO);
	  
	  if(Att->IsTemporary() &&
	     Att->DisplayMode()==-1 && 
	     Att->SelectionModes().IsEmpty()){
	    myMapOfOwner(I)->Clear(myMainPM);
	    //myMapOfOwner(I)->Clear();//rob-jmi...
	  }
	}
      }
    }
  }

}

void AIS_LocalContext::UpdateConversion()
{
  myMainVS->UpdateConversion();
}

void AIS_LocalContext::UpdateSort()
{
  myMainVS->UpdateSort();
}



//=======================================================================
//function : IMMEDIATE MODE
//purpose  : 
//=======================================================================

Standard_Boolean  AIS_LocalContext::BeginImmediateDraw()
{
  if(myMainPM->IsImmediateModeOn()){
    myMainPM->BeginDraw();
    return Standard_True;
  }
  return Standard_False;
}


Standard_Boolean AIS_LocalContext::ImmediateAdd(const Handle(AIS_InteractiveObject)& anIObj,
						      const Standard_Integer aMode)
{
  if(!myMainPM->IsImmediateModeOn())
    return Standard_False;
  myMainPM->Add(anIObj,aMode);
  return Standard_True;
}

Standard_Boolean AIS_LocalContext::ImmediateRemove(const Handle(AIS_InteractiveObject)& anIObj,
						   const Standard_Integer aMode)
{
  if(!myMainPM->IsImmediateModeOn())   return Standard_False;
  myMainPM->Remove(anIObj,aMode);
  return Standard_True;
}

Standard_Boolean AIS_LocalContext::EndImmediateDraw(const Handle(V3d_View)& aView,
							  const Standard_Boolean DoubleBuf)
{
  if(!myMainPM->IsImmediateModeOn()) return Standard_False;
  myMainPM->EndDraw(aView,DoubleBuf);
  return Standard_True;
}

Standard_Boolean AIS_LocalContext::IsImmediateModeOn() const
{return myMainPM->IsImmediateModeOn();}

#ifdef BUC60688
void AIS_LocalContext::SetSensitivity(const Standard_Real aPrecision) {

  myMainVS->SetSensitivity(aPrecision);
}

void AIS_LocalContext::SetSensitivity(const Standard_Integer aPrecision) {

  myMainVS->Set(aPrecision);
}
#endif