1 /* Copyright (c) 2010-2017. The SimGrid Team. All rights reserved. */
3 /* This program is free software; you can redistribute it and/or modify it
4 * under the terms of the license (GNU LGPL) which comes with this package. */
6 #ifndef SMPI_REQUEST_HPP_INCLUDED
7 #define SMPI_REQUEST_HPP_INCLUDED
10 #include "src/smpi/smpi_f2c.hpp"
15 class Request : public F2C {
18 /* in the case of non-contiguous memory the user address should be keep
19 * to unserialize the data inside the user memory*/
21 /* this let us know how to unserialize at the end of
23 MPI_Datatype old_type_;
28 //to handle cases where we have an unknown sender
29 //We can't override src, tag, and size, because the request may be reused later
35 smx_activity_t action_;
38 MPI_Request detached_sender_;
43 Request(void *buf, int count, MPI_Datatype datatype, int src, int dst, int tag, MPI_Comm comm, unsigned flags);
52 void print_request(const char *message);
55 static void finish_wait(MPI_Request* request, MPI_Status * status);
56 static void unref(MPI_Request* request);
57 static void wait(MPI_Request* req, MPI_Status * status);
58 static MPI_Request send_init(void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm);
59 static MPI_Request isend_init(void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm);
60 static MPI_Request ssend_init(void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm);
61 static MPI_Request rma_send_init(void *buf, int count, MPI_Datatype datatype, int src, int dst, int tag, MPI_Comm comm,MPI_Op op);
62 static MPI_Request recv_init(void *buf, int count, MPI_Datatype datatype, int src, int tag, MPI_Comm comm);
63 static MPI_Request rma_recv_init(void *buf, int count, MPI_Datatype datatype, int src, int dst, int tag, MPI_Comm comm,MPI_Op op);
64 static MPI_Request irecv_init(void *buf, int count, MPI_Datatype datatype, int src, int tag, MPI_Comm comm);
65 static MPI_Request isend(void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm);
66 static MPI_Request issend(void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm);
67 static MPI_Request irecv(void *buf, int count, MPI_Datatype datatype, int src, int tag, MPI_Comm comm);
69 static void recv(void *buf, int count, MPI_Datatype datatype, int src, int tag, MPI_Comm comm, MPI_Status * status);
70 static void send(void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm);
71 static void ssend(void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm);
73 static void sendrecv(void *sendbuf, int sendcount, MPI_Datatype sendtype,int dst, int sendtag,
74 void *recvbuf, int recvcount, MPI_Datatype recvtype, int src, int recvtag,
75 MPI_Comm comm, MPI_Status * status);
77 static void startall(int count, MPI_Request * requests);
79 static int test(MPI_Request * request,MPI_Status * status);
80 static int testsome(int incount, MPI_Request requests[], int *indices, MPI_Status status[]);
81 static int testany(int count, MPI_Request requests[], int *index, MPI_Status * status);
82 static int testall(int count, MPI_Request requests[], MPI_Status status[]);
84 static void probe(int source, int tag, MPI_Comm comm, MPI_Status* status);
85 static void iprobe(int source, int tag, MPI_Comm comm, int* flag, MPI_Status* status);
87 static int waitany(int count, MPI_Request requests[], MPI_Status * status);
88 static int waitall(int count, MPI_Request requests[], MPI_Status status[]);
89 static int waitsome(int incount, MPI_Request requests[], int *indices, MPI_Status status[]);
91 static int match_send(void* a, void* b,smx_activity_t ignored);
92 static int match_recv(void* a, void* b,smx_activity_t ignored);
95 static void free_f(int id);
96 static Request* f2c(int);