X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/e44e3209d2f93ac9d645ec46bb058b05b770a524..9b5ba1582444ecd1bc7904b2aa0bb71fcabffc5e:/examples/ping/ping.c diff --git a/examples/ping/ping.c b/examples/ping/ping.c index b477365ba1..460e30400e 100644 --- a/examples/ping/ping.c +++ b/examples/ping/ping.c @@ -2,19 +2,18 @@ /* ping - ping/pong demo of GRAS features */ -/* Authors: Martin Quinson */ -/* Copyright (C) 2003 the OURAGAN project. */ +/* Copyright (c) 2003, 2004 Martin Quinson. All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it - under the terms of the license (GNU LGPL) which comes with this package. */ + * under the terms of the license (GNU LGPL) which comes with this package. */ #include #include #include -#include +#include "gras.h" -GRAS_LOG_NEW_DEFAULT_CATEGORY(Ping); +XBT_LOG_NEW_DEFAULT_CATEGORY(Ping,"Messages specific to this example"); /* ********************************************************************** * Comon code @@ -25,22 +24,13 @@ typedef struct { } msg_ping_t; /* Function prototypes */ -gras_error_t register_messages(void); +void register_messages(void); /* Code */ -gras_error_t register_messages(void) { - gras_error_t errcode; - gras_datadesc_type_t *payload_t; - gras_msgtype_t *msg_t; +void register_messages(void) { - TRY(gras_datadesc_declare_struct("msg_ping_t",&payload_t)); - TRY(gras_datadesc_declare_struct_append(payload_t,"dummy", - gras_datadesc_by_name("int"))); - - TRY(gras_msgtype_declare("ping", payload_t, &msg_t)); msg_t=NULL; - TRY(gras_msgtype_declare("pong", payload_t, &msg_t)); - - return no_error; + gras_msgtype_declare("ping", gras_datadesc_by_name("int")); + gras_msgtype_declare("pong", gras_datadesc_by_name("int")); } /* ********************************************************************** @@ -49,56 +39,56 @@ gras_error_t register_messages(void) { /* Global private data */ typedef struct { - gras_socket_t *sock; + gras_socket_t sock; int endcondition; } server_data_t; /* Function prototypes */ -int server_cb_ping_handler(gras_socket_t *expeditor, - gras_datadesc_type_t *payload_type, - void *payload_data); +int server_cb_ping_handler(gras_socket_t expeditor, + void *payload_data); int server (int argc,char *argv[]); -int server_cb_ping_handler(gras_socket_t *expeditor, - gras_datadesc_type_t *payload_type, - void *payload_data) { - - gras_error_t errcode; - msg_ping_t *msg=payload_data; +int server_cb_ping_handler(gras_socket_t expeditor, + void *payload_data) { + + xbt_error_t errcode; + int msg=*(int*)payload_data; gras_msgtype_t *pong_t=NULL; server_data_t *g=(server_data_t*)gras_userdata_get(); g->endcondition = 0; INFO3("SERVER: >>>>>>>> Got message PING(%d) from %s:%d <<<<<<<<", - msg->dummy, + msg, gras_socket_peer_name(expeditor), gras_socket_peer_port(expeditor)); - msg->dummy = 4321; - TRY(gras_msgtype_by_name("pong",&pong_t)); - errcode = gras_msg_send(expeditor, pong_t, payload_data); + msg = 4321; + errcode = gras_msg_send(expeditor, gras_msgtype_by_name("pong"), &msg); if (errcode != no_error) { - ERROR1("SERVER: Unable answer with PONG: %s\n", gras_error_name(errcode)); - gras_socket_close(&(g->sock)); + ERROR1("SERVER: Unable answer with PONG: %s\n", xbt_error_name(errcode)); + gras_socket_close(g->sock); return 1; } - free(msg); INFO0("SERVER: >>>>>>>> Answed with PONG(4321) <<<<<<<<"); g->endcondition = 1; + gras_socket_close(expeditor); return 1; } int server (int argc,char *argv[]) { - gras_error_t errcode; - server_data_t *g=gras_userdata_new(server_data_t); + xbt_error_t errcode; + server_data_t *g; gras_msgtype_t *ping_msg=NULL; int port = 4000; + gras_init(&argc,argv, NULL); + g=gras_userdata_new(server_data_t); + if (argc == 2) { port=atoi(argv[1]); } @@ -107,31 +97,30 @@ int server (int argc,char *argv[]) { if ((errcode=gras_socket_server(port,&(g->sock)))) { CRITICAL1("Error %s encountered while opening the server socket", - gras_error_name(errcode)); + xbt_error_name(errcode)); return 1; } - TRYFAIL(register_messages()); - TRYFAIL(register_messages()); - TRYFAIL(gras_msgtype_by_name("ping",&ping_msg)); - TRYFAIL(gras_cb_register(ping_msg,&server_cb_ping_handler)); + register_messages(); + register_messages(); + gras_cb_register(gras_msgtype_by_name("ping"),&server_cb_ping_handler); INFO1("SERVER: >>>>>>>> Listening on port %d <<<<<<<<", gras_socket_my_port(g->sock)); g->endcondition=0; - while (1) { - errcode = gras_msg_handle(10.0); - if (errcode != no_error && errcode != timeout_error) - return errcode; - if (g->endcondition) - break; - } + errcode = gras_msg_handle(600.0); + if (errcode != no_error) + return errcode; + if (g->endcondition) if (!gras_if_RL()) - gras_sleep(5,0); + gras_os_sleep(1,0); + + gras_socket_close(g->sock); + free(g); + gras_exit(); INFO0("SERVER: Done."); - gras_socket_close(&(g->sock)); return no_error; } @@ -141,78 +130,72 @@ int server (int argc,char *argv[]) { /* Global private data */ typedef struct { - gras_socket_t *sock; + gras_socket_t sock; } client_data_t; /* Function prototypes */ int client (int argc,char *argv[]); int client(int argc,char *argv[]) { - gras_error_t errcode; - client_data_t *g=gras_userdata_new(client_data_t); + xbt_error_t errcode; + client_data_t *g; - gras_socket_t *from; - msg_ping_t *msg_ping_data, *msg_pong_data; - gras_msgtype_t *msg_ping_type, *msg_pong_type; + gras_socket_t from; + int ping, pong; const char *host = "127.0.0.1"; int port = 4000; - msg_ping_type = msg_pong_type = NULL; + gras_init(&argc, argv, NULL); + g=gras_userdata_new(client_data_t); if (argc == 3) { host=argv[1]; port=atoi(argv[2]); } - fprintf(stderr,"Launch client (server on %s:%d)",host,port); - if (!gras_if_RL()) - gras_sleep(5,0); /* Wait for the server to be setup */ + INFO2("Launch client (server on %s:%d)",host,port); + gras_os_sleep(1,0); /* Wait for the server startup */ if ((errcode=gras_socket_client(host,port,&(g->sock)))) { ERROR1("Client: Unable to connect to the server. Got %s", - gras_error_name(errcode)); + xbt_error_name(errcode)); return 1; } INFO2("Client: Connected to %s:%d.",host,port); - TRY(register_messages()); - TRY(gras_msgtype_by_name("ping",&msg_ping_type)); - TRY(gras_msgtype_by_name("pong",&msg_pong_type)); + register_messages(); INFO2("Client: >>>>>>>> Connected to server which is on %s:%d <<<<<<<<", gras_socket_peer_name(g->sock),gras_socket_peer_port(g->sock)); - msg_ping_data = malloc(sizeof(msg_ping_t)); - msg_ping_data->dummy = 1234; - errcode = gras_msg_send(g->sock, msg_ping_type, msg_ping_data); + ping = 1234; + errcode = gras_msg_send(g->sock, gras_msgtype_by_name("ping"), &ping); if (errcode != no_error) { fprintf(stderr, "Client: Unable send PING to server (%s)\n", - gras_error_name(errcode)); - gras_socket_close(&(g->sock)); + xbt_error_name(errcode)); + gras_socket_close(g->sock); return 1; } INFO3("Client: >>>>>>>> Message PING(%d) sent to %s:%d <<<<<<<<", - msg_ping_data->dummy, + ping, gras_socket_peer_name(g->sock),gras_socket_peer_port(g->sock)); - msg_pong_data = NULL; - if ((errcode=gras_msg_wait(6000, - msg_pong_type,&from,(void**)&msg_pong_data))) { + if ((errcode=gras_msg_wait(6000,gras_msgtype_by_name("pong"), + &from,&pong))) { ERROR1("Client: Why can't I get my PONG message like everyone else (%s)?", - gras_error_name(errcode)); - gras_socket_close(&(g->sock)); + xbt_error_name(errcode)); + gras_socket_close(g->sock); return 1; } INFO3("Client: >>>>>>>> Got PONG(%d) got from %s:%d <<<<<<<<", - msg_pong_data->dummy, + pong, gras_socket_peer_name(from),gras_socket_peer_port(from)); - free(msg_ping_data); - free(msg_pong_data); - - gras_socket_close(&(g->sock)); + gras_socket_close(g->sock); + free(g); + gras_exit(); INFO0("Client: Done."); return 0; }