1 /* Copyright (c) 2006, 2007, 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");
16 int server_kill_cb(gras_msg_cb_ctx_t ctx, void *payload)
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();
22 XBT_CRITICAL("Argh, %s:%d gave me %.2f seconds before suicide!",
23 gras_socket_peer_name(client), gras_socket_peer_port(client),
26 XBT_CRITICAL("Bye folks...");
32 } /* end_of_kill_callback */
34 int server_hello_cb(gras_msg_cb_ctx_t ctx, void *payload)
36 char *msg = *(char **) payload;
37 gras_socket_t client = gras_msg_cb_ctx_from(ctx);
39 XBT_INFO("Cool, we received a message from %s:%d. Here it is: \"%s\"",
40 gras_socket_peer_name(client), gras_socket_peer_port(client), msg);
43 } /* end_of_hello_callback */
45 void message_declaration(void)
47 gras_msgtype_declare("kill", gras_datadesc_by_name("double"));
48 gras_msgtype_declare("hello", gras_datadesc_by_name("string"));
52 int server(int argc, char *argv[])
54 gras_socket_t mysock; /* socket on which I listen */
55 server_data_t *globals;
57 gras_init(&argc, argv);
59 globals = gras_userdata_new(server_data_t *);
62 message_declaration();
63 mysock = gras_socket_server(atoi(argv[1]));
65 gras_cb_register("hello", &server_hello_cb);
66 gras_cb_register("kill", &server_kill_cb);
68 while (!globals->killed) {
69 gras_msg_handle(-1); /* blocking */
76 int client(int argc, char *argv[])
78 gras_socket_t mysock; /* socket on which I listen */
79 gras_socket_t toserver; /* socket used to write to the server */
81 gras_init(&argc, argv);
83 message_declaration();
84 mysock = gras_socket_server_range(1024, 10000, 0, 0);
86 XBT_VERB("Client ready; listening on %d", gras_socket_my_port(mysock));
88 gras_os_sleep(1.5); /* sleep 1 second and half */
89 toserver = gras_socket_client(argv[1], atoi(argv[2]));
91 char *hello_payload = "Nice to meet you";
92 gras_msg_send(toserver, "hello", &hello_payload);
93 XBT_INFO("we sent the hello to the server on %s.",
94 gras_socket_peer_name(toserver));
96 double kill_payload = 0.5;
97 gras_msg_send(toserver, "kill", &kill_payload);
98 XBT_INFO("Gave the server more 0.5 second to live");