-
- /* put message on msg_queue */
- msg_remote_proc = (gras_msg_procdata_t)gras_libdata_by_name_from_remote("gras_msg",sock_data->to_process);
- xbt_fifo_push(msg_remote_proc->msg_to_receive_queue,msg);
-
- /* wake-up the receiver */
- trp_remote_proc = (gras_trp_procdata_t)gras_libdata_by_name_from_remote("gras_trp",sock_data->to_process);
- SIMIX_cond_signal(trp_remote_proc->cond);
-
- SIMIX_mutex_lock(remote_sock_data->mutex);
- //SIMIX_mutex_lock(remote_hd->mutex_port[sock->peer_port]);
- /* wait for the receiver */
- SIMIX_cond_wait(remote_sock_data->cond,remote_sock_data->mutex);
- //SIMIX_cond_wait(remote_hd->cond_port[sock->peer_port], remote_hd->mutex_port[sock->peer_port]);
-
- /* creates simix action and waits its ends, waits in the sender host condition*/
- DEBUG5("send chunk %s from %s to %s:%d (size=%ld)",
- name, SIMIX_host_get_name(SIMIX_host_self()),
- SIMIX_host_get_name(sock_data->to_host), sock->peer_port,size);
-
- act = SIMIX_action_communicate(SIMIX_host_self(), sock_data->to_host, name, size, -1);
- /*
- SIMIX_register_action_to_condition(act,remote_hd->cond_port[sock->peer_port]);
- SIMIX_register_condition_to_action(act,remote_hd->cond_port[sock->peer_port]);
- */
- SIMIX_register_action_to_condition(act,remote_sock_data->cond);
- SIMIX_register_condition_to_action(act,remote_sock_data->cond);
-
- SIMIX_host_get_name(sock_data->to_host),SIMIX_process_get_name(sock_data->to_process),
-
- SIMIX_cond_wait(remote_sock_data->cond,remote_sock_data->mutex);
- //SIMIX_cond_wait(remote_hd->cond_port[sock->peer_port], remote_hd->mutex_port[sock->peer_port]);
- /* error treatmeant */
-
- /* cleanup structures */
- SIMIX_action_destroy(act);
-
- SIMIX_mutex_unlock(remote_sock_data->mutex);
- //SIMIX_mutex_unlock(remote_hd->mutex_port[sock->peer_port]);
- SIMIX_cond_signal(remote_sock_data->cond);
- //SIMIX_cond_signal(remote_hd->cond_port[sock->peer_port]);