Salome HOME
Merge with OCC_development_01
[modules/superv.git] / src / GraphExecutor / DataFlowExecutor_FiniteStateMachine.cxx
1 //  SUPERV GraphExecutor : contains classes that permit execution of graphs and particularly the execution automaton
2 //
3 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
5 // 
6 //  This library is free software; you can redistribute it and/or 
7 //  modify it under the terms of the GNU Lesser General Public 
8 //  License as published by the Free Software Foundation; either 
9 //  version 2.1 of the License. 
10 // 
11 //  This library is distributed in the hope that it will be useful, 
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of 
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
14 //  Lesser General Public License for more details. 
15 // 
16 //  You should have received a copy of the GNU Lesser General Public 
17 //  License along with this library; if not, write to the Free Software 
18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
19 // 
20 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
21 //
22 //
23 //
24 //  File   : DataFlowBase_FiniteStateMachine.cxx
25 //  Author : Jean Rahuel, CEA
26 //  Module : SUPERV
27 //  $Header:
28
29 using namespace std;
30 #include <stdlib.h>
31 #include <iostream>
32 #include <unistd.h>
33 #include <stdio.h>
34
35 #include "DataFlowExecutor_FiniteStateMachine.hxx"
36
37 void * start_function( void *p ) ;
38
39 // ControlStates :
40 #define VoidState           SUPERV::VoidState
41 #define ToSuspendStartState SUPERV::ToSuspendStartState
42 #define ToSuspendState      SUPERV::ToSuspendState
43 #define ToSuspendDoneState  SUPERV::ToSuspendDoneState
44 #define ToKillState         SUPERV::ToKillState
45 #define ToKillDoneState     SUPERV::ToKillDoneState
46 #define ToStopState         SUPERV::ToStopState
47
48 #if 0
49 // States :
50 #define UnKnownState            GraphExecutor::UnKnownState
51 #define DataUndefState            GraphExecutor::DataUndefState
52 #define DataWaitingState          GraphExecutor::DataWaitingState
53 #define DataReadyState          GraphExecutor::DataReadyState
54 #define SuspendedReadyState     GraphExecutor::SuspendedReadyState
55 #define SuspendedReadyToResumeState GraphExecutor::SuspendedReadyToResumeState
56 #define ResumedReadyState       GraphExecutor::ResumedReadyState
57 #define KilledReadyState        GraphExecutor::KilledReadyState
58 #define StoppedReadyState       GraphExecutor::StoppedReadyState
59 #define ExecutingState            GraphExecutor::ExecutingState
60 #define SuspendedExecutingState   GraphExecutor::SuspendedExecutingState
61 #define ResumedExecutingState     GraphExecutor::ResumedExecutingState
62 #define KilledExecutingState      GraphExecutor::KilledExecutingState
63 #define StoppedExecutingState     GraphExecutor::StoppedExecutingState
64 #define SuccessedExecutingState   GraphExecutor::SuccessedExecutingState
65 #define ErroredExecutingState     GraphExecutor::ErroredExecutingState
66 #define SuspendedSuccessedState GraphExecutor::SuspendedSuccessedState
67 #define SuspendedErroredState   GraphExecutor::SuspendedErroredState
68 #define SuspendedSuccessedToReStartState GraphExecutor::SuspendedSuccessedToReStartState
69 #define SuspendedErroredToReStartState   GraphExecutor::SuspendedErroredToReStartState
70 #define ResumedSuccessedState   GraphExecutor::ResumedSuccessedState
71 #define ResumedErroredState     GraphExecutor::ResumedErroredState
72 #define KilledSuccessedState    GraphExecutor::KilledSuccessedState
73 #define KilledErroredState      GraphExecutor::KilledErroredState
74 #define StoppedSuccessedState   GraphExecutor::StoppedSuccessedState
75 #define StoppedErroredState     GraphExecutor::StoppedErroredState
76 #define SuccessedState          GraphExecutor::SuccessedState
77 #define ErroredState            GraphExecutor::ErroredState
78 #define SuspendedState          GraphExecutor::SuspendedState
79 #define KilledState             GraphExecutor::KilledState
80 #define StoppedState            GraphExecutor::StoppedState
81 #define ReRunnedState             GraphExecutor::ReRunnedState
82 #define ReStartedState            GraphExecutor::ReStartedState
83 #define NumberOfAutomatonStates        GraphExecutor::NumberOfAutomatonStates
84 #endif
85
86 // Events :
87 #define UndefinedEvent        GraphExecutor::UndefinedEvent
88 #define NewThreadEvent        GraphExecutor::NewThreadEvent
89 #define SuspendEvent            GraphExecutor::SuspendEvent
90 #define ToResumeEvent           GraphExecutor::ToResumeEvent
91 #define ResumeEvent             GraphExecutor::ResumeEvent
92 #define KillEvent               GraphExecutor::KillEvent
93 #define StopEvent               GraphExecutor::StopEvent
94 #define ExecuteEvent            GraphExecutor::ExecuteEvent
95 #define SuccessEvent            GraphExecutor::SuccessEvent
96 #define ErrorEvent              GraphExecutor::ErrorEvent
97 #define ReStartEvent            GraphExecutor::ReStartEvent
98 #define ReStartAndSuspendEvent  GraphExecutor::ReStartAndSuspendEvent
99 #define NoDataReadyEvent      GraphExecutor::NoDataReadyEvent
100 #define SomeDataReadyEvent    GraphExecutor::SomeDataReadyEvent
101 #define NotAllDataReadyEvent  GraphExecutor::NotAllDataReadyEvent
102 #define AllDataReadyEvent     GraphExecutor::AllDataReadyEvent
103 #define ReadyEvent              GraphExecutor::ReadyEvent
104 #define SuspendedReadyEvent     GraphExecutor::SuspendedReadyEvent
105 #define ResumedReadyEvent       GraphExecutor::ResumedReadyEvent
106 #define KilledReadyEvent        GraphExecutor::KilledReadyEvent
107 #define StoppedReadyEvent       GraphExecutor::StoppedReadyEvent
108 #define ExecutingEvent            GraphExecutor::ExecutingEvent
109 #define SuspendedExecutingEvent   GraphExecutor::SuspendedExecutingEvent
110 #define ResumedExecutingEvent     GraphExecutor::ResumedExecutingEvent
111 #define KilledExecutingEvent      GraphExecutor::KilledExecutingEvent
112 #define StoppedExecutingEvent     GraphExecutor::StoppedExecutingEvent
113 #define SuccessedExecutingEvent GraphExecutor::SuccessedExecutingEvent
114 #define ErroredExecutingEvent   GraphExecutor::ErroredExecutingEvent
115 #define SuspendedSuccessedEvent   GraphExecutor::SuspendedSuccessedEvent
116 #define SuspendedErroredEvent     GraphExecutor::SuspendedErroredEvent
117 #define ResumedSuccessedEvent     GraphExecutor::ResumedSuccessedEvent
118 #define ResumedErroredEvent       GraphExecutor::ResumedErroredEvent
119 #define KilledEvent               GraphExecutor::KilledEvent
120 #define StoppedEvent              GraphExecutor::StoppedEvent
121 #define ToReStartEvent              GraphExecutor::ToReStartEvent
122 #define ReStartedEvent              GraphExecutor::ReStartedEvent
123 #define ReStartedAndSuspendEvent    GraphExecutor::ReStartedAndSuspendEvent
124 #define EndExecuteEvent           GraphExecutor::EndExecuteEvent
125 #define NumberOfEvents            GraphExecutor::NumberOfEvents
126
127 GraphExecutor::FiniteStateMachine::FiniteStateMachine() {
128 //  cdebug_in << "FiniteStateMachine::FiniteStateMachine" << endl;
129
130   _ControlStateName[ VoidState ]          = "VoidState" ;
131   _ControlStateName[ ToSuspendStartState ]= "ToSuspendStartState" ;
132   _ControlStateName[ ToSuspendState ]     = "ToSuspendState" ;
133   _ControlStateName[ ToSuspendDoneState ] = "ToSuspendDoneState" ;
134   _ControlStateName[ ToKillState ]        = "ToKillState" ;
135   _ControlStateName[ ToKillDoneState ]    = "ToKillDoneState" ;
136   _ControlStateName[ ToStopState ]        = "ToStopState" ;
137
138   _StateName[ UnKnownState ]          = "UnKnownState" ;
139   _StateName[ DataUndefState ]            = "DataUndefState" ;
140   _StateName[ DataWaitingState ]          = "DataWaitingState" ;
141   _StateName[ DataReadyState ]            = "DataReadyState" ;
142   _StateName[ SuspendedReadyState ]     = "SuspendedReadyState" ;
143   _StateName[ SuspendedReadyToResumeState ] = "SuspendedReadyToResumeState" ;
144   _StateName[ ResumedReadyState ]       = "ResumedReadyState" ;
145   _StateName[ KilledReadyState ]        = "KilledReadyState" ;
146   _StateName[ StoppedReadyState ]       = "StoppedReadyState" ;
147   _StateName[ ExecutingState ]            = "ExecutingState" ;
148   _StateName[ SuspendedExecutingState ]   = "SuspendedExecutingState" ;
149   _StateName[ ResumedExecutingState ]     = "ResumedExecutingState" ;
150   _StateName[ KilledExecutingState ]      = "KilledExecutingState" ;
151   _StateName[ StoppedExecutingState ]     = "StoppedExecutingState" ;
152   _StateName[ SuccessedExecutingState ]   = "SuccessedExecutingState" ;
153   _StateName[ ErroredExecutingState ]     = "ErroredExecutingState" ;
154   _StateName[ SuspendedSuccessedState ] = "SuspendedSuccessedState" ;
155   _StateName[ SuspendedErroredState ]   = "SuspendedErroredState" ;
156   _StateName[ SuspendedSuccessedToReStartState ] = "SuspendedSuccessedToReStartState" ;
157   _StateName[ SuspendedErroredToReStartState ]   = "SuspendedErroredToReStartState" ;
158   _StateName[ ResumedSuccessedState ]   = "ResumedSuccessedState" ;
159   _StateName[ ResumedErroredState ]     = "ResumedErroredState" ;
160   _StateName[ KilledSuccessedState ]    = "KilledSuccessedState" ;
161   _StateName[ KilledErroredState ]      = "KilledErroredState" ;
162   _StateName[ StoppedSuccessedState ]   = "StoppedSuccessedState" ;
163   _StateName[ StoppedErroredState ]     = "StoppedErroredState" ;
164   _StateName[ SuccessedState ]          = "SuccessedState" ;
165   _StateName[ ErroredState ]            = "ErroredState" ;
166   _StateName[ SuspendedState ]          = "SuspendedState" ;
167   _StateName[ KilledState ]             = "KilledState" ;
168   _StateName[ StoppedState ]            = "StoppedState" ;
169   _StateName[ ReRunnedState ]             = "ReRunnedState" ;
170   _StateName[ ReStartedState ]            = "ReStartedState" ;
171
172   _EventName[ UndefinedEvent ]          = "UndefinedEvent" ;
173   _EventName[ NewThreadEvent ]          = "NewThreadEvent" ;
174   _EventName[ SuspendEvent ]              = "SuspendEvent" ;
175   _EventName[ ToResumeEvent ]             = "ToResumeEvent" ;
176   _EventName[ ResumeEvent ]               = "ResumeEvent" ;
177   _EventName[ KillEvent ]                 = "KillEvent" ;
178   _EventName[ StopEvent ]                 = "StopEvent" ;
179   _EventName[ ExecuteEvent ]              = "ExecuteEvent" ;
180   _EventName[ SuccessEvent ]              = "SuccessEvent" ;
181   _EventName[ ErrorEvent ]                = "ErrorEvent" ;
182   _EventName[ ToReStartEvent ]            = "ToReStartEvent" ;
183   _EventName[ ReStartEvent ]              = "ReStartEvent" ;
184   _EventName[ ReStartAndSuspendEvent ]    = "ReStartAndSuspendEvent" ;
185   _EventName[ NoDataReadyEvent ]        = "NoDataReadyEvent" ;
186   _EventName[ SomeDataReadyEvent ]      = "SomeDataReadyEvent" ;
187   _EventName[ NotAllDataReadyEvent ]    = "NotAllDataReadyEvent" ;
188   _EventName[ AllDataReadyEvent ]       = "AllDataReadyEvent" ;
189   _EventName[ ReadyEvent ]                = "ReadyEvent" ;
190   _EventName[ SuspendedReadyEvent ]       = "SuspendedReadyEvent" ;
191   _EventName[ ResumedReadyEvent ]         = "ResumedReadyEvent" ;
192   _EventName[ KilledReadyEvent ]          = "KilledReadyEvent" ;
193   _EventName[ StoppedReadyEvent ]         = "StoppedReadyEvent" ;
194   _EventName[ ExecutingEvent ]          = "ExecutingEvent" ;
195   _EventName[ SuspendedExecutingEvent ] = "SuspendedExecutingEvent" ;
196   _EventName[ ResumedExecutingEvent ]   = "ResumedExecutingEvent" ;
197   _EventName[ KilledExecutingEvent ]    = "KilledExecutingEvent" ;
198   _EventName[ StoppedExecutingEvent ]   = "StoppedExecutingEvent" ;
199   _EventName[ SuccessedExecutingEvent ]   = "SuccessedExecutingEvent" ;
200   _EventName[ ErroredExecutingEvent ]     = "ErroredExecutingEvent" ;
201   _EventName[ SuspendedSuccessedEvent ]   = "SuspendedSuccessedEvent" ;
202   _EventName[ SuspendedErroredEvent ]     = "SuspendedErroredEvent" ;
203   _EventName[ ResumedSuccessedEvent ]     = "ResumedSuccessedEvent" ;
204   _EventName[ ResumedErroredEvent ]       = "ResumedErroredEvent" ;
205   _EventName[ KilledEvent ]               = "KilledEvent" ;
206   _EventName[ StoppedEvent ]              = "StoppedEvent" ;
207   _EventName[ ReStartedEvent ]          = "ReStartedEvent" ;
208   _EventName[ ReStartedAndSuspendEvent ]= "ReStartedAndSuspendEvent" ;
209   _EventName[ EndExecuteEvent ]         = "EndExecuteEvent" ;
210
211   _ActionName[ ErrorAction ] = "ErrorAction" ;
212   _ActionName[ VoidAction ] = "VoidAction" ;
213   _ActionName[ executeAction ] = "executeAction" ;
214   _ActionName[ ExecuteAction ] = "ExecuteAction" ;
215   _ActionName[ DataWaiting_SomeDataReadyAction ] = "DataWaiting_SomeDataReadyAction" ;
216   _ActionName[ DataUndef_NotAllDataReadyAction ] = "DataUndef_NotAllDataReadyAction";
217   _ActionName[ DataUndef_AllDataReadyAction ] = "DataUndef_AllDataReadyAction" ;
218
219   _ActionName[ DataReady_SuspendAction ] = "DataReady_SuspendAction" ;
220   _ActionName[ SuspendedReady_ResumeAction ] = "SuspendedReady_ResumeAction" ;
221   _ActionName[ DataReady_KillAction ] = "DataReady_KillAction" ;
222   _ActionName[ DataReady_StopAction ] = "DataReady_StopAction" ;
223
224   _ActionName[ DataReady_ExecuteAction ] = "DataReady_ExecuteAction" ;
225
226   _ActionName[ Executing_SuspendAction ] = "Executing_SuspendAction" ;
227   _ActionName[ SuspendedExecuting_ResumeAction ] = "SuspendedExecuting_ResumeAction" ;
228   _ActionName[ Executing_KillAction ] = "Executing_KillAction" ;
229   _ActionName[ Executing_StopAction ] = "Executing_StopAction" ;
230
231   _ActionName[ Executing_SuccessAction ] = "Executing_SuccessAction" ;
232   _ActionName[ Executing_ErrorAction ] = "Executing_ErrorAction" ;
233   _ActionName[ Successed_SuccessAction ] = "Successed_SuccessAction" ;
234   _ActionName[ Errored_ErrorAction ] = "Errored_ErrorAction" ;
235
236   _ActionName[ Successed_SuspendAction ] = "Successed_SuspendAction" ;
237   _ActionName[ Errored_SuspendAction ] = "Errored_SuspendAction" ;
238   _ActionName[ SuspendedSuccessed_ResumeAction ] = "SuspendedSuccessed_ResumeAction" ;
239   _ActionName[ SuspendedErrored_ResumeAction ] = "SuspendedErrored_ResumeAction" ;
240   _ActionName[ Successed_KillAction ] = "Successed_KillAction" ;
241   _ActionName[ Errored_KillAction ] = "Errored_KillAction" ;
242   _ActionName[ Successed_StopAction ] = "Successed_StopAction" ;
243   _ActionName[ Errored_StopAction ] = "Errored_StopAction" ;
244
245   _ActionName[ SuspendedSuccessed_ReStartAction ] = "SuspendedSuccessed_ReStartAction" ;
246   _ActionName[ SuspendedErrored_ReStartAction ] = "SuspendedErrored_ReStartAction" ;
247   _ActionName[ SuspendedSuccessed_ReStartAndSuspendAction ] = "SuspendedSuccessed_ReStartAndSuspendAction" ;
248   _ActionName[ SuspendedErrored_ReStartAndSuspendAction ] = "SuspendedErrored_ReStartAndSuspendAction" ;
249
250   _GraphStateName[ SUPERV::UndefinedState ] = "UndefinedState" ;
251   _GraphStateName[ SUPERV::NoState ] = "NoState" ;
252   _GraphStateName[ SUPERV::EditingState ] = "EditingState" ;
253   _GraphStateName[ SUPERV::SuspendState ] = "SuspendState" ;
254   _GraphStateName[ SUPERV::WaitingState ] = "WaitingState" ;
255   _GraphStateName[ SUPERV::ReadyState ] = "ReadyState" ;
256   _GraphStateName[ SUPERV::SuspendReadyState ] = "SuspendReadyState" ;
257   _GraphStateName[ SUPERV::RunningState ] = "RunningState" ;
258   _GraphStateName[ SUPERV::DoneState ] = "DoneState" ;
259   _GraphStateName[ SUPERV::ErrorState ] = "ErrorState" ;
260   _GraphStateName[ SUPERV::SuspendDoneState ] = "SuspendDoneState" ;
261   _GraphStateName[ SUPERV::SuspendErroredState ] = "SuspendErroredState" ;
262   _GraphStateName[ SUPERV::KillState ] = "KillState" ;
263   _GraphStateName[ SUPERV::StopState ] = "StopState" ;
264   _GraphStateName[ SUPERV::ReRunState ] = "ReRunState" ;
265   _GraphStateName[ SUPERV::ReStartState ] = "ReStartState" ;
266
267   int i , j ;
268 // NewStates = _TransitionTable[ States ] [ Events ]
269 // associated action = _ActionTable[ NewStates ] [ Events ]
270   for ( i = 0 ; i < NumberOfAutomatonStates ; i++ ) {
271     for ( j = 0 ; j < NumberOfEvents ; j++ ) {
272 // id est = SameState and VoidAction
273       _TransitionTable[ i ][ j ] = (GraphExecutor::AutomatonState ) i ;
274       _ActionTable[ i ][ j ] = GraphExecutor::ErrorAction ;
275     }
276   }
277 // OneEvent ===> Change of State and associated Action :
278 //               _TransitionTable[ OldState ][ OneEvent ] gives a NewState
279 //               _Action[ NewState ][ OneEvent ] gives what to do
280
281 // INPUT-DATAS :
282 // NoDataReadyEvent :
283   _TransitionTable[ DataUndefState ][ NoDataReadyEvent ] = DataWaitingState ;
284   _ActionTable[ DataWaitingState ][ NoDataReadyEvent ] = VoidAction ;
285 // SomeDataReadyEvent :
286   _TransitionTable[ DataWaitingState ][ SomeDataReadyEvent ] = DataUndefState ;
287   _ActionTable[ DataUndefState ][ SomeDataReadyEvent ] = DataWaiting_SomeDataReadyAction;
288   _TransitionTable[ DataReadyState ][ SomeDataReadyEvent ] = DataUndefState ;
289   _ActionTable[ DataUndefState ][ SomeDataReadyEvent ] = DataWaiting_SomeDataReadyAction;
290 // NotAllDataReadyEvent :
291   _TransitionTable[ DataUndefState ][ NotAllDataReadyEvent ] = DataWaitingState ;
292   _ActionTable[ DataWaitingState ][ NotAllDataReadyEvent ] = DataUndef_NotAllDataReadyAction;
293 // AllDataReadyEvent
294   _TransitionTable[ DataUndefState ][ AllDataReadyEvent ] = DataReadyState ;
295   _ActionTable[ DataReadyState ][ AllDataReadyEvent ] = DataUndef_AllDataReadyAction ;
296
297 // DATAS-READY-CONTROL :
298 // SuspendEvent
299   _TransitionTable[ DataReadyState ][ SuspendEvent ] = SuspendedReadyState ;
300   _ActionTable[ SuspendedReadyState ][ SuspendEvent ] = DataReady_SuspendAction;
301 // ResumeEvent
302   _TransitionTable[ SuspendedReadyState ][ ToResumeEvent ] = SuspendedReadyToResumeState ;
303   _ActionTable[ SuspendedReadyToResumeState ][ ToResumeEvent ] = VoidAction ;
304
305   _TransitionTable[ SuspendedReadyToResumeState ][ ResumeEvent ] = ResumedReadyState ;
306   _ActionTable[ ResumedReadyState ][ ResumeEvent] = SuspendedReady_ResumeAction ;
307 // KillEvent
308   _TransitionTable[ SuspendedReadyState ][ KillEvent ] = KilledReadyState ;
309 // StopEvent
310   _TransitionTable[ SuspendedReadyState ][ StopEvent ] = StoppedReadyState ;
311 // KillEvent
312   _TransitionTable[ DataReadyState ][ KillEvent ] = KilledReadyState ;
313   _ActionTable[ KilledReadyState ][ KillEvent] = DataReady_KillAction ;
314 // StopEvent
315   _TransitionTable[ DataReadyState ][ StopEvent ] = StoppedReadyState ;
316   _ActionTable[ StoppedReadyState ][ StopEvent] = DataReady_StopAction ;
317
318 // RUN :
319 // ExecuteEvent
320   _TransitionTable[ SuspendedReadyToResumeState ][ ExecuteEvent ] = ExecutingState ;
321 // ExecuteEvent
322   _TransitionTable[ ResumedReadyState ][ ExecuteEvent ] = ExecutingState ;
323 // ExecuteEvent
324   _TransitionTable[ DataReadyState ][ ExecuteEvent ] = ExecutingState ;
325 // ExecuteEvent
326   _TransitionTable[ ReStartedState ][ ExecuteEvent ] = ExecutingState ;
327   _ActionTable[ ExecutingState ][ ExecuteEvent ] = DataReady_ExecuteAction;
328
329 // RUN-CONTROL :
330 // SuspendEvent
331   _TransitionTable[ ExecutingState ][ SuspendEvent ] = SuspendedExecutingState ;
332   _ActionTable[ SuspendedExecutingState ][ SuspendEvent ] = Executing_SuspendAction;
333 // ResumeEvent
334   _TransitionTable[ SuspendedExecutingState ][ ResumeEvent ] = ResumedExecutingState ;
335   _ActionTable[ ResumedExecutingState ][ ResumeEvent] = SuspendedExecuting_ResumeAction;
336 // ExecuteEvent
337   _TransitionTable[ ResumedExecutingState ][ ExecuteEvent ] = ExecutingState ;
338 // KillEvent
339   _TransitionTable[ SuspendedExecutingState ][ KillEvent ] = KilledExecutingState ;
340 // StopEvent
341   _TransitionTable[ SuspendedExecutingState ][ StopEvent ] = StoppedExecutingState ;
342 // KillEvent
343   _TransitionTable[ ExecutingState ][ KillEvent ] = KilledExecutingState ;
344   _ActionTable[ KilledExecutingState ][ KillEvent] = Executing_KillAction;
345   _TransitionTable[ KilledExecutingState ][ KillEvent ] = KilledState ;
346   _ActionTable[ KilledState ][ KillEvent] = VoidAction;
347 // StopEvent
348   _TransitionTable[ ExecutingState ][ StopEvent ] = StoppedExecutingState ;
349   _ActionTable[ StoppedExecutingState ][ StopEvent] = Executing_StopAction;
350   _TransitionTable[ StoppedExecutingState ][ StopEvent ] = StoppedState ;
351   _ActionTable[ StoppedState ][ StopEvent] = VoidAction;
352
353 // DONE :
354 // SuccessEvent
355   _TransitionTable[ ExecutingState ][ SuccessEvent ] = SuccessedExecutingState ;
356   _ActionTable[ SuccessedExecutingState ][ SuccessEvent ] = Executing_SuccessAction;
357 // SuspendedExecutingState : NO ResumeEvent 13-03-2003
358   _TransitionTable[ SuspendedExecutingState ][ SuccessEvent ] = SuccessedExecutingState ;
359   _ActionTable[ SuccessedExecutingState ][ SuccessEvent ] = Executing_SuccessAction;
360 // ErrorEvent
361   _TransitionTable[ ExecutingState ][ ErrorEvent ] = ErroredExecutingState ;
362   _ActionTable[ ErroredExecutingState ][ ErrorEvent ] = Executing_ErrorAction;
363 // SuspendedExecutingState : NO ResumeEvent 13-03-2003
364   _TransitionTable[ SuspendedExecutingState ][ ErrorEvent ] = ErroredExecutingState ;
365   _ActionTable[ ErroredExecutingState ][ ErrorEvent ] = Executing_ErrorAction;
366
367 // DONE-CONTROL :
368 // SuccessedExecutingState - SuccessEvent
369   _TransitionTable[ SuccessedExecutingState ][ SuccessEvent ] = SuccessedState ;
370   _ActionTable[ SuccessedState ][ SuccessEvent ] = Successed_SuccessAction ;
371 // ErroredExecutingState - ErrorEvent
372   _TransitionTable[ ErroredExecutingState ][ ErrorEvent ] = ErroredState ;
373   _ActionTable[ ErroredState ][ ErrorEvent ] = Errored_ErrorAction ;
374
375 // SuccessedState - SuspendEvent
376   _TransitionTable[ SuccessedExecutingState ][ SuspendEvent ] = SuspendedSuccessedState ;
377   _ActionTable[ SuspendedSuccessedState ][ SuspendEvent ] = Successed_SuspendAction;
378 // ErroredState - SuspendEvent
379   _TransitionTable[ ErroredExecutingState ][ SuspendEvent ] = SuspendedErroredState ;
380   _ActionTable[ SuspendedErroredState ][ SuspendEvent ] = Errored_SuspendAction;
381
382 // SuccessedState - KillEvent
383   _TransitionTable[ SuccessedExecutingState ][ KillEvent ] = KilledSuccessedState ;
384   _ActionTable[ KilledSuccessedState ][ KillEvent ] = Successed_KillAction;
385 // ErroredState - KillEvent
386   _TransitionTable[ ErroredExecutingState ][ KillEvent ] = KilledErroredState ;
387   _ActionTable[ KilledErroredState ][ KillEvent ] = Errored_KillAction;
388
389 // SuccessedState - StopEvent
390   _TransitionTable[ SuccessedExecutingState ][ StopEvent ] = StoppedSuccessedState ;
391   _ActionTable[ StoppedSuccessedState ][ StopEvent ] = Successed_StopAction;
392 // ErroredState - StopEvent
393   _TransitionTable[ ErroredExecutingState ][ StopEvent ] = StoppedErroredState ;
394   _ActionTable[ StoppedErroredState ][ StopEvent ] = Errored_StopAction;
395
396 // SuspendedSuccessedState - ResumeEvent
397   _TransitionTable[ SuspendedSuccessedState ][ ResumeEvent ] = ResumedSuccessedState ;
398   _ActionTable[ ResumedSuccessedState ][ ResumeEvent ] = SuspendedSuccessed_ResumeAction;
399
400   _TransitionTable[ ResumedSuccessedState ][ ResumedSuccessedEvent ] = SuccessedState ;
401   _ActionTable[ SuccessedState ][ ResumedSuccessedEvent] = Successed_SuccessAction;
402
403 // SuspendedErroredState - ResumeEvent
404   _TransitionTable[ SuspendedErroredState ][ ResumeEvent ] = ResumedErroredState ;
405   _ActionTable[ ResumedErroredState ][ ResumeEvent ] = SuspendedErrored_ResumeAction;
406   _TransitionTable[ ResumedErroredState ][ ResumedErroredEvent ] = ErroredState ;
407   _ActionTable[ ErroredState ][ ResumedErroredEvent ] = Errored_ErrorAction;
408
409 // SuccessedState - KillEvent
410   _TransitionTable[ SuccessedState ][ KillEvent ] = KilledSuccessedState ;
411   _ActionTable[ KilledSuccessedState ][ KillEvent] = Successed_KillAction;
412   _TransitionTable[ KilledSuccessedState ][ KillEvent ] = KilledState ;
413   _ActionTable[ KilledState ][ KillEvent ] = VoidAction;
414 // ErroredState - KillEvent
415   _TransitionTable[ ErroredState ][ KillEvent ] = KilledErroredState ;
416   _ActionTable[ KilledErroredState ][ KillEvent] = Errored_KillAction;
417   _TransitionTable[ KilledErroredState ][ KillEvent ] = KilledState ;
418   _ActionTable[ KilledState ][ KillEvent ] = VoidAction;
419
420 // SuccessedState - StopEvent
421   _TransitionTable[ SuccessedState ][ StopEvent ] = StoppedSuccessedState ;
422   _ActionTable[ StoppedSuccessedState ][ StopEvent] = Successed_StopAction;
423   _TransitionTable[ StoppedSuccessedState ][ StopEvent ] = StoppedState ;
424   _ActionTable[ StoppedState ][ StopEvent ] = VoidAction;
425 // ErroredState - StopEvent
426   _TransitionTable[ ErroredState ][ StopEvent ] = StoppedErroredState ;
427   _ActionTable[ StoppedErroredState ][ StopEvent] = Errored_StopAction;
428   _TransitionTable[ StoppedErroredState ][ StopEvent ] = StoppedState ;
429   _ActionTable[ StoppedState ][ StopEvent ] = VoidAction;
430
431 // ReStartEvent
432   _TransitionTable[ SuspendedSuccessedState ][ ToReStartEvent ] = SuspendedSuccessedToReStartState ;
433   _ActionTable[ SuspendedSuccessedToReStartState ][ ToReStartEvent] = VoidAction ;
434
435   _TransitionTable[ SuspendedSuccessedToReStartState ][ ReStartEvent ] = ReStartedState ;
436   _TransitionTable[ SuspendedSuccessedToReStartState ][ ReStartAndSuspendEvent ] = ReStartedState ;
437 // ReStartEvent
438   _TransitionTable[ SuspendedErroredState ][ ToReStartEvent ] = SuspendedErroredToReStartState ;
439   _ActionTable[ SuspendedErroredToReStartState ][ ToReStartEvent] = VoidAction ;
440
441   _TransitionTable[ SuspendedErroredToReStartState ][ ReStartEvent ] = ReStartedState ;
442   _TransitionTable[ SuspendedErroredToReStartState ][ ReStartAndSuspendEvent ] = ReStartedState ;
443
444   _ActionTable[ ReStartedState ][ ReStartEvent] = SuspendedSuccessed_ReStartAction;
445   _ActionTable[ ReStartedState ][ ReStartAndSuspendEvent] = SuspendedSuccessed_ReStartAndSuspendAction;
446
447   pthread_mutex_init( &_MutexJoinWait , NULL ) ;
448   if ( pthread_cond_init( &_JoinWait , NULL ) ) {
449     perror("pthread_cond_init( &_JoinWait , NULL )") ;
450     exit( 0 ) ;
451   }
452   _JoinThread = true ;
453   if ( pthread_create( &_JoinThreadNo , NULL , start_function , this ) ) {
454     char * msg = "Cannot pthread_create " ;
455     perror( msg ) ;
456   }
457
458   pthread_mutex_init( &_MutexPythonWait , NULL ) ;
459   _ExecNumber = 0 ;
460   _GraphExecutingNumber = 0 ;
461   _PyInitModule = false ;
462   _DbgFileNumber = 0 ;
463 //  cdebug_out << "FiniteStateMachine::FiniteStateMachine _TransitionTable "
464 //             << endl;
465 }
466
467 void * start_function( void *p ) {
468   GraphExecutor::FiniteStateMachine *anAutomaton = (GraphExecutor::FiniteStateMachine *) p;
469   if ( pthread_setcanceltype( PTHREAD_CANCEL_ASYNCHRONOUS , NULL ) ) {
470     perror("pthread_setcanceltype ") ;
471     exit(0) ;
472   }
473   if ( pthread_setcancelstate( PTHREAD_CANCEL_ENABLE , NULL ) ) {
474     perror("pthread_setcancelstate ") ;
475     exit(0) ;
476   }
477   anAutomaton->JoinThread() ;
478   pthread_exit( PTHREAD_CANCELED ) ;
479 }
480
481 int GraphExecutor::FiniteStateMachine::ExecNumber() {
482   PyLock() ;
483   _ExecNumber += 1 ;
484   int RetVal = _ExecNumber ;
485   _GraphExecutingNumber += 1 ;
486   PyUnLock() ;
487   return RetVal ;
488 }
489
490 void GraphExecutor::FiniteStateMachine::Executed() {
491   PyLock() ;
492   _GraphExecutingNumber -= 1 ;
493   if ( _GraphExecutingNumber == 0 ) {
494     map< string , PyObject * >::iterator aPyFunction ;
495     for ( aPyFunction = _MapOfPyFunctions.begin() ; aPyFunction != _MapOfPyFunctions.end() ; aPyFunction++ ) {
496       if ( !strcmp( aPyFunction->first.c_str() , "PyObjRef" ) ||
497            !strcmp( aPyFunction->first.c_str() , "PyObjIor" ) ) {
498         //cout << "GraphExecutor::FiniteStateMachine::Executed " << aPyFunction->first << " keeped ..."<< endl ;
499       }
500       else {
501         //cout << "GraphExecutor::FiniteStateMachine::Executed " << aPyFunction->first << " erased ..."<< endl ;
502         _MapOfPyFunctions.erase( aPyFunction->first ) ;
503       }
504     }
505   }
506   else {
507     //cout << "GraphExecutor::FiniteStateMachine::Executed _GraphExecutingNumber " << _GraphExecutingNumber
508     //     << " != 0 ==> no erase" << endl ;
509   }
510   PyUnLock() ;
511   return ;
512 }
513
514 bool GraphExecutor::FiniteStateMachine::PyInitModule() {
515   bool InitedModule = _PyInitModule ;
516   _PyInitModule = true ;
517   return InitedModule ;
518 }
519
520 void GraphExecutor::FiniteStateMachine::PyLock() {
521 //  cout << pthread_self() << " GraphExecutor::FiniteStateMachine::PyLock " << &_MutexPythonWait << endl ;
522   if ( pthread_mutex_lock( &_MutexPythonWait ) ) {
523     perror( "GraphExecutor::FiniteStateMachine::PyLock" ) ;
524     exit( 0 ) ;
525   }
526 //  cout << pthread_self() << " GraphExecutor::FiniteStateMachine::PyLocked " << &_MutexPythonWait << endl ;
527 }
528
529 void GraphExecutor::FiniteStateMachine::PyUnLock() {
530 //  cout << pthread_self() << " GraphExecutor::FiniteStateMachine::PyUnLock " << &_MutexPythonWait << endl ;
531   if ( pthread_mutex_unlock( &_MutexPythonWait ) ) {
532     perror( "GraphExecutor::FiniteStateMachine::PyUnLock" ) ;
533     exit( 0 ) ;
534   }
535 //  cout << pthread_self() << " GraphExecutor::FiniteStateMachine::PyUnLocked " << &_MutexPythonWait << endl ;
536 }
537
538 PyObject * GraphExecutor::FiniteStateMachine::PyFunction( const char * aPyFuncName ) {
539   
540   PyObject * RetVal = NULL ;
541   bool PyObjRefIor = !strcmp( aPyFuncName , "PyObjRef" ) || !strcmp( aPyFuncName , "PyObjIor" ) ;
542   PyObject * PyFunctionMapped = _MapOfPyFunctions[ aPyFuncName ] ;
543   if ( _GraphExecutingNumber > 1 && !PyObjRefIor ) {
544     RetVal = PyFunctionMapped ;
545     //cout << "GraphExecutor::FiniteStateMachine::PyFunction( '" << aPyFuncName << "' ) --> " ;
546     if ( RetVal ) {
547       //cout << RetVal << " ob_refcnt " << RetVal->ob_refcnt ;
548     }
549     else {
550       //cout << " NULL" ;
551     }
552     //cout << endl ;
553   }
554   else {
555     RetVal = PyFunctionMapped ;
556     //cout << "GraphExecutor::FiniteStateMachine::PyFunction( '" << aPyFuncName << "' ) --> " ;
557     if ( RetVal && PyObjRefIor ) {
558       //cout << RetVal << " " << RetVal->ob_refcnt << endl ;
559     }
560     else if ( RetVal ) {
561       //cout << RetVal << " " << RetVal->ob_refcnt << endl ;
562 //      _MapOfPyFunctions.erase( aPyFuncName ) ;
563 //      cout << "GraphExecutor::FiniteStateMachine::PyFunction( '" << aPyFuncName << "' ) erased --> NULL" << endl ;
564     }
565     else {
566       //cout << " NULL" << endl ;
567     }
568   }
569   
570   return RetVal ;
571 }
572
573 bool GraphExecutor::FiniteStateMachine::PyFunction( const char * aPyFuncName , PyObject * aPyFunction ) {
574   
575   bool RetVal = false ;
576   if ( _MapOfPyFunctions[ aPyFuncName ] != NULL ) {
577     //PyObject * aPyFunc = _MapOfPyFunctions[ aPyFuncName ] ;
578     //cout << "GraphExecutor::FiniteStateMachine::PyFunction( '" << aPyFuncName << "' , " << aPyFunction
579     //     << " ) ob_refcnt " << aPyFunction->ob_refcnt << " already mapped : " << aPyFunc << " ob_refcnt "
580     //     << aPyFunc->ob_refcnt << endl ;
581   }
582   else {
583     _MapOfPyFunctions[ aPyFuncName ] = aPyFunction ;
584     //cout << "GraphExecutor::FiniteStateMachine::PyFunction( '" << aPyFuncName << "' , " << aPyFunction
585     //     << " ) ob_refcnt " << aPyFunction->ob_refcnt << " mapped" << endl ;
586     RetVal = true ;
587   }
588   
589   return RetVal ;
590 }
591 /*
592 GraphBase::Graph * GraphExecutor::FiniteStateMachine::MapGraph( const char * aGraphName ) {
593   GraphBase::Graph * aGraph = _MapOfGraphs[ aGraphName ] ;
594   //cout << "MapGraph " << aGraphName << " --> " << aGraph << endl ;
595   return aGraph ;
596 }
597
598 bool GraphExecutor::FiniteStateMachine::MapGraph( GraphBase::Graph * aGraph , const char * aGraphName ) {
599   if ( MapGraph( aGraphName ) ) {
600     return false ;
601   }
602   _MapOfGraphs[ aGraphName ] = aGraph ;
603   return true ;
604 }
605
606 void GraphExecutor::FiniteStateMachine::EraseGraph( const char * aGraphName ) {
607   _MapOfGraphs.erase( aGraphName ) ;
608 }
609
610 bool GraphExecutor::FiniteStateMachine::GraphName( const char * aGraphName ) {
611   return  _MapOfGraphNames[ aGraphName ] ;
612 }
613
614 string GraphExecutor::FiniteStateMachine::GraphInstanceName( const char * aGraphName ) {
615   int GraphInstanceNumber = _MapOfGraphNames[ aGraphName ] ;
616   if ( GraphInstanceNumber ) {
617     _MapOfGraphNames[ aGraphName ] = GraphInstanceNumber + 1 ;
618   }
619   else {
620     GraphInstanceNumber = 0 ;
621     _MapOfGraphNames[ aGraphName ] = GraphInstanceNumber + 1 ;
622   }
623   string theGraphInstanceName = string( aGraphName ) ;
624   if ( GraphInstanceNumber ) {
625     theGraphInstanceName += "_" ;
626     ostringstream astr ;
627 //    astr << GraphInstanceNumber << ends ;
628     astr << GraphInstanceNumber ;
629     theGraphInstanceName += astr.str() ;
630   }
631   //cout << "GraphExecutor::FiniteStateMachine::GraphInstanceName( " << aGraphName << " ) --> "
632     //   << theGraphInstanceName << endl ;
633   return theGraphInstanceName ;
634 }
635 */
636
637 void GraphExecutor::FiniteStateMachine::JoinThread() {
638   if ( pthread_mutex_lock( &_MutexJoinWait ) ) {
639     perror("FiniteStateMachine:JoinThread pthread_mutex_lock ") ;
640     exit( 0 ) ;
641   }
642   while ( _JoinThread ) {
643     while ( _ThreadList.size() == 0) {
644 //      MESSAGE( pthread_self() << " FiniteStateMachine:Join pthread_cond_wait" );
645       if ( pthread_cond_wait( &_JoinWait , &_MutexJoinWait ) ) {
646         perror("FiniteStateMachine:JoinThread pthread_cond_wait ") ;
647       }
648     }
649     pthread_t _Thread = _ThreadList.front() ;
650 //    MESSAGE( pthread_self() << " FiniteStateMachine:JoinThread pthread_cond_waited : " << _Thread )
651 //    MESSAGE( pthread_self() << " FiniteStateMachine:JoinThread pthread_join : " << _Thread );
652     int joinsts = pthread_join( _Thread , NULL ) ;
653     if ( joinsts ) {
654       perror("FiniteStateMachine:JoinThread pthread_join ") ;
655       MESSAGE( pthread_self() << " FiniteStateMachine:JoinThread pthread_join : " << _Thread
656                << " Error" );
657       exit( 0 ) ;
658     }
659     else {
660       MESSAGE( pthread_self() << " FiniteStateMachine:JoinThread pthread_joined : " << _Thread );
661       _ThreadList.pop_front() ;
662     }
663   }
664   if ( pthread_mutex_unlock( &_MutexJoinWait ) ) {
665     perror("FiniteStateMachine:JoinThread pthread_mutex_unlock ") ;
666     exit( 0 ) ;
667   }
668 }
669
670 void GraphExecutor::FiniteStateMachine::JoinThread( pthread_t aThread ) {
671   if ( pthread_mutex_lock( &_MutexJoinWait ) ) {
672     perror("Join pthread_mutex_lock ") ;
673     exit( 0 ) ;
674   }
675 //  MESSAGE(pthread_self() << " JoinThread pthread_cond_signal for " << aThread)
676   _ThreadList.push_back( aThread ) ;
677   if ( pthread_cond_signal( &_JoinWait ) ) {
678     perror("Join pthread_cond_signal ") ;
679   }
680 //  MESSAGE( pthread_self() << " JoinThread pthread_cond_signaled for " << aThread)
681
682   if ( pthread_mutex_unlock( &_MutexJoinWait ) ) {
683     perror("Join pthread_mutex_unlock ") ;
684     exit( 0 ) ;
685   }
686 }
687
688 ostream & operator<< (ostream &f ,const GraphExecutor::AutomatonState & aState ) {
689   switch (aState) {
690   case GraphExecutor::UnKnownState :
691     f << "UnKnownState";
692     break;
693   case GraphExecutor::DataUndefState :
694     f << "DataUndefState";
695     break;
696   case GraphExecutor::DataWaitingState :
697     f << "DataWaitingState";
698     break;
699   case GraphExecutor::DataReadyState :
700     f << "DataReadyState";
701     break;
702   case GraphExecutor::SuspendedReadyState :
703     f << "SuspendedReadyState";
704     break;
705   case GraphExecutor::SuspendedReadyToResumeState :
706     f << "SuspendedReadyToResumeState";
707     break;
708   case GraphExecutor::ResumedReadyState :
709     f << "ResumedReadyState";
710     break;
711   case GraphExecutor::KilledReadyState :
712     f << "KilledReadyState";
713     break;
714   case GraphExecutor::StoppedReadyState :
715     f << "StoppedReadyState";
716     break;
717   case GraphExecutor::ExecutingState :
718     f << "ExecutingState";
719     break;
720   case GraphExecutor::SuspendedExecutingState :
721     f << "SuspendedExecutingState";
722     break;
723   case GraphExecutor::ResumedExecutingState :
724     f << "ResumedExecutingState";
725     break;
726   case GraphExecutor::KilledExecutingState :
727     f << "KilledExecutingState";
728     break;
729   case GraphExecutor::StoppedExecutingState :
730     f << "StoppedExecutingState";
731     break;
732   case GraphExecutor::SuccessedExecutingState :
733     f << "SuccessedExecutingState";
734     break;
735   case GraphExecutor::ErroredExecutingState :
736     f << "ErroredExecutingState";
737     break;
738   case GraphExecutor::SuspendedSuccessedState :
739     f << "SuspendedSuccessedState";
740     break;
741   case GraphExecutor::SuspendedErroredState :
742     f << "SuspendedErroredState";
743     break;
744   case GraphExecutor::ResumedSuccessedState :
745     f << "ResumedSuccessedState";
746     break;
747   case GraphExecutor::ResumedErroredState :
748     f << "ResumedErroredState";
749     break;
750   case GraphExecutor::KilledSuccessedState :
751     f << "KilledSuccessedState";
752     break;
753   case GraphExecutor::KilledErroredState :
754     f << "KilledErroredState";
755     break;
756   case GraphExecutor::StoppedSuccessedState :
757     f << "StoppedSuccessedState";
758     break;
759   case GraphExecutor::StoppedErroredState :
760     f << "StoppedErroredState";
761     break;
762   case GraphExecutor::SuccessedState :
763     f << "SuccessedState";
764     break;
765   case GraphExecutor::ErroredState :
766     f << "ErroredState";
767     break;
768   case GraphExecutor::SuspendedState :
769     f << "SuspendedState";
770     break;
771   case GraphExecutor::KilledState :
772     f << "KilledState";
773     break;
774   case GraphExecutor::StoppedState :
775     f << "StoppedState";
776     break;
777   case GraphExecutor::SuspendedSuccessedToReStartState :
778     f << "SuspendedSuccessedToReStartState";
779     break;
780   case GraphExecutor::SuspendedErroredToReStartState :
781     f << "SuspendedErroredToReStartState";
782     break;
783   case GraphExecutor::ReRunnedState :
784     f << "ReRunnedState";
785     break;
786   case GraphExecutor::ReStartedState :
787     f << "ReStartedState";
788     break;
789   default :
790     f << "GraphExecutor::AutomatonState_?";
791     break;
792   }
793
794   return f;
795 }
796