-/* 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 "msg/msg_private.h"
-#include "msg/msg_mailbox.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) {
- // this cannot fail because we get a xbt_die if the mountpoint does not exist
- p_inferior = simcall_file_open(fullpath, Host::current()->inferior());
- p_path = fullpath;
+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
+ 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()
+{
+ simgrid::simix::kernelImmediate([this] { delete pimpl_; });
}
-File::~File() {
- simcall_file_close(p_inferior, Host::current()->inferior());
+sg_size_t File::read(sg_size_t size)
+{
+ return simcall_file_read(pimpl_, size);
}
-sg_size_t File::read(sg_size_t size) {
- return simcall_file_read(p_inferior, size, Host::current()->inferior());
+sg_size_t File::write(sg_size_t size)
+{
+ return simcall_file_write(pimpl_, size);
}
-sg_size_t File::write(sg_size_t size) {
- return simcall_file_write(p_inferior,size, Host::current()->inferior());
+
+sg_size_t File::size()
+{
+ return simgrid::simix::kernelImmediate([this] { return pimpl_->size(); });
}
-sg_size_t File::size() {
- return simcall_file_get_size(p_inferior);
+
+void File::seek(sg_offset_t pos)
+{
+ simgrid::simix::kernelImmediate([this, pos] { pimpl_->seek(pos, SEEK_SET); });
}
-void File::seek(sg_size_t pos) {
- simcall_file_seek(p_inferior,pos,SEEK_SET);
+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 simcall_file_tell(p_inferior);
+
+sg_size_t File::tell()
+{
+ return simgrid::simix::kernelImmediate([this] { return pimpl_->tell(); });
}
-void File::move(const char*fullpath) {
- simcall_file_move(p_inferior,fullpath);
+
+void File::move(std::string fullpath)
+{
+ simgrid::simix::kernelImmediate([this, fullpath] { pimpl_->move(fullpath); });
}
-void File::unlink() {
- sg_host_t attached = Host::current()->inferior(); // FIXME: we should check where this file is attached
- simcall_file_unlink(p_inferior,attached);
+
+int File::unlink()
+{
+ return simgrid::simix::kernelImmediate([this] { return pimpl_->unlink(); });
}
}} // namespace simgrid::s4u