From a7e20a695a088f59da00df9803374a23f14751a3 Mon Sep 17 00:00:00 2001
From: suter <frederic.suter@cc.in2p3.fr>
Date: Fri, 9 Aug 2013 16:48:45 +0200
Subject: [PATCH] add a SD_workstation_storage_get_list as a first try to add
 storage management to SimDag.

---
 include/simdag/simdag.h     |  2 ++
 src/simdag/sd_workstation.c | 10 ++++++++++
 2 files changed, 12 insertions(+)

diff --git a/include/simdag/simdag.h b/include/simdag/simdag.h
index bd9ee4e439..fe7e32cd89 100644
--- a/include/simdag/simdag.h
+++ b/include/simdag/simdag.h
@@ -105,6 +105,8 @@ XBT_PUBLIC(double) SD_route_get_communication_time(SD_workstation_t src,
 
 XBT_PUBLIC(SD_task_t) SD_workstation_get_current_task(SD_workstation_t
                                                       workstation);
+XBT_PUBLIC(xbt_dynar_t)
+    SD_workstation_get_storage_list(SD_workstation_t workstation);
 /** @} */
 
 /************************** Task handling ************************************/
diff --git a/src/simdag/sd_workstation.c b/src/simdag/sd_workstation.c
index f961c7f12b..3dbc6c0713 100644
--- a/src/simdag/sd_workstation.c
+++ b/src/simdag/sd_workstation.c
@@ -450,6 +450,16 @@ void SD_workstation_set_access_mode(SD_workstation_t workstation,
   }
 }
 
+/**
+ * \brief Return the list of mounted storages on a workstation.
+ *
+ * \param workstation a workstation
+ * \return a dynar containing all mounted storages on the workstation
+ */
+xbt_dynar_t SD_workstation_get_storage_list(SD_workstation_t workstation){
+  return surf_workstation_model->extension.workstation.get_storage_list(workstation);
+}
+
 /* Returns whether a task can start now on a workstation*/
 /*
   int __SD_workstation_can_start(SD_workstation_t workstation, SD_task_t task) {
-- 
2.20.1