]> rtime.felk.cvut.cz Git - frescor/fwp.git/blob - fwp/lib/frsh_fwp/fwp_fra.c
Merge branch 'master' of molnam1@rtime.felk.cvut.cz:/var/git/frescor/fwp
[frescor/fwp.git] / 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
56
57 UL_LOG_CUST(ulogd_fra_fwp);
58 ul_log_domain_t ulogd_fra_fwp = {UL_LOGL_MSG, "fra_fwp"};
59 UL_LOGREG_SINGLE_DOMAIN_INIT_FUNCTION(fra_fwp_logreg_domains, ulogd_fra_fwp);
60
61 static int create_vres(fres_vres_t *vres, void *priv)
62 {
63         char id[40];
64         fres_block_basic *basic;
65         fres_block_fwp_sched *fwp_sched;
66         fwp_vres_params_t vparams;
67         fwp_vres_d_t      fwp_vresd;
68         int rv;
69         size_t bytes;
70         
71         /* Prepare vres parameters */
72         basic = fres_contract_get_basic(vres->new);
73         fwp_sched = fres_contract_get_block(vres->new, FRES_BLOCK_FWP_SCHED);
74
75         frsh_network_budget_to_bytes(FRSH_NETPF_FWP, &basic->budget, &bytes);
76         vparams.budget = bytes;
77         vparams.period = basic->period;
78         vparams.ac_id = fwp_sched->ac_id;       
79         /* Create vres */
80         if ((rv = fwp_vres_create(&vparams, &fwp_vresd))) {
81                 return  rv;
82         }
83         vres->priv = fwp_vresd;
84
85         fres_contract_id_to_string(id, &vres->id, sizeof(id));
86         ul_logmsg("Creating FWP VRes (id=%s, period=%ld ms, budget=%ld bytes AC=%d)\n",
87                 id, fosa_rel_time_to_msec(basic->period), 
88                 vparams.budget, vparams.ac_id);
89         
90         return 0;
91 }
92
93 static int cancel_vres(fres_vres_t *vres, void *priv)
94 {
95         fwp_vres_d_t    fwp_vresd;
96         fres_block_basic *basic;
97         char id[40];
98
99         fwp_vresd = (fwp_vres_d_t) vres->priv;
100         fwp_vres_destroy(fwp_vresd);
101
102         basic = fres_contract_get_basic(vres->allocated);
103         fres_contract_id_to_string(id, &vres->id, sizeof(id));
104         ul_logmsg("Canceling FWP VRes (id=%s, period=%ld ms, budget=%ld bytes)\n",
105                id, fosa_rel_time_to_msec(basic->period), basic->budget.tv_sec);
106
107         return 0;
108 }
109
110 int change_vres(fres_vres_t *vres, void *priv)
111 {
112         char id[40];
113         fres_block_basic *basic;
114         fres_block_fwp_sched *fwp_sched;
115         fwp_vres_params_t vparams;
116         fwp_vres_d_t      fwp_vresd;
117         int rv;
118         size_t bytes;
119         
120         /* Prepare vres parameters */
121         basic = fres_contract_get_basic(vres->new);
122         fwp_sched = fres_contract_get_block(vres->new, FRES_BLOCK_FWP_SCHED);
123
124         frsh_network_budget_to_bytes(FRSH_NETPF_FWP, &basic->budget, &bytes);
125         vparams.budget = bytes;
126         vparams.period = basic->period;
127         vparams.ac_id = fwp_sched->ac_id;
128         fwp_vresd = vres->priv;
129
130         /* Changing vres */
131         if ((rv = fwp_vres_set_params(fwp_vresd, &vparams))) {
132                 return  rv;
133         }
134
135         fres_contract_id_to_string(id, &vres->id, sizeof(id));
136         printf("Changing FWP VRes (id=%s, period=%ld ms, budget=%ld bytes AC=%d)\n",
137                 id, fosa_rel_time_to_msec(basic->period), 
138                 vparams.budget, vparams.ac_id);
139         
140         return 0;
141 }
142
143 static struct fres_allocator fwp_allocator = {
144         .res_type = FRSH_RT_NETWORK,
145         .res_id = FRSH_NETPF_FWP,
146         .create_vres = create_vres,
147         .cancel_vres = cancel_vres,
148         .change_vres = change_vres,
149         .priv = NULL
150 };
151
152 int fra_fwp_init(void)
153 {
154         fres_block_register_fwp();
155         return fra_register(&fwp_allocator);
156 }