]>
Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /****************************************************************************** |
2 | * | |
3 | * (C)Copyright 1998,1999 SysKonnect, | |
4 | * a business unit of Schneider & Koch & Co. Datensysteme GmbH. | |
5 | * | |
6 | * See the file "skfddi.c" for further information. | |
7 | * | |
8 | * This program is free software; you can redistribute it and/or modify | |
9 | * it under the terms of the GNU General Public License as published by | |
10 | * the Free Software Foundation; either version 2 of the License, or | |
11 | * (at your option) any later version. | |
12 | * | |
13 | * The information in this file is provided "AS IS" without warranty. | |
14 | * | |
15 | ******************************************************************************/ | |
16 | ||
17 | /* | |
18 | SMT ECM | |
19 | Entity Coordination Management | |
20 | Hardware independent state machine | |
21 | */ | |
22 | ||
23 | /* | |
24 | * Hardware independent state machine implemantation | |
25 | * The following external SMT functions are referenced : | |
26 | * | |
27 | * queue_event() | |
28 | * smt_timer_start() | |
29 | * smt_timer_stop() | |
30 | * | |
31 | * The following external HW dependent functions are referenced : | |
32 | * sm_pm_bypass_req() | |
33 | * sm_pm_ls_latch() | |
34 | * sm_pm_get_ls() | |
35 | * | |
36 | * The following HW dependent events are required : | |
37 | * NONE | |
38 | * | |
39 | */ | |
40 | ||
41 | #include "h/types.h" | |
42 | #include "h/fddi.h" | |
43 | #include "h/smc.h" | |
44 | ||
45 | #define KERNEL | |
46 | #include "h/smtstate.h" | |
47 | ||
48 | #ifndef lint | |
49 | static const char ID_sccs[] = "@(#)ecm.c 2.7 99/08/05 (C) SK " ; | |
50 | #endif | |
51 | ||
52 | /* | |
53 | * FSM Macros | |
54 | */ | |
55 | #define AFLAG 0x10 | |
56 | #define GO_STATE(x) (smc->mib.fddiSMTECMState = (x)|AFLAG) | |
57 | #define ACTIONS_DONE() (smc->mib.fddiSMTECMState &= ~AFLAG) | |
58 | #define ACTIONS(x) (x|AFLAG) | |
59 | ||
60 | #define EC0_OUT 0 /* not inserted */ | |
61 | #define EC1_IN 1 /* inserted */ | |
62 | #define EC2_TRACE 2 /* tracing */ | |
63 | #define EC3_LEAVE 3 /* leaving the ring */ | |
64 | #define EC4_PATH_TEST 4 /* performing path test */ | |
65 | #define EC5_INSERT 5 /* bypass being turned on */ | |
66 | #define EC6_CHECK 6 /* checking bypass */ | |
67 | #define EC7_DEINSERT 7 /* bypass being turnde off */ | |
68 | ||
69 | #ifdef DEBUG | |
70 | /* | |
71 | * symbolic state names | |
72 | */ | |
73 | static const char * const ecm_states[] = { | |
74 | "EC0_OUT","EC1_IN","EC2_TRACE","EC3_LEAVE","EC4_PATH_TEST", | |
75 | "EC5_INSERT","EC6_CHECK","EC7_DEINSERT" | |
76 | } ; | |
77 | ||
78 | /* | |
79 | * symbolic event names | |
80 | */ | |
81 | static const char * const ecm_events[] = { | |
82 | "NONE","EC_CONNECT","EC_DISCONNECT","EC_TRACE_PROP","EC_PATH_TEST", | |
83 | "EC_TIMEOUT_TD","EC_TIMEOUT_TMAX", | |
84 | "EC_TIMEOUT_IMAX","EC_TIMEOUT_INMAX","EC_TEST_DONE" | |
85 | } ; | |
86 | #endif | |
87 | ||
88 | /* | |
89 | * all Globals are defined in smc.h | |
90 | * struct s_ecm | |
91 | */ | |
92 | ||
93 | /* | |
94 | * function declarations | |
95 | */ | |
96 | ||
97 | static void ecm_fsm(struct s_smc *smc, int cmd); | |
98 | static void start_ecm_timer(struct s_smc *smc, u_long value, int event); | |
99 | static void stop_ecm_timer(struct s_smc *smc); | |
100 | static void prop_actions(struct s_smc *smc); | |
101 | ||
102 | /* | |
103 | init ECM state machine | |
104 | clear all ECM vars and flags | |
105 | */ | |
106 | void ecm_init(struct s_smc *smc) | |
107 | { | |
108 | smc->e.path_test = PT_PASSED ; | |
109 | smc->e.trace_prop = 0 ; | |
110 | smc->e.sb_flag = 0 ; | |
111 | smc->mib.fddiSMTECMState = ACTIONS(EC0_OUT) ; | |
112 | smc->e.ecm_line_state = FALSE ; | |
113 | } | |
114 | ||
115 | /* | |
116 | ECM state machine | |
117 | called by dispatcher | |
118 | ||
119 | do | |
120 | display state change | |
121 | process event | |
122 | until SM is stable | |
123 | */ | |
124 | void ecm(struct s_smc *smc, int event) | |
125 | { | |
126 | int state ; | |
127 | ||
128 | do { | |
129 | DB_ECM("ECM : state %s%s", | |
130 | (smc->mib.fddiSMTECMState & AFLAG) ? "ACTIONS " : "", | |
131 | ecm_states[smc->mib.fddiSMTECMState & ~AFLAG]) ; | |
132 | DB_ECM(" event %s\n",ecm_events[event],0) ; | |
133 | state = smc->mib.fddiSMTECMState ; | |
134 | ecm_fsm(smc,event) ; | |
135 | event = 0 ; | |
136 | } while (state != smc->mib.fddiSMTECMState) ; | |
137 | ecm_state_change(smc,(int)smc->mib.fddiSMTECMState) ; | |
138 | } | |
139 | ||
140 | /* | |
141 | process ECM event | |
142 | */ | |
143 | static void ecm_fsm(struct s_smc *smc, int cmd) | |
144 | { | |
145 | int ls_a ; /* current line state PHY A */ | |
146 | int ls_b ; /* current line state PHY B */ | |
147 | int p ; /* ports */ | |
148 | ||
149 | ||
150 | smc->mib.fddiSMTBypassPresent = sm_pm_bypass_present(smc) ; | |
151 | if (cmd == EC_CONNECT) | |
152 | smc->mib.fddiSMTRemoteDisconnectFlag = FALSE ; | |
153 | ||
154 | /* For AIX event notification: */ | |
155 | /* Is a disconnect command remotely issued ? */ | |
156 | if (cmd == EC_DISCONNECT && | |
157 | smc->mib.fddiSMTRemoteDisconnectFlag == TRUE) | |
158 | AIX_EVENT (smc, (u_long) CIO_HARD_FAIL, (u_long) | |
159 | FDDI_REMOTE_DISCONNECT, smt_get_event_word(smc), | |
160 | smt_get_error_word(smc) ); | |
161 | ||
162 | /*jd 05-Aug-1999 Bug #10419 "Port Disconnect fails at Dup MAc Cond."*/ | |
163 | if (cmd == EC_CONNECT) { | |
164 | smc->e.DisconnectFlag = FALSE ; | |
165 | } | |
166 | else if (cmd == EC_DISCONNECT) { | |
167 | smc->e.DisconnectFlag = TRUE ; | |
168 | } | |
169 | ||
170 | switch(smc->mib.fddiSMTECMState) { | |
171 | case ACTIONS(EC0_OUT) : | |
172 | /* | |
173 | * We do not perform a path test | |
174 | */ | |
175 | smc->e.path_test = PT_PASSED ; | |
176 | smc->e.ecm_line_state = FALSE ; | |
177 | stop_ecm_timer(smc) ; | |
178 | ACTIONS_DONE() ; | |
179 | break ; | |
180 | case EC0_OUT: | |
181 | /*EC01*/ | |
182 | if (cmd == EC_CONNECT && !smc->mib.fddiSMTBypassPresent | |
183 | && smc->e.path_test==PT_PASSED) { | |
184 | GO_STATE(EC1_IN) ; | |
185 | break ; | |
186 | } | |
187 | /*EC05*/ | |
188 | else if (cmd == EC_CONNECT && (smc->e.path_test==PT_PASSED) && | |
189 | smc->mib.fddiSMTBypassPresent && | |
190 | (smc->s.sas == SMT_DAS)) { | |
191 | GO_STATE(EC5_INSERT) ; | |
192 | break ; | |
193 | } | |
194 | break; | |
195 | case ACTIONS(EC1_IN) : | |
196 | stop_ecm_timer(smc) ; | |
197 | smc->e.trace_prop = 0 ; | |
198 | sm_ma_control(smc,MA_TREQ) ; | |
199 | for (p = 0 ; p < NUMPHYS ; p++) | |
200 | if (smc->mib.p[p].fddiPORTHardwarePresent) | |
201 | queue_event(smc,EVENT_PCMA+p,PC_START) ; | |
202 | ACTIONS_DONE() ; | |
203 | break ; | |
204 | case EC1_IN: | |
205 | /*EC12*/ | |
206 | if (cmd == EC_TRACE_PROP) { | |
207 | prop_actions(smc) ; | |
208 | GO_STATE(EC2_TRACE) ; | |
209 | break ; | |
210 | } | |
211 | /*EC13*/ | |
212 | else if (cmd == EC_DISCONNECT) { | |
213 | GO_STATE(EC3_LEAVE) ; | |
214 | break ; | |
215 | } | |
216 | break; | |
217 | case ACTIONS(EC2_TRACE) : | |
218 | start_ecm_timer(smc,MIB2US(smc->mib.fddiSMTTrace_MaxExpiration), | |
219 | EC_TIMEOUT_TMAX) ; | |
220 | ACTIONS_DONE() ; | |
221 | break ; | |
222 | case EC2_TRACE : | |
223 | /*EC22*/ | |
224 | if (cmd == EC_TRACE_PROP) { | |
225 | prop_actions(smc) ; | |
226 | GO_STATE(EC2_TRACE) ; | |
227 | break ; | |
228 | } | |
229 | /*EC23a*/ | |
230 | else if (cmd == EC_DISCONNECT) { | |
231 | smc->e.path_test = PT_EXITING ; | |
232 | GO_STATE(EC3_LEAVE) ; | |
233 | break ; | |
234 | } | |
235 | /*EC23b*/ | |
236 | else if (smc->e.path_test == PT_PENDING) { | |
237 | GO_STATE(EC3_LEAVE) ; | |
238 | break ; | |
239 | } | |
240 | /*EC23c*/ | |
241 | else if (cmd == EC_TIMEOUT_TMAX) { | |
242 | /* Trace_Max is expired */ | |
243 | /* -> send AIX_EVENT */ | |
244 | AIX_EVENT(smc, (u_long) FDDI_RING_STATUS, | |
245 | (u_long) FDDI_SMT_ERROR, (u_long) | |
246 | FDDI_TRACE_MAX, smt_get_error_word(smc)); | |
247 | smc->e.path_test = PT_PENDING ; | |
248 | GO_STATE(EC3_LEAVE) ; | |
249 | break ; | |
250 | } | |
251 | break ; | |
252 | case ACTIONS(EC3_LEAVE) : | |
253 | start_ecm_timer(smc,smc->s.ecm_td_min,EC_TIMEOUT_TD) ; | |
254 | for (p = 0 ; p < NUMPHYS ; p++) | |
255 | queue_event(smc,EVENT_PCMA+p,PC_STOP) ; | |
256 | ACTIONS_DONE() ; | |
257 | break ; | |
258 | case EC3_LEAVE: | |
259 | /*EC30*/ | |
260 | if (cmd == EC_TIMEOUT_TD && !smc->mib.fddiSMTBypassPresent && | |
261 | (smc->e.path_test != PT_PENDING)) { | |
262 | GO_STATE(EC0_OUT) ; | |
263 | break ; | |
264 | } | |
265 | /*EC34*/ | |
266 | else if (cmd == EC_TIMEOUT_TD && | |
267 | (smc->e.path_test == PT_PENDING)) { | |
268 | GO_STATE(EC4_PATH_TEST) ; | |
269 | break ; | |
270 | } | |
271 | /*EC31*/ | |
272 | else if (cmd == EC_CONNECT && smc->e.path_test == PT_PASSED) { | |
273 | GO_STATE(EC1_IN) ; | |
274 | break ; | |
275 | } | |
276 | /*EC33*/ | |
277 | else if (cmd == EC_DISCONNECT && | |
278 | smc->e.path_test == PT_PENDING) { | |
279 | smc->e.path_test = PT_EXITING ; | |
280 | /* | |
281 | * stay in state - state will be left via timeout | |
282 | */ | |
283 | } | |
284 | /*EC37*/ | |
285 | else if (cmd == EC_TIMEOUT_TD && | |
286 | smc->mib.fddiSMTBypassPresent && | |
287 | smc->e.path_test != PT_PENDING) { | |
288 | GO_STATE(EC7_DEINSERT) ; | |
289 | break ; | |
290 | } | |
291 | break ; | |
292 | case ACTIONS(EC4_PATH_TEST) : | |
293 | stop_ecm_timer(smc) ; | |
294 | smc->e.path_test = PT_TESTING ; | |
295 | start_ecm_timer(smc,smc->s.ecm_test_done,EC_TEST_DONE) ; | |
296 | /* now perform path test ... just a simulation */ | |
297 | ACTIONS_DONE() ; | |
298 | break ; | |
299 | case EC4_PATH_TEST : | |
300 | /* path test done delay */ | |
301 | if (cmd == EC_TEST_DONE) | |
302 | smc->e.path_test = PT_PASSED ; | |
303 | ||
304 | if (smc->e.path_test == PT_FAILED) | |
305 | RS_SET(smc,RS_PATHTEST) ; | |
306 | ||
307 | /*EC40a*/ | |
308 | if (smc->e.path_test == PT_FAILED && | |
309 | !smc->mib.fddiSMTBypassPresent) { | |
310 | GO_STATE(EC0_OUT) ; | |
311 | break ; | |
312 | } | |
313 | /*EC40b*/ | |
314 | else if (cmd == EC_DISCONNECT && | |
315 | !smc->mib.fddiSMTBypassPresent) { | |
316 | GO_STATE(EC0_OUT) ; | |
317 | break ; | |
318 | } | |
319 | /*EC41*/ | |
320 | else if (smc->e.path_test == PT_PASSED) { | |
321 | GO_STATE(EC1_IN) ; | |
322 | break ; | |
323 | } | |
324 | /*EC47a*/ | |
325 | else if (smc->e.path_test == PT_FAILED && | |
326 | smc->mib.fddiSMTBypassPresent) { | |
327 | GO_STATE(EC7_DEINSERT) ; | |
328 | break ; | |
329 | } | |
330 | /*EC47b*/ | |
331 | else if (cmd == EC_DISCONNECT && | |
332 | smc->mib.fddiSMTBypassPresent) { | |
333 | GO_STATE(EC7_DEINSERT) ; | |
334 | break ; | |
335 | } | |
336 | break ; | |
337 | case ACTIONS(EC5_INSERT) : | |
338 | sm_pm_bypass_req(smc,BP_INSERT); | |
339 | start_ecm_timer(smc,smc->s.ecm_in_max,EC_TIMEOUT_INMAX) ; | |
340 | ACTIONS_DONE() ; | |
341 | break ; | |
342 | case EC5_INSERT : | |
343 | /*EC56*/ | |
344 | if (cmd == EC_TIMEOUT_INMAX) { | |
345 | GO_STATE(EC6_CHECK) ; | |
346 | break ; | |
347 | } | |
348 | /*EC57*/ | |
349 | else if (cmd == EC_DISCONNECT) { | |
350 | GO_STATE(EC7_DEINSERT) ; | |
351 | break ; | |
352 | } | |
353 | break ; | |
354 | case ACTIONS(EC6_CHECK) : | |
355 | /* | |
356 | * in EC6_CHECK, we *POLL* the line state ! | |
357 | * check whether both bypass switches have switched. | |
358 | */ | |
359 | start_ecm_timer(smc,smc->s.ecm_check_poll,0) ; | |
360 | smc->e.ecm_line_state = TRUE ; /* flag to pcm: report Q/HLS */ | |
361 | (void) sm_pm_ls_latch(smc,PA,1) ; /* enable line state latch */ | |
362 | (void) sm_pm_ls_latch(smc,PB,1) ; /* enable line state latch */ | |
363 | ACTIONS_DONE() ; | |
364 | break ; | |
365 | case EC6_CHECK : | |
366 | ls_a = sm_pm_get_ls(smc,PA) ; | |
367 | ls_b = sm_pm_get_ls(smc,PB) ; | |
368 | ||
369 | /*EC61*/ | |
370 | if (((ls_a == PC_QLS) || (ls_a == PC_HLS)) && | |
371 | ((ls_b == PC_QLS) || (ls_b == PC_HLS)) ) { | |
372 | smc->e.sb_flag = FALSE ; | |
373 | smc->e.ecm_line_state = FALSE ; | |
374 | GO_STATE(EC1_IN) ; | |
375 | break ; | |
376 | } | |
377 | /*EC66*/ | |
378 | else if (!smc->e.sb_flag && | |
379 | (((ls_a == PC_ILS) && (ls_b == PC_QLS)) || | |
380 | ((ls_a == PC_QLS) && (ls_b == PC_ILS)))){ | |
381 | smc->e.sb_flag = TRUE ; | |
382 | DB_ECMN(1,"ECM : EC6_CHECK - stuck bypass\n",0,0) ; | |
383 | AIX_EVENT(smc, (u_long) FDDI_RING_STATUS, (u_long) | |
384 | FDDI_SMT_ERROR, (u_long) FDDI_BYPASS_STUCK, | |
385 | smt_get_error_word(smc)); | |
386 | } | |
387 | /*EC67*/ | |
388 | else if (cmd == EC_DISCONNECT) { | |
389 | smc->e.ecm_line_state = FALSE ; | |
390 | GO_STATE(EC7_DEINSERT) ; | |
391 | break ; | |
392 | } | |
393 | else { | |
394 | /* | |
395 | * restart poll | |
396 | */ | |
397 | start_ecm_timer(smc,smc->s.ecm_check_poll,0) ; | |
398 | } | |
399 | break ; | |
400 | case ACTIONS(EC7_DEINSERT) : | |
401 | sm_pm_bypass_req(smc,BP_DEINSERT); | |
402 | start_ecm_timer(smc,smc->s.ecm_i_max,EC_TIMEOUT_IMAX) ; | |
403 | ACTIONS_DONE() ; | |
404 | break ; | |
405 | case EC7_DEINSERT: | |
406 | /*EC70*/ | |
407 | if (cmd == EC_TIMEOUT_IMAX) { | |
408 | GO_STATE(EC0_OUT) ; | |
409 | break ; | |
410 | } | |
411 | /*EC75*/ | |
412 | else if (cmd == EC_CONNECT && smc->e.path_test == PT_PASSED) { | |
413 | GO_STATE(EC5_INSERT) ; | |
414 | break ; | |
415 | } | |
416 | break; | |
417 | default: | |
418 | SMT_PANIC(smc,SMT_E0107, SMT_E0107_MSG) ; | |
419 | break; | |
420 | } | |
421 | } | |
422 | ||
423 | #ifndef CONCENTRATOR | |
424 | /* | |
425 | * trace propagation actions for SAS & DAS | |
426 | */ | |
427 | static void prop_actions(struct s_smc *smc) | |
428 | { | |
429 | int port_in = 0 ; | |
430 | int port_out = 0 ; | |
431 | ||
432 | RS_SET(smc,RS_EVENT) ; | |
433 | switch (smc->s.sas) { | |
434 | case SMT_SAS : | |
435 | port_in = port_out = pcm_get_s_port(smc) ; | |
436 | break ; | |
437 | case SMT_DAS : | |
438 | port_in = cfm_get_mac_input(smc) ; /* PA or PB */ | |
439 | port_out = cfm_get_mac_output(smc) ; /* PA or PB */ | |
440 | break ; | |
441 | case SMT_NAC : | |
442 | SMT_PANIC(smc,SMT_E0108, SMT_E0108_MSG) ; | |
443 | return ; | |
444 | } | |
445 | ||
446 | DB_ECM("ECM : prop_actions - trace_prop %d\n", smc->e.trace_prop,0) ; | |
447 | DB_ECM("ECM : prop_actions - in %d out %d\n", port_in,port_out) ; | |
448 | ||
449 | if (smc->e.trace_prop & ENTITY_BIT(ENTITY_MAC)) { | |
450 | /* trace initiatior */ | |
451 | DB_ECM("ECM : initiate TRACE on PHY %c\n",'A'+port_in-PA,0) ; | |
452 | queue_event(smc,EVENT_PCM+port_in,PC_TRACE) ; | |
453 | } | |
454 | else if ((smc->e.trace_prop & ENTITY_BIT(ENTITY_PHY(PA))) && | |
455 | port_out != PA) { | |
456 | /* trace propagate upstream */ | |
457 | DB_ECM("ECM : propagate TRACE on PHY B\n",0,0) ; | |
458 | queue_event(smc,EVENT_PCMB,PC_TRACE) ; | |
459 | } | |
460 | else if ((smc->e.trace_prop & ENTITY_BIT(ENTITY_PHY(PB))) && | |
461 | port_out != PB) { | |
462 | /* trace propagate upstream */ | |
463 | DB_ECM("ECM : propagate TRACE on PHY A\n",0,0) ; | |
464 | queue_event(smc,EVENT_PCMA,PC_TRACE) ; | |
465 | } | |
466 | else { | |
467 | /* signal trace termination */ | |
468 | DB_ECM("ECM : TRACE terminated\n",0,0) ; | |
469 | smc->e.path_test = PT_PENDING ; | |
470 | } | |
471 | smc->e.trace_prop = 0 ; | |
472 | } | |
473 | #else | |
474 | /* | |
475 | * trace propagation actions for Concentrator | |
476 | */ | |
477 | static void prop_actions(struct s_smc *smc) | |
478 | { | |
479 | int initiator ; | |
480 | int upstream ; | |
481 | int p ; | |
482 | ||
483 | RS_SET(smc,RS_EVENT) ; | |
484 | while (smc->e.trace_prop) { | |
485 | DB_ECM("ECM : prop_actions - trace_prop %d\n", | |
486 | smc->e.trace_prop,0) ; | |
487 | ||
488 | if (smc->e.trace_prop & ENTITY_BIT(ENTITY_MAC)) { | |
489 | initiator = ENTITY_MAC ; | |
490 | smc->e.trace_prop &= ~ENTITY_BIT(ENTITY_MAC) ; | |
491 | DB_ECM("ECM: MAC initiates trace\n",0,0) ; | |
492 | } | |
493 | else { | |
494 | for (p = NUMPHYS-1 ; p >= 0 ; p--) { | |
495 | if (smc->e.trace_prop & | |
496 | ENTITY_BIT(ENTITY_PHY(p))) | |
497 | break ; | |
498 | } | |
499 | initiator = ENTITY_PHY(p) ; | |
500 | smc->e.trace_prop &= ~ENTITY_BIT(ENTITY_PHY(p)) ; | |
501 | } | |
502 | upstream = cem_get_upstream(smc,initiator) ; | |
503 | ||
504 | if (upstream == ENTITY_MAC) { | |
505 | /* signal trace termination */ | |
506 | DB_ECM("ECM : TRACE terminated\n",0,0) ; | |
507 | smc->e.path_test = PT_PENDING ; | |
508 | } | |
509 | else { | |
510 | /* trace propagate upstream */ | |
511 | DB_ECM("ECM : propagate TRACE on PHY %d\n",upstream,0) ; | |
512 | queue_event(smc,EVENT_PCM+upstream,PC_TRACE) ; | |
513 | } | |
514 | } | |
515 | } | |
516 | #endif | |
517 | ||
518 | ||
519 | /* | |
520 | * SMT timer interface | |
521 | * start ECM timer | |
522 | */ | |
523 | static void start_ecm_timer(struct s_smc *smc, u_long value, int event) | |
524 | { | |
525 | smt_timer_start(smc,&smc->e.ecm_timer,value,EV_TOKEN(EVENT_ECM,event)); | |
526 | } | |
527 | ||
528 | /* | |
529 | * SMT timer interface | |
530 | * stop ECM timer | |
531 | */ | |
532 | static void stop_ecm_timer(struct s_smc *smc) | |
533 | { | |
534 | if (smc->e.ecm_timer.tm_active) | |
535 | smt_timer_stop(smc,&smc->e.ecm_timer) ; | |
536 | } |