src/s4u/s4u_file.cpp

   1 /* Copyright (c) 2015-2017. The SimGrid Team. All rights reserved.          */
   2
   3 /* This program is free software; you can redistribute it and/or modify it
   4  * under the terms of the license (GNU LGPL) which comes with this package. */
   5
   6 #include "xbt/log.h"
   7
   8 #include "simgrid/s4u/File.hpp"
   9 #include "simgrid/s4u/Host.hpp"
  10 #include "simgrid/s4u/Storage.hpp"
  11 #include "simgrid/simix.hpp"
  12 #include "src/surf/FileImpl.hpp"
  13 #include "src/surf/HostImpl.hpp"
  14
  15 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_file,"S4U files");
  16
  17 namespace simgrid {
  18 namespace s4u {
  19
  20 File::File(const char* fullpath, void* userdata) : File(fullpath, Host::current(), userdata){};
  21
  22 File::File(const char* fullpath, sg_host_t host, void* userdata) : path_(fullpath), userdata_(userdata)
  23 {
  24   // this cannot fail because we get a xbt_die if the mountpoint does not exist
  25   Storage* st                  = nullptr;
  26   size_t longest_prefix_length = 0;
  27   std::string path;
  28   XBT_DEBUG("Search for storage name for '%s' on '%s'", fullpath, host->getCname());
  29
  30   for (auto mnt : host->getMountedStorages()) {
  31     XBT_DEBUG("See '%s'", mnt.first.c_str());
  32     mount_point = std::string(fullpath).substr(0, mnt.first.size());
  33
  34     if (mount_point == mnt.first && mnt.first.length() > longest_prefix_length) {
  35       /* The current mount name is found in the full path and is bigger than the previous*/
  36       longest_prefix_length = mnt.first.length();
  37       st                    = mnt.second;
  38     }
  39   }
  40   if (longest_prefix_length > 0) { /* Mount point found, split fullpath into mount_name and path+filename*/
  41     mount_point = std::string(fullpath).substr(0, longest_prefix_length);
  42     path        = std::string(fullpath).substr(longest_prefix_length, strlen(fullpath));
  43   } else
  44     xbt_die("Can't find mount point for '%s' on '%s'", fullpath, host->getCname());
  45
  46   pimpl_ =
  47       simgrid::simix::kernelImmediate([this, st, path] { return new simgrid::surf::FileImpl(st, path, mount_point); });
  48   storage_type = st->getType();
  49   storageId    = st->getName();
  50 }
  51
  52 File::~File()
  53 {
  54   simgrid::simix::kernelImmediate([this] { delete pimpl_; });
  55 }
  56
  57 sg_size_t File::read(sg_size_t size)
  58 {
  59   return simcall_file_read(pimpl_, size);
  60 }
  61
  62 sg_size_t File::write(sg_size_t size)
  63 {
  64   return simcall_file_write(pimpl_, size);
  65 }
  66
  67 sg_size_t File::size()
  68 {
  69   return simgrid::simix::kernelImmediate([this] { return pimpl_->size(); });
  70 }
  71
  72 void File::seek(sg_offset_t pos)
  73 {
  74   simgrid::simix::kernelImmediate([this, pos] { pimpl_->seek(pos, SEEK_SET); });
  75 }
  76
  77 void File::seek(sg_offset_t pos, int origin)
  78 {
  79   simgrid::simix::kernelImmediate([this, pos, origin] { pimpl_->seek(pos, origin); });
  80 }
  81
  82 sg_size_t File::tell()
  83 {
  84   return simgrid::simix::kernelImmediate([this] { return pimpl_->tell(); });
  85 }
  86
  87 void File::move(const char* fullpath)
  88 {
  89   simgrid::simix::kernelImmediate([this, fullpath] { pimpl_->move(fullpath); });
  90 }
  91
  92 int File::unlink()
  93 {
  94   return simgrid::simix::kernelImmediate([this] { return pimpl_->unlink(); });
  95 }
  96
  97 }} // namespace simgrid::s4u