Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
29ebc857e2ed490f86d0ff1a02284d8c88df1b2e
[simgrid.git] / examples / msg / io / file.c
1 /* Copyright (c) 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 <stdio.h>
8 #include <stdlib.h>
9 #include "msg/msg.h"
10 #include "surf/surf_private.h"
11
12 int host(int argc, char *argv[]);
13
14 XBT_LOG_NEW_DEFAULT_CATEGORY(io_file,
15                              "Messages specific for this io example");
16
17 int host(int argc, char *argv[])
18 {
19   m_file_t file;
20   file = MSG_file_open("test.txt","rw");
21   XBT_INFO("Host '%s' open %p",MSG_host_get_name(MSG_host_self()), file);
22
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);
25
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);
28
29   int res = MSG_file_stat(0,NULL);
30   XBT_INFO("Host '%s' stat %d",MSG_host_get_name(MSG_host_self()), res);
31
32   res = MSG_file_close(file);
33   XBT_INFO("Host '%s' close %d",MSG_host_get_name(MSG_host_self()), res);
34   return 0;
35 }
36
37 int main(int argc, char **argv)
38 {
39     int i,res;
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);
44
45   XBT_INFO("Number of host '%lu'",xbt_dynar_length(hosts));
46   for(i = 0 ; i<xbt_dynar_length(hosts); i++)
47   {
48     char* name_host = bprintf("%d",i);
49     MSG_process_create( name_host, host, NULL, xbt_dynar_get_as(hosts,i,m_host_t) );
50     free(name_host);
51   }
52   xbt_dynar_free(&hosts);
53
54   res = MSG_main();
55   XBT_INFO("Simulation time %g", MSG_get_clock());
56   MSG_clean();
57   if (res == MSG_OK)
58     return 0;
59   else
60     return 1;
61
62 }