Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
8b64c56daa394df0309569a24dad86d5e7b63c12
[simgrid.git] / 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 }