src/surf/maxmin_private.h

   1 /*      $Id$     */
   2
   3 /* Copyright (c) 2004 Arnaud Legrand. All rights reserved.                  */
   4
   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. */
   7
   8 #ifndef _SURF_MAXMIN_PRIVATE_H
   9 #define _SURF_MAXMIN_PRIVATE_H
  10
  11 #include "surf/maxmin.h"
  12 #include "xbt/swag.h"
  13 #include "xbt/mallocator.h"
  14
  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;
  19
  20   lmm_constraint_t constraint;
  21   lmm_variable_t variable;
  22   double value;
  23 } s_lmm_element_t, *lmm_element_t;
  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))
  26
  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;
  32
  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 */
  35   double bound;
  36   double lambda;
  37   double new_lambda;
  38   double remaining;
  39   int shared;
  40   double usage;
  41   void *id;
  42 } s_lmm_constraint_t;
  43
  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;
  48
  49   s_lmm_element_t *cnsts;
  50   int cnsts_size;
  51   int cnsts_number;
  52   double weight;
  53   double bound;
  54   double mu;
  55   double new_mu;
  56   double value;
  57   void *id;
  58   int index;
  59 } s_lmm_variable_t;
  60
  61 typedef struct lmm_system {
  62   int modified;
  63   s_xbt_swag_t variable_set;    /* a list of lmm_variable_t */
  64   s_xbt_swag_t constraint_set;  /* a list of lmm_constraint_t */
  65
  66   s_xbt_swag_t active_constraint_set;   /* a list of lmm_constraint_t */
  67
  68   s_xbt_swag_t saturated_variable_set;  /* a list of lmm_variable_t */
  69   s_xbt_swag_t saturated_constraint_set;        /* a list of lmm_constraint_t_t */
  70
  71   xbt_mallocator_t variable_mallocator;
  72 } s_lmm_system_t;
  73
  74 #define extract_variable(sys) xbt_swag_remove(xbt_swag_getFirst(&(sys->variable_set)),&(sys->variable_set))
  75 #define extract_constraint(sys) xbt_swag_remove(xbt_swag_getFirst(&(sys->constraint_set)),&(sys->constraint_set))
  76 #define insert_constraint(sys,cnst) xbt_swag_insert(cnst,&(sys->constraint_set))
  77 #define remove_variable(sys,var) do {xbt_swag_remove(var,&(sys->variable_set));\
  78                                  xbt_swag_remove(var,&(sys->saturated_variable_set));} while(0)
  79 #define remove_constraint(sys,cnst) do {xbt_swag_remove(cnst,&(sys->constraint_set));\
  80                                         xbt_swag_remove(cnst,&(sys->saturated_constraint_set));} while(0)
  81 #define remove_active_constraint(sys,cnst) xbt_swag_remove(cnst,&(sys->active_constraint_set))
  82 #define make_constraint_active(sys,cnst) xbt_swag_insert(cnst,&(sys->active_constraint_set))
  83 #define make_constraint_inactive(sys,cnst) remove_active_constraint(sys,cnst)
  84
  85 static void lmm_var_free(lmm_system_t sys, lmm_variable_t var);
  86 static void lmm_cnst_free(lmm_system_t sys, lmm_constraint_t cnst);
  87
  88 void lmm_print(lmm_system_t sys);
  89
  90 #endif                          /* _SURF_MAXMIN_PRIVATE_H */