/***
*** Prototypes
***/
+hexa_print(unsigned char *data, int size); /* in gras.c */
+
/* retrieve the port record associated to a numerical port on an host */
static xbt_error_t find_port(gras_hostdata_t *hd, int port,
gras_sg_portrec_t *hpd);
gras_sg_portrec_t pr;
+ XBT_IN1(" (sock=%p)",sock);
+
if (!sock) return;
xbt_assert0(hd,"Please run gras_process_init on each process");
if (sock->data)
- xbt_free(sock->data);
+ free(sock->data);
if (sock->incoming) {
/* server mode socket. Un register it from 'OS' tables */
DEBUG2("Check pr %d of %lu", cpt, xbt_dynar_length(hd->ports));
if (pr.port == sock->port) {
xbt_dynar_cursor_rm(hd->ports, &cpt);
- return;
+ XBT_OUT;
+ return;
}
}
WARN0("socket_close called on an unknown socket");
}
+ XBT_OUT;
}
typedef struct {
MSG_host_get_name(MSG_host_self()), sock_data->to_chan, size);
if (MSG_task_get(&task, (sock->raw ? pd->rawChan : pd->chan)) != MSG_OK)
RAISE0(unknown_error,"Error in MSG_task_get()");
+ DEBUG1("Got chuck %s",MSG_task_get_name(task));
task_data = MSG_task_get_data(task);
- if (task_data->size != size)
- RAISE5(mismatch_error,
- "Got %d bytes when %ld where expected (in %s->%s:%d)",
- task_data->size, size,
- MSG_host_get_name(sock_data->to_host),
- MSG_host_get_name(MSG_host_self()), sock_data->to_chan);
- memcpy(data,task_data->data,size);
- xbt_free(task_data->data);
- xbt_free(task_data);
+ if (size != -1) {
+ if (task_data->size != size)
+ RAISE5(mismatch_error,
+ "Got %d bytes when %ld where expected (in %s->%s:%d)",
+ task_data->size, size,
+ MSG_host_get_name(sock_data->to_host),
+ MSG_host_get_name(MSG_host_self()), sock_data->to_chan);
+ memcpy(data,task_data->data,size);
+ } else {
+ /* damn, the size is embeeded at the begining of the chunk */
+ int netsize;
+
+ memcpy((char*)&netsize,task_data->data,4);
+ netsize = (int)ntohl(netsize);
+ DEBUG1("netsize embeeded = %d",netsize);
+
+ memcpy(data,task_data->data,netsize+4);
+ }
+ free(task_data->data);
+ free(task_data);
if (MSG_task_destroy(task) != MSG_OK)
RAISE0(unknown_error,"Error in MSG_task_destroy()");