1 /* Copyright (c) 2013-2015. The SimGrid Team.
2 * All rights reserved. */
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. */
7 #include "storage_interface.hpp"
8 #include "surf_private.h"
9 #include "xbt/file.h" /* xbt_getline */
11 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_storage, surf, "Logging specific to the SURF storage module");
14 xbt_lib_t storage_lib;
15 int ROUTING_STORAGE_LEVEL = -1; //Routing for storagelevel
16 int ROUTING_STORAGE_HOST_LEVEL = -1;
17 int SURF_STORAGE_LEVEL = -1;
18 xbt_lib_t storage_type_lib;
19 int ROUTING_STORAGE_TYPE_LEVEL = -1; //Routing for storage_type level
20 simgrid::surf::StorageModel *surf_storage_model = nullptr;
29 simgrid::xbt::signal<void(Storage*)> storageCreatedCallbacks;
30 simgrid::xbt::signal<void(Storage*)> storageDestructedCallbacks;
31 simgrid::xbt::signal<void(Storage*, int, int)> storageStateChangedCallbacks; // signature: wasOn, isOn
32 simgrid::xbt::signal<void(StorageAction*, Action::State, Action::State)> storageActionStateChangedCallbacks;
38 StorageModel::StorageModel(): Model()
42 StorageModel::~StorageModel(){
43 lmm_system_free(maxminSystem_);
44 surf_storage_model = nullptr;
51 Storage::Storage(Model *model, const char *name, xbt_dict_t props,
52 const char* type_id, const char *content_name, const char *content_type,
54 : Resource(model, name)
55 , PropertyHolder(props)
56 , contentType_(xbt_strdup(content_type))
57 , size_(size), usedSize_(0)
58 , typeId_(xbt_strdup(type_id))
59 , writeActions_(std::vector<StorageAction*>())
61 content_ = parseContent(content_name);
65 Storage::Storage(Model *model, const char *name, xbt_dict_t props,
66 lmm_system_t maxminSystem, double bread, double bwrite,
67 double bconnection, const char* type_id, const char *content_name,
68 const char *content_type, sg_size_t size, const char *attach)
69 : Resource(model, name, lmm_constraint_new(maxminSystem, this, bconnection))
70 , PropertyHolder(props)
71 , contentType_(xbt_strdup(content_type))
72 , size_(size), usedSize_(0)
73 , typeId_(xbt_strdup(type_id))
74 , writeActions_(std::vector<StorageAction*>())
76 content_ = parseContent(content_name);
77 attach_ = xbt_strdup(attach);
79 XBT_DEBUG("Create resource with Bconnection '%f' Bread '%f' Bwrite '%f' and Size '%llu'", bconnection, bread, bwrite, size);
80 constraintRead_ = lmm_constraint_new(maxminSystem, this, bread);
81 constraintWrite_ = lmm_constraint_new(maxminSystem, this, bwrite);
85 storageDestructedCallbacks(this);
86 xbt_dict_free(&content_);
92 xbt_dict_t Storage::parseContent(const char *filename)
95 if ((!filename) || (strcmp(filename, "") == 0))
98 xbt_dict_t parse_content = xbt_dict_new_homogeneous(xbt_free_f);
100 FILE *file = surf_fopen(filename, "r");
101 xbt_assert(file, "Cannot open file '%s' (path=%s)", filename, xbt_str_join(surf_path, ":"));
103 char *line = nullptr;
109 while ((read = xbt_getline(&line, &len, file)) != -1) {
111 xbt_assert(sscanf(line,"%s %llu", path, &size) == 2, "Parse error in %s: %s",filename,line);
114 sg_size_t *psize = xbt_new(sg_size_t, 1);
116 xbt_dict_set(parse_content,path,psize,nullptr);
121 return parse_content;
124 bool Storage::isUsed()
130 void Storage::apply_event(tmgr_trace_iterator_t /*event*/, double /*value*/)
135 void Storage::turnOn() {
138 storageStateChangedCallbacks(this, 0, 1);
141 void Storage::turnOff() {
144 storageStateChangedCallbacks(this, 1, 0);
148 xbt_dict_t Storage::getContent()
150 /* For the moment this action has no cost, but in the future we could take in account access latency of the disk */
152 xbt_dict_t content_dict = xbt_dict_new_homogeneous(nullptr);
153 xbt_dict_cursor_t cursor = nullptr;
157 xbt_dict_foreach(content_, cursor, file, psize){
158 xbt_dict_set(content_dict,file,psize,nullptr);
163 sg_size_t Storage::getSize(){
167 sg_size_t Storage::getFreeSize(){
168 return size_ - usedSize_;
171 sg_size_t Storage::getUsedSize(){
178 StorageAction::StorageAction(Model *model, double cost, bool failed,
179 Storage *storage, e_surf_action_storage_type_t type)
180 : Action(model, cost, failed)
181 , m_type(type), p_storage(storage), p_file(nullptr){
185 StorageAction::StorageAction(Model *model, double cost, bool failed, lmm_variable_t var,
186 Storage *storage, e_surf_action_storage_type_t type)
187 : Action(model, cost, failed, var)
188 , m_type(type), p_storage(storage), p_file(nullptr){
192 void StorageAction::setState(Action::State state){
193 Action::State old = getState();
194 Action::setState(state);
195 storageActionStateChangedCallbacks(this, old, state);