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,
175 .admission_test = diskbfq_admtest,
179 int main(int argc, char *argv[])
181 forb_init_attr_t attr = { .orb_id = "org.frescor.frm.diskbfq" };
185 char disk_dev[40], *disk_name = disk_dev;
186 char path[128], scheduler[128];
191 fprintf(stderr, "Usage:\n %s "
192 "-i disk_id -d disk_device [-n readers]\n",
194 error(1, EINVAL, "frm_diskbfq");
197 while ((opt = getopt(argc, argv, "i:d:n:")) != -1) {
200 frm.res_id = atoi(optarg);
204 optarg, sizeof(disk_dev));
206 for (i = strlen(disk_dev) - 1; i >= 0; i--) {
207 if (disk_dev[i] == '/') {
208 disk_name = disk_dev + i + 1;
214 readers = atoi(optarg);
221 orb = forb_init(&argc, &argv, &attr);
222 if (!orb) error(1, errno, "forb_init");
225 * Check if BFQ I/O scheduler is available
229 SYSFS_BFQ_SCHED_PATH,
231 if (!(fd = fopen(path, "r+")))
232 error(1, errno, "frm_generic_run");
234 ret = fscanf(fd, "%128[^\n]", scheduler);
235 if (ret == 0 || ret == EOF)
236 error(1, errno, "frm_generic_run");
237 if (!strstr(scheduler, SYSFS_BFQ_NAME))
238 error(1, errno, "frm_generic_run");
241 * Now check if BFQ is the default I/O scheduler
242 * for the specific disk and set it to so if not.
244 else if (!strstr(scheduler, "[" SYSFS_BFQ_NAME "]")) {
246 ret = fprintf(fd, SYSFS_BFQ_NAME);
247 if (ret && ret != EOF)
249 if (ret == 0 || ret == EOF)
250 error(1, errno, "frm_generic_run");
254 snprintf(path, sizeof(path),
255 SYSFS_BFQ_BUDGET_PATH,
257 if (!(fd = fopen(path, "r+")))
258 error(1, errno, "frm_generic_run");
260 ret = fprintf(fd, "256");
262 error(1, errno, "frm_generic_run");
265 ret = fscanf(fd, "%d", &disk.budget);
266 if (ret == 0 || ret == EOF)
267 error(1, errno, "frm_generic_run");
271 * Estimate the disk throughput in order to achieve
272 * effective weight assignement during runtime.
274 disk.throughput = estimate_throughput(disk_dev, readers);
275 if (disk.throughput < 0.0)
276 error(1, errno, "frm_generic_run");
278 fprintf(stdout, "disk name: %s\n"
280 "disk aggregate throughput: %f\n"
281 "scheduling budget: %d\n",
282 disk_name, SYSFS_BFQ_NAME, disk.throughput, disk.budget);
284 /* Register fres_block_disk_sched to contract handling
286 fres_block_register_disk_sched();
288 ret = frm_register_and_run(orb, &frm);
289 if (ret) error(1, errno, "frm_generic_run");