1 /* Copyright (c) 2006, 2007, 2009, 2010. The SimGrid Team.
2 * All rights reserved. */
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. */
9 XBT_LOG_NEW_DEFAULT_CATEGORY(test, "My little example");
11 /* *********************** Server *********************** */
16 int server_kill_cb(gras_msg_cb_ctx_t ctx, void *payload)
18 gras_socket_t client = gras_msg_cb_ctx_from(ctx);
19 server_data_t *globals = (server_data_t *) gras_userdata_get();
21 XBT_CRITICAL("Argh, killed by %s:%d! Bye folks...",
22 gras_socket_peer_name(client), gras_socket_peer_port(client));
27 } /* end_of_kill_callback */
29 int server_hello_cb(gras_msg_cb_ctx_t ctx, void *payload)
31 gras_socket_t client = gras_msg_cb_ctx_from(ctx);
33 XBT_INFO("Cool, we received the message from %s:%d.",
34 gras_socket_peer_name(client), gras_socket_peer_port(client));
37 } /* end_of_hello_callback */
39 int server(int argc, char *argv[])
41 gras_socket_t mysock; /* socket on which I listen */
42 server_data_t *globals;
44 gras_init(&argc, argv);
46 globals = gras_userdata_new(server_data_t *);
49 gras_msgtype_declare("hello", NULL);
50 gras_msgtype_declare("kill", NULL);
51 mysock = gras_socket_server(atoi(argv[1]));
53 gras_cb_register("hello", &server_hello_cb);
54 gras_cb_register("kill", &server_kill_cb);
56 while (!globals->killed) {
64 /* *********************** Client *********************** */
67 gras_socket_t toserver;
72 void client_do_hello(void)
74 client_data_t *globals = (client_data_t *) gras_userdata_get();
76 gras_msg_send(globals->toserver, "hello", NULL);
77 XBT_INFO("Hello sent to server");
78 } /* end_of_client_do_hello */
80 void client_do_stop(void)
82 client_data_t *globals = (client_data_t *) gras_userdata_get();
84 gras_msg_send(globals->toserver, "kill", NULL);
85 XBT_INFO("Kill sent to server");
87 gras_timer_cancel_repeat(0.5, client_do_hello);
90 XBT_INFO("Break the client's while loop");
91 } /* end_of_client_do_stop */
93 int client(int argc, char *argv[])
95 gras_socket_t mysock; /* socket on which I listen */
96 client_data_t *globals;
98 gras_init(&argc, argv);
100 gras_msgtype_declare("hello", NULL);
101 gras_msgtype_declare("kill", NULL);
102 mysock = gras_socket_server_range(1024, 10000, 0, 0);
104 XBT_VERB("Client ready; listening on %d", gras_socket_my_port(mysock));
106 globals = gras_userdata_new(client_data_t *);
109 gras_os_sleep(1.5); /* sleep 1 second and half */
110 globals->toserver = gras_socket_client(argv[1], atoi(argv[2]));
112 XBT_INFO("Programming the repetitive action with a frequency of 0.5 sec");
113 gras_timer_repeat(0.5, client_do_hello);
115 XBT_INFO("Programming the delayed action in 5 secs");
116 gras_timer_delay(5, client_do_stop);
118 while (!globals->done) {