1 /* Copyright (c) 2007-2010, 2012-2014. 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 "smx_private.h"
8 //#include "surf/storage_private.h"
9 #include "xbt/sysdep.h"
14 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(simix_io, simix,
15 "Logging specific to SIMIX (io)");
19 * \brief Internal function to create a SIMIX storage.
20 * \param name name of the storage to create
21 * \param storage the SURF storage to encapsulate
22 * \param data some user data (may be NULL)
24 smx_storage_t SIMIX_storage_create(const char *name, void *storage, void *data)
26 smx_storage_priv_t smx_storage = xbt_new0(s_smx_storage_priv_t, 1);
28 smx_storage->data = data;
30 /* Update global variables */
31 xbt_lib_set(storage_lib,name,SIMIX_STORAGE_LEVEL,smx_storage);
32 return xbt_lib_get_elm_or_null(storage_lib, name);
36 * \brief Internal function to destroy a SIMIX storage.
38 * \param s the host to destroy (a smx_storage_t)
40 void SIMIX_storage_destroy(void *s)
42 smx_storage_priv_t storage = (smx_storage_priv_t) s;
44 xbt_assert((storage != NULL), "Invalid parameters");
48 /* Clean storage structure */
53 void SIMIX_pre_file_read(smx_simcall_t simcall, smx_file_t fd, sg_size_t size, smx_host_t host)
55 smx_action_t action = SIMIX_file_read(simcall->issuer, fd, size, host);
56 xbt_fifo_push(action->simcalls, simcall);
57 simcall->issuer->waiting_action = action;
60 smx_action_t SIMIX_file_read(smx_process_t process, smx_file_t fd, sg_size_t size, smx_host_t host)
64 /* check if the host is active */
65 if (surf_resource_get_state(surf_workstation_resource_priv(host)) != SURF_RESOURCE_ON) {
66 THROWF(host_error, 0, "Host %s failed, you cannot call this function",
70 action = xbt_mallocator_get(simix_global->action_mallocator);
71 action->type = SIMIX_ACTION_IO;
74 action->category = NULL;
77 action->io.host = host;
78 action->io.surf_io = surf_workstation_read(host, fd->surf_file, size);
80 surf_action_set_data(action->io.surf_io, action);
81 XBT_DEBUG("Create io action %p", action);
87 void SIMIX_pre_file_write(smx_simcall_t simcall, smx_file_t fd, sg_size_t size, smx_host_t host)
89 smx_action_t action = SIMIX_file_write(simcall->issuer, fd, size, host);
90 xbt_fifo_push(action->simcalls, simcall);
91 simcall->issuer->waiting_action = action;
94 smx_action_t SIMIX_file_write(smx_process_t process, smx_file_t fd, sg_size_t size, smx_host_t host)
98 /* check if the host is active */
99 if (surf_resource_get_state(surf_workstation_resource_priv(host)) != SURF_RESOURCE_ON) {
100 THROWF(host_error, 0, "Host %s failed, you cannot call this function",
104 action = xbt_mallocator_get(simix_global->action_mallocator);
105 action->type = SIMIX_ACTION_IO;
108 action->category = NULL;
111 action->io.host = host;
112 action->io.surf_io = surf_workstation_write(host, fd->surf_file, size);
114 surf_action_set_data(action->io.surf_io, action);
115 XBT_DEBUG("Create io action %p", action);
121 void SIMIX_pre_file_open(smx_simcall_t simcall, const char* fullpath)
123 smx_action_t action = SIMIX_file_open(simcall->issuer, fullpath);
124 xbt_fifo_push(action->simcalls, simcall);
125 simcall->issuer->waiting_action = action;
128 smx_action_t SIMIX_file_open(smx_process_t process, const char* fullpath)
131 smx_host_t host = process->smx_host;
133 /* check if the host is active */
134 if (surf_resource_get_state(surf_workstation_resource_priv(host)) != SURF_RESOURCE_ON) {
135 THROWF(host_error, 0, "Host %s failed, you cannot call this function",
139 action = xbt_mallocator_get(simix_global->action_mallocator);
140 action->type = SIMIX_ACTION_IO;
143 action->category = NULL;
146 action->io.host = host;
147 action->io.surf_io = surf_workstation_open(host, fullpath);
149 surf_action_set_data(action->io.surf_io, action);
150 XBT_DEBUG("Create io action %p", action);
156 void SIMIX_pre_file_close(smx_simcall_t simcall, smx_file_t fd)
158 smx_action_t action = SIMIX_file_close(simcall->issuer, fd);
159 xbt_fifo_push(action->simcalls, simcall);
160 simcall->issuer->waiting_action = action;
163 smx_action_t SIMIX_file_close(smx_process_t process, smx_file_t fd)
166 smx_host_t host = process->smx_host;
168 /* check if the host is active */
169 if (surf_resource_get_state(surf_workstation_resource_priv(host)) != SURF_RESOURCE_ON) {
170 THROWF(host_error, 0, "Host %s failed, you cannot call this function",
174 action = xbt_mallocator_get(simix_global->action_mallocator);
175 action->type = SIMIX_ACTION_IO;
178 action->category = NULL;
181 action->io.host = host;
182 action->io.surf_io = surf_workstation_close(host, fd->surf_file);
184 surf_action_set_data(action->io.surf_io, action);
185 XBT_DEBUG("Create io action %p", action);
192 int SIMIX_pre_file_unlink(smx_simcall_t simcall, smx_file_t fd)
194 return SIMIX_file_unlink(simcall->issuer, fd);
197 int SIMIX_file_unlink(smx_process_t process, smx_file_t fd)
199 smx_host_t host = process->smx_host;
200 /* check if the host is active */
201 if (surf_resource_get_state(surf_workstation_resource_priv(host)) != SURF_RESOURCE_ON) {
202 THROWF(host_error, 0, "Host %s failed, you cannot call this function",
206 if (surf_workstation_unlink(host, fd->surf_file)){
214 void SIMIX_pre_file_ls(smx_simcall_t simcall,
215 const char* mount, const char* path)
217 smx_action_t action = SIMIX_file_ls(simcall->issuer, mount, path);
218 xbt_fifo_push(action->simcalls, simcall);
219 simcall->issuer->waiting_action = action;
221 smx_action_t SIMIX_file_ls(smx_process_t process, const char* mount, const char *path)
224 smx_host_t host = process->smx_host;
225 /* check if the host is active */
226 if (surf_resource_get_state(surf_workstation_resource_priv(host)) != SURF_RESOURCE_ON) {
227 THROWF(host_error, 0, "Host %s failed, you cannot call this function",
231 action = xbt_mallocator_get(simix_global->action_mallocator);
232 action->type = SIMIX_ACTION_IO;
235 action->category = NULL;
238 action->io.host = host;
239 action->io.surf_io = surf_workstation_ls(host,mount,path);
241 surf_action_set_data(action->io.surf_io, action);
242 XBT_DEBUG("Create io action %p", action);
246 sg_size_t SIMIX_pre_file_get_size(smx_simcall_t simcall, smx_file_t fd)
248 return SIMIX_file_get_size(simcall->issuer, fd);
251 sg_size_t SIMIX_file_get_size(smx_process_t process, smx_file_t fd)
253 smx_host_t host = process->smx_host;
254 return surf_workstation_get_size(host, fd->surf_file);
257 sg_size_t SIMIX_pre_file_tell(smx_simcall_t simcall, smx_file_t fd)
259 return SIMIX_file_tell(simcall->issuer, fd);
262 sg_size_t SIMIX_file_tell(smx_process_t process, smx_file_t fd)
264 smx_host_t host = process->smx_host;
265 return surf_workstation_file_tell(host, fd->surf_file);
269 xbt_dynar_t SIMIX_pre_file_get_info(smx_simcall_t simcall, smx_file_t fd)
271 return SIMIX_file_get_info(simcall->issuer, fd);
274 xbt_dynar_t SIMIX_file_get_info(smx_process_t process, smx_file_t fd)
276 smx_host_t host = process->smx_host;
277 return surf_workstation_get_info(host, fd->surf_file);
280 int SIMIX_pre_file_seek(smx_simcall_t simcall, smx_file_t fd, sg_size_t offset, int origin)
282 return SIMIX_file_seek(simcall->issuer, fd, offset, origin);
285 int SIMIX_file_seek(smx_process_t process, smx_file_t fd, sg_size_t offset, int origin)
287 smx_host_t host = process->smx_host;
288 return surf_workstation_file_seek(host, fd->surf_file, offset, origin);
291 int SIMIX_pre_file_move(smx_simcall_t simcall, smx_file_t file, const char* fullpath)
293 return SIMIX_file_move(simcall->issuer, file, fullpath);
296 int SIMIX_file_move(smx_process_t process, smx_file_t file, const char* fullpath)
298 smx_host_t host = process->smx_host;
299 return surf_workstation_file_move(host, file->surf_file, fullpath);
302 int SIMIX_pre_file_rcopy(smx_simcall_t simcall, smx_file_t fd, smx_host_t host, const char* fullpath)
304 return SIMIX_file_rcopy(simcall->issuer, fd, host, fullpath);
307 int SIMIX_file_rcopy(smx_process_t process, smx_file_t file, smx_host_t host_dest, const char* fullpath)
309 smx_host_t host = process->smx_host;
310 return surf_workstation_file_rcopy(host, file->surf_file, host_dest, fullpath);
313 sg_size_t SIMIX_pre_storage_get_free_size(smx_simcall_t simcall, const char* name)
315 return SIMIX_storage_get_free_size(simcall->issuer, name);
318 sg_size_t SIMIX_storage_get_free_size(smx_process_t process, const char* name)
320 smx_host_t host = process->smx_host;
321 return surf_workstation_get_free_size(host, name);
324 sg_size_t SIMIX_pre_storage_get_used_size(smx_simcall_t simcall, const char* name)
326 return SIMIX_storage_get_used_size(simcall->issuer, name);
329 sg_size_t SIMIX_storage_get_used_size(smx_process_t process, const char* name)
331 smx_host_t host = process->smx_host;
332 return surf_workstation_get_used_size(host, name);
335 xbt_dict_t SIMIX_pre_storage_get_properties(smx_simcall_t simcall, smx_storage_t storage){
336 return SIMIX_storage_get_properties(storage);
338 xbt_dict_t SIMIX_storage_get_properties(smx_storage_t storage){
339 xbt_assert((storage != NULL), "Invalid parameters (simix storage is NULL)");
340 return surf_resource_get_properties(surf_storage_resource_priv(storage));
343 const char* SIMIX_pre_storage_get_name(smx_simcall_t simcall, smx_storage_t storage){
344 return SIMIX_storage_get_name(storage);
347 const char* SIMIX_storage_get_name(smx_storage_t storage){
348 xbt_assert((storage != NULL), "Invalid parameters");
349 return sg_storage_name(storage);
352 xbt_dict_t SIMIX_pre_storage_get_content(smx_simcall_t simcall, smx_storage_t storage){
353 return SIMIX_storage_get_content(storage);
356 xbt_dict_t SIMIX_storage_get_content(smx_storage_t storage){
357 xbt_assert((storage != NULL), "Invalid parameters (simix storage is NULL)");
358 return surf_storage_get_content(storage);
361 sg_size_t SIMIX_storage_get_size(smx_storage_t storage){
362 xbt_assert((storage != NULL), "Invalid parameters (simix storage is NULL)");
363 return surf_storage_get_size(storage);
366 const char* SIMIX_pre_storage_get_host(smx_simcall_t simcall, smx_storage_t storage){
367 return SIMIX_storage_get_host(storage);
370 const char* SIMIX_storage_get_host(smx_storage_t storage){
371 xbt_assert((storage != NULL), "Invalid parameters");
372 return surf_storage_get_host(storage);
375 void SIMIX_post_io(smx_action_t action)
378 smx_simcall_t simcall;
380 // xbt_dict_cursor_t cursor = NULL;
381 // s_file_stat_t *dst = NULL;
382 // s_file_stat_t *src = NULL;
384 xbt_fifo_foreach(action->simcalls,i,simcall,smx_simcall_t) {
385 switch (simcall->call) {
386 case SIMCALL_FILE_OPEN: {
387 smx_file_t tmp = xbt_new(s_smx_file_t,1);
388 tmp->surf_file = surf_storage_action_get_file(action->io.surf_io);
389 simcall_file_open__set__result(simcall, tmp);
392 case SIMCALL_FILE_CLOSE:
393 xbt_free(simcall_file_close__get__fd(simcall));
394 simcall_file_close__set__result(simcall, 0);
396 case SIMCALL_FILE_WRITE:
397 simcall_file_write__set__result(simcall, surf_action_get_cost(action->io.surf_io));
400 case SIMCALL_FILE_READ:
401 simcall_file_read__set__result(simcall, surf_action_get_cost(action->io.surf_io));
404 case SIMCALL_FILE_LS:
405 // xbt_dict_foreach((action->io.surf_io)->ls_dict,cursor,key, src){
406 // // if there is a stat we have to duplicate it
408 // dst = xbt_new0(s_file_stat_t,1);
409 // file_stat_copy(src, dst);
410 // xbt_dict_set((action->io.surf_io)->ls_dict,key,dst,xbt_free);
413 simcall_file_ls__set__result(simcall, surf_storage_action_get_ls_dict(action->io.surf_io));
420 switch (surf_action_get_state(action->io.surf_io)) {
422 case SURF_ACTION_FAILED:
423 action->state = SIMIX_FAILED;
426 case SURF_ACTION_DONE:
427 action->state = SIMIX_DONE;
435 SIMIX_io_finish(action);
438 void SIMIX_io_destroy(smx_action_t action)
440 XBT_DEBUG("Destroy action %p", action);
441 if (action->io.surf_io)
442 surf_action_unref(action->io.surf_io);
443 xbt_mallocator_release(simix_global->action_mallocator, action);
446 void SIMIX_io_finish(smx_action_t action)
448 xbt_fifo_item_t item;
449 smx_simcall_t simcall;
451 xbt_fifo_foreach(action->simcalls, item, simcall, smx_simcall_t) {
453 switch (action->state) {
456 /* do nothing, action done */
460 SMX_EXCEPTION(simcall->issuer, io_error, 0, "IO failed");
464 SMX_EXCEPTION(simcall->issuer, cancel_error, 0, "Canceled");
468 xbt_die("Internal error in SIMIX_io_finish: unexpected action state %d",
472 if (surf_resource_get_state(surf_workstation_resource_priv(simcall->issuer->smx_host)) != SURF_RESOURCE_ON) {
473 simcall->issuer->context->iwannadie = 1;
476 simcall->issuer->waiting_action = NULL;
477 SIMIX_simcall_answer(simcall);
480 /* We no longer need it */
481 SIMIX_io_destroy(action);