X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d0d4cc7697e64b5092445d666a1e11712044d69d..5a37cda4c36f1fc25b8154daf308cbcc45a42b84:/src/msg/msg_mailbox.c diff --git a/src/msg/msg_mailbox.c b/src/msg/msg_mailbox.c index e4e633f6f6..b8b63a28d7 100644 --- a/src/msg/msg_mailbox.c +++ b/src/msg/msg_mailbox.c @@ -1,6 +1,6 @@ /* Mailboxes in MSG */ -/* Copyright (c) 2008, 2009, 2010. The SimGrid Team. +/* Copyright (c) 2008-2014. The SimGrid Team. * All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it @@ -44,10 +44,6 @@ MSG_mailbox_get_count_host_waiting_tasks(msg_mailbox_t mailbox, return simcall_rdv_comm_count_by_host(mailbox, host); } -double MSG_set_rate_before_read(msg_mailbox_t mailbox, double newrate) { - return simcall_comm_change_rate_first_action(mailbox,newrate); -} - msg_mailbox_t MSG_mailbox_get_by_alias(const char *alias) { @@ -91,8 +87,28 @@ void MSG_mailbox_set_async(const char *alias){ * #MSG_HOST_FAILURE, or #MSG_TRANSFER_FAILURE otherwise. */ msg_error_t -MSG_mailbox_get_task_ext(msg_mailbox_t mailbox, msg_task_t * task, +MSG_mailbox_get_task_ext(msg_mailbox_t mailbox, msg_task_t *task, msg_host_t host, double timeout) +{ + return MSG_mailbox_get_task_ext_bounded(mailbox, task, host, timeout, -1.0); +} + +/** \ingroup msg_mailbox_management + * \brief Get a task from a mailbox on a given host at a given rate + * + * \param mailbox The mailbox where the task was sent + * \param task a memory location for storing a #msg_task_t. + * \param host a #msg_host_t host from where the task was sent + * \param timeout a timeout + * \param rate a rate + + * \return Returns + * #MSG_OK if the task was successfully received, + * #MSG_HOST_FAILURE, or #MSG_TRANSFER_FAILURE otherwise. + */ +msg_error_t +MSG_mailbox_get_task_ext_bounded(msg_mailbox_t mailbox, msg_task_t * task, + msg_host_t host, double timeout, double rate) { xbt_ex_t e; msg_error_t ret = MSG_OK; @@ -114,12 +130,15 @@ MSG_mailbox_get_task_ext(msg_mailbox_t mailbox, msg_task_t * task, /* Try to receive it by calling SIMIX network layer */ TRY { - simcall_comm_recv(mailbox, task, NULL, NULL, NULL, timeout); + simcall_comm_recv(mailbox, task, NULL, NULL, NULL, timeout, rate); XBT_DEBUG("Got task %s from %p",(*task)->name,mailbox); (*task)->simdata->isused=0; } CATCH(e) { switch (e.category) { + case cancel_error: + ret = MSG_HOST_FAILURE; + break; case network_error: ret = MSG_TRANSFER_FAILURE; break; @@ -142,30 +161,6 @@ MSG_mailbox_get_task_ext(msg_mailbox_t mailbox, msg_task_t * task, MSG_RETURN(ret); } - - -/** \ingroup msg_mailbox_management - * \brief Get a task from a mailbox on a given host at a given rate - * - * \param mailbox The mailbox where the task was sent - * \param task a memory location for storing a #msg_task_t. - * \param host a #msg_host_t host from where the task was sent - * \param timeout a timeout - * \param rate a bandwidth rate - - * \return Returns - * #MSG_OK if the task was successfully received, - * #MSG_HOST_FAILURE, or #MSG_TRANSFER_FAILURE otherwise. - */ -msg_error_t -MSG_mailbox_get_task_ext_bounded(msg_mailbox_t mailbox, msg_task_t * task, - msg_host_t host, double timeout, double rate) -{ - MSG_set_rate_before_read(mailbox,rate); - MSG_RETURN(MSG_mailbox_get_task_ext(mailbox,task,host,timeout)); -} - - msg_error_t MSG_mailbox_put_with_timeout(msg_mailbox_t mailbox, msg_task_t task, double timeout) @@ -197,7 +192,8 @@ MSG_mailbox_put_with_timeout(msg_mailbox_t mailbox, msg_task_t task, /* Try to send it by calling SIMIX network layer */ TRY { - smx_action_t comm = simcall_comm_isend(mailbox, t_simdata->message_size, + smx_action_t comm = NULL; /* MC needs the comm to be set to NULL during the simix call */ + comm = simcall_comm_isend(mailbox, t_simdata->message_size, t_simdata->rate, task, sizeof(void *), NULL, NULL, task, 0); #ifdef HAVE_TRACING @@ -211,6 +207,9 @@ MSG_mailbox_put_with_timeout(msg_mailbox_t mailbox, msg_task_t task, CATCH(e) { switch (e.category) { + case cancel_error: + ret = MSG_HOST_FAILURE; + break; case network_error: ret = MSG_TRANSFER_FAILURE; break; @@ -245,6 +244,6 @@ msg_mailbox_t MSG_mailbox_get_by_channel(msg_host_t host, && (channel < msg_global->max_channel), "Invalid channel %d", channel); - return host->mailboxes[(size_t) channel]; + return MSG_host_priv(host)->mailboxes[(size_t) channel]; } #endif