src/TObj/TObj_ReferenceIterator.cxx

   1 // Created on: 2004-11-23
   2 // Created by: Pavel TELKOV
   3 // Copyright (c) 2004-2014 OPEN CASCADE SAS
   4 //
   5 // This file is part of Open CASCADE Technology software library.
   6 //
   7 // This library is free software; you can redistribute it and/or modify it under
   8 // the terms of the GNU Lesser General Public License version 2.1 as published
   9 // by the Free Software Foundation, with special exception defined in the file
  10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  11 // distribution for complete text of the license and disclaimer of any warranty.
  12 //
  13 // Alternatively, this file may be used under the terms of Open CASCADE
  14 // commercial license or contractual agreement.
  15
  16 // The original implementation Copyright: (C) RINA S.p.A
  17
  18 #include <TObj_Object.hxx>
  19 #include <TObj_ReferenceIterator.hxx>
  20 #include <TObj_TReference.hxx>
  21
  22
  23 //=======================================================================
  24 //function : TObj_ObjectIterator
  25 //purpose  :
  26 //=======================================================================
  27
  28 TObj_ReferenceIterator::TObj_ReferenceIterator
  29                          (const TDF_Label&             theLabel,
  30                           const Handle(Standard_Type)& theType,
  31                           const Standard_Boolean       theRecursive)
  32   : TObj_LabelIterator (theLabel, theRecursive), myType (theType)
  33 {
  34   MakeStep();
  35 }
  36
  37 //=======================================================================
  38 //function : MakeStep
  39 //purpose  :
  40 //=======================================================================
  41
  42 void TObj_ReferenceIterator::MakeStep()
  43 {
  44   for(;myIterator.More() && myNode.IsNull(); myIterator.Next())
  45   {
  46     TDF_Label L = myIterator.Value();
  47
  48     Handle(TObj_TReference) A;
  49     if ( L.FindAttribute(TObj_TReference::GetID(), A) )
  50     {
  51       myObject = A->Get();
  52       if (! myType.IsNull() && !myObject.IsNull() && !myObject->IsKind( myType ))
  53         continue;
  54
  55       myNode = L;
  56     }
  57   }
  58 }