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 "simgrid/simix.h"
   7 #include "src/msg/msg_private.h"
   8 #include "xbt/log.h"
   9
  10 #include "simgrid/s4u/Actor.hpp"
  11 #include "simgrid/s4u/Comm.hpp"
  12 #include "simgrid/s4u/File.hpp"
  13 #include "simgrid/s4u/Host.hpp"
  14 #include "simgrid/s4u/Mailbox.hpp"
  15 #include "simgrid/s4u/Storage.hpp"
  16
  17 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_file,"S4U files");
  18
  19 namespace simgrid {
  20 namespace s4u {
  21
  22 File::File(const char* fullpath, void* userdata) : path_(fullpath), userdata_(userdata)
  23 {
  24   // this cannot fail because we get a xbt_die if the mountpoint does not exist
  25   pimpl_           = simcall_file_open(fullpath, Host::current());
  26   xbt_dynar_t info = simcall_file_get_info(pimpl_);
  27   storage_type     = xbt_dynar_pop_as(info, char*);
  28   storageId        = xbt_dynar_pop_as(info, char*);
  29   mount_point      = xbt_dynar_pop_as(info, char*);
  30 }
  31
  32 File::~File() {
  33   //  Host::current()->extension<simgrid::MsgHostExt>()->file_descriptor_table->push_back(desc_id_);
  34   simcall_file_close(pimpl_, Host::current());
  35 }
  36
  37 sg_size_t File::read(sg_size_t size) {
  38   return simcall_file_read(pimpl_, size, Host::current());
  39 }
  40 sg_size_t File::write(sg_size_t size) {
  41   return simcall_file_write(pimpl_,size, Host::current());
  42 }
  43 sg_size_t File::size() {
  44   return simcall_file_get_size(pimpl_);
  45 }
  46
  47 void File::seek(sg_size_t pos) {
  48   simcall_file_seek(pimpl_,pos,SEEK_SET);
  49 }
  50 sg_size_t File::tell() {
  51   return simcall_file_tell(pimpl_);
  52 }
  53 void File::move(const char*fullpath) {
  54   simcall_file_move(pimpl_,fullpath);
  55 }
  56 void File::unlink() {
  57   sg_host_t attached = Host::current(); // FIXME: we should check where this file is attached
  58   simcall_file_unlink(pimpl_,attached);
  59 }
  60
  61 }} // namespace simgrid::s4u