Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Declare static functions in c file.
[simgrid.git] / src / surf / maxmin_private.h
1 /* Copyright (c) 2004, 2005, 2006, 2007, 2008, 2009, 2010. 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 #ifndef _SURF_MAXMIN_PRIVATE_H
8 #define _SURF_MAXMIN_PRIVATE_H
9
10 #include "surf/maxmin.h"
11 #include "xbt/swag.h"
12 #include "xbt/mallocator.h"
13
14 typedef struct lmm_element {
15   /* hookup to constraint */
16   s_xbt_swag_hookup_t element_set_hookup;
17   s_xbt_swag_hookup_t active_element_set_hookup;
18
19   lmm_constraint_t constraint;
20   lmm_variable_t variable;
21   double value;
22 } s_lmm_element_t;
23 #define make_elem_active(elem) xbt_swag_insert_at_head(elem,&(elem->constraint->active_element_set))
24 #define make_elem_inactive(elem) xbt_swag_remove(elem,&(elem->constraint->active_element_set))
25
26 typedef struct lmm_constraint_light {
27   double remaining_over_usage;
28   lmm_constraint_t cnst;
29 } s_lmm_constraint_light_t;
30
31 typedef struct lmm_constraint {
32   /* hookup to system */
33   s_xbt_swag_hookup_t constraint_set_hookup;
34   s_xbt_swag_hookup_t active_constraint_set_hookup;
35   s_xbt_swag_hookup_t modified_constraint_set_hookup;
36   s_xbt_swag_hookup_t saturated_constraint_set_hookup;
37
38   s_xbt_swag_t element_set;     /* a list of lmm_element_t */
39   s_xbt_swag_t active_element_set;      /* a list of lmm_element_t */
40   double remaining;
41   double usage;
42   double bound;
43   int shared;
44   void *id;
45   int id_int;
46   double lambda;
47   double new_lambda;
48   lmm_constraint_light_t cnst_light;
49 } s_lmm_constraint_t;
50
51 typedef struct lmm_variable {
52   /* hookup to system */
53   s_xbt_swag_hookup_t variable_set_hookup;
54   s_xbt_swag_hookup_t saturated_variable_set_hookup;
55
56   s_lmm_element_t *cnsts;
57   int cnsts_size;
58   int cnsts_number;
59   double weight;
60   double bound;
61   double value;
62   void *id;
63   int id_int;
64   unsigned visited;             /* used by lmm_update_modified_set */
65   /* \begin{For Lagrange only} */
66   double mu;
67   double new_mu;
68   double (*func_f) (struct lmm_variable * var, double x);       /* (f)    */
69   double (*func_fp) (struct lmm_variable * var, double x);      /* (f')    */
70   double (*func_fpi) (struct lmm_variable * var, double x);     /* (f')^{-1}    */
71   /* \end{For Lagrange only} */
72 } s_lmm_variable_t;
73
74 typedef struct lmm_system {
75   int modified;
76   int selective_update_active;  /* flag to update partially the system only selecting changed portions */
77   unsigned visited_counter;     /* used by lmm_update_modified_set */
78   s_xbt_swag_t variable_set;    /* a list of lmm_variable_t */
79   s_xbt_swag_t constraint_set;  /* a list of lmm_constraint_t */
80
81   s_xbt_swag_t active_constraint_set;   /* a list of lmm_constraint_t */
82   s_xbt_swag_t modified_constraint_set; /* a list of modified lmm_constraint_t */
83
84   s_xbt_swag_t saturated_variable_set;  /* a list of lmm_variable_t */
85   s_xbt_swag_t saturated_constraint_set;        /* a list of lmm_constraint_t_t */
86
87   xbt_swag_t keep_track;
88
89   xbt_mallocator_t variable_mallocator;
90 } s_lmm_system_t;
91
92 #define extract_variable(sys) xbt_swag_extract(&(sys->variable_set))
93 #define extract_constraint(sys) xbt_swag_extract(&(sys->constraint_set))
94 #define insert_constraint(sys,cnst) xbt_swag_insert(cnst,&(sys->constraint_set))
95 #define remove_variable(sys,var) do {xbt_swag_remove(var,&(sys->variable_set));\
96                                  xbt_swag_remove(var,&(sys->saturated_variable_set));} while(0)
97 #define remove_constraint(sys,cnst) do {xbt_swag_remove(cnst,&(sys->constraint_set));\
98                                         xbt_swag_remove(cnst,&(sys->saturated_constraint_set));} while(0)
99 #define make_constraint_active(sys,cnst) xbt_swag_insert(cnst,&(sys->active_constraint_set))
100 #define make_constraint_inactive(sys,cnst) \
101   do { xbt_swag_remove(cnst, &sys->active_constraint_set);              \
102     xbt_swag_remove(cnst, &sys->modified_constraint_set); } while (0)
103
104 void lmm_print(lmm_system_t sys);
105
106 extern double (*func_f_def) (lmm_variable_t, double);
107 extern double (*func_fp_def) (lmm_variable_t, double);
108 extern double (*func_fpi_def) (lmm_variable_t, double);
109
110 #endif                          /* _SURF_MAXMIN_PRIVATE_H */