1 /* Copyright (c) 2006-2016. The SimGrid Team. All rights reserved. */
3 /* This program is free software; you can redistribute it and/or modify it
4 * under the terms of the license (GNU LGPL) which comes with this package. */
6 #include "simgrid/msg.h"
7 #include "simgrid/plugins/file_system.h"
9 XBT_LOG_NEW_DEFAULT_CATEGORY(storage,"Messages specific for this simulation");
11 static int host(int argc, char *argv[]){
12 const char* host_name = MSG_host_get_name(MSG_host_self());
14 /* - Display information on the disks mounted by the current host */
15 XBT_INFO("*** Storage info on %s ***", host_name);
17 xbt_dict_cursor_t cursor = NULL;
20 msg_storage_t storage = NULL;
22 /* - Retrieve all mount points of current host */
23 xbt_dict_t storage_list = MSG_host_get_mounted_storage_list(MSG_host_self());
25 xbt_dict_foreach (storage_list, cursor, mount_name, storage_name) {
26 /* - For each disk mounted on host:
27 - Retrieve disk's information */
28 XBT_INFO("Storage name: %s, mount name: %s", storage_name, mount_name);
29 storage = MSG_storage_get_by_name(storage_name);
31 xbt_dict_free(&storage_list);
33 /* - Write 200,000 bytes on Disk4 */
34 storage = MSG_storage_get_by_name("Disk4");
36 /* - Open an non-existing file which amounts to create it. */
37 sg_size_t write = MSG_storage_write(storage, 200000); // Write 200,000 bytes
38 XBT_INFO("Wrote %llu bytes on 'Disk4'", write);
40 /* - Retrieve the size of created file and read it completely */
41 sg_size_t read = MSG_storage_read(storage, 200000);
42 XBT_INFO("Read %llu bytes on 'Disk4'", read);
44 /* - Attach some user data to disk1 */
45 XBT_INFO("*** Get/set data for storage element: Disk4 ***");
47 char* data = MSG_storage_get_data(storage);
49 XBT_INFO("Get storage data: '%s'", data);
51 MSG_storage_set_data(storage, xbt_strdup("Some user data"));
52 data = MSG_storage_get_data(storage);
53 XBT_INFO("Set and get data: '%s'", data);
59 int main(int argc, char *argv[])
61 MSG_init(&argc, argv);
63 MSG_create_environment(argv[1]);
64 MSG_function_register("host", host);
65 xbt_dynar_t hosts = MSG_hosts_as_dynar();
66 MSG_process_create(NULL, host, NULL, xbt_dynar_get_as(hosts, 3, msg_host_t));
67 xbt_dynar_free(&hosts);
69 msg_error_t res = MSG_main();
70 XBT_INFO("Simulated time: %g", MSG_get_clock());