1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
|
#include <IFSelect_SignatureList.ixx>
#include <Dico_IteratorOfDictionaryOfInteger.hxx>
#include <Dico_IteratorOfDictionaryOfTransient.hxx>
#include <TColStd_HSequenceOfTransient.hxx>
#include <Interface_MSG.hxx>
#include <Interface_Macros.hxx>
#include <Message_Messenger.hxx>
#include <Message.hxx>
IFSelect_SignatureList::IFSelect_SignatureList
(const Standard_Boolean withlist)
{
thesignonly = Standard_False;
thelistat = withlist;
thenbnuls = 0;
thedicount = new Dico_DictionaryOfInteger;
thediclist = new Dico_DictionaryOfTransient;
SetName("...");
}
void IFSelect_SignatureList::SetList
(const Standard_Boolean withlist)
{ thelistat = withlist; }
Standard_Boolean& IFSelect_SignatureList::ModeSignOnly ()
{ return thesignonly; }
void IFSelect_SignatureList::Clear ()
{
thelastval.Clear();
thenbnuls = 0;
thedicount = new Dico_DictionaryOfInteger;
thediclist = new Dico_DictionaryOfTransient;
}
void IFSelect_SignatureList::Add
(const Handle(Standard_Transient)& ent, const Standard_CString sign)
{
if (thesignonly) {
thelastval.Clear();
thelastval.AssignCat (sign);
return;
}
if (sign[0] == '\0') { thenbnuls ++; return; }
Standard_Boolean deja;
Standard_Integer& nb = thedicount->NewItem(sign,deja);
if (!deja) nb = 0;
nb ++;
if (thelistat) {
Handle(Standard_Transient)& anitem = thediclist->NewItem(sign,deja);
DeclareAndCast(TColStd_HSequenceOfTransient,alist,anitem);
if (!deja) { alist = new TColStd_HSequenceOfTransient(); anitem = alist; }
alist->Append(ent);
}
}
Standard_CString IFSelect_SignatureList::LastValue () const
{ return thelastval.ToCString(); }
void IFSelect_SignatureList::Init
(const Standard_CString name,
const Handle(Dico_DictionaryOfInteger)& count,
const Handle(Dico_DictionaryOfTransient)& list,
const Standard_Integer nbnuls)
{
thelastval.Clear();
thename = new TCollection_HAsciiString (name);
thedicount = count;
thediclist = list;
thenbnuls = nbnuls;
if (thediclist.IsNull()) thelistat = Standard_False;
}
Handle(TColStd_HSequenceOfHAsciiString) IFSelect_SignatureList::List
(const Standard_CString root) const
{
Handle(TColStd_HSequenceOfHAsciiString) list =
new TColStd_HSequenceOfHAsciiString();
Dico_IteratorOfDictionaryOfInteger iter(thedicount,root);
for (; iter.More(); iter.Next()) {
Handle(TCollection_HAsciiString) sign =
new TCollection_HAsciiString (iter.Name());
list->Append(sign);
}
return list;
}
Standard_Boolean IFSelect_SignatureList::HasEntities () const
{ return thelistat; }
Standard_Integer IFSelect_SignatureList::NbNulls () const
{ return thenbnuls; }
Standard_Integer IFSelect_SignatureList::NbTimes
(const Standard_CString sign) const
{
Standard_Integer nb;
if (thedicount->GetItem(sign,nb)) return nb;
else return 0;
}
Handle(TColStd_HSequenceOfTransient) IFSelect_SignatureList::Entities
(const Standard_CString sign) const
{
Handle(TColStd_HSequenceOfTransient) list;
if (!thelistat) return list;
if (thediclist->GetItem(sign,list)) return list;
list = new TColStd_HSequenceOfTransient();
return list;
}
void IFSelect_SignatureList::SetName (const Standard_CString name)
{ thename = new TCollection_HAsciiString (name); }
Standard_CString IFSelect_SignatureList::Name () const
{ return thename->ToCString(); }
void IFSelect_SignatureList::PrintCount (const Handle(Message_Messenger)& S) const
{
Standard_Integer nbtot = 0, nbsign = 0;
Dico_IteratorOfDictionaryOfInteger iter(thedicount,"");
S << " Count "<<thename->ToCString()<<"\n ----- -----------"<<endl;
for (; iter.More(); iter.Next()) {
Standard_Integer val = iter.Value();
S << Interface_MSG::Blanks(val,6) << val <<" "<<iter.Name()<<endl;
nbtot += val;
nbsign ++;
}
if (thenbnuls > 0) S << thename->ToCString()<< " Nul : " << thenbnuls<<endl;
S<<" Nb Total:"<<nbtot<<" for "<<nbsign<<" items"<<endl;
}
void IFSelect_SignatureList::PrintList
(const Handle(Message_Messenger)& S, const Handle(Interface_InterfaceModel)& model,
const IFSelect_PrintCount mod) const
{
if (mod == IFSelect_ItemsByEntity) return;
if (mod == IFSelect_CountByItem) { PrintCount (S); return; }
if (mod == IFSelect_CountSummary) { PrintSum (S); return; }
if (!HasEntities()) {
S <<" SignatureList "<<Name()<<" : PrintList, list not available"<<endl;
PrintCount(S);
return;
}
Standard_Integer nbtot = 0, nbsign = 0;
Dico_IteratorOfDictionaryOfTransient iter(thediclist,"");
for (; iter.More(); iter.Next()) {
DeclareAndCast(TColStd_HSequenceOfTransient,list,iter.Value());
S<<Name()<<" : "<<iter.Name()<<endl;
if (list.IsNull()) { S<<" - (empty list)"<<endl; continue; }
Standard_Integer nb = list->Length();
S<<" - Nb: "<<nb<<" : ";
Standard_Integer nc = nb; if (nb > 5 && mod == IFSelect_ShortByItem) nc = 5;
for (Standard_Integer i = 1; i <= nc; i ++) {
if (list->Value(i).IsNull()) {
S<<" 0"; if (mod == IFSelect_EntitiesByItem) S<<":(Global)";
continue;
}
Standard_Integer num = model->Number(list->Value(i));
if (num == IFSelect_ShortByItem) { S<<" ??"; continue; }
S<<" "<<num;
if (mod == IFSelect_EntitiesByItem)
{ S<<":"; model->PrintLabel(list->Value(i),S); }
}
if (nc < nb) S<<" .. etc";
S<<endl;
nbtot += nb;
nbsign ++;
}
S<<" Nb Total:"<<nbtot<<" for "<<nbsign<<" items"<<endl;
}
void IFSelect_SignatureList::PrintSum (const Handle(Message_Messenger)& S) const
{
Dico_IteratorOfDictionaryOfInteger iter(thedicount,"");
S << " Summary "<<thename->ToCString()<<"\n ----- -----------"<<endl;
Standard_Integer nbtot = 0, nbsign = 0, maxent = 0, nbval = 0, nbve = 0, minval = 0, maxval = 0, totval = 0;
for (; iter.More(); iter.Next()) {
Standard_Integer nbent = iter.Value();
nbtot += nbent;
nbsign ++;
if (nbent > maxent) maxent = nbent;
TCollection_AsciiString name = iter.Name();
// if (!name.IsIntegerValue()) continue; pas bien fiable
Standard_Integer ic, nc = name.Length();
Standard_Boolean iaint = Standard_True;
for (ic = 1; ic <= nc; ic ++) {
char unc = name.Value(ic);
if (ic == 1 && (unc == ' ' || unc == '+' || unc == '-')) continue;
if (unc >= '0' && unc <= '9') continue;
iaint = Standard_False; break;
}
if (!iaint) continue;
Standard_Integer val = name.IntegerValue();
if (nbval == 0) { minval = maxval = val; }
if (minval > val) minval = val;
if (maxval < val) maxval = val;
nbval ++;
nbve += nbent;
totval += (val*nbent);
}
S << " Nb Total:"<<nbtot<<" for "<<nbsign<<" items"<<endl;
S << " Highest count of entities : "<<maxent<<" on one item"<<endl;
if (nbval > 0) {
S<<" Summary on Integer Values"<<endl;
S<<" Nb Integer Items : "<<nbval<<endl;
S<<" For Nb Entities : "<<nbve<<endl;
S<<" Cumulated Values : "<<totval<<endl;
S<<" Maximum Value : "<<maxval<<endl;
Standard_Integer avg1, avg2;
avg1 = totval/nbve;
avg2 = ((totval - (avg1*nbve)) * 10) / nbve;
S<<" Average Value : "<<avg1<<" "<<avg2<<"/10"<<endl;
S<<" Minimum Value : "<<minval<<endl;
}
}
|
