- else
- {
- XBT_WARN("New full path %s is not on the same mount point: %s. Action has been canceled.", fullpath, fd->mount);
- return MSG_TASK_CANCELED;
- }
-}
-
-int Workstation::fileRcopy(surf_file_t fd, surf_resource_t host_dest, const char* fullpath){
-
- XBT_INFO("FILE %s WKS %s FULLPATH %s",fd->name, host_dest->key, fullpath);
-
- /* Find the host src where the file is located */
- StoragePtr storage = findStorageOnMountList(fd->mount);
- const char* host_name_src = (const char*)storage->p_attach;
-
- /* Find the host dest where the file will be stored */
- s_mount_t mnt;
- unsigned int cursor;
- StoragePtr storage_dest = NULL;
- const char* host_name_dest;
- char *file_mount_name = NULL;
- size_t longest_prefix_length = 0;
- xbt_dynar_foreach(((WorkstationPtr)host_dest)->p_storage,cursor,mnt)
- {
- file_mount_name = (char *) xbt_malloc ((strlen(mnt.name)+1));
- strncpy(file_mount_name,fullpath,strlen(mnt.name)+1);
- file_mount_name[strlen(mnt.name)] = '\0';
-
- if(!strcmp(file_mount_name,mnt.name) && strlen(mnt.name)>longest_prefix_length)
- {/* The current mount name is found in the full path and is bigger than the previous*/
- longest_prefix_length = strlen(mnt.name);
- storage_dest = static_cast<StoragePtr>(mnt.storage);
- }
- free(file_mount_name);
- }
- if(longest_prefix_length>0)
- { /* Mount point found */
- host_name_dest = storage_dest->p_attach;
- }
- else
- {
- XBT_WARN("Can't find mount point for '%s' on destination host '%s'", fullpath, host_dest->key);
- return MSG_TASK_CANCELED;