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 #ifndef _SURF_MAXMIN_PRIVATE_H
9 #define _SURF_MAXMIN_PRIVATE_H
11 #include "surf/maxmin.h"
13 #include "xbt/mallocator.h"
15 typedef struct lmm_element {
16 /* hookup to constraint */
17 s_xbt_swag_hookup_t element_set_hookup;
18 s_xbt_swag_hookup_t active_element_set_hookup;
20 lmm_constraint_t constraint;
21 lmm_variable_t variable;
24 #define make_elem_active(elem) xbt_swag_insert_at_head(elem,&(elem->constraint->active_element_set))
25 #define make_elem_inactive(elem) xbt_swag_remove(elem,&(elem->constraint->active_element_set))
27 typedef struct lmm_constraint {
28 /* hookup to system */
29 s_xbt_swag_hookup_t constraint_set_hookup;
30 s_xbt_swag_hookup_t active_constraint_set_hookup;
31 s_xbt_swag_hookup_t saturated_constraint_set_hookup;
33 s_xbt_swag_t element_set; /* a list of lmm_mat_element_t */
34 s_xbt_swag_t active_element_set; /* a list of lmm_mat_element_t */
44 typedef struct lmm_variable {
45 /* hookup to system */
46 s_xbt_swag_hookup_t variable_set_hookup;
47 s_xbt_swag_hookup_t saturated_variable_set_hookup;
49 s_lmm_element_t *cnsts;
56 int index; /* FOR SDP ONLY */
57 /* \begin{For Lagrange only} */
60 double df; /* Total delay of flow */
61 double (* func_f) (struct lmm_variable *var, double x); /* (f) */
62 double (* func_fp) (struct lmm_variable *var, double x); /* (f') */
63 double (* func_fpi) (struct lmm_variable *var, double x); /* (f')^{-1} */
64 /* \end{For Lagrange only} */
67 typedef struct lmm_system {
69 s_xbt_swag_t variable_set; /* a list of lmm_variable_t */
70 s_xbt_swag_t constraint_set; /* a list of lmm_constraint_t */
72 s_xbt_swag_t active_constraint_set; /* a list of lmm_constraint_t */
74 s_xbt_swag_t saturated_variable_set; /* a list of lmm_variable_t */
75 s_xbt_swag_t saturated_constraint_set; /* a list of lmm_constraint_t_t */
77 xbt_mallocator_t variable_mallocator;
80 #define extract_variable(sys) xbt_swag_remove(xbt_swag_getFirst(&(sys->variable_set)),&(sys->variable_set))
81 #define extract_constraint(sys) xbt_swag_remove(xbt_swag_getFirst(&(sys->constraint_set)),&(sys->constraint_set))
82 #define insert_constraint(sys,cnst) xbt_swag_insert(cnst,&(sys->constraint_set))
83 #define remove_variable(sys,var) do {xbt_swag_remove(var,&(sys->variable_set));\
84 xbt_swag_remove(var,&(sys->saturated_variable_set));} while(0)
85 #define remove_constraint(sys,cnst) do {xbt_swag_remove(cnst,&(sys->constraint_set));\
86 xbt_swag_remove(cnst,&(sys->saturated_constraint_set));} while(0)
87 #define remove_active_constraint(sys,cnst) xbt_swag_remove(cnst,&(sys->active_constraint_set))
88 #define make_constraint_active(sys,cnst) xbt_swag_insert(cnst,&(sys->active_constraint_set))
89 #define make_constraint_inactive(sys,cnst) remove_active_constraint(sys,cnst)
91 static void lmm_var_free(lmm_system_t sys, lmm_variable_t var);
92 static void lmm_cnst_free(lmm_system_t sys, lmm_constraint_t cnst);
94 void lmm_print(lmm_system_t sys);
96 extern double (* func_f_def ) (lmm_variable_t , double);
97 extern double (* func_fp_def ) (lmm_variable_t , double);
98 extern double (* func_fpi_def )(lmm_variable_t , double);
100 #endif /* _SURF_MAXMIN_PRIVATE_H */