1 /**************************************************************************/
2 /* ---------------------------------------------------------------------- */
3 /* Copyright (C) 2006 - 2008 FRESCOR consortium partners: */
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 */
12 /* Thales Communication S.A. FRANCE */
13 /* Visual Tools S.A. SPAIN */
14 /* Rapita Systems Ltd UK */
17 /* See http://www.frescor.org for a link to partners' websites */
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. */
25 /* This file is part of FRSH (FRescor ScHeduler) */
27 /* FRSH 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. FRSH 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 FRSH; see file */
35 /* COPYING. If not, write to the Free Software Foundation, 675 Mass Ave, */
36 /* Cambridge, MA 02139, USA. */
38 /* As a special exception, including FRSH header files in a file, */
39 /* instantiating FRSH generics or templates, or linking other files */
40 /* with FRSH 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 /**************************************************************************/
49 * @author Michal Sojka <sojkam1@fel.cvut.cz>
50 * @date Wed Feb 18 16:06:04 2009
52 * @brief Dummy resource manager implementation
58 #include <frm_generic.h>
63 #include <fres_sa_scenario.h>
66 #include <ul_logreg.h>
67 #include "res_dummy.h"
69 #include "dummy_config.h"
71 bool opt_accept_all = false;
72 bool opt_daemon = false;
73 char *opt_pidfile = NULL;
79 int admission_test(struct fres_sa_scenario *scenario, void *priv, bool *schedulable)
81 struct dummy_data *data = priv;
82 struct fres_sa_contract *c;
84 long int utilization = 0;
86 #ifdef CONFIG_RESOURCE_DUMMY_VERBOSE
87 printf("Admission test:\n");
97 fres_sa_scenario_for_each_no_cancel_contract(scenario, c) {
98 fres_block_basic *basic;
99 fres_block_dummy_sched *dummy_sched;
101 fres_contract_id_to_string(id, &c->id, sizeof(id));
102 #ifdef CONFIG_RESOURCE_DUMMY_VERBOSE
103 printf(" %s contract: id=%s num_blocks=%d\n",
104 c->contract == c->new ? "new" : "old", id,
105 fres_contract_get_num_blocks(c->contract));
108 basic = fres_contract_get_basic(c->contract);
110 fprintf(stderr, "No basic block present\n");
114 if (c->contract == c->new) {
115 /* Add data for scheduler to the new contracts */
116 dummy_sched = malloc(sizeof(*dummy_sched));
117 if (!dummy_sched) return -1;
118 dummy_sched->priority = 100 - fosa_rel_time_to_msec(basic->budget);
119 ret = fres_contract_add_dummy_sched(c->contract, dummy_sched);
121 fprintf(stderr, "Cannot add dummy_sched block\n");
125 dummy_sched = fres_contract_get_dummy_sched(c->contract);
127 fprintf(stderr, "Dummy_sched is not present\n");
131 #ifdef CONFIG_RESOURCE_DUMMY_VERBOSE
132 printf(" period=%ld ms, budget=%ld ms, priority=%d\n",
133 fosa_rel_time_to_msec(basic->period),
134 fosa_rel_time_to_msec(basic->budget), dummy_sched->priority);
137 1000*fosa_rel_time_to_msec(basic->budget) /
138 fosa_rel_time_to_msec(basic->period);
140 *schedulable = utilization < 1000;
142 scenario->utilization = utilization/10;
145 #ifdef CONFIG_RESOURCE_DUMMY_VERBOSE
146 printf("utilization=%ld.%03ld => %s\n", utilization/1000, utilization%1000,
147 *schedulable?"schedulable":"not schedulable");
153 struct dummy_data dummy_data;
155 static const struct fres_res_manager frm = {
156 .res_type = DUMMY_RESOURCE_TYPE,
157 .res_id = DUMMY_RESOURCE_ID,
158 .admission_test = admission_test,
160 .name = "Dummy resource",
163 static struct option long_opts[] = {
164 { "daemon", optional_argument, NULL, 'd' },
165 { "loglevel", 1, 0, 'l' },
166 { "accept-all", 0, 0, 'a' },
167 { "help", 0, 0, 'h' },
174 printf("usage: frm_dummy [ options ]\n");
175 printf(" -a, --accept-all Accepts all contracts\n");
176 printf(" -d, --daemon [pid-file] go to background after FORB initialization\n");
177 printf(" -h, --help Display this help\n");
178 printf(" -l, --loglevel <number>|<domain>=<number>,...\n");
181 int main(int argc, char *argv[])
185 forb_init_attr_t attr = { .orb_id = "org.frescor.frm.dummy" };
188 while ((opt = getopt_long(argc, argv, "ad::l:h", &long_opts[0], NULL)) != EOF) {
191 opt_accept_all = true;
194 opt_pidfile = optarg;
197 ul_log_domain_arg2levels(optarg);
202 exit(opt == 'h' ? 0 : 1);
207 forb_daemon_prepare(opt_pidfile);
209 orb = forb_init(&argc, &argv, &attr);
210 if (!orb) error(1, errno, "forb_init");
212 /* Register fres_block_dummy_sched to contract handling
214 fres_block_register_dummy();
216 #ifndef CONFIG_RESOURCE_DUMMY_VERBOSE
217 ulogd_frm_generic.level = UL_LOGL_ERR;
220 ret = frm_register_and_run(orb, &frm);
223 error(1, errno, "frm_generic_run failed");