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_DispPerFiles.ixx>
15 #include <IFSelect_Selection.hxx>
16 #include <IFGraph_SCRoots.hxx>
17 #include <Interface_InterfaceModel.hxx>
18 #include <Interface_EntityIterator.hxx>
21 IFSelect_DispPerFiles::IFSelect_DispPerFiles () { }
23 Handle(IFSelect_IntParam) IFSelect_DispPerFiles::Count () const
26 void IFSelect_DispPerFiles::SetCount
27 (const Handle(IFSelect_IntParam)& pcount)
28 { thecount = pcount; }
30 Standard_Integer IFSelect_DispPerFiles::CountValue () const
32 Standard_Integer pcount = 0;
33 if (!thecount.IsNull()) pcount = thecount->Value();
34 if (pcount <= 0) pcount = 1; // option prise par defaut
38 TCollection_AsciiString IFSelect_DispPerFiles::Label () const
40 TCollection_AsciiString lab(CountValue());
41 lab.Insert(1,"Maximum ");
42 lab.AssignCat(" Files");
47 Standard_Boolean IFSelect_DispPerFiles::LimitedMax
48 (const Standard_Integer /* nbent */, Standard_Integer& pcount) const
50 pcount = CountValue();
54 Standard_Boolean IFSelect_DispPerFiles::PacketsCount
55 (const Interface_Graph& G, Standard_Integer& /*count*/) const
56 { return (G.Size() < CountValue() ? G.Size() : CountValue()); }
58 void IFSelect_DispPerFiles::Packets
59 (const Interface_Graph& G, IFGraph_SubPartsIterator& packs) const
61 // Ressemble a DispPerOne, mais fait "count" AddPart racines
62 Standard_Integer pcount = CountValue();
64 IFGraph_SCRoots roots(G,Standard_False);
66 roots.GetFromIter(FinalSelection()->UniqueResult(G));
67 // SCRoots a initie la resolution : decoupage en StrongComponants + selection
68 // des racines. Un paquet correspond des lors a <count> racines
69 // Donc, il faut iterer sur les Parts de roots et les prendre par <count>
70 roots.Start(); // Start fait Evaluate specifique
71 Standard_Integer nb = roots.NbParts();
72 if (pcount > 0) pcount = (nb-1) / pcount +1; // par packet
74 Standard_Integer i = 0;
75 for (; roots.More(); roots.Next()) { // Start deja fait
76 if (i == 0) packs.AddPart();
77 i ++; if (i >= pcount) i = 0; // regroupement selon "count"
78 packs.GetFromIter(roots.Entities());