src/frsh/resources/cpu_aquosa/mngr/frm_aqcpu.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 AQCPU (Aquosa CPU)                               */
  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
  47 /**
  48  * @file   aqcpu_mngr.c
  49  * @author Martin Molnar <molnam1@fel.cvut.cz>
  50  * @date   Wed Feb 18 16:22:56 2009
  51  *
  52  * @brief
  53  *
  54  *
  55  */
  56
  57
  58 #include <frm_generic.h>
  59 #include <forb.h>
  60 #include <error.h>
  61 #include <errno.h>
  62 #include <getopt.h>
  63 #include <fres_sa_scenario.h>
  64 #include <stdbool.h>
  65 #include <ul_log.h>
  66 #include <ul_logreg.h>
  67 #include <stdio.h>
  68
  69 UL_LOG_CUST(ulogd_frm_aqcpu);
  70 ul_log_domain_t ulogd_frm_aqcpu = {UL_LOGL_DEB, "frm_aqcpu"};
  71
  72 static int aqcpu_admtest(struct fres_sa_scenario *scenario, void *priv,
  73                          bool *schedulable)
  74 {
  75         struct fres_sa_contract *c;
  76         long int period, budget;
  77         long int sum_utilization = 0;
  78
  79         fres_sa_scenario_for_each_no_cancel_contract(scenario, c) {
  80                 fres_block_basic *basic;
  81                 char id[40];
  82                 fres_contract_id_to_string(id, &c->contract->id, sizeof(id));
  83                 basic = fres_contract_get_basic(c->contract);
  84
  85                 period = fosa_rel_time_to_msec(basic->period);
  86                 budget = fosa_rel_time_to_msec(basic->budget);
  87
  88                 ul_logdeb("processing : id=%s, period=%ld ms, budget=%ld ms\n",
  89                        id, period, budget);
  90
  91                 sum_utilization+= budget*100/period;
  92         }
  93         *schedulable = sum_utilization <= 88; // 100;
  94         if (*schedulable) {
  95                 scenario->utilization = sum_utilization;
  96         }
  97         ul_logmsg("=> %s\n", *schedulable?"schedulable":"not schedulable");
  98
  99         return 0;
 100 }
 101
 102 static struct fres_res_manager frm = {
 103         .res_type = FRSH_RT_PROCESSOR,
 104         .res_id = FRSH_CPU_ID_DEFAULT,
 105         .admission_test = aqcpu_admtest,
 106         .name = "AQuoSA",
 107         .priv = NULL
 108 };
 109
 110 static struct option long_opts[] = {
 111     { "loglevel", 1, 0, 'l' },
 112     { 0, 0, 0, 0}
 113 };
 114
 115 static void
 116 usage(void)
 117 {
 118         printf("usage: frm_aqcpu [ options ]\n");
 119         printf("  -l, --loglevel <number>|<domain>=<number>,...\n");
 120 }
 121
 122 int forb_main(forb_orb orb, int argc, char *argv[])
 123 {
 124         int ret;
 125         forb_init_attr_t attr = { .orb_id = "org.frescor.frm.aqcpu" };
 126         int  opt;
 127         bool opt_daemon = false;
 128         char *opt_pidfile = NULL;
 129
 130         ul_logreg_domain(&ulogd_frm_aqcpu);
 131
 132         while ((opt = getopt_long(argc, argv, "hl:", &long_opts[0], NULL)) != EOF) {
 133                 switch (opt) {
 134                         case 'l':
 135                                 ul_log_domain_arg2levels(optarg);
 136                                 break;
 137                         case 'h':
 138                         /*default:*/
 139                                 usage();
 140                                 exit(opt == 'h' ? 0 : 1);
 141                 }
 142         }
 143
 144
 145         frm.res_id = frsh_get_local_cpu_id();
 146         ret = frm_register_and_run(orb, &frm);
 147
 148         if (ret != 0) {
 149                 error(1, errno, "frm_generic_run");
 150         }
 151
 152         return 0;
 153 }