MPI Implimentation останавливается после двух проходов - PullRequest
Новая
       6

MPI Implimentation останавливается после двух проходов

0 голосов
/ 15 октября 2018

Я довольно новичок в MPI, поэтому я не уверен, почему этот код не работает должным образом.Идея состоит в том, чтобы передать целое число случайному узлу и уменьшить его, пока не достигнет 0. Когда я пытаюсь запустить его, он пропускает целое число дважды и останавливается.Может кто-нибудь, пожалуйста, укажите мне в правильном направлении?Спасибо! 

if (rank == 0)
{
  potato = rand() % 100 + size; // generate a random number between the number of processors and 100
  sendTo = rand() % (size - 1) + 1; // generate a number (not 0) to represent the process to send the potato to

  MPI_Send(&potato, 1, MPI_INT, sendTo, 0, MPI_COMM_WORLD); // send the potato
}

else // any process other than 0
{

  MPI_Recv(&potato, 1, MPI_INT, MPI_ANY_SOURCE, MPI_ANY_TAG, MPI_COMM_WORLD, MPI_STATUS_IGNORE); //receive potato

  if (potato == -1) // check for termination int
    return;

  --potato; // decrement potato

  if (potato != 0)
  {
    do
    {
      sendTo = rand() % (size - 1) + 1; // send to a process 1 through size - 1
    } while (sendTo == rank || sendTo == 0); // make sure it won't send the potato to itself or 0

    printf("Node %d has the potato, passing to node %d.\n", rank, sendTo);
    MPI_Send(&potato, 1, MPI_INT, sendTo, 0, MPI_COMM_WORLD);

  }

  else // potato == 0
  {
    printf("Node %d is it, game over.\n", rank);

    potato = -1;
    for (int i = 1; i < size; ++rank) // send termination message
      MPI_Send(&potato, 1, MPI_INT, i, 0, MPI_COMM_WORLD);
  }
}

Вывод: 

Potato: 44
Node 3 has the potato, Passing to node 2.
Node 2 has the potato, Passing to node 3.

1 Ответ

0 голосов
/ 15 октября 2018

В вашем коде отсутствует какой-то цикл.В вашем примере, чтобы узел 3 получил патато во второй раз, MPI_Recv должен быть вызван еще раз. 

if (rank == 0)
{
  potato = rand() % 100 + size; // generate a random number between the number of processors and 100
  sendTo = rand() % (size - 1) + 1; // generate a number (not 0) to represent the process to send the potato to

  MPI_Send(&potato, 1, MPI_INT, sendTo, 0, MPI_COMM_WORLD); // send the potato
}

else // any process other than 0
{
  /* Here is the loop beginning, while patato is not -1, continue reading*/
  while (1)
  {
    MPI_Recv(&potato, 1, MPI_INT, MPI_ANY_SOURCE, MPI_ANY_TAG, MPI_COMM_WORLD, MPI_STATUS_IGNORE); //receive potato

    if (potato == -1) // check for termination int
      return;

    --potato; // decrement potato

    if (potato != 0)
    {
      do
      {
        sendTo = rand() % (size - 1) + 1; // send to a process 1 through size - 1
      } while (sendTo == rank || sendTo == 0); // make sure it won't send the potato to itself or 0

      printf("Node %d has the potato, passing to node %d.\n", rank, sendTo);
      MPI_Send(&potato, 1, MPI_INT, sendTo, 0, MPI_COMM_WORLD);

    }

    else // potato == 0
    {
      printf("Node %d is it, game over.\n", rank);

      potato = -1;
      for (int i = 1; i < size; ++rank) // send termination message
        MPI_Send(&potato, 1, MPI_INT, i, 0, MPI_COMM_WORLD);

    }
  }
}
...