secondary.c revision 214275
1204076Spjd/*- 2204076Spjd * Copyright (c) 2009-2010 The FreeBSD Foundation 3211877Spjd * Copyright (c) 2010 Pawel Jakub Dawidek <pjd@FreeBSD.org> 4204076Spjd * All rights reserved. 5204076Spjd * 6204076Spjd * This software was developed by Pawel Jakub Dawidek under sponsorship from 7204076Spjd * the FreeBSD Foundation. 8204076Spjd * 9204076Spjd * Redistribution and use in source and binary forms, with or without 10204076Spjd * modification, are permitted provided that the following conditions 11204076Spjd * are met: 12204076Spjd * 1. Redistributions of source code must retain the above copyright 13204076Spjd * notice, this list of conditions and the following disclaimer. 14204076Spjd * 2. Redistributions in binary form must reproduce the above copyright 15204076Spjd * notice, this list of conditions and the following disclaimer in the 16204076Spjd * documentation and/or other materials provided with the distribution. 17204076Spjd * 18204076Spjd * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND 19204076Spjd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20204076Spjd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21204076Spjd * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE 22204076Spjd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23204076Spjd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24204076Spjd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25204076Spjd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26204076Spjd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27204076Spjd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28204076Spjd * SUCH DAMAGE. 29204076Spjd */ 30204076Spjd 31204076Spjd#include <sys/cdefs.h> 32204076Spjd__FBSDID("$FreeBSD: head/sbin/hastd/secondary.c 214275 2010-10-24 15:42:16Z pjd $"); 33204076Spjd 34204076Spjd#include <sys/param.h> 35204076Spjd#include <sys/time.h> 36204076Spjd#include <sys/bio.h> 37204076Spjd#include <sys/disk.h> 38204076Spjd#include <sys/stat.h> 39204076Spjd 40204076Spjd#include <assert.h> 41204076Spjd#include <err.h> 42204076Spjd#include <errno.h> 43204076Spjd#include <fcntl.h> 44204076Spjd#include <libgeom.h> 45204076Spjd#include <pthread.h> 46213009Spjd#include <signal.h> 47204076Spjd#include <stdint.h> 48204076Spjd#include <stdio.h> 49204076Spjd#include <string.h> 50204076Spjd#include <sysexits.h> 51204076Spjd#include <unistd.h> 52204076Spjd 53204076Spjd#include <activemap.h> 54204076Spjd#include <nv.h> 55204076Spjd#include <pjdlog.h> 56204076Spjd 57204076Spjd#include "control.h" 58212038Spjd#include "event.h" 59204076Spjd#include "hast.h" 60204076Spjd#include "hast_proto.h" 61204076Spjd#include "hastd.h" 62211977Spjd#include "hooks.h" 63204076Spjd#include "metadata.h" 64204076Spjd#include "proto.h" 65204076Spjd#include "subr.h" 66204076Spjd#include "synch.h" 67204076Spjd 68204076Spjdstruct hio { 69204076Spjd uint64_t hio_seq; 70204076Spjd int hio_error; 71204076Spjd struct nv *hio_nv; 72204076Spjd void *hio_data; 73204076Spjd uint8_t hio_cmd; 74204076Spjd uint64_t hio_offset; 75204076Spjd uint64_t hio_length; 76204076Spjd TAILQ_ENTRY(hio) hio_next; 77204076Spjd}; 78204076Spjd 79211984Spjdstatic struct hast_resource *gres; 80211984Spjd 81204076Spjd/* 82204076Spjd * Free list holds unused structures. When free list is empty, we have to wait 83204076Spjd * until some in-progress requests are freed. 84204076Spjd */ 85204076Spjdstatic TAILQ_HEAD(, hio) hio_free_list; 86204076Spjdstatic pthread_mutex_t hio_free_list_lock; 87204076Spjdstatic pthread_cond_t hio_free_list_cond; 88204076Spjd/* 89204076Spjd * Disk thread (the one that do I/O requests) takes requests from this list. 90204076Spjd */ 91204076Spjdstatic TAILQ_HEAD(, hio) hio_disk_list; 92204076Spjdstatic pthread_mutex_t hio_disk_list_lock; 93204076Spjdstatic pthread_cond_t hio_disk_list_cond; 94204076Spjd/* 95204076Spjd * There is one recv list for every component, although local components don't 96204076Spjd * use recv lists as local requests are done synchronously. 97204076Spjd */ 98204076Spjdstatic TAILQ_HEAD(, hio) hio_send_list; 99204076Spjdstatic pthread_mutex_t hio_send_list_lock; 100204076Spjdstatic pthread_cond_t hio_send_list_cond; 101204076Spjd 102204076Spjd/* 103204076Spjd * Maximum number of outstanding I/O requests. 104204076Spjd */ 105204076Spjd#define HAST_HIO_MAX 256 106204076Spjd 107204076Spjdstatic void *recv_thread(void *arg); 108204076Spjdstatic void *disk_thread(void *arg); 109204076Spjdstatic void *send_thread(void *arg); 110204076Spjd 111211877Spjd#define QUEUE_INSERT(name, hio) do { \ 112211877Spjd bool _wakeup; \ 113211877Spjd \ 114211877Spjd mtx_lock(&hio_##name##_list_lock); \ 115211877Spjd _wakeup = TAILQ_EMPTY(&hio_##name##_list); \ 116211877Spjd TAILQ_INSERT_TAIL(&hio_##name##_list, (hio), hio_next); \ 117211877Spjd mtx_unlock(&hio_##name##_list_lock); \ 118211877Spjd if (_wakeup) \ 119211877Spjd cv_signal(&hio_##name##_list_cond); \ 120211877Spjd} while (0) 121211877Spjd#define QUEUE_TAKE(name, hio) do { \ 122211877Spjd mtx_lock(&hio_##name##_list_lock); \ 123211877Spjd while (((hio) = TAILQ_FIRST(&hio_##name##_list)) == NULL) { \ 124211877Spjd cv_wait(&hio_##name##_list_cond, \ 125211877Spjd &hio_##name##_list_lock); \ 126211877Spjd } \ 127211877Spjd TAILQ_REMOVE(&hio_##name##_list, (hio), hio_next); \ 128211877Spjd mtx_unlock(&hio_##name##_list_lock); \ 129211877Spjd} while (0) 130211877Spjd 131204076Spjdstatic void 132204076Spjdinit_environment(void) 133204076Spjd{ 134204076Spjd struct hio *hio; 135204076Spjd unsigned int ii; 136204076Spjd 137204076Spjd /* 138204076Spjd * Initialize lists, their locks and theirs condition variables. 139204076Spjd */ 140204076Spjd TAILQ_INIT(&hio_free_list); 141204076Spjd mtx_init(&hio_free_list_lock); 142204076Spjd cv_init(&hio_free_list_cond); 143204076Spjd TAILQ_INIT(&hio_disk_list); 144204076Spjd mtx_init(&hio_disk_list_lock); 145204076Spjd cv_init(&hio_disk_list_cond); 146204076Spjd TAILQ_INIT(&hio_send_list); 147204076Spjd mtx_init(&hio_send_list_lock); 148204076Spjd cv_init(&hio_send_list_cond); 149204076Spjd 150204076Spjd /* 151204076Spjd * Allocate requests pool and initialize requests. 152204076Spjd */ 153204076Spjd for (ii = 0; ii < HAST_HIO_MAX; ii++) { 154204076Spjd hio = malloc(sizeof(*hio)); 155204076Spjd if (hio == NULL) { 156210879Spjd pjdlog_exitx(EX_TEMPFAIL, 157210879Spjd "Unable to allocate memory (%zu bytes) for hio request.", 158210879Spjd sizeof(*hio)); 159204076Spjd } 160204076Spjd hio->hio_error = 0; 161204076Spjd hio->hio_data = malloc(MAXPHYS); 162204076Spjd if (hio->hio_data == NULL) { 163210879Spjd pjdlog_exitx(EX_TEMPFAIL, 164210879Spjd "Unable to allocate memory (%zu bytes) for gctl_data.", 165210879Spjd (size_t)MAXPHYS); 166204076Spjd } 167204076Spjd TAILQ_INSERT_HEAD(&hio_free_list, hio, hio_next); 168204076Spjd } 169204076Spjd} 170204076Spjd 171204076Spjdstatic void 172204076Spjdinit_local(struct hast_resource *res) 173204076Spjd{ 174204076Spjd 175204076Spjd if (metadata_read(res, true) < 0) 176204076Spjd exit(EX_NOINPUT); 177204076Spjd} 178204076Spjd 179204076Spjdstatic void 180204076Spjdinit_remote(struct hast_resource *res, struct nv *nvin) 181204076Spjd{ 182204076Spjd uint64_t resuid; 183204076Spjd struct nv *nvout; 184204076Spjd unsigned char *map; 185204076Spjd size_t mapsize; 186204076Spjd 187204076Spjd map = NULL; 188204076Spjd mapsize = 0; 189204076Spjd nvout = nv_alloc(); 190204076Spjd nv_add_int64(nvout, (int64_t)res->hr_datasize, "datasize"); 191204076Spjd nv_add_int32(nvout, (int32_t)res->hr_extentsize, "extentsize"); 192204076Spjd resuid = nv_get_uint64(nvin, "resuid"); 193204076Spjd res->hr_primary_localcnt = nv_get_uint64(nvin, "localcnt"); 194204076Spjd res->hr_primary_remotecnt = nv_get_uint64(nvin, "remotecnt"); 195204076Spjd nv_add_uint64(nvout, res->hr_secondary_localcnt, "localcnt"); 196204076Spjd nv_add_uint64(nvout, res->hr_secondary_remotecnt, "remotecnt"); 197204076Spjd mapsize = activemap_calc_ondisk_size(res->hr_local_mediasize - 198204076Spjd METADATA_SIZE, res->hr_extentsize, res->hr_local_sectorsize); 199204076Spjd map = malloc(mapsize); 200204076Spjd if (map == NULL) { 201204076Spjd pjdlog_exitx(EX_TEMPFAIL, 202204076Spjd "Unable to allocate memory (%zu bytes) for activemap.", 203204076Spjd mapsize); 204204076Spjd } 205204076Spjd nv_add_uint32(nvout, (uint32_t)mapsize, "mapsize"); 206204076Spjd /* 207204076Spjd * When we work as primary and secondary is missing we will increase 208204076Spjd * localcnt in our metadata. When secondary is connected and synced 209204076Spjd * we make localcnt be equal to remotecnt, which means nodes are more 210204076Spjd * or less in sync. 211204076Spjd * Split-brain condition is when both nodes are not able to communicate 212204076Spjd * and are both configured as primary nodes. In turn, they can both 213204076Spjd * make incompatible changes to the data and we have to detect that. 214204076Spjd * Under split-brain condition we will increase our localcnt on first 215204076Spjd * write and remote node will increase its localcnt on first write. 216204076Spjd * When we connect we can see that primary's localcnt is greater than 217204076Spjd * our remotecnt (primary was modified while we weren't watching) and 218204076Spjd * our localcnt is greater than primary's remotecnt (we were modified 219204076Spjd * while primary wasn't watching). 220204076Spjd * There are many possible combinations which are all gathered below. 221204076Spjd * Don't pay too much attention to exact numbers, the more important 222204076Spjd * is to compare them. We compare secondary's local with primary's 223204076Spjd * remote and secondary's remote with primary's local. 224204076Spjd * Note that every case where primary's localcnt is smaller than 225204076Spjd * secondary's remotecnt and where secondary's localcnt is smaller than 226204076Spjd * primary's remotecnt should be impossible in practise. We will perform 227204076Spjd * full synchronization then. Those cases are marked with an asterisk. 228204076Spjd * Regular synchronization means that only extents marked as dirty are 229204076Spjd * synchronized (regular synchronization). 230204076Spjd * 231204076Spjd * SECONDARY METADATA PRIMARY METADATA 232204076Spjd * local=3 remote=3 local=2 remote=2* ?! Full sync from secondary. 233204076Spjd * local=3 remote=3 local=2 remote=3* ?! Full sync from primary. 234204076Spjd * local=3 remote=3 local=2 remote=4* ?! Full sync from primary. 235204076Spjd * local=3 remote=3 local=3 remote=2 Primary is out-of-date, 236204076Spjd * regular sync from secondary. 237204076Spjd * local=3 remote=3 local=3 remote=3 Regular sync just in case. 238204076Spjd * local=3 remote=3 local=3 remote=4* ?! Full sync from primary. 239204076Spjd * local=3 remote=3 local=4 remote=2 Split-brain condition. 240204076Spjd * local=3 remote=3 local=4 remote=3 Secondary out-of-date, 241204076Spjd * regular sync from primary. 242204076Spjd * local=3 remote=3 local=4 remote=4* ?! Full sync from primary. 243204076Spjd */ 244204076Spjd if (res->hr_resuid == 0) { 245204076Spjd /* 246204076Spjd * Provider is used for the first time. Initialize everything. 247204076Spjd */ 248204076Spjd assert(res->hr_secondary_localcnt == 0); 249204076Spjd res->hr_resuid = resuid; 250204076Spjd if (metadata_write(res) < 0) 251204076Spjd exit(EX_NOINPUT); 252204076Spjd memset(map, 0xff, mapsize); 253204076Spjd nv_add_uint8(nvout, HAST_SYNCSRC_PRIMARY, "syncsrc"); 254204076Spjd } else if ( 255204076Spjd /* Is primary is out-of-date? */ 256204076Spjd (res->hr_secondary_localcnt > res->hr_primary_remotecnt && 257204076Spjd res->hr_secondary_remotecnt == res->hr_primary_localcnt) || 258204076Spjd /* Node are more or less in sync? */ 259204076Spjd (res->hr_secondary_localcnt == res->hr_primary_remotecnt && 260204076Spjd res->hr_secondary_remotecnt == res->hr_primary_localcnt) || 261204076Spjd /* Is secondary is out-of-date? */ 262204076Spjd (res->hr_secondary_localcnt == res->hr_primary_remotecnt && 263204076Spjd res->hr_secondary_remotecnt < res->hr_primary_localcnt)) { 264204076Spjd /* 265204076Spjd * Nodes are more or less in sync or one of the nodes is 266204076Spjd * out-of-date. 267204076Spjd * It doesn't matter at this point which one, we just have to 268204076Spjd * send out local bitmap to the remote node. 269204076Spjd */ 270204076Spjd if (pread(res->hr_localfd, map, mapsize, METADATA_SIZE) != 271204076Spjd (ssize_t)mapsize) { 272204076Spjd pjdlog_exit(LOG_ERR, "Unable to read activemap"); 273204076Spjd } 274204076Spjd if (res->hr_secondary_localcnt > res->hr_primary_remotecnt && 275204076Spjd res->hr_secondary_remotecnt == res->hr_primary_localcnt) { 276204076Spjd /* Primary is out-of-date, sync from secondary. */ 277204076Spjd nv_add_uint8(nvout, HAST_SYNCSRC_SECONDARY, "syncsrc"); 278204076Spjd } else { 279204076Spjd /* 280204076Spjd * Secondary is out-of-date or counts match. 281204076Spjd * Sync from primary. 282204076Spjd */ 283204076Spjd nv_add_uint8(nvout, HAST_SYNCSRC_PRIMARY, "syncsrc"); 284204076Spjd } 285204076Spjd } else if (res->hr_secondary_localcnt > res->hr_primary_remotecnt && 286204076Spjd res->hr_primary_localcnt > res->hr_secondary_remotecnt) { 287204076Spjd /* 288204076Spjd * Not good, we have split-brain condition. 289204076Spjd */ 290204076Spjd pjdlog_error("Split-brain detected, exiting."); 291204076Spjd nv_add_string(nvout, "Split-brain condition!", "errmsg"); 292204076Spjd free(map); 293204076Spjd map = NULL; 294204076Spjd mapsize = 0; 295204076Spjd } else /* if (res->hr_secondary_localcnt < res->hr_primary_remotecnt || 296204076Spjd res->hr_primary_localcnt < res->hr_secondary_remotecnt) */ { 297204076Spjd /* 298204076Spjd * This should never happen in practise, but we will perform 299204076Spjd * full synchronization. 300204076Spjd */ 301204076Spjd assert(res->hr_secondary_localcnt < res->hr_primary_remotecnt || 302204076Spjd res->hr_primary_localcnt < res->hr_secondary_remotecnt); 303204076Spjd mapsize = activemap_calc_ondisk_size(res->hr_local_mediasize - 304204076Spjd METADATA_SIZE, res->hr_extentsize, 305204076Spjd res->hr_local_sectorsize); 306204076Spjd memset(map, 0xff, mapsize); 307204076Spjd if (res->hr_secondary_localcnt > res->hr_primary_remotecnt) { 308204076Spjd /* In this one of five cases sync from secondary. */ 309204076Spjd nv_add_uint8(nvout, HAST_SYNCSRC_SECONDARY, "syncsrc"); 310204076Spjd } else { 311204076Spjd /* For the rest four cases sync from primary. */ 312204076Spjd nv_add_uint8(nvout, HAST_SYNCSRC_PRIMARY, "syncsrc"); 313204076Spjd } 314204076Spjd pjdlog_warning("This should never happen, asking for full synchronization (primary(local=%ju, remote=%ju), secondary(local=%ju, remote=%ju)).", 315204076Spjd (uintmax_t)res->hr_primary_localcnt, 316204076Spjd (uintmax_t)res->hr_primary_remotecnt, 317204076Spjd (uintmax_t)res->hr_secondary_localcnt, 318204076Spjd (uintmax_t)res->hr_secondary_remotecnt); 319204076Spjd } 320204076Spjd if (hast_proto_send(res, res->hr_remotein, nvout, map, mapsize) < 0) { 321204076Spjd pjdlog_errno(LOG_WARNING, "Unable to send activemap to %s", 322204076Spjd res->hr_remoteaddr); 323204076Spjd nv_free(nvout); 324204076Spjd exit(EX_TEMPFAIL); 325204076Spjd } 326214275Spjd if (map != NULL) 327214275Spjd free(map); 328209182Spjd nv_free(nvout); 329204076Spjd if (res->hr_secondary_localcnt > res->hr_primary_remotecnt && 330204076Spjd res->hr_primary_localcnt > res->hr_secondary_remotecnt) { 331204076Spjd /* Exit on split-brain. */ 332212038Spjd event_send(res, EVENT_SPLITBRAIN); 333204076Spjd exit(EX_CONFIG); 334204076Spjd } 335204076Spjd} 336204076Spjd 337204076Spjdvoid 338204076Spjdhastd_secondary(struct hast_resource *res, struct nv *nvin) 339204076Spjd{ 340213009Spjd sigset_t mask; 341204076Spjd pthread_t td; 342204076Spjd pid_t pid; 343204076Spjd int error; 344204076Spjd 345204076Spjd /* 346204076Spjd * Create communication channel between parent and child. 347204076Spjd */ 348204076Spjd if (proto_client("socketpair://", &res->hr_ctrl) < 0) { 349204076Spjd KEEP_ERRNO((void)pidfile_remove(pfh)); 350204076Spjd pjdlog_exit(EX_OSERR, 351204076Spjd "Unable to create control sockets between parent and child"); 352204076Spjd } 353212038Spjd /* 354212038Spjd * Create communication channel between child and parent. 355212038Spjd */ 356212038Spjd if (proto_client("socketpair://", &res->hr_event) < 0) { 357212038Spjd KEEP_ERRNO((void)pidfile_remove(pfh)); 358212038Spjd pjdlog_exit(EX_OSERR, 359212038Spjd "Unable to create event sockets between child and parent"); 360212038Spjd } 361204076Spjd 362204076Spjd pid = fork(); 363204076Spjd if (pid < 0) { 364204076Spjd KEEP_ERRNO((void)pidfile_remove(pfh)); 365204076Spjd pjdlog_exit(EX_OSERR, "Unable to fork"); 366204076Spjd } 367204076Spjd 368204076Spjd if (pid > 0) { 369204076Spjd /* This is parent. */ 370204076Spjd proto_close(res->hr_remotein); 371204076Spjd res->hr_remotein = NULL; 372204076Spjd proto_close(res->hr_remoteout); 373204076Spjd res->hr_remoteout = NULL; 374212038Spjd /* Declare that we are receiver. */ 375212038Spjd proto_recv(res->hr_event, NULL, 0); 376204076Spjd res->hr_workerpid = pid; 377204076Spjd return; 378204076Spjd } 379211977Spjd 380211984Spjd gres = res; 381211984Spjd 382204076Spjd (void)pidfile_close(pfh); 383211977Spjd hook_fini(); 384204076Spjd 385204076Spjd setproctitle("%s (secondary)", res->hr_name); 386204076Spjd 387213009Spjd PJDLOG_VERIFY(sigemptyset(&mask) == 0); 388213009Spjd PJDLOG_VERIFY(sigprocmask(SIG_SETMASK, &mask, NULL) == 0); 389210880Spjd 390212038Spjd /* Declare that we are sender. */ 391212038Spjd proto_send(res->hr_event, NULL, 0); 392212038Spjd 393207371Spjd /* Error in setting timeout is not critical, but why should it fail? */ 394207371Spjd if (proto_timeout(res->hr_remotein, 0) < 0) 395207371Spjd pjdlog_errno(LOG_WARNING, "Unable to set connection timeout"); 396207371Spjd if (proto_timeout(res->hr_remoteout, res->hr_timeout) < 0) 397207371Spjd pjdlog_errno(LOG_WARNING, "Unable to set connection timeout"); 398207371Spjd 399204076Spjd init_local(res); 400213007Spjd init_environment(); 401213007Spjd 402213007Spjd /* 403213007Spjd * Create the control thread before sending any event to the parent, 404213007Spjd * as we can deadlock when parent sends control request to worker, 405213007Spjd * but worker has no control thread started yet, so parent waits. 406213007Spjd * In the meantime worker sends an event to the parent, but parent 407213007Spjd * is unable to handle the event, because it waits for control 408213007Spjd * request response. 409213007Spjd */ 410213007Spjd error = pthread_create(&td, NULL, ctrl_thread, res); 411213007Spjd assert(error == 0); 412213007Spjd 413204076Spjd init_remote(res, nvin); 414212038Spjd event_send(res, EVENT_CONNECT); 415204076Spjd 416204076Spjd error = pthread_create(&td, NULL, recv_thread, res); 417204076Spjd assert(error == 0); 418204076Spjd error = pthread_create(&td, NULL, disk_thread, res); 419204076Spjd assert(error == 0); 420213007Spjd (void)send_thread(res); 421204076Spjd} 422204076Spjd 423204076Spjdstatic void 424204076Spjdreqlog(int loglevel, int debuglevel, int error, struct hio *hio, const char *fmt, ...) 425204076Spjd{ 426204076Spjd char msg[1024]; 427204076Spjd va_list ap; 428204076Spjd int len; 429204076Spjd 430204076Spjd va_start(ap, fmt); 431204076Spjd len = vsnprintf(msg, sizeof(msg), fmt, ap); 432204076Spjd va_end(ap); 433204076Spjd if ((size_t)len < sizeof(msg)) { 434204076Spjd switch (hio->hio_cmd) { 435204076Spjd case HIO_READ: 436204076Spjd (void)snprintf(msg + len, sizeof(msg) - len, 437204076Spjd "READ(%ju, %ju).", (uintmax_t)hio->hio_offset, 438204076Spjd (uintmax_t)hio->hio_length); 439204076Spjd break; 440204076Spjd case HIO_DELETE: 441204076Spjd (void)snprintf(msg + len, sizeof(msg) - len, 442204076Spjd "DELETE(%ju, %ju).", (uintmax_t)hio->hio_offset, 443204076Spjd (uintmax_t)hio->hio_length); 444204076Spjd break; 445204076Spjd case HIO_FLUSH: 446204076Spjd (void)snprintf(msg + len, sizeof(msg) - len, "FLUSH."); 447204076Spjd break; 448204076Spjd case HIO_WRITE: 449204076Spjd (void)snprintf(msg + len, sizeof(msg) - len, 450204076Spjd "WRITE(%ju, %ju).", (uintmax_t)hio->hio_offset, 451204076Spjd (uintmax_t)hio->hio_length); 452204076Spjd break; 453211882Spjd case HIO_KEEPALIVE: 454211882Spjd (void)snprintf(msg + len, sizeof(msg) - len, "KEEPALIVE."); 455211882Spjd break; 456204076Spjd default: 457204076Spjd (void)snprintf(msg + len, sizeof(msg) - len, 458204076Spjd "UNKNOWN(%u).", (unsigned int)hio->hio_cmd); 459204076Spjd break; 460204076Spjd } 461204076Spjd } 462204076Spjd pjdlog_common(loglevel, debuglevel, error, "%s", msg); 463204076Spjd} 464204076Spjd 465204076Spjdstatic int 466204076Spjdrequnpack(struct hast_resource *res, struct hio *hio) 467204076Spjd{ 468204076Spjd 469204076Spjd hio->hio_cmd = nv_get_uint8(hio->hio_nv, "cmd"); 470204076Spjd if (hio->hio_cmd == 0) { 471204076Spjd pjdlog_error("Header contains no 'cmd' field."); 472204076Spjd hio->hio_error = EINVAL; 473204076Spjd goto end; 474204076Spjd } 475204076Spjd switch (hio->hio_cmd) { 476211882Spjd case HIO_KEEPALIVE: 477211882Spjd break; 478204076Spjd case HIO_READ: 479204076Spjd case HIO_WRITE: 480204076Spjd case HIO_DELETE: 481204076Spjd hio->hio_offset = nv_get_uint64(hio->hio_nv, "offset"); 482204076Spjd if (nv_error(hio->hio_nv) != 0) { 483204076Spjd pjdlog_error("Header is missing 'offset' field."); 484204076Spjd hio->hio_error = EINVAL; 485204076Spjd goto end; 486204076Spjd } 487204076Spjd hio->hio_length = nv_get_uint64(hio->hio_nv, "length"); 488204076Spjd if (nv_error(hio->hio_nv) != 0) { 489204076Spjd pjdlog_error("Header is missing 'length' field."); 490204076Spjd hio->hio_error = EINVAL; 491204076Spjd goto end; 492204076Spjd } 493204076Spjd if (hio->hio_length == 0) { 494204076Spjd pjdlog_error("Data length is zero."); 495204076Spjd hio->hio_error = EINVAL; 496204076Spjd goto end; 497204076Spjd } 498204076Spjd if (hio->hio_length > MAXPHYS) { 499204076Spjd pjdlog_error("Data length is too large (%ju > %ju).", 500204076Spjd (uintmax_t)hio->hio_length, (uintmax_t)MAXPHYS); 501204076Spjd hio->hio_error = EINVAL; 502204076Spjd goto end; 503204076Spjd } 504204076Spjd if ((hio->hio_offset % res->hr_local_sectorsize) != 0) { 505204076Spjd pjdlog_error("Offset %ju is not multiple of sector size.", 506204076Spjd (uintmax_t)hio->hio_offset); 507204076Spjd hio->hio_error = EINVAL; 508204076Spjd goto end; 509204076Spjd } 510204076Spjd if ((hio->hio_length % res->hr_local_sectorsize) != 0) { 511204076Spjd pjdlog_error("Length %ju is not multiple of sector size.", 512204076Spjd (uintmax_t)hio->hio_length); 513204076Spjd hio->hio_error = EINVAL; 514204076Spjd goto end; 515204076Spjd } 516204076Spjd if (hio->hio_offset + hio->hio_length > 517204076Spjd (uint64_t)res->hr_datasize) { 518204076Spjd pjdlog_error("Data offset is too large (%ju > %ju).", 519204076Spjd (uintmax_t)(hio->hio_offset + hio->hio_length), 520204076Spjd (uintmax_t)res->hr_datasize); 521204076Spjd hio->hio_error = EINVAL; 522204076Spjd goto end; 523204076Spjd } 524204076Spjd break; 525204076Spjd default: 526204076Spjd pjdlog_error("Header contains invalid 'cmd' (%hhu).", 527204076Spjd hio->hio_cmd); 528204076Spjd hio->hio_error = EINVAL; 529204076Spjd goto end; 530204076Spjd } 531204076Spjd hio->hio_error = 0; 532204076Spjdend: 533204076Spjd return (hio->hio_error); 534204076Spjd} 535204076Spjd 536212899Spjdstatic __dead2 void 537211984Spjdsecondary_exit(int exitcode, const char *fmt, ...) 538211984Spjd{ 539211984Spjd va_list ap; 540211984Spjd 541211984Spjd assert(exitcode != EX_OK); 542211984Spjd va_start(ap, fmt); 543211984Spjd pjdlogv_errno(LOG_ERR, fmt, ap); 544211984Spjd va_end(ap); 545212038Spjd event_send(gres, EVENT_DISCONNECT); 546211984Spjd exit(exitcode); 547211984Spjd} 548211984Spjd 549204076Spjd/* 550204076Spjd * Thread receives requests from the primary node. 551204076Spjd */ 552204076Spjdstatic void * 553204076Spjdrecv_thread(void *arg) 554204076Spjd{ 555204076Spjd struct hast_resource *res = arg; 556204076Spjd struct hio *hio; 557204076Spjd 558204076Spjd for (;;) { 559204076Spjd pjdlog_debug(2, "recv: Taking free request."); 560211877Spjd QUEUE_TAKE(free, hio); 561204076Spjd pjdlog_debug(2, "recv: (%p) Got request.", hio); 562204076Spjd if (hast_proto_recv_hdr(res->hr_remotein, &hio->hio_nv) < 0) { 563211984Spjd secondary_exit(EX_TEMPFAIL, 564204076Spjd "Unable to receive request header"); 565204076Spjd } 566211877Spjd if (requnpack(res, hio) != 0) { 567211877Spjd pjdlog_debug(2, 568211877Spjd "recv: (%p) Moving request to the send queue.", 569211877Spjd hio); 570211877Spjd QUEUE_INSERT(send, hio); 571211877Spjd continue; 572211877Spjd } 573204076Spjd reqlog(LOG_DEBUG, 2, -1, hio, 574204076Spjd "recv: (%p) Got request header: ", hio); 575211882Spjd if (hio->hio_cmd == HIO_KEEPALIVE) { 576211882Spjd pjdlog_debug(2, 577211882Spjd "recv: (%p) Moving request to the free queue.", 578211882Spjd hio); 579211882Spjd nv_free(hio->hio_nv); 580211882Spjd QUEUE_INSERT(free, hio); 581211882Spjd continue; 582211882Spjd } else if (hio->hio_cmd == HIO_WRITE) { 583204076Spjd if (hast_proto_recv_data(res, res->hr_remotein, 584204076Spjd hio->hio_nv, hio->hio_data, MAXPHYS) < 0) { 585211984Spjd secondary_exit(EX_TEMPFAIL, 586212051Spjd "Unable to receive request data"); 587204076Spjd } 588204076Spjd } 589204076Spjd pjdlog_debug(2, "recv: (%p) Moving request to the disk queue.", 590204076Spjd hio); 591211877Spjd QUEUE_INSERT(disk, hio); 592204076Spjd } 593204076Spjd /* NOTREACHED */ 594204076Spjd return (NULL); 595204076Spjd} 596204076Spjd 597204076Spjd/* 598204076Spjd * Thread reads from or writes to local component and also handles DELETE and 599204076Spjd * FLUSH requests. 600204076Spjd */ 601204076Spjdstatic void * 602204076Spjddisk_thread(void *arg) 603204076Spjd{ 604204076Spjd struct hast_resource *res = arg; 605204076Spjd struct hio *hio; 606204076Spjd ssize_t ret; 607211877Spjd bool clear_activemap; 608204076Spjd 609204076Spjd clear_activemap = true; 610204076Spjd 611204076Spjd for (;;) { 612204076Spjd pjdlog_debug(2, "disk: Taking request."); 613211877Spjd QUEUE_TAKE(disk, hio); 614204076Spjd while (clear_activemap) { 615204076Spjd unsigned char *map; 616204076Spjd size_t mapsize; 617204076Spjd 618204076Spjd /* 619204076Spjd * When first request is received, it means that primary 620204076Spjd * already received our activemap, merged it and stored 621204076Spjd * locally. We can now safely clear our activemap. 622204076Spjd */ 623204076Spjd mapsize = 624204076Spjd activemap_calc_ondisk_size(res->hr_local_mediasize - 625204076Spjd METADATA_SIZE, res->hr_extentsize, 626204076Spjd res->hr_local_sectorsize); 627204076Spjd map = calloc(1, mapsize); 628204076Spjd if (map == NULL) { 629204076Spjd pjdlog_warning("Unable to allocate memory to clear local activemap."); 630204076Spjd break; 631204076Spjd } 632204076Spjd if (pwrite(res->hr_localfd, map, mapsize, 633204076Spjd METADATA_SIZE) != (ssize_t)mapsize) { 634204076Spjd pjdlog_errno(LOG_WARNING, 635204076Spjd "Unable to store cleared activemap"); 636204076Spjd free(map); 637204076Spjd break; 638204076Spjd } 639204076Spjd free(map); 640204076Spjd clear_activemap = false; 641204076Spjd pjdlog_debug(1, "Local activemap cleared."); 642204076Spjd } 643204076Spjd reqlog(LOG_DEBUG, 2, -1, hio, "disk: (%p) Got request: ", hio); 644204076Spjd /* Handle the actual request. */ 645204076Spjd switch (hio->hio_cmd) { 646204076Spjd case HIO_READ: 647204076Spjd ret = pread(res->hr_localfd, hio->hio_data, 648204076Spjd hio->hio_length, 649204076Spjd hio->hio_offset + res->hr_localoff); 650204076Spjd if (ret < 0) 651204076Spjd hio->hio_error = errno; 652204076Spjd else if (ret != (int64_t)hio->hio_length) 653204076Spjd hio->hio_error = EIO; 654204076Spjd else 655204076Spjd hio->hio_error = 0; 656204076Spjd break; 657204076Spjd case HIO_WRITE: 658204076Spjd ret = pwrite(res->hr_localfd, hio->hio_data, 659204076Spjd hio->hio_length, 660204076Spjd hio->hio_offset + res->hr_localoff); 661204076Spjd if (ret < 0) 662204076Spjd hio->hio_error = errno; 663204076Spjd else if (ret != (int64_t)hio->hio_length) 664204076Spjd hio->hio_error = EIO; 665204076Spjd else 666204076Spjd hio->hio_error = 0; 667204076Spjd break; 668204076Spjd case HIO_DELETE: 669204076Spjd ret = g_delete(res->hr_localfd, 670204076Spjd hio->hio_offset + res->hr_localoff, 671204076Spjd hio->hio_length); 672204076Spjd if (ret < 0) 673204076Spjd hio->hio_error = errno; 674204076Spjd else 675204076Spjd hio->hio_error = 0; 676204076Spjd break; 677204076Spjd case HIO_FLUSH: 678204076Spjd ret = g_flush(res->hr_localfd); 679204076Spjd if (ret < 0) 680204076Spjd hio->hio_error = errno; 681204076Spjd else 682204076Spjd hio->hio_error = 0; 683204076Spjd break; 684204076Spjd } 685204076Spjd if (hio->hio_error != 0) { 686204076Spjd reqlog(LOG_ERR, 0, hio->hio_error, hio, 687204076Spjd "Request failed: "); 688204076Spjd } 689204076Spjd pjdlog_debug(2, "disk: (%p) Moving request to the send queue.", 690204076Spjd hio); 691211877Spjd QUEUE_INSERT(send, hio); 692204076Spjd } 693204076Spjd /* NOTREACHED */ 694204076Spjd return (NULL); 695204076Spjd} 696204076Spjd 697204076Spjd/* 698204076Spjd * Thread sends requests back to primary node. 699204076Spjd */ 700204076Spjdstatic void * 701204076Spjdsend_thread(void *arg) 702204076Spjd{ 703204076Spjd struct hast_resource *res = arg; 704204076Spjd struct nv *nvout; 705204076Spjd struct hio *hio; 706204076Spjd void *data; 707204076Spjd size_t length; 708204076Spjd 709204076Spjd for (;;) { 710204076Spjd pjdlog_debug(2, "send: Taking request."); 711211877Spjd QUEUE_TAKE(send, hio); 712204076Spjd reqlog(LOG_DEBUG, 2, -1, hio, "send: (%p) Got request: ", hio); 713204076Spjd nvout = nv_alloc(); 714204076Spjd /* Copy sequence number. */ 715204076Spjd nv_add_uint64(nvout, nv_get_uint64(hio->hio_nv, "seq"), "seq"); 716204076Spjd switch (hio->hio_cmd) { 717204076Spjd case HIO_READ: 718204076Spjd if (hio->hio_error == 0) { 719204076Spjd data = hio->hio_data; 720204076Spjd length = hio->hio_length; 721204076Spjd break; 722204076Spjd } 723204076Spjd /* 724204076Spjd * We send no data in case of an error. 725204076Spjd */ 726204076Spjd /* FALLTHROUGH */ 727204076Spjd case HIO_DELETE: 728204076Spjd case HIO_FLUSH: 729204076Spjd case HIO_WRITE: 730204076Spjd data = NULL; 731204076Spjd length = 0; 732204076Spjd break; 733204076Spjd default: 734204076Spjd abort(); 735204076Spjd break; 736204076Spjd } 737204076Spjd if (hio->hio_error != 0) 738204076Spjd nv_add_int16(nvout, hio->hio_error, "error"); 739204076Spjd if (hast_proto_send(res, res->hr_remoteout, nvout, data, 740204076Spjd length) < 0) { 741211984Spjd secondary_exit(EX_TEMPFAIL, "Unable to send reply."); 742204076Spjd } 743204076Spjd nv_free(nvout); 744209185Spjd pjdlog_debug(2, "send: (%p) Moving request to the free queue.", 745204076Spjd hio); 746204076Spjd nv_free(hio->hio_nv); 747204076Spjd hio->hio_error = 0; 748211877Spjd QUEUE_INSERT(free, hio); 749204076Spjd } 750204076Spjd /* NOTREACHED */ 751204076Spjd return (NULL); 752204076Spjd} 753