From edc5a44c36df0c2e73cdd71f843141cdf4ca844c Mon Sep 17 00:00:00 2001 From: minhdiep Date: Fri, 2 Jul 2010 15:23:56 -0600 Subject: [PATCH] b=23175 Use MPI_Bcast to send random value to all ranks The file size will be different if each rank generate its own chunksize. We need rank 0 to generate the random and pass it to all ranks i=Johann --- lustre/tests/mpi/write_disjoint.c | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) diff --git a/lustre/tests/mpi/write_disjoint.c b/lustre/tests/mpi/write_disjoint.c index f26853b..f2cb01c 100644 --- a/lustre/tests/mpi/write_disjoint.c +++ b/lustre/tests/mpi/write_disjoint.c @@ -88,6 +88,7 @@ int main (int argc, char *argv[]) { ssize_t ret; char *filename = "/mnt/lustre/write_disjoint"; int numloops = 1000; + int random = 0; error = MPI_Init(&argc, &argv); if (error != MPI_SUCCESS) @@ -133,12 +134,23 @@ int main (int argc, char *argv[]) { if (ret != 0) rprintf(rank, n, "truncate() returned %s\n", strerror(errno) ); + random = rand(); } - CHUNK_SIZE(n) = rand() % CHUNK_MAX_SIZE; + MPI_Bcast(&random, 1, MPI_INT, 0, MPI_COMM_WORLD); + CHUNK_SIZE(n) = random % CHUNK_MAX_SIZE; if (n % 1000 == 0 && rank == 0) printf("loop %d: chunk_size %lu\n", n, CHUNK_SIZE(n)); + if (stat(filename, &stat_buf) < 0) + rprintf(rank, n, "error stating %s: %s\n", + filename, strerror(errno)); + + if (stat_buf.st_size != 0) + rprintf(rank, n, "filesize = %lu. " + "Should be zero after truncate\n", + stat_buf.st_size); + MPI_Barrier(MPI_COMM_WORLD); /* Do the race */ -- 1.8.3.1