7fd59977 |
1 | #include <IFSelect_ShareOut.ixx> |
2 | #include <Interface_InterfaceError.hxx> |
3 | #include <Interface_Macros.hxx> |
4 | #include <stdio.h> |
5 | |
6 | |
7 | IFSelect_ShareOut::IFSelect_ShareOut () |
8 | { |
9 | thedefrt = new TCollection_HAsciiString ("Default"); |
10 | thenbdefs = thelastrun = 0; |
11 | } |
12 | |
13 | |
14 | void IFSelect_ShareOut::Clear (const Standard_Boolean onlydisp) |
15 | { |
16 | thedisps.Clear(); |
17 | ClearResult(!onlydisp); |
18 | if (onlydisp) return; |
19 | themodelmodifiers.Clear(); |
20 | thefilemodifiers.Clear(); |
21 | } |
22 | |
23 | Standard_Boolean IFSelect_ShareOut::RemoveItem |
24 | (const Handle(Standard_Transient)& item) |
25 | { |
26 | DeclareAndCast(IFSelect_GeneralModifier,modifier,item); |
27 | if (!modifier.IsNull()) { |
28 | if (modifier.IsNull()) return Standard_False; |
29 | Standard_Boolean formodel = modifier->IsKind(STANDARD_TYPE(IFSelect_Modifier)); |
30 | Standard_Integer atnum = ModifierRank(modifier); |
31 | return RemoveModifier (formodel,atnum); |
32 | } |
33 | DeclareAndCast(IFSelect_Dispatch,disp,item); |
34 | if (!disp.IsNull()) { |
35 | Standard_Integer atnum = DispatchRank(disp); |
36 | return RemoveDispatch(atnum); |
37 | } |
38 | return Standard_False; |
39 | } |
40 | |
41 | |
42 | void IFSelect_ShareOut::ClearResult (const Standard_Boolean alsoname) |
43 | { |
44 | thelastrun = 0; |
45 | if (alsoname) thenbdefs = 0; |
46 | } |
47 | |
48 | Standard_Integer IFSelect_ShareOut::LastRun () const |
49 | { return thelastrun; } |
50 | |
51 | void IFSelect_ShareOut::SetLastRun (const Standard_Integer lastrun) |
52 | { thelastrun = lastrun; } |
53 | |
54 | // ####################################################################### |
55 | // #### DISPATCHES (ENVOI DES FICHIERS) #### |
56 | |
57 | Standard_Integer IFSelect_ShareOut::NbDispatches () const |
58 | { return thedisps.Length(); } |
59 | |
60 | Standard_Integer IFSelect_ShareOut::DispatchRank |
61 | (const Handle(IFSelect_Dispatch)& disp) const |
62 | { |
63 | if (disp.IsNull()) return 0; |
64 | for (Standard_Integer i = thedisps.Length(); i >= 1; i --) |
65 | if (disp == thedisps.Value(i)) return i; |
66 | return 0; |
67 | } |
68 | |
69 | const Handle(IFSelect_Dispatch)& IFSelect_ShareOut::Dispatch |
70 | (const Standard_Integer num) const |
71 | { |
72 | return thedisps.Value(num); |
73 | } |
74 | |
75 | void IFSelect_ShareOut::AddDispatch |
76 | (const Handle(IFSelect_Dispatch)& disp) |
77 | { |
78 | if (disp.IsNull()) return; |
79 | thedisps.Append(disp); |
80 | } |
81 | |
82 | |
83 | Standard_Boolean IFSelect_ShareOut::RemoveDispatch |
84 | (const Standard_Integer rank) |
85 | { |
86 | if (rank <= thelastrun || rank > thedisps.Length()) return Standard_False; |
87 | thedisps.Remove(rank); |
88 | return Standard_True; |
89 | } |
90 | |
91 | // ########################################################################## |
92 | // #### MODIFIERS #### |
93 | |
94 | void IFSelect_ShareOut::AddModifier |
95 | (const Handle(IFSelect_GeneralModifier)& modifier, |
96 | const Standard_Integer atnum) |
97 | { |
98 | Standard_Boolean formodel = modifier->IsKind(STANDARD_TYPE(IFSelect_Modifier)); |
99 | if (ModifierRank(modifier) == 0) AddModif (modifier,formodel,atnum); |
100 | Handle(IFSelect_Dispatch) nuldisp; |
101 | modifier->SetDispatch(nuldisp); |
102 | } |
103 | |
104 | void IFSelect_ShareOut::AddModifier |
105 | (const Handle(IFSelect_GeneralModifier)& modifier, |
106 | const Standard_Integer dispnum, const Standard_Integer atnum) |
107 | { |
108 | Standard_Boolean formodel = modifier->IsKind(STANDARD_TYPE(IFSelect_Modifier)); |
109 | if (ModifierRank(modifier) == 0) AddModif (modifier,formodel,atnum); |
110 | Handle(IFSelect_Dispatch) disp = Dispatch(dispnum); |
111 | modifier->SetDispatch(disp); |
112 | } |
113 | |
114 | |
115 | void IFSelect_ShareOut::AddModif |
116 | (const Handle(IFSelect_GeneralModifier)& modifier, |
117 | const Standard_Boolean formodel, const Standard_Integer atnum) |
118 | { |
119 | if (formodel) { |
120 | if (atnum > 0 && atnum <= themodelmodifiers.Length()) |
121 | themodelmodifiers.InsertBefore(atnum,modifier); |
122 | else themodelmodifiers.Append(modifier); |
123 | } else { |
124 | if (atnum > 0 && atnum <= thefilemodifiers.Length()) |
125 | thefilemodifiers.InsertBefore(atnum,modifier); |
126 | else thefilemodifiers.Append(modifier); |
127 | } |
128 | } |
129 | |
130 | Standard_Integer IFSelect_ShareOut::NbModifiers |
131 | (const Standard_Boolean formodel) const |
132 | { |
133 | if (formodel) return themodelmodifiers.Length(); |
134 | else return thefilemodifiers.Length(); |
135 | } |
136 | |
137 | Handle(IFSelect_GeneralModifier) IFSelect_ShareOut::GeneralModifier |
138 | (const Standard_Boolean formodel, const Standard_Integer atnum) const |
139 | { |
140 | if (formodel) return themodelmodifiers.Value(atnum); |
141 | else return thefilemodifiers.Value(atnum); |
142 | } |
143 | |
144 | Handle(IFSelect_Modifier) IFSelect_ShareOut::ModelModifier |
145 | (const Standard_Integer num) const |
146 | { return Handle(IFSelect_Modifier)::DownCast(themodelmodifiers.Value(num)); } |
147 | |
148 | Standard_Integer IFSelect_ShareOut::ModifierRank |
149 | (const Handle(IFSelect_GeneralModifier)& modifier) const |
150 | { |
151 | Standard_Integer i; |
152 | Standard_Boolean formodel = modifier->IsKind(STANDARD_TYPE(IFSelect_Modifier)); |
153 | if (formodel) { |
154 | for (i = themodelmodifiers.Length(); i >= 1; i --) |
155 | if (modifier == themodelmodifiers.Value(i)) return i; |
156 | } else { |
157 | for (i = thefilemodifiers.Length(); i >= 1; i --) |
158 | if (modifier == thefilemodifiers.Value(i)) return i; |
159 | } |
160 | return 0; |
161 | } |
162 | |
163 | |
164 | Standard_Boolean IFSelect_ShareOut::RemoveModifier |
165 | (const Standard_Boolean formodel, const Standard_Integer atnum) |
166 | { |
167 | if (atnum <= 0) return Standard_False; |
168 | if (formodel) { |
169 | if (atnum > themodelmodifiers.Length()) return Standard_False; |
170 | themodelmodifiers.Remove(atnum); |
171 | } else { |
172 | if (atnum > thefilemodifiers.Length()) return Standard_False; |
173 | thefilemodifiers.Remove(atnum); |
174 | } |
175 | return Standard_True; |
176 | } |
177 | |
178 | |
179 | // ChangeModifierRank revient a une permutation circulaire : |
180 | // before est mis en after, ceux qui sont entre tournent |
181 | Standard_Boolean IFSelect_ShareOut::ChangeModifierRank |
182 | (const Standard_Boolean formodel, |
183 | const Standard_Integer before, const Standard_Integer after) |
184 | { |
185 | Standard_Integer nb; |
186 | if (before <= 0 || after <= 0) return Standard_False; |
187 | if (before == after) return Standard_True; |
188 | if (formodel) { |
189 | nb = themodelmodifiers.Length(); |
190 | if (before > nb || after > nb) return Standard_False; |
191 | Handle(IFSelect_GeneralModifier) bef = themodelmodifiers.Value(before); |
192 | themodelmodifiers.Remove(before); |
193 | if (after == nb) themodelmodifiers.Append(bef); |
194 | else themodelmodifiers.InsertBefore(after,bef); |
195 | } else { |
196 | nb = thefilemodifiers.Length(); |
197 | if (before > nb || after > nb) return Standard_False; |
198 | Handle(IFSelect_GeneralModifier) bef = thefilemodifiers.Value(before); |
199 | thefilemodifiers.Remove(before); |
200 | if (after == nb) thefilemodifiers.Append(bef); |
201 | else thefilemodifiers.InsertBefore(after,bef); |
202 | } |
203 | return Standard_True; |
204 | } |
205 | |
206 | // ####################################################################### |
207 | // #### NOMINATION DES FICHIERS #### |
208 | // Rq : thenbdefs s applique tant que l on ne change pas les termes principaux |
209 | |
210 | Standard_Boolean IFSelect_ShareOut::SetRootName |
211 | (const Standard_Integer num, const Handle(TCollection_HAsciiString)& name) |
212 | { |
213 | if (num < 1 || num > thedisps.Length()) return Standard_False; |
214 | if (RootNumber(name) != 0) return Standard_False; |
215 | Dispatch(num)->SetRootName (name); |
216 | return Standard_True; |
217 | } |
218 | |
219 | Standard_Boolean IFSelect_ShareOut::HasRootName |
220 | (const Standard_Integer num) const |
221 | { |
222 | if (num < 1 || num > thedisps.Length()) return Standard_False; |
223 | return Dispatch(num)->HasRootName(); |
224 | } |
225 | |
226 | Handle(TCollection_HAsciiString) IFSelect_ShareOut::RootName |
227 | (const Standard_Integer num) const |
228 | { |
229 | Handle(TCollection_HAsciiString) nulname; |
230 | if (num < 1 || num > thedisps.Length()) return nulname; |
231 | return Dispatch(num)->RootName(); |
232 | } |
233 | |
234 | Standard_Integer IFSelect_ShareOut::RootNumber |
235 | (const Handle(TCollection_HAsciiString)& name) const |
236 | { |
237 | if (name.IsNull()) return 0; |
238 | if (!thedefrt.IsNull()) { |
239 | if (thedefrt->IsSameString(name)) return -1; |
240 | } |
241 | for (Standard_Integer i = 1; i <= thedisps.Length(); i ++) { |
242 | Handle(TCollection_HAsciiString) root = thedisps.Value(i)->RootName(); |
243 | if (root.IsNull()) continue; |
244 | if (root->IsSameString(name)) return i; |
245 | } |
246 | return 0; |
247 | } |
248 | |
249 | |
250 | void IFSelect_ShareOut::SetPrefix |
251 | (const Handle(TCollection_HAsciiString)& pref) |
252 | { thepref = pref; thenbdefs = 0; } |
253 | |
254 | Standard_Boolean IFSelect_ShareOut::SetDefaultRootName |
255 | (const Handle(TCollection_HAsciiString)& defrt) |
256 | { |
257 | if (RootNumber(defrt) != 0) return Standard_False; |
258 | if (thedefrt.IsNull() || !thedefrt->IsSameString(defrt)) thenbdefs = 0; |
259 | thedefrt = defrt; |
260 | return Standard_True; |
261 | } |
262 | |
263 | void IFSelect_ShareOut::SetExtension |
264 | (const Handle(TCollection_HAsciiString)& ext) |
265 | { theext = ext; thenbdefs = 0; } |
266 | |
267 | Handle(TCollection_HAsciiString) IFSelect_ShareOut::Prefix () const |
268 | { |
269 | if (thepref.IsNull()) return new TCollection_HAsciiString(""); |
270 | return thepref; |
271 | } |
272 | |
273 | Handle(TCollection_HAsciiString) IFSelect_ShareOut::DefaultRootName () const |
274 | { |
275 | if (thedefrt.IsNull()) return new TCollection_HAsciiString(""); |
276 | return thedefrt; |
277 | } |
278 | |
279 | Handle(TCollection_HAsciiString) IFSelect_ShareOut::Extension () const |
280 | { |
281 | if (theext.IsNull()) return new TCollection_HAsciiString(""); |
282 | return theext; |
283 | } |
284 | |
285 | |
286 | TCollection_AsciiString IFSelect_ShareOut::FileName |
287 | (const Standard_Integer dnum, const Standard_Integer pnum, |
288 | const Standard_Integer nbpack) |
289 | { |
290 | Handle(TCollection_HAsciiString) rot = RootName(dnum); |
291 | Standard_Integer num = pnum; |
292 | Standard_Integer npac = nbpack; |
293 | Standard_Boolean sufnum = (npac > 1 || num > 1); |
294 | if (rot.IsNull()) { |
295 | rot = thedefrt; |
296 | thenbdefs ++; num = thenbdefs; |
297 | npac = 0; |
298 | sufnum = Standard_True; // numeroter sur noms par defaut, des le 1er sans 0 |
299 | } |
300 | |
301 | TCollection_AsciiString res; |
302 | if (!thepref.IsNull()) res.AssignCat (thepref->ToCString()); |
303 | if (!rot.IsNull()) res.AssignCat (rot->ToCString()); |
304 | |
305 | // Suffixe numerique |
306 | if (sufnum) { // sinon, pas de suffixe numerique |
307 | // Nom du PacketSuffix : _ suivi du numero <num> |
308 | // Si nbpack non nul, alors on a un majorant et on peut preceder de zeros |
309 | // Ex.: nbpack = 50 (donc 2 chiffres), num = 3, cela donnera _03 |
310 | // idnum pas utilise : cette methode peut etre redefinie et utiliser idnum ... |
311 | // Si nbpack = 0 ou 1, num = 1 pas de suffixe, sinon suffixe "_num" tel quel |
312 | // MODIF du 3-NOV-1995 -> pour eviter toute confusion, num = 1 donne aussi _1 |
313 | Standard_Integer nbch = 0; |
314 | char format[10],suffixe[30]; format[1] = ' '; |
315 | if (npac >= num) { |
316 | Standard_Integer nbpa = 1; |
317 | while (nbpa <= npac) { nbpa *= 10; nbch ++; } |
318 | } |
319 | if (nbch > 1) { |
320 | sprintf(format,"_ %d.%dd",nbch,nbch); |
321 | format[1] = '%'; |
322 | } else if (npac >= num || num >= 1) { |
323 | sprintf(format,"_ d"); |
324 | format[1] = '%'; |
325 | } |
326 | if (format[1] == '%') { |
327 | sprintf (suffixe,format,num); |
328 | res.AssignCat (suffixe); |
329 | } |
330 | } |
331 | |
332 | if (!theext.IsNull()) res.AssignCat (theext->ToCString()); |
333 | return res; |
334 | } |