00001 /* @HEADER@ */ 00002 // ************************************************************************ 00003 // 00004 // Sundance 00005 // Copyright (2005) Sandia Corporation 00006 // 00007 // Copyright (year first published) Sandia Corporation. Under the terms 00008 // of Contract DE-AC04-94AL85000 with Sandia Corporation, the U.S. Government 00009 // retains certain rights in this software. 00010 // 00011 // This library is free software; you can redistribute it and/or modify 00012 // it under the terms of the GNU Lesser General Public License as 00013 // published by the Free Software Foundation; either version 2.1 of the 00014 // License, or (at your option) any later version. 00015 // 00016 // This library is distributed in the hope that it will be useful, but 00017 // WITHOUT ANY WARRANTY; without even the implied warranty of 00018 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00019 // Lesser General Public License for more details. 00020 // 00021 // You should have received a copy of the GNU Lesser General Public 00022 // License along with this library; if not, write to the Free Software 00023 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 00024 // USA 00025 // Questions? Contact Kevin Long (krlong@sandia.gov), 00026 // Sandia National Laboratories, Livermore, California, USA 00027 // 00028 // ************************************************************************ 00029 /* @HEADER@ */ 00030 00031 #ifndef SUNDANCE_COLLECTIVEEXCEPTIONCHECK_H 00032 #define SUNDANCE_COLLECTIVEEXCEPTIONCHECK_H 00033 00034 #include "SundanceDefs.hpp" 00035 #include "PlayaMPIComm.hpp" 00036 00037 00038 namespace Sundance 00039 { 00040 using Playa::MPIComm; 00041 00042 00043 /** Call this function upon catching an exception at a point before a collective 00044 * operation. This function will do an AllReduce in conjunction with calls 00045 * to either this function or its partner, checkForFailures(), on the 00046 * other processors. This procedure has the effect of communicating to the other 00047 * processors that an exception has been detected on this one. */ 00048 void reportFailure(const MPIComm& comm); 00049 00050 /** Call this function after exception-free completion of a 00051 * try/catch block preceding a collective operation. This function 00052 * will do an AllReduce in conjunction with calls to either this 00053 * function or its partner, reportFailure(), on the other 00054 * processors. If a failure has been reported by another processor, the 00055 * call to checkForFailures() will return true and an exception can be thrown. */ 00056 bool checkForFailures(const MPIComm& comm); 00057 } 00058 00059 #endif