X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/31c4c244b7e3690f0da5a59a117c47e9920aa420..b01ca57cc605121a587f5844ffb0d1defa86ac53:/src/msg/msg_io.c?ds=sidebyside

diff --git a/src/msg/msg_io.c b/src/msg/msg_io.c
index fbaf853759..2c2adca044 100644
--- a/src/msg/msg_io.c
+++ b/src/msg/msg_io.c
@@ -253,6 +253,38 @@ msg_error_t MSG_file_move (msg_file_t fd, const char* fullpath)
   return simcall_file_move(priv->simdata->smx_file, fullpath);
 }
 
+/**
+ * \ingroup msg_file_management
+ * \brief Copy a file to another location on a remote host.
+ * \param fd : the file to move
+ * \param host : the remote host where the file has to be copied
+ * \param fullpath : the complete path destination on the remote host
+ * \return If successful, the function returns MSG_OK. Otherwise, it returns
+ * MSG_TASK_CANCELED.
+ */
+msg_error_t MSG_file_rcopy (msg_file_t file, msg_host_t host, const char* fullpath)
+{
+  msg_file_priv_t file_priv = MSG_file_priv(file);
+  return simcall_file_rcopy(file_priv->simdata->smx_file, host, fullpath);
+}
+
+/**
+ * \ingroup msg_file_management
+ * \brief Move a file to another location on a remote host.
+ * \param fd : the file to move
+ * \param host : the remote host where the file has to be moved
+ * \param fullpath : the complete path destination on the remote host
+ * \return If successful, the function returns MSG_OK. Otherwise, it returns
+ * MSG_TASK_CANCELED.
+ */
+msg_error_t MSG_file_rmove (msg_file_t file, msg_host_t host, const char* fullpath)
+{
+  msg_file_priv_t file_priv = MSG_file_priv(file);
+  msg_error_t res = simcall_file_rcopy(file_priv->simdata->smx_file, host, fullpath);
+  simcall_file_unlink(file_priv->simdata->smx_file);
+  return res;
+}
+
 /**
  * \brief Destroys a file (internal call only)
  */