X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/6728ffe43960c0022cea8fd623136f9569d024d7..14dcc36f158833d880504001fa1aa67e51db822a:/src/msg/msg_io.c diff --git a/src/msg/msg_io.c b/src/msg/msg_io.c index a54d6a1b8c..efee6ce7ee 100644 --- a/src/msg/msg_io.c +++ b/src/msg/msg_io.c @@ -111,10 +111,10 @@ sg_size_t MSG_file_read(msg_file_t fd, sg_size_t size) m_host_list[0] = MSG_host_self(); m_host_list[1] = attached_host; - double computation_amount[] = { 0, 0 }; - double communication_amount[] = { 0, 0, (double)read_size, 0 }; + double flops_amount[] = { 0, 0 }; + double bytes_amount[] = { 0, 0, (double)read_size, 0 }; - msg_task_t task = MSG_parallel_task_create("file transfer for read", 2, m_host_list, computation_amount, communication_amount, NULL); + msg_task_t task = MSG_parallel_task_create("file transfer for read", 2, m_host_list, flops_amount, bytes_amount, NULL); msg_error_t transfer = MSG_parallel_task_execute(task); MSG_task_destroy(task); free(m_host_list); @@ -155,10 +155,10 @@ sg_size_t MSG_file_write(msg_file_t fd, sg_size_t size) m_host_list[0] = MSG_host_self(); m_host_list[1] = attached_host; - double computation_amount[] = { 0, 0 }; - double communication_amount[] = { 0, (double)size, 0, 0 }; + double flops_amount[] = { 0, 0 }; + double bytes_amount[] = { 0, (double)size, 0, 0 }; - msg_task_t task = MSG_parallel_task_create("file transfer for write", 2, m_host_list, computation_amount, communication_amount, NULL); + msg_task_t task = MSG_parallel_task_create("file transfer for write", 2, m_host_list, flops_amount, bytes_amount, NULL); msg_error_t transfer = MSG_parallel_task_execute(task); MSG_task_destroy(task); free(m_host_list); @@ -189,17 +189,17 @@ sg_size_t MSG_file_write(msg_file_t fd, sg_size_t size) */ msg_file_t MSG_file_open(const char* fullpath, void* data) { - char name[2048]; + char *name; msg_file_priv_t priv = xbt_new(s_msg_file_priv_t, 1); priv->data = data; priv->fullpath = xbt_strdup(fullpath); priv->simdata = xbt_new0(s_simdata_file_t,1); priv->simdata->smx_file = simcall_file_open(fullpath, MSG_host_self()); - sprintf(name, "%s:%i:%s",MSG_host_get_name(MSG_host_self()),MSG_process_self_PID(),fullpath); + name = bprintf("%s:%i:%s",MSG_host_get_name(MSG_host_self()),MSG_process_self_PID(),fullpath); xbt_lib_set(file_lib, name, MSG_FILE_LEVEL, priv); msg_file_t fd = (msg_file_t) xbt_lib_get_elm_or_null(file_lib, name); __MSG_file_get_info(fd); - + xbt_free(name); return fd; } @@ -211,12 +211,15 @@ msg_file_t MSG_file_open(const char* fullpath, void* data) */ int MSG_file_close(msg_file_t fd) { - char name[2048]; + char *name; msg_file_priv_t priv = MSG_file_priv(fd); + if (priv->data) + xbt_free(priv->data); int res = simcall_file_close(priv->simdata->smx_file, MSG_host_self()); - sprintf(name, "%s:%i:%s",MSG_host_get_name(MSG_host_self()),MSG_process_self_PID(),priv->fullpath); + name = bprintf("%s:%i:%s",MSG_host_get_name(MSG_host_self()),MSG_process_self_PID(),priv->fullpath); xbt_lib_unset(file_lib, name, MSG_FILE_LEVEL, 1); + xbt_free(name); return res; } @@ -363,10 +366,10 @@ msg_error_t MSG_file_rcopy (msg_file_t file, msg_host_t host, const char* fullpa m_host_list[0] = attached_host; m_host_list[1] = host_dest; - double computation_amount[] = { 0, 0 }; - double communication_amount[] = { 0, (double)read_size, 0, 0 }; + double flops_amount[] = { 0, 0 }; + double bytes_amount[] = { 0, (double)read_size, 0, 0 }; - msg_task_t task = MSG_parallel_task_create("file transfer for write", 2, m_host_list, computation_amount, communication_amount, NULL); + msg_task_t task = MSG_parallel_task_create("file transfer for write", 2, m_host_list, flops_amount, bytes_amount, NULL); msg_error_t transfer = MSG_parallel_task_execute(task); MSG_task_destroy(task); free(m_host_list); @@ -489,6 +492,19 @@ void MSG_storage_set_property_value(msg_storage_t storage, const char *name, cha xbt_dict_set(MSG_storage_get_properties(storage), name, value,free_ctn); } +/** \ingroup m_storage_management + * \brief Returns the value of a given storage property + * + * \param storage a storage + * \param name a property name + * \return value of a property (or NULL if property not set) + */ +const char *MSG_storage_get_property_value(msg_storage_t storage, const char *name) +{ + return xbt_dict_get_or_null(MSG_storage_get_properties(storage), name); +} + + /** \ingroup msg_storage_management * \brief Finds a msg_storage_t using its name. * \param name the name of a storage @@ -532,7 +548,7 @@ msg_error_t MSG_storage_set_data(msg_storage_t storage, void *data) return MSG_OK; } -/** \ingroup msg_host_management +/** \ingroup m_host_management * * \brief Returns the user data of a #msg_storage_t. *