1 /*
2 * Copyright (c) 2004-2007 The Trustees of Indiana University and Indiana
3 * University Research and Technology
4 * Corporation. All rights reserved.
5 * Copyright (c) 2004-2006 The University of Tennessee and The University
6 * of Tennessee Research Foundation. All rights
7 * reserved.
8 * Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
9 * University of Stuttgart. All rights reserved.
10 * Copyright (c) 2004-2005 The Regents of the University of California.
11 * All rights reserved.
12 * $COPYRIGHT$
13 *
14 * Additional copyrights may follow
15 *
16 * $HEADER$
17 */
18
19 #include "ompi_config.h"
20 #include "ompi/constants.h"
21 #include "ompi/types.h"
22
23 #include "ompi/mca/pml/pml.h"
24 #include "ompi/mca/pml/base/base.h"
25
26 #include "ompi/mca/bml/base/base.h"
27
28 int mca_pml_base_ft_event(int state)
29 {
30 int ret;
31
32 #if 0
33 opal_output(0, "pml:base: ft_event: Called (%d)!!\n", state);
34 #endif
35
36 if(OPAL_CRS_CHECKPOINT == state) {
37 ;
38 }
39 else if(OPAL_CRS_CONTINUE == state) {
40 ;
41 }
42 else if(OPAL_CRS_RESTART == state) {
43 ;
44 }
45 else if(OPAL_CRS_TERM == state ) {
46 ;
47 }
48 else {
49 ;
50 }
51
52 /* Call the BML
53 * BML is expected to call ft_event in
54 * - BTL(s)
55 * - MPool(s)
56 */
57 if( OMPI_SUCCESS != (ret = mca_bml.bml_ft_event(state))) {
58 opal_output(0, "pml:base: ft_event: BML ft_event function failed: %d\n",
59 ret);
60 }
61
62 if(OPAL_CRS_CHECKPOINT == state) {
63 ;
64 }
65 else if(OPAL_CRS_CONTINUE == state) {
66 ;
67 }
68 else if(OPAL_CRS_RESTART == state) {
69 ;
70 }
71 else if(OPAL_CRS_TERM == state ) {
72 ;
73 }
74 else {
75 ;
76 }
77
78 return OMPI_SUCCESS;
79 }