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
|
//#include <LibCtl_Library.ixx>
#include <Standard_NoSuchObject.hxx>
// Liste Globale des Modules, dans laquelle on va se servir
static Handle(LibCtl_GlobalNode) theglobal;
// Donnees pour optimisation (dernier Protocole demande)
static Handle(TheProtocol) theprotocol;
static Handle(LibCtl_Node) thelast;
// Alimentation de la liste globale
// ATTENTION : SetGlobal fait de la substitution, c-a-d que c est le dernier
// qui a raison pour un Protocol donne
void LibCtl_Library::SetGlobal
(const Handle(TheModule)& amodule, const Handle(TheProtocol)& aprotocol)
{
if (theglobal.IsNull()) theglobal = new LibCtl_GlobalNode;
theglobal->Add(amodule,aprotocol);
}
// Constructeur d apres Protocole
LibCtl_Library::LibCtl_Library (const Handle(TheProtocol)& aprotocol)
{
Standard_Boolean last = Standard_False;
if (aprotocol.IsNull()) return; // PAS de protocole = Lib VIDE
if (!theprotocol.IsNull()) last =
(theprotocol == aprotocol);
if (last) thelist = thelast;
// Si Pas d optimisation disponible : construire la liste
else {
AddProtocol(aprotocol);
// Ceci definit l optimisation (pour la fois suivante)
thelast = thelist;
theprotocol = aprotocol;
}
}
// Constructeur vide
LibCtl_Library::LibCtl_Library () { }
// Ajout d un Protocol : attention, desoptimise (sinon risque de confusion !)
void LibCtl_Library::AddProtocol
(const Handle(Standard_Transient)& aprotocol)
{
// DownCast car Protocol->Resources, meme redefini et utilise dans d autres
// librairies, doit toujours renvoyer le type le plus haut
Handle(TheProtocol) aproto = Handle(TheProtocol)::DownCast(aprotocol);
if (aproto.IsNull()) return;
// D abord, ajouter celui-ci a la liste : chercher le Node
Handle(LibCtl_GlobalNode) curr;
for (curr = theglobal; !curr.IsNull(); ) { // curr->Next : plus loin
const Handle(TheProtocol)& protocol = curr->Protocol();
if (!protocol.IsNull()) {
// Match Protocol ?
if (protocol->DynamicType() == aprotocol->DynamicType()) {
if (thelist.IsNull()) thelist = new LibCtl_Node;
thelist->AddNode(curr);
break; // UN SEUL MODULE PAR PROTOCOLE
}
}
curr = curr->Next(); // cette formule est refusee dans "for"
}
// Ensuite, Traiter les ressources
Standard_Integer nb = aproto->NbResources();
for (Standard_Integer i = 1; i <= nb; i ++) {
AddProtocol (aproto->Resource(i));
}
// Ne pas oublier de desoptimiser
theprotocol.Nullify();
thelast.Nullify();
}
void LibCtl_Library::Clear ()
{ thelist = new LibCtl_Node; }
void LibCtl_Library::SetComplete ()
{
thelist = new LibCtl_Node;
// On prend chacun des Protocoles de la Liste Globale et on l ajoute
Handle(LibCtl_GlobalNode) curr;
for (curr = theglobal; !curr.IsNull(); ) { // curr->Next : plus loin
const Handle(TheProtocol)& protocol = curr->Protocol();
// Comme on prend tout tout tout, on ne se preoccupe pas des Ressources !
if (!protocol.IsNull()) thelist->AddNode(curr);
curr = curr->Next(); // cette formule est refusee dans "for"
}
}
// Selection : Tres fort, on retourne le Module correspondant a un Type
// (ainsi que le CaseNumber retourne par le protocole correspondant)
Standard_Boolean LibCtl_Library::Select
(const TheObject& obj,
Handle(TheModule)& module, Standard_Integer& CN) const
{
module.Nullify(); CN = 0; // Reponse "pas trouve"
if (thelist.IsNull()) return Standard_False;
Handle(LibCtl_Node) curr = thelist;
for (curr = thelist; !curr.IsNull(); ) { // curr->Next : plus loin
const Handle(TheProtocol)& protocol = curr->Protocol();
if (!protocol.IsNull()) {
CN = protocol->CaseNumber(obj);
if (CN > 0) {
module = curr->Module();
return Standard_True;
}
}
curr = curr->Next(); // cette formule est refusee dans "for"
}
return Standard_False; // ici, pas trouce
}
// .... Iteration ....
void LibCtl_Library::Start ()
{ thecurr = thelist; }
Standard_Boolean LibCtl_Library::More () const
{ return (!thecurr.IsNull()); }
void LibCtl_Library::Next ()
{ if (!thecurr.IsNull()) thecurr = thecurr->Next(); }
const Handle(TheModule)& LibCtl_Library::Module () const
{
if (thecurr.IsNull()) Standard_NoSuchObject::Raise("Library from LibCtl");
return thecurr->Module();
}
const Handle(TheProtocol)& LibCtl_Library::Protocol () const
{
if (thecurr.IsNull()) Standard_NoSuchObject::Raise("Library from LibCtl");
return thecurr->Protocol();
}
|
