src/simix/smx_io.c

   1 /* Copyright (c) 2007, 2008, 2009, 2010. 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 "smx_private.h"
   8 #include "xbt/sysdep.h"
   9 #include "xbt/log.h"
  10 #include "xbt/dict.h"
  11 #include "mc/mc.h"
  12
  13 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(simix_io, simix,
  14                                 "Logging specific to SIMIX (io)");
  15
  16
  17 //SIMIX FILE READ
  18 void SIMIX_pre_file_read(smx_simcall_t simcall)
  19 {
  20   smx_action_t action = SIMIX_file_read(simcall->issuer,
  21       simcall->file_read.ptr,
  22       simcall->file_read.size,
  23       simcall->file_read.nmemb,
  24       simcall->file_read.stream);
  25   xbt_fifo_push(action->simcalls, simcall);
  26   simcall->issuer->waiting_action = action;
  27 }
  28
  29 smx_action_t SIMIX_file_read(smx_process_t process, void* ptr, size_t size, size_t nmemb, smx_file_t stream)
  30 {
  31   smx_action_t action;
  32   smx_host_t host = process->smx_host;
  33
  34   /* check if the host is active */
  35   if (surf_workstation_model->extension.
  36       workstation.get_state(host->host) != SURF_RESOURCE_ON) {
  37     THROWF(host_error, 0, "Host %s failed, you cannot call this function",
  38            host->name);
  39   }
  40
  41   action = xbt_mallocator_get(simix_global->action_mallocator);
  42   action->type = SIMIX_ACTION_IO;
  43   action->name = NULL;
  44 #ifdef HAVE_TRACING
  45   action->category = NULL;
  46 #endif
  47
  48   action->io.host = host;
  49   action->io.surf_io = surf_workstation_model->extension.workstation.read(host->host, ptr, size, nmemb, stream->surf_file),
  50
  51   surf_workstation_model->action_data_set(action->io.surf_io, action);
  52   XBT_DEBUG("Create io action %p", action);
  53
  54   return action;
  55 }
  56
  57 //SIMIX FILE WRITE
  58 void SIMIX_pre_file_write(smx_simcall_t simcall)
  59 {
  60   smx_action_t action = SIMIX_file_write(simcall->issuer,
  61       simcall->file_write.ptr,
  62       simcall->file_write.size,
  63       simcall->file_write.nmemb,
  64       simcall->file_write.stream);
  65   xbt_fifo_push(action->simcalls, simcall);
  66   simcall->issuer->waiting_action = action;
  67 }
  68
  69 smx_action_t SIMIX_file_write(smx_process_t process, const void* ptr, size_t size, size_t nmemb, smx_file_t stream)
  70 {
  71   smx_action_t action;
  72   smx_host_t host = process->smx_host;
  73
  74   /* check if the host is active */
  75   if (surf_workstation_model->extension.
  76       workstation.get_state(host->host) != SURF_RESOURCE_ON) {
  77     THROWF(host_error, 0, "Host %s failed, you cannot call this function",
  78            host->name);
  79   }
  80
  81   action = xbt_mallocator_get(simix_global->action_mallocator);
  82   action->type = SIMIX_ACTION_IO;
  83   action->name = NULL;
  84 #ifdef HAVE_TRACING
  85   action->category = NULL;
  86 #endif
  87
  88   action->io.host = host;
  89   action->io.surf_io = surf_workstation_model->extension.workstation.write(host->host, ptr, size, nmemb, stream->surf_file);
  90
  91   surf_workstation_model->action_data_set(action->io.surf_io, action);
  92   XBT_DEBUG("Create io action %p", action);
  93
  94   return action;
  95 }
  96
  97 //SIMIX FILE OPEN
  98 void SIMIX_pre_file_open(smx_simcall_t simcall)
  99 {
 100   smx_action_t action = SIMIX_file_open(simcall->issuer,
 101       simcall->file_open.mount,
 102       simcall->file_open.path,
 103       simcall->file_open.mode);
 104   xbt_fifo_push(action->simcalls, simcall);
 105   simcall->issuer->waiting_action = action;
 106 }
 107
 108 smx_action_t SIMIX_file_open(smx_process_t process ,const char* mount, const char* path, const char* mode)
 109 {
 110   smx_action_t action;
 111   smx_host_t host = process->smx_host;
 112
 113   /* check if the host is active */
 114   if (surf_workstation_model->extension.
 115       workstation.get_state(host->host) != SURF_RESOURCE_ON) {
 116     THROWF(host_error, 0, "Host %s failed, you cannot call this function",
 117            host->name);
 118   }
 119
 120   action = xbt_mallocator_get(simix_global->action_mallocator);
 121   action->type = SIMIX_ACTION_IO;
 122   action->name = NULL;
 123 #ifdef HAVE_TRACING
 124   action->category = NULL;
 125 #endif
 126
 127   action->io.host = host;
 128   action->io.surf_io = surf_workstation_model->extension.workstation.open(host->host, mount, path, mode);
 129
 130   surf_workstation_model->action_data_set(action->io.surf_io, action);
 131   XBT_DEBUG("Create io action %p", action);
 132
 133   return action;
 134 }
 135
 136 //SIMIX FILE CLOSE
 137 void SIMIX_pre_file_close(smx_simcall_t simcall)
 138 {
 139   smx_action_t action = SIMIX_file_close(simcall->issuer,
 140       simcall->file_close.fp);
 141   xbt_fifo_push(action->simcalls, simcall);
 142   simcall->issuer->waiting_action = action;
 143 }
 144
 145 smx_action_t SIMIX_file_close(smx_process_t process, smx_file_t fp)
 146 {
 147   smx_action_t action;
 148   smx_host_t host = process->smx_host;
 149
 150   /* check if the host is active */
 151   if (surf_workstation_model->extension.
 152       workstation.get_state(host->host) != SURF_RESOURCE_ON) {
 153     THROWF(host_error, 0, "Host %s failed, you cannot call this function",
 154            host->name);
 155   }
 156
 157   action = xbt_mallocator_get(simix_global->action_mallocator);
 158   action->type = SIMIX_ACTION_IO;
 159   action->name = NULL;
 160 #ifdef HAVE_TRACING
 161   action->category = NULL;
 162 #endif
 163
 164   action->io.host = host;
 165   action->io.surf_io = surf_workstation_model->extension.workstation.close(host->host, fp->surf_file);
 166
 167   surf_workstation_model->action_data_set(action->io.surf_io, action);
 168   XBT_DEBUG("Create io action %p", action);
 169
 170   return action;
 171 }
 172
 173 //SIMIX FILE STAT
 174 void SIMIX_pre_file_stat(smx_simcall_t simcall)
 175 {
 176   smx_action_t action = SIMIX_file_stat(simcall->issuer,
 177       simcall->file_stat.fd,
 178       simcall->file_stat.buf);
 179   xbt_fifo_push(action->simcalls, simcall);
 180   simcall->issuer->waiting_action = action;
 181 }
 182
 183 smx_action_t SIMIX_file_stat(smx_process_t process, smx_file_t fd, s_file_stat_t buf)
 184 {
 185   smx_action_t action;
 186   smx_host_t host = process->smx_host;
 187   /* check if the host is active */
 188   if (surf_workstation_model->extension.
 189       workstation.get_state(host->host) != SURF_RESOURCE_ON) {
 190     THROWF(host_error, 0, "Host %s failed, you cannot call this function",
 191            host->name);
 192   }
 193
 194   action = xbt_mallocator_get(simix_global->action_mallocator);
 195   action->type = SIMIX_ACTION_IO;
 196   action->name = NULL;
 197 #ifdef HAVE_TRACING
 198   action->category = NULL;
 199 #endif
 200
 201   action->io.host = host;
 202   action->io.surf_io = surf_workstation_model->extension.workstation.stat(host->host, fd->surf_file);
 203
 204   surf_workstation_model->action_data_set(action->io.surf_io, action);
 205   XBT_DEBUG("Create io action %p", action);
 206
 207   return action;
 208 }
 209
 210 void SIMIX_post_io(smx_action_t action)
 211 {
 212   xbt_fifo_item_t i;
 213   smx_simcall_t simcall;
 214
 215   xbt_fifo_foreach(action->simcalls,i,simcall,smx_simcall_t) {
 216     switch (simcall->call) {
 217     case SIMCALL_FILE_OPEN:
 218       simcall->file_open.result = xbt_new(s_smx_file_t,1);
 219       simcall->file_open.result->surf_file = (action->io.surf_io)->file;
 220       break;
 221     case SIMCALL_FILE_CLOSE:
 222       simcall->file_read.result = 0;
 223       break;
 224     case SIMCALL_FILE_WRITE:
 225       simcall->file_write.result = (action->io.surf_io)->cost;
 226       break;
 227     case SIMCALL_FILE_READ:
 228       simcall->file_read.result = (action->io.surf_io)->cost;
 229       break;
 230     case SIMCALL_FILE_STAT:
 231       simcall->file_stat.result = 0;
 232       s_file_stat_t *dst = &(simcall->file_stat.buf);
 233       s_file_stat_t *src = &((action->io.surf_io)->stat);
 234       file_stat_copy(src,dst);
 235       break;
 236     default:
 237       break;
 238     }
 239   }
 240
 241   switch (surf_workstation_model->action_state_get(action->io.surf_io)) {
 242
 243     case SURF_ACTION_FAILED:
 244       action->state = SIMIX_FAILED;
 245       break;
 246
 247     case SURF_ACTION_DONE:
 248       action->state = SIMIX_DONE;
 249       break;
 250
 251     default:
 252       THROW_IMPOSSIBLE;
 253       break;
 254   }
 255
 256   SIMIX_io_finish(action);
 257 }
 258
 259 void SIMIX_io_destroy(smx_action_t action)
 260 {
 261   XBT_DEBUG("Destroy action %p", action);
 262   if (action->io.surf_io)
 263     action->io.surf_io->model_type->action_unref(action->io.surf_io);
 264   xbt_mallocator_release(simix_global->action_mallocator, action);
 265 }
 266
 267 void SIMIX_io_finish(smx_action_t action)
 268 {
 269   xbt_fifo_item_t item;
 270   smx_simcall_t simcall;
 271
 272   xbt_fifo_foreach(action->simcalls, item, simcall, smx_simcall_t) {
 273
 274     switch (action->state) {
 275
 276       case SIMIX_DONE:
 277         /* do nothing, action done */
 278         break;
 279
 280       case SIMIX_FAILED:
 281         SMX_EXCEPTION(simcall->issuer, io_error, 0, "IO failed");
 282         break;
 283
 284       case SIMIX_CANCELED:
 285         SMX_EXCEPTION(simcall->issuer, cancel_error, 0, "Canceled");
 286         break;
 287
 288       default:
 289         xbt_die("Internal error in SIMIX_io_finish: unexpected action state %d",
 290             (int)action->state);
 291     }
 292     simcall->issuer->waiting_action = NULL;
 293     SIMIX_simcall_answer(simcall);
 294   }
 295
 296   /* We no longer need it */
 297   SIMIX_io_destroy(action);
 298 }