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) {
17 double delay = *(double*)payload;
18 gras_socket_t client = gras_msg_cb_ctx_from(ctx);
19 server_data_t *globals=(server_data_t*)gras_userdata_get();
21 CRITICAL3("Argh, %s:%d gave me %.2f seconds before suicide!",
22 gras_socket_peer_name(client), gras_socket_peer_port(client),delay);
24 CRITICAL0("Bye folks...");
30 } /* end_of_kill_callback */
32 int server_hello_cb(gras_msg_cb_ctx_t ctx, void *payload) {
33 char *msg=*(char**)payload;
34 gras_socket_t client = gras_msg_cb_ctx_from(ctx);
36 INFO3("Cool, we received a message from %s:%d. Here it is: \"%s\"",
37 gras_socket_peer_name(client), gras_socket_peer_port(client),
41 } /* end_of_hello_callback */
43 void message_declaration(void) {
44 gras_msgtype_declare("kill", gras_datadesc_by_name("double"));
45 gras_msgtype_declare("hello", gras_datadesc_by_name("string"));
49 int server(int argc, char *argv[]) {
50 gras_socket_t mysock; /* socket on which I listen */
51 server_data_t *globals;
53 gras_init(&argc,argv);
55 globals=gras_userdata_new(server_data_t*);
58 message_declaration();
59 mysock = gras_socket_server(atoi(argv[1]));
61 gras_cb_register("hello",&server_hello_cb);
62 gras_cb_register("kill",&server_kill_cb);
64 while (!globals->killed) {
65 gras_msg_handle(-1); /* blocking */
72 int client(int argc, char *argv[]) {
73 gras_socket_t mysock; /* socket on which I listen */
74 gras_socket_t toserver; /* socket used to write to the server */
76 gras_init(&argc,argv);
78 message_declaration();
79 mysock = gras_socket_server_range(1024, 10000, 0, 0);
81 VERB1("Client ready; listening on %d", gras_socket_my_port(mysock));
83 gras_os_sleep(1.5); /* sleep 1 second and half */
84 toserver = gras_socket_client(argv[1], atoi(argv[2]));
86 char *hello_payload="Nice to meet you";
87 gras_msg_send(toserver,"hello", &hello_payload);
88 INFO1("we sent the hello to the server on %s.", gras_socket_peer_name(toserver));
90 double kill_payload=0.5;
91 gras_msg_send(toserver,"kill", &kill_payload);
92 INFO0("Gave the server more 0.5 second to live");