3 more renamed tests

[simgrid.git] / examples / msg / token_ring / token_ring.c

diff --git a/examples/msg/token_ring/token_ring.c b/examples/msg/token_ring/token_ring.c
deleted file mode 100644 (file)
index 4dc5d71..0000000
--- a/examples/msg/token_ring/token_ring.c
+++ /dev/null
@@ -1,73 +0,0 @@
-/* Copyright (c) 2008-2015. The SimGrid Team.
- * All rights reserved.                                                     */
-
-/* This program is free software; you can redistribute it and/or modify it
- * under the terms of the license (GNU LGPL) which comes with this package. */
-
-#include "simgrid/msg.h"
-
-XBT_LOG_NEW_DEFAULT_CATEGORY(ring, "Messages specific for this msg example");
-
-/** @addtogroup MSG_examples
- * 
- *  @section MSG_ex_apps Examples of full applications
- * 
- * - <b>token_ring/ring_call.c</b>: Classical token ring communication, where a token is exchanged along a ring to
- *   reach every participant.
- */
-
-static int host(int argc, char *argv[])
-{
-  unsigned int task_comp_size = 50000000;
-  unsigned int task_comm_size = 1000000;
-  int host_number =
-          xbt_str_parse_int(MSG_process_get_name(MSG_process_self()), "Process name must be an integer but is: %s");
-  char mailbox[256];
-  msg_task_t task = NULL;
-  XBT_ATTRIB_UNUSED int res;
-  if (host_number == 0){ //root: send then receive
-    sprintf(mailbox, "%d", host_number+1);
-    task = MSG_task_create("Token", task_comp_size, task_comm_size, NULL);
-    XBT_INFO("Host \"%d\" send '%s' to Host \"%s\"",host_number,task->name,mailbox);
-    MSG_task_send(task, mailbox);
-    task = NULL;
-    res = MSG_task_receive(&(task), MSG_process_get_name(MSG_process_self()));
-    xbt_assert(res == MSG_OK, "MSG_task_get failed");
-    XBT_INFO("Host \"%d\" received \"%s\"",host_number, MSG_task_get_name(task));
-    MSG_task_destroy(task);
-  } else{ // receive then send
-    res = MSG_task_receive(&(task), MSG_process_get_name(MSG_process_self()));
-    xbt_assert(res == MSG_OK, "MSG_task_get failed");
-    XBT_INFO("Host \"%d\" received \"%s\"",host_number, MSG_task_get_name(task));
-
-    if(host_number+1 == MSG_get_host_number())
-      sprintf(mailbox, "0");
-    else
-      sprintf(mailbox, "%d", host_number+1);
-    XBT_INFO("Host \"%d\" send '%s' to Host \"%s\"",host_number,task->name,mailbox);
-    MSG_task_send(task, mailbox);
-  }
-  return 0;
-}
-
-int main(int argc, char **argv)
-{
-  unsigned int i;
-  MSG_init(&argc, argv);
-  MSG_create_environment(argv[1]);
-  xbt_dynar_t hosts = MSG_hosts_as_dynar();
-  msg_host_t h;
-  MSG_function_register("host", host);
-
-  XBT_INFO("Number of host '%d'",MSG_get_host_number());
-  xbt_dynar_foreach (hosts, i, h){
-    char* name_host = bprintf("%u",i);
-    MSG_process_create(name_host, host, NULL, h);
-    free(name_host);
-  }
-  xbt_dynar_free(&hosts);
-
-  int res = MSG_main();
-  XBT_INFO("Simulation time %g", MSG_get_clock());
-  return res != MSG_OK;
-}