The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/geom/journal/g_journal.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*-
    2  * Copyright (c) 2005-2006 Pawel Jakub Dawidek <pjd@FreeBSD.org>
    3  * All rights reserved.
    4  *
    5  * Redistribution and use in source and binary forms, with or without
    6  * modification, are permitted provided that the following conditions
    7  * are met:
    8  * 1. Redistributions of source code must retain the above copyright
    9  *    notice, this list of conditions and the following disclaimer.
   10  * 2. Redistributions in binary form must reproduce the above copyright
   11  *    notice, this list of conditions and the following disclaimer in the
   12  *    documentation and/or other materials provided with the distribution.
   13  *
   14  * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND
   15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE
   18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   24  * SUCH DAMAGE.
   25  */
   26 
   27 #include <sys/cdefs.h>
   28 __FBSDID("$FreeBSD: releng/11.0/sys/geom/journal/g_journal.c 300288 2016-05-20 08:25:37Z kib $");
   29 
   30 #include <sys/param.h>
   31 #include <sys/systm.h>
   32 #include <sys/kernel.h>
   33 #include <sys/module.h>
   34 #include <sys/limits.h>
   35 #include <sys/lock.h>
   36 #include <sys/mutex.h>
   37 #include <sys/bio.h>
   38 #include <sys/sysctl.h>
   39 #include <sys/malloc.h>
   40 #include <sys/mount.h>
   41 #include <sys/eventhandler.h>
   42 #include <sys/proc.h>
   43 #include <sys/kthread.h>
   44 #include <sys/sched.h>
   45 #include <sys/taskqueue.h>
   46 #include <sys/vnode.h>
   47 #include <sys/sbuf.h>
   48 #ifdef GJ_MEMDEBUG
   49 #include <sys/stack.h>
   50 #include <sys/kdb.h>
   51 #endif
   52 #include <vm/vm.h>
   53 #include <vm/vm_kern.h>
   54 #include <geom/geom.h>
   55 
   56 #include <geom/journal/g_journal.h>
   57 
   58 FEATURE(geom_journal, "GEOM journaling support");
   59 
   60 /*
   61  * On-disk journal format:
   62  *
   63  * JH - Journal header
   64  * RH - Record header
   65  *
   66  * %%%%%% ****** +------+ +------+     ****** +------+     %%%%%%
   67  * % JH % * RH * | Data | | Data | ... * RH * | Data | ... % JH % ...
   68  * %%%%%% ****** +------+ +------+     ****** +------+     %%%%%%
   69  *
   70  */
   71 
   72 CTASSERT(sizeof(struct g_journal_header) <= 512);
   73 CTASSERT(sizeof(struct g_journal_record_header) <= 512);
   74 
   75 static MALLOC_DEFINE(M_JOURNAL, "journal_data", "GEOM_JOURNAL Data");
   76 static struct mtx g_journal_cache_mtx;
   77 MTX_SYSINIT(g_journal_cache, &g_journal_cache_mtx, "cache usage", MTX_DEF);
   78 
   79 const struct g_journal_desc *g_journal_filesystems[] = {
   80         &g_journal_ufs,
   81         NULL
   82 };
   83 
   84 SYSCTL_DECL(_kern_geom);
   85 
   86 int g_journal_debug = 0;
   87 static u_int g_journal_switch_time = 10;
   88 static u_int g_journal_force_switch = 70;
   89 static u_int g_journal_parallel_flushes = 16;
   90 static u_int g_journal_parallel_copies = 16;
   91 static u_int g_journal_accept_immediately = 64;
   92 static u_int g_journal_record_entries = GJ_RECORD_HEADER_NENTRIES;
   93 static u_int g_journal_do_optimize = 1;
   94 
   95 static SYSCTL_NODE(_kern_geom, OID_AUTO, journal, CTLFLAG_RW, 0,
   96     "GEOM_JOURNAL stuff");
   97 SYSCTL_INT(_kern_geom_journal, OID_AUTO, debug, CTLFLAG_RWTUN, &g_journal_debug, 0,
   98     "Debug level");
   99 SYSCTL_UINT(_kern_geom_journal, OID_AUTO, switch_time, CTLFLAG_RW,
  100     &g_journal_switch_time, 0, "Switch journals every N seconds");
  101 SYSCTL_UINT(_kern_geom_journal, OID_AUTO, force_switch, CTLFLAG_RW,
  102     &g_journal_force_switch, 0, "Force switch when journal is N% full");
  103 SYSCTL_UINT(_kern_geom_journal, OID_AUTO, parallel_flushes, CTLFLAG_RW,
  104     &g_journal_parallel_flushes, 0,
  105     "Number of flush I/O requests to send in parallel");
  106 SYSCTL_UINT(_kern_geom_journal, OID_AUTO, accept_immediately, CTLFLAG_RW,
  107     &g_journal_accept_immediately, 0,
  108     "Number of I/O requests accepted immediately");
  109 SYSCTL_UINT(_kern_geom_journal, OID_AUTO, parallel_copies, CTLFLAG_RW,
  110     &g_journal_parallel_copies, 0,
  111     "Number of copy I/O requests to send in parallel");
  112 static int
  113 g_journal_record_entries_sysctl(SYSCTL_HANDLER_ARGS)
  114 {
  115         u_int entries;
  116         int error;
  117 
  118         entries = g_journal_record_entries;
  119         error = sysctl_handle_int(oidp, &entries, 0, req);
  120         if (error != 0 || req->newptr == NULL)
  121                 return (error);
  122         if (entries < 1 || entries > GJ_RECORD_HEADER_NENTRIES)
  123                 return (EINVAL);
  124         g_journal_record_entries = entries;
  125         return (0);
  126 }
  127 SYSCTL_PROC(_kern_geom_journal, OID_AUTO, record_entries,
  128     CTLTYPE_UINT | CTLFLAG_RW, NULL, 0, g_journal_record_entries_sysctl, "I",
  129     "Maximum number of entires in one journal record");
  130 SYSCTL_UINT(_kern_geom_journal, OID_AUTO, optimize, CTLFLAG_RW,
  131     &g_journal_do_optimize, 0, "Try to combine bios on flush and copy");
  132 
  133 static u_int g_journal_cache_used = 0;
  134 static u_int g_journal_cache_limit = 64 * 1024 * 1024;
  135 static u_int g_journal_cache_divisor = 2;
  136 static u_int g_journal_cache_switch = 90;
  137 static u_int g_journal_cache_misses = 0;
  138 static u_int g_journal_cache_alloc_failures = 0;
  139 static u_int g_journal_cache_low = 0;
  140 
  141 static SYSCTL_NODE(_kern_geom_journal, OID_AUTO, cache, CTLFLAG_RW, 0,
  142     "GEOM_JOURNAL cache");
  143 SYSCTL_UINT(_kern_geom_journal_cache, OID_AUTO, used, CTLFLAG_RD,
  144     &g_journal_cache_used, 0, "Number of allocated bytes");
  145 static int
  146 g_journal_cache_limit_sysctl(SYSCTL_HANDLER_ARGS)
  147 {
  148         u_int limit;
  149         int error;
  150 
  151         limit = g_journal_cache_limit;
  152         error = sysctl_handle_int(oidp, &limit, 0, req);
  153         if (error != 0 || req->newptr == NULL)
  154                 return (error);
  155         g_journal_cache_limit = limit;
  156         g_journal_cache_low = (limit / 100) * g_journal_cache_switch;
  157         return (0);
  158 }
  159 SYSCTL_PROC(_kern_geom_journal_cache, OID_AUTO, limit,
  160     CTLTYPE_UINT | CTLFLAG_RWTUN, NULL, 0, g_journal_cache_limit_sysctl, "I",
  161     "Maximum number of allocated bytes");
  162 SYSCTL_UINT(_kern_geom_journal_cache, OID_AUTO, divisor, CTLFLAG_RDTUN,
  163     &g_journal_cache_divisor, 0,
  164     "(kmem_size / kern.geom.journal.cache.divisor) == cache size");
  165 static int
  166 g_journal_cache_switch_sysctl(SYSCTL_HANDLER_ARGS)
  167 {
  168         u_int cswitch;
  169         int error;
  170 
  171         cswitch = g_journal_cache_switch;
  172         error = sysctl_handle_int(oidp, &cswitch, 0, req);
  173         if (error != 0 || req->newptr == NULL)
  174                 return (error);
  175         if (cswitch > 100)
  176                 return (EINVAL);
  177         g_journal_cache_switch = cswitch;
  178         g_journal_cache_low = (g_journal_cache_limit / 100) * cswitch;
  179         return (0);
  180 }
  181 SYSCTL_PROC(_kern_geom_journal_cache, OID_AUTO, switch,
  182     CTLTYPE_UINT | CTLFLAG_RW, NULL, 0, g_journal_cache_switch_sysctl, "I",
  183     "Force switch when we hit this percent of cache use");
  184 SYSCTL_UINT(_kern_geom_journal_cache, OID_AUTO, misses, CTLFLAG_RW,
  185     &g_journal_cache_misses, 0, "Number of cache misses");
  186 SYSCTL_UINT(_kern_geom_journal_cache, OID_AUTO, alloc_failures, CTLFLAG_RW,
  187     &g_journal_cache_alloc_failures, 0, "Memory allocation failures");
  188 
  189 static u_long g_journal_stats_bytes_skipped = 0;
  190 static u_long g_journal_stats_combined_ios = 0;
  191 static u_long g_journal_stats_switches = 0;
  192 static u_long g_journal_stats_wait_for_copy = 0;
  193 static u_long g_journal_stats_journal_full = 0;
  194 static u_long g_journal_stats_low_mem = 0;
  195 
  196 static SYSCTL_NODE(_kern_geom_journal, OID_AUTO, stats, CTLFLAG_RW, 0,
  197     "GEOM_JOURNAL statistics");
  198 SYSCTL_ULONG(_kern_geom_journal_stats, OID_AUTO, skipped_bytes, CTLFLAG_RW,
  199     &g_journal_stats_bytes_skipped, 0, "Number of skipped bytes");
  200 SYSCTL_ULONG(_kern_geom_journal_stats, OID_AUTO, combined_ios, CTLFLAG_RW,
  201     &g_journal_stats_combined_ios, 0, "Number of combined I/O requests");
  202 SYSCTL_ULONG(_kern_geom_journal_stats, OID_AUTO, switches, CTLFLAG_RW,
  203     &g_journal_stats_switches, 0, "Number of journal switches");
  204 SYSCTL_ULONG(_kern_geom_journal_stats, OID_AUTO, wait_for_copy, CTLFLAG_RW,
  205     &g_journal_stats_wait_for_copy, 0, "Wait for journal copy on switch");
  206 SYSCTL_ULONG(_kern_geom_journal_stats, OID_AUTO, journal_full, CTLFLAG_RW,
  207     &g_journal_stats_journal_full, 0,
  208     "Number of times journal was almost full.");
  209 SYSCTL_ULONG(_kern_geom_journal_stats, OID_AUTO, low_mem, CTLFLAG_RW,
  210     &g_journal_stats_low_mem, 0, "Number of times low_mem hook was called.");
  211 
  212 static g_taste_t g_journal_taste;
  213 static g_ctl_req_t g_journal_config;
  214 static g_dumpconf_t g_journal_dumpconf;
  215 static g_init_t g_journal_init;
  216 static g_fini_t g_journal_fini;
  217 
  218 struct g_class g_journal_class = {
  219         .name = G_JOURNAL_CLASS_NAME,
  220         .version = G_VERSION,
  221         .taste = g_journal_taste,
  222         .ctlreq = g_journal_config,
  223         .dumpconf = g_journal_dumpconf,
  224         .init = g_journal_init,
  225         .fini = g_journal_fini
  226 };
  227 
  228 static int g_journal_destroy(struct g_journal_softc *sc);
  229 static void g_journal_metadata_update(struct g_journal_softc *sc);
  230 static void g_journal_switch_wait(struct g_journal_softc *sc);
  231 
  232 #define GJ_SWITCHER_WORKING     0
  233 #define GJ_SWITCHER_DIE         1
  234 #define GJ_SWITCHER_DIED        2
  235 static int g_journal_switcher_state = GJ_SWITCHER_WORKING;
  236 static int g_journal_switcher_wokenup = 0;
  237 static int g_journal_sync_requested = 0;
  238 
  239 #ifdef GJ_MEMDEBUG
  240 struct meminfo {
  241         size_t          mi_size;
  242         struct stack    mi_stack;
  243 };
  244 #endif
  245 
  246 /*
  247  * We use our own malloc/realloc/free funtions, so we can collect statistics
  248  * and force journal switch when we're running out of cache.
  249  */
  250 static void *
  251 gj_malloc(size_t size, int flags)
  252 {
  253         void *p;
  254 #ifdef GJ_MEMDEBUG
  255         struct meminfo *mi;
  256 #endif
  257 
  258         mtx_lock(&g_journal_cache_mtx);
  259         if (g_journal_cache_limit > 0 && !g_journal_switcher_wokenup &&
  260             g_journal_cache_used + size > g_journal_cache_low) {
  261                 GJ_DEBUG(1, "No cache, waking up the switcher.");
  262                 g_journal_switcher_wokenup = 1;
  263                 wakeup(&g_journal_switcher_state);
  264         }
  265         if ((flags & M_NOWAIT) && g_journal_cache_limit > 0 &&
  266             g_journal_cache_used + size > g_journal_cache_limit) {
  267                 mtx_unlock(&g_journal_cache_mtx);
  268                 g_journal_cache_alloc_failures++;
  269                 return (NULL);
  270         }
  271         g_journal_cache_used += size;
  272         mtx_unlock(&g_journal_cache_mtx);
  273         flags &= ~M_NOWAIT;
  274 #ifndef GJ_MEMDEBUG
  275         p = malloc(size, M_JOURNAL, flags | M_WAITOK);
  276 #else
  277         mi = malloc(sizeof(*mi) + size, M_JOURNAL, flags | M_WAITOK);
  278         p = (u_char *)mi + sizeof(*mi);
  279         mi->mi_size = size;
  280         stack_save(&mi->mi_stack);
  281 #endif
  282         return (p);
  283 }
  284 
  285 static void
  286 gj_free(void *p, size_t size)
  287 {
  288 #ifdef GJ_MEMDEBUG
  289         struct meminfo *mi;
  290 #endif
  291 
  292         KASSERT(p != NULL, ("p=NULL"));
  293         KASSERT(size > 0, ("size=0"));
  294         mtx_lock(&g_journal_cache_mtx);
  295         KASSERT(g_journal_cache_used >= size, ("Freeing too much?"));
  296         g_journal_cache_used -= size;
  297         mtx_unlock(&g_journal_cache_mtx);
  298 #ifdef GJ_MEMDEBUG
  299         mi = p = (void *)((u_char *)p - sizeof(*mi));
  300         if (mi->mi_size != size) {
  301                 printf("GJOURNAL: Size mismatch! %zu != %zu\n", size,
  302                     mi->mi_size);
  303                 printf("GJOURNAL: Alloc backtrace:\n");
  304                 stack_print(&mi->mi_stack);
  305                 printf("GJOURNAL: Free backtrace:\n");
  306                 kdb_backtrace();
  307         }
  308 #endif
  309         free(p, M_JOURNAL);
  310 }
  311 
  312 static void *
  313 gj_realloc(void *p, size_t size, size_t oldsize)
  314 {
  315         void *np;
  316 
  317 #ifndef GJ_MEMDEBUG
  318         mtx_lock(&g_journal_cache_mtx);
  319         g_journal_cache_used -= oldsize;
  320         g_journal_cache_used += size;
  321         mtx_unlock(&g_journal_cache_mtx);
  322         np = realloc(p, size, M_JOURNAL, M_WAITOK);
  323 #else
  324         np = gj_malloc(size, M_WAITOK);
  325         bcopy(p, np, MIN(oldsize, size));
  326         gj_free(p, oldsize);
  327 #endif
  328         return (np);
  329 }
  330 
  331 static void
  332 g_journal_check_overflow(struct g_journal_softc *sc)
  333 {
  334         off_t length, used;
  335 
  336         if ((sc->sc_active.jj_offset < sc->sc_inactive.jj_offset &&
  337              sc->sc_journal_offset >= sc->sc_inactive.jj_offset) ||
  338             (sc->sc_active.jj_offset > sc->sc_inactive.jj_offset &&
  339              sc->sc_journal_offset >= sc->sc_inactive.jj_offset &&
  340              sc->sc_journal_offset < sc->sc_active.jj_offset)) {
  341                 panic("Journal overflow "
  342                     "(id = %u joffset=%jd active=%jd inactive=%jd)",
  343                     (unsigned)sc->sc_id,
  344                     (intmax_t)sc->sc_journal_offset,
  345                     (intmax_t)sc->sc_active.jj_offset,
  346                     (intmax_t)sc->sc_inactive.jj_offset);
  347         }
  348         if (sc->sc_active.jj_offset < sc->sc_inactive.jj_offset) {
  349                 length = sc->sc_inactive.jj_offset - sc->sc_active.jj_offset;
  350                 used = sc->sc_journal_offset - sc->sc_active.jj_offset;
  351         } else {
  352                 length = sc->sc_jend - sc->sc_active.jj_offset;
  353                 length += sc->sc_inactive.jj_offset - sc->sc_jstart;
  354                 if (sc->sc_journal_offset >= sc->sc_active.jj_offset)
  355                         used = sc->sc_journal_offset - sc->sc_active.jj_offset;
  356                 else {
  357                         used = sc->sc_jend - sc->sc_active.jj_offset;
  358                         used += sc->sc_journal_offset - sc->sc_jstart;
  359                 }
  360         }
  361         /* Already woken up? */
  362         if (g_journal_switcher_wokenup)
  363                 return;
  364         /*
  365          * If the active journal takes more than g_journal_force_switch precent
  366          * of free journal space, we force journal switch.
  367          */
  368         KASSERT(length > 0,
  369             ("length=%jd used=%jd active=%jd inactive=%jd joffset=%jd",
  370             (intmax_t)length, (intmax_t)used,
  371             (intmax_t)sc->sc_active.jj_offset,
  372             (intmax_t)sc->sc_inactive.jj_offset,
  373             (intmax_t)sc->sc_journal_offset));
  374         if ((used * 100) / length > g_journal_force_switch) {
  375                 g_journal_stats_journal_full++;
  376                 GJ_DEBUG(1, "Journal %s %jd%% full, forcing journal switch.",
  377                     sc->sc_name, (used * 100) / length);
  378                 mtx_lock(&g_journal_cache_mtx);
  379                 g_journal_switcher_wokenup = 1;
  380                 wakeup(&g_journal_switcher_state);
  381                 mtx_unlock(&g_journal_cache_mtx);
  382         }
  383 }
  384 
  385 static void
  386 g_journal_orphan(struct g_consumer *cp)
  387 {
  388         struct g_journal_softc *sc;
  389         char name[256];
  390         int error;
  391 
  392         g_topology_assert();
  393         sc = cp->geom->softc;
  394         strlcpy(name, cp->provider->name, sizeof(name));
  395         GJ_DEBUG(0, "Lost provider %s.", name);
  396         if (sc == NULL)
  397                 return;
  398         error = g_journal_destroy(sc);
  399         if (error == 0)
  400                 GJ_DEBUG(0, "Journal %s destroyed.", name);
  401         else {
  402                 GJ_DEBUG(0, "Cannot destroy journal %s (error=%d). "
  403                     "Destroy it manually after last close.", sc->sc_name,
  404                     error);
  405         }
  406 }
  407 
  408 static int
  409 g_journal_access(struct g_provider *pp, int acr, int acw, int ace)
  410 {
  411         struct g_journal_softc *sc;
  412         int dcr, dcw, dce;
  413 
  414         g_topology_assert();
  415         GJ_DEBUG(2, "Access request for %s: r%dw%de%d.", pp->name,
  416             acr, acw, ace);
  417 
  418         dcr = pp->acr + acr;
  419         dcw = pp->acw + acw;
  420         dce = pp->ace + ace;
  421 
  422         sc = pp->geom->softc;
  423         if (sc == NULL || (sc->sc_flags & GJF_DEVICE_DESTROY)) {
  424                 if (acr <= 0 && acw <= 0 && ace <= 0)
  425                         return (0);
  426                 else
  427                         return (ENXIO);
  428         }
  429         if (pp->acw == 0 && dcw > 0) {
  430                 GJ_DEBUG(1, "Marking %s as dirty.", sc->sc_name);
  431                 sc->sc_flags &= ~GJF_DEVICE_CLEAN;
  432                 g_topology_unlock();
  433                 g_journal_metadata_update(sc);
  434                 g_topology_lock();
  435         } /* else if (pp->acw == 0 && dcw > 0 && JEMPTY(sc)) {
  436                 GJ_DEBUG(1, "Marking %s as clean.", sc->sc_name);
  437                 sc->sc_flags |= GJF_DEVICE_CLEAN;
  438                 g_topology_unlock();
  439                 g_journal_metadata_update(sc);
  440                 g_topology_lock();
  441         } */
  442         return (0);
  443 }
  444 
  445 static void
  446 g_journal_header_encode(struct g_journal_header *hdr, u_char *data)
  447 {
  448 
  449         bcopy(GJ_HEADER_MAGIC, data, sizeof(GJ_HEADER_MAGIC));
  450         data += sizeof(GJ_HEADER_MAGIC);
  451         le32enc(data, hdr->jh_journal_id);
  452         data += 4;
  453         le32enc(data, hdr->jh_journal_next_id);
  454 }
  455 
  456 static int
  457 g_journal_header_decode(const u_char *data, struct g_journal_header *hdr)
  458 {
  459 
  460         bcopy(data, hdr->jh_magic, sizeof(hdr->jh_magic));
  461         data += sizeof(hdr->jh_magic);
  462         if (bcmp(hdr->jh_magic, GJ_HEADER_MAGIC, sizeof(GJ_HEADER_MAGIC)) != 0)
  463                 return (EINVAL);
  464         hdr->jh_journal_id = le32dec(data);
  465         data += 4;
  466         hdr->jh_journal_next_id = le32dec(data);
  467         return (0);
  468 }
  469 
  470 static void
  471 g_journal_flush_cache(struct g_journal_softc *sc)
  472 {
  473         struct bintime bt;
  474         int error;
  475 
  476         if (sc->sc_bio_flush == 0)
  477                 return;
  478         GJ_TIMER_START(1, &bt);
  479         if (sc->sc_bio_flush & GJ_FLUSH_JOURNAL) {
  480                 error = g_io_flush(sc->sc_jconsumer);
  481                 GJ_DEBUG(error == 0 ? 2 : 0, "Flush cache of %s: error=%d.",
  482                     sc->sc_jconsumer->provider->name, error);
  483         }
  484         if (sc->sc_bio_flush & GJ_FLUSH_DATA) {
  485                 /*
  486                  * TODO: This could be called in parallel with the
  487                  *       previous call.
  488                  */
  489                 error = g_io_flush(sc->sc_dconsumer);
  490                 GJ_DEBUG(error == 0 ? 2 : 0, "Flush cache of %s: error=%d.",
  491                     sc->sc_dconsumer->provider->name, error);
  492         }
  493         GJ_TIMER_STOP(1, &bt, "Cache flush time");
  494 }
  495 
  496 static int
  497 g_journal_write_header(struct g_journal_softc *sc)
  498 {
  499         struct g_journal_header hdr;
  500         struct g_consumer *cp;
  501         u_char *buf;
  502         int error;
  503 
  504         cp = sc->sc_jconsumer;
  505         buf = gj_malloc(cp->provider->sectorsize, M_WAITOK);
  506 
  507         strlcpy(hdr.jh_magic, GJ_HEADER_MAGIC, sizeof(hdr.jh_magic));
  508         hdr.jh_journal_id = sc->sc_journal_id;
  509         hdr.jh_journal_next_id = sc->sc_journal_next_id;
  510         g_journal_header_encode(&hdr, buf);
  511         error = g_write_data(cp, sc->sc_journal_offset, buf,
  512             cp->provider->sectorsize);
  513         /* if (error == 0) */
  514         sc->sc_journal_offset += cp->provider->sectorsize;
  515 
  516         gj_free(buf, cp->provider->sectorsize);
  517         return (error);
  518 }
  519 
  520 /*
  521  * Every journal record has a header and data following it.
  522  * Functions below are used to decode the header before storing it to
  523  * little endian and to encode it after reading to system endianness.
  524  */
  525 static void
  526 g_journal_record_header_encode(struct g_journal_record_header *hdr,
  527     u_char *data)
  528 {
  529         struct g_journal_entry *ent;
  530         u_int i;
  531 
  532         bcopy(GJ_RECORD_HEADER_MAGIC, data, sizeof(GJ_RECORD_HEADER_MAGIC));
  533         data += sizeof(GJ_RECORD_HEADER_MAGIC);
  534         le32enc(data, hdr->jrh_journal_id);
  535         data += 8;
  536         le16enc(data, hdr->jrh_nentries);
  537         data += 2;
  538         bcopy(hdr->jrh_sum, data, sizeof(hdr->jrh_sum));
  539         data += 8;
  540         for (i = 0; i < hdr->jrh_nentries; i++) {
  541                 ent = &hdr->jrh_entries[i];
  542                 le64enc(data, ent->je_joffset);
  543                 data += 8;
  544                 le64enc(data, ent->je_offset);
  545                 data += 8;
  546                 le64enc(data, ent->je_length);
  547                 data += 8;
  548         }
  549 }
  550 
  551 static int
  552 g_journal_record_header_decode(const u_char *data,
  553     struct g_journal_record_header *hdr)
  554 {
  555         struct g_journal_entry *ent;
  556         u_int i;
  557 
  558         bcopy(data, hdr->jrh_magic, sizeof(hdr->jrh_magic));
  559         data += sizeof(hdr->jrh_magic);
  560         if (strcmp(hdr->jrh_magic, GJ_RECORD_HEADER_MAGIC) != 0)
  561                 return (EINVAL);
  562         hdr->jrh_journal_id = le32dec(data);
  563         data += 8;
  564         hdr->jrh_nentries = le16dec(data);
  565         data += 2;
  566         if (hdr->jrh_nentries > GJ_RECORD_HEADER_NENTRIES)
  567                 return (EINVAL);
  568         bcopy(data, hdr->jrh_sum, sizeof(hdr->jrh_sum));
  569         data += 8;
  570         for (i = 0; i < hdr->jrh_nentries; i++) {
  571                 ent = &hdr->jrh_entries[i];
  572                 ent->je_joffset = le64dec(data);
  573                 data += 8;
  574                 ent->je_offset = le64dec(data);
  575                 data += 8;
  576                 ent->je_length = le64dec(data);
  577                 data += 8;
  578         }
  579         return (0);
  580 }
  581 
  582 /*
  583  * Function reads metadata from a provider (via the given consumer), decodes
  584  * it to system endianness and verifies its correctness.
  585  */
  586 static int
  587 g_journal_metadata_read(struct g_consumer *cp, struct g_journal_metadata *md)
  588 {
  589         struct g_provider *pp;
  590         u_char *buf;
  591         int error;
  592 
  593         g_topology_assert();
  594 
  595         error = g_access(cp, 1, 0, 0);
  596         if (error != 0)
  597                 return (error);
  598         pp = cp->provider;
  599         g_topology_unlock();
  600         /* Metadata is stored in last sector. */
  601         buf = g_read_data(cp, pp->mediasize - pp->sectorsize, pp->sectorsize,
  602             &error);
  603         g_topology_lock();
  604         g_access(cp, -1, 0, 0);
  605         if (buf == NULL) {
  606                 GJ_DEBUG(1, "Cannot read metadata from %s (error=%d).",
  607                     cp->provider->name, error);
  608                 return (error);
  609         }
  610 
  611         /* Decode metadata. */
  612         error = journal_metadata_decode(buf, md);
  613         g_free(buf);
  614         /* Is this is gjournal provider at all? */
  615         if (strcmp(md->md_magic, G_JOURNAL_MAGIC) != 0)
  616                 return (EINVAL);
  617         /*
  618          * Are we able to handle this version of metadata?
  619          * We only maintain backward compatibility.
  620          */
  621         if (md->md_version > G_JOURNAL_VERSION) {
  622                 GJ_DEBUG(0,
  623                     "Kernel module is too old to handle metadata from %s.",
  624                     cp->provider->name);
  625                 return (EINVAL);
  626         }
  627         /* Is checksum correct? */
  628         if (error != 0) {
  629                 GJ_DEBUG(0, "MD5 metadata hash mismatch for provider %s.",
  630                     cp->provider->name);
  631                 return (error);
  632         }
  633         return (0);
  634 }
  635 
  636 /*
  637  * Two functions below are responsible for updating metadata.
  638  * Only metadata on the data provider is updated (we need to update
  639  * information about active journal in there).
  640  */
  641 static void
  642 g_journal_metadata_done(struct bio *bp)
  643 {
  644 
  645         /*
  646          * There is not much we can do on error except informing about it.
  647          */
  648         if (bp->bio_error != 0) {
  649                 GJ_LOGREQ(0, bp, "Cannot update metadata (error=%d).",
  650                     bp->bio_error);
  651         } else {
  652                 GJ_LOGREQ(2, bp, "Metadata updated.");
  653         }
  654         gj_free(bp->bio_data, bp->bio_length);
  655         g_destroy_bio(bp);
  656 }
  657 
  658 static void
  659 g_journal_metadata_update(struct g_journal_softc *sc)
  660 {
  661         struct g_journal_metadata md;
  662         struct g_consumer *cp;
  663         struct bio *bp;
  664         u_char *sector;
  665 
  666         cp = sc->sc_dconsumer;
  667         sector = gj_malloc(cp->provider->sectorsize, M_WAITOK);
  668         strlcpy(md.md_magic, G_JOURNAL_MAGIC, sizeof(md.md_magic));
  669         md.md_version = G_JOURNAL_VERSION;
  670         md.md_id = sc->sc_id;
  671         md.md_type = sc->sc_orig_type;
  672         md.md_jstart = sc->sc_jstart;
  673         md.md_jend = sc->sc_jend;
  674         md.md_joffset = sc->sc_inactive.jj_offset;
  675         md.md_jid = sc->sc_journal_previous_id;
  676         md.md_flags = 0;
  677         if (sc->sc_flags & GJF_DEVICE_CLEAN)
  678                 md.md_flags |= GJ_FLAG_CLEAN;
  679 
  680         if (sc->sc_flags & GJF_DEVICE_HARDCODED)
  681                 strlcpy(md.md_provider, sc->sc_name, sizeof(md.md_provider));
  682         else
  683                 bzero(md.md_provider, sizeof(md.md_provider));
  684         md.md_provsize = cp->provider->mediasize;
  685         journal_metadata_encode(&md, sector);
  686 
  687         /*
  688          * Flush the cache, so we know all data are on disk.
  689          * We write here informations like "journal is consistent", so we need
  690          * to be sure it is. Without BIO_FLUSH here, we can end up in situation
  691          * where metadata is stored on disk, but not all data.
  692          */
  693         g_journal_flush_cache(sc);
  694 
  695         bp = g_alloc_bio();
  696         bp->bio_offset = cp->provider->mediasize - cp->provider->sectorsize;
  697         bp->bio_length = cp->provider->sectorsize;
  698         bp->bio_data = sector;
  699         bp->bio_cmd = BIO_WRITE;
  700         if (!(sc->sc_flags & GJF_DEVICE_DESTROY)) {
  701                 bp->bio_done = g_journal_metadata_done;
  702                 g_io_request(bp, cp);
  703         } else {
  704                 bp->bio_done = NULL;
  705                 g_io_request(bp, cp);
  706                 biowait(bp, "gjmdu");
  707                 g_journal_metadata_done(bp);
  708         }
  709 
  710         /*
  711          * Be sure metadata reached the disk.
  712          */
  713         g_journal_flush_cache(sc);
  714 }
  715 
  716 /*
  717  * This is where the I/O request comes from the GEOM.
  718  */
  719 static void
  720 g_journal_start(struct bio *bp)
  721 {
  722         struct g_journal_softc *sc;
  723 
  724         sc = bp->bio_to->geom->softc;
  725         GJ_LOGREQ(3, bp, "Request received.");
  726 
  727         switch (bp->bio_cmd) {
  728         case BIO_READ:
  729         case BIO_WRITE:
  730                 mtx_lock(&sc->sc_mtx);
  731                 bioq_insert_tail(&sc->sc_regular_queue, bp);
  732                 wakeup(sc);
  733                 mtx_unlock(&sc->sc_mtx);
  734                 return;
  735         case BIO_GETATTR:
  736                 if (strcmp(bp->bio_attribute, "GJOURNAL::provider") == 0) {
  737                         strlcpy(bp->bio_data, bp->bio_to->name, bp->bio_length);
  738                         bp->bio_completed = strlen(bp->bio_to->name) + 1;
  739                         g_io_deliver(bp, 0);
  740                         return;
  741                 }
  742                 /* FALLTHROUGH */
  743         case BIO_DELETE:
  744         default:
  745                 g_io_deliver(bp, EOPNOTSUPP);
  746                 return;
  747         }
  748 }
  749 
  750 static void
  751 g_journal_std_done(struct bio *bp)
  752 {
  753         struct g_journal_softc *sc;
  754 
  755         sc = bp->bio_from->geom->softc;
  756         mtx_lock(&sc->sc_mtx);
  757         bioq_insert_tail(&sc->sc_back_queue, bp);
  758         wakeup(sc);
  759         mtx_unlock(&sc->sc_mtx);
  760 }
  761 
  762 static struct bio *
  763 g_journal_new_bio(off_t start, off_t end, off_t joffset, u_char *data,
  764     int flags)
  765 {
  766         struct bio *bp;
  767 
  768         bp = g_alloc_bio();
  769         bp->bio_offset = start;
  770         bp->bio_joffset = joffset;
  771         bp->bio_length = end - start;
  772         bp->bio_cmd = BIO_WRITE;
  773         bp->bio_done = g_journal_std_done;
  774         if (data == NULL)
  775                 bp->bio_data = NULL;
  776         else {
  777                 bp->bio_data = gj_malloc(bp->bio_length, flags);
  778                 if (bp->bio_data != NULL)
  779                         bcopy(data, bp->bio_data, bp->bio_length);
  780         }
  781         return (bp);
  782 }
  783 
  784 #define g_journal_insert_bio(head, bp, flags)                           \
  785         g_journal_insert((head), (bp)->bio_offset,                      \
  786                 (bp)->bio_offset + (bp)->bio_length, (bp)->bio_joffset, \
  787                 (bp)->bio_data, flags)
  788 /*
  789  * The function below does a lot more than just inserting bio to the queue.
  790  * It keeps the queue sorted by offset and ensures that there are no doubled
  791  * data (it combines bios where ranges overlap).
  792  *
  793  * The function returns the number of bios inserted (as bio can be splitted).
  794  */
  795 static int
  796 g_journal_insert(struct bio **head, off_t nstart, off_t nend, off_t joffset,
  797     u_char *data, int flags)
  798 {
  799         struct bio *nbp, *cbp, *pbp;
  800         off_t cstart, cend;
  801         u_char *tmpdata;
  802         int n;
  803 
  804         GJ_DEBUG(3, "INSERT(%p): (%jd, %jd, %jd)", *head, nstart, nend,
  805             joffset);
  806         n = 0;
  807         pbp = NULL;
  808         GJQ_FOREACH(*head, cbp) {
  809                 cstart = cbp->bio_offset;
  810                 cend = cbp->bio_offset + cbp->bio_length;
  811 
  812                 if (nstart >= cend) {
  813                         /*
  814                          *  +-------------+
  815                          *  |             |
  816                          *  |   current   |  +-------------+
  817                          *  |     bio     |  |             |
  818                          *  |             |  |     new     |
  819                          *  +-------------+  |     bio     |
  820                          *                   |             |
  821                          *                   +-------------+
  822                          */
  823                         GJ_DEBUG(3, "INSERT(%p): 1", *head);
  824                 } else if (nend <= cstart) {
  825                         /*
  826                          *                   +-------------+
  827                          *                   |             |
  828                          *  +-------------+  |   current   |
  829                          *  |             |  |     bio     |
  830                          *  |     new     |  |             |
  831                          *  |     bio     |  +-------------+
  832                          *  |             |
  833                          *  +-------------+
  834                          */
  835                         nbp = g_journal_new_bio(nstart, nend, joffset, data,
  836                             flags);
  837                         if (pbp == NULL)
  838                                 *head = nbp;
  839                         else
  840                                 pbp->bio_next = nbp;
  841                         nbp->bio_next = cbp;
  842                         n++;
  843                         GJ_DEBUG(3, "INSERT(%p): 2 (nbp=%p pbp=%p)", *head, nbp,
  844                             pbp);
  845                         goto end;
  846                 } else if (nstart <= cstart && nend >= cend) {
  847                         /*
  848                          *      +-------------+      +-------------+
  849                          *      | current bio |      | current bio |
  850                          *  +---+-------------+---+  +-------------+---+
  851                          *  |   |             |   |  |             |   |
  852                          *  |   |             |   |  |             |   |
  853                          *  |   +-------------+   |  +-------------+   |
  854                          *  |       new bio       |  |     new bio     |
  855                          *  +---------------------+  +-----------------+
  856                          *
  857                          *      +-------------+  +-------------+
  858                          *      | current bio |  | current bio |
  859                          *  +---+-------------+  +-------------+
  860                          *  |   |             |  |             |
  861                          *  |   |             |  |             |
  862                          *  |   +-------------+  +-------------+
  863                          *  |     new bio     |  |   new bio   |
  864                          *  +-----------------+  +-------------+
  865                          */
  866                         g_journal_stats_bytes_skipped += cbp->bio_length;
  867                         cbp->bio_offset = nstart;
  868                         cbp->bio_joffset = joffset;
  869                         cbp->bio_length = cend - nstart;
  870                         if (cbp->bio_data != NULL) {
  871                                 gj_free(cbp->bio_data, cend - cstart);
  872                                 cbp->bio_data = NULL;
  873                         }
  874                         if (data != NULL) {
  875                                 cbp->bio_data = gj_malloc(cbp->bio_length,
  876                                     flags);
  877                                 if (cbp->bio_data != NULL) {
  878                                         bcopy(data, cbp->bio_data,
  879                                             cbp->bio_length);
  880                                 }
  881                                 data += cend - nstart;
  882                         }
  883                         joffset += cend - nstart;
  884                         nstart = cend;
  885                         GJ_DEBUG(3, "INSERT(%p): 3 (cbp=%p)", *head, cbp);
  886                 } else if (nstart > cstart && nend >= cend) {
  887                         /*
  888                          *  +-----------------+  +-------------+
  889                          *  |   current bio   |  | current bio |
  890                          *  |   +-------------+  |   +---------+---+
  891                          *  |   |             |  |   |         |   |
  892                          *  |   |             |  |   |         |   |
  893                          *  +---+-------------+  +---+---------+   |
  894                          *      |   new bio   |      |   new bio   |
  895                          *      +-------------+      +-------------+
  896                          */
  897                         g_journal_stats_bytes_skipped += cend - nstart;
  898                         nbp = g_journal_new_bio(nstart, cend, joffset, data,
  899                             flags);
  900                         nbp->bio_next = cbp->bio_next;
  901                         cbp->bio_next = nbp;
  902                         cbp->bio_length = nstart - cstart;
  903                         if (cbp->bio_data != NULL) {
  904                                 cbp->bio_data = gj_realloc(cbp->bio_data,
  905                                     cbp->bio_length, cend - cstart);
  906                         }
  907                         if (data != NULL)
  908                                 data += cend - nstart;
  909                         joffset += cend - nstart;
  910                         nstart = cend;
  911                         n++;
  912                         GJ_DEBUG(3, "INSERT(%p): 4 (cbp=%p)", *head, cbp);
  913                 } else if (nstart > cstart && nend < cend) {
  914                         /*
  915                          *  +---------------------+
  916                          *  |     current bio     |
  917                          *  |   +-------------+   |
  918                          *  |   |             |   |
  919                          *  |   |             |   |
  920                          *  +---+-------------+---+
  921                          *      |   new bio   |
  922                          *      +-------------+
  923                          */
  924                         g_journal_stats_bytes_skipped += nend - nstart;
  925                         nbp = g_journal_new_bio(nstart, nend, joffset, data,
  926                             flags);
  927                         nbp->bio_next = cbp->bio_next;
  928                         cbp->bio_next = nbp;
  929                         if (cbp->bio_data == NULL)
  930                                 tmpdata = NULL;
  931                         else
  932                                 tmpdata = cbp->bio_data + nend - cstart;
  933                         nbp = g_journal_new_bio(nend, cend,
  934                             cbp->bio_joffset + nend - cstart, tmpdata, flags);
  935                         nbp->bio_next = ((struct bio *)cbp->bio_next)->bio_next;
  936                         ((struct bio *)cbp->bio_next)->bio_next = nbp;
  937                         cbp->bio_length = nstart - cstart;
  938                         if (cbp->bio_data != NULL) {
  939                                 cbp->bio_data = gj_realloc(cbp->bio_data,
  940                                     cbp->bio_length, cend - cstart);
  941                         }
  942                         n += 2;
  943                         GJ_DEBUG(3, "INSERT(%p): 5 (cbp=%p)", *head, cbp);
  944                         goto end;
  945                 } else if (nstart <= cstart && nend < cend) {
  946                         /*
  947                          *  +-----------------+      +-------------+
  948                          *  |   current bio   |      | current bio |
  949                          *  +-------------+   |  +---+---------+   |
  950                          *  |             |   |  |   |         |   |
  951                          *  |             |   |  |   |         |   |
  952                          *  +-------------+---+  |   +---------+---+
  953                          *  |   new bio   |      |   new bio   |
  954                          *  +-------------+      +-------------+
  955                          */
  956                         g_journal_stats_bytes_skipped += nend - nstart;
  957                         nbp = g_journal_new_bio(nstart, nend, joffset, data,
  958                             flags);
  959                         if (pbp == NULL)
  960                                 *head = nbp;
  961                         else
  962                                 pbp->bio_next = nbp;
  963                         nbp->bio_next = cbp;
  964                         cbp->bio_offset = nend;
  965                         cbp->bio_length = cend - nend;
  966                         cbp->bio_joffset += nend - cstart;
  967                         tmpdata = cbp->bio_data;
  968                         if (tmpdata != NULL) {
  969                                 cbp->bio_data = gj_malloc(cbp->bio_length,
  970                                     flags);
  971                                 if (cbp->bio_data != NULL) {
  972                                         bcopy(tmpdata + nend - cstart,
  973                                             cbp->bio_data, cbp->bio_length);
  974                                 }
  975                                 gj_free(tmpdata, cend - cstart);
  976                         }
  977                         n++;
  978                         GJ_DEBUG(3, "INSERT(%p): 6 (cbp=%p)", *head, cbp);
  979                         goto end;
  980                 }
  981                 if (nstart == nend)
  982                         goto end;
  983                 pbp = cbp;
  984         }
  985         nbp = g_journal_new_bio(nstart, nend, joffset, data, flags);
  986         if (pbp == NULL)
  987                 *head = nbp;
  988         else
  989                 pbp->bio_next = nbp;
  990         nbp->bio_next = NULL;
  991         n++;
  992         GJ_DEBUG(3, "INSERT(%p): 8 (nbp=%p pbp=%p)", *head, nbp, pbp);
  993 end:
  994         if (g_journal_debug >= 3) {
  995                 GJQ_FOREACH(*head, cbp) {
  996                         GJ_DEBUG(3, "ELEMENT: %p (%jd, %jd, %jd, %p)", cbp,
  997                             (intmax_t)cbp->bio_offset,
  998                             (intmax_t)cbp->bio_length,
  999                             (intmax_t)cbp->bio_joffset, cbp->bio_data);
 1000                 }
 1001                 GJ_DEBUG(3, "INSERT(%p): DONE %d", *head, n);
 1002         }
 1003         return (n);
 1004 }
 1005 
 1006 /*
 1007  * The function combines neighbour bios trying to squeeze as much data as
 1008  * possible into one bio.
 1009  *
 1010  * The function returns the number of bios combined (negative value).
 1011  */
 1012 static int
 1013 g_journal_optimize(struct bio *head)
 1014 {
 1015         struct bio *cbp, *pbp;
 1016         int n;
 1017 
 1018         n = 0;
 1019         pbp = NULL;
 1020         GJQ_FOREACH(head, cbp) {
 1021                 /* Skip bios which has to be read first. */
 1022                 if (cbp->bio_data == NULL) {
 1023                         pbp = NULL;
 1024                         continue;
 1025                 }
 1026                 /* There is no previous bio yet. */
 1027                 if (pbp == NULL) {
 1028                         pbp = cbp;
 1029                         continue;
 1030                 }
 1031                 /* Is this a neighbour bio? */
 1032                 if (pbp->bio_offset + pbp->bio_length != cbp->bio_offset) {
 1033                         /* Be sure that bios queue is sorted. */
 1034                         KASSERT(pbp->bio_offset + pbp->bio_length < cbp->bio_offset,
 1035                             ("poffset=%jd plength=%jd coffset=%jd",
 1036                             (intmax_t)pbp->bio_offset,
 1037                             (intmax_t)pbp->bio_length,
 1038                             (intmax_t)cbp->bio_offset));
 1039                         pbp = cbp;
 1040                         continue;
 1041                 }
 1042                 /* Be sure we don't end up with too big bio. */
 1043                 if (pbp->bio_length + cbp->bio_length > MAXPHYS) {
 1044                         pbp = cbp;
 1045                         continue;
 1046                 }
 1047                 /* Ok, we can join bios. */
 1048                 GJ_LOGREQ(4, pbp, "Join: ");
 1049                 GJ_LOGREQ(4, cbp, "and: ");
 1050                 pbp->bio_data = gj_realloc(pbp->bio_data,
 1051                     pbp->bio_length + cbp->bio_length, pbp->bio_length);
 1052                 bcopy(cbp->bio_data, pbp->bio_data + pbp->bio_length,
 1053                     cbp->bio_length);
 1054                 gj_free(cbp->bio_data, cbp->bio_length);
 1055                 pbp->bio_length += cbp->bio_length;
 1056                 pbp->bio_next = cbp->bio_next;
 1057                 g_destroy_bio(cbp);
 1058                 cbp = pbp;
 1059                 g_journal_stats_combined_ios++;
 1060                 n--;
 1061                 GJ_LOGREQ(4, pbp, "Got: ");
 1062         }
 1063         return (n);
 1064 }
 1065 
 1066 /*
 1067  * TODO: Update comment.
 1068  * These are functions responsible for copying one portion of data from journal
 1069  * to the destination provider.
 1070  * The order goes like this:
 1071  * 1. Read the header, which contains informations about data blocks
 1072  *    following it.
 1073  * 2. Read the data blocks from the journal.
 1074  * 3. Write the data blocks on the data provider.
 1075  *
 1076  * g_journal_copy_start()
 1077  * g_journal_copy_done() - got finished write request, logs potential errors.
 1078  */
 1079 
 1080 /*
 1081  * When there is no data in cache, this function is used to read it.
 1082  */
 1083 static void
 1084 g_journal_read_first(struct g_journal_softc *sc, struct bio *bp)
 1085 {
 1086         struct bio *cbp;
 1087 
 1088         /*
 1089          * We were short in memory, so data was freed.
 1090          * In that case we need to read it back from journal.
 1091          */
 1092         cbp = g_alloc_bio();
 1093         cbp->bio_cflags = bp->bio_cflags;
 1094         cbp->bio_parent = bp;
 1095         cbp->bio_offset = bp->bio_joffset;
 1096         cbp->bio_length = bp->bio_length;
 1097         cbp->bio_data = gj_malloc(bp->bio_length, M_WAITOK);
 1098         cbp->bio_cmd = BIO_READ;
 1099         cbp->bio_done = g_journal_std_done;
 1100         GJ_LOGREQ(4, cbp, "READ FIRST");
 1101         g_io_request(cbp, sc->sc_jconsumer);
 1102         g_journal_cache_misses++;
 1103 }
 1104 
 1105 static void
 1106 g_journal_copy_send(struct g_journal_softc *sc)
 1107 {
 1108         struct bio *bioq, *bp, *lbp;
 1109 
 1110         bioq = lbp = NULL;
 1111         mtx_lock(&sc->sc_mtx);
 1112         for (; sc->sc_copy_in_progress < g_journal_parallel_copies;) {
 1113                 bp = GJQ_FIRST(sc->sc_inactive.jj_queue);
 1114                 if (bp == NULL)
 1115                         break;
 1116                 GJQ_REMOVE(sc->sc_inactive.jj_queue, bp);
 1117                 sc->sc_copy_in_progress++;
 1118                 GJQ_INSERT_AFTER(bioq, bp, lbp);
 1119                 lbp = bp;
 1120         }
 1121         mtx_unlock(&sc->sc_mtx);
 1122         if (g_journal_do_optimize)
 1123                 sc->sc_copy_in_progress += g_journal_optimize(bioq);
 1124         while ((bp = GJQ_FIRST(bioq)) != NULL) {
 1125                 GJQ_REMOVE(bioq, bp);
 1126                 GJQ_INSERT_HEAD(sc->sc_copy_queue, bp);
 1127                 bp->bio_cflags = GJ_BIO_COPY;
 1128                 if (bp->bio_data == NULL)
 1129                         g_journal_read_first(sc, bp);
 1130                 else {
 1131                         bp->bio_joffset = 0;
 1132                         GJ_LOGREQ(4, bp, "SEND");
 1133                         g_io_request(bp, sc->sc_dconsumer);
 1134                 }
 1135         }
 1136 }
 1137 
 1138 static void
 1139 g_journal_copy_start(struct g_journal_softc *sc)
 1140 {
 1141 
 1142         /*
 1143          * Remember in metadata that we're starting to copy journaled data
 1144          * to the data provider.
 1145          * In case of power failure, we will copy these data once again on boot.
 1146          */
 1147         if (!sc->sc_journal_copying) {
 1148                 sc->sc_journal_copying = 1;
 1149                 GJ_DEBUG(1, "Starting copy of journal.");
 1150                 g_journal_metadata_update(sc);
 1151         }
 1152         g_journal_copy_send(sc);
 1153 }
 1154 
 1155 /*
 1156  * Data block has been read from the journal provider.
 1157  */
 1158 static int
 1159 g_journal_copy_read_done(struct bio *bp)
 1160 {
 1161         struct g_journal_softc *sc;
 1162         struct g_consumer *cp;
 1163         struct bio *pbp;
 1164 
 1165         KASSERT(bp->bio_cflags == GJ_BIO_COPY,
 1166             ("Invalid bio (%d != %d).", bp->bio_cflags, GJ_BIO_COPY));
 1167 
 1168         sc = bp->bio_from->geom->softc;
 1169         pbp = bp->bio_parent;
 1170 
 1171         if (bp->bio_error != 0) {
 1172                 GJ_DEBUG(0, "Error while reading data from %s (error=%d).",
 1173                     bp->bio_to->name, bp->bio_error);
 1174                 /*
 1175                  * We will not be able to deliver WRITE request as well.
 1176                  */
 1177                 gj_free(bp->bio_data, bp->bio_length);
 1178                 g_destroy_bio(pbp);
 1179                 g_destroy_bio(bp);
 1180                 sc->sc_copy_in_progress--;
 1181                 return (1);
 1182         }
 1183         pbp->bio_data = bp->bio_data;
 1184         cp = sc->sc_dconsumer;
 1185         g_io_request(pbp, cp);
 1186         GJ_LOGREQ(4, bp, "READ DONE");
 1187         g_destroy_bio(bp);
 1188         return (0);
 1189 }
 1190 
 1191 /*
 1192  * Data block has been written to the data provider.
 1193  */
 1194 static void
 1195 g_journal_copy_write_done(struct bio *bp)
 1196 {
 1197         struct g_journal_softc *sc;
 1198 
 1199         KASSERT(bp->bio_cflags == GJ_BIO_COPY,
 1200             ("Invalid bio (%d != %d).", bp->bio_cflags, GJ_BIO_COPY));
 1201 
 1202         sc = bp->bio_from->geom->softc;
 1203         sc->sc_copy_in_progress--;
 1204 
 1205         if (bp->bio_error != 0) {
 1206                 GJ_LOGREQ(0, bp, "[copy] Error while writing data (error=%d)",
 1207                     bp->bio_error);
 1208         }
 1209         GJQ_REMOVE(sc->sc_copy_queue, bp);
 1210         gj_free(bp->bio_data, bp->bio_length);
 1211         GJ_LOGREQ(4, bp, "DONE");
 1212         g_destroy_bio(bp);
 1213 
 1214         if (sc->sc_copy_in_progress == 0) {
 1215                 /*
 1216                  * This was the last write request for this journal.
 1217                  */
 1218                 GJ_DEBUG(1, "Data has been copied.");
 1219                 sc->sc_journal_copying = 0;
 1220         }
 1221 }
 1222 
 1223 static void g_journal_flush_done(struct bio *bp);
 1224 
 1225 /*
 1226  * Flush one record onto active journal provider.
 1227  */
 1228 static void
 1229 g_journal_flush(struct g_journal_softc *sc)
 1230 {
 1231         struct g_journal_record_header hdr;
 1232         struct g_journal_entry *ent;
 1233         struct g_provider *pp;
 1234         struct bio **bioq;
 1235         struct bio *bp, *fbp, *pbp;
 1236         off_t joffset, size;
 1237         u_char *data, hash[16];
 1238         MD5_CTX ctx;
 1239         u_int i;
 1240 
 1241         if (sc->sc_current_count == 0)
 1242                 return;
 1243 
 1244         size = 0;
 1245         pp = sc->sc_jprovider;
 1246         GJ_VALIDATE_OFFSET(sc->sc_journal_offset, sc);
 1247         joffset = sc->sc_journal_offset;
 1248 
 1249         GJ_DEBUG(2, "Storing %d journal entries on %s at %jd.",
 1250             sc->sc_current_count, pp->name, (intmax_t)joffset);
 1251 
 1252         /*
 1253          * Store 'journal id', so we know to which journal this record belongs.
 1254          */
 1255         hdr.jrh_journal_id = sc->sc_journal_id;
 1256         /* Could be less than g_journal_record_entries if called due timeout. */
 1257         hdr.jrh_nentries = MIN(sc->sc_current_count, g_journal_record_entries);
 1258         strlcpy(hdr.jrh_magic, GJ_RECORD_HEADER_MAGIC, sizeof(hdr.jrh_magic));
 1259 
 1260         bioq = &sc->sc_active.jj_queue;
 1261         pbp = sc->sc_flush_queue;
 1262 
 1263         fbp = g_alloc_bio();
 1264         fbp->bio_parent = NULL;
 1265         fbp->bio_cflags = GJ_BIO_JOURNAL;
 1266         fbp->bio_offset = -1;
 1267         fbp->bio_joffset = joffset;
 1268         fbp->bio_length = pp->sectorsize;
 1269         fbp->bio_cmd = BIO_WRITE;
 1270         fbp->bio_done = g_journal_std_done;
 1271         GJQ_INSERT_AFTER(sc->sc_flush_queue, fbp, pbp);
 1272         pbp = fbp;
 1273         fbp->bio_to = pp;
 1274         GJ_LOGREQ(4, fbp, "FLUSH_OUT");
 1275         joffset += pp->sectorsize;
 1276         sc->sc_flush_count++;
 1277         if (sc->sc_flags & GJF_DEVICE_CHECKSUM)
 1278                 MD5Init(&ctx);
 1279 
 1280         for (i = 0; i < hdr.jrh_nentries; i++) {
 1281                 bp = sc->sc_current_queue;
 1282                 KASSERT(bp != NULL, ("NULL bp"));
 1283                 bp->bio_to = pp;
 1284                 GJ_LOGREQ(4, bp, "FLUSHED");
 1285                 sc->sc_current_queue = bp->bio_next;
 1286                 bp->bio_next = NULL;
 1287                 sc->sc_current_count--;
 1288 
 1289                 /* Add to the header. */
 1290                 ent = &hdr.jrh_entries[i];
 1291                 ent->je_offset = bp->bio_offset;
 1292                 ent->je_joffset = joffset;
 1293                 ent->je_length = bp->bio_length;
 1294                 size += ent->je_length;
 1295 
 1296                 data = bp->bio_data;
 1297                 if (sc->sc_flags & GJF_DEVICE_CHECKSUM)
 1298                         MD5Update(&ctx, data, ent->je_length);
 1299                 g_reset_bio(bp);
 1300                 bp->bio_cflags = GJ_BIO_JOURNAL;
 1301                 bp->bio_offset = ent->je_offset;
 1302                 bp->bio_joffset = ent->je_joffset;
 1303                 bp->bio_length = ent->je_length;
 1304                 bp->bio_data = data;
 1305                 bp->bio_cmd = BIO_WRITE;
 1306                 bp->bio_done = g_journal_std_done;
 1307                 GJQ_INSERT_AFTER(sc->sc_flush_queue, bp, pbp);
 1308                 pbp = bp;
 1309                 bp->bio_to = pp;
 1310                 GJ_LOGREQ(4, bp, "FLUSH_OUT");
 1311                 joffset += bp->bio_length;
 1312                 sc->sc_flush_count++;
 1313 
 1314                 /*
 1315                  * Add request to the active sc_journal_queue queue.
 1316                  * This is our cache. After journal switch we don't have to
 1317                  * read the data from the inactive journal, because we keep
 1318                  * it in memory.
 1319                  */
 1320                 g_journal_insert(bioq, ent->je_offset,
 1321                     ent->je_offset + ent->je_length, ent->je_joffset, data,
 1322                     M_NOWAIT);
 1323         }
 1324 
 1325         /*
 1326          * After all requests, store valid header.
 1327          */
 1328         data = gj_malloc(pp->sectorsize, M_WAITOK);
 1329         if (sc->sc_flags & GJF_DEVICE_CHECKSUM) {
 1330                 MD5Final(hash, &ctx);
 1331                 bcopy(hash, hdr.jrh_sum, sizeof(hdr.jrh_sum));
 1332         }
 1333         g_journal_record_header_encode(&hdr, data);
 1334         fbp->bio_data = data;
 1335 
 1336         sc->sc_journal_offset = joffset;
 1337 
 1338         g_journal_check_overflow(sc);
 1339 }
 1340 
 1341 /*
 1342  * Flush request finished.
 1343  */
 1344 static void
 1345 g_journal_flush_done(struct bio *bp)
 1346 {
 1347         struct g_journal_softc *sc;
 1348         struct g_consumer *cp;
 1349 
 1350         KASSERT((bp->bio_cflags & GJ_BIO_MASK) == GJ_BIO_JOURNAL,
 1351             ("Invalid bio (%d != %d).", bp->bio_cflags, GJ_BIO_JOURNAL));
 1352 
 1353         cp = bp->bio_from;
 1354         sc = cp->geom->softc;
 1355         sc->sc_flush_in_progress--;
 1356 
 1357         if (bp->bio_error != 0) {
 1358                 GJ_LOGREQ(0, bp, "[flush] Error while writing data (error=%d)",
 1359                     bp->bio_error);
 1360         }
 1361         gj_free(bp->bio_data, bp->bio_length);
 1362         GJ_LOGREQ(4, bp, "DONE");
 1363         g_destroy_bio(bp);
 1364 }
 1365 
 1366 static void g_journal_release_delayed(struct g_journal_softc *sc);
 1367 
 1368 static void
 1369 g_journal_flush_send(struct g_journal_softc *sc)
 1370 {
 1371         struct g_consumer *cp;
 1372         struct bio *bioq, *bp, *lbp;
 1373 
 1374         cp = sc->sc_jconsumer;
 1375         bioq = lbp = NULL;
 1376         while (sc->sc_flush_in_progress < g_journal_parallel_flushes) {
 1377                 /* Send one flush requests to the active journal. */
 1378                 bp = GJQ_FIRST(sc->sc_flush_queue);
 1379                 if (bp != NULL) {
 1380                         GJQ_REMOVE(sc->sc_flush_queue, bp);
 1381                         sc->sc_flush_count--;
 1382                         bp->bio_offset = bp->bio_joffset;
 1383                         bp->bio_joffset = 0;
 1384                         sc->sc_flush_in_progress++;
 1385                         GJQ_INSERT_AFTER(bioq, bp, lbp);
 1386                         lbp = bp;
 1387                 }
 1388                 /* Try to release delayed requests. */
 1389                 g_journal_release_delayed(sc);
 1390                 /* If there are no requests to flush, leave. */
 1391                 if (GJQ_FIRST(sc->sc_flush_queue) == NULL)
 1392                         break;
 1393         }
 1394         if (g_journal_do_optimize)
 1395                 sc->sc_flush_in_progress += g_journal_optimize(bioq);
 1396         while ((bp = GJQ_FIRST(bioq)) != NULL) {
 1397                 GJQ_REMOVE(bioq, bp);
 1398                 GJ_LOGREQ(3, bp, "Flush request send");
 1399                 g_io_request(bp, cp);
 1400         }
 1401 }
 1402 
 1403 static void
 1404 g_journal_add_current(struct g_journal_softc *sc, struct bio *bp)
 1405 {
 1406         int n;
 1407 
 1408         GJ_LOGREQ(4, bp, "CURRENT %d", sc->sc_current_count);
 1409         n = g_journal_insert_bio(&sc->sc_current_queue, bp, M_WAITOK);
 1410         sc->sc_current_count += n;
 1411         n = g_journal_optimize(sc->sc_current_queue);
 1412         sc->sc_current_count += n;
 1413         /*
 1414          * For requests which are added to the current queue we deliver
 1415          * response immediately.
 1416          */
 1417         bp->bio_completed = bp->bio_length;
 1418         g_io_deliver(bp, 0);
 1419         if (sc->sc_current_count >= g_journal_record_entries) {
 1420                 /*
 1421                  * Let's flush one record onto active journal provider.
 1422                  */
 1423                 g_journal_flush(sc);
 1424         }
 1425 }
 1426 
 1427 static void
 1428 g_journal_release_delayed(struct g_journal_softc *sc)
 1429 {
 1430         struct bio *bp;
 1431 
 1432         for (;;) {
 1433                 /* The flush queue is full, exit. */
 1434                 if (sc->sc_flush_count >= g_journal_accept_immediately)
 1435                         return;
 1436                 bp = bioq_takefirst(&sc->sc_delayed_queue);
 1437                 if (bp == NULL)
 1438                         return;
 1439                 sc->sc_delayed_count--;
 1440                 g_journal_add_current(sc, bp);
 1441         }
 1442 }
 1443 
 1444 /*
 1445  * Add I/O request to the current queue. If we have enough requests for one
 1446  * journal record we flush them onto active journal provider.
 1447  */
 1448 static void
 1449 g_journal_add_request(struct g_journal_softc *sc, struct bio *bp)
 1450 {
 1451 
 1452         /*
 1453          * The flush queue is full, we need to delay the request.
 1454          */
 1455         if (sc->sc_delayed_count > 0 ||
 1456             sc->sc_flush_count >= g_journal_accept_immediately) {
 1457                 GJ_LOGREQ(4, bp, "DELAYED");
 1458                 bioq_insert_tail(&sc->sc_delayed_queue, bp);
 1459                 sc->sc_delayed_count++;
 1460                 return;
 1461         }
 1462 
 1463         KASSERT(TAILQ_EMPTY(&sc->sc_delayed_queue.queue),
 1464             ("DELAYED queue not empty."));
 1465         g_journal_add_current(sc, bp);
 1466 }
 1467 
 1468 static void g_journal_read_done(struct bio *bp);
 1469 
 1470 /*
 1471  * Try to find requested data in cache.
 1472  */
 1473 static struct bio *
 1474 g_journal_read_find(struct bio *head, int sorted, struct bio *pbp, off_t ostart,
 1475     off_t oend)
 1476 {
 1477         off_t cstart, cend;
 1478         struct bio *bp;
 1479 
 1480         GJQ_FOREACH(head, bp) {
 1481                 if (bp->bio_offset == -1)
 1482                         continue;
 1483                 cstart = MAX(ostart, bp->bio_offset);
 1484                 cend = MIN(oend, bp->bio_offset + bp->bio_length);
 1485                 if (cend <= ostart)
 1486                         continue;
 1487                 else if (cstart >= oend) {
 1488                         if (!sorted)
 1489                                 continue;
 1490                         else {
 1491                                 bp = NULL;
 1492                                 break;
 1493                         }
 1494                 }
 1495                 if (bp->bio_data == NULL)
 1496                         break;
 1497                 GJ_DEBUG(3, "READ(%p): (%jd, %jd) (bp=%p)", head, cstart, cend,
 1498                     bp);
 1499                 bcopy(bp->bio_data + cstart - bp->bio_offset,
 1500                     pbp->bio_data + cstart - pbp->bio_offset, cend - cstart);
 1501                 pbp->bio_completed += cend - cstart;
 1502                 if (pbp->bio_completed == pbp->bio_length) {
 1503                         /*
 1504                          * Cool, the whole request was in cache, deliver happy
 1505                          * message.
 1506                          */
 1507                         g_io_deliver(pbp, 0);
 1508                         return (pbp);
 1509                 }
 1510                 break;
 1511         }
 1512         return (bp);
 1513 }
 1514 
 1515 /*
 1516  * Try to find requested data in cache.
 1517  */
 1518 static struct bio *
 1519 g_journal_read_queue_find(struct bio_queue *head, struct bio *pbp, off_t ostart,
 1520     off_t oend)
 1521 {
 1522         off_t cstart, cend;
 1523         struct bio *bp;
 1524 
 1525         TAILQ_FOREACH(bp, head, bio_queue) {
 1526                 cstart = MAX(ostart, bp->bio_offset);
 1527                 cend = MIN(oend, bp->bio_offset + bp->bio_length);
 1528                 if (cend <= ostart)
 1529                         continue;
 1530                 else if (cstart >= oend)
 1531                         continue;
 1532                 KASSERT(bp->bio_data != NULL,
 1533                     ("%s: bio_data == NULL", __func__));
 1534                 GJ_DEBUG(3, "READ(%p): (%jd, %jd) (bp=%p)", head, cstart, cend,
 1535                     bp);
 1536                 bcopy(bp->bio_data + cstart - bp->bio_offset,
 1537                     pbp->bio_data + cstart - pbp->bio_offset, cend - cstart);
 1538                 pbp->bio_completed += cend - cstart;
 1539                 if (pbp->bio_completed == pbp->bio_length) {
 1540                         /*
 1541                          * Cool, the whole request was in cache, deliver happy
 1542                          * message.
 1543                          */
 1544                         g_io_deliver(pbp, 0);
 1545                         return (pbp);
 1546                 }
 1547                 break;
 1548         }
 1549         return (bp);
 1550 }
 1551 
 1552 /*
 1553  * This function is used for colecting data on read.
 1554  * The complexity is because parts of the data can be stored in four different
 1555  * places:
 1556  * - in delayed requests
 1557  * - in memory - the data not yet send to the active journal provider
 1558  * - in requests which are going to be sent to the active journal
 1559  * - in the active journal
 1560  * - in the inactive journal
 1561  * - in the data provider
 1562  */
 1563 static void
 1564 g_journal_read(struct g_journal_softc *sc, struct bio *pbp, off_t ostart,
 1565     off_t oend)
 1566 {
 1567         struct bio *bp, *nbp, *head;
 1568         off_t cstart, cend;
 1569         u_int i, sorted = 0;
 1570 
 1571         GJ_DEBUG(3, "READ: (%jd, %jd)", ostart, oend);
 1572 
 1573         cstart = cend = -1;
 1574         bp = NULL;
 1575         head = NULL;
 1576         for (i = 0; i <= 5; i++) {
 1577                 switch (i) {
 1578                 case 0: /* Delayed requests. */
 1579                         head = NULL;
 1580                         sorted = 0;
 1581                         break;
 1582                 case 1: /* Not-yet-send data. */
 1583                         head = sc->sc_current_queue;
 1584                         sorted = 1;
 1585                         break;
 1586                 case 2: /* In-flight to the active journal. */
 1587                         head = sc->sc_flush_queue;
 1588                         sorted = 0;
 1589                         break;
 1590                 case 3: /* Active journal. */
 1591                         head = sc->sc_active.jj_queue;
 1592                         sorted = 1;
 1593                         break;
 1594                 case 4: /* Inactive journal. */
 1595                         /*
 1596                          * XXX: Here could be a race with g_journal_lowmem().
 1597                          */
 1598                         head = sc->sc_inactive.jj_queue;
 1599                         sorted = 1;
 1600                         break;
 1601                 case 5: /* In-flight to the data provider. */
 1602                         head = sc->sc_copy_queue;
 1603                         sorted = 0;
 1604                         break;
 1605                 default:
 1606                         panic("gjournal %s: i=%d", __func__, i);
 1607                 }
 1608                 if (i == 0)
 1609                         bp = g_journal_read_queue_find(&sc->sc_delayed_queue.queue, pbp, ostart, oend);
 1610                 else
 1611                         bp = g_journal_read_find(head, sorted, pbp, ostart, oend);
 1612                 if (bp == pbp) { /* Got the whole request. */
 1613                         GJ_DEBUG(2, "Got the whole request from %u.", i);
 1614                         return;
 1615                 } else if (bp != NULL) {
 1616                         cstart = MAX(ostart, bp->bio_offset);
 1617                         cend = MIN(oend, bp->bio_offset + bp->bio_length);
 1618                         GJ_DEBUG(2, "Got part of the request from %u (%jd-%jd).",
 1619                             i, (intmax_t)cstart, (intmax_t)cend);
 1620                         break;
 1621                 }
 1622         }
 1623         if (bp != NULL) {
 1624                 if (bp->bio_data == NULL) {
 1625                         nbp = g_duplicate_bio(pbp);
 1626                         nbp->bio_cflags = GJ_BIO_READ;
 1627                         nbp->bio_data =
 1628                             pbp->bio_data + cstart - pbp->bio_offset;
 1629                         nbp->bio_offset =
 1630                             bp->bio_joffset + cstart - bp->bio_offset;
 1631                         nbp->bio_length = cend - cstart;
 1632                         nbp->bio_done = g_journal_read_done;
 1633                         g_io_request(nbp, sc->sc_jconsumer);
 1634                 }
 1635                 /*
 1636                  * If we don't have the whole request yet, call g_journal_read()
 1637                  * recursively.
 1638                  */
 1639                 if (ostart < cstart)
 1640                         g_journal_read(sc, pbp, ostart, cstart);
 1641                 if (oend > cend)
 1642                         g_journal_read(sc, pbp, cend, oend);
 1643         } else {
 1644                 /*
 1645                  * No data in memory, no data in journal.
 1646                  * Its time for asking data provider.
 1647                  */
 1648                 GJ_DEBUG(3, "READ(data): (%jd, %jd)", ostart, oend);
 1649                 nbp = g_duplicate_bio(pbp);
 1650                 nbp->bio_cflags = GJ_BIO_READ;
 1651                 nbp->bio_data = pbp->bio_data + ostart - pbp->bio_offset;
 1652                 nbp->bio_offset = ostart;
 1653                 nbp->bio_length = oend - ostart;
 1654                 nbp->bio_done = g_journal_read_done;
 1655                 g_io_request(nbp, sc->sc_dconsumer);
 1656                 /* We have the whole request, return here. */
 1657                 return;
 1658         }
 1659 }
 1660 
 1661 /*
 1662  * Function responsible for handling finished READ requests.
 1663  * Actually, g_std_done() could be used here, the only difference is that we
 1664  * log error.
 1665  */
 1666 static void
 1667 g_journal_read_done(struct bio *bp)
 1668 {
 1669         struct bio *pbp;
 1670 
 1671         KASSERT(bp->bio_cflags == GJ_BIO_READ,
 1672             ("Invalid bio (%d != %d).", bp->bio_cflags, GJ_BIO_READ));
 1673 
 1674         pbp = bp->bio_parent;
 1675         pbp->bio_inbed++;
 1676         pbp->bio_completed += bp->bio_length;
 1677 
 1678         if (bp->bio_error != 0) {
 1679                 if (pbp->bio_error == 0)
 1680                         pbp->bio_error = bp->bio_error;
 1681                 GJ_DEBUG(0, "Error while reading data from %s (error=%d).",
 1682                     bp->bio_to->name, bp->bio_error);
 1683         }
 1684         g_destroy_bio(bp);
 1685         if (pbp->bio_children == pbp->bio_inbed &&
 1686             pbp->bio_completed == pbp->bio_length) {
 1687                 /* We're done. */
 1688                 g_io_deliver(pbp, 0);
 1689         }
 1690 }
 1691 
 1692 /*
 1693  * Deactive current journal and active next one.
 1694  */
 1695 static void
 1696 g_journal_switch(struct g_journal_softc *sc)
 1697 {
 1698         struct g_provider *pp;
 1699 
 1700         if (JEMPTY(sc)) {
 1701                 GJ_DEBUG(3, "No need for %s switch.", sc->sc_name);
 1702                 pp = LIST_FIRST(&sc->sc_geom->provider);
 1703                 if (!(sc->sc_flags & GJF_DEVICE_CLEAN) && pp->acw == 0) {
 1704                         sc->sc_flags |= GJF_DEVICE_CLEAN;
 1705                         GJ_DEBUG(1, "Marking %s as clean.", sc->sc_name);
 1706                         g_journal_metadata_update(sc);
 1707                 }
 1708         } else {
 1709                 GJ_DEBUG(3, "Switching journal %s.", sc->sc_geom->name);
 1710 
 1711                 pp = sc->sc_jprovider;
 1712 
 1713                 sc->sc_journal_previous_id = sc->sc_journal_id;
 1714 
 1715                 sc->sc_journal_id = sc->sc_journal_next_id;
 1716                 sc->sc_journal_next_id = arc4random();
 1717 
 1718                 GJ_VALIDATE_OFFSET(sc->sc_journal_offset, sc);
 1719 
 1720                 g_journal_write_header(sc);
 1721 
 1722                 sc->sc_inactive.jj_offset = sc->sc_active.jj_offset;
 1723                 sc->sc_inactive.jj_queue = sc->sc_active.jj_queue;
 1724 
 1725                 sc->sc_active.jj_offset =
 1726                     sc->sc_journal_offset - pp->sectorsize;
 1727                 sc->sc_active.jj_queue = NULL;
 1728 
 1729                 /*
 1730                  * Switch is done, start copying data from the (now) inactive
 1731                  * journal to the data provider.
 1732                  */
 1733                 g_journal_copy_start(sc);
 1734         }
 1735         mtx_lock(&sc->sc_mtx);
 1736         sc->sc_flags &= ~GJF_DEVICE_SWITCH;
 1737         mtx_unlock(&sc->sc_mtx);
 1738 }
 1739 
 1740 static void
 1741 g_journal_initialize(struct g_journal_softc *sc)
 1742 {
 1743 
 1744         sc->sc_journal_id = arc4random();
 1745         sc->sc_journal_next_id = arc4random();
 1746         sc->sc_journal_previous_id = sc->sc_journal_id;
 1747         sc->sc_journal_offset = sc->sc_jstart;
 1748         sc->sc_inactive.jj_offset = sc->sc_jstart;
 1749         g_journal_write_header(sc);
 1750         sc->sc_active.jj_offset = sc->sc_jstart;
 1751 }
 1752 
 1753 static void
 1754 g_journal_mark_as_dirty(struct g_journal_softc *sc)
 1755 {
 1756         const struct g_journal_desc *desc;
 1757         int i;
 1758 
 1759         GJ_DEBUG(1, "Marking file system %s as dirty.", sc->sc_name);
 1760         for (i = 0; (desc = g_journal_filesystems[i]) != NULL; i++)
 1761                 desc->jd_dirty(sc->sc_dconsumer);
 1762 }
 1763 
 1764 /*
 1765  * Function read record header from the given journal.
 1766  * It is very simlar to g_read_data(9), but it doesn't allocate memory for bio
 1767  * and data on every call.
 1768  */
 1769 static int
 1770 g_journal_sync_read(struct g_consumer *cp, struct bio *bp, off_t offset,
 1771     void *data)
 1772 {
 1773         int error;
 1774 
 1775         g_reset_bio(bp);
 1776         bp->bio_cmd = BIO_READ;
 1777         bp->bio_done = NULL;
 1778         bp->bio_offset = offset;
 1779         bp->bio_length = cp->provider->sectorsize;
 1780         bp->bio_data = data;
 1781         g_io_request(bp, cp);
 1782         error = biowait(bp, "gjs_read");
 1783         return (error);
 1784 }
 1785 
 1786 #if 0
 1787 /*
 1788  * Function is called when we start the journal device and we detect that
 1789  * one of the journals was not fully copied.
 1790  * The purpose of this function is to read all records headers from journal
 1791  * and placed them in the inactive queue, so we can start journal
 1792  * synchronization process and the journal provider itself.
 1793  * Design decision was taken to not synchronize the whole journal here as it
 1794  * can take too much time. Reading headers only and delaying synchronization
 1795  * process until after journal provider is started should be the best choice.
 1796  */
 1797 #endif
 1798 
 1799 static void
 1800 g_journal_sync(struct g_journal_softc *sc)
 1801 {
 1802         struct g_journal_record_header rhdr;
 1803         struct g_journal_entry *ent;
 1804         struct g_journal_header jhdr;
 1805         struct g_consumer *cp;
 1806         struct bio *bp, *fbp, *tbp;
 1807         off_t joffset, offset;
 1808         u_char *buf, sum[16];
 1809         uint64_t id;
 1810         MD5_CTX ctx;
 1811         int error, found, i;
 1812 
 1813         found = 0;
 1814         fbp = NULL;
 1815         cp = sc->sc_jconsumer;
 1816         bp = g_alloc_bio();
 1817         buf = gj_malloc(cp->provider->sectorsize, M_WAITOK);
 1818         offset = joffset = sc->sc_inactive.jj_offset = sc->sc_journal_offset;
 1819 
 1820         GJ_DEBUG(2, "Looking for termination at %jd.", (intmax_t)joffset);
 1821 
 1822         /*
 1823          * Read and decode first journal header.
 1824          */
 1825         error = g_journal_sync_read(cp, bp, offset, buf);
 1826         if (error != 0) {
 1827                 GJ_DEBUG(0, "Error while reading journal header from %s.",
 1828                     cp->provider->name);
 1829                 goto end;
 1830         }
 1831         error = g_journal_header_decode(buf, &jhdr);
 1832         if (error != 0) {
 1833                 GJ_DEBUG(0, "Cannot decode journal header from %s.",
 1834                     cp->provider->name);
 1835                 goto end;
 1836         }
 1837         id = sc->sc_journal_id;
 1838         if (jhdr.jh_journal_id != sc->sc_journal_id) {
 1839                 GJ_DEBUG(1, "Journal ID mismatch at %jd (0x%08x != 0x%08x).",
 1840                     (intmax_t)offset, (u_int)jhdr.jh_journal_id, (u_int)id);
 1841                 goto end;
 1842         }
 1843         offset += cp->provider->sectorsize;
 1844         id = sc->sc_journal_next_id = jhdr.jh_journal_next_id;
 1845 
 1846         for (;;) {
 1847                 /*
 1848                  * If the biggest record won't fit, look for a record header or
 1849                  * journal header from the beginning.
 1850                  */
 1851                 GJ_VALIDATE_OFFSET(offset, sc);
 1852                 error = g_journal_sync_read(cp, bp, offset, buf);
 1853                 if (error != 0) {
 1854                         /*
 1855                          * Not good. Having an error while reading header
 1856                          * means, that we cannot read next headers and in
 1857                          * consequence we cannot find termination.
 1858                          */
 1859                         GJ_DEBUG(0,
 1860                             "Error while reading record header from %s.",
 1861                             cp->provider->name);
 1862                         break;
 1863                 }
 1864 
 1865                 error = g_journal_record_header_decode(buf, &rhdr);
 1866                 if (error != 0) {
 1867                         GJ_DEBUG(2, "Not a record header at %jd (error=%d).",
 1868                             (intmax_t)offset, error);
 1869                         /*
 1870                          * This is not a record header.
 1871                          * If we are lucky, this is next journal header.
 1872                          */
 1873                         error = g_journal_header_decode(buf, &jhdr);
 1874                         if (error != 0) {
 1875                                 GJ_DEBUG(1, "Not a journal header at %jd (error=%d).",
 1876                                     (intmax_t)offset, error);
 1877                                 /*
 1878                                  * Nope, this is not journal header, which
 1879                                  * bascially means that journal is not
 1880                                  * terminated properly.
 1881                                  */
 1882                                 error = ENOENT;
 1883                                 break;
 1884                         }
 1885                         /*
 1886                          * Ok. This is header of _some_ journal. Now we need to
 1887                          * verify if this is header of the _next_ journal.
 1888                          */
 1889                         if (jhdr.jh_journal_id != id) {
 1890                                 GJ_DEBUG(1, "Journal ID mismatch at %jd "
 1891                                     "(0x%08x != 0x%08x).", (intmax_t)offset,
 1892                                     (u_int)jhdr.jh_journal_id, (u_int)id);
 1893                                 error = ENOENT;
 1894                                 break;
 1895                         }
 1896 
 1897                         /* Found termination. */
 1898                         found++;
 1899                         GJ_DEBUG(1, "Found termination at %jd (id=0x%08x).",
 1900                             (intmax_t)offset, (u_int)id);
 1901                         sc->sc_active.jj_offset = offset;
 1902                         sc->sc_journal_offset =
 1903                             offset + cp->provider->sectorsize;
 1904                         sc->sc_journal_id = id;
 1905                         id = sc->sc_journal_next_id = jhdr.jh_journal_next_id;
 1906 
 1907                         while ((tbp = fbp) != NULL) {
 1908                                 fbp = tbp->bio_next;
 1909                                 GJ_LOGREQ(3, tbp, "Adding request.");
 1910                                 g_journal_insert_bio(&sc->sc_inactive.jj_queue,
 1911                                     tbp, M_WAITOK);
 1912                         }
 1913 
 1914                         /* Skip journal's header. */
 1915                         offset += cp->provider->sectorsize;
 1916                         continue;
 1917                 }
 1918 
 1919                 /* Skip record's header. */
 1920                 offset += cp->provider->sectorsize;
 1921 
 1922                 /*
 1923                  * Add information about every record entry to the inactive
 1924                  * queue.
 1925                  */
 1926                 if (sc->sc_flags & GJF_DEVICE_CHECKSUM)
 1927                         MD5Init(&ctx);
 1928                 for (i = 0; i < rhdr.jrh_nentries; i++) {
 1929                         ent = &rhdr.jrh_entries[i];
 1930                         GJ_DEBUG(3, "Insert entry: %jd %jd.",
 1931                             (intmax_t)ent->je_offset, (intmax_t)ent->je_length);
 1932                         g_journal_insert(&fbp, ent->je_offset,
 1933                             ent->je_offset + ent->je_length, ent->je_joffset,
 1934                             NULL, M_WAITOK);
 1935                         if (sc->sc_flags & GJF_DEVICE_CHECKSUM) {
 1936                                 u_char *buf2;
 1937 
 1938                                 /*
 1939                                  * TODO: Should use faster function (like
 1940                                  *       g_journal_sync_read()).
 1941                                  */
 1942                                 buf2 = g_read_data(cp, offset, ent->je_length,
 1943                                     NULL);
 1944                                 if (buf2 == NULL)
 1945                                         GJ_DEBUG(0, "Cannot read data at %jd.",
 1946                                             (intmax_t)offset);
 1947                                 else {
 1948                                         MD5Update(&ctx, buf2, ent->je_length);
 1949                                         g_free(buf2);
 1950                                 }
 1951                         }
 1952                         /* Skip entry's data. */
 1953                         offset += ent->je_length;
 1954                 }
 1955                 if (sc->sc_flags & GJF_DEVICE_CHECKSUM) {
 1956                         MD5Final(sum, &ctx);
 1957                         if (bcmp(sum, rhdr.jrh_sum, sizeof(rhdr.jrh_sum)) != 0) {
 1958                                 GJ_DEBUG(0, "MD5 hash mismatch at %jd!",
 1959                                     (intmax_t)offset);
 1960                         }
 1961                 }
 1962         }
 1963 end:
 1964         gj_free(bp->bio_data, cp->provider->sectorsize);
 1965         g_destroy_bio(bp);
 1966 
 1967         /* Remove bios from unterminated journal. */
 1968         while ((tbp = fbp) != NULL) {
 1969                 fbp = tbp->bio_next;
 1970                 g_destroy_bio(tbp);
 1971         }
 1972 
 1973         if (found < 1 && joffset > 0) {
 1974                 GJ_DEBUG(0, "Journal on %s is broken/corrupted. Initializing.",
 1975                     sc->sc_name);
 1976                 while ((tbp = sc->sc_inactive.jj_queue) != NULL) {
 1977                         sc->sc_inactive.jj_queue = tbp->bio_next;
 1978                         g_destroy_bio(tbp);
 1979                 }
 1980                 g_journal_initialize(sc);
 1981                 g_journal_mark_as_dirty(sc);
 1982         } else {
 1983                 GJ_DEBUG(0, "Journal %s consistent.", sc->sc_name);
 1984                 g_journal_copy_start(sc);
 1985         }
 1986 }
 1987 
 1988 /*
 1989  * Wait for requests.
 1990  * If we have requests in the current queue, flush them after 3 seconds from the
 1991  * last flush. In this way we don't wait forever (or for journal switch) with
 1992  * storing not full records on journal.
 1993  */
 1994 static void
 1995 g_journal_wait(struct g_journal_softc *sc, time_t last_write)
 1996 {
 1997         int error, timeout;
 1998 
 1999         GJ_DEBUG(3, "%s: enter", __func__);
 2000         if (sc->sc_current_count == 0) {
 2001                 if (g_journal_debug < 2)
 2002                         msleep(sc, &sc->sc_mtx, PRIBIO | PDROP, "gj:work", 0);
 2003                 else {
 2004                         /*
 2005                          * If we have debug turned on, show number of elements
 2006                          * in various queues.
 2007                          */
 2008                         for (;;) {
 2009                                 error = msleep(sc, &sc->sc_mtx, PRIBIO,
 2010                                     "gj:work", hz * 3);
 2011                                 if (error == 0) {
 2012                                         mtx_unlock(&sc->sc_mtx);
 2013                                         break;
 2014                                 }
 2015                                 GJ_DEBUG(3, "Report: current count=%d",
 2016                                     sc->sc_current_count);
 2017                                 GJ_DEBUG(3, "Report: flush count=%d",
 2018                                     sc->sc_flush_count);
 2019                                 GJ_DEBUG(3, "Report: flush in progress=%d",
 2020                                     sc->sc_flush_in_progress);
 2021                                 GJ_DEBUG(3, "Report: copy in progress=%d",
 2022                                     sc->sc_copy_in_progress);
 2023                                 GJ_DEBUG(3, "Report: delayed=%d",
 2024                                     sc->sc_delayed_count);
 2025                         }
 2026                 }
 2027                 GJ_DEBUG(3, "%s: exit 1", __func__);
 2028                 return;
 2029         }
 2030 
 2031         /*
 2032          * Flush even not full records every 3 seconds.
 2033          */
 2034         timeout = (last_write + 3 - time_second) * hz;
 2035         if (timeout <= 0) {
 2036                 mtx_unlock(&sc->sc_mtx);
 2037                 g_journal_flush(sc);
 2038                 g_journal_flush_send(sc);
 2039                 GJ_DEBUG(3, "%s: exit 2", __func__);
 2040                 return;
 2041         }
 2042         error = msleep(sc, &sc->sc_mtx, PRIBIO | PDROP, "gj:work", timeout);
 2043         if (error == EWOULDBLOCK)
 2044                 g_journal_flush_send(sc);
 2045         GJ_DEBUG(3, "%s: exit 3", __func__);
 2046 }
 2047 
 2048 /*
 2049  * Worker thread.
 2050  */
 2051 static void
 2052 g_journal_worker(void *arg)
 2053 {
 2054         struct g_journal_softc *sc;
 2055         struct g_geom *gp;
 2056         struct g_provider *pp;
 2057         struct bio *bp;
 2058         time_t last_write;
 2059         int type;
 2060 
 2061         thread_lock(curthread);
 2062         sched_prio(curthread, PRIBIO);
 2063         thread_unlock(curthread);
 2064 
 2065         sc = arg;
 2066         type = 0;       /* gcc */
 2067 
 2068         if (sc->sc_flags & GJF_DEVICE_CLEAN) {
 2069                 GJ_DEBUG(0, "Journal %s clean.", sc->sc_name);
 2070                 g_journal_initialize(sc);
 2071         } else {
 2072                 g_journal_sync(sc);
 2073         }
 2074         /*
 2075          * Check if we can use BIO_FLUSH.
 2076          */
 2077         sc->sc_bio_flush = 0;
 2078         if (g_io_flush(sc->sc_jconsumer) == 0) {
 2079                 sc->sc_bio_flush |= GJ_FLUSH_JOURNAL;
 2080                 GJ_DEBUG(1, "BIO_FLUSH supported by %s.",
 2081                     sc->sc_jconsumer->provider->name);
 2082         } else {
 2083                 GJ_DEBUG(0, "BIO_FLUSH not supported by %s.",
 2084                     sc->sc_jconsumer->provider->name);
 2085         }
 2086         if (sc->sc_jconsumer != sc->sc_dconsumer) {
 2087                 if (g_io_flush(sc->sc_dconsumer) == 0) {
 2088                         sc->sc_bio_flush |= GJ_FLUSH_DATA;
 2089                         GJ_DEBUG(1, "BIO_FLUSH supported by %s.",
 2090                             sc->sc_dconsumer->provider->name);
 2091                 } else {
 2092                         GJ_DEBUG(0, "BIO_FLUSH not supported by %s.",
 2093                             sc->sc_dconsumer->provider->name);
 2094                 }
 2095         }
 2096 
 2097         gp = sc->sc_geom;
 2098         g_topology_lock();
 2099         pp = g_new_providerf(gp, "%s.journal", sc->sc_name);
 2100         pp->mediasize = sc->sc_mediasize;
 2101         /*
 2102          * There could be a problem when data provider and journal providers
 2103          * have different sectorsize, but such scenario is prevented on journal
 2104          * creation.
 2105          */
 2106         pp->sectorsize = sc->sc_sectorsize;
 2107         g_error_provider(pp, 0);
 2108         g_topology_unlock();
 2109         last_write = time_second;
 2110 
 2111         if (sc->sc_rootmount != NULL) {
 2112                 GJ_DEBUG(1, "root_mount_rel %p", sc->sc_rootmount);
 2113                 root_mount_rel(sc->sc_rootmount);
 2114                 sc->sc_rootmount = NULL;
 2115         }
 2116 
 2117         for (;;) {
 2118                 /* Get first request from the queue. */
 2119                 mtx_lock(&sc->sc_mtx);
 2120                 bp = bioq_first(&sc->sc_back_queue);
 2121                 if (bp != NULL)
 2122                         type = (bp->bio_cflags & GJ_BIO_MASK);
 2123                 if (bp == NULL) {
 2124                         bp = bioq_first(&sc->sc_regular_queue);
 2125                         if (bp != NULL)
 2126                                 type = GJ_BIO_REGULAR;
 2127                 }
 2128                 if (bp == NULL) {
 2129 try_switch:
 2130                         if ((sc->sc_flags & GJF_DEVICE_SWITCH) ||
 2131                             (sc->sc_flags & GJF_DEVICE_DESTROY)) {
 2132                                 if (sc->sc_current_count > 0) {
 2133                                         mtx_unlock(&sc->sc_mtx);
 2134                                         g_journal_flush(sc);
 2135                                         g_journal_flush_send(sc);
 2136                                         continue;
 2137                                 }
 2138                                 if (sc->sc_flush_in_progress > 0)
 2139                                         goto sleep;
 2140                                 if (sc->sc_copy_in_progress > 0)
 2141                                         goto sleep;
 2142                         }
 2143                         if (sc->sc_flags & GJF_DEVICE_SWITCH) {
 2144                                 mtx_unlock(&sc->sc_mtx);
 2145                                 g_journal_switch(sc);
 2146                                 wakeup(&sc->sc_journal_copying);
 2147                                 continue;
 2148                         }
 2149                         if (sc->sc_flags & GJF_DEVICE_DESTROY) {
 2150                                 GJ_DEBUG(1, "Shutting down worker "
 2151                                     "thread for %s.", gp->name);
 2152                                 sc->sc_worker = NULL;
 2153                                 wakeup(&sc->sc_worker);
 2154                                 mtx_unlock(&sc->sc_mtx);
 2155                                 kproc_exit(0);
 2156                         }
 2157 sleep:
 2158                         g_journal_wait(sc, last_write);
 2159                         continue;
 2160                 }
 2161                 /*
 2162                  * If we're in switch process, we need to delay all new
 2163                  * write requests until its done.
 2164                  */
 2165                 if ((sc->sc_flags & GJF_DEVICE_SWITCH) &&
 2166                     type == GJ_BIO_REGULAR && bp->bio_cmd == BIO_WRITE) {
 2167                         GJ_LOGREQ(2, bp, "WRITE on SWITCH");
 2168                         goto try_switch;
 2169                 }
 2170                 if (type == GJ_BIO_REGULAR)
 2171                         bioq_remove(&sc->sc_regular_queue, bp);
 2172                 else
 2173                         bioq_remove(&sc->sc_back_queue, bp);
 2174                 mtx_unlock(&sc->sc_mtx);
 2175                 switch (type) {
 2176                 case GJ_BIO_REGULAR:
 2177                         /* Regular request. */
 2178                         switch (bp->bio_cmd) {
 2179                         case BIO_READ:
 2180                                 g_journal_read(sc, bp, bp->bio_offset,
 2181                                     bp->bio_offset + bp->bio_length);
 2182                                 break;
 2183                         case BIO_WRITE:
 2184                                 last_write = time_second;
 2185                                 g_journal_add_request(sc, bp);
 2186                                 g_journal_flush_send(sc);
 2187                                 break;
 2188                         default:
 2189                                 panic("Invalid bio_cmd (%d).", bp->bio_cmd);
 2190                         }
 2191                         break;
 2192                 case GJ_BIO_COPY:
 2193                         switch (bp->bio_cmd) {
 2194                         case BIO_READ:
 2195                                 if (g_journal_copy_read_done(bp))
 2196                                         g_journal_copy_send(sc);
 2197                                 break;
 2198                         case BIO_WRITE:
 2199                                 g_journal_copy_write_done(bp);
 2200                                 g_journal_copy_send(sc);
 2201                                 break;
 2202                         default:
 2203                                 panic("Invalid bio_cmd (%d).", bp->bio_cmd);
 2204                         }
 2205                         break;
 2206                 case GJ_BIO_JOURNAL:
 2207                         g_journal_flush_done(bp);
 2208                         g_journal_flush_send(sc);
 2209                         break;
 2210                 case GJ_BIO_READ:
 2211                 default:
 2212                         panic("Invalid bio (%d).", type);
 2213                 }
 2214         }
 2215 }
 2216 
 2217 static void
 2218 g_journal_destroy_event(void *arg, int flags __unused)
 2219 {
 2220         struct g_journal_softc *sc;
 2221 
 2222         g_topology_assert();
 2223         sc = arg;
 2224         g_journal_destroy(sc);
 2225 }
 2226 
 2227 static void
 2228 g_journal_timeout(void *arg)
 2229 {
 2230         struct g_journal_softc *sc;
 2231 
 2232         sc = arg;
 2233         GJ_DEBUG(0, "Timeout. Journal %s cannot be completed.",
 2234             sc->sc_geom->name);
 2235         g_post_event(g_journal_destroy_event, sc, M_NOWAIT, NULL);
 2236 }
 2237 
 2238 static struct g_geom *
 2239 g_journal_create(struct g_class *mp, struct g_provider *pp,
 2240     const struct g_journal_metadata *md)
 2241 {
 2242         struct g_journal_softc *sc;
 2243         struct g_geom *gp;
 2244         struct g_consumer *cp;
 2245         int error;
 2246 
 2247         sc = NULL;      /* gcc */
 2248 
 2249         g_topology_assert();
 2250         /*
 2251          * There are two possibilities:
 2252          * 1. Data and both journals are on the same provider.
 2253          * 2. Data and journals are all on separated providers.
 2254          */
 2255         /* Look for journal device with the same ID. */
 2256         LIST_FOREACH(gp, &mp->geom, geom) {
 2257                 sc = gp->softc;
 2258                 if (sc == NULL)
 2259                         continue;
 2260                 if (sc->sc_id == md->md_id)
 2261                         break;
 2262         }
 2263         if (gp == NULL)
 2264                 sc = NULL;
 2265         else if (sc != NULL && (sc->sc_type & md->md_type) != 0) {
 2266                 GJ_DEBUG(1, "Journal device %u already configured.", sc->sc_id);
 2267                 return (NULL);
 2268         }
 2269         if (md->md_type == 0 || (md->md_type & ~GJ_TYPE_COMPLETE) != 0) {
 2270                 GJ_DEBUG(0, "Invalid type on %s.", pp->name);
 2271                 return (NULL);
 2272         }
 2273         if (md->md_type & GJ_TYPE_DATA) {
 2274                 GJ_DEBUG(0, "Journal %u: %s contains data.", md->md_id,
 2275                     pp->name);
 2276         }
 2277         if (md->md_type & GJ_TYPE_JOURNAL) {
 2278                 GJ_DEBUG(0, "Journal %u: %s contains journal.", md->md_id,
 2279                     pp->name);
 2280         }
 2281 
 2282         if (sc == NULL) {
 2283                 /* Action geom. */
 2284                 sc = malloc(sizeof(*sc), M_JOURNAL, M_WAITOK | M_ZERO);
 2285                 sc->sc_id = md->md_id;
 2286                 sc->sc_type = 0;
 2287                 sc->sc_flags = 0;
 2288                 sc->sc_worker = NULL;
 2289 
 2290                 gp = g_new_geomf(mp, "gjournal %u", sc->sc_id);
 2291                 gp->start = g_journal_start;
 2292                 gp->orphan = g_journal_orphan;
 2293                 gp->access = g_journal_access;
 2294                 gp->softc = sc;
 2295                 gp->flags |= G_GEOM_VOLATILE_BIO;
 2296                 sc->sc_geom = gp;
 2297 
 2298                 mtx_init(&sc->sc_mtx, "gjournal", NULL, MTX_DEF);
 2299 
 2300                 bioq_init(&sc->sc_back_queue);
 2301                 bioq_init(&sc->sc_regular_queue);
 2302                 bioq_init(&sc->sc_delayed_queue);
 2303                 sc->sc_delayed_count = 0;
 2304                 sc->sc_current_queue = NULL;
 2305                 sc->sc_current_count = 0;
 2306                 sc->sc_flush_queue = NULL;
 2307                 sc->sc_flush_count = 0;
 2308                 sc->sc_flush_in_progress = 0;
 2309                 sc->sc_copy_queue = NULL;
 2310                 sc->sc_copy_in_progress = 0;
 2311                 sc->sc_inactive.jj_queue = NULL;
 2312                 sc->sc_active.jj_queue = NULL;
 2313 
 2314                 sc->sc_rootmount = root_mount_hold("GJOURNAL");
 2315                 GJ_DEBUG(1, "root_mount_hold %p", sc->sc_rootmount);
 2316 
 2317                 callout_init(&sc->sc_callout, 1);
 2318                 if (md->md_type != GJ_TYPE_COMPLETE) {
 2319                         /*
 2320                          * Journal and data are on separate providers.
 2321                          * At this point we have only one of them.
 2322                          * We setup a timeout in case the other part will not
 2323                          * appear, so we won't wait forever.
 2324                          */
 2325                         callout_reset(&sc->sc_callout, 5 * hz,
 2326                             g_journal_timeout, sc);
 2327                 }
 2328         }
 2329 
 2330         /* Remember type of the data provider. */
 2331         if (md->md_type & GJ_TYPE_DATA)
 2332                 sc->sc_orig_type = md->md_type;
 2333         sc->sc_type |= md->md_type;
 2334         cp = NULL;
 2335 
 2336         if (md->md_type & GJ_TYPE_DATA) {
 2337                 if (md->md_flags & GJ_FLAG_CLEAN)
 2338                         sc->sc_flags |= GJF_DEVICE_CLEAN;
 2339                 if (md->md_flags & GJ_FLAG_CHECKSUM)
 2340                         sc->sc_flags |= GJF_DEVICE_CHECKSUM;
 2341                 cp = g_new_consumer(gp);
 2342                 error = g_attach(cp, pp);
 2343                 KASSERT(error == 0, ("Cannot attach to %s (error=%d).",
 2344                     pp->name, error));
 2345                 error = g_access(cp, 1, 1, 1);
 2346                 if (error != 0) {
 2347                         GJ_DEBUG(0, "Cannot access %s (error=%d).", pp->name,
 2348                             error);
 2349                         g_journal_destroy(sc);
 2350                         return (NULL);
 2351                 }
 2352                 sc->sc_dconsumer = cp;
 2353                 sc->sc_mediasize = pp->mediasize - pp->sectorsize;
 2354                 sc->sc_sectorsize = pp->sectorsize;
 2355                 sc->sc_jstart = md->md_jstart;
 2356                 sc->sc_jend = md->md_jend;
 2357                 if (md->md_provider[0] != '\0')
 2358                         sc->sc_flags |= GJF_DEVICE_HARDCODED;
 2359                 sc->sc_journal_offset = md->md_joffset;
 2360                 sc->sc_journal_id = md->md_jid;
 2361                 sc->sc_journal_previous_id = md->md_jid;
 2362         }
 2363         if (md->md_type & GJ_TYPE_JOURNAL) {
 2364                 if (cp == NULL) {
 2365                         cp = g_new_consumer(gp);
 2366                         error = g_attach(cp, pp);
 2367                         KASSERT(error == 0, ("Cannot attach to %s (error=%d).",
 2368                             pp->name, error));
 2369                         error = g_access(cp, 1, 1, 1);
 2370                         if (error != 0) {
 2371                                 GJ_DEBUG(0, "Cannot access %s (error=%d).",
 2372                                     pp->name, error);
 2373                                 g_journal_destroy(sc);
 2374                                 return (NULL);
 2375                         }
 2376                 } else {
 2377                         /*
 2378                          * Journal is on the same provider as data, which means
 2379                          * that data provider ends where journal starts.
 2380                          */
 2381                         sc->sc_mediasize = md->md_jstart;
 2382                 }
 2383                 sc->sc_jconsumer = cp;
 2384         }
 2385 
 2386         if ((sc->sc_type & GJ_TYPE_COMPLETE) != GJ_TYPE_COMPLETE) {
 2387                 /* Journal is not complete yet. */
 2388                 return (gp);
 2389         } else {
 2390                 /* Journal complete, cancel timeout. */
 2391                 callout_drain(&sc->sc_callout);
 2392         }
 2393 
 2394         error = kproc_create(g_journal_worker, sc, &sc->sc_worker, 0, 0,
 2395             "g_journal %s", sc->sc_name);
 2396         if (error != 0) {
 2397                 GJ_DEBUG(0, "Cannot create worker thread for %s.journal.",
 2398                     sc->sc_name);
 2399                 g_journal_destroy(sc);
 2400                 return (NULL);
 2401         }
 2402 
 2403         return (gp);
 2404 }
 2405 
 2406 static void
 2407 g_journal_destroy_consumer(void *arg, int flags __unused)
 2408 {
 2409         struct g_consumer *cp;
 2410 
 2411         g_topology_assert();
 2412         cp = arg;
 2413         g_detach(cp);
 2414         g_destroy_consumer(cp);
 2415 }
 2416 
 2417 static int
 2418 g_journal_destroy(struct g_journal_softc *sc)
 2419 {
 2420         struct g_geom *gp;
 2421         struct g_provider *pp;
 2422         struct g_consumer *cp;
 2423 
 2424         g_topology_assert();
 2425 
 2426         if (sc == NULL)
 2427                 return (ENXIO);
 2428 
 2429         gp = sc->sc_geom;
 2430         pp = LIST_FIRST(&gp->provider);
 2431         if (pp != NULL) {
 2432                 if (pp->acr != 0 || pp->acw != 0 || pp->ace != 0) {
 2433                         GJ_DEBUG(1, "Device %s is still open (r%dw%de%d).",
 2434                             pp->name, pp->acr, pp->acw, pp->ace);
 2435                         return (EBUSY);
 2436                 }
 2437                 g_error_provider(pp, ENXIO);
 2438 
 2439                 g_journal_flush(sc);
 2440                 g_journal_flush_send(sc);
 2441                 g_journal_switch(sc);
 2442         }
 2443 
 2444         sc->sc_flags |= (GJF_DEVICE_DESTROY | GJF_DEVICE_CLEAN);
 2445 
 2446         g_topology_unlock();
 2447 
 2448         if (sc->sc_rootmount != NULL) {
 2449                 GJ_DEBUG(1, "root_mount_rel %p", sc->sc_rootmount);
 2450                 root_mount_rel(sc->sc_rootmount);
 2451                 sc->sc_rootmount = NULL;
 2452         }
 2453 
 2454         callout_drain(&sc->sc_callout);
 2455         mtx_lock(&sc->sc_mtx);
 2456         wakeup(sc);
 2457         while (sc->sc_worker != NULL)
 2458                 msleep(&sc->sc_worker, &sc->sc_mtx, PRIBIO, "gj:destroy", 0);
 2459         mtx_unlock(&sc->sc_mtx);
 2460 
 2461         if (pp != NULL) {
 2462                 GJ_DEBUG(1, "Marking %s as clean.", sc->sc_name);
 2463                 g_journal_metadata_update(sc);
 2464                 g_topology_lock();
 2465                 pp->flags |= G_PF_WITHER;
 2466                 g_orphan_provider(pp, ENXIO);
 2467         } else {
 2468                 g_topology_lock();
 2469         }
 2470         mtx_destroy(&sc->sc_mtx);
 2471 
 2472         if (sc->sc_current_count != 0) {
 2473                 GJ_DEBUG(0, "Warning! Number of current requests %d.",
 2474                     sc->sc_current_count);
 2475         }
 2476 
 2477         LIST_FOREACH(cp, &gp->consumer, consumer) {
 2478                 if (cp->acr + cp->acw + cp->ace > 0)
 2479                         g_access(cp, -1, -1, -1);
 2480                 /*
 2481                  * We keep all consumers open for writting, so if I'll detach
 2482                  * and destroy consumer here, I'll get providers for taste, so
 2483                  * journal will be started again.
 2484                  * Sending an event here, prevents this from happening.
 2485                  */
 2486                 g_post_event(g_journal_destroy_consumer, cp, M_WAITOK, NULL);
 2487         }
 2488         gp->softc = NULL;
 2489         g_wither_geom(gp, ENXIO);
 2490         free(sc, M_JOURNAL);
 2491         return (0);
 2492 }
 2493 
 2494 static void
 2495 g_journal_taste_orphan(struct g_consumer *cp)
 2496 {
 2497 
 2498         KASSERT(1 == 0, ("%s called while tasting %s.", __func__,
 2499             cp->provider->name));
 2500 }
 2501 
 2502 static struct g_geom *
 2503 g_journal_taste(struct g_class *mp, struct g_provider *pp, int flags __unused)
 2504 {
 2505         struct g_journal_metadata md;
 2506         struct g_consumer *cp;
 2507         struct g_geom *gp;
 2508         int error;
 2509 
 2510         g_topology_assert();
 2511         g_trace(G_T_TOPOLOGY, "%s(%s, %s)", __func__, mp->name, pp->name);
 2512         GJ_DEBUG(2, "Tasting %s.", pp->name);
 2513         if (pp->geom->class == mp)
 2514                 return (NULL);
 2515 
 2516         gp = g_new_geomf(mp, "journal:taste");
 2517         /* This orphan function should be never called. */
 2518         gp->orphan = g_journal_taste_orphan;
 2519         cp = g_new_consumer(gp);
 2520         g_attach(cp, pp);
 2521         error = g_journal_metadata_read(cp, &md);
 2522         g_detach(cp);
 2523         g_destroy_consumer(cp);
 2524         g_destroy_geom(gp);
 2525         if (error != 0)
 2526                 return (NULL);
 2527         gp = NULL;
 2528 
 2529         if (md.md_provider[0] != '\0' &&
 2530             !g_compare_names(md.md_provider, pp->name))
 2531                 return (NULL);
 2532         if (md.md_provsize != 0 && md.md_provsize != pp->mediasize)
 2533                 return (NULL);
 2534         if (g_journal_debug >= 2)
 2535                 journal_metadata_dump(&md);
 2536 
 2537         gp = g_journal_create(mp, pp, &md);
 2538         return (gp);
 2539 }
 2540 
 2541 static struct g_journal_softc *
 2542 g_journal_find_device(struct g_class *mp, const char *name)
 2543 {
 2544         struct g_journal_softc *sc;
 2545         struct g_geom *gp;
 2546         struct g_provider *pp;
 2547 
 2548         if (strncmp(name, "/dev/", 5) == 0)
 2549                 name += 5;
 2550         LIST_FOREACH(gp, &mp->geom, geom) {
 2551                 sc = gp->softc;
 2552                 if (sc == NULL)
 2553                         continue;
 2554                 if (sc->sc_flags & GJF_DEVICE_DESTROY)
 2555                         continue;
 2556                 if ((sc->sc_type & GJ_TYPE_COMPLETE) != GJ_TYPE_COMPLETE)
 2557                         continue;
 2558                 pp = LIST_FIRST(&gp->provider);
 2559                 if (strcmp(sc->sc_name, name) == 0)
 2560                         return (sc);
 2561                 if (pp != NULL && strcmp(pp->name, name) == 0)
 2562                         return (sc);
 2563         }
 2564         return (NULL);
 2565 }
 2566 
 2567 static void
 2568 g_journal_ctl_destroy(struct gctl_req *req, struct g_class *mp)
 2569 {
 2570         struct g_journal_softc *sc;
 2571         const char *name;
 2572         char param[16];
 2573         int *nargs;
 2574         int error, i;
 2575 
 2576         g_topology_assert();
 2577 
 2578         nargs = gctl_get_paraml(req, "nargs", sizeof(*nargs));
 2579         if (nargs == NULL) {
 2580                 gctl_error(req, "No '%s' argument.", "nargs");
 2581                 return;
 2582         }
 2583         if (*nargs <= 0) {
 2584                 gctl_error(req, "Missing device(s).");
 2585                 return;
 2586         }
 2587 
 2588         for (i = 0; i < *nargs; i++) {
 2589                 snprintf(param, sizeof(param), "arg%d", i);
 2590                 name = gctl_get_asciiparam(req, param);
 2591                 if (name == NULL) {
 2592                         gctl_error(req, "No 'arg%d' argument.", i);
 2593                         return;
 2594                 }
 2595                 sc = g_journal_find_device(mp, name);
 2596                 if (sc == NULL) {
 2597                         gctl_error(req, "No such device: %s.", name);
 2598                         return;
 2599                 }
 2600                 error = g_journal_destroy(sc);
 2601                 if (error != 0) {
 2602                         gctl_error(req, "Cannot destroy device %s (error=%d).",
 2603                             LIST_FIRST(&sc->sc_geom->provider)->name, error);
 2604                         return;
 2605                 }
 2606         }
 2607 }
 2608 
 2609 static void
 2610 g_journal_ctl_sync(struct gctl_req *req __unused, struct g_class *mp __unused)
 2611 {
 2612 
 2613         g_topology_assert();
 2614         g_topology_unlock();
 2615         g_journal_sync_requested++;
 2616         wakeup(&g_journal_switcher_state);
 2617         while (g_journal_sync_requested > 0)
 2618                 tsleep(&g_journal_sync_requested, PRIBIO, "j:sreq", hz / 2);
 2619         g_topology_lock();
 2620 }
 2621 
 2622 static void
 2623 g_journal_config(struct gctl_req *req, struct g_class *mp, const char *verb)
 2624 {
 2625         uint32_t *version;
 2626 
 2627         g_topology_assert();
 2628 
 2629         version = gctl_get_paraml(req, "version", sizeof(*version));
 2630         if (version == NULL) {
 2631                 gctl_error(req, "No '%s' argument.", "version");
 2632                 return;
 2633         }
 2634         if (*version != G_JOURNAL_VERSION) {
 2635                 gctl_error(req, "Userland and kernel parts are out of sync.");
 2636                 return;
 2637         }
 2638 
 2639         if (strcmp(verb, "destroy") == 0 || strcmp(verb, "stop") == 0) {
 2640                 g_journal_ctl_destroy(req, mp);
 2641                 return;
 2642         } else if (strcmp(verb, "sync") == 0) {
 2643                 g_journal_ctl_sync(req, mp);
 2644                 return;
 2645         }
 2646 
 2647         gctl_error(req, "Unknown verb.");
 2648 }
 2649 
 2650 static void
 2651 g_journal_dumpconf(struct sbuf *sb, const char *indent, struct g_geom *gp,
 2652     struct g_consumer *cp, struct g_provider *pp)
 2653 {
 2654         struct g_journal_softc *sc;
 2655 
 2656         g_topology_assert();
 2657 
 2658         sc = gp->softc;
 2659         if (sc == NULL)
 2660                 return;
 2661         if (pp != NULL) {
 2662                 /* Nothing here. */
 2663         } else if (cp != NULL) {
 2664                 int first = 1;
 2665 
 2666                 sbuf_printf(sb, "%s<Role>", indent);
 2667                 if (cp == sc->sc_dconsumer) {
 2668                         sbuf_printf(sb, "Data");
 2669                         first = 0;
 2670                 }
 2671                 if (cp == sc->sc_jconsumer) {
 2672                         if (!first)
 2673                                 sbuf_printf(sb, ",");
 2674                         sbuf_printf(sb, "Journal");
 2675                 }
 2676                 sbuf_printf(sb, "</Role>\n");
 2677                 if (cp == sc->sc_jconsumer) {
 2678                         sbuf_printf(sb, "<Jstart>%jd</Jstart>\n",
 2679                             (intmax_t)sc->sc_jstart);
 2680                         sbuf_printf(sb, "<Jend>%jd</Jend>\n",
 2681                             (intmax_t)sc->sc_jend);
 2682                 }
 2683         } else {
 2684                 sbuf_printf(sb, "%s<ID>%u</ID>\n", indent, (u_int)sc->sc_id);
 2685         }
 2686 }
 2687 
 2688 static eventhandler_tag g_journal_event_shutdown = NULL;
 2689 static eventhandler_tag g_journal_event_lowmem = NULL;
 2690 
 2691 static void
 2692 g_journal_shutdown(void *arg, int howto __unused)
 2693 {
 2694         struct g_class *mp;
 2695         struct g_geom *gp, *gp2;
 2696 
 2697         if (panicstr != NULL)
 2698                 return;
 2699         mp = arg;
 2700         g_topology_lock();
 2701         LIST_FOREACH_SAFE(gp, &mp->geom, geom, gp2) {
 2702                 if (gp->softc == NULL)
 2703                         continue;
 2704                 GJ_DEBUG(0, "Shutting down geom %s.", gp->name);
 2705                 g_journal_destroy(gp->softc);
 2706         }
 2707         g_topology_unlock();
 2708 }
 2709 
 2710 /*
 2711  * Free cached requests from inactive queue in case of low memory.
 2712  * We free GJ_FREE_AT_ONCE elements at once.
 2713  */
 2714 #define GJ_FREE_AT_ONCE 4
 2715 static void
 2716 g_journal_lowmem(void *arg, int howto __unused)
 2717 {
 2718         struct g_journal_softc *sc;
 2719         struct g_class *mp;
 2720         struct g_geom *gp;
 2721         struct bio *bp;
 2722         u_int nfree = GJ_FREE_AT_ONCE;
 2723 
 2724         g_journal_stats_low_mem++;
 2725         mp = arg;
 2726         g_topology_lock();
 2727         LIST_FOREACH(gp, &mp->geom, geom) {
 2728                 sc = gp->softc;
 2729                 if (sc == NULL || (sc->sc_flags & GJF_DEVICE_DESTROY))
 2730                         continue;
 2731                 mtx_lock(&sc->sc_mtx);
 2732                 for (bp = sc->sc_inactive.jj_queue; nfree > 0 && bp != NULL;
 2733                     nfree--, bp = bp->bio_next) {
 2734                         /*
 2735                          * This is safe to free the bio_data, because:
 2736                          * 1. If bio_data is NULL it will be read from the
 2737                          *    inactive journal.
 2738                          * 2. If bp is sent down, it is first removed from the
 2739                          *    inactive queue, so it's impossible to free the
 2740                          *    data from under in-flight bio.
 2741                          * On the other hand, freeing elements from the active
 2742                          * queue, is not safe.
 2743                          */
 2744                         if (bp->bio_data != NULL) {
 2745                                 GJ_DEBUG(2, "Freeing data from %s.",
 2746                                     sc->sc_name);
 2747                                 gj_free(bp->bio_data, bp->bio_length);
 2748                                 bp->bio_data = NULL;
 2749                         }
 2750                 }
 2751                 mtx_unlock(&sc->sc_mtx);
 2752                 if (nfree == 0)
 2753                         break;
 2754         }
 2755         g_topology_unlock();
 2756 }
 2757 
 2758 static void g_journal_switcher(void *arg);
 2759 
 2760 static void
 2761 g_journal_init(struct g_class *mp)
 2762 {
 2763         int error;
 2764 
 2765         /* Pick a conservative value if provided value sucks. */
 2766         if (g_journal_cache_divisor <= 0 ||
 2767             (vm_kmem_size / g_journal_cache_divisor == 0)) {
 2768                 g_journal_cache_divisor = 5;
 2769         }
 2770         if (g_journal_cache_limit > 0) {
 2771                 g_journal_cache_limit = vm_kmem_size / g_journal_cache_divisor;
 2772                 g_journal_cache_low =
 2773                     (g_journal_cache_limit / 100) * g_journal_cache_switch;
 2774         }
 2775         g_journal_event_shutdown = EVENTHANDLER_REGISTER(shutdown_post_sync,
 2776             g_journal_shutdown, mp, EVENTHANDLER_PRI_FIRST);
 2777         if (g_journal_event_shutdown == NULL)
 2778                 GJ_DEBUG(0, "Warning! Cannot register shutdown event.");
 2779         g_journal_event_lowmem = EVENTHANDLER_REGISTER(vm_lowmem,
 2780             g_journal_lowmem, mp, EVENTHANDLER_PRI_FIRST);
 2781         if (g_journal_event_lowmem == NULL)
 2782                 GJ_DEBUG(0, "Warning! Cannot register lowmem event.");
 2783         error = kproc_create(g_journal_switcher, mp, NULL, 0, 0,
 2784             "g_journal switcher");
 2785         KASSERT(error == 0, ("Cannot create switcher thread."));
 2786 }
 2787 
 2788 static void
 2789 g_journal_fini(struct g_class *mp)
 2790 {
 2791 
 2792         if (g_journal_event_shutdown != NULL) {
 2793                 EVENTHANDLER_DEREGISTER(shutdown_post_sync,
 2794                     g_journal_event_shutdown);
 2795         }
 2796         if (g_journal_event_lowmem != NULL)
 2797                 EVENTHANDLER_DEREGISTER(vm_lowmem, g_journal_event_lowmem);
 2798         g_journal_switcher_state = GJ_SWITCHER_DIE;
 2799         wakeup(&g_journal_switcher_state);
 2800         while (g_journal_switcher_state != GJ_SWITCHER_DIED)
 2801                 tsleep(&g_journal_switcher_state, PRIBIO, "jfini:wait", hz / 5);
 2802         GJ_DEBUG(1, "Switcher died.");
 2803 }
 2804 
 2805 DECLARE_GEOM_CLASS(g_journal_class, g_journal);
 2806 
 2807 static const struct g_journal_desc *
 2808 g_journal_find_desc(const char *fstype)
 2809 {
 2810         const struct g_journal_desc *desc;
 2811         int i;
 2812 
 2813         for (desc = g_journal_filesystems[i = 0]; desc != NULL;
 2814              desc = g_journal_filesystems[++i]) {
 2815                 if (strcmp(desc->jd_fstype, fstype) == 0)
 2816                         break;
 2817         }
 2818         return (desc);
 2819 }
 2820 
 2821 static void
 2822 g_journal_switch_wait(struct g_journal_softc *sc)
 2823 {
 2824         struct bintime bt;
 2825 
 2826         mtx_assert(&sc->sc_mtx, MA_OWNED);
 2827         if (g_journal_debug >= 2) {
 2828                 if (sc->sc_flush_in_progress > 0) {
 2829                         GJ_DEBUG(2, "%d requests flushing.",
 2830                             sc->sc_flush_in_progress);
 2831                 }
 2832                 if (sc->sc_copy_in_progress > 0) {
 2833                         GJ_DEBUG(2, "%d requests copying.",
 2834                             sc->sc_copy_in_progress);
 2835                 }
 2836                 if (sc->sc_flush_count > 0) {
 2837                         GJ_DEBUG(2, "%d requests to flush.",
 2838                             sc->sc_flush_count);
 2839                 }
 2840                 if (sc->sc_delayed_count > 0) {
 2841                         GJ_DEBUG(2, "%d requests delayed.",
 2842                             sc->sc_delayed_count);
 2843                 }
 2844         }
 2845         g_journal_stats_switches++;
 2846         if (sc->sc_copy_in_progress > 0)
 2847                 g_journal_stats_wait_for_copy++;
 2848         GJ_TIMER_START(1, &bt);
 2849         sc->sc_flags &= ~GJF_DEVICE_BEFORE_SWITCH;
 2850         sc->sc_flags |= GJF_DEVICE_SWITCH;
 2851         wakeup(sc);
 2852         while (sc->sc_flags & GJF_DEVICE_SWITCH) {
 2853                 msleep(&sc->sc_journal_copying, &sc->sc_mtx, PRIBIO,
 2854                     "gj:switch", 0);
 2855         }
 2856         GJ_TIMER_STOP(1, &bt, "Switch time of %s", sc->sc_name);
 2857 }
 2858 
 2859 static void
 2860 g_journal_do_switch(struct g_class *classp)
 2861 {
 2862         struct g_journal_softc *sc;
 2863         const struct g_journal_desc *desc;
 2864         struct g_geom *gp;
 2865         struct mount *mp;
 2866         struct bintime bt;
 2867         char *mountpoint;
 2868         int error, save;
 2869 
 2870         g_topology_lock();
 2871         LIST_FOREACH(gp, &classp->geom, geom) {
 2872                 sc = gp->softc;
 2873                 if (sc == NULL)
 2874                         continue;
 2875                 if (sc->sc_flags & GJF_DEVICE_DESTROY)
 2876                         continue;
 2877                 if ((sc->sc_type & GJ_TYPE_COMPLETE) != GJ_TYPE_COMPLETE)
 2878                         continue;
 2879                 mtx_lock(&sc->sc_mtx);
 2880                 sc->sc_flags |= GJF_DEVICE_BEFORE_SWITCH;
 2881                 mtx_unlock(&sc->sc_mtx);
 2882         }
 2883         g_topology_unlock();
 2884 
 2885         mtx_lock(&mountlist_mtx);
 2886         TAILQ_FOREACH(mp, &mountlist, mnt_list) {
 2887                 if (mp->mnt_gjprovider == NULL)
 2888                         continue;
 2889                 if (mp->mnt_flag & MNT_RDONLY)
 2890                         continue;
 2891                 desc = g_journal_find_desc(mp->mnt_stat.f_fstypename);
 2892                 if (desc == NULL)
 2893                         continue;
 2894                 if (vfs_busy(mp, MBF_NOWAIT | MBF_MNTLSTLOCK))
 2895                         continue;
 2896                 /* mtx_unlock(&mountlist_mtx) was done inside vfs_busy() */
 2897 
 2898                 g_topology_lock();
 2899                 sc = g_journal_find_device(classp, mp->mnt_gjprovider);
 2900                 g_topology_unlock();
 2901 
 2902                 if (sc == NULL) {
 2903                         GJ_DEBUG(0, "Cannot find journal geom for %s.",
 2904                             mp->mnt_gjprovider);
 2905                         goto next;
 2906                 } else if (JEMPTY(sc)) {
 2907                         mtx_lock(&sc->sc_mtx);
 2908                         sc->sc_flags &= ~GJF_DEVICE_BEFORE_SWITCH;
 2909                         mtx_unlock(&sc->sc_mtx);
 2910                         GJ_DEBUG(3, "No need for %s switch.", sc->sc_name);
 2911                         goto next;
 2912                 }
 2913 
 2914                 mountpoint = mp->mnt_stat.f_mntonname;
 2915 
 2916                 error = vn_start_write(NULL, &mp, V_WAIT);
 2917                 if (error != 0) {
 2918                         GJ_DEBUG(0, "vn_start_write(%s) failed (error=%d).",
 2919                             mountpoint, error);
 2920                         goto next;
 2921                 }
 2922 
 2923                 save = curthread_pflags_set(TDP_SYNCIO);
 2924 
 2925                 GJ_TIMER_START(1, &bt);
 2926                 vfs_msync(mp, MNT_NOWAIT);
 2927                 GJ_TIMER_STOP(1, &bt, "Msync time of %s", mountpoint);
 2928 
 2929                 GJ_TIMER_START(1, &bt);
 2930                 error = VFS_SYNC(mp, MNT_NOWAIT);
 2931                 if (error == 0)
 2932                         GJ_TIMER_STOP(1, &bt, "Sync time of %s", mountpoint);
 2933                 else {
 2934                         GJ_DEBUG(0, "Cannot sync file system %s (error=%d).",
 2935                             mountpoint, error);
 2936                 }
 2937 
 2938                 curthread_pflags_restore(save);
 2939 
 2940                 vn_finished_write(mp);
 2941 
 2942                 if (error != 0)
 2943                         goto next;
 2944 
 2945                 /*
 2946                  * Send BIO_FLUSH before freezing the file system, so it can be
 2947                  * faster after the freeze.
 2948                  */
 2949                 GJ_TIMER_START(1, &bt);
 2950                 g_journal_flush_cache(sc);
 2951                 GJ_TIMER_STOP(1, &bt, "BIO_FLUSH time of %s", sc->sc_name);
 2952 
 2953                 GJ_TIMER_START(1, &bt);
 2954                 error = vfs_write_suspend(mp, VS_SKIP_UNMOUNT);
 2955                 GJ_TIMER_STOP(1, &bt, "Suspend time of %s", mountpoint);
 2956                 if (error != 0) {
 2957                         GJ_DEBUG(0, "Cannot suspend file system %s (error=%d).",
 2958                             mountpoint, error);
 2959                         goto next;
 2960                 }
 2961 
 2962                 error = desc->jd_clean(mp);
 2963                 if (error != 0)
 2964                         goto next;
 2965 
 2966                 mtx_lock(&sc->sc_mtx);
 2967                 g_journal_switch_wait(sc);
 2968                 mtx_unlock(&sc->sc_mtx);
 2969 
 2970                 vfs_write_resume(mp, 0);
 2971 next:
 2972                 mtx_lock(&mountlist_mtx);
 2973                 vfs_unbusy(mp);
 2974         }
 2975         mtx_unlock(&mountlist_mtx);
 2976 
 2977         sc = NULL;
 2978         for (;;) {
 2979                 g_topology_lock();
 2980                 LIST_FOREACH(gp, &g_journal_class.geom, geom) {
 2981                         sc = gp->softc;
 2982                         if (sc == NULL)
 2983                                 continue;
 2984                         mtx_lock(&sc->sc_mtx);
 2985                         if ((sc->sc_type & GJ_TYPE_COMPLETE) == GJ_TYPE_COMPLETE &&
 2986                             !(sc->sc_flags & GJF_DEVICE_DESTROY) &&
 2987                             (sc->sc_flags & GJF_DEVICE_BEFORE_SWITCH)) {
 2988                                 break;
 2989                         }
 2990                         mtx_unlock(&sc->sc_mtx);
 2991                         sc = NULL;
 2992                 }
 2993                 g_topology_unlock();
 2994                 if (sc == NULL)
 2995                         break;
 2996                 mtx_assert(&sc->sc_mtx, MA_OWNED);
 2997                 g_journal_switch_wait(sc);
 2998                 mtx_unlock(&sc->sc_mtx);
 2999         }
 3000 }
 3001 
 3002 /*
 3003  * TODO: Switcher thread should be started on first geom creation and killed on
 3004  * last geom destruction.
 3005  */
 3006 static void
 3007 g_journal_switcher(void *arg)
 3008 {
 3009         struct g_class *mp;
 3010         struct bintime bt;
 3011         int error;
 3012 
 3013         mp = arg;
 3014         curthread->td_pflags |= TDP_NORUNNINGBUF;
 3015         for (;;) {
 3016                 g_journal_switcher_wokenup = 0;
 3017                 error = tsleep(&g_journal_switcher_state, PRIBIO, "jsw:wait",
 3018                     g_journal_switch_time * hz);
 3019                 if (g_journal_switcher_state == GJ_SWITCHER_DIE) {
 3020                         g_journal_switcher_state = GJ_SWITCHER_DIED;
 3021                         GJ_DEBUG(1, "Switcher exiting.");
 3022                         wakeup(&g_journal_switcher_state);
 3023                         kproc_exit(0);
 3024                 }
 3025                 if (error == 0 && g_journal_sync_requested == 0) {
 3026                         GJ_DEBUG(1, "Out of cache, force switch (used=%u "
 3027                             "limit=%u).", g_journal_cache_used,
 3028                             g_journal_cache_limit);
 3029                 }
 3030                 GJ_TIMER_START(1, &bt);
 3031                 g_journal_do_switch(mp);
 3032                 GJ_TIMER_STOP(1, &bt, "Entire switch time");
 3033                 if (g_journal_sync_requested > 0) {
 3034                         g_journal_sync_requested = 0;
 3035                         wakeup(&g_journal_sync_requested);
 3036                 }
 3037         }
 3038 }

Cache object: 12e035eb6d5227f3ae82c49baa5cffb1


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.