/* 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 "simgrid/simix.h"
-#include "src/msg/msg_private.h"
#include "xbt/log.h"
-#include "simgrid/s4u/Actor.hpp"
-#include "simgrid/s4u/Comm.hpp"
#include "simgrid/s4u/File.hpp"
#include "simgrid/s4u/Host.hpp"
-#include "simgrid/s4u/Mailbox.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");
namespace simgrid {
namespace s4u {
-File::File(const char* fullpath, void* userdata) : path_(fullpath), userdata_(userdata)
+File::File(const char* fullpath, void* userdata) : File(fullpath, Host::current(), userdata){};
+
+File::File(const char* 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());
- xbt_dynar_t info = simcall_file_get_info(pimpl_);
- storage_type = xbt_dynar_pop_as(info, char*);
- storageId = xbt_dynar_pop_as(info, char*);
- mount_point = xbt_dynar_pop_as(info, char*);
- xbt_dynar_free(&info);
+ Storage* st = nullptr;
+ size_t longest_prefix_length = 0;
+ std::string path;
+ XBT_DEBUG("Search for storage name for '%s' on '%s'", fullpath, host->getCname());
+
+ for (auto mnt : host->getMountedStorages()) {
+ XBT_DEBUG("See '%s'", mnt.first.c_str());
+ mount_point = std::string(fullpath).substr(0, mnt.first.size());
+
+ 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 = std::string(fullpath).substr(0, longest_prefix_length);
+ path = std::string(fullpath).substr(longest_prefix_length, strlen(fullpath));
+ } else
+ xbt_die("Can't find mount point for '%s' on '%s'", fullpath, 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() {
- // Host::current()->extension<simgrid::MsgHostExt>()->file_descriptor_table->push_back(desc_id_);
- simcall_file_close(pimpl_, Host::current());
+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(pimpl_, size, Host::current());
+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(pimpl_,size, Host::current());
+
+sg_size_t File::size()
+{
+ return simgrid::simix::kernelImmediate([this] { return pimpl_->size(); });
}
-sg_size_t File::size() {
- return simcall_file_get_size(pimpl_);
+
+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(pimpl_,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(pimpl_);
+
+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(const char* 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