// Copyright (c) 1999-2014 OPEN CASCADE SAS // // This file is part of Open CASCADE Technology software library. // // This library is free software; you can redistribute it and/or modify it under // the terms of the GNU Lesser General Public License version 2.1 as published // by the Free Software Foundation, with special exception defined in the file // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT // distribution for complete text of the license and disclaimer of any warranty. // // Alternatively, this file may be used under the terms of Open CASCADE // commercial license or contractual agreement. #include #include #include #include #include #include #include #include IMPLEMENT_STANDARD_RTTIEXT(IFSelect_SelectSent,IFSelect_SelectExtract) IFSelect_SelectSent::IFSelect_SelectSent (const Standard_Integer sentcount, const Standard_Boolean atleast) { thecnt = sentcount; thelst = atleast; } Standard_Integer IFSelect_SelectSent::SentCount () const { return thecnt; } Standard_Boolean IFSelect_SelectSent::AtLeast () const { return thelst; } Interface_EntityIterator IFSelect_SelectSent::RootResult (const Interface_Graph& G) const { Standard_Boolean direct = IsDirect(); Interface_EntityIterator res; Interface_EntityIterator inp = InputResult(G); for (inp.Start(); inp.More(); inp.Next()) { Standard_Integer num = G.EntityNumber(inp.Value()); if (num == 0) continue; Standard_Integer nb = G.Status(num); // nb sent Standard_Boolean ok; if (thecnt == 0) ok = (nb == 0); else if (thelst) ok = (nb >= thecnt); else ok = (nb == thecnt); if (ok == direct) res.AddItem (G.Entity(num)); } return res; } Standard_Boolean IFSelect_SelectSent::Sort (const Standard_Integer , const Handle(Standard_Transient)&, const Handle(Interface_InterfaceModel)& ) const { return Standard_False; } TCollection_AsciiString IFSelect_SelectSent::ExtractLabel () const { char lb[80]; TCollection_AsciiString lab; if (thecnt == 0) lab.AssignCat ("Remaining (non-sent) entities"); if (thecnt == 1 && thelst) lab.AssignCat ("Sent entities"); if (thecnt == 1 && !thelst) lab.AssignCat ("Sent once (non-duplicated) entities"); if (thecnt == 2 && thelst) lab.AssignCat ("Sent several times entities"); if (thecnt == 2 && !thelst) lab.AssignCat ("Sent just twice entities"); if (thecnt > 2) { if (thelst) sprintf (lb,"Sent at least %d times entities", thecnt); else sprintf (lb,"Sent just %d times entities", thecnt); lab.AssignCat (lb); } return lab; }