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 FRESCOR BFQ disk bandwidth reservation */
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. */
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>
50 #include <fres_sa_scenario.h>
57 #include "diskbfq_th.h"
59 UL_LOG_CUST(ulogd_frm_diskbfq);
60 ul_log_domain_t ulogd_fra_fwp = {UL_LOGL_DEB, "frm_diskbfq"};
67 static int bandwidth_to_weight(struct disk_data *data,
72 //unsigned long q_i, p_i;
75 th = data->throughput / 10E9;
78 /* Convert to nanoseconds! */
85 weight = (DISKBFQ_WEIGHT_MAX * budget) / (period - (b / th));
93 static int weight_to_ioprio(int weight)
102 return 8 - 1 - (weight / 2);
105 static int diskbfq_admtest(struct fres_sa_scenario *scenario,
109 struct fres_sa_contract *c;
110 long int period, budget;
111 long int sum_weight = 0;
112 struct disk_data *data = priv;
114 fres_sa_scenario_for_each_contract(scenario, c) {
115 fres_block_basic *basic;
116 fres_block_resource *resource;
117 fres_block_disk_sched *disk_sched;
120 fres_contract_id_to_string(id, &c->contract->id, sizeof(id));
121 basic = fres_contract_get_basic(c->contract);
122 resource = fres_contract_get_resource(c->contract);
124 period = fosa_rel_time_to_nsec(basic->period);
125 budget = fosa_rel_time_to_nsec(basic->budget);
126 printf("processing: id=%s, period=%ld ms, budget=%ld ms\n",
129 if (c->contract == c->new) {
132 /* Calc weight and IO prio for the new contracts */
133 disk_sched = malloc(sizeof(*disk_sched));
134 if (!disk_sched) return -1;
136 disk_sched->weight = bandwidth_to_weight(data,
140 weight_to_ioprio(disk_sched->weight);
141 ret = fres_contract_add_disk_sched(c->contract,
145 "Cannot add disk_sched block\n");
150 disk_sched = fres_contract_get_disk_sched(c->contract);
153 "disk_sched is not present\n");
157 sum_weight += disk_sched->weight;
160 printf("sum_weight=%ld, max_weight=%d\n",
163 *schedulable = sum_weight < DISKBFQ_WEIGHT_MAX;
164 printf("=>%s\n", (*schedulable) ? "schedulable" : "not schedulable");
169 struct disk_data disk;
171 static struct fres_res_manager frm = {
172 .res_type = FRSH_RT_DISK,
174 .admission_test = diskbfq_admtest,
178 int main(int argc, char *argv[])
180 forb_init_attr_t attr = { .orb_id = "org.frescor.frm.diskbfq" };
184 char disk_dev[40], *disk_name = disk_dev;
185 char path[128], scheduler[128];
190 fprintf(stderr, "Usage:\n %s "
191 "-i disk_id -d disk_device [-n readers]\n",
193 error(1, EINVAL, "frm_diskbfq");
196 while ((opt = getopt(argc, argv, "i:d:n:")) != -1) {
199 frm.res_id = atoi(optarg);
203 optarg, sizeof(disk_dev));
205 for (i = strlen(disk_dev) - 1; i >= 0; i--) {
206 if (disk_dev[i] == '/') {
207 disk_name = disk_dev + i + 1;
213 readers = atoi(optarg);
220 orb = forb_init(&argc, &argv, &attr);
221 if (!orb) error(1, errno, "forb_init");
224 * Check if BFQ I/O scheduler is available
228 SYSFS_BFQ_SCHED_PATH,
230 if (!(fd = fopen(path, "rw")))
231 error(1, errno, "frm_generic_run");
233 ret = fscanf(fd, "%128[^\n]", scheduler);
234 if (ret == 0 || ret == EOF)
235 error(1, errno, "frm_generic_run");
236 if (!strstr(scheduler, SYSFS_BFQ_NAME))
237 error(1, errno, "frm_generic_run");
240 * Now check if BFQ is the default I/O scheduler
241 * for the specific disk and set it to so if not.
243 else if (!strstr(scheduler, "[" SYSFS_BFQ_NAME "]")) {
245 ret = fprintf(fd, SYSFS_BFQ_NAME);
246 if (ret && ret != EOF)
248 if (ret == 0 || ret == EOF)
249 error(1, errno, "frm_generic_run");
253 snprintf(path, sizeof(path),
254 SYSFS_BFQ_BUDGET_PATH,
256 if (!(fd = fopen(path, "r")))
257 error(1, errno, "frm_generic_run");
259 ret = fscanf(fd, "%d", &disk.budget);
260 if (ret == 0 || ret == EOF)
261 error(1, errno, "frm_generic_run");
265 * Estimate the disk throughput in order to achieve
266 * effective weight assignement during runtime.
268 disk.throughput = estimate_throughput(disk_dev, readers);
269 if (disk.throughput < 0.0)
270 error(1, errno, "frm_generic_run");
272 fprintf(stdout, "disk name: %s\n"
274 "disk aggregate throughput: %f\n"
275 "scheduling budget: %d\n",
276 disk_name, SYSFS_BFQ_NAME, disk.throughput, disk.budget);
278 /* Register fres_block_disk_sched to contract handling
280 fres_block_register_disk_sched();
282 ret = frm_register_and_run(orb, &frm);
283 if (ret) error(1, errno, "frm_generic_run");