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

int main(int argc, char* argv[])
{
  int rank, size;
  MPI_Status status;
  MPI_Request req;

  //inicializácia MPI
  MPI_Init(&argc, &argv);

  //zistenie poradového čísla procesu - rank
  MPI_Comm_rank(MPI_COMM_WORLD, &rank);
  //zistenie celkového počtu procesov - size
  MPI_Comm_size(MPI_COMM_WORLD, &size);

  int send_buf, recv_buf, sum=0, odosielatel, adresat;

  send_buf = rank;
  //výpočet rankov odosielateľa a adresáta
  odosielatel = (rank - 1 + size) % size;
  adresat = (rank + 1) % size;

  for(int i=0; i<size; i++) {
    //odoslanie správy
    MPI_Issend(&send_buf, 1, MPI_INT, adresat, 0, MPI_COMM_WORLD, &req);
    //prijatie správy
    MPI_Recv(&recv_buf, 1, MPI_INT, odosielatel, 0, MPI_COMM_WORLD, &status);
    //čakanie na dokončenie neblokujúcej operácie
    MPI_Wait(&req, &status);
    sum += recv_buf;
    send_buf = recv_buf;
  }

  printf("Proces %d vypocital sumu %d\n", rank, sum);

  //ukončenie MPI
  MPI_Finalize();

  return(0);
}