1 /* Copyright (c) 2007-2010, 2012-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 "src/surf/surf_interface.hpp"
8 #include "smx_private.h"
9 #include "xbt/sysdep.h"
14 #include "src/simix/SynchroIo.hpp"
16 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(simix_io, simix, "Logging specific to SIMIX (io)");
20 * \brief Internal function to create a SIMIX storage.
21 * \param name name of the storage to create
22 * \param storage the SURF storage to encapsulate
23 * \param data some user data (may be NULL)
25 smx_storage_t SIMIX_storage_create(const char *name, void *storage, void *data)
27 smx_storage_priv_t smx_storage = xbt_new0(s_smx_storage_priv_t, 1);
29 smx_storage->data = data;
31 /* Update global variables */
32 xbt_lib_set(storage_lib,name,SIMIX_STORAGE_LEVEL,smx_storage);
33 return xbt_lib_get_elm_or_null(storage_lib, name);
37 * \brief Internal function to destroy a SIMIX storage.
39 * \param s the host to destroy (a smx_storage_t)
41 void SIMIX_storage_destroy(void *s)
43 smx_storage_priv_t storage = (smx_storage_priv_t) s;
45 xbt_assert((storage != NULL), "Invalid parameters");
49 /* Clean storage structure */
54 void simcall_HANDLER_file_read(smx_simcall_t simcall, smx_file_t fd, sg_size_t size, sg_host_t host)
56 smx_synchro_t synchro = SIMIX_file_read(fd, size, host);
57 xbt_fifo_push(synchro->simcalls, simcall);
58 simcall->issuer->waiting_synchro = synchro;
61 smx_synchro_t SIMIX_file_read(smx_file_t fd, sg_size_t size, sg_host_t host)
63 /* check if the host is active */
65 THROWF(host_error, 0, "Host %s failed, you cannot call this function", sg_host_get_name(host));
68 simgrid::simix::Io *synchro = new simgrid::simix::Io();
71 synchro->surf_io = surf_host_read(host, fd->surf_file, size);
73 synchro->surf_io->setData(synchro);
74 XBT_DEBUG("Create io synchro %p", synchro);
80 void simcall_HANDLER_file_write(smx_simcall_t simcall, smx_file_t fd, sg_size_t size, sg_host_t host)
82 smx_synchro_t synchro = SIMIX_file_write(fd, size, host);
83 xbt_fifo_push(synchro->simcalls, simcall);
84 simcall->issuer->waiting_synchro = synchro;
87 smx_synchro_t SIMIX_file_write(smx_file_t fd, sg_size_t size, sg_host_t host)
90 THROWF(host_error, 0, "Host %s failed, you cannot call this function", sg_host_get_name(host));
92 simgrid::simix::Io *synchro = new simgrid::simix::Io();
95 synchro->surf_io = surf_host_write(host, fd->surf_file, size);
96 synchro->surf_io->setData(synchro);
97 XBT_DEBUG("Create io synchro %p", synchro);
103 void simcall_HANDLER_file_open(smx_simcall_t simcall, const char* fullpath, sg_host_t host)
105 smx_synchro_t synchro = SIMIX_file_open(fullpath, host);
106 xbt_fifo_push(synchro->simcalls, simcall);
107 simcall->issuer->waiting_synchro = synchro;
110 smx_synchro_t SIMIX_file_open(const char* fullpath, sg_host_t host)
113 THROWF(host_error, 0, "Host %s failed, you cannot call this function", sg_host_get_name(host));
115 simgrid::simix::Io *synchro = new simgrid::simix::Io();
116 synchro->name = NULL;
117 synchro->host = host;
118 synchro->surf_io = surf_host_open(host, fullpath);
119 synchro->surf_io->setData(synchro);
120 XBT_DEBUG("Create io synchro %p", synchro);
126 void simcall_HANDLER_file_close(smx_simcall_t simcall, smx_file_t fd, sg_host_t host)
128 smx_synchro_t synchro = SIMIX_file_close(fd, host);
129 xbt_fifo_push(synchro->simcalls, simcall);
130 simcall->issuer->waiting_synchro = synchro;
133 smx_synchro_t SIMIX_file_close(smx_file_t fd, sg_host_t host)
136 THROWF(host_error, 0, "Host %s failed, you cannot call this function", sg_host_get_name(host));
138 simgrid::simix::Io *synchro = new simgrid::simix::Io();
139 synchro->name = NULL;
140 synchro->host = host;
141 synchro->surf_io = surf_host_close(host, fd->surf_file);
142 synchro->surf_io->setData(synchro);
143 XBT_DEBUG("Create io synchro %p", synchro);
150 int SIMIX_file_unlink(smx_file_t fd, sg_host_t host)
153 THROWF(host_error, 0, "Host %s failed, you cannot call this function", sg_host_get_name(host));
155 int res = surf_host_unlink(host, fd->surf_file);
160 sg_size_t simcall_HANDLER_file_get_size(smx_simcall_t simcall, smx_file_t fd)
162 return SIMIX_file_get_size(simcall->issuer, fd);
165 sg_size_t SIMIX_file_get_size(smx_process_t process, smx_file_t fd)
167 sg_host_t host = process->host;
168 return surf_host_get_size(host, fd->surf_file);
171 sg_size_t simcall_HANDLER_file_tell(smx_simcall_t simcall, smx_file_t fd)
173 return SIMIX_file_tell(simcall->issuer, fd);
176 sg_size_t SIMIX_file_tell(smx_process_t process, smx_file_t fd)
178 sg_host_t host = process->host;
179 return surf_host_file_tell(host, fd->surf_file);
183 xbt_dynar_t simcall_HANDLER_file_get_info(smx_simcall_t simcall, smx_file_t fd)
185 return SIMIX_file_get_info(simcall->issuer, fd);
188 xbt_dynar_t SIMIX_file_get_info(smx_process_t process, smx_file_t fd)
190 sg_host_t host = process->host;
191 return surf_host_get_info(host, fd->surf_file);
194 int simcall_HANDLER_file_seek(smx_simcall_t simcall, smx_file_t fd, sg_offset_t offset, int origin)
196 return SIMIX_file_seek(simcall->issuer, fd, offset, origin);
199 int SIMIX_file_seek(smx_process_t process, smx_file_t fd, sg_offset_t offset, int origin)
201 sg_host_t host = process->host;
202 return surf_host_file_seek(host, fd->surf_file, offset, origin);
205 int simcall_HANDLER_file_move(smx_simcall_t simcall, smx_file_t file, const char* fullpath)
207 return SIMIX_file_move(simcall->issuer, file, fullpath);
210 int SIMIX_file_move(smx_process_t process, smx_file_t file, const char* fullpath)
212 sg_host_t host = process->host;
213 return surf_host_file_move(host, file->surf_file, fullpath);
216 sg_size_t SIMIX_storage_get_size(smx_storage_t storage){
217 return surf_storage_get_size(storage);
220 sg_size_t simcall_HANDLER_storage_get_free_size(smx_simcall_t simcall, smx_storage_t storage)
222 return SIMIX_storage_get_free_size(simcall->issuer, storage);
225 sg_size_t SIMIX_storage_get_free_size(smx_process_t process, smx_storage_t storage)
227 return surf_storage_get_free_size(storage);
230 sg_size_t simcall_HANDLER_storage_get_used_size(smx_simcall_t simcall, smx_storage_t storage)
232 return SIMIX_storage_get_used_size(simcall->issuer, storage);
235 sg_size_t SIMIX_storage_get_used_size(smx_process_t process, smx_storage_t storage)
237 return surf_storage_get_used_size(storage);
240 xbt_dict_t SIMIX_storage_get_properties(smx_storage_t storage){
241 return surf_storage_get_properties(storage);
244 const char* SIMIX_storage_get_name(smx_storage_t storage){
245 return sg_storage_name(storage);
248 xbt_dict_t SIMIX_storage_get_content(smx_storage_t storage){
249 return surf_storage_get_content(storage);
252 const char* SIMIX_storage_get_host(smx_storage_t storage){
253 return surf_storage_get_host(storage);
256 void SIMIX_post_io(smx_synchro_t synchro)
260 void SIMIX_io_destroy(smx_synchro_t synchro)
262 simgrid::simix::Io *io = static_cast<simgrid::simix::Io*>(synchro);
263 XBT_DEBUG("Destroy synchro %p", synchro);
265 io->surf_io->unref();
269 void SIMIX_io_finish(smx_synchro_t synchro)
271 xbt_fifo_item_t item;
272 smx_simcall_t simcall;
274 xbt_fifo_foreach(synchro->simcalls, item, simcall, smx_simcall_t) {
276 switch (synchro->state) {
279 /* do nothing, synchro done */
283 SMX_EXCEPTION(simcall->issuer, io_error, 0, "IO failed");
287 SMX_EXCEPTION(simcall->issuer, cancel_error, 0, "Canceled");
291 xbt_die("Internal error in SIMIX_io_finish: unexpected synchro state %d",
292 (int)synchro->state);
295 if (simcall->issuer->host->isOff()) {
296 simcall->issuer->context->iwannadie = 1;
299 simcall->issuer->waiting_synchro = NULL;
300 SIMIX_simcall_answer(simcall);
303 /* We no longer need it */
304 SIMIX_io_destroy(synchro);