Add scaling option

swiftmpistepsim.c

@@ -35,6 +35,9 @@ int myrank = -1;
 /* Are we verbose. */
 static int verbose = 0;
 
+/* Scale to apply to the size of the messages we send. */
+static float messagescale = 1.0;
+
 /* Attempt to keep original injection time differences. */
 static int usetics = 1;
 
@@ -388,6 +391,9 @@ static void pick_logs(void) {
         reqs_queue[nr_reqs] = log;
         nr_reqs++;
 
+        /* Scale size. */
+        log->size *= messagescale;
+
       } else {
         error("task type '%d' is not a known send or recv task", log->type);
       }
@@ -437,7 +443,7 @@ int main(int argc, char *argv[]) {
   /* Handle the command-line, we expect a mpiuse data file to read and various
    * options. */
   int opt;
-  while ((opt = getopt(argc, argv, "vfd")) != -1) {
+  while ((opt = getopt(argc, argv, "vfds:")) != -1) {
     switch (opt) {
       case 'd':
         datacheck = 1;
@@ -445,6 +451,9 @@ int main(int argc, char *argv[]) {
       case 'f':
         usetics = 0;
         break;
+      case 's':
+        messagescale = atof(optarg);
+        break;
       case 'v':
         verbose = 1;
         break;