]> rtime.felk.cvut.cz Git - frescor/frsh-forb.git/blob - src/fwp/fwp/mngr/fwp_mngr.c
Added mutex to ensure atomicity of linked list operations
[frescor/frsh-forb.git] / src / fwp / fwp / mngr / fwp_mngr.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 <frm_generic.h>
47 #include <forb.h>
48 #include <error.h>
49 #include <errno.h>
50 #include <getopt.h>
51 #include <fres_sa_scenario.h>
52 #include <stdbool.h>
53 #include <ul_logreg.h>
54 #include <fwp_res.h>
55 #include <stdio.h>
56 #include <string.h>
57 #include "wifi_agent_idl.h"
58 #include "fwp_admctrl.h"
59 #include "wifi_agent.h"
60 #include <pthread.h>
61
62 #if 0
63 static
64 int dummy_admission_test(struct fres_sa_scenario *scenario, void *priv, 
65                                 bool *schedulable)
66 {
67         struct fres_sa_contract *c;
68
69         printf("Dummy admission test:\n");
70
71         fres_sa_scenario_for_each_no_cancel_contract(scenario, c) {
72                 fres_block_basic *basic;
73                 char id[40];
74                 fres_contract_id_to_string(id, &c->contract->id, sizeof(id));
75                 basic = fres_contract_get_basic(c->contract);
76
77                 printf("  processing: id=%s, period=%ld ms, budget=%ld ms\n",
78                        id,
79                        fosa_rel_time_to_msec(basic->period),
80                        fosa_rel_time_to_msec(basic->budget));
81
82         }
83         *schedulable = scenario->num_contracts <= 3;
84         printf("=> %s\n", schedulable?"schedulable":"not schedulable");
85                 
86         return 0;
87 }
88 #endif
89
90
91 static struct frm_fwp_priv frm_fwp_state = {
92         .rate_mbps = 1,
93         .erp_ofdm = false,
94         .short_preamble = false,
95 //      .list_head = NULL,//head of linked list initialized in main function
96 };
97
98 static const struct fres_res_manager frm = {
99         .res_type = FRSH_RT_NETWORK,
100         .res_id = FRSH_NETPF_FWP,
101         //.admission_test = dummy_admission_test,
102         .name = "WLAN",
103         .admission_test = fwp_admctrl_utilization,
104         .priv = &frm_fwp_state,
105 };
106
107 static struct option long_opts[] = {
108     { "loglevel",         required_argument, 0, 'l' },
109     { "bitrate",          required_argument, 0, 'b' },
110     { "ofdm",             no_argument,       0, 'o' },
111     { "short-preamble",  no_argument,        0, 's' },
112     { 0, 0, 0, 0}
113 };
114
115 static void
116 usage(void)
117 {
118         printf("usage: fwpmngr [ options ]\n");
119         printf("  -l, --loglevel <number>|<domain>=<number>,...\n");
120         printf("  -b, --bitrate <mbits/s>\n");
121         printf("  -o, --ofdm\n");
122         printf("  -s, --short-preamble\n");
123         printf("  -h, --help\n");
124 }
125
126 void *executor_thread(void *arg)
127 {
128         forb_executor_t *executor = arg;
129         forb_executor_run(executor);
130         return NULL;
131 }
132
133 int main(int argc, char *argv[])
134 {
135         forb_orb orb;
136         forb_orb fcb_orb;
137         forb_orb worb;
138         int ret;
139         forb_init_attr_t attr = { .orb_id = "org.frescor.frm.fwp",
140                                   .fixed_tcp_port = WAI_TCP_PORT,
141         };
142         int  opt;
143         bool opt_daemon = false;
144         char *opt_pidfile = NULL;
145
146         forb_executor_t executor_wai;
147         forb_executor_t executor_frm;
148
149         fres_resource_manager frm_ret;
150         struct frm_data frm_data;
151
152         wifi_agent_idl wai;     //wifi agent interface
153
154         if (getenv("FWP_BYPASS"))
155                 frm_fwp_state.bypass = true;
156
157
158         while ((opt = getopt_long(argc, argv, "b:d:hl:os", &long_opts[0], NULL)) != EOF) {
159                 switch (opt) {
160                         case 'd':
161                                 opt_daemon = true;
162                                 opt_pidfile = optarg;
163                                 break;
164                         case 'l':
165                                 ul_log_domain_arg2levels(optarg);
166                                 break;
167                         case 'b':
168                                 frm_fwp_state.rate_mbps = atol(optarg);
169                                 break;
170                         case 's':
171                                 frm_fwp_state.short_preamble = true;
172                                 break;
173                         case 'o':
174                                 frm_fwp_state.erp_ofdm = true;
175                                 break;
176                         case 'h':
177                         /*default:*/
178                                 usage();
179                                 exit(opt == 'h' ? 0 : 1);
180                 }
181         }
182
183         fosa_thread_id_t tid;
184
185         if (opt_daemon)
186                 forb_daemon_prepare(opt_pidfile);
187
188         fcb_orb = forb_init(NULL, NULL, NULL);
189         if (!fcb_orb) error(1, errno, "forb_init");
190         fcb = forb_resolve_reference(fcb_orb, "fcb");
191
192         orb = forb_init(&argc, &argv, &attr);
193         if (!orb) error(1, errno, "forb_init");
194         
195         worb = forb_init(NULL, NULL, NULL);
196         if (!worb) error(1, errno, "forb_init");
197         
198         // Cration of an object implementing myinterface
199         wai = forb_wifi_agent_idl_new(orb, &wifi_agent_impl, &frm_fwp_state);
200         
201         // We can register our object under a name, so that other processes can use it.
202         forb_register_reference(wai, "net.sourceforge.frsh-forb.wai");
203
204         // Initialize head of linked list
205         sta_list_init_head(&frm_fwp_state.sta_list);
206
207         pthread_mutex_init(&frm_fwp_state.mutex, NULL);
208         
209         //create executors and register 2 interfaces
210         ret = forb_executor_init(&executor_wai);
211         if (ret) goto error;
212
213         ret = forb_executor_init(&executor_frm);
214         if (ret) goto error;
215         
216                 //1. interface - forb_execute_object(wai); execute      
217                 ret = forb_executor_register_object(&executor_wai, wai);
218                 if (ret) goto destroy_and_error;
219
220                 //2. interface - frm_register_and_run(orb, &frm); execute
221                 fres_block_register_fwp();
222
223                 frm_ret = frm_register(orb, &frm_data, &executor_frm, &frm);
224                 if (!frm_ret) {
225                         ret = -1;
226                         goto destroy_and_error;
227                 }
228
229                 forb_daemon_ready();
230
231         printf("Ready to create threads\n");
232         fosa_thread_create(&tid, NULL, executor_thread, &executor_wai);
233         fosa_thread_create(&tid, NULL, executor_thread, &executor_frm);
234
235         while(1) {
236                 sleep(10);
237         }
238
239
240 destroy_and_error:
241         forb_executor_destroy(&executor_wai);
242         forb_executor_destroy(&executor_frm);
243 error:
244         error(1, errno, "frm_generic_run");
245         
246         return 0;
247 }
248