Sending

C | Fortran-2008 | Fortran-90

MPI_Buffer_detach

Definition

MPI_Buffer_detach removes the buffer currently attached to the MPI buffer space, which has been attached with MPI_Buffer_attach. MPI_Buffer_detach will block until all the messages contained in the attached buffer are sent. Note that detaching a buffer does not free the corresponding memory; it is the responsibility of the user to do so.

Copy

Feedback

int MPI_Buffer_detach(void* buffer,
                      int* size);

Parameters

buffer

A pointer on the pointer in which write the address of the buffer detached. The fact that the argument type is "void*" and not "void**" is not a mistake. It is explained in the MPI standard as being a convenience to avoid type castings.

size

A pointer on the variable in which write the size of the buffer detached, in bytes.

Return value

The error code returned from the buffer detachment.

Example

Copy

Feedback

#include <stdio.h>
#include <stdlib.h>
#include <mpi.h>

/**
 * @brief Illustrate how to detach the memory buffer from MPI.
 * @details This application requires 2 processes: 1 sender and 1 receiver.
 **/
int main(int argc, char* argv[])
{
    MPI_Init(&argc, &argv);

    // Check that 2 processes are used
    int size;
    MPI_Comm_size(MPI_COMM_WORLD, &size);
    if(size != 2)
    {
        printf("This application is meant to be run with 2 processes.\n");
        MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
    }

    // Get my rank and do the corresponding job
    enum role_ranks { SENDER, RECEIVER };
    int my_rank;
    MPI_Comm_rank(MPI_COMM_WORLD, &my_rank);
    switch(my_rank)
    {
        case SENDER:
        {
            // The message to send
            int message = 1234;

            // Allocate enough space to issue the buffered send
            int buffer_size = (MPI_BSEND_OVERHEAD + sizeof(int));
            char* buffer = malloc(buffer_size);

            // Pass the buffer allocated to MPI so it uses it when we issue MPI_Bsend
            MPI_Buffer_attach(buffer, buffer_size);

            // Issue the buffered send
            printf("[Process %d] I send value %d to process %d.\n", my_rank, message, RECEIVER);
            MPI_Bsend(&message, 1, MPI_INT, RECEIVER, 0, MPI_COMM_WORLD);

            // Detach the buffer no-longer used (it will wait for MPI_Bsend message to be sent first)
            MPI_Buffer_detach(&buffer, &buffer_size);
            free(buffer);
            break;
        }
        case RECEIVER:
        {
            int buffer;
            MPI_Recv(&buffer, 1, MPI_INT, SENDER, 0, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
            printf("[Process %d] I received value %d.\n", my_rank, buffer);
            break;
        }
    }

    MPI_Finalize();

    return EXIT_SUCCESS;
}