#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#include"mpi.h"
/**
* two phase non-blocking read and write
*
* int MPI_File_read_at_all_begin(MPI_File fh, MPI_Offset offset, void * buf, int count, MPI_Datatype datatype);
* int MPI_File_read_at_all_end(MPI_File fh, void * buf, MPI_Status *status);
*
* int MPI_File_write_at_all_begin(MPI_File fh, MPI_Offset offset, void * buf, int count, MPI_Datatype datatype);
* int MPI_File_write_at_all_end(MPI_File fh, void * buf, MPI_Status *status);
*
* MPI_Wait is not necessary any more!
*/
int main(int argc, char *argv[])
{
int totalTaskNum, rankID;
MPI_Init(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD, &rankID);
MPI_Comm_size(MPI_COMM_WORLD, &totalTaskNum);
char *filename = "file.txt";
MPI_File fh;
MPI_Status status;
MPI_File_open(MPI_COMM_WORLD, filename, MPI_MODE_CREATE | MPI_MODE_RDWR, MPI_INFO_NULL, &fh);
MPI_Offset offset = 0;
char buf[100];
sprintf(buf, "totalTaskNum = %d, Hello World!\n", totalTaskNum);
MPI_File_write_at_all_begin(fh, offset, buf, strlen(buf), MPI_CHAR);
MPI_File_write_at_all_end(fh, buf, &status);
MPI_File_read_at_all_begin(fh, offset, buf, sizeof(buf), MPI_CHAR);
//some optimization can be made here
MPI_File_read_at_all_end(fh, buf, &status);
printf("rankID = %d, content = \'%s\'\n", rankID, buf);
MPI_File_close(&fh);//after open, fh has the communicator info
MPI_Finalize();
return 0;
}
本文提供了一个使用MPI进行非阻塞读写的C语言示例程序。该程序展示了如何在并行环境中通过MPI_File_read_at_all_begin/end及MPI_File_write_at_all_begin/end函数实现文件操作。
1522

被折叠的 条评论
为什么被折叠?



