3 /* Copyright (c) 2004 Arnaud Legrand. All rights reserved. */
5 /* This program is free software; you can redistribute it and/or modify it
6 * under the terms of the license (GNU LGPL) which comes with this package. */
8 #include "surf_private.h"
9 #include "network_common.h"
10 #include "surf/random_mgr.h"
15 typedef struct network_card_Constant {
16 s_surf_resource_t generic_resource;
18 } s_network_card_Constant_t, *network_card_Constant_t;
20 typedef struct surf_action_network_Constant {
21 s_surf_action_t generic_action;
25 network_card_Constant_t src;
26 network_card_Constant_t dst;
27 } s_surf_action_network_Constant_t, *surf_action_network_Constant_t;
29 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(surf_network);
30 static random_data_t random_latency = NULL;
31 static int card_number = 0;
32 static int host_number = 0;
34 static int network_card_new(const char *card_name)
36 network_card_Constant_t card =
37 surf_model_resource_by_name(surf_network_model, card_name);
40 card = xbt_new0(s_network_card_Constant_t, 1);
41 card->generic_resource.name = xbt_strdup(card_name);
42 card->id = card_number++;
43 xbt_dict_set(surf_model_resource_set(surf_network_model), card_name, card,
49 static int src_id = -1;
50 static int dst_id = -1;
52 static void parse_route_set_endpoints(void)
54 src_id = network_card_new(A_surfxml_route_src);
55 dst_id = network_card_new(A_surfxml_route_dst);
56 route_action = A_surfxml_route_action;
59 static void parse_route_set_route(void)
62 if (src_id != -1 && dst_id != -1) {
63 name = bprintf("%x#%x", src_id, dst_id);
64 manage_route(route_table, name, route_action, 0);
69 static void count_hosts(void)
74 static void define_callbacks(const char *file)
76 /* Figuring out the network links */
77 surfxml_add_callback(STag_surfxml_host_cb_list, &count_hosts);
78 surfxml_add_callback(STag_surfxml_route_cb_list,
79 &parse_route_set_endpoints);
80 surfxml_add_callback(ETag_surfxml_route_cb_list, &parse_route_set_route);
83 static int resource_used(void *resource_id)
88 static int action_free(surf_action_t action)
91 if (!action->refcount) {
92 xbt_swag_remove(action, action->state_set);
99 static void action_use(surf_action_t action)
104 static void action_cancel(surf_action_t action)
109 static void action_recycle(surf_action_t action)
114 static void netcst_action_state_set(surf_action_t action,
115 e_surf_action_state_t state)
117 surf_action_state_set(action, state);
121 static double share_resources(double now)
123 surf_action_network_Constant_t action = NULL;
124 xbt_swag_t running_actions = surf_network_model->states.running_action_set;
127 xbt_swag_foreach(action, running_actions) {
128 if (action->latency > 0) {
130 min = action->latency;
131 else if (action->latency < min)
132 min = action->latency;
139 static void update_actions_state(double now, double delta)
141 surf_action_network_Constant_t action = NULL;
142 surf_action_network_Constant_t next_action = NULL;
143 xbt_swag_t running_actions = surf_network_model->states.running_action_set;
145 xbt_swag_foreach_safe(action, next_action, running_actions) {
146 if (action->latency > 0) {
147 if (action->latency > delta) {
148 double_update(&(action->latency), delta);
150 action->latency = 0.0;
153 double_update(&(action->generic_action.remains),
154 action->generic_action.cost * delta / action->lat_init);
155 if (action->generic_action.max_duration != NO_MAX_DURATION)
156 double_update(&(action->generic_action.max_duration), delta);
158 if (action->generic_action.remains <= 0) {
159 action->generic_action.finish = surf_get_clock();
160 netcst_action_state_set((surf_action_t) action, SURF_ACTION_DONE);
161 } else if ((action->generic_action.max_duration != NO_MAX_DURATION) &&
162 (action->generic_action.max_duration <= 0)) {
163 action->generic_action.finish = surf_get_clock();
164 netcst_action_state_set((surf_action_t) action, SURF_ACTION_DONE);
171 static void update_resource_state(void *id,
172 tmgr_trace_event_t event_type,
173 double value, double time)
178 static surf_action_t communicate(void *src, void *dst, double size,
181 surf_action_network_Constant_t action = NULL;
182 network_card_Constant_t card_src = src;
183 network_card_Constant_t card_dst = dst;
185 XBT_IN4("(%s,%s,%g,%g)", card_src->generic_resource.name, card_dst->generic_resource.name, size, rate);
187 action = xbt_new0(s_surf_action_network_Constant_t, 1);
189 action->generic_action.refcount = 1;
190 action->generic_action.cost = size;
191 action->generic_action.remains = size;
192 action->generic_action.max_duration = NO_MAX_DURATION;
193 action->generic_action.start = surf_get_clock();
194 action->generic_action.finish = -1.0;
195 action->generic_action.model_type = surf_network_model;
196 action->suspended = 0;
198 action->latency = random_generate(random_latency);
199 action->lat_init = action->latency;
201 if (action->latency <= 0.0)
202 action->generic_action.state_set =
203 surf_network_model->states.done_action_set;
205 action->generic_action.state_set =
206 surf_network_model->states.running_action_set;
208 xbt_swag_insert(action, action->generic_action.state_set);
213 return (surf_action_t) action;
216 /* returns an array of link_Constant_t */
217 static const void **get_route(void *src, void *dst)
219 xbt_assert0(0, "Calling this function does not make any sense");
220 return (const void **) NULL;
223 static int get_route_size(void *src, void *dst)
225 xbt_assert0(0, "Calling this function does not make any sense");
229 static double get_link_bandwidth(const void *link)
234 static double get_link_latency(const void *link)
239 static int link_shared(const void *link)
244 static xbt_dict_t get_properties(void *link)
249 static void action_suspend(surf_action_t action)
251 ((surf_action_network_Constant_t) action)->suspended = 1;
254 static void action_resume(surf_action_t action)
256 if (((surf_action_network_Constant_t) action)->suspended)
257 ((surf_action_network_Constant_t) action)->suspended = 0;
260 static int action_is_suspended(surf_action_t action)
262 return ((surf_action_network_Constant_t) action)->suspended;
265 static void action_set_max_duration(surf_action_t action, double duration)
267 action->max_duration = duration;
270 static void finalize(void)
272 surf_model_exit(surf_network_model);
273 surf_network_model = NULL;
278 static void surf_network_model_init_internal(void)
280 surf_network_model = surf_model_init();
282 surf_network_model->name = "network constant";
283 surf_network_model->action_free = action_free;
284 surf_network_model->action_use = action_use;
285 surf_network_model->action_cancel = action_cancel;
286 surf_network_model->action_recycle = action_recycle;
287 surf_network_model->action_state_set = netcst_action_state_set;
289 surf_network_model->model_private->resource_used = resource_used;
290 surf_network_model->model_private->share_resources = share_resources;
291 surf_network_model->model_private->update_actions_state =
292 update_actions_state;
293 surf_network_model->model_private->update_resource_state =
294 update_resource_state;
295 surf_network_model->model_private->finalize = finalize;
297 surf_network_model->suspend = action_suspend;
298 surf_network_model->resume = action_resume;
299 surf_network_model->is_suspended = action_is_suspended;
300 surf_cpu_model->set_max_duration = action_set_max_duration;
302 surf_network_model->extension.network.communicate = communicate;
303 surf_network_model->extension.network.get_route = get_route;
304 surf_network_model->extension.network.get_route_size = get_route_size;
305 surf_network_model->extension.network.get_link_bandwidth =
307 surf_network_model->extension.network.get_link_latency = get_link_latency;
308 surf_network_model->extension.network.link_shared = link_shared;
310 surf_network_model->get_properties = get_properties;
313 random_latency = random_new(RAND, 100, 0.0, 1.0, .125, .034);
316 void surf_network_model_init_Constant(const char *filename)
319 if (surf_network_model)
321 surf_network_model_init_internal();
322 define_callbacks(filename);
323 xbt_dynar_push(model_list, &surf_network_model);
325 update_model_description(surf_network_model_description,
326 "Constant", surf_network_model);