src/surf/storage_interface.cpp

   1 /* Copyright (c) 2013-2015. The SimGrid Team.
   2  * All rights reserved.                                                     */
   3
   4 /* This program is free software; you can redistribute it and/or modify it
   5  * under the terms of the license (GNU LGPL) which comes with this package. */
   6
   7 #include "storage_interface.hpp"
   8 #include "surf_private.h"
   9 #include "xbt/file.h" /* xbt_getline */
  10
  11 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_storage, surf,
  12                                 "Logging specific to the SURF storage module");
  13
  14 xbt_lib_t file_lib;
  15 xbt_lib_t storage_lib;
  16 int ROUTING_STORAGE_LEVEL;      //Routing for storagelevel
  17 int ROUTING_STORAGE_HOST_LEVEL;
  18 int SURF_STORAGE_LEVEL;
  19 xbt_lib_t storage_type_lib;
  20 int ROUTING_STORAGE_TYPE_LEVEL; //Routing for storage_type level
  21 xbt_dynar_t mount_list = NULL;
  22 simgrid::surf::StorageModel *surf_storage_model = NULL;
  23
  24 namespace simgrid {
  25 namespace surf {
  26
  27 /*************
  28  * Callbacks *
  29  *************/
  30
  31 surf_callback(void, simgrid::surf::Storage*) storageCreatedCallbacks;
  32 surf_callback(void, simgrid::surf::Storage*) storageDestructedCallbacks;
  33 surf_callback(void, simgrid::surf::Storage*, e_surf_resource_state_t, e_surf_resource_state_t) storageStateChangedCallbacks;
  34 surf_callback(void, simgrid::surf::StorageAction*, e_surf_action_state_t, e_surf_action_state_t) storageActionStateChangedCallbacks;
  35
  36 /*********
  37  * Model *
  38  *********/
  39
  40 StorageModel::StorageModel()
  41         : Model()
  42 {
  43   p_storageList = NULL;
  44 }
  45
  46 StorageModel::~StorageModel(){
  47   lmm_system_free(p_maxminSystem);
  48
  49   surf_storage_model = NULL;
  50
  51   xbt_dynar_free(&p_storageList);
  52 }
  53
  54 /************
  55  * Resource *
  56  ************/
  57
  58 Storage::Storage(Model *model, const char *name, xbt_dict_t props,
  59                  const char* type_id, char *content_name, char *content_type,
  60                  sg_size_t size)
  61  : Resource(model, name)
  62  , p_contentType(content_type)
  63  , m_size(size), m_usedSize(0)
  64  , p_typeId(xbt_strdup(type_id))
  65  , p_writeActions(xbt_dynar_new(sizeof(Action*),NULL))
  66  , p_properties(props)
  67 {
  68   p_content = parseContent(content_name);
  69   setState(SURF_RESOURCE_ON);
  70 }
  71
  72 Storage::Storage(Model *model, const char *name, xbt_dict_t props,
  73                  lmm_system_t maxminSystem, double bread, double bwrite,
  74                  double bconnection, const char* type_id, char *content_name,
  75                  char *content_type, sg_size_t size, char *attach)
  76  :  Resource(model, name, lmm_constraint_new(maxminSystem, this, bconnection))
  77  , p_contentType(content_type)
  78  , m_size(size), m_usedSize(0)
  79  , p_typeId(xbt_strdup(type_id))
  80  , p_writeActions(xbt_dynar_new(sizeof(Action*),NULL))
  81  , p_properties(props)
  82 {
  83   p_content = parseContent(content_name);
  84   p_attach = xbt_strdup(attach);
  85   setState(SURF_RESOURCE_ON);
  86   XBT_DEBUG("Create resource with Bconnection '%f' Bread '%f' Bwrite '%f' and Size '%llu'", bconnection, bread, bwrite, size);
  87   p_constraintRead  = lmm_constraint_new(maxminSystem, this, bread);
  88   p_constraintWrite = lmm_constraint_new(maxminSystem, this, bwrite);
  89 }
  90
  91 Storage::~Storage(){
  92   surf_callback_emit(storageDestructedCallbacks, this);
  93   xbt_dict_free(&p_content);
  94   xbt_dict_free(&p_properties);
  95   xbt_dynar_free(&p_writeActions);
  96   free(p_typeId);
  97   free(p_contentType);
  98   free(p_attach);
  99 }
 100
 101 xbt_dict_t Storage::parseContent(char *filename)
 102 {
 103   m_usedSize = 0;
 104   if ((!filename) || (strcmp(filename, "") == 0))
 105     return NULL;
 106
 107   xbt_dict_t parse_content = xbt_dict_new_homogeneous(xbt_free_f);
 108   FILE *file = NULL;
 109
 110   file = surf_fopen(filename, "r");
 111   if (file == NULL)
 112     xbt_die("Cannot open file '%s' (path=%s)", filename,
 113             xbt_str_join(surf_path, ":"));
 114
 115   char *line = NULL;
 116   size_t len = 0;
 117   ssize_t read;
 118   char path[1024];
 119   sg_size_t size;
 120
 121   while ((read = xbt_getline(&line, &len, file)) != -1) {
 122     if (read){
 123       if(sscanf(line,"%s %llu", path, &size) == 2) {
 124         m_usedSize += size;
 125         sg_size_t *psize = xbt_new(sg_size_t, 1);
 126         *psize = size;
 127         xbt_dict_set(parse_content,path,psize,NULL);
 128       } else {
 129         xbt_die("Be sure of passing a good format for content file.\n");
 130       }
 131     }
 132   }
 133   free(line);
 134   fclose(file);
 135   return parse_content;
 136 }
 137
 138 bool Storage::isUsed()
 139 {
 140   THROW_UNIMPLEMENTED;
 141   return false;
 142 }
 143
 144 void Storage::updateState(tmgr_trace_event_t /*event_type*/, double /*value*/, double /*date*/)
 145 {
 146   THROW_UNIMPLEMENTED;
 147 }
 148
 149 void Storage::setState(e_surf_resource_state_t state)
 150 {
 151   e_surf_resource_state_t old = Resource::getState();
 152   Resource::setState(state);
 153   surf_callback_emit(storageStateChangedCallbacks, this, old, state);
 154 }
 155
 156 xbt_dict_t Storage::getContent()
 157 {
 158   /* For the moment this action has no cost, but in the future we could take in account access latency of the disk */
 159
 160   xbt_dict_t content_dict = xbt_dict_new_homogeneous(NULL);
 161   xbt_dict_cursor_t cursor = NULL;
 162   char *file;
 163   sg_size_t *psize;
 164
 165   xbt_dict_foreach(p_content, cursor, file, psize){
 166     xbt_dict_set(content_dict,file,psize,NULL);
 167   }
 168   return content_dict;
 169 }
 170
 171 sg_size_t Storage::getSize(){
 172   return m_size;
 173 }
 174
 175 sg_size_t Storage::getFreeSize(){
 176   return m_size - m_usedSize;
 177 }
 178
 179 sg_size_t Storage::getUsedSize(){
 180   return m_usedSize;
 181 }
 182
 183 xbt_dict_t Storage::getProperties()
 184 {
 185         if (p_properties==NULL)
 186                 p_properties = xbt_dict_new();
 187         return p_properties;
 188 }
 189
 190 /**********
 191  * Action *
 192  **********/
 193 StorageAction::StorageAction(Model *model, double cost, bool failed,
 194                              Storage *storage, e_surf_action_storage_type_t type)
 195 : Action(model, cost, failed)
 196 , m_type(type), p_storage(storage), p_file(NULL){
 197   progress = 0;
 198 };
 199
 200 StorageAction::StorageAction(Model *model, double cost, bool failed, lmm_variable_t var,
 201                              Storage *storage, e_surf_action_storage_type_t type)
 202   : Action(model, cost, failed, var)
 203   , m_type(type), p_storage(storage), p_file(NULL){
 204   progress = 0;
 205 }
 206
 207 void StorageAction::setState(e_surf_action_state_t state){
 208   e_surf_action_state_t old = getState();
 209   Action::setState(state);
 210   surf_callback_emit(storageActionStateChangedCallbacks, this, old, state);
 211 }
 212
 213 }
 214 }