doc/gtut-files/09-simpledata.c

   1 /* Copyright (c) 2006, 2007, 2010. The SimGrid Team.
   2  * All rights reserved.                                                     */
   3
   4 /* This program is free software; you can redistribute it and/or modify it
   5   * under the terms of the license (GNU LGPL) which comes with this package. */
   6
   7 #include <gras.h>
   8
   9 XBT_LOG_NEW_DEFAULT_CATEGORY(test, "My little example");
  10
  11 typedef struct {
  12   int killed;
  13 } server_data_t;
  14
  15
  16 int server_kill_cb(gras_msg_cb_ctx_t ctx, void *payload)
  17 {
  18   double delay = *(double *) payload;
  19   gras_socket_t client = gras_msg_cb_ctx_from(ctx);
  20   server_data_t *globals = (server_data_t *) gras_userdata_get();
  21
  22   CRITICAL3("Argh, %s:%d gave me %.2f seconds before suicide!",
  23             gras_socket_peer_name(client), gras_socket_peer_port(client),
  24             delay);
  25   gras_os_sleep(delay);
  26   CRITICAL0("Bye folks...");
  27
  28
  29   globals->killed = 1;
  30
  31   return 0;
  32 }                               /* end_of_kill_callback */
  33
  34 int server_hello_cb(gras_msg_cb_ctx_t ctx, void *payload)
  35 {
  36   char *msg = *(char **) payload;
  37   gras_socket_t client = gras_msg_cb_ctx_from(ctx);
  38
  39   INFO3("Cool, we received a message from %s:%d. Here it is: \"%s\"",
  40         gras_socket_peer_name(client), gras_socket_peer_port(client), msg);
  41
  42   return 0;
  43 }                               /* end_of_hello_callback */
  44
  45 void message_declaration(void)
  46 {
  47   gras_msgtype_declare("kill", gras_datadesc_by_name("double"));
  48   gras_msgtype_declare("hello", gras_datadesc_by_name("string"));
  49 }
  50
  51
  52 int server(int argc, char *argv[])
  53 {
  54   gras_socket_t mysock;         /* socket on which I listen */
  55   server_data_t *globals;
  56
  57   gras_init(&argc, argv);
  58
  59   globals = gras_userdata_new(server_data_t *);
  60   globals->killed = 0;
  61
  62   message_declaration();
  63   mysock = gras_socket_server(atoi(argv[1]));
  64
  65   gras_cb_register("hello", &server_hello_cb);
  66   gras_cb_register("kill", &server_kill_cb);
  67
  68   while (!globals->killed) {
  69     gras_msg_handle(-1);        /* blocking */
  70   }
  71
  72   gras_exit();
  73   return 0;
  74 }
  75
  76 int client(int argc, char *argv[])
  77 {
  78   gras_socket_t mysock;         /* socket on which I listen */
  79   gras_socket_t toserver;       /* socket used to write to the server */
  80
  81   gras_init(&argc, argv);
  82
  83   message_declaration();
  84   mysock = gras_socket_server_range(1024, 10000, 0, 0);
  85
  86   VERB1("Client ready; listening on %d", gras_socket_my_port(mysock));
  87
  88   gras_os_sleep(1.5);           /* sleep 1 second and half */
  89   toserver = gras_socket_client(argv[1], atoi(argv[2]));
  90
  91   char *hello_payload = "Nice to meet you";
  92   gras_msg_send(toserver, "hello", &hello_payload);
  93   INFO1("we sent the hello to the server on %s.",
  94         gras_socket_peer_name(toserver));
  95
  96   double kill_payload = 0.5;
  97   gras_msg_send(toserver, "kill", &kill_payload);
  98   INFO0("Gave the server more 0.5 second to live");
  99
 100   gras_exit();
 101   return 0;
 102 }