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));
363 control_status(struct nv *nv)
367 int error, hprinted, ret;
372 for (ii = 0; ; ii++) {
373 str = nv_get_string(nv, "resource%u", ii);
377 printf("Name\tStatus\t Role\t\tComponents\n");
381 error = nv_get_int16(nv, "error%u", ii);
385 printf("ERR%d\n", error);
388 str = nv_get_string(nv, "status%u", ii);
389 printf("%-9s", (str != NULL) ? str : "-");
390 printf("%-15s", nv_get_string(nv, "role%u", ii));
392 nv_get_string(nv, "localpath%u", ii));
394 nv_get_string(nv, "remoteaddr%u", ii));
400 main(int argc, char *argv[])
403 int64_t mediasize, extentsize, keepdirty;
404 int cmd, debug, error, ii;
408 mediasize = extentsize = keepdirty = 0;
413 if (strcmp(argv[1], "create") == 0) {
415 optstr = "c:de:k:m:h";
416 } else if (strcmp(argv[1], "role") == 0) {
419 } else if (strcmp(argv[1], "list") == 0) {
422 } else if (strcmp(argv[1], "status") == 0) {
425 } else if (strcmp(argv[1], "dump") == 0) {
437 ch = getopt(argc, argv, optstr);
448 if (expand_number(optarg, &extentsize) == -1)
449 errx(EX_USAGE, "Invalid extentsize");
452 if (expand_number(optarg, &keepdirty) == -1)
453 errx(EX_USAGE, "Invalid keepdirty");
456 if (expand_number(optarg, &mediasize) == -1)
457 errx(EX_USAGE, "Invalid mediasize");
475 pjdlog_init(PJDLOG_MODE_STD);
476 pjdlog_debug_set(debug);
478 cfg = yy_config_parse(cfgpath, true);
479 PJDLOG_ASSERT(cfg != NULL);
483 control_create(argc, argv, mediasize, extentsize, keepdirty);
485 PJDLOG_ABORT("What are we doing here?!");
488 /* Dump metadata from local component of the given resource. */
489 control_dump(argc, argv);
491 PJDLOG_ABORT("What are we doing here?!");
494 /* Change role for the given resources. */
498 nv_add_uint8(nv, HASTCTL_CMD_SETROLE, "cmd");
499 if (strcmp(argv[0], "init") == 0)
500 nv_add_uint8(nv, HAST_ROLE_INIT, "role");
501 else if (strcmp(argv[0], "primary") == 0)
502 nv_add_uint8(nv, HAST_ROLE_PRIMARY, "role");
503 else if (strcmp(argv[0], "secondary") == 0)
504 nv_add_uint8(nv, HAST_ROLE_SECONDARY, "role");
507 for (ii = 0; ii < argc - 1; ii++)
508 nv_add_string(nv, argv[ii + 1], "resource%d", ii);
512 /* Obtain status of the given resources. */
514 nv_add_uint8(nv, HASTCTL_CMD_STATUS, "cmd");
516 nv_add_string(nv, "all", "resource%d", 0);
518 for (ii = 0; ii < argc; ii++)
519 nv_add_string(nv, argv[ii], "resource%d", ii);
523 PJDLOG_ABORT("Impossible command!");
526 /* Setup control connection... */
527 if (proto_client(NULL, cfg->hc_controladdr, &controlconn) == -1) {
528 pjdlog_exit(EX_OSERR,
529 "Unable to setup control connection to %s",
530 cfg->hc_controladdr);
532 /* ...and connect to hastd. */
533 if (proto_connect(controlconn, HAST_TIMEOUT) == -1) {
534 pjdlog_exit(EX_OSERR, "Unable to connect to hastd via %s",
535 cfg->hc_controladdr);
538 if (drop_privs(NULL) != 0)
541 /* Send the command to the server... */
542 if (hast_proto_send(NULL, controlconn, nv, NULL, 0) == -1) {
543 pjdlog_exit(EX_UNAVAILABLE,
544 "Unable to send command to hastd via %s",
545 cfg->hc_controladdr);
548 /* ...and receive reply. */
549 if (hast_proto_recv_hdr(controlconn, &nv) == -1) {
550 pjdlog_exit(EX_UNAVAILABLE,
551 "cannot receive reply from hastd via %s",
552 cfg->hc_controladdr);
555 error = nv_get_int16(nv, "error");
557 pjdlog_exitx(EX_SOFTWARE, "Error %d received from hastd.",
564 error = control_set_role(nv, argv[0]);
567 error = control_list(nv);
570 error = control_status(nv);
573 PJDLOG_ABORT("Impossible command!");