From: Martin Quinson <martin.quinson@loria.fr>
Date: Fri, 18 Nov 2016 21:49:44 +0000 (+0100)
Subject: test to suspend an exec too
X-Git-Tag: v3_14~174
X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/d699aead00cdb6640cbc96582bd2defeb540b79a

test to suspend an exec too
---

diff --git a/examples/msg/process-suspend/process-suspend.c b/examples/msg/process-suspend/process-suspend.c
index d4e79ba526..b4fb807e6a 100644
--- a/examples/msg/process-suspend/process-suspend.c
+++ b/examples/msg/process-suspend/process-suspend.c
@@ -19,11 +19,16 @@ static int lazy_guy(int argc, char *argv[])
   MSG_process_sleep(10.0);
   XBT_INFO("Mmm... waking up.");
 
-  XBT_INFO("Going to sleep one more time...");
+  XBT_INFO("Going to sleep one more time (for 10 sec)...");
   MSG_process_sleep(10.0);
   XBT_INFO("Waking up once for all!");
 
-  XBT_INFO("Mmmh, goodbye now.");
+  XBT_INFO("Ok, let's do some work, then (for 10 sec on Boivin).");
+  msg_task_t task = MSG_task_create("easy work", 980.95e6, 0, NULL);
+  MSG_task_execute(task);
+  MSG_task_destroy(task);
+
+  XBT_INFO("Mmmh, I'm done now. Goodbye.");
   return 0;
 }
 
@@ -55,7 +60,14 @@ static int dream_master(int argc, char *argv[])
   XBT_INFO("Wake up, lazy guy!");
   MSG_process_resume(lazy);
 
-  XBT_INFO("OK, goodbye now.");
+  MSG_process_sleep(5.0);
+  XBT_INFO("Give a 2 seconds break to the lazy guy while he's working...");
+  MSG_process_suspend(lazy);
+  MSG_process_sleep(2.0);
+  XBT_INFO("Back to work, lazy guy!");
+  MSG_process_resume(lazy);
+
+  XBT_INFO("OK, I'm done here.");
   return 0;
 }
 
@@ -73,6 +85,5 @@ int main(int argc, char *argv[])
   xbt_dynar_free(&hosts);
   res = MSG_main();                 /* - Run the simulation */
 
-  XBT_INFO("Simulation time %g", MSG_get_clock());
   return res != MSG_OK;
 }
diff --git a/examples/msg/process-suspend/process-suspend.tesh b/examples/msg/process-suspend/process-suspend.tesh
index e4b69d281f..2e406c4e7e 100644
--- a/examples/msg/process-suspend/process-suspend.tesh
+++ b/examples/msg/process-suspend/process-suspend.tesh
@@ -14,11 +14,13 @@ $ $SG_TEST_EXENV ${bindir:=.}/process-suspend ${srcdir:=.}/small_platform.xml "-
 > [ 15.000000] (1:dream_master@Boivin) Let him finish his siesta.
 > [ 25.000000] (1:dream_master@Boivin) Wake up, lazy guy!
 > [ 25.000000] (2:Lazy@Boivin) Mmm... waking up.
-> [ 25.000000] (2:Lazy@Boivin) Going to sleep one more time...
+> [ 25.000000] (2:Lazy@Boivin) Going to sleep one more time (for 10 sec)...
 > [ 30.000000] (1:dream_master@Boivin) Suspend again the lazy guy while he's sleeping...
 > [ 30.000000] (1:dream_master@Boivin) This time, don't let him finish his siesta.
 > [ 32.000000] (1:dream_master@Boivin) Wake up, lazy guy!
-> [ 32.000000] (1:dream_master@Boivin) OK, goodbye now.
 > [ 35.000000] (2:Lazy@Boivin) Waking up once for all!
-> [ 35.000000] (2:Lazy@Boivin) Mmmh, goodbye now.
-> [ 35.000000] (0:maestro@) Simulation time 35
+> [ 35.000000] (2:Lazy@Boivin) Ok, let's do some work, then (for 10 sec on Boivin).
+> [ 37.000000] (1:dream_master@Boivin) Give a 2 seconds break to the lazy guy while he's working...
+> [ 39.000000] (1:dream_master@Boivin) Back to work, lazy guy!
+> [ 39.000000] (1:dream_master@Boivin) OK, I'm done here.
+> [ 47.000000] (2:Lazy@Boivin) Mmmh, I'm done now. Goodbye.