1 /* Copyright (c) 2008, 2009, 2010. 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. */
10 #include "surf/surf_private.h"
12 int host(int argc, char *argv[]);
14 XBT_LOG_NEW_DEFAULT_CATEGORY(io_file,
15 "Messages specific for this io example");
17 int host(int argc, char *argv[])
20 file = MSG_file_open("test.txt","rw");
21 XBT_INFO("Host '%s' open %p",MSG_host_get_name(MSG_host_self()), file);
23 size_t read = MSG_file_read(NULL,0,0,file);
24 XBT_INFO("Host '%s' read %zu", MSG_host_get_name(MSG_host_self()), read);
26 size_t write = MSG_file_write(NULL,0,0,file);
27 XBT_INFO("Host '%s' write %zu", MSG_host_get_name(MSG_host_self()), write);
29 int res = MSG_file_stat(0,NULL);
30 XBT_INFO("Host '%s' stat %d",MSG_host_get_name(MSG_host_self()), res);
32 res = MSG_file_close(file);
33 XBT_INFO("Host '%s' close %d",MSG_host_get_name(MSG_host_self()), res);
37 int main(int argc, char **argv)
40 MSG_global_init(&argc, argv);
41 MSG_create_environment(argv[1]);
42 xbt_dynar_t hosts = MSG_hosts_as_dynar();
43 MSG_function_register("host", host);
45 XBT_INFO("Number of host '%lu'",xbt_dynar_length(hosts));
46 for(i = 0 ; i<xbt_dynar_length(hosts); i++)
48 char* name_host = bprintf("%d",i);
49 MSG_process_create( name_host, host, NULL, xbt_dynar_get_as(hosts,i,m_host_t) );
52 xbt_dynar_free(&hosts);
55 XBT_INFO("Simulation time %g", MSG_get_clock());