/* Copyright (c) 2008-2010, 2012-2013. The SimGrid Team.
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
* under the terms of the license (GNU LGPL) which comes with this package. */
/** @addtogroup MSG_examples
*
* @subsection MSG_ex_resources Other resource kinds
*
* This section contains some sparse examples of how to use the other
* kind of resources, such as disk or GPU. These resources are quite
* experimental for now, but here we go anyway.
*
* - io/file.c Example with the disk resource
*/
#define FILENAME1 "./doc/simgrid/examples/platforms/g5k.xml"
#define FILENAME2 ".\\Windows\\setupact.log"
#define FILENAME3 "./doc/simgrid/examples/platforms/g5k_cabinets.xml"
#define FILENAME4 "./doc/simgrid/examples/platforms/nancy.xml"
#include
#include
#include "msg/msg.h"
#include "surf/surf_private.h"
#include "inttypes.h"
int host(int argc, char *argv[]);
XBT_LOG_NEW_DEFAULT_CATEGORY(io_file,
"Messages specific for this io example");
int host(int argc, char *argv[])
{
msg_file_t file = NULL;
char* mount = xbt_strdup("/home");
sg_storage_size_t read,write;
if(!strcmp(MSG_process_get_name(MSG_process_self()),"0")){
file = MSG_file_open(mount,FILENAME1, NULL);
MSG_file_dump(file);
} else if(!strcmp(MSG_process_get_name(MSG_process_self()),"1")) {
free(mount);
mount = xbt_strdup("/windows");
file = MSG_file_open(mount,FILENAME2, NULL);
} else if(!strcmp(MSG_process_get_name(MSG_process_self()),"2")){
file = MSG_file_open(mount,FILENAME3, NULL);
} else if(!strcmp(MSG_process_get_name(MSG_process_self()),"3"))
file = MSG_file_open(mount,FILENAME4, NULL);
else xbt_die("FILENAME NOT DEFINED %s",MSG_process_get_name(MSG_process_self()));
XBT_INFO("\tOpen file '%s'",file->fullname);
read = MSG_file_read(file, 10000000); // Read for 10MB
XBT_INFO("\tHave read %" PRIu64 " on %s",read,file->fullname);
write = MSG_file_write(file, 100000); // Write for 100KB
XBT_INFO("\tHave written %" PRIu64 " on %s",write,file->fullname);
read = MSG_file_read(file, 110000); // Read for 110KB
XBT_INFO("\tHave read %" PRIu64 " on %s (of size %" PRIu64 ")",read,file->fullname,
MSG_file_get_size(file));
XBT_INFO("\tClose file '%s'",file->fullname);
MSG_file_close(file);
free(mount);
return 0;
}
int main(int argc, char **argv)
{
int i,res;
MSG_init(&argc, argv);
MSG_create_environment(argv[1]);
xbt_dynar_t hosts = MSG_hosts_as_dynar();
MSG_function_register("host", host);
unsigned long nb_hosts = xbt_dynar_length(hosts);
XBT_INFO("Number of host '%lu'",nb_hosts);
for(i = 0 ; i