1 // Copyright (c) 1999-2014 OPEN CASCADE SAS
3 // This file is part of Open CASCADE Technology software library.
5 // This library is free software; you can redistribute it and/or modify it under
6 // the terms of the GNU Lesser General Public License version 2.1 as published
7 // by the Free Software Foundation, with special exception defined in the file
8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
9 // distribution for complete text of the license and disclaimer of any warranty.
11 // Alternatively, this file may be used under the terms of Open CASCADE
12 // commercial license or contractual agreement.
14 #include <IFSelect_SelectFlag.ixx>
17 IFSelect_SelectFlag::IFSelect_SelectFlag (const Standard_CString flagname)
18 : thename (flagname) { }
20 Standard_CString IFSelect_SelectFlag::FlagName () const
21 { return thename.ToCString(); }
24 Interface_EntityIterator IFSelect_SelectFlag::RootResult
25 (const Interface_Graph& G) const
27 Standard_Boolean direct = IsDirect();
28 Interface_EntityIterator res;
29 const Interface_BitMap& bm = G.BitMap();
30 Standard_Integer flag = bm.FlagNumber (thename.ToCString());
31 if (flag == 0) return res;
32 Interface_EntityIterator inp = InputResult(G);
34 for (inp.Start(); inp.More(); inp.Next()) {
35 Standard_Integer num = G.EntityNumber(inp.Value());
36 if (num == 0) continue;
37 if (direct == bm.Value(num,flag)) res.AddItem (G.Entity(num));
42 Standard_Boolean IFSelect_SelectFlag::Sort
43 (const Standard_Integer ,
44 const Handle(Standard_Transient)&,
45 const Handle(Interface_InterfaceModel)& ) const
46 { return Standard_False; }
48 TCollection_AsciiString IFSelect_SelectFlag::ExtractLabel () const
50 TCollection_AsciiString lab ("Entities Flagged by ");
51 lab.AssignCat (thename);