| 59 |  | #ifdef IS_MPI | 
| 60 |  | ifstrstream::ifstrstream() | 
| 61 |  | :  std::basic_istream<char, std::char_traits<char> >(0), | 
| 62 | < | internalStringBuf_(), isRead(false)  { | 
| 62 | > | internalStringBuf_(), isRead(false)  { | 
| 63 |  | this->init(&internalStringBuf_); | 
| 64 |  | } | 
| 65 |  | #else | 
| 66 |  | ifstrstream::ifstrstream() | 
| 67 |  | :  std::basic_istream<char, std::char_traits<char> >(0), | 
| 68 | < | internalFileBuf_(), isRead(false)  { | 
| 68 | > | internalFileBuf_(), isRead(false)  { | 
| 69 |  | this->init(&internalFileBuf_); | 
| 70 |  | } | 
| 71 |  | #endif | 
| 80 |  | #ifdef IS_MPI | 
| 81 |  | ifstrstream::ifstrstream(const char* filename, std::ios_base::openmode mode, bool checkFilename) | 
| 82 |  | :  std::basic_istream<char, std::char_traits<char> >(0), | 
| 83 | < | internalStringBuf_(), isRead(false) { | 
| 83 | > | internalStringBuf_(), isRead(false) { | 
| 84 |  | this->init(&internalStringBuf_); | 
| 85 |  | isRead =  internalOpen(filename,  mode | std::ios_base::in, checkFilename); | 
| 86 |  | } | 
| 87 |  | #else | 
| 88 |  | ifstrstream::ifstrstream(const char* filename, std::ios_base::openmode mode, bool checkFilename) | 
| 89 |  | :  std::basic_istream<char, std::char_traits<char> >(0), | 
| 90 | < | internalFileBuf_(), isRead(false) { | 
| 90 | > | internalFileBuf_(), isRead(false) { | 
| 91 |  |  | 
| 92 |  | this->init(&internalFileBuf_); | 
| 93 |  | isRead =  internalOpen(filename,  mode | std::ios_base::in, checkFilename); | 
| 97 |  | * virtual destructor will close the file (in single mode) and clear | 
| 98 |  | * the stream buffer | 
| 99 |  | */ | 
| 100 | < | ifstrstream::~ifstrstream(){ | 
| 101 | < | close(); | 
| 100 | > | ifstrstream::~ifstrstream(){    close(); | 
| 101 |  | } | 
| 102 |  |  | 
| 103 |  | /** | 
| 182 |  | int myRank; | 
| 183 |  | int masterNode; | 
| 184 |  |  | 
| 185 | < | myRank =  MPI::COMM_WORLD.Get_rank(); | 
| 185 | > | MPI_Comm_rank( MPI_COMM_WORLD, &myRank); | 
| 186 | > |  | 
| 187 |  | masterNode = 0; | 
| 188 |  |  | 
| 189 |  | if (myRank == masterNode) { | 
| 192 |  |  | 
| 193 |  | //check the filename is the same | 
| 194 |  | filenameLen = strlen(filename); | 
| 195 | < | MPI::COMM_WORLD.Bcast(&filenameLen, 1, MPI::INT, masterNode); | 
| 196 | < | MPI::COMM_WORLD.Bcast((void*)filename, filenameLen, MPI::CHAR, | 
| 197 | < | masterNode); | 
| 195 | > | MPI_Bcast(&filenameLen, 1, MPI_INT, masterNode, MPI_COMM_WORLD); | 
| 196 | > | MPI_Bcast((void*)filename, filenameLen, MPI_CHAR, | 
| 197 | > | masterNode, MPI_COMM_WORLD); | 
| 198 |  |  | 
| 199 |  | diffFilename = 0; | 
| 200 | < | MPI::COMM_WORLD.Allreduce(&diffFilename, &error, 1, MPI::INT, MPI::SUM); | 
| 200 | > | MPI_Allreduce(&diffFilename, &error, 1, MPI_INT, MPI_SUM, | 
| 201 | > | MPI_COMM_WORLD); | 
| 202 |  |  | 
| 203 |  | //if file names are different just return false | 
| 204 |  | if (error > 0) | 
| 224 |  | fileSize = FileIOError; | 
| 225 |  |  | 
| 226 |  | //broadcast the file size | 
| 227 | < | MPI::COMM_WORLD.Bcast(&fileSize, 1, MPI::LONG, masterNode); | 
| 227 | > | MPI_Bcast(&fileSize, 1, MPI_LONG, masterNode, MPI_COMM_WORLD); | 
| 228 |  |  | 
| 229 |  | if (fileSize < 0) { | 
| 230 |  | fin.close(); | 
| 235 |  |  | 
| 236 |  | // make a c-style  std::string and broadcast it | 
| 237 |  | fbuf[fileSize] = '\0'; | 
| 238 | < | MPI::COMM_WORLD.Bcast(fbuf, fileSize + 1, MPI::CHAR, masterNode); | 
| 238 | > | MPI_Bcast(fbuf, fileSize + 1, MPI_CHAR, masterNode, MPI_COMM_WORLD); | 
| 239 |  |  | 
| 240 |  | //close the file and delete the buffer | 
| 241 |  | fin.close(); | 
| 243 |  | delete[] fbuf; | 
| 244 |  | }else{ | 
| 245 |  | fileSize = FileNotExists; | 
| 246 | < | MPI::COMM_WORLD.Bcast(&fileSize, 1, MPI::LONG, masterNode); | 
| 246 | > | MPI_Bcast(&fileSize, 1, MPI_LONG, masterNode, MPI_COMM_WORLD); | 
| 247 |  | return false; | 
| 248 |  | } | 
| 249 |  |  | 
| 251 |  |  | 
| 252 |  | //check file name | 
| 253 |  | if (checkFilename) { | 
| 254 | < | MPI::COMM_WORLD.Bcast(&filenameLen, 1, MPI::INT, masterNode); | 
| 254 | > | MPI_Bcast(&filenameLen, 1, MPI_INT, masterNode, MPI_COMM_WORLD); | 
| 255 |  |  | 
| 256 |  | char * masterFilename = new char[filenameLen]; | 
| 257 | < | MPI::COMM_WORLD.Bcast(masterFilename, filenameLen, MPI::CHAR, | 
| 258 | < | masterNode); | 
| 257 | > | MPI_Bcast(masterFilename, filenameLen, MPI_CHAR, | 
| 258 | > | masterNode, MPI_COMM_WORLD); | 
| 259 |  |  | 
| 260 |  | if( strcmp(masterFilename, filename) == 0) | 
| 261 |  | diffFilename = 0; | 
| 264 |  |  | 
| 265 |  | delete[] masterFilename; | 
| 266 |  |  | 
| 267 | < | MPI::COMM_WORLD.Allreduce(&diffFilename, &error, 1, MPI::INT, MPI::SUM); | 
| 267 | > | MPI_Allreduce(&diffFilename, &error, 1, MPI_INT, MPI_SUM, | 
| 268 | > | MPI_COMM_WORLD); | 
| 269 |  |  | 
| 270 |  | if (error > 0) | 
| 271 |  | return false; | 
| 272 |  | } | 
| 273 |  | //get file size | 
| 274 | < | MPI::COMM_WORLD.Bcast(&fileSize, 1, MPI::LONG, masterNode); | 
| 274 | > | MPI_Bcast(&fileSize, 1, MPI_LONG, masterNode, MPI_COMM_WORLD); | 
| 275 |  |  | 
| 276 |  | if (fileSize >= 0 ) { | 
| 277 |  | fbuf = new char[fileSize+1]; | 
| 278 |  | assert(fbuf); | 
| 279 |  |  | 
| 280 |  | //receive file content | 
| 281 | < | MPI::COMM_WORLD.Bcast(fbuf, fileSize + 1, MPI::CHAR, masterNode); | 
| 281 | > | MPI_Bcast(fbuf, fileSize + 1, MPI_CHAR, masterNode, MPI_COMM_WORLD); | 
| 282 |  |  | 
| 283 |  | internalStringBuf_.str(fbuf); | 
| 284 |  | delete [] fbuf; |