Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Fix process_killall. Closes #186.
[simgrid.git] / src / s4u / s4u_file.cpp
index bb87435..14c73e0 100644 (file)
@@ -1,57 +1,97 @@
-/* Copyright (c) 2015. The SimGrid Team. All rights reserved.               */
+/* Copyright (c) 2015-2017. The SimGrid Team. All rights reserved.          */
 
 /* This program is free software; you can redistribute it and/or modify it
  * under the terms of the license (GNU LGPL) which comes with this package. */
 
 #include "xbt/log.h"
-#include "src/msg/msg_private.h"
 
-#include "simgrid/s4u/Actor.hpp"
-#include "simgrid/s4u/comm.hpp"
-#include "simgrid/s4u/host.hpp"
-#include "simgrid/s4u/Mailbox.hpp"
+#include "simgrid/s4u/File.hpp"
+#include "simgrid/s4u/Host.hpp"
+#include "simgrid/s4u/Storage.hpp"
+#include "simgrid/simix.hpp"
+#include "src/surf/FileImpl.hpp"
+#include "src/surf/HostImpl.hpp"
 
 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_file,"S4U files");
 
-#include "simgrid/s4u/file.hpp"
-#include "simgrid/s4u/host.hpp"
-#include "simgrid/simix.h"
-
 namespace simgrid {
 namespace s4u {
 
-File::File(const char* fullpath, void* userdata) : path_(fullpath), userdata_(userdata)
+File::File(std::string fullpath, void* userdata) : File(fullpath, Host::current(), userdata){};
+
+File::File(std::string fullpath, sg_host_t host, void* userdata) : path_(fullpath), userdata_(userdata)
 {
   // this cannot fail because we get a xbt_die if the mountpoint does not exist
-  pimpl_ = simcall_file_open(fullpath, Host::current());
+  Storage* st                  = nullptr;
+  size_t longest_prefix_length = 0;
+  std::string path;
+  XBT_DEBUG("Search for storage name for '%s' on '%s'", fullpath.c_str(), host->getCname());
+
+  for (auto const& mnt : host->getMountedStorages()) {
+    XBT_DEBUG("See '%s'", mnt.first.c_str());
+    mount_point = fullpath.substr(0, mnt.first.length());
+
+    if (mount_point == mnt.first && mnt.first.length() > longest_prefix_length) {
+      /* The current mount name is found in the full path and is bigger than the previous*/
+      longest_prefix_length = mnt.first.length();
+      st                    = mnt.second;
+    }
+  }
+  if (longest_prefix_length > 0) { /* Mount point found, split fullpath into mount_name and path+filename*/
+    mount_point = fullpath.substr(0, longest_prefix_length);
+    path        = fullpath.substr(longest_prefix_length, fullpath.length());
+  } else
+    xbt_die("Can't find mount point for '%s' on '%s'", fullpath.c_str(), host->getCname());
+
+  pimpl_ =
+      simgrid::simix::kernelImmediate([this, st, path] { return new simgrid::surf::FileImpl(st, path, mount_point); });
+  storage_type = st->getType();
+  storageId    = st->getName();
 }
 
-File::~File() {
-  simcall_file_close(pimpl_, Host::current());
+File::~File()
+{
+  simgrid::simix::kernelImmediate([this] { delete pimpl_; });
 }
 
-sg_size_t File::read(sg_size_t size) {
-  return simcall_file_read(pimpl_, size, Host::current());
+sg_size_t File::read(sg_size_t size)
+{
+  return simcall_file_read(pimpl_, size);
 }
-sg_size_t File::write(sg_size_t size) {
-  return simcall_file_write(pimpl_,size, Host::current());
+
+sg_size_t File::write(sg_size_t size)
+{
+  return simcall_file_write(pimpl_, size);
 }
-sg_size_t File::size() {
-  return simcall_file_get_size(pimpl_);
+
+sg_size_t File::size()
+{
+  return simgrid::simix::kernelImmediate([this] { return pimpl_->size(); });
 }
 
-void File::seek(sg_size_t pos) {
-  simcall_file_seek(pimpl_,pos,SEEK_SET);
+void File::seek(sg_offset_t pos)
+{
+  simgrid::simix::kernelImmediate([this, pos] { pimpl_->seek(pos, SEEK_SET); });
 }
-sg_size_t File::tell() {
-  return simcall_file_tell(pimpl_);
+
+void File::seek(sg_offset_t pos, int origin)
+{
+  simgrid::simix::kernelImmediate([this, pos, origin] { pimpl_->seek(pos, origin); });
+}
+
+sg_size_t File::tell()
+{
+  return simgrid::simix::kernelImmediate([this] { return pimpl_->tell(); });
 }
-void File::move(const char*fullpath) {
-  simcall_file_move(pimpl_,fullpath);
+
+void File::move(std::string fullpath)
+{
+  simgrid::simix::kernelImmediate([this, fullpath] { pimpl_->move(fullpath); });
 }
-void File::unlink() {
-  sg_host_t attached = Host::current(); // FIXME: we should check where this file is attached
-  simcall_file_unlink(pimpl_,attached);
+
+int File::unlink()
+{
+  return simgrid::simix::kernelImmediate([this] { return pimpl_->unlink(); });
 }
 
 }} // namespace simgrid::s4u