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) {
17 gras_socket_t client = gras_msg_cb_ctx_from(ctx);
18 server_data_t *globals=(server_data_t*)gras_userdata_get();
20 CRITICAL2("Argh, killed by %s:%d! Bye folks...",
21 gras_socket_peer_name(client), gras_socket_peer_port(client));
26 } /* end_of_kill_callback */
28 int server_hello_cb(gras_msg_cb_ctx_t ctx, void *payload) {
29 gras_socket_t client = gras_msg_cb_ctx_from(ctx);
31 INFO2("Cool, we received the message from %s:%d.",
32 gras_socket_peer_name(client), gras_socket_peer_port(client));
35 } /* end_of_hello_callback */
37 int server(int argc, char *argv[]) {
38 gras_socket_t mysock; /* socket on which I listen */
39 server_data_t *globals;
41 gras_init(&argc,argv);
43 globals=gras_userdata_new(server_data_t*);
46 gras_msgtype_declare("hello", NULL);
47 gras_msgtype_declare("kill", NULL);
48 mysock = gras_socket_server(atoi(argv[1]));
50 gras_cb_register("hello",&server_hello_cb);
51 gras_cb_register("kill",&server_kill_cb);
53 while (!globals->killed) {
61 /* *********************** Client *********************** */
64 gras_socket_t toserver;
69 void client_do_hello(void) {
70 client_data_t *globals=(client_data_t*)gras_userdata_get();
72 gras_msg_send(globals->toserver,"hello", NULL);
73 INFO0("Hello sent to server");
74 } /* end_of_client_do_hello */
76 void client_do_stop(void) {
77 client_data_t *globals=(client_data_t*)gras_userdata_get();
79 gras_msg_send(globals->toserver,"kill", NULL);
80 INFO0("Kill sent to server");
82 gras_timer_cancel_repeat(0.5,client_do_hello);
85 INFO0("Break the client's while loop");
86 } /* end_of_client_do_stop */
88 int client(int argc, char *argv[]) {
89 gras_socket_t mysock; /* socket on which I listen */
90 client_data_t *globals;
92 gras_init(&argc,argv);
94 gras_msgtype_declare("hello", NULL);
95 gras_msgtype_declare("kill", NULL);
96 mysock = gras_socket_server_range(1024, 10000, 0, 0);
98 VERB1("Client ready; listening on %d", gras_socket_my_port(mysock));
100 globals=gras_userdata_new(client_data_t*);
103 gras_os_sleep(1.5); /* sleep 1 second and half */
104 globals->toserver = gras_socket_client(argv[1], atoi(argv[2]));
106 INFO0("Programming the repetitive action with a frequency of 0.5 sec");
107 gras_timer_repeat(0.5,client_do_hello);
109 INFO0("Programming the delayed action in 5 secs");
110 gras_timer_delay(5,client_do_stop);
112 while (!globals->done) {