Newer
Older
Podhorszki, Norbert
committed
/*
* Distributed under the OSI-approved Apache License, Version 2.0. See
* accompanying file Copyright.txt for details.
*
* helloADIOS1Writer.cpp : Simple self-descriptive example of how to write a
* variable to a ADIOS1 BP File that lives in several MPI processes. Test runs
* when ADIOS2 is linked with ADIOS1 library
Podhorszki, Norbert
committed
*
* Created on: Feb 16, 2017
* Author: Norbert Podhorszki pnorbert@ornl.gov
Podhorszki, Norbert
committed
*/
#include <ios> //std::ios_base::failure
#include <iostream> //std::cout
Podhorszki, Norbert
committed
#include <mpi.h>
#include <stdexcept> //std::invalid_argument std::exception
#include <vector>
Podhorszki, Norbert
committed
Podhorszki, Norbert
committed
Podhorszki, Norbert
committed
{
MPI_Init(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
/** Application variable */
std::vector<float> myFloats = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9};
const std::size_t Nx = myFloats.size();
Podhorszki, Norbert
committed
{
/** ADIOS class factory of IO class objects, DebugON is recommended */
adios::ADIOS adios(MPI_COMM_WORLD, adios::DebugON);
/*** IO class object: settings and factory of Settings: Variables,
* Parameters, Transports, and Execution: Engines */
adios::IO &adios1IO = adios.DeclareIO("ADIOS1IO");
adios1IO.SetEngine("ADIOS1Writer");
/** global array : name, { shape (total) }, { start (local) }, { count
* (local) }, all are constant dimensions */
adios::Variable<float> &bpFloats = adios1IO.DefineVariable<float>(
"bpFloats", {size * Nx}, {rank * Nx}, {Nx}, adios::ConstantDims);
/** Engine derived class, spawned to start IO operations */
auto adios1Writer =
adios1IO.Open("myVector.bp", adios::OpenMode::Write);
if (!adios1Writer)
{
throw std::ios_base::failure(
"ERROR: adios1Writer not created at Open\n");
}
/** Write variable for buffering */
adios1Writer->Write<float>(bpFloats, myFloats.data());
/** Create bp file, engine becomes unreachable after this*/
adios1Writer->Close();
Podhorszki, Norbert
committed
}
catch (std::invalid_argument &e)
Podhorszki, Norbert
committed
{
std::cout << "Invalid argument exception, STOPPING PROGRAM from rank "
<< rank << "\n";
std::cout << e.what() << "\n";
Podhorszki, Norbert
committed
}
catch (std::ios_base::failure &e)
Podhorszki, Norbert
committed
{
std::cout
<< "IO System base failure exception, STOPPING PROGRAM from rank "
<< rank << "\n";
std::cout << e.what() << "\n";
}
catch (std::exception &e)
{
std::cout << "Exception, STOPPING PROGRAM from rank " << rank << "\n";
std::cout << e.what() << "\n";
Podhorszki, Norbert
committed
}
MPI_Finalize();
Podhorszki, Norbert
committed