fwp/lib/frsh_fwp/fwp_fra.c

   1 /**************************************************************************/
   2 /* ---------------------------------------------------------------------- */
   3 /* Copyright (C) 2006 - 2008 FRESCOR consortium partners:                 */
   4 /*                                                                        */
   5 /*   Universidad de Cantabria,              SPAIN                         */
   6 /*   University of York,                    UK                            */
   7 /*   Scuola Superiore Sant'Anna,            ITALY                         */
   8 /*   Kaiserslautern University,             GERMANY                       */
   9 /*   Univ. Politécnica  Valencia,           SPAIN                        */
  10 /*   Czech Technical University in Prague,  CZECH REPUBLIC                */
  11 /*   ENEA                                   SWEDEN                        */
  12 /*   Thales Communication S.A.              FRANCE                        */
  13 /*   Visual Tools S.A.                      SPAIN                         */
  14 /*   Rapita Systems Ltd                     UK                            */
  15 /*   Evidence                               ITALY                         */
  16 /*                                                                        */
  17 /*   See http://www.frescor.org for a link to partners' websites          */
  18 /*                                                                        */
  19 /*          FRESCOR project (FP6/2005/IST/5-034026) is funded             */
  20 /*       in part by the European Union Sixth Framework Programme          */
  21 /*       The European Union is not liable of any use that may be          */
  22 /*       made of this code.                                               */
  23 /*                                                                        */
  24 /*                                                                        */
  25 /*  This file is part of FWP (Frescor WLAN Protocol)                      */
  26 /*                                                                        */
  27 /* FWP is free software; you can redistribute it and/or modify it         */
  28 /* under terms of the GNU General Public License as published by the      */
  29 /* Free Software Foundation; either version 2, or (at your option) any    */
  30 /* later version.  FWP is distributed in the hope that it will be         */
  31 /* useful, but WITHOUT ANY WARRANTY; without even the implied warranty    */
  32 /* of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU    */
  33 /* General Public License for more details. You should have received a    */
  34 /* copy of the GNU General Public License along with FWP; see file        */
  35 /* COPYING. If not, write to the Free Software Foundation, 675 Mass Ave,  */
  36 /* Cambridge, MA 02139, USA.                                              */
  37 /*                                                                        */
  38 /* As a special exception, including FWP header files in a file,          */
  39 /* instantiating FWP generics or templates, or linking other files        */
  40 /* with FWP objects to produce an executable application, does not        */
  41 /* by itself cause the resulting executable application to be covered     */
  42 /* by the GNU General Public License. This exception does not             */
  43 /* however invalidate any other reasons why the executable file might be  */
  44 /* covered by the GNU Public License.                                     */
  45 /**************************************************************************/
  46 #include <ul_log.h>
  47 #include <ul_logreg.h>
  48 #include <fra_generic.h>
  49 #include <fwp.h>
  50 //#include <fwp_fna.h>
  51 #include <frsh_distributed.h>
  52 #include "fwp_res.h"
  53 #include "fwp_idl.h"
  54 #include <stdio.h>
  55 #include <arpa/inet.h>
  56
  57
  58 UL_LOG_CUST(ulogd_fra_fwp);
  59 ul_log_domain_t ulogd_fra_fwp = {UL_LOGL_MSG, "fra_fwp"};
  60 UL_LOGREG_SINGLE_DOMAIN_INIT_FUNCTION(fra_fwp_logreg_domains, ulogd_fra_fwp);
  61
  62 static int create_vres(fres_vres_t *vres, void *priv)
  63 {
  64         char id[40];
  65         fres_block_basic *basic;
  66         fres_block_fwp_sched *fwp_sched;
  67         fres_block_fwp *fwp;
  68         fwp_vres_params_t vparams = {0};
  69         fwp_vres_d_t      fwp_vresd = {0};
  70         int rv;
  71         size_t bytes;
  72         char src[21] = "N/A";
  73
  74         /* Prepare vres parameters */
  75         basic = fres_contract_get_basic(vres->new);
  76         fwp_sched = fres_contract_get_block(vres->new, FRES_BLOCK_FWP_SCHED);
  77         if (!fwp_sched)
  78                 return FRES_ERR_NEEDS_MORE_DATA_IN_CONTRACT;
  79
  80         fwp = fres_contract_get_block(vres->new, FRES_BLOCK_FWP);
  81
  82         frsh_network_budget_to_bytes(FRSH_NETPF_FWP, &basic->budget, &bytes);
  83         vparams.budget = bytes;
  84         vparams.period = basic->period;
  85         vparams.ac_id = fwp_sched->ac_id;
  86         if (fwp) {
  87                 vparams.src.s_addr = fwp->src;
  88                 snprintf(src, sizeof(src), "%s", inet_ntoa(vparams.src));
  89         }
  90         /* Create vres */
  91         if ((rv = fwp_vres_create(&vparams, &fwp_vresd))) {
  92                 return  rv;
  93         }
  94         vres->priv = fwp_vresd;
  95
  96         fres_contract_id_to_string(id, &vres->id, sizeof(id));
  97         ul_logmsg("Creating FWP VRes (id=%s, period=%ld ms, budget=%ld bytes AC=%d src=%s)\n",
  98                 id, fosa_rel_time_to_msec(basic->period),
  99                   vparams.budget, vparams.ac_id, src);
 100
 101         return 0;
 102 }
 103
 104 static int cancel_vres(fres_vres_t *vres, void *priv)
 105 {
 106         fwp_vres_d_t    fwp_vresd;
 107         fres_block_basic *basic;
 108         char id[40];
 109
 110         fwp_vresd = (fwp_vres_d_t) vres->priv;
 111         fwp_vres_destroy(fwp_vresd);
 112
 113         basic = fres_contract_get_basic(vres->allocated);
 114         fres_contract_id_to_string(id, &vres->id, sizeof(id));
 115         ul_logmsg("Canceling FWP VRes (id=%s, period=%ld ms, budget=%ld bytes)\n",
 116                id, fosa_rel_time_to_msec(basic->period), basic->budget.tv_sec);
 117
 118         return 0;
 119 }
 120
 121 int change_vres(fres_vres_t *vres, void *priv)
 122 {
 123         char id[40];
 124         fres_block_basic *basic;
 125         fres_block_fwp_sched *fwp_sched;
 126         fwp_vres_params_t vparams;
 127         fwp_vres_d_t      fwp_vresd;
 128         int rv;
 129         size_t bytes;
 130
 131         /* Prepare vres parameters */
 132         basic = fres_contract_get_basic(vres->new);
 133         fwp_sched = fres_contract_get_block(vres->new, FRES_BLOCK_FWP_SCHED);
 134
 135         frsh_network_budget_to_bytes(FRSH_NETPF_FWP, &basic->budget, &bytes);
 136         vparams.budget = bytes;
 137         vparams.period = basic->period;
 138         vparams.ac_id = fwp_sched->ac_id;
 139         fwp_vresd = vres->priv;
 140
 141         /* Changing vres */
 142         if ((rv = fwp_vres_set_params(fwp_vresd, &vparams))) {
 143                 return  rv;
 144         }
 145
 146         fres_contract_id_to_string(id, &vres->id, sizeof(id));
 147         printf("Changing FWP VRes (id=%s, period=%ld ms, budget=%ld bytes AC=%d)\n",
 148                 id, fosa_rel_time_to_msec(basic->period),
 149                 vparams.budget, vparams.ac_id);
 150
 151         vres->perceived = vres->new;
 152
 153         return 0;
 154 }
 155
 156 static struct fres_allocator fwp_allocator = {
 157         .res_type = FRSH_RT_NETWORK,
 158         .res_id = FRSH_NETPF_FWP,
 159         .create_vres = create_vres,
 160         .cancel_vres = cancel_vres,
 161         .change_vres = change_vres,
 162         .priv = NULL
 163 };
 164
 165 int fra_fwp_init(void)
 166 {
 167         fres_block_register_fwp();
 168         return fra_register(&fwp_allocator);
 169 }