-static void listener_function(void *p) {
- gras_msg_listener_t me = (gras_msg_listener_t)p;
- s_gras_msg_t msg;
- xbt_ex_t e;
- gras_msgtype_t msg_wakeup_listener_t = gras_msgtype_by_name("_wakeup_listener");
- DEBUG0("I'm the listener");
- while (1) {
- DEBUG0("Selecting");
- msg.expe = gras_trp_select(-1);
- DEBUG0("Select returned something");
- gras_msg_recv(msg.expe, &msg);
- if (msg.type!=msg_wakeup_listener_t)
- xbt_queue_push(me->incomming_messages, &msg);
- else {
- char got = *(char*)msg.payl;
- if (got == '1') {
- VERB0("Asked to get awake");
- free(msg.payl);
- } else {
- VERB0("Asked to die");
- // gras_socket_close(me->wakeup_sock_listener_side);
- free(msg.payl);
- return ;
- }
- }
- /* empty the list of sockets to trash */
- TRY {
- while (1) {
- int sock;
- xbt_queue_shift_timed(me->socks_to_close,&sock,0);
- if(tcp_close(sock) < 0) {
- WARN3("error while closing tcp socket %d: %d (%s)\n",
- sock, sock_errno, sock_errstr(sock_errno));
- }
- }
- } CATCH(e) {
- if (e.category != timeout_error)
- RETHROW;
- xbt_ex_free(e);
- }
- }
+#include "gras/Virtu/virtu_private.h" /* gras_procdata_t */
+static void listener_function(void *p)
+{
+ gras_msg_listener_t me = (gras_msg_listener_t) p;
+ gras_msg_t msg;
+ xbt_ex_t e;
+ gras_msgtype_t msg_wakeup_listener_t =
+ gras_msgtype_by_name("_wakeup_listener");
+ XBT_DEBUG("I'm the listener");
+
+ /* get a free socket for the receiving part of the listener */
+ me->wakeup_sock_listener_side =NULL;
+ for (me->port = 5000; me->port < 6000; me->port++) {
+ TRY {
+ me->wakeup_sock_listener_side = gras_socket_server_ext(me->port, -1, 0);
+ }
+ CATCH(e) {
+ if (me->port == 6000)
+ RETHROW;
+ xbt_ex_free(e);
+ }
+ if (me->wakeup_sock_listener_side)
+ break;
+ }
+
+ /* wake up the launcher */
+ xbt_mutex_acquire(me->init_mutex);
+ xbt_cond_signal(me->init_cond);
+ xbt_mutex_release(me->init_mutex);
+
+ /* Main loop */
+ while (1) {
+ msg = gras_msg_recv_any();
+ if (msg->type != msg_wakeup_listener_t) {
+ /* Cannot display who sent this since in SG, xbt_socket_peer_* wont work:
+ I'm not the user process but I'm just the listener. Too bad */
+ XBT_VERB("Got a '%s' message (%s) from sock %p. Queue it for handling by main thread",
+ gras_msgtype_get_name(msg->type),e_gras_msg_kind_names[msg->kind],msg->expe);
+ xbt_queue_push(me->incomming_messages, msg);
+ } else {
+ char got = *(char *) msg->payl;
+ if (got == '1') {
+ XBT_VERB("Asked to get awake");
+ free(msg->payl);
+ free(msg);
+ } else {
+ XBT_VERB("Asked to die");
+ //gras_socket_close(me->wakeup_sock_listener_side);
+ free(msg->payl);
+ free(msg);
+ return;
+ }
+ }
+ /* empty the list of sockets to trash */
+ TRY {
+ while (1) {
+ int sock;
+ xbt_queue_shift_timed(me->socks_to_close, &sock, 0);
+ if (tcp_close(sock) < 0) {
+#ifdef _XBT_WIN32
+ XBT_WARN("error while closing tcp socket %d: %d\n", sock,
+ sock_errno);
+#else
+ XBT_WARN("error while closing tcp socket %d: %d (%s)\n",
+ sock, sock_errno, sock_errstr(sock_errno));
+#endif
+ }
+ }
+ }
+ CATCH(e) {
+ if (e.category != timeout_error)
+ RETHROW;
+ xbt_ex_free(e);
+ }
+ }