2 * Copyright (c) 2009-2010 The FreeBSD Foundation
5 * This software was developed by Pawel Jakub Dawidek under sponsorship from
6 * the FreeBSD Foundation.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #include <sys/cdefs.h>
31 __FBSDID("$FreeBSD$");
33 #include <sys/param.h>
41 #include <activemap.h>
44 #include "hast_proto.h"
51 /* Path to configuration file. */
52 static const char *cfgpath = HAST_CONFIG;
53 /* Hastd configuration. */
54 static struct hastd_config *cfg;
55 /* Control connection. */
56 static struct proto_conn *controlconn;
72 "usage: %s create [-d] [-c config] [-e extentsize] [-k keepdirty]\n"
73 "\t\t[-m mediasize] name ...\n",
76 " %s role [-d] [-c config] <init | primary | secondary> all | name ...\n",
79 " %s list [-d] [-c config] [all | name ...]\n",
82 " %s status [-d] [-c config] [all | name ...]\n",
85 " %s dump [-d] [-c config] [all | name ...]\n",
91 create_one(struct hast_resource *res, intmax_t mediasize, intmax_t extentsize,
99 pjdlog_prefix_set("[%s] ", res->hr_name);
101 if (provinfo(res, true) == -1) {
106 mediasize = res->hr_local_mediasize;
107 else if (mediasize > res->hr_local_mediasize) {
108 pjdlog_error("Provided mediasize is larger than provider %s size.",
113 if (!powerof2(res->hr_local_sectorsize)) {
114 pjdlog_error("Sector size of provider %s is not power of 2 (%u).",
115 res->hr_localpath, res->hr_local_sectorsize);
120 extentsize = HAST_EXTENTSIZE;
121 if (extentsize < res->hr_local_sectorsize) {
122 pjdlog_error("Extent size (%jd) is less than sector size (%u).",
123 (intmax_t)extentsize, res->hr_local_sectorsize);
127 if ((extentsize % res->hr_local_sectorsize) != 0) {
128 pjdlog_error("Extent size (%jd) is not multiple of sector size (%u).",
129 (intmax_t)extentsize, res->hr_local_sectorsize);
133 mapsize = activemap_calc_ondisk_size(mediasize - METADATA_SIZE,
134 extentsize, res->hr_local_sectorsize);
136 keepdirty = HAST_KEEPDIRTY;
137 res->hr_datasize = mediasize - METADATA_SIZE - mapsize;
138 res->hr_extentsize = extentsize;
139 res->hr_keepdirty = keepdirty;
141 res->hr_localoff = METADATA_SIZE + mapsize;
143 if (metadata_write(res) == -1) {
147 buf = calloc(1, mapsize);
149 pjdlog_error("Unable to allocate %zu bytes of memory for initial bitmap.",
154 if (pwrite(res->hr_localfd, buf, mapsize, METADATA_SIZE) !=
156 pjdlog_errno(LOG_ERR, "Unable to store initial bitmap on %s",
164 if (res->hr_localfd >= 0)
165 close(res->hr_localfd);
166 pjdlog_prefix_set("%s", "");
171 control_create(int argc, char *argv[], intmax_t mediasize, intmax_t extentsize,
174 struct hast_resource *res;
177 /* Initialize the given resources. */
181 for (ii = 0; ii < argc; ii++) {
182 TAILQ_FOREACH(res, &cfg->hc_resources, hr_next) {
183 if (strcmp(argv[ii], res->hr_name) == 0)
187 pjdlog_error("Unknown resource %s.", argv[ii]);
192 ret = create_one(res, mediasize, extentsize, keepdirty);
193 if (ret != 0 && ec == 0)
200 dump_one(struct hast_resource *res)
204 ret = metadata_read(res, false);
208 printf("resource: %s\n", res->hr_name);
209 printf(" datasize: %ju (%NB)\n", (uintmax_t)res->hr_datasize,
210 (intmax_t)res->hr_datasize);
211 printf(" extentsize: %d (%NB)\n", res->hr_extentsize,
212 (intmax_t)res->hr_extentsize);
213 printf(" keepdirty: %d\n", res->hr_keepdirty);
214 printf(" localoff: %ju\n", (uintmax_t)res->hr_localoff);
215 printf(" resuid: %ju\n", (uintmax_t)res->hr_resuid);
216 printf(" localcnt: %ju\n", (uintmax_t)res->hr_primary_localcnt);
217 printf(" remotecnt: %ju\n", (uintmax_t)res->hr_primary_remotecnt);
218 printf(" prevrole: %s\n", role2str(res->hr_previous_role));
224 control_dump(int argc, char *argv[])
226 struct hast_resource *res;
229 /* Dump metadata of the given resource(s). */
232 if (argc == 0 || (argc == 1 && strcmp(argv[0], "all") == 0)) {
233 TAILQ_FOREACH(res, &cfg->hc_resources, hr_next) {
235 if (ret != 0 && ec == 0)
241 for (ii = 0; ii < argc; ii++) {
242 TAILQ_FOREACH(res, &cfg->hc_resources, hr_next) {
243 if (strcmp(argv[ii], res->hr_name) == 0)
247 pjdlog_error("Unknown resource %s.", argv[ii]);
253 if (ret != 0 && ec == 0)
261 control_set_role(struct nv *nv, const char *newrole)
263 const char *res, *oldrole;
269 for (ii = 0; ; ii++) {
270 res = nv_get_string(nv, "resource%u", ii);
273 pjdlog_prefix_set("[%s] ", res);
274 error = nv_get_int16(nv, "error%u", ii);
278 pjdlog_warning("Received error %d from hastd.", error);
281 oldrole = nv_get_string(nv, "role%u", ii);
282 if (strcmp(oldrole, newrole) == 0)
283 pjdlog_debug(2, "Role unchanged (%s).", oldrole);
285 pjdlog_debug(1, "Role changed from %s to %s.", oldrole,
289 pjdlog_prefix_set("%s", "");
294 control_list(struct nv *nv)
303 for (ii = 0; ; ii++) {
304 str = nv_get_string(nv, "resource%u", ii);
307 printf("%s:\n", str);
308 error = nv_get_int16(nv, "error%u", ii);
312 printf(" error: %d\n", error);
315 printf(" role: %s\n", nv_get_string(nv, "role%u", ii));
316 printf(" provname: %s\n",
317 nv_get_string(nv, "provname%u", ii));
318 printf(" localpath: %s\n",
319 nv_get_string(nv, "localpath%u", ii));
320 printf(" extentsize: %u (%NB)\n",
321 (unsigned int)nv_get_uint32(nv, "extentsize%u", ii),
322 (intmax_t)nv_get_uint32(nv, "extentsize%u", ii));
323 printf(" keepdirty: %u\n",
324 (unsigned int)nv_get_uint32(nv, "keepdirty%u", ii));
325 printf(" remoteaddr: %s\n",
326 nv_get_string(nv, "remoteaddr%u", ii));
327 str = nv_get_string(nv, "sourceaddr%u", ii);
329 printf(" sourceaddr: %s\n", str);
330 printf(" replication: %s\n",
331 nv_get_string(nv, "replication%u", ii));
332 str = nv_get_string(nv, "status%u", ii);
334 printf(" status: %s\n", str);
335 pid = nv_get_int32(nv, "workerpid%u", ii);
337 printf(" workerpid: %d\n", pid);
338 printf(" dirty: %ju (%NB)\n",
339 (uintmax_t)nv_get_uint64(nv, "dirty%u", ii),
340 (intmax_t)nv_get_uint64(nv, "dirty%u", ii));
341 printf(" statistics:\n");
342 printf(" reads: %ju\n",
343 (uintmax_t)nv_get_uint64(nv, "stat_read%u", ii));
344 printf(" writes: %ju\n",
345 (uintmax_t)nv_get_uint64(nv, "stat_write%u", ii));
346 printf(" deletes: %ju\n",
347 (uintmax_t)nv_get_uint64(nv, "stat_delete%u", ii));
348 printf(" flushes: %ju\n",
349 (uintmax_t)nv_get_uint64(nv, "stat_flush%u", ii));
350 printf(" activemap updates: %ju\n",
351 (uintmax_t)nv_get_uint64(nv, "stat_activemap_update%u", ii));
352 printf(" local errors: "
353 "read: %ju, write: %ju, delete: %ju, flush: %ju\n",
354 (uintmax_t)nv_get_uint64(nv, "stat_read_error%u", ii),
355 (uintmax_t)nv_get_uint64(nv, "stat_write_error%u", ii),
356 (uintmax_t)nv_get_uint64(nv, "stat_delete_error%u", ii),
357 (uintmax_t)nv_get_uint64(nv, "stat_flush_error%u", ii));
359 "local: %ju, send: %ju, recv: %ju, done: %ju, idle: %ju\n",
360 (uintmax_t)nv_get_uint64(nv, "local_queue_size%u", ii),
361 (uintmax_t)nv_get_uint64(nv, "send_queue_size%u", ii),
362 (uintmax_t)nv_get_uint64(nv, "recv_queue_size%u", ii),
363 (uintmax_t)nv_get_uint64(nv, "done_queue_size%u", ii),
364 (uintmax_t)nv_get_uint64(nv, "idle_queue_size%u", ii));
370 control_status(struct nv *nv)
374 int error, hprinted, ret;
379 for (ii = 0; ; ii++) {
380 str = nv_get_string(nv, "resource%u", ii);
384 printf("Name\tStatus\t Role\t\tComponents\n");
388 error = nv_get_int16(nv, "error%u", ii);
392 printf("ERR%d\n", error);
395 str = nv_get_string(nv, "status%u", ii);
396 printf("%-9s", (str != NULL) ? str : "-");
397 printf("%-15s", nv_get_string(nv, "role%u", ii));
399 nv_get_string(nv, "localpath%u", ii));
401 nv_get_string(nv, "remoteaddr%u", ii));
407 main(int argc, char *argv[])
410 int64_t mediasize, extentsize, keepdirty;
411 int cmd, debug, error, ii;
415 mediasize = extentsize = keepdirty = 0;
420 if (strcmp(argv[1], "create") == 0) {
422 optstr = "c:de:k:m:h";
423 } else if (strcmp(argv[1], "role") == 0) {
426 } else if (strcmp(argv[1], "list") == 0) {
429 } else if (strcmp(argv[1], "status") == 0) {
432 } else if (strcmp(argv[1], "dump") == 0) {
444 ch = getopt(argc, argv, optstr);
455 if (expand_number(optarg, &extentsize) == -1)
456 errx(EX_USAGE, "Invalid extentsize");
459 if (expand_number(optarg, &keepdirty) == -1)
460 errx(EX_USAGE, "Invalid keepdirty");
463 if (expand_number(optarg, &mediasize) == -1)
464 errx(EX_USAGE, "Invalid mediasize");
482 pjdlog_init(PJDLOG_MODE_STD);
483 pjdlog_debug_set(debug);
485 cfg = yy_config_parse(cfgpath, true);
486 PJDLOG_ASSERT(cfg != NULL);
490 control_create(argc, argv, mediasize, extentsize, keepdirty);
492 PJDLOG_ABORT("What are we doing here?!");
495 /* Dump metadata from local component of the given resource. */
496 control_dump(argc, argv);
498 PJDLOG_ABORT("What are we doing here?!");
501 /* Change role for the given resources. */
505 nv_add_uint8(nv, HASTCTL_CMD_SETROLE, "cmd");
506 if (strcmp(argv[0], "init") == 0)
507 nv_add_uint8(nv, HAST_ROLE_INIT, "role");
508 else if (strcmp(argv[0], "primary") == 0)
509 nv_add_uint8(nv, HAST_ROLE_PRIMARY, "role");
510 else if (strcmp(argv[0], "secondary") == 0)
511 nv_add_uint8(nv, HAST_ROLE_SECONDARY, "role");
514 for (ii = 0; ii < argc - 1; ii++)
515 nv_add_string(nv, argv[ii + 1], "resource%d", ii);
519 /* Obtain status of the given resources. */
521 nv_add_uint8(nv, HASTCTL_CMD_STATUS, "cmd");
523 nv_add_string(nv, "all", "resource%d", 0);
525 for (ii = 0; ii < argc; ii++)
526 nv_add_string(nv, argv[ii], "resource%d", ii);
530 PJDLOG_ABORT("Impossible command!");
533 /* Setup control connection... */
534 if (proto_client(NULL, cfg->hc_controladdr, &controlconn) == -1) {
535 pjdlog_exit(EX_OSERR,
536 "Unable to setup control connection to %s",
537 cfg->hc_controladdr);
539 /* ...and connect to hastd. */
540 if (proto_connect(controlconn, HAST_TIMEOUT) == -1) {
541 pjdlog_exit(EX_OSERR, "Unable to connect to hastd via %s",
542 cfg->hc_controladdr);
545 if (drop_privs(NULL) != 0)
548 /* Send the command to the server... */
549 if (hast_proto_send(NULL, controlconn, nv, NULL, 0) == -1) {
550 pjdlog_exit(EX_UNAVAILABLE,
551 "Unable to send command to hastd via %s",
552 cfg->hc_controladdr);
555 /* ...and receive reply. */
556 if (hast_proto_recv_hdr(controlconn, &nv) == -1) {
557 pjdlog_exit(EX_UNAVAILABLE,
558 "cannot receive reply from hastd via %s",
559 cfg->hc_controladdr);
562 error = nv_get_int16(nv, "error");
564 pjdlog_exitx(EX_SOFTWARE, "Error %d received from hastd.",
571 error = control_set_role(nv, argv[0]);
574 error = control_list(nv);
577 error = control_status(nv);
580 PJDLOG_ABORT("Impossible command!");