Salome HOME
Merge from V6_main 01/04/2013
[modules/yacs.git] / src / engine / Switch.cxx
1 // Copyright (C) 2006-2013  CEA/DEN, EDF R&D
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19
20 #include "Switch.hxx"
21 #include "Visitor.hxx"
22 #include "LinkInfo.hxx"
23
24 #include <iostream>
25 #include <sstream>
26 #include <cassert>
27
28 //#define _DEVDEBUG_
29 #include "YacsTrace.hxx"
30
31 using namespace YACS::ENGINE;
32 using namespace std;
33
34 const char Switch::DEFAULT_NODE_NAME[]="default";
35 const int Switch::ID_FOR_DEFAULT_NODE=-1973012217;
36 const char Switch::SELECTOR_INPUTPORT_NAME[]="select";
37
38 int CollectorSwOutPort::edGetNumberOfOutLinks() const
39 {
40   return 1;
41 }
42
43 std::set<InPort *> CollectorSwOutPort::edSetInPort() const
44 {
45   set<InPort *> ret;
46   if(_consumer)
47     ret.insert(_consumer);
48   return ret;
49 }
50
51 bool CollectorSwOutPort::isAlreadyLinkedWith(InPort *with) const
52 {
53   set<InPort *> s;
54   with->getAllRepresentants(s);
55   return s.find(_consumer)!=s.end();
56 }
57
58 std::string CollectorSwOutPort::getNameOfTypeOfCurrentInstance() const
59 {
60   return _className;
61 }
62
63 void CollectorSwOutPort::edRemoveAllLinksLinkedWithMe() throw(YACS::Exception)
64 {
65   map<int, OutPort *>::iterator pt;
66   if(_consumer)
67     for(pt=_potentialProducers.begin();pt!=_potentialProducers.end();pt++)
68       ((*pt).second)->removeInPort(_consumer,true);
69 }
70
71 TypeOfChannel CollectorSwOutPort::getTypeOfChannel() const
72 {
73   return (*(_potentialProducers.begin())).second->getTypeOfChannel();
74 }
75
76 void CollectorSwOutPort::getAllRepresented(std::set<OutPort *>& represented) const
77 {
78   map<int, OutPort *>::const_iterator pt;
79   for(pt=_potentialProducers.begin();pt!=_potentialProducers.end();pt++)
80     ((*pt).second)->getAllRepresented(represented);
81 }
82
83 bool CollectorSwOutPort::addInPort(InPort *inPort) throw(YACS::Exception)
84 {
85   if(_currentProducer)
86     {//a specific link is beeing done
87       bool ret=_currentProducer->addInPort(inPort);
88       _currentProducer=0;
89       return ret;
90     }
91   else//global links asked
92     for(map<int, OutPort *>::iterator iter=_potentialProducers.begin();iter!=_potentialProducers.end();iter++)
93       (*iter).second->addInPort(inPort);
94 }
95
96 int CollectorSwOutPort::removeInPort(InPort *inPort, bool forward) throw(YACS::Exception)
97 {
98   if(_currentProducer)
99     {
100       return _currentProducer->removeInPort(inPort,forward);
101     }
102   else
103     throw Exception("CollectorSwOutputPort::edRemoveInputPort : internal error on link removal.");
104   _currentProducer=0;
105 }
106
107 /*!
108  * \note : 'master' specifies the instance of Switch of which 'this' collects all of these direct 
109  *          or indirect outports going to the same port 'port' (which is out of scope of 'master').
110  */
111 CollectorSwOutPort::CollectorSwOutPort(Switch *master, InPort *port):OutPort("",master,port->edGetType()),
112                                                                      DataPort("",master,port->edGetType()),
113                                                                      Port(master),
114                                                                      _consumer(port),_currentProducer(0)
115 {
116   _name="Representant_of_"; _name+=master->getName(); _name+="_for_inport_"; _name+=master->getRootNode()->getInPortName(_consumer);
117 }
118
119 CollectorSwOutPort::CollectorSwOutPort(const CollectorSwOutPort& other, Switch *master):OutPort("",master,other.edGetType()),
120                                                                                         DataPort("",master,other.edGetType()),
121                                                                                         Port(master),
122                                                                                         _consumer(0),_currentProducer(0)
123 {
124   _name=other._name;
125   Switch *othSw=(Switch *)other._node;
126   for(map<int, OutPort *>::const_iterator iter=other._potentialProducers.begin();iter!=other._potentialProducers.end();iter++)
127     {
128       string name=othSw->getOutPortName((*iter).second);
129       _potentialProducers[(*iter).first]=master->getOutPort(name);
130     }
131 }
132
133 void CollectorSwOutPort::addPotentialProducerForMaster(OutPort *port)
134 {
135   int i=((Switch *)_node)->getRankOfNode(port->getNode());
136   map<int, OutPort *>::iterator pt=_potentialProducers.find(i);
137   if(pt==_potentialProducers.end())
138     {
139       _potentialProducers[i]=port;
140       _currentProducer=port;
141     }
142   else
143     {
144       _currentProducer=(*pt).second;
145       if(_currentProducer!=port)
146         {
147           string what("CollectorSwOutPort::addPotentialProducerForMaster : In switch node "); what+=_node->getName();
148           what+=" for input named \'"; what+=_consumer->getName(); what+="\' the output "; what+=_currentProducer->getName();
149           what+=" already got out for case of label "; 
150           what+=Switch::getRepresentationOfCase((*pt).first); 
151           throw Exception(what);
152         }
153     }
154   _className=port->getNameOfTypeOfCurrentInstance();
155 }
156
157 bool CollectorSwOutPort::removePotentialProducerForMaster()
158 {
159   int i;
160   map<int, OutPort *>::iterator result;
161   for(result=_potentialProducers.begin();result!=_potentialProducers.end();result++)
162     if((*result).second==_currentProducer)
163       {
164         i=(*result).first;
165         break;
166       }
167   if(result==_potentialProducers.end())
168     {
169       ostringstream stream; stream << "CollectorSwOutPort::removePotentialProducerForMaster : link from the branch whith id ";
170       stream << i << " not defined";
171       throw Exception(stream.str());
172     }
173   if((*result).second!=_currentProducer)
174     {
175       ostringstream stream; stream << "CollectorSwOutPort::removePotentialProducerForMaster : link from the branch whith id ";
176       stream << i << " defined but the output specified is not compatible";
177       throw Exception(stream.str());
178     }
179   _potentialProducers.erase(result);
180   return _potentialProducers.empty();
181 }
182
183 bool CollectorSwOutPort::checkManagementOfPort(OutPort *port) throw(YACS::Exception)
184 {
185   for(map<int, OutPort *>::iterator iter=_potentialProducers.begin();iter!=_potentialProducers.end();iter++)
186     if((*iter).second==port)
187       {
188         _currentProducer=port;
189         return _potentialProducers.size()==1;
190       }
191   throw Exception("CollectorSwOutPort::checkManagementOfPort : unexported port");
192 }
193
194 /*!
195  * Called by Switch::checkCFLinks.
196  */
197 void CollectorSwOutPort::checkConsistency(LinkInfo& info) const
198 {
199   if(((Switch *)_node)->getNbOfCases()!=_potentialProducers.size())
200     info.pushErrSwitch((CollectorSwOutPort *)this);
201   for(map<int, OutPort *>::const_iterator iter=_potentialProducers.begin();iter!=_potentialProducers.end();iter++)
202     (*iter).second->checkConsistency(info);
203 }
204
205 /*!
206  * Called by LinkInfo::getErrRepr to have a comprehensible message on throw.
207  * When called, typically checkCompletenessOfCases has detected that some potential producers were laking...
208  */
209 void CollectorSwOutPort::getHumanReprOfIncompleteCases(std::ostream& stream) const
210 {
211   set<int> lackingCases;
212   for(map< int ,Node * >::const_iterator iter=((Switch *)_node)->_mapOfNode.begin();iter!=((Switch *)_node)->_mapOfNode.end();iter++)
213     {
214       if(_potentialProducers.find((*iter).first)==_potentialProducers.end())
215         lackingCases.insert((*iter).first);
216     }
217   ostringstream streamForExc;
218   stream << "For link to " <<  _consumer->getName() << " of node " << _consumer->getNode()->getName() 
219          << " the cases of switch node named " << _node->getName() 
220          << " do not define links for following cases ids :";
221   for(set<int>::iterator iter=lackingCases.begin();iter!=lackingCases.end();iter++)
222       stream << Switch::getRepresentationOfCase(*iter) << " ";
223   stream << endl;
224 }
225
226 FakeNodeForSwitch::FakeNodeForSwitch(Switch *sw, bool normalFinish, bool internalError):ElementaryNode("thisIsAFakeNode"),
227                                                                                         _sw(sw),
228                                                                                         _normalFinish(normalFinish),
229                                                                                         _internalError(internalError)
230 {
231   _state=YACS::TOACTIVATE;
232   _father=_sw->getFather();
233 }
234
235 FakeNodeForSwitch::FakeNodeForSwitch(const FakeNodeForSwitch& other):ElementaryNode(other),_sw(0),
236                                                                      _normalFinish(false),
237                                                                      _internalError(true)
238 {
239 }
240
241 Node *FakeNodeForSwitch::simpleClone(ComposedNode *father, bool editionOnly) const
242 {
243   return new FakeNodeForSwitch(*this);
244 }
245
246 void FakeNodeForSwitch::exForwardFailed()
247 {
248   _sw->exForwardFailed();
249 }
250
251 void FakeNodeForSwitch::exForwardFinished()
252
253   _sw->exForwardFinished(); 
254 }
255
256 void FakeNodeForSwitch::execute()
257 {
258   if(!_normalFinish)
259     throw Exception("");//only to trigger ABORT on Executor
260 }
261
262 void FakeNodeForSwitch::aborted()
263 {
264   if(_internalError)
265     _sw->_state!=YACS::INTERNALERR;
266   else
267     _sw->setState(YACS::ERROR);
268 }
269
270 void FakeNodeForSwitch::finished()
271 {
272   _sw->setState(YACS::DONE);
273 }
274
275 /*! \class YACS::ENGINE::Switch
276  *  \brief Control node that emulates the C switch
277  *
278  *  \ingroup Nodes
279  */
280
281 Switch::Switch(const Switch& other, ComposedNode *father, bool editionOnly):StaticDefinedComposedNode(other,father),_condition(other._condition,this),
282                                                                             _undispatchableNotificationNode(0)
283 {
284   for(map<int,Node *>::const_iterator iter=other._mapOfNode.begin();iter!=other._mapOfNode.end();iter++)
285     _mapOfNode[(*iter).first]=(*iter).second->clone(this,editionOnly);
286   if(!editionOnly)
287     for(map<InPort *, CollectorSwOutPort * >::const_iterator iter2=other._outPortsCollector.begin();iter2!=other._outPortsCollector.end();iter2++)
288       {
289         CollectorSwOutPort *newCol=new CollectorSwOutPort(*((*iter2).second),this);
290         _alreadyExistingCollectors.push_back(newCol);
291       }
292 }
293
294 Switch::Switch(const std::string& name):StaticDefinedComposedNode(name),_condition(SELECTOR_INPUTPORT_NAME,this,Runtime::_tc_int),_undispatchableNotificationNode(0)
295 {
296 }
297
298 Switch::~Switch()
299 {
300   if(_undispatchableNotificationNode)delete _undispatchableNotificationNode;
301
302   for(map< int , Node * >::iterator iter=_mapOfNode.begin();iter!=_mapOfNode.end();iter++)
303     delete (*iter).second;
304   for(map<InPort *, CollectorSwOutPort * >::iterator iter2=_outPortsCollector.begin();iter2!=_outPortsCollector.end();iter2++)
305     delete (*iter2).second;
306   for(vector<CollectorSwOutPort *>::iterator iter3=_alreadyExistingCollectors.begin();iter3!=_alreadyExistingCollectors.end();iter3++)
307     delete (*iter3);
308 }
309
310 Node *Switch::simpleClone(ComposedNode *father, bool editionOnly) const
311 {
312   return new Switch(*this,father,editionOnly);
313 }
314
315 void Switch::exUpdateState()
316 {
317   DEBTRACE("Switch::exUpdateState " << _state);
318   if(_state == YACS::DISABLED)
319     return;
320   if(_inGate.exIsReady())
321     {
322       setState(YACS::ACTIVATED);
323       if(_condition.isEmpty())
324         _undispatchableNotificationNode=new FakeNodeForSwitch(this,false,true);
325       else
326         {
327           map< int , Node * >::iterator iter=_mapOfNode.find(_condition.getIntValue());
328           if(iter==_mapOfNode.end())
329             {
330               iter=_mapOfNode.find(ID_FOR_DEFAULT_NODE);
331               if(iter==_mapOfNode.end())
332                 {
333                   bool normalFinish=getAllOutPortsLeavingCurrentScope().empty();
334                   delete _undispatchableNotificationNode;
335                   _undispatchableNotificationNode=new FakeNodeForSwitch(this,normalFinish);
336                 }
337               else
338                 ((*iter).second)->exUpdateState();
339             }
340           else
341             ((*iter).second)->exUpdateState();
342         }
343     }
344 }
345
346 void Switch::init(bool start)
347 {
348   DEBTRACE("Switch::init " << start);
349   StaticDefinedComposedNode::init(start);
350   int i=0;
351   for(map< int , Node * >::iterator iter=_mapOfNode.begin();iter!=_mapOfNode.end();iter++, i++)
352     {
353       if(!(*iter).second)
354         {
355           ostringstream stream;
356           stream << "Switch::init : initialization failed due to unitialized branch of id " << (*iter).first;
357           throw Exception(stream.str());
358         }
359       ((*iter).second)->init(start);
360     }
361 }
362
363 void Switch::getReadyTasks(std::vector<Task *>& tasks)
364 {
365   /*
366    * To change the way ComposedNode state is handled, uncomment the following line
367    * see Bloc::getReadyTasks
368    */
369   if(_state==YACS::TOACTIVATE) setState(YACS::ACTIVATED);
370   if(_state==YACS::TOACTIVATE || _state==YACS::ACTIVATED)
371     {
372       map< int , Node * >::iterator iter=_mapOfNode.find(_condition.getIntValue());
373       if(iter!=_mapOfNode.end())
374         ((*iter).second)->getReadyTasks(tasks);
375       else
376         {
377           iter=_mapOfNode.find(ID_FOR_DEFAULT_NODE);
378           if(iter!=_mapOfNode.end())
379             (*iter).second->getReadyTasks(tasks);//Default Node is returned
380           else
381             if(_undispatchableNotificationNode)
382               _undispatchableNotificationNode->getReadyTasks(tasks);
383             else
384               throw Exception("Switch::getReadyTasks : internal error");
385         }
386     }
387 }
388
389 void Switch::selectRunnableTasks(std::vector<Task *>& tasks)
390 {
391 }
392
393 list<Node *> Switch::edGetDirectDescendants() const
394 {
395   list<Node *> ret;
396   for(map< int , Node * >::const_iterator iter=_mapOfNode.begin();iter!=_mapOfNode.end();iter++)
397     if((*iter).second)
398       ret.push_back((*iter).second);
399   return ret;
400 }
401
402 int Switch::getNumberOfInputPorts() const
403
404   return StaticDefinedComposedNode::getNumberOfInputPorts()+1;
405 }
406
407 void Switch::edRemoveChild(Node *node) throw(YACS::Exception)
408 {
409   map< int , Node * >::iterator iter=_mapOfNode.begin();
410   for(;iter!=_mapOfNode.end();iter++)
411     if(node==(*iter).second)
412       {
413         edReleaseCase((*iter).first);
414         return;
415       }
416   ostringstream what; what << "Switch::edRemoveChild : node with name " << node->getName() << " is not a direct child of Switch node " << _name; 
417   throw Exception(what.str());
418 }
419
420 std::list<InputPort *> Switch::getSetOfInputPort() const
421 {
422   list<InputPort *> ret=StaticDefinedComposedNode::getSetOfInputPort();
423   ret.push_back((InputPort *)&_condition);
424   return ret;
425 }
426
427
428 std::list<InputPort *> Switch::getLocalInputPorts() const
429 {
430   list<InputPort *> ret=StaticDefinedComposedNode::getLocalInputPorts();
431   ret.push_back((InputPort *)&_condition);
432   return ret;
433 }
434 OutPort *Switch::getOutPort(const std::string& name) const throw(YACS::Exception)
435 {
436   for(map<InPort *, CollectorSwOutPort * >::const_iterator iter=_outPortsCollector.begin();iter!=_outPortsCollector.end();iter++)
437     if(name==(*iter).second->getName())
438       return (*iter).second;
439   for(vector<CollectorSwOutPort *>::const_iterator iter2=_alreadyExistingCollectors.begin();iter2!=_alreadyExistingCollectors.end();iter2++)
440     if(name==(*iter2)->getName())
441       return *iter2;
442   return StaticDefinedComposedNode::getOutPort(name);
443 }
444
445 InputPort *Switch::getInputPort(const std::string& name) const throw(YACS::Exception)
446 {
447   if(name==SELECTOR_INPUTPORT_NAME)
448     return (InputPort *)&_condition;
449   return StaticDefinedComposedNode::getInputPort(name);
450 }
451
452 Node *Switch::getChildByShortName(const std::string& name) const throw(YACS::Exception)
453 {
454   if(name==DEFAULT_NODE_NAME)
455     {
456       map< int , Node * >::const_iterator iter=_mapOfNode.find(ID_FOR_DEFAULT_NODE);
457       if(iter!=_mapOfNode.end())
458         return (Node *)((*iter).second);
459       else
460         {
461           string what("Switch::getChildByShortName : no default node defined for switch of name "); what+=getName();
462           throw Exception(what);
463         }
464     }
465   for(map< int , Node * >::const_iterator iter=_mapOfNode.begin();iter!=_mapOfNode.end();iter++)
466     {
467       if(name==((*iter).second)->getQualifiedName())
468         return (*iter).second;
469     }
470   string what("node "); what+= name ; what+=" is not a child of node switch "; what += getName();
471   throw Exception(what);
472 }
473
474 Node *Switch::edSetDefaultNode(Node *node)
475 {
476   return edSetNode(ID_FOR_DEFAULT_NODE,node);
477 }
478
479 Node *Switch::edReleaseDefaultNode() throw(YACS::Exception)
480 {
481   return edReleaseCase(ID_FOR_DEFAULT_NODE);
482 }
483
484 Node *Switch::edReleaseCase(int caseId) throw(YACS::Exception)
485 {
486   map< int , Node * >::iterator iter=_mapOfNode.find(caseId);
487   if(iter==_mapOfNode.end())
488     { 
489       string what("Switch::edReleaseCase : the case # "); what+=getRepresentationOfCase(caseId);  what+=" is not set yet.";
490       throw Exception(what);
491     }
492   else
493     {
494       Node *ret=(*iter).second;
495       StaticDefinedComposedNode::edRemoveChild(ret);
496       _mapOfNode.erase(iter);
497       modified();
498       return ret;
499     }
500 }
501
502 Node *Switch::edGetNode(int caseId)
503 {
504   if (!_mapOfNode.count(caseId)) return 0;
505   return _mapOfNode[caseId];
506 }
507
508
509 /*!
510  * \param caseId : the case ID chosen to place 'node'
511  * \param node   : the node for the specified 'caseId'
512  * \return : If an old node with id equal to 'caseId' exists before, this old node is returned so that to be deallocated.
513  *           0 is returned if caseId is a new ID.
514  *  \b WARNING : 'node' is held by 'this' after call, whereas returned node is no more held. 
515  */
516 Node *Switch::edSetNode(int caseId, Node *node) throw(YACS::Exception)
517 {
518   if(!node)
519     throw Exception("Switch::edSetNode : null node cannot be set as a case in switch node");
520   if(node->_father!=0)
521     throw Exception("Switch::edSetNode : node already held by another father");
522   checkNoCrossHierachyWith(node);
523   node->_father=this;
524   map< int , Node * >::iterator iter=_mapOfNode.find(caseId);
525   if(iter==_mapOfNode.end())
526     {
527       _mapOfNode[caseId]=node;
528       modified();
529       return 0;
530     }
531   else
532     {
533       if(node!=(*iter).second)
534         {
535           Node *ret=(*iter).second;
536           (*iter).second=node;
537           modified();
538           return ret;
539         }
540     }
541 }
542
543 //! Change the case of a node
544 /*!
545  *  \param oldCase : the case value to change
546  *  \param newCase : the new value to set
547  *  raise an exception if the old case does not exist or if the new case already exists
548  */
549 void Switch::edChangeCase(int oldCase, int newCase)
550 {
551   std::map< int , Node * >::iterator iter=_mapOfNode.find(oldCase);
552   if(iter==_mapOfNode.end())
553     {
554       //the case does not exists
555       throw Exception("Switch::edChangeCase : case does not exist");
556     }
557   iter=_mapOfNode.find(newCase);
558   if(iter != _mapOfNode.end())
559     {
560       //the new case exists
561       throw Exception("Switch::edChangeCase : new case exists");
562     }
563   Node* node=_mapOfNode[oldCase];
564   _mapOfNode.erase(oldCase);
565   _mapOfNode[newCase]=node;
566   modified();
567 }
568
569 int Switch::getMaxCase()
570 {
571   int aCase = 0;
572   map<int, Node*>::const_iterator it = _mapOfNode.begin();
573   for(; it != _mapOfNode.end(); ++it)
574     if ((*it).first > aCase)
575       aCase = (*it).first;
576   return aCase;
577 }
578
579 bool Switch::edAddChild(Node *node) throw(YACS::Exception)
580 {
581   int aCase = getMaxCase() + 1;
582   DEBTRACE(aCase);
583   bool ret = edSetNode(aCase, node);
584   DEBTRACE(ret);
585   return ret;
586 }
587
588 YACS::Event Switch::updateStateOnFinishedEventFrom(Node *node)
589 {
590   setState(YACS::DONE);
591   return YACS::FINISH;//notify to father node that 'this' has becomed finished.
592 }
593
594 std::set<InPort *> Switch::getAllInPortsComingFromOutsideOfCurrentScope() const
595 {
596   set<InPort *> ret=StaticDefinedComposedNode::getAllInPortsComingFromOutsideOfCurrentScope();
597   set<OutPort *> temp2=_condition.edSetOutPort();
598   for(set<OutPort *>::iterator iter3=temp2.begin();iter3!=temp2.end();iter3++)
599     if(!isInMyDescendance((*iter3)->getNode()))
600       {
601         ret.insert((InPort *)&_condition);
602         break;
603       }
604   return ret;
605 }
606
607 void Switch::checkCFLinks(const std::list<OutPort *>& starts, InputPort *end, unsigned char& alreadyFed, bool direction, LinkInfo& info) const
608 {
609   map<InPort *, CollectorSwOutPort * >::const_iterator iter=_outPortsCollector.find(end);
610   if(iter!=_outPortsCollector.end())
611     {
612       set<OutPort *> represented;
613       (*iter).second->getAllRepresented(represented);
614       list<OutPort *> others;
615       for(list<OutPort *>::const_iterator iter2=starts.begin();iter2!=starts.end();iter2++)
616         if(represented.find(*iter2)==represented.end())
617           others.push_back(*iter2);
618       if(others.empty())
619         alreadyFed=FED_ST;
620       else
621         StaticDefinedComposedNode::checkCFLinks(others,end,alreadyFed,direction,info);//should never happend;
622     }
623   else
624     StaticDefinedComposedNode::checkCFLinks(starts,end,alreadyFed,direction,info);
625 }
626
627 void Switch::checkControlDependancy(OutPort *start, InPort *end, bool cross,
628                                     std::map < ComposedNode *,  std::list < OutPort * > >& fw,
629                                     std::vector<OutPort *>& fwCross,
630                                     std::map< ComposedNode *, std::list < OutPort *> >& bw,
631                                     LinkInfo& info) const
632 {
633   throw Exception("Switch::checkControlDependancy : a link was dectected between 2 cases of a switch. Impossible !");
634 }
635
636 void Switch::checkNoCyclePassingThrough(Node *node) throw(YACS::Exception)
637 {
638   throw Exception("Switch::checkNoCyclePassingThrough : uncorrect control flow link relative to switch");
639 }
640
641 void Switch::checkLinkPossibility(OutPort *start, const std::list<ComposedNode *>& pointsOfViewStart,
642                                   InPort *end, const std::list<ComposedNode *>& pointsOfViewEnd) throw(YACS::Exception)
643 {
644   throw Exception("Switch::checkLinkPossibility : A link between 2 different cases of a same Switch requested -> Impossible");
645 }
646
647 void Switch::buildDelegateOf(std::pair<OutPort *, OutPort *>& port, InPort *finalTarget, const std::list<ComposedNode *>& pointsOfView)
648 {
649   map<InPort *, CollectorSwOutPort * >::iterator result=_outPortsCollector.find(finalTarget);
650   CollectorSwOutPort *newCollector;
651   if(result!=_outPortsCollector.end())
652     newCollector=(*result).second;
653   else
654     {
655       newCollector=new CollectorSwOutPort(this,finalTarget);
656       newCollector->edSetType((port.first)->edGetType());
657       _outPortsCollector[finalTarget]=newCollector;
658     }
659   newCollector->addPotentialProducerForMaster(port.first);
660   port.second=newCollector;
661   port.first=newCollector;
662 }
663
664 void Switch::getDelegateOf(std::pair<OutPort *, OutPort *>& port, InPort *finalTarget, const std::list<ComposedNode *>& pointsOfView) throw(YACS::Exception)
665 {
666   map<InPort *, CollectorSwOutPort * >::iterator iter=_outPortsCollector.find(finalTarget);
667   if(iter==_outPortsCollector.end())
668     {
669       string what("Switch::getDelegateOf : not exported OuputPort with name "); what+=(port.first)->getName(); what+=" for target inport of name ";
670       what+=finalTarget->getName();
671       throw Exception(what);
672     }
673   ((*iter).second)->checkManagementOfPort(port.first);
674   port.second=(*iter).second;
675   port.first=(*iter).second;
676 }
677
678 void Switch::releaseDelegateOf(OutPort *portDwn, OutPort *portUp, InPort *finalTarget, const std::list<ComposedNode *>& pointsOfView) throw(YACS::Exception)
679 {
680   set<OutPort *> repr;
681   portDwn->getAllRepresented(repr);
682   if(repr.size()==1)
683     {
684       CollectorSwOutPort *portCasted=dynamic_cast<CollectorSwOutPort *>(portUp);
685       if(portCasted->removePotentialProducerForMaster())//normally always true
686         {
687           delete portCasted;
688           _outPortsCollector.erase(finalTarget);
689         }
690     }
691 }
692
693 int Switch::getNbOfCases() const
694 {
695   return _mapOfNode.size();
696 }
697
698 int Switch::getRankOfNode(Node *node) const
699 {
700   Node *directSon=isInMyDescendance(node);
701   for(map< int , Node * >::const_iterator iter=_mapOfNode.begin();iter!=_mapOfNode.end();iter++)
702     if((*iter).second==directSon)
703       return (*iter).first;
704   throw Exception("Switch::getRankOfNode : node not in switch");
705 }
706
707 string Switch::getRepresentationOfCase(int i)
708 {
709   if(i!=ID_FOR_DEFAULT_NODE)
710     {
711       ostringstream stream;
712       stream << i;
713       return stream.str();
714     }
715   else
716     return DEFAULT_NODE_NAME;
717 }
718
719 //! Return the effective state of a node in the context of this switch (its father)
720 /*!
721  * \param node: the node which effective state is queried
722  * \return the effective node state
723  */
724 YACS::StatesForNode Switch::getEffectiveState(const Node* node) const
725 {
726   YACS::StatesForNode effectiveState=Node::getEffectiveState();
727   if(effectiveState==YACS::READY)
728     return YACS::READY;
729   if(effectiveState==YACS::TOACTIVATE)
730     return YACS::READY;
731   if(effectiveState==YACS::DISABLED)
732     return YACS::DISABLED;
733
734   return node->getState();
735 }
736 YACS::StatesForNode Switch::getEffectiveState() const
737 {
738   return Node::getEffectiveState();
739 }
740
741 void Switch::writeDot(std::ostream &os) const
742 {
743   os << "  subgraph cluster_" << getId() << "  {\n" ;
744   for(map<int,Node*>::const_iterator iter=_mapOfNode.begin();iter!=_mapOfNode.end();iter++)
745     {
746       Node* n=(*iter).second;
747       n->writeDot(os);
748       os << getId() << " -> " << n->getId() << ";\n";
749     }
750   os << "}\n" ;
751   os << getId() << "[fillcolor=\"" ;
752   YACS::StatesForNode state=Node::getEffectiveState();
753   os << getColorState(state);
754   os << "\" label=\"" << "Switch:" ;
755   os << getQualifiedName() <<"\"];\n";
756 }
757
758 std::string Switch::getMyQualifiedName(const Node *directSon) const
759 {
760   string id=getCaseId(directSon);
761   id+=directSon->getName();
762   return id;
763 }
764
765 std::string Switch::getCaseId(const Node *node) const throw(YACS::Exception)
766 {
767   const char sep='_';
768   map<int, Node*>::const_iterator iter;
769   for (iter = _mapOfNode.begin(); iter != _mapOfNode.end(); iter++)
770       if (iter->second == node)
771         {
772           stringstream a;
773           if (iter->first == Switch::ID_FOR_DEFAULT_NODE)
774             a << DEFAULT_NODE_NAME << sep;
775           else if (iter->first <0)
776             a << "m" << -iter->first << sep;
777           else a  << "p" << iter->first << sep; 
778           return a.str();
779         }
780   string what("node "); what+= node->getName() ; what+=" is not a child of node "; what += getName();
781   throw Exception(what);  
782 }
783
784 void Switch::accept(Visitor *visitor)
785 {
786   visitor->visitSwitch(this);
787 }