summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perform/pio_perf.c46
1 files changed, 46 insertions, 0 deletions
diff --git a/perform/pio_perf.c b/perform/pio_perf.c
index 7d36b26..3afc58d 100644
--- a/perform/pio_perf.c
+++ b/perform/pio_perf.c
@@ -413,12 +413,16 @@ run_test(iotype iot, parameters parms)
int comm_size;
long raw_size;
minmax total_mm;
+ minmax *write_mpi_mm_table;
minmax *write_mm_table;
minmax *write_gross_mm_table;
+ minmax *read_mpi_mm_table;
minmax *read_mm_table;
minmax *read_gross_mm_table;
+ minmax write_mpi_mm = {0.0, 0.0, 0.0, 0};
minmax write_mm = {0.0, 0.0, 0.0, 0};
minmax write_gross_mm = {0.0, 0.0, 0.0, 0};
+ minmax read_mpi_mm = {0.0, 0.0, 0.0, 0};
minmax read_mm = {0.0, 0.0, 0.0, 0};
minmax read_gross_mm = {0.0, 0.0, 0.0, 0};
@@ -441,12 +445,19 @@ run_test(iotype iot, parameters parms)
MPI_Comm_size(pio_comm_g, &comm_size);
+ write_mpi_mm_table = malloc(parms.num_iters * sizeof(minmax));
write_mm_table = malloc(parms.num_iters * sizeof(minmax));
write_gross_mm_table = malloc(parms.num_iters * sizeof(minmax));
+ read_mpi_mm_table = malloc(parms.num_iters * sizeof(minmax));
read_mm_table = malloc(parms.num_iters * sizeof(minmax));
read_gross_mm_table = malloc(parms.num_iters * sizeof(minmax));
for (i = 0; i < parms.num_iters; ++i) {
+ write_mpi_mm_table[i].min = 0.0;
+ write_mpi_mm_table[i].max = 0.0;
+ write_mpi_mm_table[i].sum = 0.0;
+ write_mpi_mm_table[i].num = 0;
+
write_mm_table[i].min = 0.0;
write_mm_table[i].max = 0.0;
write_mm_table[i].sum = 0.0;
@@ -457,6 +468,11 @@ run_test(iotype iot, parameters parms)
write_gross_mm_table[i].sum = 0.0;
write_gross_mm_table[i].num = 0;
+ read_mpi_mm_table[i].min = 0.0;
+ read_mpi_mm_table[i].max = 0.0;
+ read_mpi_mm_table[i].sum = 0.0;
+ read_mpi_mm_table[i].num = 0;
+
read_mm_table[i].min = 0.0;
read_mm_table[i].max = 0.0;
read_mm_table[i].sum = 0.0;
@@ -475,6 +491,12 @@ run_test(iotype iot, parameters parms)
MPI_Barrier(pio_comm_g);
res = do_pio(parms);
+ /* gather all of the "mpi write" times */
+ t = get_time(res.timers, HDF5_MPI_WRITE);
+ get_minmax(&write_mpi_mm, t);
+
+ write_mpi_mm_table[i] = write_mpi_mm;
+
/* gather all of the "write" times */
t = get_time(res.timers, HDF5_FINE_WRITE_FIXED_DIMS);
get_minmax(&write_mm, t);
@@ -487,6 +509,12 @@ run_test(iotype iot, parameters parms)
write_gross_mm_table[i] = write_gross_mm;
+ /* gather all of the "mpi read" times */
+ t = get_time(res.timers, HDF5_MPI_READ);
+ get_minmax(&read_mpi_mm, t);
+
+ read_mpi_mm_table[i] = read_mpi_mm;
+
/* gather all of the "read" times */
t = get_time(res.timers, HDF5_FINE_READ_FIXED_DIMS);
get_minmax(&read_mm, t);
@@ -501,6 +529,14 @@ run_test(iotype iot, parameters parms)
pio_time_destroy(res.timers);
}
+ /* show mpi write statics */
+ if (pio_debug_level >= 3) {
+ /* output all of the times for all iterations */
+ print_indent(3);
+ output_report("MPI Write details:\n");
+ output_all_info(write_mpi_mm_table, parms.num_iters, 4);
+ }
+
/* accumulate and output the max, min, and average "write" times */
if (pio_debug_level >= 3) {
/* output all of the times for all iterations */
@@ -543,6 +579,14 @@ run_test(iotype iot, parameters parms)
output_report("Average Throughput: %.2f MB/s\n",
total_mm.sum / total_mm.num);
+ /* show mpi read statics */
+ if (pio_debug_level >= 3) {
+ /* output all of the times for all iterations */
+ print_indent(3);
+ output_report("MPI Read details:\n");
+ output_all_info(read_mpi_mm_table, parms.num_iters, 4);
+ }
+
/* accumulate and output the max, min, and average "read" times */
if (pio_debug_level >= 3) {
/* output all of the times for all iterations */
@@ -586,6 +630,8 @@ run_test(iotype iot, parameters parms)
total_mm.sum / total_mm.num);
/* clean up our mess */
+ free(write_mpi_mm_table);
+ free(read_mpi_mm_table);
free(write_mm_table);
free(read_mm_table);
free(write_gross_mm_table);