Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
model-checker : display malloc backtrace according to address
[simgrid.git] / src / surf / new_model.c
1 /* Copyright (c) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012. 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 /* ********************************************************************* */
8 /* TUTORIAL: New model                                                   */
9 /* ********************************************************************* */
10
11 #include "xbt/ex.h"
12 #include "xbt/dict.h"
13 #include "xbt/file_stat.h"
14 #include "portable.h"
15 #include "surf_private.h"
16 #include "new_model_private.h"
17 #include "surf/surf_resource.h"
18
19 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_new_model, surf,
20                                 "Logging specific to the SURF new model module");
21
22 surf_model_t surf_new_model = NULL;
23 lmm_system_t new_model_maxmin_system = NULL;
24 static int new_model_selective_update = 0;
25 static xbt_swag_t
26     new_model_running_action_set_that_does_not_need_being_checked = NULL;
27
28 #define GENERIC_LMM_ACTION(action) action->generic_lmm_action
29 #define GENERIC_ACTION(action) GENERIC_LMM_ACTION(action).generic_action
30
31 static void new_model_action_state_set(surf_action_t action, e_surf_action_state_t state);
32 static surf_action_t new_model_action_execute ();
33
34 static surf_action_t new_model_action_fct()
35 {
36   surf_action_t action = new_model_action_execute();
37   return action;
38 }
39
40 static surf_action_t new_model_action_execute ()
41 {
42   THROW_UNIMPLEMENTED;
43   return NULL;
44 }
45
46 static void* new_model_create_resource(const char* id, const char* model,const char* type_id,const char* content_name)
47 {
48   THROW_UNIMPLEMENTED;
49   return NULL;
50 }
51
52 static void new_model_finalize(void)
53 {
54   THROW_UNIMPLEMENTED;
55 }
56
57 static void new_model_update_actions_state(double now, double delta)
58 {
59   THROW_UNIMPLEMENTED;
60 }
61
62 static double new_model_share_resources(double NOW)
63 {
64   THROW_UNIMPLEMENTED;
65   return 0;
66 }
67
68 static int new_model_resource_used(void *resource_id)
69 {
70   THROW_UNIMPLEMENTED;
71   return 0;
72 }
73
74 static void new_model_resources_state(void *id, tmgr_trace_event_t event_type,
75                                  double value, double time)
76 {
77   THROW_UNIMPLEMENTED;
78 }
79
80 static int new_model_action_unref(surf_action_t action)
81 {
82   THROW_UNIMPLEMENTED;
83   return 0;
84 }
85
86 static void new_model_action_cancel(surf_action_t action)
87 {
88   surf_action_state_set(action, SURF_ACTION_FAILED);
89   return;
90 }
91
92 static void new_model_action_state_set(surf_action_t action, e_surf_action_state_t state)
93 {
94   surf_action_state_set(action, state);
95   return;
96 }
97
98 static void new_model_action_suspend(surf_action_t action)
99 {
100   XBT_IN("(%p)", action);
101   if (((surf_action_lmm_t) action)->suspended != 2) {
102     lmm_update_variable_weight(new_model_maxmin_system,
103                                ((surf_action_lmm_t) action)->variable,
104                                0.0);
105     ((surf_action_lmm_t) action)->suspended = 1;
106   }
107   XBT_OUT();
108 }
109
110 static void new_model_action_resume(surf_action_t action)
111 {
112   THROW_UNIMPLEMENTED;
113 }
114
115 static int new_model_action_is_suspended(surf_action_t action)
116 {
117   return (((surf_action_lmm_t) action)->suspended == 1);
118 }
119
120 static void new_model_action_set_max_duration(surf_action_t action, double duration)
121 {
122   THROW_UNIMPLEMENTED;
123 }
124
125 static void new_model_action_set_priority(surf_action_t action, double priority)
126 {
127   THROW_UNIMPLEMENTED;
128 }
129
130 static void new_model_define_callbacks()
131 {
132 }
133
134 static void surf_new_model_model_init_internal(void)
135 {
136   s_surf_action_t action;
137
138   XBT_DEBUG("surf_new_model_model_init_internal");
139   surf_new_model = surf_model_init();
140
141   new_model_running_action_set_that_does_not_need_being_checked =
142       xbt_swag_new(xbt_swag_offset(action, state_hookup));
143
144   surf_new_model->name = "Storage";
145   surf_new_model->action_unref = new_model_action_unref;
146   surf_new_model->action_cancel = new_model_action_cancel;
147   surf_new_model->action_state_set = new_model_action_state_set;
148
149   surf_new_model->model_private->finalize = new_model_finalize;
150   surf_new_model->model_private->update_actions_state = new_model_update_actions_state;
151   surf_new_model->model_private->share_resources = new_model_share_resources;
152   surf_new_model->model_private->resource_used = new_model_resource_used;
153   surf_new_model->model_private->update_resource_state = new_model_resources_state;
154
155   surf_new_model->suspend = new_model_action_suspend;
156   surf_new_model->resume = new_model_action_resume;
157   surf_new_model->is_suspended = new_model_action_is_suspended;
158   surf_new_model->set_max_duration = new_model_action_set_max_duration;
159   surf_new_model->set_priority = new_model_action_set_priority;
160
161   surf_new_model->extension.new_model.fct = new_model_action_fct;
162   surf_new_model->extension.new_model.create_resource = new_model_create_resource;
163
164   if (!new_model_maxmin_system) {
165     new_model_maxmin_system = lmm_system_new(new_model_selective_update);
166   }
167
168 }
169
170 void surf_new_model_model_init_default(void)
171 {
172   surf_new_model_model_init_internal();
173   new_model_define_callbacks();
174
175   xbt_dynar_push(model_list, &surf_new_model);
176 }