2 * vim:ts=2:sw=2:expandtab
5 #include "xbt/sysdep.h"
8 static int closest_preceding_node(int id);
9 static void check_predecessor(void);
11 XBT_LOG_NEW_DEFAULT_CATEGORY(chord,"Messages specific to this example");
13 typedef enum msg_typus{
23 /*GRAS_DEFINE_TYPE(s_pbio,
30 typedef struct s_pbio pbio_t;*/
32 /*GRAS_DEFINE_TYPE(s_ping,*/
37 typedef struct s_ping ping_t;
39 /*GRAS_DEFINE_TYPE(s_pong,*/
45 typedef struct s_pong pong_t;
47 GRAS_DEFINE_TYPE(s_notify,
54 typedef struct s_notify notify_t;
56 GRAS_DEFINE_TYPE(s_get_suc,
61 typedef struct s_get_suc get_suc_t;
63 GRAS_DEFINE_TYPE(s_rep_suc,
70 typedef struct s_rep_suc rep_suc_t;
72 typedef struct finger_elem{
80 static void register_messages(){
81 /* gras_msgtype_declare("chord",gras_datadesc_by_symbol(s_pbio));*/
82 gras_msgtype_declare("chord_get_suc",gras_datadesc_by_symbol(s_get_suc));
83 gras_msgtype_declare("chord_rep_suc",gras_datadesc_by_symbol(s_rep_suc));
84 gras_msgtype_declare("chord_notify",gras_datadesc_by_symbol(s_notify));
87 /* Global private data */
89 gras_socket_t sock; /* server socket on which I'm listening */
90 int id; /* my id number */
91 char host[1024]; /* my host name */
92 int port; /* port on which I'm listening FIXME */
93 int fingers; /* how many fingers */
94 finger_elem *finger; /* finger table */
95 int next_to_fix; /* next in the finger list to be checked */
96 int pre_id; /* predecessor id */
97 char pre_host[1024]; /* predecessor host */
98 int pre_port; /* predecessor port */
102 int node(int argc,char **argv);
104 /*static int node_cb_chord_handler(gras_socket_t expeditor,void *payload_data){
106 pbio_t pbio_i=*(pbio_t*)payload_data;
108 node_data_t *globals=(node_data_t*)gras_userdata_get();
110 INFO4(">>> %d : received %d message from %s to %d <<<",globals->id,pbio_i.type,gras_socket_peer_name(expeditor),pbio_i.dest);
116 static int node_cb_get_suc_handler(gras_msg_cb_ctx_t ctx,void *payload_data){
117 gras_socket_t expeditor=gras_msg_cb_ctx_from(ctx);
119 get_suc_t incoming=*(get_suc_t*)payload_data;
121 node_data_t *globals=(node_data_t*)gras_userdata_get();
122 INFO2("Received a get_successor message from %s for %d",
123 gras_socket_peer_name(expeditor),incoming.id);
124 if((globals->id==globals->finger[0].id)||
125 (incoming.id>globals->id&&incoming.id<=globals->finger[0].id)){
126 outgoing.id=globals->finger[0].id;
127 snprintf(outgoing.host,1024,globals->finger[0].host);
128 outgoing.port=globals->finger[0].port;
129 INFO0("My successor is his successor!");
131 gras_socket_t temp_sock;
132 int contact=closest_preceding_node(incoming.id);
134 outgoing.id=globals->finger[0].id;
135 snprintf(outgoing.host,1024,globals->finger[0].host);
136 outgoing.port=globals->finger[0].port;
137 INFO0("My successor is his successor!");
139 get_suc_t asking;asking.id=incoming.id;
141 temp_sock=gras_socket_client(globals->finger[contact].host,
142 globals->finger[contact].port);
144 RETHROW0("Unable to connect!: %s");
147 gras_msg_send(temp_sock,"chord_get_suc",&asking);
149 RETHROW0("Unable to ask!: %s");
151 gras_msg_wait(10.,"chord_rep_suc",&temp_sock, &outgoing);
156 gras_msg_send(expeditor,"chord_rep_suc",&outgoing);
157 INFO0("Successor information sent!");
159 RETHROW2("%s:Timeout sending successor information to %s: %s",
160 globals->host,gras_socket_peer_name(expeditor));
162 gras_socket_close(expeditor);
166 static int closest_preceding_node(int id){
167 node_data_t *globals=(node_data_t*)gras_userdata_get();
169 for(i=globals->fingers-1;i>=0;i--){
170 if(globals->finger[i].id>globals->id&&globals->finger[i].id<id){
178 static int node_cb_notify_handler(gras_msg_cb_ctx_t ctx,void *payload_data){
179 gras_socket_t expeditor=gras_msg_cb_ctx_from(ctx);
181 notify_t incoming=*(notify_t*)payload_data;
182 node_data_t *globals=(node_data_t*)gras_userdata_get();
183 INFO2("Received a notifying message from %s as %d",
184 gras_socket_peer_name(expeditor),incoming.id);
185 if(globals->pre_id==-1||
186 (incoming.id>globals->pre_id&&incoming.id<globals->id)){
187 globals->pre_id=incoming.id;
188 snprintf(globals->pre_host,1024,incoming.host);
189 globals->pre_port=incoming.port;
190 INFO0("Set as my new predecessor!");
195 static void fix_fingers(){
197 gras_socket_t temp_sock=NULL;
198 gras_socket_t temp_sock2=NULL;
199 node_data_t *globals=(node_data_t*)gras_userdata_get();
202 temp_sock=gras_socket_client(globals->host,globals->port);
204 RETHROW0("Unable to contact known host: %s");
206 get_suc_t get_suc_msg;get_suc_msg.id=globals->id;
208 gras_msg_send(temp_sock,"chord_get_suc",&get_suc_msg);
210 gras_socket_close(temp_sock);
211 RETHROW0("Unable to contact known host to get successor!: %s");
213 rep_suc_t rep_suc_msg;
215 INFO0("Waiting for reply!");
216 gras_msg_wait(6000,"chord_rep_suc",&temp_sock2, &rep_suc_msg);
218 RETHROW1("%s: Error waiting for successor:%s",globals->host);
220 globals->finger[0].id=rep_suc_msg.id;
221 snprintf(globals->finger[0].host,1024,rep_suc_msg.host);
222 globals->finger[0].port=rep_suc_msg.port;
223 INFO1("→ Finger %d fixed!",globals->next_to_fix);
224 gras_socket_close(temp_sock);
226 globals->next_to_fix=(++globals->next_to_fix==globals->fingers)?
227 0:globals->next_to_fix;
230 static void check_predecessor(){
231 node_data_t *globals = (node_data_t*)gras_userdata_get();
232 gras_socket_t temp_sock;
234 if (globals->pre_id == -1){
238 temp_sock = gras_socket_client( globals->pre_host, globals->pre_port );
240 globals->pre_id = -1;
241 globals->pre_host[0] = 0;
242 globals->pre_port = 0;
248 gras_msg_send( temp_sock, "chord_ping",&ping);
250 globals->pre_id = -1;
251 globals->pre_host[0] = 0;
252 globals->pre_port = 0;
255 gras_msg_wait( 60, "chord_pong", &temp_sock, &pong);
257 globals->pre_id = -1;
258 globals->pre_host[0] = 0;
259 globals->pre_port = 0;
261 gras_socket_close(temp_sock);
264 int node(int argc,char **argv){
265 node_data_t *globals=NULL;
266 gras_socket_t temp_sock=NULL;
267 gras_socket_t temp_sock2=NULL;
275 /* 1. Init the GRAS infrastructure and declare my globals */
276 gras_init(&argc,argv);
278 gras_os_sleep((15-gras_os_getpid())*20);
280 globals=gras_userdata_new(node_data_t);
282 globals->id=atoi(argv[1]);
283 globals->port=atoi(argv[2]);
285 globals->finger=NULL;
287 globals->pre_host[0]=0;
288 globals->pre_port=-1;
290 snprintf(globals->host,1024,gras_os_myname());
295 asprintf(&other_host,"%s",argv[3]);
296 other_port=atoi(argv[4]);
299 globals->sock=gras_socket_server(globals->port);
304 globals->finger=(finger_elem*)calloc(1,sizeof(finger_elem));
305 INFO2("Launching node %s:%d",globals->host,globals->port);
307 INFO0("→Creating ring");
308 globals->finger[0].id=globals->id;
309 snprintf(globals->finger[0].host,1024,globals->host);
310 globals->finger[0].port=globals->port;
312 INFO2("→Known node %s:%d",other_host,other_port);
313 INFO0("→Contacting to determine successor");
315 temp_sock=gras_socket_client(other_host,other_port);
317 RETHROW0("Unable to contact known host: %s");
319 get_suc_t get_suc_msg;get_suc_msg.id=globals->id;
321 gras_msg_send(temp_sock,"chord_get_suc", &get_suc_msg);
323 gras_socket_close(temp_sock);
324 RETHROW0("Unable to contact known host to get successor!: %s");
326 rep_suc_t rep_suc_msg;
328 INFO0("Waiting for reply!");
329 gras_msg_wait(10.,"chord_rep_suc",&temp_sock2, &rep_suc_msg);
331 RETHROW1("%s: Error waiting for successor:%s",globals->host);
333 globals->finger[0].id=rep_suc_msg.id;
334 snprintf(globals->finger[0].host,1024,rep_suc_msg.host);
335 globals->finger[0].port=rep_suc_msg.port;
336 INFO3("→Got successor : %d-%s:%d",globals->finger[0].id,
337 globals->finger[0].host,globals->finger[0].port);
338 gras_socket_close(temp_sock);
340 temp_sock=gras_socket_client(globals->finger[0].host,
341 globals->finger[0].port);
343 RETHROW0("Unable to contact successor: %s");
346 notify_msg.id=globals->id;
347 snprintf(notify_msg.host,1024,globals->host);
348 notify_msg.port=globals->port;
350 gras_msg_send(temp_sock,"chord_notify",¬ify_msg);
352 RETHROW0("Unable to notify successor! %s");
356 gras_cb_register("chord_get_suc", &node_cb_get_suc_handler);
357 gras_cb_register("chord_notify", &node_cb_notify_handler);
358 /*gras_cb_register("chord_ping",&node_cb_ping_handler);*/
359 /* gras_timer_repeat(600.,fix_fingers);*/
364 gras_msg_handle(6000000.0);
370 gras_socket_close(globals->sock);