Logo AND Algorithmique Numérique Distribuée

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