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