Home | History | Annotate | Line # | Download | only in kern
vfs_wapbl.c revision 1.61.2.6
      1  1.61.2.6     skrll /*	$NetBSD: vfs_wapbl.c,v 1.61.2.6 2017/08/28 17:53:08 skrll Exp $	*/
      2       1.2    simonb 
      3       1.2    simonb /*-
      4      1.23        ad  * Copyright (c) 2003, 2008, 2009 The NetBSD Foundation, Inc.
      5       1.2    simonb  * All rights reserved.
      6       1.2    simonb  *
      7       1.2    simonb  * This code is derived from software contributed to The NetBSD Foundation
      8       1.2    simonb  * by Wasabi Systems, Inc.
      9       1.2    simonb  *
     10       1.2    simonb  * Redistribution and use in source and binary forms, with or without
     11       1.2    simonb  * modification, are permitted provided that the following conditions
     12       1.2    simonb  * are met:
     13       1.2    simonb  * 1. Redistributions of source code must retain the above copyright
     14       1.2    simonb  *    notice, this list of conditions and the following disclaimer.
     15       1.2    simonb  * 2. Redistributions in binary form must reproduce the above copyright
     16       1.2    simonb  *    notice, this list of conditions and the following disclaimer in the
     17       1.2    simonb  *    documentation and/or other materials provided with the distribution.
     18       1.2    simonb  *
     19       1.2    simonb  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20       1.2    simonb  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21       1.2    simonb  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22       1.2    simonb  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23       1.2    simonb  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24       1.2    simonb  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25       1.2    simonb  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26       1.2    simonb  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27       1.2    simonb  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28       1.2    simonb  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29       1.2    simonb  * POSSIBILITY OF SUCH DAMAGE.
     30       1.2    simonb  */
     31       1.2    simonb 
     32       1.2    simonb /*
     33       1.2    simonb  * This implements file system independent write ahead filesystem logging.
     34       1.2    simonb  */
     35       1.4     joerg 
     36       1.4     joerg #define WAPBL_INTERNAL
     37       1.4     joerg 
     38       1.2    simonb #include <sys/cdefs.h>
     39  1.61.2.6     skrll __KERNEL_RCSID(0, "$NetBSD: vfs_wapbl.c,v 1.61.2.6 2017/08/28 17:53:08 skrll Exp $");
     40       1.2    simonb 
     41       1.2    simonb #include <sys/param.h>
     42      1.31   mlelstv #include <sys/bitops.h>
     43  1.61.2.3     skrll #include <sys/time.h>
     44  1.61.2.3     skrll #include <sys/wapbl.h>
     45  1.61.2.3     skrll #include <sys/wapbl_replay.h>
     46       1.2    simonb 
     47       1.2    simonb #ifdef _KERNEL
     48  1.61.2.3     skrll 
     49  1.61.2.3     skrll #include <sys/atomic.h>
     50  1.61.2.3     skrll #include <sys/conf.h>
     51  1.61.2.6     skrll #include <sys/evcnt.h>
     52  1.61.2.3     skrll #include <sys/file.h>
     53  1.61.2.3     skrll #include <sys/kauth.h>
     54  1.61.2.3     skrll #include <sys/kernel.h>
     55  1.61.2.3     skrll #include <sys/module.h>
     56  1.61.2.3     skrll #include <sys/mount.h>
     57  1.61.2.3     skrll #include <sys/mutex.h>
     58       1.2    simonb #include <sys/namei.h>
     59       1.2    simonb #include <sys/proc.h>
     60  1.61.2.3     skrll #include <sys/resourcevar.h>
     61      1.39  christos #include <sys/sysctl.h>
     62       1.2    simonb #include <sys/uio.h>
     63       1.2    simonb #include <sys/vnode.h>
     64       1.2    simonb 
     65       1.2    simonb #include <miscfs/specfs/specdev.h>
     66       1.2    simonb 
     67      1.51      para #define	wapbl_alloc(s) kmem_alloc((s), KM_SLEEP)
     68      1.51      para #define	wapbl_free(a, s) kmem_free((a), (s))
     69      1.51      para #define	wapbl_calloc(n, s) kmem_zalloc((n)*(s), KM_SLEEP)
     70       1.2    simonb 
     71      1.39  christos static struct sysctllog *wapbl_sysctl;
     72      1.39  christos static int wapbl_flush_disk_cache = 1;
     73      1.39  christos static int wapbl_verbose_commit = 0;
     74  1.61.2.6     skrll static int wapbl_allow_dpofua = 0; 	/* switched off by default for now */
     75  1.61.2.6     skrll static int wapbl_journal_iobufs = 4;
     76      1.39  christos 
     77      1.57     joerg static inline size_t wapbl_space_free(size_t, off_t, off_t);
     78      1.57     joerg 
     79       1.2    simonb #else /* !_KERNEL */
     80  1.61.2.3     skrll 
     81       1.2    simonb #include <assert.h>
     82       1.2    simonb #include <errno.h>
     83       1.2    simonb #include <stdbool.h>
     84  1.61.2.3     skrll #include <stdio.h>
     85       1.2    simonb #include <stdlib.h>
     86       1.2    simonb #include <string.h>
     87       1.2    simonb 
     88       1.2    simonb #define	KDASSERT(x) assert(x)
     89       1.2    simonb #define	KASSERT(x) assert(x)
     90      1.51      para #define	wapbl_alloc(s) malloc(s)
     91      1.18      yamt #define	wapbl_free(a, s) free(a)
     92       1.2    simonb #define	wapbl_calloc(n, s) calloc((n), (s))
     93       1.2    simonb 
     94       1.2    simonb #endif /* !_KERNEL */
     95       1.2    simonb 
     96       1.2    simonb /*
     97       1.2    simonb  * INTERNAL DATA STRUCTURES
     98       1.2    simonb  */
     99       1.2    simonb 
    100  1.61.2.4     skrll /*
    101       1.2    simonb  * This structure holds per-mount log information.
    102       1.2    simonb  *
    103       1.2    simonb  * Legend:	a = atomic access only
    104       1.2    simonb  *		r = read-only after init
    105       1.2    simonb  *		l = rwlock held
    106       1.2    simonb  *		m = mutex held
    107      1.38   hannken  *		lm = rwlock held writing or mutex held
    108       1.2    simonb  *		u = unlocked access ok
    109       1.2    simonb  *		b = bufcache_lock held
    110       1.2    simonb  */
    111      1.60      matt LIST_HEAD(wapbl_ino_head, wapbl_ino);
    112       1.2    simonb struct wapbl {
    113       1.2    simonb 	struct vnode *wl_logvp;	/* r:	log here */
    114       1.2    simonb 	struct vnode *wl_devvp;	/* r:	log on this device */
    115       1.2    simonb 	struct mount *wl_mount;	/* r:	mountpoint wl is associated with */
    116       1.2    simonb 	daddr_t wl_logpbn;	/* r:	Physical block number of start of log */
    117       1.2    simonb 	int wl_log_dev_bshift;	/* r:	logarithm of device block size of log
    118       1.2    simonb 					device */
    119       1.2    simonb 	int wl_fs_dev_bshift;	/* r:	logarithm of device block size of
    120       1.2    simonb 					filesystem device */
    121       1.2    simonb 
    122       1.3      yamt 	unsigned wl_lock_count;	/* m:	Count of transactions in progress */
    123       1.2    simonb 
    124       1.2    simonb 	size_t wl_circ_size; 	/* r:	Number of bytes in buffer of log */
    125       1.2    simonb 	size_t wl_circ_off;	/* r:	Number of bytes reserved at start */
    126       1.2    simonb 
    127       1.2    simonb 	size_t wl_bufcount_max;	/* r:	Number of buffers reserved for log */
    128       1.2    simonb 	size_t wl_bufbytes_max;	/* r:	Number of buf bytes reserved for log */
    129       1.2    simonb 
    130       1.2    simonb 	off_t wl_head;		/* l:	Byte offset of log head */
    131       1.2    simonb 	off_t wl_tail;		/* l:	Byte offset of log tail */
    132       1.2    simonb 	/*
    133  1.61.2.3     skrll 	 * WAPBL log layout, stored on wl_devvp at wl_logpbn:
    134  1.61.2.3     skrll 	 *
    135  1.61.2.3     skrll 	 *  ___________________ wl_circ_size __________________
    136  1.61.2.3     skrll 	 * /                                                   \
    137  1.61.2.3     skrll 	 * +---------+---------+-------+--------------+--------+
    138  1.61.2.3     skrll 	 * [ commit0 | commit1 | CCWCW | EEEEEEEEEEEE | CCCWCW ]
    139  1.61.2.3     skrll 	 * +---------+---------+-------+--------------+--------+
    140  1.61.2.3     skrll 	 *       wl_circ_off --^       ^-- wl_head    ^-- wl_tail
    141  1.61.2.3     skrll 	 *
    142  1.61.2.3     skrll 	 * commit0 and commit1 are commit headers.  A commit header has
    143  1.61.2.3     skrll 	 * a generation number, indicating which of the two headers is
    144  1.61.2.3     skrll 	 * more recent, and an assignment of head and tail pointers.
    145  1.61.2.3     skrll 	 * The rest is a circular queue of log records, starting at
    146  1.61.2.3     skrll 	 * the byte offset wl_circ_off.
    147  1.61.2.3     skrll 	 *
    148  1.61.2.3     skrll 	 * E marks empty space for records.
    149  1.61.2.3     skrll 	 * W marks records for block writes issued but waiting.
    150  1.61.2.3     skrll 	 * C marks completed records.
    151  1.61.2.3     skrll 	 *
    152  1.61.2.3     skrll 	 * wapbl_flush writes new records to empty `E' spaces after
    153  1.61.2.3     skrll 	 * wl_head from the current transaction in memory.
    154  1.61.2.3     skrll 	 *
    155  1.61.2.3     skrll 	 * wapbl_truncate advances wl_tail past any completed `C'
    156  1.61.2.3     skrll 	 * records, freeing them up for use.
    157  1.61.2.3     skrll 	 *
    158  1.61.2.3     skrll 	 * head == tail == 0 means log is empty.
    159  1.61.2.3     skrll 	 * head == tail != 0 means log is full.
    160  1.61.2.3     skrll 	 *
    161  1.61.2.3     skrll 	 * See assertions in wapbl_advance() for other boundary
    162  1.61.2.3     skrll 	 * conditions.
    163  1.61.2.3     skrll 	 *
    164  1.61.2.3     skrll 	 * Only wapbl_flush moves the head, except when wapbl_truncate
    165  1.61.2.3     skrll 	 * sets it to 0 to indicate that the log is empty.
    166  1.61.2.3     skrll 	 *
    167  1.61.2.3     skrll 	 * Only wapbl_truncate moves the tail, except when wapbl_flush
    168  1.61.2.3     skrll 	 * sets it to wl_circ_off to indicate that the log is full.
    169       1.2    simonb 	 */
    170       1.2    simonb 
    171       1.2    simonb 	struct wapbl_wc_header *wl_wc_header;	/* l	*/
    172       1.2    simonb 	void *wl_wc_scratch;	/* l:	scratch space (XXX: por que?!?) */
    173       1.2    simonb 
    174       1.2    simonb 	kmutex_t wl_mtx;	/* u:	short-term lock */
    175       1.2    simonb 	krwlock_t wl_rwlock;	/* u:	File system transaction lock */
    176       1.2    simonb 
    177       1.2    simonb 	/*
    178       1.2    simonb 	 * Must be held while accessing
    179       1.2    simonb 	 * wl_count or wl_bufs or head or tail
    180       1.2    simonb 	 */
    181       1.2    simonb 
    182  1.61.2.6     skrll #if _KERNEL
    183       1.2    simonb 	/*
    184       1.2    simonb 	 * Callback called from within the flush routine to flush any extra
    185       1.2    simonb 	 * bits.  Note that flush may be skipped without calling this if
    186       1.2    simonb 	 * there are no outstanding buffers in the transaction.
    187       1.2    simonb 	 */
    188       1.2    simonb 	wapbl_flush_fn_t wl_flush;	/* r	*/
    189       1.2    simonb 	wapbl_flush_fn_t wl_flush_abort;/* r	*/
    190  1.61.2.6     skrll 
    191  1.61.2.6     skrll 	/* Event counters */
    192  1.61.2.6     skrll 	char wl_ev_group[EVCNT_STRING_MAX];	/* r	*/
    193  1.61.2.6     skrll 	struct evcnt wl_ev_commit;		/* l	*/
    194  1.61.2.6     skrll 	struct evcnt wl_ev_journalwrite;	/* l	*/
    195  1.61.2.6     skrll 	struct evcnt wl_ev_jbufs_bio_nowait;	/* l	*/
    196  1.61.2.6     skrll 	struct evcnt wl_ev_jbufs_bio_wait;	/* l	*/
    197  1.61.2.6     skrll 	struct evcnt wl_ev_metawrite;		/* lm	*/
    198  1.61.2.6     skrll 	struct evcnt wl_ev_cacheflush;		/* l	*/
    199       1.5     joerg #endif
    200       1.2    simonb 
    201       1.2    simonb 	size_t wl_bufbytes;	/* m:	Byte count of pages in wl_bufs */
    202       1.2    simonb 	size_t wl_bufcount;	/* m:	Count of buffers in wl_bufs */
    203       1.2    simonb 	size_t wl_bcount;	/* m:	Total bcount of wl_bufs */
    204       1.2    simonb 
    205  1.61.2.6     skrll 	TAILQ_HEAD(, buf) wl_bufs; /* m: Buffers in current transaction */
    206       1.2    simonb 
    207       1.2    simonb 	kcondvar_t wl_reclaimable_cv;	/* m (obviously) */
    208       1.2    simonb 	size_t wl_reclaimable_bytes; /* m:	Amount of space available for
    209       1.2    simonb 						reclamation by truncate */
    210       1.2    simonb 	int wl_error_count;	/* m:	# of wl_entries with errors */
    211       1.2    simonb 	size_t wl_reserved_bytes; /* never truncate log smaller than this */
    212       1.2    simonb 
    213       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
    214       1.2    simonb 	size_t wl_unsynced_bufbytes; /* Byte count of unsynced buffers */
    215       1.2    simonb #endif
    216       1.2    simonb 
    217  1.61.2.4     skrll #if _KERNEL
    218  1.61.2.4     skrll 	int wl_brperjblock;	/* r Block records per journal block */
    219  1.61.2.4     skrll #endif
    220  1.61.2.4     skrll 
    221  1.61.2.5     skrll 	TAILQ_HEAD(, wapbl_dealloc) wl_dealloclist;	/* lm:	list head */
    222  1.61.2.4     skrll 	int wl_dealloccnt;				/* lm:	total count */
    223  1.61.2.4     skrll 	int wl_dealloclim;				/* r:	max count */
    224       1.2    simonb 
    225       1.2    simonb 	/* hashtable of inode numbers for allocated but unlinked inodes */
    226       1.2    simonb 	/* synch ??? */
    227      1.60      matt 	struct wapbl_ino_head *wl_inohash;
    228       1.2    simonb 	u_long wl_inohashmask;
    229       1.2    simonb 	int wl_inohashcnt;
    230       1.2    simonb 
    231       1.2    simonb 	SIMPLEQ_HEAD(, wapbl_entry) wl_entries; /* On disk transaction
    232       1.2    simonb 						   accounting */
    233      1.54   hannken 
    234  1.61.2.6     skrll 	/* buffers for wapbl_buffered_write() */
    235  1.61.2.6     skrll 	TAILQ_HEAD(, buf) wl_iobufs;		/* l: Free or filling bufs */
    236  1.61.2.6     skrll 	TAILQ_HEAD(, buf) wl_iobufs_busy;	/* l: In-transit bufs */
    237  1.61.2.6     skrll 
    238  1.61.2.6     skrll 	int wl_dkcache;		/* r: 	disk cache flags */
    239  1.61.2.6     skrll #define WAPBL_USE_FUA(wl)	\
    240  1.61.2.6     skrll 		(wapbl_allow_dpofua && ISSET((wl)->wl_dkcache, DKCACHE_FUA))
    241  1.61.2.6     skrll #define WAPBL_JFLAGS(wl)	\
    242  1.61.2.6     skrll 		(WAPBL_USE_FUA(wl) ? (wl)->wl_jwrite_flags : 0)
    243  1.61.2.6     skrll #define WAPBL_MFLAGS(wl)	\
    244  1.61.2.6     skrll 		(WAPBL_USE_FUA(wl) ? (wl)->wl_mwrite_flags : 0)
    245  1.61.2.6     skrll 	int wl_jwrite_flags;	/* r: 	journal write flags */
    246  1.61.2.6     skrll 	int wl_mwrite_flags;	/* r:	metadata write flags */
    247       1.2    simonb };
    248       1.2    simonb 
    249       1.2    simonb #ifdef WAPBL_DEBUG_PRINT
    250       1.2    simonb int wapbl_debug_print = WAPBL_DEBUG_PRINT;
    251       1.2    simonb #endif
    252       1.2    simonb 
    253       1.2    simonb /****************************************************************/
    254       1.2    simonb #ifdef _KERNEL
    255       1.2    simonb 
    256       1.2    simonb #ifdef WAPBL_DEBUG
    257       1.2    simonb struct wapbl *wapbl_debug_wl;
    258       1.2    simonb #endif
    259       1.2    simonb 
    260       1.2    simonb static int wapbl_write_commit(struct wapbl *wl, off_t head, off_t tail);
    261       1.2    simonb static int wapbl_write_blocks(struct wapbl *wl, off_t *offp);
    262       1.2    simonb static int wapbl_write_revocations(struct wapbl *wl, off_t *offp);
    263       1.2    simonb static int wapbl_write_inodes(struct wapbl *wl, off_t *offp);
    264       1.2    simonb #endif /* _KERNEL */
    265       1.2    simonb 
    266      1.14     joerg static int wapbl_replay_process(struct wapbl_replay *wr, off_t, off_t);
    267       1.2    simonb 
    268      1.30  uebayasi static inline size_t wapbl_space_used(size_t avail, off_t head,
    269       1.2    simonb 	off_t tail);
    270       1.2    simonb 
    271       1.2    simonb #ifdef _KERNEL
    272       1.2    simonb 
    273      1.51      para static struct pool wapbl_entry_pool;
    274  1.61.2.4     skrll static struct pool wapbl_dealloc_pool;
    275      1.51      para 
    276       1.2    simonb #define	WAPBL_INODETRK_SIZE 83
    277       1.2    simonb static int wapbl_ino_pool_refcount;
    278       1.2    simonb static struct pool wapbl_ino_pool;
    279       1.2    simonb struct wapbl_ino {
    280       1.2    simonb 	LIST_ENTRY(wapbl_ino) wi_hash;
    281       1.2    simonb 	ino_t wi_ino;
    282       1.2    simonb 	mode_t wi_mode;
    283       1.2    simonb };
    284       1.2    simonb 
    285       1.2    simonb static void wapbl_inodetrk_init(struct wapbl *wl, u_int size);
    286       1.2    simonb static void wapbl_inodetrk_free(struct wapbl *wl);
    287       1.2    simonb static struct wapbl_ino *wapbl_inodetrk_get(struct wapbl *wl, ino_t ino);
    288       1.2    simonb 
    289       1.2    simonb static size_t wapbl_transaction_len(struct wapbl *wl);
    290      1.30  uebayasi static inline size_t wapbl_transaction_inodes_len(struct wapbl *wl);
    291       1.2    simonb 
    292  1.61.2.5     skrll static void wapbl_deallocation_free(struct wapbl *, struct wapbl_dealloc *,
    293  1.61.2.5     skrll 	bool);
    294  1.61.2.5     skrll 
    295  1.61.2.6     skrll static void wapbl_evcnt_init(struct wapbl *);
    296  1.61.2.6     skrll static void wapbl_evcnt_free(struct wapbl *);
    297  1.61.2.6     skrll 
    298  1.61.2.6     skrll static void wapbl_dkcache_init(struct wapbl *);
    299  1.61.2.6     skrll 
    300      1.13     joerg #if 0
    301       1.4     joerg int wapbl_replay_verify(struct wapbl_replay *, struct vnode *);
    302       1.4     joerg #endif
    303       1.4     joerg 
    304       1.4     joerg static int wapbl_replay_isopen1(struct wapbl_replay *);
    305       1.4     joerg 
    306       1.2    simonb struct wapbl_ops wapbl_ops = {
    307       1.2    simonb 	.wo_wapbl_discard	= wapbl_discard,
    308       1.2    simonb 	.wo_wapbl_replay_isopen	= wapbl_replay_isopen1,
    309       1.6     joerg 	.wo_wapbl_replay_can_read = wapbl_replay_can_read,
    310       1.2    simonb 	.wo_wapbl_replay_read	= wapbl_replay_read,
    311       1.2    simonb 	.wo_wapbl_add_buf	= wapbl_add_buf,
    312       1.2    simonb 	.wo_wapbl_remove_buf	= wapbl_remove_buf,
    313       1.2    simonb 	.wo_wapbl_resize_buf	= wapbl_resize_buf,
    314       1.2    simonb 	.wo_wapbl_begin		= wapbl_begin,
    315       1.2    simonb 	.wo_wapbl_end		= wapbl_end,
    316       1.2    simonb 	.wo_wapbl_junlock_assert= wapbl_junlock_assert,
    317       1.2    simonb 
    318       1.2    simonb 	/* XXX: the following is only used to say "this is a wapbl buf" */
    319       1.2    simonb 	.wo_wapbl_biodone	= wapbl_biodone,
    320       1.2    simonb };
    321       1.2    simonb 
    322      1.21      yamt static int
    323      1.39  christos wapbl_sysctl_init(void)
    324      1.39  christos {
    325      1.39  christos 	int rv;
    326      1.39  christos 	const struct sysctlnode *rnode, *cnode;
    327      1.39  christos 
    328      1.39  christos 	wapbl_sysctl = NULL;
    329      1.39  christos 
    330      1.39  christos 	rv = sysctl_createv(&wapbl_sysctl, 0, NULL, &rnode,
    331      1.39  christos 		       CTLFLAG_PERMANENT,
    332      1.39  christos 		       CTLTYPE_NODE, "wapbl",
    333      1.39  christos 		       SYSCTL_DESCR("WAPBL journaling options"),
    334      1.39  christos 		       NULL, 0, NULL, 0,
    335      1.59     pooka 		       CTL_VFS, CTL_CREATE, CTL_EOL);
    336      1.39  christos 	if (rv)
    337      1.39  christos 		return rv;
    338      1.39  christos 
    339      1.39  christos 	rv = sysctl_createv(&wapbl_sysctl, 0, &rnode, &cnode,
    340      1.39  christos 		       CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
    341      1.39  christos 		       CTLTYPE_INT, "flush_disk_cache",
    342      1.39  christos 		       SYSCTL_DESCR("flush disk cache"),
    343      1.39  christos 		       NULL, 0, &wapbl_flush_disk_cache, 0,
    344      1.39  christos 		       CTL_CREATE, CTL_EOL);
    345      1.39  christos 	if (rv)
    346      1.39  christos 		return rv;
    347      1.39  christos 
    348      1.39  christos 	rv = sysctl_createv(&wapbl_sysctl, 0, &rnode, &cnode,
    349      1.39  christos 		       CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
    350      1.39  christos 		       CTLTYPE_INT, "verbose_commit",
    351      1.39  christos 		       SYSCTL_DESCR("show time and size of wapbl log commits"),
    352      1.39  christos 		       NULL, 0, &wapbl_verbose_commit, 0,
    353      1.39  christos 		       CTL_CREATE, CTL_EOL);
    354  1.61.2.6     skrll 	if (rv)
    355  1.61.2.6     skrll 		return rv;
    356  1.61.2.6     skrll 
    357  1.61.2.6     skrll 	rv = sysctl_createv(&wapbl_sysctl, 0, &rnode, &cnode,
    358  1.61.2.6     skrll 		       CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
    359  1.61.2.6     skrll 		       CTLTYPE_INT, "allow_dpofua",
    360  1.61.2.6     skrll 		       SYSCTL_DESCR("allow use of FUA/DPO instead of cash flush if available"),
    361  1.61.2.6     skrll 		       NULL, 0, &wapbl_allow_dpofua, 0,
    362  1.61.2.6     skrll 		       CTL_CREATE, CTL_EOL);
    363  1.61.2.6     skrll 	if (rv)
    364  1.61.2.6     skrll 		return rv;
    365  1.61.2.6     skrll 
    366  1.61.2.6     skrll 	rv = sysctl_createv(&wapbl_sysctl, 0, &rnode, &cnode,
    367  1.61.2.6     skrll 		       CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
    368  1.61.2.6     skrll 		       CTLTYPE_INT, "journal_iobufs",
    369  1.61.2.6     skrll 		       SYSCTL_DESCR("count of bufs used for journal I/O (max async count)"),
    370  1.61.2.6     skrll 		       NULL, 0, &wapbl_journal_iobufs, 0,
    371  1.61.2.6     skrll 		       CTL_CREATE, CTL_EOL);
    372  1.61.2.6     skrll 	if (rv)
    373  1.61.2.6     skrll 		return rv;
    374  1.61.2.6     skrll 
    375      1.39  christos 	return rv;
    376      1.39  christos }
    377      1.39  christos 
    378      1.39  christos static void
    379      1.39  christos wapbl_init(void)
    380      1.39  christos {
    381      1.51      para 
    382      1.51      para 	pool_init(&wapbl_entry_pool, sizeof(struct wapbl_entry), 0, 0, 0,
    383      1.51      para 	    "wapblentrypl", &pool_allocator_kmem, IPL_VM);
    384  1.61.2.4     skrll 	pool_init(&wapbl_dealloc_pool, sizeof(struct wapbl_dealloc), 0, 0, 0,
    385  1.61.2.4     skrll 	    "wapbldealloc", &pool_allocator_nointr, IPL_NONE);
    386      1.51      para 
    387      1.39  christos 	wapbl_sysctl_init();
    388      1.39  christos }
    389      1.39  christos 
    390      1.39  christos static int
    391  1.61.2.3     skrll wapbl_fini(void)
    392      1.39  christos {
    393      1.51      para 
    394  1.61.2.2     skrll 	if (wapbl_sysctl != NULL)
    395  1.61.2.2     skrll 		 sysctl_teardown(&wapbl_sysctl);
    396      1.51      para 
    397  1.61.2.4     skrll 	pool_destroy(&wapbl_dealloc_pool);
    398      1.51      para 	pool_destroy(&wapbl_entry_pool);
    399      1.51      para 
    400      1.39  christos 	return 0;
    401      1.39  christos }
    402      1.39  christos 
    403  1.61.2.6     skrll static void
    404  1.61.2.6     skrll wapbl_evcnt_init(struct wapbl *wl)
    405  1.61.2.6     skrll {
    406  1.61.2.6     skrll 	snprintf(wl->wl_ev_group, sizeof(wl->wl_ev_group),
    407  1.61.2.6     skrll 	    "wapbl fsid 0x%x/0x%x",
    408  1.61.2.6     skrll 	    wl->wl_mount->mnt_stat.f_fsidx.__fsid_val[0],
    409  1.61.2.6     skrll 	    wl->wl_mount->mnt_stat.f_fsidx.__fsid_val[1]
    410  1.61.2.6     skrll 	);
    411  1.61.2.6     skrll 
    412  1.61.2.6     skrll 	evcnt_attach_dynamic(&wl->wl_ev_commit, EVCNT_TYPE_MISC,
    413  1.61.2.6     skrll 	    NULL, wl->wl_ev_group, "commit");
    414  1.61.2.6     skrll 	evcnt_attach_dynamic(&wl->wl_ev_journalwrite, EVCNT_TYPE_MISC,
    415  1.61.2.6     skrll 	    NULL, wl->wl_ev_group, "journal sync block write");
    416  1.61.2.6     skrll 	evcnt_attach_dynamic(&wl->wl_ev_jbufs_bio_nowait, EVCNT_TYPE_MISC,
    417  1.61.2.6     skrll 	    NULL, wl->wl_ev_group, "journal I/O bufs no wait");
    418  1.61.2.6     skrll 	evcnt_attach_dynamic(&wl->wl_ev_jbufs_bio_wait, EVCNT_TYPE_MISC,
    419  1.61.2.6     skrll 	    NULL, wl->wl_ev_group, "journal I/O bufs biowait");
    420  1.61.2.6     skrll 	evcnt_attach_dynamic(&wl->wl_ev_metawrite, EVCNT_TYPE_MISC,
    421  1.61.2.6     skrll 	    NULL, wl->wl_ev_group, "metadata finished block write");
    422  1.61.2.6     skrll 	evcnt_attach_dynamic(&wl->wl_ev_cacheflush, EVCNT_TYPE_MISC,
    423  1.61.2.6     skrll 	    NULL, wl->wl_ev_group, "cache flush");
    424  1.61.2.6     skrll }
    425  1.61.2.6     skrll 
    426  1.61.2.6     skrll static void
    427  1.61.2.6     skrll wapbl_evcnt_free(struct wapbl *wl)
    428  1.61.2.6     skrll {
    429  1.61.2.6     skrll 	evcnt_detach(&wl->wl_ev_commit);
    430  1.61.2.6     skrll 	evcnt_detach(&wl->wl_ev_journalwrite);
    431  1.61.2.6     skrll 	evcnt_detach(&wl->wl_ev_jbufs_bio_nowait);
    432  1.61.2.6     skrll 	evcnt_detach(&wl->wl_ev_jbufs_bio_wait);
    433  1.61.2.6     skrll 	evcnt_detach(&wl->wl_ev_metawrite);
    434  1.61.2.6     skrll 	evcnt_detach(&wl->wl_ev_cacheflush);
    435  1.61.2.6     skrll }
    436  1.61.2.6     skrll 
    437  1.61.2.6     skrll static void
    438  1.61.2.6     skrll wapbl_dkcache_init(struct wapbl *wl)
    439  1.61.2.6     skrll {
    440  1.61.2.6     skrll 	int error;
    441  1.61.2.6     skrll 
    442  1.61.2.6     skrll 	/* Get disk cache flags */
    443  1.61.2.6     skrll 	error = VOP_IOCTL(wl->wl_devvp, DIOCGCACHE, &wl->wl_dkcache,
    444  1.61.2.6     skrll 	    FWRITE, FSCRED);
    445  1.61.2.6     skrll 	if (error) {
    446  1.61.2.6     skrll 		/* behave as if there was a write cache */
    447  1.61.2.6     skrll 		wl->wl_dkcache = DKCACHE_WRITE;
    448  1.61.2.6     skrll 	}
    449  1.61.2.6     skrll 
    450  1.61.2.6     skrll 	/* Use FUA instead of cache flush if available */
    451  1.61.2.6     skrll 	if (ISSET(wl->wl_dkcache, DKCACHE_FUA)) {
    452  1.61.2.6     skrll 		wl->wl_jwrite_flags |= B_MEDIA_FUA;
    453  1.61.2.6     skrll 		wl->wl_mwrite_flags |= B_MEDIA_FUA;
    454  1.61.2.6     skrll 	}
    455  1.61.2.6     skrll 
    456  1.61.2.6     skrll 	/* Use DPO for journal writes if available */
    457  1.61.2.6     skrll 	if (ISSET(wl->wl_dkcache, DKCACHE_DPO))
    458  1.61.2.6     skrll 		wl->wl_jwrite_flags |= B_MEDIA_DPO;
    459  1.61.2.6     skrll }
    460  1.61.2.6     skrll 
    461      1.39  christos static int
    462      1.15     joerg wapbl_start_flush_inodes(struct wapbl *wl, struct wapbl_replay *wr)
    463      1.15     joerg {
    464      1.15     joerg 	int error, i;
    465      1.15     joerg 
    466      1.15     joerg 	WAPBL_PRINTF(WAPBL_PRINT_REPLAY,
    467      1.15     joerg 	    ("wapbl_start: reusing log with %d inodes\n", wr->wr_inodescnt));
    468      1.15     joerg 
    469      1.15     joerg 	/*
    470      1.15     joerg 	 * Its only valid to reuse the replay log if its
    471      1.15     joerg 	 * the same as the new log we just opened.
    472      1.15     joerg 	 */
    473      1.15     joerg 	KDASSERT(!wapbl_replay_isopen(wr));
    474      1.47  christos 	KASSERT(wl->wl_devvp->v_type == VBLK);
    475      1.47  christos 	KASSERT(wr->wr_devvp->v_type == VBLK);
    476      1.15     joerg 	KASSERT(wl->wl_devvp->v_rdev == wr->wr_devvp->v_rdev);
    477      1.15     joerg 	KASSERT(wl->wl_logpbn == wr->wr_logpbn);
    478      1.15     joerg 	KASSERT(wl->wl_circ_size == wr->wr_circ_size);
    479      1.15     joerg 	KASSERT(wl->wl_circ_off == wr->wr_circ_off);
    480      1.15     joerg 	KASSERT(wl->wl_log_dev_bshift == wr->wr_log_dev_bshift);
    481      1.15     joerg 	KASSERT(wl->wl_fs_dev_bshift == wr->wr_fs_dev_bshift);
    482      1.15     joerg 
    483      1.15     joerg 	wl->wl_wc_header->wc_generation = wr->wr_generation + 1;
    484      1.15     joerg 
    485      1.15     joerg 	for (i = 0; i < wr->wr_inodescnt; i++)
    486      1.15     joerg 		wapbl_register_inode(wl, wr->wr_inodes[i].wr_inumber,
    487      1.15     joerg 		    wr->wr_inodes[i].wr_imode);
    488      1.15     joerg 
    489      1.15     joerg 	/* Make sure new transaction won't overwrite old inodes list */
    490  1.61.2.4     skrll 	KDASSERT(wapbl_transaction_len(wl) <=
    491      1.15     joerg 	    wapbl_space_free(wl->wl_circ_size, wr->wr_inodeshead,
    492      1.15     joerg 	    wr->wr_inodestail));
    493      1.15     joerg 
    494      1.15     joerg 	wl->wl_head = wl->wl_tail = wr->wr_inodeshead;
    495      1.15     joerg 	wl->wl_reclaimable_bytes = wl->wl_reserved_bytes =
    496      1.15     joerg 	    wapbl_transaction_len(wl);
    497      1.15     joerg 
    498      1.15     joerg 	error = wapbl_write_inodes(wl, &wl->wl_head);
    499      1.15     joerg 	if (error)
    500      1.15     joerg 		return error;
    501      1.15     joerg 
    502      1.15     joerg 	KASSERT(wl->wl_head != wl->wl_tail);
    503      1.15     joerg 	KASSERT(wl->wl_head != 0);
    504      1.15     joerg 
    505      1.15     joerg 	return 0;
    506      1.15     joerg }
    507      1.15     joerg 
    508       1.2    simonb int
    509       1.2    simonb wapbl_start(struct wapbl ** wlp, struct mount *mp, struct vnode *vp,
    510       1.2    simonb 	daddr_t off, size_t count, size_t blksize, struct wapbl_replay *wr,
    511       1.2    simonb 	wapbl_flush_fn_t flushfn, wapbl_flush_fn_t flushabortfn)
    512       1.2    simonb {
    513       1.2    simonb 	struct wapbl *wl;
    514       1.2    simonb 	struct vnode *devvp;
    515       1.2    simonb 	daddr_t logpbn;
    516       1.2    simonb 	int error;
    517      1.31   mlelstv 	int log_dev_bshift = ilog2(blksize);
    518      1.32   mlelstv 	int fs_dev_bshift = log_dev_bshift;
    519       1.2    simonb 	int run;
    520       1.2    simonb 
    521       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_OPEN, ("wapbl_start: vp=%p off=%" PRId64
    522       1.2    simonb 	    " count=%zu blksize=%zu\n", vp, off, count, blksize));
    523       1.2    simonb 
    524       1.2    simonb 	if (log_dev_bshift > fs_dev_bshift) {
    525       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_OPEN,
    526       1.2    simonb 			("wapbl: log device's block size cannot be larger "
    527       1.2    simonb 			 "than filesystem's\n"));
    528       1.2    simonb 		/*
    529       1.2    simonb 		 * Not currently implemented, although it could be if
    530       1.2    simonb 		 * needed someday.
    531       1.2    simonb 		 */
    532       1.2    simonb 		return ENOSYS;
    533       1.2    simonb 	}
    534       1.2    simonb 
    535       1.2    simonb 	if (off < 0)
    536       1.2    simonb 		return EINVAL;
    537       1.2    simonb 
    538       1.2    simonb 	if (blksize < DEV_BSIZE)
    539       1.2    simonb 		return EINVAL;
    540       1.2    simonb 	if (blksize % DEV_BSIZE)
    541       1.2    simonb 		return EINVAL;
    542       1.2    simonb 
    543       1.2    simonb 	/* XXXTODO: verify that the full load is writable */
    544       1.2    simonb 
    545       1.2    simonb 	/*
    546       1.2    simonb 	 * XXX check for minimum log size
    547       1.2    simonb 	 * minimum is governed by minimum amount of space
    548       1.2    simonb 	 * to complete a transaction. (probably truncate)
    549       1.2    simonb 	 */
    550       1.2    simonb 	/* XXX for now pick something minimal */
    551       1.2    simonb 	if ((count * blksize) < MAXPHYS) {
    552       1.2    simonb 		return ENOSPC;
    553       1.2    simonb 	}
    554       1.2    simonb 
    555       1.2    simonb 	if ((error = VOP_BMAP(vp, off, &devvp, &logpbn, &run)) != 0) {
    556       1.2    simonb 		return error;
    557       1.2    simonb 	}
    558       1.2    simonb 
    559       1.2    simonb 	wl = wapbl_calloc(1, sizeof(*wl));
    560       1.2    simonb 	rw_init(&wl->wl_rwlock);
    561       1.2    simonb 	mutex_init(&wl->wl_mtx, MUTEX_DEFAULT, IPL_NONE);
    562       1.2    simonb 	cv_init(&wl->wl_reclaimable_cv, "wapblrec");
    563  1.61.2.6     skrll 	TAILQ_INIT(&wl->wl_bufs);
    564       1.2    simonb 	SIMPLEQ_INIT(&wl->wl_entries);
    565       1.2    simonb 
    566       1.2    simonb 	wl->wl_logvp = vp;
    567       1.2    simonb 	wl->wl_devvp = devvp;
    568       1.2    simonb 	wl->wl_mount = mp;
    569       1.2    simonb 	wl->wl_logpbn = logpbn;
    570       1.2    simonb 	wl->wl_log_dev_bshift = log_dev_bshift;
    571       1.2    simonb 	wl->wl_fs_dev_bshift = fs_dev_bshift;
    572       1.2    simonb 
    573       1.2    simonb 	wl->wl_flush = flushfn;
    574       1.2    simonb 	wl->wl_flush_abort = flushabortfn;
    575       1.2    simonb 
    576       1.2    simonb 	/* Reserve two log device blocks for the commit headers */
    577       1.2    simonb 	wl->wl_circ_off = 2<<wl->wl_log_dev_bshift;
    578      1.34   mlelstv 	wl->wl_circ_size = ((count * blksize) - wl->wl_circ_off);
    579       1.2    simonb 	/* truncate the log usage to a multiple of log_dev_bshift */
    580       1.2    simonb 	wl->wl_circ_size >>= wl->wl_log_dev_bshift;
    581       1.2    simonb 	wl->wl_circ_size <<= wl->wl_log_dev_bshift;
    582       1.2    simonb 
    583       1.2    simonb 	/*
    584       1.2    simonb 	 * wl_bufbytes_max limits the size of the in memory transaction space.
    585       1.2    simonb 	 * - Since buffers are allocated and accounted for in units of
    586       1.2    simonb 	 *   PAGE_SIZE it is required to be a multiple of PAGE_SIZE
    587       1.2    simonb 	 *   (i.e. 1<<PAGE_SHIFT)
    588       1.2    simonb 	 * - Since the log device has to be written in units of
    589       1.2    simonb 	 *   1<<wl_log_dev_bshift it is required to be a mulitple of
    590       1.2    simonb 	 *   1<<wl_log_dev_bshift.
    591       1.2    simonb 	 * - Since filesystem will provide data in units of 1<<wl_fs_dev_bshift,
    592       1.2    simonb 	 *   it is convenient to be a multiple of 1<<wl_fs_dev_bshift.
    593       1.2    simonb 	 * Therefore it must be multiple of the least common multiple of those
    594       1.2    simonb 	 * three quantities.  Fortunately, all of those quantities are
    595       1.2    simonb 	 * guaranteed to be a power of two, and the least common multiple of
    596       1.2    simonb 	 * a set of numbers which are all powers of two is simply the maximum
    597       1.2    simonb 	 * of those numbers.  Finally, the maximum logarithm of a power of two
    598       1.2    simonb 	 * is the same as the log of the maximum power of two.  So we can do
    599       1.2    simonb 	 * the following operations to size wl_bufbytes_max:
    600       1.2    simonb 	 */
    601       1.2    simonb 
    602       1.2    simonb 	/* XXX fix actual number of pages reserved per filesystem. */
    603       1.2    simonb 	wl->wl_bufbytes_max = MIN(wl->wl_circ_size, buf_memcalc() / 2);
    604       1.2    simonb 
    605       1.2    simonb 	/* Round wl_bufbytes_max to the largest power of two constraint */
    606       1.2    simonb 	wl->wl_bufbytes_max >>= PAGE_SHIFT;
    607       1.2    simonb 	wl->wl_bufbytes_max <<= PAGE_SHIFT;
    608       1.2    simonb 	wl->wl_bufbytes_max >>= wl->wl_log_dev_bshift;
    609       1.2    simonb 	wl->wl_bufbytes_max <<= wl->wl_log_dev_bshift;
    610       1.2    simonb 	wl->wl_bufbytes_max >>= wl->wl_fs_dev_bshift;
    611       1.2    simonb 	wl->wl_bufbytes_max <<= wl->wl_fs_dev_bshift;
    612       1.2    simonb 
    613       1.2    simonb 	/* XXX maybe use filesystem fragment size instead of 1024 */
    614       1.2    simonb 	/* XXX fix actual number of buffers reserved per filesystem. */
    615  1.61.2.6     skrll 	wl->wl_bufcount_max = (buf_nbuf() / 2) * 1024;
    616       1.2    simonb 
    617  1.61.2.4     skrll 	wl->wl_brperjblock = ((1<<wl->wl_log_dev_bshift)
    618  1.61.2.4     skrll 	    - offsetof(struct wapbl_wc_blocklist, wc_blocks)) /
    619  1.61.2.4     skrll 	    sizeof(((struct wapbl_wc_blocklist *)0)->wc_blocks[0]);
    620  1.61.2.4     skrll 	KASSERT(wl->wl_brperjblock > 0);
    621  1.61.2.4     skrll 
    622       1.2    simonb 	/* XXX tie this into resource estimation */
    623      1.41   hannken 	wl->wl_dealloclim = wl->wl_bufbytes_max / mp->mnt_stat.f_bsize / 2;
    624  1.61.2.5     skrll 	TAILQ_INIT(&wl->wl_dealloclist);
    625       1.2    simonb 
    626       1.2    simonb 	wapbl_inodetrk_init(wl, WAPBL_INODETRK_SIZE);
    627       1.2    simonb 
    628  1.61.2.6     skrll 	wapbl_evcnt_init(wl);
    629  1.61.2.6     skrll 
    630  1.61.2.6     skrll 	wapbl_dkcache_init(wl);
    631  1.61.2.6     skrll 
    632       1.2    simonb 	/* Initialize the commit header */
    633       1.2    simonb 	{
    634       1.2    simonb 		struct wapbl_wc_header *wc;
    635      1.14     joerg 		size_t len = 1 << wl->wl_log_dev_bshift;
    636       1.2    simonb 		wc = wapbl_calloc(1, len);
    637       1.2    simonb 		wc->wc_type = WAPBL_WC_HEADER;
    638       1.2    simonb 		wc->wc_len = len;
    639       1.2    simonb 		wc->wc_circ_off = wl->wl_circ_off;
    640       1.2    simonb 		wc->wc_circ_size = wl->wl_circ_size;
    641       1.2    simonb 		/* XXX wc->wc_fsid */
    642       1.2    simonb 		wc->wc_log_dev_bshift = wl->wl_log_dev_bshift;
    643       1.2    simonb 		wc->wc_fs_dev_bshift = wl->wl_fs_dev_bshift;
    644       1.2    simonb 		wl->wl_wc_header = wc;
    645      1.51      para 		wl->wl_wc_scratch = wapbl_alloc(len);
    646       1.2    simonb 	}
    647       1.2    simonb 
    648  1.61.2.6     skrll 	TAILQ_INIT(&wl->wl_iobufs);
    649  1.61.2.6     skrll 	TAILQ_INIT(&wl->wl_iobufs_busy);
    650  1.61.2.6     skrll 	for (int i = 0; i < wapbl_journal_iobufs; i++) {
    651  1.61.2.6     skrll 		struct buf *bp;
    652  1.61.2.6     skrll 
    653  1.61.2.6     skrll 		if ((bp = geteblk(MAXPHYS)) == NULL)
    654  1.61.2.6     skrll 			goto errout;
    655  1.61.2.6     skrll 
    656  1.61.2.6     skrll 		mutex_enter(&bufcache_lock);
    657  1.61.2.6     skrll 		mutex_enter(devvp->v_interlock);
    658  1.61.2.6     skrll 		bgetvp(devvp, bp);
    659  1.61.2.6     skrll 		mutex_exit(devvp->v_interlock);
    660  1.61.2.6     skrll 		mutex_exit(&bufcache_lock);
    661  1.61.2.6     skrll 
    662  1.61.2.6     skrll 		bp->b_dev = devvp->v_rdev;
    663  1.61.2.6     skrll 
    664  1.61.2.6     skrll 		TAILQ_INSERT_TAIL(&wl->wl_iobufs, bp, b_wapbllist);
    665  1.61.2.6     skrll 	}
    666  1.61.2.6     skrll 
    667       1.2    simonb 	/*
    668       1.2    simonb 	 * if there was an existing set of unlinked but
    669       1.2    simonb 	 * allocated inodes, preserve it in the new
    670       1.2    simonb 	 * log.
    671       1.2    simonb 	 */
    672       1.2    simonb 	if (wr && wr->wr_inodescnt) {
    673      1.15     joerg 		error = wapbl_start_flush_inodes(wl, wr);
    674       1.2    simonb 		if (error)
    675       1.2    simonb 			goto errout;
    676       1.2    simonb 	}
    677       1.2    simonb 
    678       1.2    simonb 	error = wapbl_write_commit(wl, wl->wl_head, wl->wl_tail);
    679       1.2    simonb 	if (error) {
    680       1.2    simonb 		goto errout;
    681       1.2    simonb 	}
    682       1.2    simonb 
    683       1.2    simonb 	*wlp = wl;
    684       1.2    simonb #if defined(WAPBL_DEBUG)
    685       1.2    simonb 	wapbl_debug_wl = wl;
    686       1.2    simonb #endif
    687       1.2    simonb 
    688       1.2    simonb 	return 0;
    689       1.2    simonb  errout:
    690       1.2    simonb 	wapbl_discard(wl);
    691      1.18      yamt 	wapbl_free(wl->wl_wc_scratch, wl->wl_wc_header->wc_len);
    692      1.18      yamt 	wapbl_free(wl->wl_wc_header, wl->wl_wc_header->wc_len);
    693  1.61.2.6     skrll 	while (!TAILQ_EMPTY(&wl->wl_iobufs)) {
    694  1.61.2.6     skrll 		struct buf *bp;
    695  1.61.2.6     skrll 
    696  1.61.2.6     skrll 		bp = TAILQ_FIRST(&wl->wl_iobufs);
    697  1.61.2.6     skrll 		TAILQ_REMOVE(&wl->wl_iobufs, bp, b_wapbllist);
    698  1.61.2.6     skrll 		brelse(bp, BC_INVAL);
    699  1.61.2.6     skrll 	}
    700       1.2    simonb 	wapbl_inodetrk_free(wl);
    701      1.18      yamt 	wapbl_free(wl, sizeof(*wl));
    702       1.2    simonb 
    703       1.2    simonb 	return error;
    704       1.2    simonb }
    705       1.2    simonb 
    706       1.2    simonb /*
    707       1.2    simonb  * Like wapbl_flush, only discards the transaction
    708       1.2    simonb  * completely
    709       1.2    simonb  */
    710       1.2    simonb 
    711       1.2    simonb void
    712       1.2    simonb wapbl_discard(struct wapbl *wl)
    713       1.2    simonb {
    714       1.2    simonb 	struct wapbl_entry *we;
    715  1.61.2.4     skrll 	struct wapbl_dealloc *wd;
    716       1.2    simonb 	struct buf *bp;
    717       1.2    simonb 	int i;
    718       1.2    simonb 
    719       1.2    simonb 	/*
    720       1.2    simonb 	 * XXX we may consider using upgrade here
    721       1.2    simonb 	 * if we want to call flush from inside a transaction
    722       1.2    simonb 	 */
    723       1.2    simonb 	rw_enter(&wl->wl_rwlock, RW_WRITER);
    724  1.61.2.5     skrll 	wl->wl_flush(wl->wl_mount, TAILQ_FIRST(&wl->wl_dealloclist));
    725       1.2    simonb 
    726       1.2    simonb #ifdef WAPBL_DEBUG_PRINT
    727       1.2    simonb 	{
    728       1.2    simonb 		pid_t pid = -1;
    729       1.2    simonb 		lwpid_t lid = -1;
    730       1.2    simonb 		if (curproc)
    731       1.2    simonb 			pid = curproc->p_pid;
    732       1.2    simonb 		if (curlwp)
    733       1.2    simonb 			lid = curlwp->l_lid;
    734       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
    735       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_DISCARD,
    736       1.2    simonb 		    ("wapbl_discard: thread %d.%d discarding "
    737       1.2    simonb 		    "transaction\n"
    738       1.2    simonb 		    "\tbufcount=%zu bufbytes=%zu bcount=%zu "
    739       1.2    simonb 		    "deallocs=%d inodes=%d\n"
    740       1.2    simonb 		    "\terrcnt = %u, reclaimable=%zu reserved=%zu "
    741       1.2    simonb 		    "unsynced=%zu\n",
    742       1.2    simonb 		    pid, lid, wl->wl_bufcount, wl->wl_bufbytes,
    743       1.2    simonb 		    wl->wl_bcount, wl->wl_dealloccnt,
    744       1.2    simonb 		    wl->wl_inohashcnt, wl->wl_error_count,
    745       1.2    simonb 		    wl->wl_reclaimable_bytes, wl->wl_reserved_bytes,
    746       1.2    simonb 		    wl->wl_unsynced_bufbytes));
    747       1.2    simonb 		SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
    748       1.2    simonb 			WAPBL_PRINTF(WAPBL_PRINT_DISCARD,
    749       1.2    simonb 			    ("\tentry: bufcount = %zu, reclaimable = %zu, "
    750       1.2    simonb 			     "error = %d, unsynced = %zu\n",
    751       1.2    simonb 			     we->we_bufcount, we->we_reclaimable_bytes,
    752       1.2    simonb 			     we->we_error, we->we_unsynced_bufbytes));
    753       1.2    simonb 		}
    754       1.2    simonb #else /* !WAPBL_DEBUG_BUFBYTES */
    755       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_DISCARD,
    756       1.2    simonb 		    ("wapbl_discard: thread %d.%d discarding transaction\n"
    757       1.2    simonb 		    "\tbufcount=%zu bufbytes=%zu bcount=%zu "
    758       1.2    simonb 		    "deallocs=%d inodes=%d\n"
    759       1.2    simonb 		    "\terrcnt = %u, reclaimable=%zu reserved=%zu\n",
    760       1.2    simonb 		    pid, lid, wl->wl_bufcount, wl->wl_bufbytes,
    761       1.2    simonb 		    wl->wl_bcount, wl->wl_dealloccnt,
    762       1.2    simonb 		    wl->wl_inohashcnt, wl->wl_error_count,
    763       1.2    simonb 		    wl->wl_reclaimable_bytes, wl->wl_reserved_bytes));
    764       1.2    simonb 		SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
    765       1.2    simonb 			WAPBL_PRINTF(WAPBL_PRINT_DISCARD,
    766       1.2    simonb 			    ("\tentry: bufcount = %zu, reclaimable = %zu, "
    767       1.2    simonb 			     "error = %d\n",
    768       1.2    simonb 			     we->we_bufcount, we->we_reclaimable_bytes,
    769       1.2    simonb 			     we->we_error));
    770       1.2    simonb 		}
    771       1.2    simonb #endif /* !WAPBL_DEBUG_BUFBYTES */
    772       1.2    simonb 	}
    773       1.2    simonb #endif /* WAPBL_DEBUG_PRINT */
    774       1.2    simonb 
    775       1.2    simonb 	for (i = 0; i <= wl->wl_inohashmask; i++) {
    776       1.2    simonb 		struct wapbl_ino_head *wih;
    777       1.2    simonb 		struct wapbl_ino *wi;
    778       1.2    simonb 
    779       1.2    simonb 		wih = &wl->wl_inohash[i];
    780       1.2    simonb 		while ((wi = LIST_FIRST(wih)) != NULL) {
    781       1.2    simonb 			LIST_REMOVE(wi, wi_hash);
    782       1.2    simonb 			pool_put(&wapbl_ino_pool, wi);
    783       1.2    simonb 			KASSERT(wl->wl_inohashcnt > 0);
    784       1.2    simonb 			wl->wl_inohashcnt--;
    785       1.2    simonb 		}
    786       1.2    simonb 	}
    787       1.2    simonb 
    788       1.2    simonb 	/*
    789       1.2    simonb 	 * clean buffer list
    790       1.2    simonb 	 */
    791       1.2    simonb 	mutex_enter(&bufcache_lock);
    792       1.2    simonb 	mutex_enter(&wl->wl_mtx);
    793  1.61.2.6     skrll 	while ((bp = TAILQ_FIRST(&wl->wl_bufs)) != NULL) {
    794       1.2    simonb 		if (bbusy(bp, 0, 0, &wl->wl_mtx) == 0) {
    795       1.2    simonb 			/*
    796       1.2    simonb 			 * The buffer will be unlocked and
    797       1.2    simonb 			 * removed from the transaction in brelse
    798       1.2    simonb 			 */
    799       1.2    simonb 			mutex_exit(&wl->wl_mtx);
    800       1.2    simonb 			brelsel(bp, 0);
    801       1.2    simonb 			mutex_enter(&wl->wl_mtx);
    802       1.2    simonb 		}
    803       1.2    simonb 	}
    804       1.2    simonb 	mutex_exit(&wl->wl_mtx);
    805       1.2    simonb 	mutex_exit(&bufcache_lock);
    806       1.2    simonb 
    807       1.2    simonb 	/*
    808       1.2    simonb 	 * Remove references to this wl from wl_entries, free any which
    809       1.2    simonb 	 * no longer have buffers, others will be freed in wapbl_biodone
    810       1.2    simonb 	 * when they no longer have any buffers.
    811       1.2    simonb 	 */
    812       1.2    simonb 	while ((we = SIMPLEQ_FIRST(&wl->wl_entries)) != NULL) {
    813       1.2    simonb 		SIMPLEQ_REMOVE_HEAD(&wl->wl_entries, we_entries);
    814       1.2    simonb 		/* XXX should we be accumulating wl_error_count
    815       1.2    simonb 		 * and increasing reclaimable bytes ? */
    816       1.2    simonb 		we->we_wapbl = NULL;
    817       1.2    simonb 		if (we->we_bufcount == 0) {
    818       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
    819       1.2    simonb 			KASSERT(we->we_unsynced_bufbytes == 0);
    820       1.2    simonb #endif
    821      1.51      para 			pool_put(&wapbl_entry_pool, we);
    822       1.2    simonb 		}
    823       1.2    simonb 	}
    824       1.2    simonb 
    825       1.2    simonb 	/* Discard list of deallocs */
    826  1.61.2.5     skrll 	while ((wd = TAILQ_FIRST(&wl->wl_dealloclist)) != NULL)
    827  1.61.2.5     skrll 		wapbl_deallocation_free(wl, wd, true);
    828  1.61.2.4     skrll 
    829       1.2    simonb 	/* XXX should we clear wl_reserved_bytes? */
    830       1.2    simonb 
    831       1.2    simonb 	KASSERT(wl->wl_bufbytes == 0);
    832       1.2    simonb 	KASSERT(wl->wl_bcount == 0);
    833       1.2    simonb 	KASSERT(wl->wl_bufcount == 0);
    834  1.61.2.6     skrll 	KASSERT(TAILQ_EMPTY(&wl->wl_bufs));
    835       1.2    simonb 	KASSERT(SIMPLEQ_EMPTY(&wl->wl_entries));
    836       1.2    simonb 	KASSERT(wl->wl_inohashcnt == 0);
    837  1.61.2.5     skrll 	KASSERT(TAILQ_EMPTY(&wl->wl_dealloclist));
    838  1.61.2.4     skrll 	KASSERT(wl->wl_dealloccnt == 0);
    839       1.2    simonb 
    840       1.2    simonb 	rw_exit(&wl->wl_rwlock);
    841       1.2    simonb }
    842       1.2    simonb 
    843       1.2    simonb int
    844       1.2    simonb wapbl_stop(struct wapbl *wl, int force)
    845       1.2    simonb {
    846       1.2    simonb 	int error;
    847       1.2    simonb 
    848       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_OPEN, ("wapbl_stop called\n"));
    849       1.2    simonb 	error = wapbl_flush(wl, 1);
    850       1.2    simonb 	if (error) {
    851       1.2    simonb 		if (force)
    852       1.2    simonb 			wapbl_discard(wl);
    853       1.2    simonb 		else
    854       1.2    simonb 			return error;
    855       1.2    simonb 	}
    856       1.2    simonb 
    857       1.2    simonb 	/* Unlinked inodes persist after a flush */
    858       1.2    simonb 	if (wl->wl_inohashcnt) {
    859       1.2    simonb 		if (force) {
    860       1.2    simonb 			wapbl_discard(wl);
    861       1.2    simonb 		} else {
    862       1.2    simonb 			return EBUSY;
    863       1.2    simonb 		}
    864       1.2    simonb 	}
    865       1.2    simonb 
    866       1.2    simonb 	KASSERT(wl->wl_bufbytes == 0);
    867       1.2    simonb 	KASSERT(wl->wl_bcount == 0);
    868       1.2    simonb 	KASSERT(wl->wl_bufcount == 0);
    869  1.61.2.6     skrll 	KASSERT(TAILQ_EMPTY(&wl->wl_bufs));
    870       1.2    simonb 	KASSERT(wl->wl_dealloccnt == 0);
    871       1.2    simonb 	KASSERT(SIMPLEQ_EMPTY(&wl->wl_entries));
    872       1.2    simonb 	KASSERT(wl->wl_inohashcnt == 0);
    873  1.61.2.5     skrll 	KASSERT(TAILQ_EMPTY(&wl->wl_dealloclist));
    874  1.61.2.4     skrll 	KASSERT(wl->wl_dealloccnt == 0);
    875  1.61.2.6     skrll 	KASSERT(TAILQ_EMPTY(&wl->wl_iobufs_busy));
    876       1.2    simonb 
    877      1.18      yamt 	wapbl_free(wl->wl_wc_scratch, wl->wl_wc_header->wc_len);
    878      1.18      yamt 	wapbl_free(wl->wl_wc_header, wl->wl_wc_header->wc_len);
    879  1.61.2.6     skrll 	while (!TAILQ_EMPTY(&wl->wl_iobufs)) {
    880  1.61.2.6     skrll 		struct buf *bp;
    881  1.61.2.6     skrll 
    882  1.61.2.6     skrll 		bp = TAILQ_FIRST(&wl->wl_iobufs);
    883  1.61.2.6     skrll 		TAILQ_REMOVE(&wl->wl_iobufs, bp, b_wapbllist);
    884  1.61.2.6     skrll 		brelse(bp, BC_INVAL);
    885  1.61.2.6     skrll 	}
    886       1.2    simonb 	wapbl_inodetrk_free(wl);
    887       1.2    simonb 
    888  1.61.2.6     skrll 	wapbl_evcnt_free(wl);
    889  1.61.2.6     skrll 
    890       1.2    simonb 	cv_destroy(&wl->wl_reclaimable_cv);
    891       1.2    simonb 	mutex_destroy(&wl->wl_mtx);
    892       1.2    simonb 	rw_destroy(&wl->wl_rwlock);
    893      1.18      yamt 	wapbl_free(wl, sizeof(*wl));
    894       1.2    simonb 
    895       1.2    simonb 	return 0;
    896       1.2    simonb }
    897       1.2    simonb 
    898  1.61.2.3     skrll /****************************************************************/
    899  1.61.2.3     skrll /*
    900  1.61.2.3     skrll  * Unbuffered disk I/O
    901  1.61.2.3     skrll  */
    902  1.61.2.3     skrll 
    903  1.61.2.6     skrll static void
    904  1.61.2.6     skrll wapbl_doio_accounting(struct vnode *devvp, int flags)
    905       1.2    simonb {
    906       1.2    simonb 	struct pstats *pstats = curlwp->l_proc->p_stats;
    907       1.2    simonb 
    908       1.2    simonb 	if ((flags & (B_WRITE | B_READ)) == B_WRITE) {
    909      1.45     rmind 		mutex_enter(devvp->v_interlock);
    910       1.2    simonb 		devvp->v_numoutput++;
    911      1.45     rmind 		mutex_exit(devvp->v_interlock);
    912       1.2    simonb 		pstats->p_ru.ru_oublock++;
    913       1.2    simonb 	} else {
    914       1.2    simonb 		pstats->p_ru.ru_inblock++;
    915       1.2    simonb 	}
    916       1.2    simonb 
    917  1.61.2.6     skrll }
    918  1.61.2.6     skrll 
    919  1.61.2.6     skrll static int
    920  1.61.2.6     skrll wapbl_doio(void *data, size_t len, struct vnode *devvp, daddr_t pbn, int flags)
    921  1.61.2.6     skrll {
    922  1.61.2.6     skrll 	struct buf *bp;
    923  1.61.2.6     skrll 	int error;
    924  1.61.2.6     skrll 
    925  1.61.2.6     skrll 	KASSERT(devvp->v_type == VBLK);
    926  1.61.2.6     skrll 
    927  1.61.2.6     skrll 	wapbl_doio_accounting(devvp, flags);
    928  1.61.2.6     skrll 
    929       1.2    simonb 	bp = getiobuf(devvp, true);
    930       1.2    simonb 	bp->b_flags = flags;
    931  1.61.2.6     skrll 	bp->b_cflags = BC_BUSY;	/* mandatory, asserted by biowait() */
    932       1.2    simonb 	bp->b_dev = devvp->v_rdev;
    933       1.2    simonb 	bp->b_data = data;
    934       1.2    simonb 	bp->b_bufsize = bp->b_resid = bp->b_bcount = len;
    935       1.2    simonb 	bp->b_blkno = pbn;
    936      1.52       chs 	BIO_SETPRIO(bp, BPRIO_TIMECRITICAL);
    937       1.2    simonb 
    938       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_IO,
    939      1.29     pooka 	    ("wapbl_doio: %s %d bytes at block %"PRId64" on dev 0x%"PRIx64"\n",
    940       1.2    simonb 	    BUF_ISWRITE(bp) ? "write" : "read", bp->b_bcount,
    941       1.2    simonb 	    bp->b_blkno, bp->b_dev));
    942       1.2    simonb 
    943       1.2    simonb 	VOP_STRATEGY(devvp, bp);
    944       1.2    simonb 
    945       1.2    simonb 	error = biowait(bp);
    946       1.2    simonb 	putiobuf(bp);
    947       1.2    simonb 
    948       1.2    simonb 	if (error) {
    949       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_ERROR,
    950       1.2    simonb 		    ("wapbl_doio: %s %zu bytes at block %" PRId64
    951      1.29     pooka 		    " on dev 0x%"PRIx64" failed with error %d\n",
    952       1.2    simonb 		    (((flags & (B_WRITE | B_READ)) == B_WRITE) ?
    953       1.2    simonb 		     "write" : "read"),
    954       1.2    simonb 		    len, pbn, devvp->v_rdev, error));
    955       1.2    simonb 	}
    956       1.2    simonb 
    957       1.2    simonb 	return error;
    958       1.2    simonb }
    959       1.2    simonb 
    960  1.61.2.3     skrll /*
    961  1.61.2.3     skrll  * wapbl_write(data, len, devvp, pbn)
    962  1.61.2.3     skrll  *
    963  1.61.2.3     skrll  *	Synchronously write len bytes from data to physical block pbn
    964  1.61.2.3     skrll  *	on devvp.
    965  1.61.2.3     skrll  */
    966       1.2    simonb int
    967       1.2    simonb wapbl_write(void *data, size_t len, struct vnode *devvp, daddr_t pbn)
    968       1.2    simonb {
    969       1.2    simonb 
    970       1.2    simonb 	return wapbl_doio(data, len, devvp, pbn, B_WRITE);
    971       1.2    simonb }
    972       1.2    simonb 
    973  1.61.2.3     skrll /*
    974  1.61.2.3     skrll  * wapbl_read(data, len, devvp, pbn)
    975  1.61.2.3     skrll  *
    976  1.61.2.3     skrll  *	Synchronously read len bytes into data from physical block pbn
    977  1.61.2.3     skrll  *	on devvp.
    978  1.61.2.3     skrll  */
    979       1.2    simonb int
    980       1.2    simonb wapbl_read(void *data, size_t len, struct vnode *devvp, daddr_t pbn)
    981       1.2    simonb {
    982       1.2    simonb 
    983       1.2    simonb 	return wapbl_doio(data, len, devvp, pbn, B_READ);
    984       1.2    simonb }
    985       1.2    simonb 
    986  1.61.2.3     skrll /****************************************************************/
    987  1.61.2.3     skrll /*
    988  1.61.2.3     skrll  * Buffered disk writes -- try to coalesce writes and emit
    989  1.61.2.3     skrll  * MAXPHYS-aligned blocks.
    990  1.61.2.3     skrll  */
    991  1.61.2.3     skrll 
    992       1.2    simonb /*
    993  1.61.2.6     skrll  * wapbl_buffered_write_async(wl, bp)
    994  1.61.2.6     skrll  *
    995  1.61.2.6     skrll  *	Send buffer for asynchronous write.
    996  1.61.2.6     skrll  */
    997  1.61.2.6     skrll static void
    998  1.61.2.6     skrll wapbl_buffered_write_async(struct wapbl *wl, struct buf *bp)
    999  1.61.2.6     skrll {
   1000  1.61.2.6     skrll 	wapbl_doio_accounting(wl->wl_devvp, bp->b_flags);
   1001  1.61.2.6     skrll 
   1002  1.61.2.6     skrll 	KASSERT(TAILQ_FIRST(&wl->wl_iobufs) == bp);
   1003  1.61.2.6     skrll 	TAILQ_REMOVE(&wl->wl_iobufs, bp, b_wapbllist);
   1004  1.61.2.6     skrll 
   1005  1.61.2.6     skrll 	bp->b_flags = B_WRITE | WAPBL_JFLAGS(wl);
   1006  1.61.2.6     skrll 	bp->b_cflags = BC_BUSY;	/* mandatory, asserted by biowait() */
   1007  1.61.2.6     skrll 	bp->b_oflags = 0;
   1008  1.61.2.6     skrll 	bp->b_bcount = bp->b_resid;
   1009  1.61.2.6     skrll 	BIO_SETPRIO(bp, BPRIO_TIMECRITICAL);
   1010  1.61.2.6     skrll 
   1011  1.61.2.6     skrll 	VOP_STRATEGY(wl->wl_devvp, bp);
   1012  1.61.2.6     skrll 
   1013  1.61.2.6     skrll 	wl->wl_ev_journalwrite.ev_count++;
   1014  1.61.2.6     skrll 
   1015  1.61.2.6     skrll 	TAILQ_INSERT_TAIL(&wl->wl_iobufs_busy, bp, b_wapbllist);
   1016  1.61.2.6     skrll }
   1017  1.61.2.6     skrll 
   1018  1.61.2.6     skrll /*
   1019  1.61.2.3     skrll  * wapbl_buffered_flush(wl)
   1020  1.61.2.3     skrll  *
   1021  1.61.2.3     skrll  *	Flush any buffered writes from wapbl_buffered_write.
   1022      1.54   hannken  */
   1023      1.54   hannken static int
   1024  1.61.2.6     skrll wapbl_buffered_flush(struct wapbl *wl, bool full)
   1025      1.54   hannken {
   1026  1.61.2.6     skrll 	int error = 0;
   1027  1.61.2.6     skrll 	struct buf *bp, *bnext;
   1028  1.61.2.6     skrll 	bool only_done = true, found = false;
   1029      1.54   hannken 
   1030  1.61.2.6     skrll 	/* if there is outstanding buffered write, send it now */
   1031  1.61.2.6     skrll 	if ((bp = TAILQ_FIRST(&wl->wl_iobufs)) && bp->b_resid > 0)
   1032  1.61.2.6     skrll 		wapbl_buffered_write_async(wl, bp);
   1033  1.61.2.6     skrll 
   1034  1.61.2.6     skrll 	/* wait for I/O to complete */
   1035  1.61.2.6     skrll again:
   1036  1.61.2.6     skrll 	TAILQ_FOREACH_SAFE(bp, &wl->wl_iobufs_busy, b_wapbllist, bnext) {
   1037  1.61.2.6     skrll 		if (!full && only_done) {
   1038  1.61.2.6     skrll 			/* skip unfinished */
   1039  1.61.2.6     skrll 			if (!ISSET(bp->b_oflags, BO_DONE))
   1040  1.61.2.6     skrll 				continue;
   1041  1.61.2.6     skrll 		}
   1042  1.61.2.6     skrll 
   1043  1.61.2.6     skrll 		if (ISSET(bp->b_oflags, BO_DONE))
   1044  1.61.2.6     skrll 			wl->wl_ev_jbufs_bio_nowait.ev_count++;
   1045  1.61.2.6     skrll 		else
   1046  1.61.2.6     skrll 			wl->wl_ev_jbufs_bio_wait.ev_count++;
   1047  1.61.2.6     skrll 
   1048  1.61.2.6     skrll 		TAILQ_REMOVE(&wl->wl_iobufs_busy, bp, b_wapbllist);
   1049  1.61.2.6     skrll 		error = biowait(bp);
   1050  1.61.2.6     skrll 
   1051  1.61.2.6     skrll 		/* reset for reuse */
   1052  1.61.2.6     skrll 		bp->b_blkno = bp->b_resid = 0;
   1053  1.61.2.6     skrll 		TAILQ_INSERT_TAIL(&wl->wl_iobufs, bp, b_wapbllist);
   1054  1.61.2.6     skrll 		found = true;
   1055      1.54   hannken 
   1056  1.61.2.6     skrll 		if (!full)
   1057  1.61.2.6     skrll 			break;
   1058  1.61.2.6     skrll 	}
   1059  1.61.2.6     skrll 
   1060  1.61.2.6     skrll 	if (!found && only_done && !TAILQ_EMPTY(&wl->wl_iobufs_busy)) {
   1061  1.61.2.6     skrll 		only_done = false;
   1062  1.61.2.6     skrll 		goto again;
   1063  1.61.2.6     skrll 	}
   1064      1.54   hannken 
   1065      1.54   hannken 	return error;
   1066      1.54   hannken }
   1067      1.54   hannken 
   1068      1.54   hannken /*
   1069  1.61.2.3     skrll  * wapbl_buffered_write(data, len, wl, pbn)
   1070  1.61.2.3     skrll  *
   1071  1.61.2.3     skrll  *	Write len bytes from data to physical block pbn on
   1072  1.61.2.3     skrll  *	wl->wl_devvp.  The write may not complete until
   1073  1.61.2.3     skrll  *	wapbl_buffered_flush.
   1074      1.54   hannken  */
   1075      1.54   hannken static int
   1076      1.54   hannken wapbl_buffered_write(void *data, size_t len, struct wapbl *wl, daddr_t pbn)
   1077      1.54   hannken {
   1078      1.54   hannken 	size_t resid;
   1079  1.61.2.6     skrll 	struct buf *bp;
   1080  1.61.2.6     skrll 
   1081  1.61.2.6     skrll again:
   1082  1.61.2.6     skrll 	bp = TAILQ_FIRST(&wl->wl_iobufs);
   1083  1.61.2.6     skrll 
   1084  1.61.2.6     skrll 	if (bp == NULL) {
   1085  1.61.2.6     skrll 		/* No more buffers, wait for any previous I/O to finish. */
   1086  1.61.2.6     skrll 		wapbl_buffered_flush(wl, false);
   1087  1.61.2.6     skrll 
   1088  1.61.2.6     skrll 		bp = TAILQ_FIRST(&wl->wl_iobufs);
   1089  1.61.2.6     skrll 		KASSERT(bp != NULL);
   1090  1.61.2.6     skrll 	}
   1091      1.54   hannken 
   1092      1.54   hannken 	/*
   1093      1.54   hannken 	 * If not adjacent to buffered data flush first.  Disk block
   1094      1.54   hannken 	 * address is always valid for non-empty buffer.
   1095      1.54   hannken 	 */
   1096  1.61.2.6     skrll 	if ((bp->b_resid > 0 && pbn != bp->b_blkno + btodb(bp->b_resid))) {
   1097  1.61.2.6     skrll 		wapbl_buffered_write_async(wl, bp);
   1098  1.61.2.6     skrll 		goto again;
   1099      1.54   hannken 	}
   1100  1.61.2.6     skrll 
   1101      1.54   hannken 	/*
   1102      1.54   hannken 	 * If this write goes to an empty buffer we have to
   1103      1.54   hannken 	 * save the disk block address first.
   1104      1.54   hannken 	 */
   1105  1.61.2.6     skrll 	if (bp->b_blkno == 0)
   1106  1.61.2.6     skrll 		bp->b_blkno = pbn;
   1107  1.61.2.6     skrll 
   1108      1.54   hannken 	/*
   1109  1.61.2.6     skrll 	 * Remaining space so this buffer ends on a buffer size boundary.
   1110      1.54   hannken 	 *
   1111      1.54   hannken 	 * Cannot become less or equal zero as the buffer would have been
   1112      1.54   hannken 	 * flushed on the last call then.
   1113      1.54   hannken 	 */
   1114  1.61.2.6     skrll 	resid = bp->b_bufsize - dbtob(bp->b_blkno % btodb(bp->b_bufsize)) -
   1115  1.61.2.6     skrll 	    bp->b_resid;
   1116      1.54   hannken 	KASSERT(resid > 0);
   1117      1.54   hannken 	KASSERT(dbtob(btodb(resid)) == resid);
   1118  1.61.2.6     skrll 
   1119  1.61.2.6     skrll 	if (len < resid)
   1120  1.61.2.6     skrll 		resid = len;
   1121  1.61.2.6     skrll 
   1122  1.61.2.6     skrll 	memcpy((uint8_t *)bp->b_data + bp->b_resid, data, resid);
   1123  1.61.2.6     skrll 	bp->b_resid += resid;
   1124  1.61.2.6     skrll 
   1125      1.54   hannken 	if (len >= resid) {
   1126  1.61.2.6     skrll 		/* Just filled the buf, or data did not fit */
   1127  1.61.2.6     skrll 		wapbl_buffered_write_async(wl, bp);
   1128  1.61.2.6     skrll 
   1129      1.54   hannken 		data = (uint8_t *)data + resid;
   1130      1.54   hannken 		len -= resid;
   1131  1.61.2.6     skrll 		pbn += btodb(resid);
   1132  1.61.2.6     skrll 
   1133  1.61.2.6     skrll 		if (len > 0)
   1134  1.61.2.6     skrll 			goto again;
   1135      1.54   hannken 	}
   1136      1.54   hannken 
   1137      1.54   hannken 	return 0;
   1138      1.54   hannken }
   1139      1.54   hannken 
   1140      1.54   hannken /*
   1141  1.61.2.3     skrll  * wapbl_circ_write(wl, data, len, offp)
   1142  1.61.2.3     skrll  *
   1143  1.61.2.3     skrll  *	Write len bytes from data to the circular queue of wl, starting
   1144  1.61.2.3     skrll  *	at linear byte offset *offp, and returning the new linear byte
   1145  1.61.2.3     skrll  *	offset in *offp.
   1146  1.61.2.3     skrll  *
   1147  1.61.2.3     skrll  *	If the starting linear byte offset precedes wl->wl_circ_off,
   1148  1.61.2.3     skrll  *	the write instead begins at wl->wl_circ_off.  XXX WTF?  This
   1149  1.61.2.3     skrll  *	should be a KASSERT, not a conditional.
   1150  1.61.2.3     skrll  *
   1151  1.61.2.3     skrll  *	The write is buffered in wl and must be flushed with
   1152  1.61.2.3     skrll  *	wapbl_buffered_flush before it will be submitted to the disk.
   1153       1.2    simonb  */
   1154       1.2    simonb static int
   1155       1.2    simonb wapbl_circ_write(struct wapbl *wl, void *data, size_t len, off_t *offp)
   1156       1.2    simonb {
   1157       1.2    simonb 	size_t slen;
   1158       1.2    simonb 	off_t off = *offp;
   1159       1.2    simonb 	int error;
   1160      1.34   mlelstv 	daddr_t pbn;
   1161       1.2    simonb 
   1162       1.2    simonb 	KDASSERT(((len >> wl->wl_log_dev_bshift) <<
   1163       1.2    simonb 	    wl->wl_log_dev_bshift) == len);
   1164       1.2    simonb 
   1165       1.2    simonb 	if (off < wl->wl_circ_off)
   1166       1.2    simonb 		off = wl->wl_circ_off;
   1167       1.2    simonb 	slen = wl->wl_circ_off + wl->wl_circ_size - off;
   1168       1.2    simonb 	if (slen < len) {
   1169      1.34   mlelstv 		pbn = wl->wl_logpbn + (off >> wl->wl_log_dev_bshift);
   1170      1.34   mlelstv #ifdef _KERNEL
   1171      1.34   mlelstv 		pbn = btodb(pbn << wl->wl_log_dev_bshift);
   1172      1.34   mlelstv #endif
   1173      1.54   hannken 		error = wapbl_buffered_write(data, slen, wl, pbn);
   1174       1.2    simonb 		if (error)
   1175       1.2    simonb 			return error;
   1176       1.2    simonb 		data = (uint8_t *)data + slen;
   1177       1.2    simonb 		len -= slen;
   1178       1.2    simonb 		off = wl->wl_circ_off;
   1179       1.2    simonb 	}
   1180      1.34   mlelstv 	pbn = wl->wl_logpbn + (off >> wl->wl_log_dev_bshift);
   1181      1.34   mlelstv #ifdef _KERNEL
   1182      1.34   mlelstv 	pbn = btodb(pbn << wl->wl_log_dev_bshift);
   1183      1.34   mlelstv #endif
   1184      1.54   hannken 	error = wapbl_buffered_write(data, len, wl, pbn);
   1185       1.2    simonb 	if (error)
   1186       1.2    simonb 		return error;
   1187       1.2    simonb 	off += len;
   1188       1.2    simonb 	if (off >= wl->wl_circ_off + wl->wl_circ_size)
   1189       1.2    simonb 		off = wl->wl_circ_off;
   1190       1.2    simonb 	*offp = off;
   1191       1.2    simonb 	return 0;
   1192       1.2    simonb }
   1193       1.2    simonb 
   1194       1.2    simonb /****************************************************************/
   1195  1.61.2.3     skrll /*
   1196  1.61.2.3     skrll  * WAPBL transactions: entering, adding/removing bufs, and exiting
   1197  1.61.2.3     skrll  */
   1198       1.2    simonb 
   1199       1.2    simonb int
   1200       1.2    simonb wapbl_begin(struct wapbl *wl, const char *file, int line)
   1201       1.2    simonb {
   1202       1.2    simonb 	int doflush;
   1203       1.2    simonb 	unsigned lockcount;
   1204       1.2    simonb 
   1205       1.2    simonb 	KDASSERT(wl);
   1206       1.2    simonb 
   1207       1.2    simonb 	/*
   1208       1.2    simonb 	 * XXX this needs to be made much more sophisticated.
   1209       1.2    simonb 	 * perhaps each wapbl_begin could reserve a specified
   1210       1.2    simonb 	 * number of buffers and bytes.
   1211       1.2    simonb 	 */
   1212       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1213       1.2    simonb 	lockcount = wl->wl_lock_count;
   1214       1.2    simonb 	doflush = ((wl->wl_bufbytes + (lockcount * MAXPHYS)) >
   1215       1.2    simonb 		   wl->wl_bufbytes_max / 2) ||
   1216       1.2    simonb 		  ((wl->wl_bufcount + (lockcount * 10)) >
   1217       1.2    simonb 		   wl->wl_bufcount_max / 2) ||
   1218      1.28     pooka 		  (wapbl_transaction_len(wl) > wl->wl_circ_size / 2) ||
   1219      1.42   hannken 		  (wl->wl_dealloccnt >= (wl->wl_dealloclim / 2));
   1220       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1221       1.2    simonb 
   1222       1.2    simonb 	if (doflush) {
   1223       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
   1224       1.2    simonb 		    ("force flush lockcnt=%d bufbytes=%zu "
   1225      1.28     pooka 		    "(max=%zu) bufcount=%zu (max=%zu) "
   1226      1.28     pooka 		    "dealloccnt %d (lim=%d)\n",
   1227       1.2    simonb 		    lockcount, wl->wl_bufbytes,
   1228       1.2    simonb 		    wl->wl_bufbytes_max, wl->wl_bufcount,
   1229      1.28     pooka 		    wl->wl_bufcount_max,
   1230      1.28     pooka 		    wl->wl_dealloccnt, wl->wl_dealloclim));
   1231       1.2    simonb 	}
   1232       1.2    simonb 
   1233       1.2    simonb 	if (doflush) {
   1234       1.2    simonb 		int error = wapbl_flush(wl, 0);
   1235       1.2    simonb 		if (error)
   1236       1.2    simonb 			return error;
   1237       1.2    simonb 	}
   1238       1.2    simonb 
   1239      1.23        ad 	rw_enter(&wl->wl_rwlock, RW_READER);
   1240       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1241       1.2    simonb 	wl->wl_lock_count++;
   1242       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1243       1.2    simonb 
   1244      1.23        ad #if defined(WAPBL_DEBUG_PRINT)
   1245       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_TRANSACTION,
   1246       1.2    simonb 	    ("wapbl_begin thread %d.%d with bufcount=%zu "
   1247       1.2    simonb 	    "bufbytes=%zu bcount=%zu at %s:%d\n",
   1248       1.2    simonb 	    curproc->p_pid, curlwp->l_lid, wl->wl_bufcount,
   1249       1.2    simonb 	    wl->wl_bufbytes, wl->wl_bcount, file, line));
   1250       1.2    simonb #endif
   1251       1.2    simonb 
   1252       1.2    simonb 	return 0;
   1253       1.2    simonb }
   1254       1.2    simonb 
   1255       1.2    simonb void
   1256       1.2    simonb wapbl_end(struct wapbl *wl)
   1257       1.2    simonb {
   1258       1.2    simonb 
   1259      1.23        ad #if defined(WAPBL_DEBUG_PRINT)
   1260       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_TRANSACTION,
   1261       1.2    simonb 	     ("wapbl_end thread %d.%d with bufcount=%zu "
   1262       1.2    simonb 	      "bufbytes=%zu bcount=%zu\n",
   1263       1.2    simonb 	      curproc->p_pid, curlwp->l_lid, wl->wl_bufcount,
   1264       1.2    simonb 	      wl->wl_bufbytes, wl->wl_bcount));
   1265       1.2    simonb #endif
   1266       1.2    simonb 
   1267  1.61.2.3     skrll 	/*
   1268  1.61.2.3     skrll 	 * XXX this could be handled more gracefully, perhaps place
   1269  1.61.2.3     skrll 	 * only a partial transaction in the log and allow the
   1270  1.61.2.3     skrll 	 * remaining to flush without the protection of the journal.
   1271  1.61.2.3     skrll 	 */
   1272  1.61.2.3     skrll 	KASSERTMSG((wapbl_transaction_len(wl) <=
   1273  1.61.2.3     skrll 		(wl->wl_circ_size - wl->wl_reserved_bytes)),
   1274  1.61.2.3     skrll 	    "wapbl_end: current transaction too big to flush");
   1275      1.40    bouyer 
   1276       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1277       1.2    simonb 	KASSERT(wl->wl_lock_count > 0);
   1278       1.2    simonb 	wl->wl_lock_count--;
   1279       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1280       1.2    simonb 
   1281       1.2    simonb 	rw_exit(&wl->wl_rwlock);
   1282       1.2    simonb }
   1283       1.2    simonb 
   1284       1.2    simonb void
   1285       1.2    simonb wapbl_add_buf(struct wapbl *wl, struct buf * bp)
   1286       1.2    simonb {
   1287       1.2    simonb 
   1288       1.2    simonb 	KASSERT(bp->b_cflags & BC_BUSY);
   1289       1.2    simonb 	KASSERT(bp->b_vp);
   1290       1.2    simonb 
   1291       1.2    simonb 	wapbl_jlock_assert(wl);
   1292       1.2    simonb 
   1293       1.2    simonb #if 0
   1294       1.2    simonb 	/*
   1295       1.2    simonb 	 * XXX this might be an issue for swapfiles.
   1296       1.2    simonb 	 * see uvm_swap.c:1702
   1297       1.2    simonb 	 *
   1298       1.2    simonb 	 * XXX2 why require it then?  leap of semantics?
   1299       1.2    simonb 	 */
   1300       1.2    simonb 	KASSERT((bp->b_cflags & BC_NOCACHE) == 0);
   1301       1.2    simonb #endif
   1302       1.2    simonb 
   1303       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1304       1.2    simonb 	if (bp->b_flags & B_LOCKED) {
   1305  1.61.2.6     skrll 		TAILQ_REMOVE(&wl->wl_bufs, bp, b_wapbllist);
   1306       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_BUFFER2,
   1307       1.2    simonb 		   ("wapbl_add_buf thread %d.%d re-adding buf %p "
   1308       1.2    simonb 		    "with %d bytes %d bcount\n",
   1309       1.2    simonb 		    curproc->p_pid, curlwp->l_lid, bp, bp->b_bufsize,
   1310       1.2    simonb 		    bp->b_bcount));
   1311       1.2    simonb 	} else {
   1312       1.2    simonb 		/* unlocked by dirty buffers shouldn't exist */
   1313       1.2    simonb 		KASSERT(!(bp->b_oflags & BO_DELWRI));
   1314       1.2    simonb 		wl->wl_bufbytes += bp->b_bufsize;
   1315       1.2    simonb 		wl->wl_bcount += bp->b_bcount;
   1316       1.2    simonb 		wl->wl_bufcount++;
   1317       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_BUFFER,
   1318       1.2    simonb 		   ("wapbl_add_buf thread %d.%d adding buf %p "
   1319       1.2    simonb 		    "with %d bytes %d bcount\n",
   1320       1.2    simonb 		    curproc->p_pid, curlwp->l_lid, bp, bp->b_bufsize,
   1321       1.2    simonb 		    bp->b_bcount));
   1322       1.2    simonb 	}
   1323  1.61.2.6     skrll 	TAILQ_INSERT_TAIL(&wl->wl_bufs, bp, b_wapbllist);
   1324       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1325       1.2    simonb 
   1326       1.2    simonb 	bp->b_flags |= B_LOCKED;
   1327       1.2    simonb }
   1328       1.2    simonb 
   1329       1.2    simonb static void
   1330       1.2    simonb wapbl_remove_buf_locked(struct wapbl * wl, struct buf *bp)
   1331       1.2    simonb {
   1332       1.2    simonb 
   1333       1.2    simonb 	KASSERT(mutex_owned(&wl->wl_mtx));
   1334       1.2    simonb 	KASSERT(bp->b_cflags & BC_BUSY);
   1335       1.2    simonb 	wapbl_jlock_assert(wl);
   1336       1.2    simonb 
   1337       1.2    simonb #if 0
   1338       1.2    simonb 	/*
   1339       1.2    simonb 	 * XXX this might be an issue for swapfiles.
   1340       1.2    simonb 	 * see uvm_swap.c:1725
   1341       1.2    simonb 	 *
   1342       1.2    simonb 	 * XXXdeux: see above
   1343       1.2    simonb 	 */
   1344       1.2    simonb 	KASSERT((bp->b_flags & BC_NOCACHE) == 0);
   1345       1.2    simonb #endif
   1346       1.2    simonb 	KASSERT(bp->b_flags & B_LOCKED);
   1347       1.2    simonb 
   1348       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_BUFFER,
   1349       1.2    simonb 	   ("wapbl_remove_buf thread %d.%d removing buf %p with "
   1350       1.2    simonb 	    "%d bytes %d bcount\n",
   1351       1.2    simonb 	    curproc->p_pid, curlwp->l_lid, bp, bp->b_bufsize, bp->b_bcount));
   1352       1.2    simonb 
   1353       1.2    simonb 	KASSERT(wl->wl_bufbytes >= bp->b_bufsize);
   1354       1.2    simonb 	wl->wl_bufbytes -= bp->b_bufsize;
   1355       1.2    simonb 	KASSERT(wl->wl_bcount >= bp->b_bcount);
   1356       1.2    simonb 	wl->wl_bcount -= bp->b_bcount;
   1357       1.2    simonb 	KASSERT(wl->wl_bufcount > 0);
   1358       1.2    simonb 	wl->wl_bufcount--;
   1359       1.2    simonb 	KASSERT((wl->wl_bufcount == 0) == (wl->wl_bufbytes == 0));
   1360       1.2    simonb 	KASSERT((wl->wl_bufcount == 0) == (wl->wl_bcount == 0));
   1361  1.61.2.6     skrll 	TAILQ_REMOVE(&wl->wl_bufs, bp, b_wapbllist);
   1362       1.2    simonb 
   1363       1.2    simonb 	bp->b_flags &= ~B_LOCKED;
   1364       1.2    simonb }
   1365       1.2    simonb 
   1366       1.2    simonb /* called from brelsel() in vfs_bio among other places */
   1367       1.2    simonb void
   1368       1.2    simonb wapbl_remove_buf(struct wapbl * wl, struct buf *bp)
   1369       1.2    simonb {
   1370       1.2    simonb 
   1371       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1372       1.2    simonb 	wapbl_remove_buf_locked(wl, bp);
   1373       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1374       1.2    simonb }
   1375       1.2    simonb 
   1376       1.2    simonb void
   1377       1.2    simonb wapbl_resize_buf(struct wapbl *wl, struct buf *bp, long oldsz, long oldcnt)
   1378       1.2    simonb {
   1379       1.2    simonb 
   1380       1.2    simonb 	KASSERT(bp->b_cflags & BC_BUSY);
   1381       1.2    simonb 
   1382       1.2    simonb 	/*
   1383       1.2    simonb 	 * XXX: why does this depend on B_LOCKED?  otherwise the buf
   1384       1.2    simonb 	 * is not for a transaction?  if so, why is this called in the
   1385       1.2    simonb 	 * first place?
   1386       1.2    simonb 	 */
   1387       1.2    simonb 	if (bp->b_flags & B_LOCKED) {
   1388       1.2    simonb 		mutex_enter(&wl->wl_mtx);
   1389       1.2    simonb 		wl->wl_bufbytes += bp->b_bufsize - oldsz;
   1390       1.2    simonb 		wl->wl_bcount += bp->b_bcount - oldcnt;
   1391       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   1392       1.2    simonb 	}
   1393       1.2    simonb }
   1394       1.2    simonb 
   1395       1.2    simonb #endif /* _KERNEL */
   1396       1.2    simonb 
   1397       1.2    simonb /****************************************************************/
   1398       1.2    simonb /* Some utility inlines */
   1399       1.2    simonb 
   1400  1.61.2.3     skrll /*
   1401  1.61.2.3     skrll  * wapbl_space_used(avail, head, tail)
   1402  1.61.2.3     skrll  *
   1403  1.61.2.3     skrll  *	Number of bytes used in a circular queue of avail total bytes,
   1404  1.61.2.3     skrll  *	from tail to head.
   1405  1.61.2.3     skrll  */
   1406      1.56     joerg static inline size_t
   1407      1.56     joerg wapbl_space_used(size_t avail, off_t head, off_t tail)
   1408      1.56     joerg {
   1409      1.56     joerg 
   1410      1.56     joerg 	if (tail == 0) {
   1411      1.56     joerg 		KASSERT(head == 0);
   1412      1.56     joerg 		return 0;
   1413      1.56     joerg 	}
   1414      1.56     joerg 	return ((head + (avail - 1) - tail) % avail) + 1;
   1415      1.56     joerg }
   1416      1.56     joerg 
   1417      1.56     joerg #ifdef _KERNEL
   1418  1.61.2.3     skrll /*
   1419  1.61.2.3     skrll  * wapbl_advance(size, off, oldoff, delta)
   1420  1.61.2.3     skrll  *
   1421  1.61.2.3     skrll  *	Given a byte offset oldoff into a circular queue of size bytes
   1422  1.61.2.3     skrll  *	starting at off, return a new byte offset oldoff + delta into
   1423  1.61.2.3     skrll  *	the circular queue.
   1424  1.61.2.3     skrll  */
   1425      1.30  uebayasi static inline off_t
   1426      1.60      matt wapbl_advance(size_t size, size_t off, off_t oldoff, size_t delta)
   1427       1.2    simonb {
   1428      1.60      matt 	off_t newoff;
   1429       1.2    simonb 
   1430       1.2    simonb 	/* Define acceptable ranges for inputs. */
   1431      1.46  christos 	KASSERT(delta <= (size_t)size);
   1432      1.60      matt 	KASSERT((oldoff == 0) || ((size_t)oldoff >= off));
   1433      1.60      matt 	KASSERT(oldoff < (off_t)(size + off));
   1434       1.2    simonb 
   1435      1.60      matt 	if ((oldoff == 0) && (delta != 0))
   1436      1.60      matt 		newoff = off + delta;
   1437      1.60      matt 	else if ((oldoff + delta) < (size + off))
   1438      1.60      matt 		newoff = oldoff + delta;
   1439       1.2    simonb 	else
   1440      1.60      matt 		newoff = (oldoff + delta) - size;
   1441       1.2    simonb 
   1442       1.2    simonb 	/* Note some interesting axioms */
   1443      1.60      matt 	KASSERT((delta != 0) || (newoff == oldoff));
   1444      1.60      matt 	KASSERT((delta == 0) || (newoff != 0));
   1445      1.60      matt 	KASSERT((delta != (size)) || (newoff == oldoff));
   1446       1.2    simonb 
   1447       1.2    simonb 	/* Define acceptable ranges for output. */
   1448      1.60      matt 	KASSERT((newoff == 0) || ((size_t)newoff >= off));
   1449      1.60      matt 	KASSERT((size_t)newoff < (size + off));
   1450      1.60      matt 	return newoff;
   1451       1.2    simonb }
   1452       1.2    simonb 
   1453  1.61.2.3     skrll /*
   1454  1.61.2.3     skrll  * wapbl_space_free(avail, head, tail)
   1455  1.61.2.3     skrll  *
   1456  1.61.2.3     skrll  *	Number of bytes free in a circular queue of avail total bytes,
   1457  1.61.2.3     skrll  *	in which everything from tail to head is used.
   1458  1.61.2.3     skrll  */
   1459      1.30  uebayasi static inline size_t
   1460       1.2    simonb wapbl_space_free(size_t avail, off_t head, off_t tail)
   1461       1.2    simonb {
   1462       1.2    simonb 
   1463       1.2    simonb 	return avail - wapbl_space_used(avail, head, tail);
   1464       1.2    simonb }
   1465       1.2    simonb 
   1466  1.61.2.3     skrll /*
   1467  1.61.2.3     skrll  * wapbl_advance_head(size, off, delta, headp, tailp)
   1468  1.61.2.3     skrll  *
   1469  1.61.2.3     skrll  *	In a circular queue of size bytes starting at off, given the
   1470  1.61.2.3     skrll  *	old head and tail offsets *headp and *tailp, store the new head
   1471  1.61.2.3     skrll  *	and tail offsets in *headp and *tailp resulting from adding
   1472  1.61.2.3     skrll  *	delta bytes of data to the head.
   1473  1.61.2.3     skrll  */
   1474      1.30  uebayasi static inline void
   1475       1.2    simonb wapbl_advance_head(size_t size, size_t off, size_t delta, off_t *headp,
   1476       1.2    simonb 		   off_t *tailp)
   1477       1.2    simonb {
   1478       1.2    simonb 	off_t head = *headp;
   1479       1.2    simonb 	off_t tail = *tailp;
   1480       1.2    simonb 
   1481       1.2    simonb 	KASSERT(delta <= wapbl_space_free(size, head, tail));
   1482       1.2    simonb 	head = wapbl_advance(size, off, head, delta);
   1483       1.2    simonb 	if ((tail == 0) && (head != 0))
   1484       1.2    simonb 		tail = off;
   1485       1.2    simonb 	*headp = head;
   1486       1.2    simonb 	*tailp = tail;
   1487       1.2    simonb }
   1488       1.2    simonb 
   1489  1.61.2.3     skrll /*
   1490  1.61.2.3     skrll  * wapbl_advance_tail(size, off, delta, headp, tailp)
   1491  1.61.2.3     skrll  *
   1492  1.61.2.3     skrll  *	In a circular queue of size bytes starting at off, given the
   1493  1.61.2.3     skrll  *	old head and tail offsets *headp and *tailp, store the new head
   1494  1.61.2.3     skrll  *	and tail offsets in *headp and *tailp resulting from removing
   1495  1.61.2.3     skrll  *	delta bytes of data from the tail.
   1496  1.61.2.3     skrll  */
   1497      1.30  uebayasi static inline void
   1498       1.2    simonb wapbl_advance_tail(size_t size, size_t off, size_t delta, off_t *headp,
   1499       1.2    simonb 		   off_t *tailp)
   1500       1.2    simonb {
   1501       1.2    simonb 	off_t head = *headp;
   1502       1.2    simonb 	off_t tail = *tailp;
   1503       1.2    simonb 
   1504       1.2    simonb 	KASSERT(delta <= wapbl_space_used(size, head, tail));
   1505       1.2    simonb 	tail = wapbl_advance(size, off, tail, delta);
   1506       1.2    simonb 	if (head == tail) {
   1507       1.2    simonb 		head = tail = 0;
   1508       1.2    simonb 	}
   1509       1.2    simonb 	*headp = head;
   1510       1.2    simonb 	*tailp = tail;
   1511       1.2    simonb }
   1512       1.2    simonb 
   1513       1.2    simonb 
   1514       1.2    simonb /****************************************************************/
   1515       1.2    simonb 
   1516       1.2    simonb /*
   1517  1.61.2.3     skrll  * wapbl_truncate(wl, minfree)
   1518  1.61.2.3     skrll  *
   1519  1.61.2.3     skrll  *	Wait until at least minfree bytes are available in the log.
   1520  1.61.2.3     skrll  *
   1521  1.61.2.3     skrll  *	If it was necessary to wait for writes to complete,
   1522  1.61.2.3     skrll  *	advance the circular queue tail to reflect the new write
   1523  1.61.2.3     skrll  *	completions and issue a write commit to the log.
   1524  1.61.2.3     skrll  *
   1525  1.61.2.3     skrll  *	=> Caller must hold wl->wl_rwlock writer lock.
   1526       1.2    simonb  */
   1527       1.2    simonb static int
   1528  1.61.2.3     skrll wapbl_truncate(struct wapbl *wl, size_t minfree)
   1529       1.2    simonb {
   1530       1.2    simonb 	size_t delta;
   1531       1.2    simonb 	size_t avail;
   1532       1.2    simonb 	off_t head;
   1533       1.2    simonb 	off_t tail;
   1534       1.2    simonb 	int error = 0;
   1535       1.2    simonb 
   1536       1.2    simonb 	KASSERT(minfree <= (wl->wl_circ_size - wl->wl_reserved_bytes));
   1537       1.2    simonb 	KASSERT(rw_write_held(&wl->wl_rwlock));
   1538       1.2    simonb 
   1539       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1540       1.2    simonb 
   1541       1.2    simonb 	/*
   1542       1.2    simonb 	 * First check to see if we have to do a commit
   1543       1.2    simonb 	 * at all.
   1544       1.2    simonb 	 */
   1545       1.2    simonb 	avail = wapbl_space_free(wl->wl_circ_size, wl->wl_head, wl->wl_tail);
   1546       1.2    simonb 	if (minfree < avail) {
   1547       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   1548       1.2    simonb 		return 0;
   1549       1.2    simonb 	}
   1550       1.2    simonb 	minfree -= avail;
   1551       1.2    simonb 	while ((wl->wl_error_count == 0) &&
   1552       1.2    simonb 	    (wl->wl_reclaimable_bytes < minfree)) {
   1553       1.2    simonb         	WAPBL_PRINTF(WAPBL_PRINT_TRUNCATE,
   1554       1.2    simonb                    ("wapbl_truncate: sleeping on %p wl=%p bytes=%zd "
   1555       1.2    simonb 		    "minfree=%zd\n",
   1556       1.2    simonb                     &wl->wl_reclaimable_bytes, wl, wl->wl_reclaimable_bytes,
   1557       1.2    simonb 		    minfree));
   1558       1.2    simonb 
   1559       1.2    simonb 		cv_wait(&wl->wl_reclaimable_cv, &wl->wl_mtx);
   1560       1.2    simonb 	}
   1561       1.2    simonb 	if (wl->wl_reclaimable_bytes < minfree) {
   1562       1.2    simonb 		KASSERT(wl->wl_error_count);
   1563       1.2    simonb 		/* XXX maybe get actual error from buffer instead someday? */
   1564       1.2    simonb 		error = EIO;
   1565       1.2    simonb 	}
   1566       1.2    simonb 	head = wl->wl_head;
   1567       1.2    simonb 	tail = wl->wl_tail;
   1568       1.2    simonb 	delta = wl->wl_reclaimable_bytes;
   1569       1.2    simonb 
   1570       1.2    simonb 	/* If all of of the entries are flushed, then be sure to keep
   1571       1.2    simonb 	 * the reserved bytes reserved.  Watch out for discarded transactions,
   1572       1.2    simonb 	 * which could leave more bytes reserved than are reclaimable.
   1573       1.2    simonb 	 */
   1574  1.61.2.4     skrll 	if (SIMPLEQ_EMPTY(&wl->wl_entries) &&
   1575       1.2    simonb 	    (delta >= wl->wl_reserved_bytes)) {
   1576       1.2    simonb 		delta -= wl->wl_reserved_bytes;
   1577       1.2    simonb 	}
   1578       1.2    simonb 	wapbl_advance_tail(wl->wl_circ_size, wl->wl_circ_off, delta, &head,
   1579       1.2    simonb 			   &tail);
   1580       1.2    simonb 	KDASSERT(wl->wl_reserved_bytes <=
   1581       1.2    simonb 		wapbl_space_used(wl->wl_circ_size, head, tail));
   1582       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1583       1.2    simonb 
   1584       1.2    simonb 	if (error)
   1585       1.2    simonb 		return error;
   1586       1.2    simonb 
   1587       1.2    simonb 	/*
   1588       1.2    simonb 	 * This is where head, tail and delta are unprotected
   1589       1.2    simonb 	 * from races against itself or flush.  This is ok since
   1590       1.2    simonb 	 * we only call this routine from inside flush itself.
   1591       1.2    simonb 	 *
   1592       1.2    simonb 	 * XXX: how can it race against itself when accessed only
   1593       1.2    simonb 	 * from behind the write-locked rwlock?
   1594       1.2    simonb 	 */
   1595       1.2    simonb 	error = wapbl_write_commit(wl, head, tail);
   1596       1.2    simonb 	if (error)
   1597       1.2    simonb 		return error;
   1598       1.2    simonb 
   1599       1.2    simonb 	wl->wl_head = head;
   1600       1.2    simonb 	wl->wl_tail = tail;
   1601       1.2    simonb 
   1602       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1603       1.2    simonb 	KASSERT(wl->wl_reclaimable_bytes >= delta);
   1604       1.2    simonb 	wl->wl_reclaimable_bytes -= delta;
   1605       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1606       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_TRUNCATE,
   1607       1.2    simonb 	    ("wapbl_truncate thread %d.%d truncating %zu bytes\n",
   1608       1.2    simonb 	    curproc->p_pid, curlwp->l_lid, delta));
   1609       1.2    simonb 
   1610       1.2    simonb 	return 0;
   1611       1.2    simonb }
   1612       1.2    simonb 
   1613       1.2    simonb /****************************************************************/
   1614       1.2    simonb 
   1615       1.2    simonb void
   1616       1.2    simonb wapbl_biodone(struct buf *bp)
   1617       1.2    simonb {
   1618       1.2    simonb 	struct wapbl_entry *we = bp->b_private;
   1619       1.2    simonb 	struct wapbl *wl = we->we_wapbl;
   1620      1.53   hannken #ifdef WAPBL_DEBUG_BUFBYTES
   1621      1.53   hannken 	const int bufsize = bp->b_bufsize;
   1622      1.53   hannken #endif
   1623       1.2    simonb 
   1624       1.2    simonb 	/*
   1625       1.2    simonb 	 * Handle possible flushing of buffers after log has been
   1626       1.2    simonb 	 * decomissioned.
   1627       1.2    simonb 	 */
   1628       1.2    simonb 	if (!wl) {
   1629       1.2    simonb 		KASSERT(we->we_bufcount > 0);
   1630       1.2    simonb 		we->we_bufcount--;
   1631       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   1632      1.53   hannken 		KASSERT(we->we_unsynced_bufbytes >= bufsize);
   1633      1.53   hannken 		we->we_unsynced_bufbytes -= bufsize;
   1634       1.2    simonb #endif
   1635       1.2    simonb 
   1636       1.2    simonb 		if (we->we_bufcount == 0) {
   1637       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   1638       1.2    simonb 			KASSERT(we->we_unsynced_bufbytes == 0);
   1639       1.2    simonb #endif
   1640      1.51      para 			pool_put(&wapbl_entry_pool, we);
   1641       1.2    simonb 		}
   1642       1.2    simonb 
   1643       1.2    simonb 		brelse(bp, 0);
   1644       1.2    simonb 		return;
   1645       1.2    simonb 	}
   1646       1.2    simonb 
   1647       1.2    simonb #ifdef ohbother
   1648      1.44  uebayasi 	KDASSERT(bp->b_oflags & BO_DONE);
   1649      1.44  uebayasi 	KDASSERT(!(bp->b_oflags & BO_DELWRI));
   1650       1.2    simonb 	KDASSERT(bp->b_flags & B_ASYNC);
   1651      1.44  uebayasi 	KDASSERT(bp->b_cflags & BC_BUSY);
   1652       1.2    simonb 	KDASSERT(!(bp->b_flags & B_LOCKED));
   1653       1.2    simonb 	KDASSERT(!(bp->b_flags & B_READ));
   1654      1.44  uebayasi 	KDASSERT(!(bp->b_cflags & BC_INVAL));
   1655      1.44  uebayasi 	KDASSERT(!(bp->b_cflags & BC_NOCACHE));
   1656       1.2    simonb #endif
   1657       1.2    simonb 
   1658       1.2    simonb 	if (bp->b_error) {
   1659       1.2    simonb 		/*
   1660  1.61.2.3     skrll 		 * If an error occurs, it would be nice to leave the buffer
   1661  1.61.2.3     skrll 		 * as a delayed write on the LRU queue so that we can retry
   1662  1.61.2.3     skrll 		 * it later. But buffercache(9) can't handle dirty buffer
   1663  1.61.2.3     skrll 		 * reuse, so just mark the log permanently errored out.
   1664       1.2    simonb 		 */
   1665       1.2    simonb 		mutex_enter(&wl->wl_mtx);
   1666       1.2    simonb 		if (wl->wl_error_count == 0) {
   1667       1.2    simonb 			wl->wl_error_count++;
   1668       1.2    simonb 			cv_broadcast(&wl->wl_reclaimable_cv);
   1669       1.2    simonb 		}
   1670       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   1671       1.2    simonb 	}
   1672       1.2    simonb 
   1673      1.53   hannken 	/*
   1674  1.61.2.6     skrll 	 * Make sure that the buf doesn't retain the media flags, so that
   1675  1.61.2.6     skrll 	 * e.g. wapbl_allow_fuadpo has immediate effect on any following I/O.
   1676  1.61.2.6     skrll 	 * The flags will be set again if needed by another I/O.
   1677  1.61.2.6     skrll 	 */
   1678  1.61.2.6     skrll 	bp->b_flags &= ~B_MEDIA_FLAGS;
   1679  1.61.2.6     skrll 
   1680  1.61.2.6     skrll 	/*
   1681      1.53   hannken 	 * Release the buffer here. wapbl_flush() may wait for the
   1682      1.53   hannken 	 * log to become empty and we better unbusy the buffer before
   1683      1.53   hannken 	 * wapbl_flush() returns.
   1684      1.53   hannken 	 */
   1685      1.53   hannken 	brelse(bp, 0);
   1686      1.53   hannken 
   1687       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1688       1.2    simonb 
   1689       1.2    simonb 	KASSERT(we->we_bufcount > 0);
   1690       1.2    simonb 	we->we_bufcount--;
   1691       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   1692      1.53   hannken 	KASSERT(we->we_unsynced_bufbytes >= bufsize);
   1693      1.53   hannken 	we->we_unsynced_bufbytes -= bufsize;
   1694      1.53   hannken 	KASSERT(wl->wl_unsynced_bufbytes >= bufsize);
   1695      1.53   hannken 	wl->wl_unsynced_bufbytes -= bufsize;
   1696       1.2    simonb #endif
   1697  1.61.2.6     skrll 	wl->wl_ev_metawrite.ev_count++;
   1698       1.2    simonb 
   1699       1.2    simonb 	/*
   1700       1.2    simonb 	 * If the current transaction can be reclaimed, start
   1701       1.2    simonb 	 * at the beginning and reclaim any consecutive reclaimable
   1702       1.2    simonb 	 * transactions.  If we successfully reclaim anything,
   1703       1.2    simonb 	 * then wakeup anyone waiting for the reclaim.
   1704       1.2    simonb 	 */
   1705       1.2    simonb 	if (we->we_bufcount == 0) {
   1706       1.2    simonb 		size_t delta = 0;
   1707       1.2    simonb 		int errcnt = 0;
   1708       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   1709       1.2    simonb 		KDASSERT(we->we_unsynced_bufbytes == 0);
   1710       1.2    simonb #endif
   1711       1.2    simonb 		/*
   1712       1.2    simonb 		 * clear any posted error, since the buffer it came from
   1713       1.2    simonb 		 * has successfully flushed by now
   1714       1.2    simonb 		 */
   1715       1.2    simonb 		while ((we = SIMPLEQ_FIRST(&wl->wl_entries)) &&
   1716       1.2    simonb 		       (we->we_bufcount == 0)) {
   1717       1.2    simonb 			delta += we->we_reclaimable_bytes;
   1718       1.2    simonb 			if (we->we_error)
   1719       1.2    simonb 				errcnt++;
   1720       1.2    simonb 			SIMPLEQ_REMOVE_HEAD(&wl->wl_entries, we_entries);
   1721      1.51      para 			pool_put(&wapbl_entry_pool, we);
   1722       1.2    simonb 		}
   1723       1.2    simonb 
   1724       1.2    simonb 		if (delta) {
   1725       1.2    simonb 			wl->wl_reclaimable_bytes += delta;
   1726       1.2    simonb 			KASSERT(wl->wl_error_count >= errcnt);
   1727       1.2    simonb 			wl->wl_error_count -= errcnt;
   1728       1.2    simonb 			cv_broadcast(&wl->wl_reclaimable_cv);
   1729       1.2    simonb 		}
   1730       1.2    simonb 	}
   1731       1.2    simonb 
   1732       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1733       1.2    simonb }
   1734       1.2    simonb 
   1735       1.2    simonb /*
   1736  1.61.2.3     skrll  * wapbl_flush(wl, wait)
   1737  1.61.2.3     skrll  *
   1738  1.61.2.3     skrll  *	Flush pending block writes, deallocations, and inodes from
   1739  1.61.2.3     skrll  *	the current transaction in memory to the log on disk:
   1740  1.61.2.3     skrll  *
   1741  1.61.2.3     skrll  *	1. Call the file system's wl_flush callback to flush any
   1742  1.61.2.3     skrll  *	   per-file-system pending updates.
   1743  1.61.2.3     skrll  *	2. Wait for enough space in the log for the current transaction.
   1744  1.61.2.3     skrll  *	3. Synchronously write the new log records, advancing the
   1745  1.61.2.3     skrll  *	   circular queue head.
   1746  1.61.2.3     skrll  *	4. Issue the pending block writes asynchronously, now that they
   1747  1.61.2.3     skrll  *	   are recorded in the log and can be replayed after crash.
   1748  1.61.2.3     skrll  *	5. If wait is true, wait for all writes to complete and for the
   1749  1.61.2.3     skrll  *	   log to become empty.
   1750  1.61.2.3     skrll  *
   1751  1.61.2.3     skrll  *	On failure, call the file system's wl_flush_abort callback.
   1752       1.2    simonb  */
   1753       1.2    simonb int
   1754       1.2    simonb wapbl_flush(struct wapbl *wl, int waitfor)
   1755       1.2    simonb {
   1756       1.2    simonb 	struct buf *bp;
   1757       1.2    simonb 	struct wapbl_entry *we;
   1758       1.2    simonb 	off_t off;
   1759       1.2    simonb 	off_t head;
   1760       1.2    simonb 	off_t tail;
   1761       1.2    simonb 	size_t delta = 0;
   1762       1.2    simonb 	size_t flushsize;
   1763       1.2    simonb 	size_t reserved;
   1764       1.2    simonb 	int error = 0;
   1765       1.2    simonb 
   1766       1.2    simonb 	/*
   1767       1.2    simonb 	 * Do a quick check to see if a full flush can be skipped
   1768       1.2    simonb 	 * This assumes that the flush callback does not need to be called
   1769       1.2    simonb 	 * unless there are other outstanding bufs.
   1770       1.2    simonb 	 */
   1771       1.2    simonb 	if (!waitfor) {
   1772       1.2    simonb 		size_t nbufs;
   1773       1.2    simonb 		mutex_enter(&wl->wl_mtx);	/* XXX need mutex here to
   1774       1.2    simonb 						   protect the KASSERTS */
   1775       1.2    simonb 		nbufs = wl->wl_bufcount;
   1776       1.2    simonb 		KASSERT((wl->wl_bufcount == 0) == (wl->wl_bufbytes == 0));
   1777       1.2    simonb 		KASSERT((wl->wl_bufcount == 0) == (wl->wl_bcount == 0));
   1778       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   1779       1.2    simonb 		if (nbufs == 0)
   1780       1.2    simonb 			return 0;
   1781       1.2    simonb 	}
   1782       1.2    simonb 
   1783       1.2    simonb 	/*
   1784       1.2    simonb 	 * XXX we may consider using LK_UPGRADE here
   1785       1.2    simonb 	 * if we want to call flush from inside a transaction
   1786       1.2    simonb 	 */
   1787       1.2    simonb 	rw_enter(&wl->wl_rwlock, RW_WRITER);
   1788  1.61.2.5     skrll 	wl->wl_flush(wl->wl_mount, TAILQ_FIRST(&wl->wl_dealloclist));
   1789       1.2    simonb 
   1790       1.2    simonb 	/*
   1791  1.61.2.3     skrll 	 * Now that we are exclusively locked and the file system has
   1792  1.61.2.3     skrll 	 * issued any deferred block writes for this transaction, check
   1793  1.61.2.3     skrll 	 * whether there are any blocks to write to the log.  If not,
   1794  1.61.2.3     skrll 	 * skip waiting for space or writing any log entries.
   1795  1.61.2.3     skrll 	 *
   1796  1.61.2.3     skrll 	 * XXX Shouldn't this also check wl_dealloccnt and
   1797  1.61.2.3     skrll 	 * wl_inohashcnt?  Perhaps wl_dealloccnt doesn't matter if the
   1798  1.61.2.3     skrll 	 * file system didn't produce any blocks as a consequence of
   1799  1.61.2.3     skrll 	 * it, but the same does not seem to be so of wl_inohashcnt.
   1800       1.2    simonb 	 */
   1801       1.2    simonb 	if (wl->wl_bufcount == 0) {
   1802  1.61.2.3     skrll 		goto wait_out;
   1803       1.2    simonb 	}
   1804       1.2    simonb 
   1805       1.2    simonb #if 0
   1806       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
   1807       1.2    simonb 		     ("wapbl_flush thread %d.%d flushing entries with "
   1808       1.2    simonb 		      "bufcount=%zu bufbytes=%zu\n",
   1809       1.2    simonb 		      curproc->p_pid, curlwp->l_lid, wl->wl_bufcount,
   1810       1.2    simonb 		      wl->wl_bufbytes));
   1811       1.2    simonb #endif
   1812       1.2    simonb 
   1813       1.2    simonb 	/* Calculate amount of space needed to flush */
   1814       1.2    simonb 	flushsize = wapbl_transaction_len(wl);
   1815      1.39  christos 	if (wapbl_verbose_commit) {
   1816      1.39  christos 		struct timespec ts;
   1817      1.39  christos 		getnanotime(&ts);
   1818      1.43  nakayama 		printf("%s: %lld.%09ld this transaction = %zu bytes\n",
   1819      1.39  christos 		    __func__, (long long)ts.tv_sec,
   1820      1.39  christos 		    (long)ts.tv_nsec, flushsize);
   1821      1.39  christos 	}
   1822       1.2    simonb 
   1823       1.2    simonb 	if (flushsize > (wl->wl_circ_size - wl->wl_reserved_bytes)) {
   1824       1.2    simonb 		/*
   1825       1.2    simonb 		 * XXX this could be handled more gracefully, perhaps place
   1826       1.2    simonb 		 * only a partial transaction in the log and allow the
   1827       1.2    simonb 		 * remaining to flush without the protection of the journal.
   1828       1.2    simonb 		 */
   1829  1.61.2.3     skrll 		panic("wapbl_flush: current transaction too big to flush");
   1830       1.2    simonb 	}
   1831       1.2    simonb 
   1832  1.61.2.3     skrll 	error = wapbl_truncate(wl, flushsize);
   1833       1.2    simonb 	if (error)
   1834  1.61.2.3     skrll 		goto out;
   1835       1.2    simonb 
   1836       1.2    simonb 	off = wl->wl_head;
   1837  1.61.2.3     skrll 	KASSERT((off == 0) || (off >= wl->wl_circ_off));
   1838  1.61.2.3     skrll 	KASSERT((off == 0) || (off < wl->wl_circ_off + wl->wl_circ_size));
   1839       1.2    simonb 	error = wapbl_write_blocks(wl, &off);
   1840       1.2    simonb 	if (error)
   1841  1.61.2.3     skrll 		goto out;
   1842       1.2    simonb 	error = wapbl_write_revocations(wl, &off);
   1843       1.2    simonb 	if (error)
   1844  1.61.2.3     skrll 		goto out;
   1845       1.2    simonb 	error = wapbl_write_inodes(wl, &off);
   1846       1.2    simonb 	if (error)
   1847  1.61.2.3     skrll 		goto out;
   1848       1.2    simonb 
   1849       1.2    simonb 	reserved = 0;
   1850       1.2    simonb 	if (wl->wl_inohashcnt)
   1851       1.2    simonb 		reserved = wapbl_transaction_inodes_len(wl);
   1852       1.2    simonb 
   1853       1.2    simonb 	head = wl->wl_head;
   1854       1.2    simonb 	tail = wl->wl_tail;
   1855       1.2    simonb 
   1856       1.2    simonb 	wapbl_advance_head(wl->wl_circ_size, wl->wl_circ_off, flushsize,
   1857       1.2    simonb 	    &head, &tail);
   1858  1.61.2.3     skrll 
   1859  1.61.2.3     skrll 	KASSERTMSG(head == off,
   1860  1.61.2.3     skrll 	    "lost head! head=%"PRIdMAX" tail=%" PRIdMAX
   1861  1.61.2.3     skrll 	    " off=%"PRIdMAX" flush=%zu",
   1862  1.61.2.3     skrll 	    (intmax_t)head, (intmax_t)tail, (intmax_t)off,
   1863  1.61.2.3     skrll 	    flushsize);
   1864       1.2    simonb 
   1865       1.2    simonb 	/* Opportunistically move the tail forward if we can */
   1866  1.61.2.3     skrll 	mutex_enter(&wl->wl_mtx);
   1867  1.61.2.3     skrll 	delta = wl->wl_reclaimable_bytes;
   1868  1.61.2.3     skrll 	mutex_exit(&wl->wl_mtx);
   1869  1.61.2.3     skrll 	wapbl_advance_tail(wl->wl_circ_size, wl->wl_circ_off, delta,
   1870  1.61.2.3     skrll 	    &head, &tail);
   1871       1.2    simonb 
   1872       1.2    simonb 	error = wapbl_write_commit(wl, head, tail);
   1873       1.2    simonb 	if (error)
   1874  1.61.2.3     skrll 		goto out;
   1875       1.2    simonb 
   1876      1.51      para 	we = pool_get(&wapbl_entry_pool, PR_WAITOK);
   1877       1.2    simonb 
   1878       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   1879       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
   1880       1.2    simonb 		("wapbl_flush: thread %d.%d head+=%zu tail+=%zu used=%zu"
   1881       1.2    simonb 		 " unsynced=%zu"
   1882       1.2    simonb 		 "\n\tbufcount=%zu bufbytes=%zu bcount=%zu deallocs=%d "
   1883       1.2    simonb 		 "inodes=%d\n",
   1884       1.2    simonb 		 curproc->p_pid, curlwp->l_lid, flushsize, delta,
   1885       1.2    simonb 		 wapbl_space_used(wl->wl_circ_size, head, tail),
   1886       1.2    simonb 		 wl->wl_unsynced_bufbytes, wl->wl_bufcount,
   1887       1.2    simonb 		 wl->wl_bufbytes, wl->wl_bcount, wl->wl_dealloccnt,
   1888       1.2    simonb 		 wl->wl_inohashcnt));
   1889       1.2    simonb #else
   1890       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
   1891       1.2    simonb 		("wapbl_flush: thread %d.%d head+=%zu tail+=%zu used=%zu"
   1892       1.2    simonb 		 "\n\tbufcount=%zu bufbytes=%zu bcount=%zu deallocs=%d "
   1893       1.2    simonb 		 "inodes=%d\n",
   1894       1.2    simonb 		 curproc->p_pid, curlwp->l_lid, flushsize, delta,
   1895       1.2    simonb 		 wapbl_space_used(wl->wl_circ_size, head, tail),
   1896       1.2    simonb 		 wl->wl_bufcount, wl->wl_bufbytes, wl->wl_bcount,
   1897       1.2    simonb 		 wl->wl_dealloccnt, wl->wl_inohashcnt));
   1898       1.2    simonb #endif
   1899       1.2    simonb 
   1900       1.2    simonb 
   1901       1.2    simonb 	mutex_enter(&bufcache_lock);
   1902       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   1903       1.2    simonb 
   1904       1.2    simonb 	wl->wl_reserved_bytes = reserved;
   1905       1.2    simonb 	wl->wl_head = head;
   1906       1.2    simonb 	wl->wl_tail = tail;
   1907       1.2    simonb 	KASSERT(wl->wl_reclaimable_bytes >= delta);
   1908       1.2    simonb 	wl->wl_reclaimable_bytes -= delta;
   1909  1.61.2.4     skrll 	KDASSERT(wl->wl_dealloccnt == 0);
   1910       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   1911       1.2    simonb 	wl->wl_unsynced_bufbytes += wl->wl_bufbytes;
   1912       1.2    simonb #endif
   1913       1.2    simonb 
   1914       1.2    simonb 	we->we_wapbl = wl;
   1915       1.2    simonb 	we->we_bufcount = wl->wl_bufcount;
   1916       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   1917       1.2    simonb 	we->we_unsynced_bufbytes = wl->wl_bufbytes;
   1918       1.2    simonb #endif
   1919       1.2    simonb 	we->we_reclaimable_bytes = flushsize;
   1920       1.2    simonb 	we->we_error = 0;
   1921       1.2    simonb 	SIMPLEQ_INSERT_TAIL(&wl->wl_entries, we, we_entries);
   1922       1.2    simonb 
   1923       1.2    simonb 	/*
   1924  1.61.2.6     skrll 	 * This flushes bufs in order than they were queued, so the LRU
   1925  1.61.2.6     skrll 	 * order is preserved.
   1926       1.2    simonb 	 */
   1927  1.61.2.6     skrll 	while ((bp = TAILQ_FIRST(&wl->wl_bufs)) != NULL) {
   1928       1.2    simonb 		if (bbusy(bp, 0, 0, &wl->wl_mtx)) {
   1929       1.2    simonb 			continue;
   1930       1.2    simonb 		}
   1931       1.2    simonb 		bp->b_iodone = wapbl_biodone;
   1932       1.2    simonb 		bp->b_private = we;
   1933  1.61.2.6     skrll 
   1934  1.61.2.6     skrll 		/* make sure the block is saved sync when FUA in use */
   1935  1.61.2.6     skrll 		bp->b_flags |= WAPBL_MFLAGS(wl);
   1936  1.61.2.6     skrll 
   1937       1.2    simonb 		bremfree(bp);
   1938       1.2    simonb 		wapbl_remove_buf_locked(wl, bp);
   1939       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   1940       1.2    simonb 		mutex_exit(&bufcache_lock);
   1941       1.2    simonb 		bawrite(bp);
   1942       1.2    simonb 		mutex_enter(&bufcache_lock);
   1943       1.2    simonb 		mutex_enter(&wl->wl_mtx);
   1944       1.2    simonb 	}
   1945       1.2    simonb 	mutex_exit(&wl->wl_mtx);
   1946       1.2    simonb 	mutex_exit(&bufcache_lock);
   1947       1.2    simonb 
   1948       1.2    simonb #if 0
   1949       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
   1950       1.2    simonb 		     ("wapbl_flush thread %d.%d done flushing entries...\n",
   1951       1.2    simonb 		     curproc->p_pid, curlwp->l_lid));
   1952       1.2    simonb #endif
   1953       1.2    simonb 
   1954  1.61.2.3     skrll  wait_out:
   1955       1.2    simonb 
   1956       1.2    simonb 	/*
   1957       1.2    simonb 	 * If the waitfor flag is set, don't return until everything is
   1958       1.2    simonb 	 * fully flushed and the on disk log is empty.
   1959       1.2    simonb 	 */
   1960       1.2    simonb 	if (waitfor) {
   1961  1.61.2.4     skrll 		error = wapbl_truncate(wl, wl->wl_circ_size -
   1962  1.61.2.3     skrll 			wl->wl_reserved_bytes);
   1963       1.2    simonb 	}
   1964       1.2    simonb 
   1965  1.61.2.3     skrll  out:
   1966       1.2    simonb 	if (error) {
   1967  1.61.2.4     skrll 		wl->wl_flush_abort(wl->wl_mount,
   1968  1.61.2.5     skrll 		    TAILQ_FIRST(&wl->wl_dealloclist));
   1969       1.2    simonb 	}
   1970       1.2    simonb 
   1971       1.2    simonb #ifdef WAPBL_DEBUG_PRINT
   1972       1.2    simonb 	if (error) {
   1973       1.2    simonb 		pid_t pid = -1;
   1974       1.2    simonb 		lwpid_t lid = -1;
   1975       1.2    simonb 		if (curproc)
   1976       1.2    simonb 			pid = curproc->p_pid;
   1977       1.2    simonb 		if (curlwp)
   1978       1.2    simonb 			lid = curlwp->l_lid;
   1979       1.2    simonb 		mutex_enter(&wl->wl_mtx);
   1980       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   1981       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_ERROR,
   1982       1.2    simonb 		    ("wapbl_flush: thread %d.%d aborted flush: "
   1983       1.2    simonb 		    "error = %d\n"
   1984       1.2    simonb 		    "\tbufcount=%zu bufbytes=%zu bcount=%zu "
   1985       1.2    simonb 		    "deallocs=%d inodes=%d\n"
   1986       1.2    simonb 		    "\terrcnt = %d, reclaimable=%zu reserved=%zu "
   1987       1.2    simonb 		    "unsynced=%zu\n",
   1988       1.2    simonb 		    pid, lid, error, wl->wl_bufcount,
   1989       1.2    simonb 		    wl->wl_bufbytes, wl->wl_bcount,
   1990       1.2    simonb 		    wl->wl_dealloccnt, wl->wl_inohashcnt,
   1991       1.2    simonb 		    wl->wl_error_count, wl->wl_reclaimable_bytes,
   1992       1.2    simonb 		    wl->wl_reserved_bytes, wl->wl_unsynced_bufbytes));
   1993       1.2    simonb 		SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
   1994       1.2    simonb 			WAPBL_PRINTF(WAPBL_PRINT_ERROR,
   1995       1.2    simonb 			    ("\tentry: bufcount = %zu, reclaimable = %zu, "
   1996       1.2    simonb 			     "error = %d, unsynced = %zu\n",
   1997       1.2    simonb 			     we->we_bufcount, we->we_reclaimable_bytes,
   1998       1.2    simonb 			     we->we_error, we->we_unsynced_bufbytes));
   1999       1.2    simonb 		}
   2000       1.2    simonb #else
   2001       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_ERROR,
   2002       1.2    simonb 		    ("wapbl_flush: thread %d.%d aborted flush: "
   2003       1.2    simonb 		     "error = %d\n"
   2004       1.2    simonb 		     "\tbufcount=%zu bufbytes=%zu bcount=%zu "
   2005       1.2    simonb 		     "deallocs=%d inodes=%d\n"
   2006       1.2    simonb 		     "\terrcnt = %d, reclaimable=%zu reserved=%zu\n",
   2007       1.2    simonb 		     pid, lid, error, wl->wl_bufcount,
   2008       1.2    simonb 		     wl->wl_bufbytes, wl->wl_bcount,
   2009       1.2    simonb 		     wl->wl_dealloccnt, wl->wl_inohashcnt,
   2010       1.2    simonb 		     wl->wl_error_count, wl->wl_reclaimable_bytes,
   2011       1.2    simonb 		     wl->wl_reserved_bytes));
   2012       1.2    simonb 		SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
   2013       1.2    simonb 			WAPBL_PRINTF(WAPBL_PRINT_ERROR,
   2014       1.2    simonb 			    ("\tentry: bufcount = %zu, reclaimable = %zu, "
   2015       1.2    simonb 			     "error = %d\n", we->we_bufcount,
   2016       1.2    simonb 			     we->we_reclaimable_bytes, we->we_error));
   2017       1.2    simonb 		}
   2018       1.2    simonb #endif
   2019       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   2020       1.2    simonb 	}
   2021       1.2    simonb #endif
   2022       1.2    simonb 
   2023       1.2    simonb 	rw_exit(&wl->wl_rwlock);
   2024       1.2    simonb 	return error;
   2025       1.2    simonb }
   2026       1.2    simonb 
   2027       1.2    simonb /****************************************************************/
   2028       1.2    simonb 
   2029       1.2    simonb void
   2030       1.2    simonb wapbl_jlock_assert(struct wapbl *wl)
   2031       1.2    simonb {
   2032       1.2    simonb 
   2033      1.23        ad 	KASSERT(rw_lock_held(&wl->wl_rwlock));
   2034       1.2    simonb }
   2035       1.2    simonb 
   2036       1.2    simonb void
   2037       1.2    simonb wapbl_junlock_assert(struct wapbl *wl)
   2038       1.2    simonb {
   2039       1.2    simonb 
   2040       1.2    simonb 	KASSERT(!rw_write_held(&wl->wl_rwlock));
   2041       1.2    simonb }
   2042       1.2    simonb 
   2043       1.2    simonb /****************************************************************/
   2044       1.2    simonb 
   2045       1.2    simonb /* locks missing */
   2046       1.2    simonb void
   2047       1.2    simonb wapbl_print(struct wapbl *wl,
   2048       1.2    simonb 		int full,
   2049       1.2    simonb 		void (*pr)(const char *, ...))
   2050       1.2    simonb {
   2051       1.2    simonb 	struct buf *bp;
   2052       1.2    simonb 	struct wapbl_entry *we;
   2053       1.2    simonb 	(*pr)("wapbl %p", wl);
   2054       1.2    simonb 	(*pr)("\nlogvp = %p, devvp = %p, logpbn = %"PRId64"\n",
   2055       1.2    simonb 	      wl->wl_logvp, wl->wl_devvp, wl->wl_logpbn);
   2056       1.2    simonb 	(*pr)("circ = %zu, header = %zu, head = %"PRIdMAX" tail = %"PRIdMAX"\n",
   2057       1.2    simonb 	      wl->wl_circ_size, wl->wl_circ_off,
   2058       1.2    simonb 	      (intmax_t)wl->wl_head, (intmax_t)wl->wl_tail);
   2059       1.2    simonb 	(*pr)("fs_dev_bshift = %d, log_dev_bshift = %d\n",
   2060       1.2    simonb 	      wl->wl_log_dev_bshift, wl->wl_fs_dev_bshift);
   2061       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   2062       1.2    simonb 	(*pr)("bufcount = %zu, bufbytes = %zu bcount = %zu reclaimable = %zu "
   2063       1.2    simonb 	      "reserved = %zu errcnt = %d unsynced = %zu\n",
   2064       1.2    simonb 	      wl->wl_bufcount, wl->wl_bufbytes, wl->wl_bcount,
   2065       1.2    simonb 	      wl->wl_reclaimable_bytes, wl->wl_reserved_bytes,
   2066       1.2    simonb 				wl->wl_error_count, wl->wl_unsynced_bufbytes);
   2067       1.2    simonb #else
   2068       1.2    simonb 	(*pr)("bufcount = %zu, bufbytes = %zu bcount = %zu reclaimable = %zu "
   2069       1.2    simonb 	      "reserved = %zu errcnt = %d\n", wl->wl_bufcount, wl->wl_bufbytes,
   2070       1.2    simonb 	      wl->wl_bcount, wl->wl_reclaimable_bytes, wl->wl_reserved_bytes,
   2071       1.2    simonb 				wl->wl_error_count);
   2072       1.2    simonb #endif
   2073       1.2    simonb 	(*pr)("\tdealloccnt = %d, dealloclim = %d\n",
   2074       1.2    simonb 	      wl->wl_dealloccnt, wl->wl_dealloclim);
   2075       1.2    simonb 	(*pr)("\tinohashcnt = %d, inohashmask = 0x%08x\n",
   2076       1.2    simonb 	      wl->wl_inohashcnt, wl->wl_inohashmask);
   2077       1.2    simonb 	(*pr)("entries:\n");
   2078       1.2    simonb 	SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
   2079       1.2    simonb #ifdef WAPBL_DEBUG_BUFBYTES
   2080       1.2    simonb 		(*pr)("\tbufcount = %zu, reclaimable = %zu, error = %d, "
   2081       1.2    simonb 		      "unsynced = %zu\n",
   2082       1.2    simonb 		      we->we_bufcount, we->we_reclaimable_bytes,
   2083       1.2    simonb 		      we->we_error, we->we_unsynced_bufbytes);
   2084       1.2    simonb #else
   2085       1.2    simonb 		(*pr)("\tbufcount = %zu, reclaimable = %zu, error = %d\n",
   2086       1.2    simonb 		      we->we_bufcount, we->we_reclaimable_bytes, we->we_error);
   2087       1.2    simonb #endif
   2088       1.2    simonb 	}
   2089       1.2    simonb 	if (full) {
   2090       1.2    simonb 		int cnt = 0;
   2091       1.2    simonb 		(*pr)("bufs =");
   2092  1.61.2.6     skrll 		TAILQ_FOREACH(bp, &wl->wl_bufs, b_wapbllist) {
   2093  1.61.2.6     skrll 			if (!TAILQ_NEXT(bp, b_wapbllist)) {
   2094       1.2    simonb 				(*pr)(" %p", bp);
   2095       1.2    simonb 			} else if ((++cnt % 6) == 0) {
   2096       1.2    simonb 				(*pr)(" %p,\n\t", bp);
   2097       1.2    simonb 			} else {
   2098       1.2    simonb 				(*pr)(" %p,", bp);
   2099       1.2    simonb 			}
   2100       1.2    simonb 		}
   2101       1.2    simonb 		(*pr)("\n");
   2102       1.2    simonb 
   2103       1.2    simonb 		(*pr)("dealloced blks = ");
   2104       1.2    simonb 		{
   2105  1.61.2.4     skrll 			struct wapbl_dealloc *wd;
   2106       1.2    simonb 			cnt = 0;
   2107  1.61.2.5     skrll 			TAILQ_FOREACH(wd, &wl->wl_dealloclist, wd_entries) {
   2108       1.2    simonb 				(*pr)(" %"PRId64":%d,",
   2109  1.61.2.4     skrll 				      wd->wd_blkno,
   2110  1.61.2.4     skrll 				      wd->wd_len);
   2111       1.2    simonb 				if ((++cnt % 4) == 0) {
   2112       1.2    simonb 					(*pr)("\n\t");
   2113       1.2    simonb 				}
   2114       1.2    simonb 			}
   2115       1.2    simonb 		}
   2116       1.2    simonb 		(*pr)("\n");
   2117       1.2    simonb 
   2118       1.2    simonb 		(*pr)("registered inodes = ");
   2119       1.2    simonb 		{
   2120       1.2    simonb 			int i;
   2121       1.2    simonb 			cnt = 0;
   2122       1.2    simonb 			for (i = 0; i <= wl->wl_inohashmask; i++) {
   2123       1.2    simonb 				struct wapbl_ino_head *wih;
   2124       1.2    simonb 				struct wapbl_ino *wi;
   2125       1.2    simonb 
   2126       1.2    simonb 				wih = &wl->wl_inohash[i];
   2127       1.2    simonb 				LIST_FOREACH(wi, wih, wi_hash) {
   2128       1.2    simonb 					if (wi->wi_ino == 0)
   2129       1.2    simonb 						continue;
   2130      1.55  christos 					(*pr)(" %"PRIu64"/0%06"PRIo32",",
   2131       1.2    simonb 					    wi->wi_ino, wi->wi_mode);
   2132       1.2    simonb 					if ((++cnt % 4) == 0) {
   2133       1.2    simonb 						(*pr)("\n\t");
   2134       1.2    simonb 					}
   2135       1.2    simonb 				}
   2136       1.2    simonb 			}
   2137       1.2    simonb 			(*pr)("\n");
   2138       1.2    simonb 		}
   2139  1.61.2.6     skrll 
   2140  1.61.2.6     skrll 		(*pr)("iobufs free =");
   2141  1.61.2.6     skrll 		TAILQ_FOREACH(bp, &wl->wl_iobufs, b_wapbllist) {
   2142  1.61.2.6     skrll 			if (!TAILQ_NEXT(bp, b_wapbllist)) {
   2143  1.61.2.6     skrll 				(*pr)(" %p", bp);
   2144  1.61.2.6     skrll 			} else if ((++cnt % 6) == 0) {
   2145  1.61.2.6     skrll 				(*pr)(" %p,\n\t", bp);
   2146  1.61.2.6     skrll 			} else {
   2147  1.61.2.6     skrll 				(*pr)(" %p,", bp);
   2148  1.61.2.6     skrll 			}
   2149  1.61.2.6     skrll 		}
   2150  1.61.2.6     skrll 		(*pr)("\n");
   2151  1.61.2.6     skrll 
   2152  1.61.2.6     skrll 		(*pr)("iobufs busy =");
   2153  1.61.2.6     skrll 		TAILQ_FOREACH(bp, &wl->wl_iobufs_busy, b_wapbllist) {
   2154  1.61.2.6     skrll 			if (!TAILQ_NEXT(bp, b_wapbllist)) {
   2155  1.61.2.6     skrll 				(*pr)(" %p", bp);
   2156  1.61.2.6     skrll 			} else if ((++cnt % 6) == 0) {
   2157  1.61.2.6     skrll 				(*pr)(" %p,\n\t", bp);
   2158  1.61.2.6     skrll 			} else {
   2159  1.61.2.6     skrll 				(*pr)(" %p,", bp);
   2160  1.61.2.6     skrll 			}
   2161  1.61.2.6     skrll 		}
   2162  1.61.2.6     skrll 		(*pr)("\n");
   2163       1.2    simonb 	}
   2164       1.2    simonb }
   2165       1.2    simonb 
   2166       1.2    simonb #if defined(WAPBL_DEBUG) || defined(DDB)
   2167       1.2    simonb void
   2168       1.2    simonb wapbl_dump(struct wapbl *wl)
   2169       1.2    simonb {
   2170       1.2    simonb #if defined(WAPBL_DEBUG)
   2171       1.2    simonb 	if (!wl)
   2172       1.2    simonb 		wl = wapbl_debug_wl;
   2173       1.2    simonb #endif
   2174       1.2    simonb 	if (!wl)
   2175       1.2    simonb 		return;
   2176       1.2    simonb 	wapbl_print(wl, 1, printf);
   2177       1.2    simonb }
   2178       1.2    simonb #endif
   2179       1.2    simonb 
   2180       1.2    simonb /****************************************************************/
   2181       1.2    simonb 
   2182  1.61.2.5     skrll int
   2183  1.61.2.5     skrll wapbl_register_deallocation(struct wapbl *wl, daddr_t blk, int len, bool force,
   2184  1.61.2.5     skrll     void **cookiep)
   2185       1.2    simonb {
   2186  1.61.2.4     skrll 	struct wapbl_dealloc *wd;
   2187  1.61.2.5     skrll 	int error = 0;
   2188       1.2    simonb 
   2189       1.2    simonb 	wapbl_jlock_assert(wl);
   2190       1.2    simonb 
   2191      1.38   hannken 	mutex_enter(&wl->wl_mtx);
   2192  1.61.2.5     skrll 
   2193  1.61.2.5     skrll 	if (__predict_false(wl->wl_dealloccnt >= wl->wl_dealloclim)) {
   2194  1.61.2.5     skrll 		if (!force) {
   2195  1.61.2.5     skrll 			error = EAGAIN;
   2196  1.61.2.5     skrll 			goto out;
   2197  1.61.2.5     skrll 		}
   2198  1.61.2.5     skrll 
   2199  1.61.2.5     skrll 		/*
   2200  1.61.2.5     skrll 		 * Forced registration can only be used when:
   2201  1.61.2.5     skrll 		 * 1) the caller can't cope with failure
   2202  1.61.2.5     skrll 		 * 2) the path can be triggered only bounded, small
   2203  1.61.2.5     skrll 		 *    times per transaction
   2204  1.61.2.5     skrll 		 * If this is not fullfilled, and the path would be triggered
   2205  1.61.2.5     skrll 		 * many times, this could overflow maximum transaction size
   2206  1.61.2.5     skrll 		 * and panic later.
   2207  1.61.2.5     skrll 		 */
   2208  1.61.2.5     skrll 		printf("%s: forced dealloc registration over limit: %d >= %d\n",
   2209  1.61.2.5     skrll 			wl->wl_mount->mnt_stat.f_mntonname,
   2210  1.61.2.5     skrll 			wl->wl_dealloccnt, wl->wl_dealloclim);
   2211  1.61.2.5     skrll 	}
   2212      1.27     pooka 
   2213       1.2    simonb 	wl->wl_dealloccnt++;
   2214  1.61.2.4     skrll 	mutex_exit(&wl->wl_mtx);
   2215  1.61.2.4     skrll 
   2216  1.61.2.4     skrll 	wd = pool_get(&wapbl_dealloc_pool, PR_WAITOK);
   2217  1.61.2.4     skrll 	wd->wd_blkno = blk;
   2218  1.61.2.4     skrll 	wd->wd_len = len;
   2219  1.61.2.4     skrll 
   2220  1.61.2.4     skrll 	mutex_enter(&wl->wl_mtx);
   2221  1.61.2.5     skrll 	TAILQ_INSERT_TAIL(&wl->wl_dealloclist, wd, wd_entries);
   2222  1.61.2.5     skrll 
   2223  1.61.2.5     skrll 	if (cookiep)
   2224  1.61.2.5     skrll 		*cookiep = wd;
   2225  1.61.2.5     skrll 
   2226  1.61.2.5     skrll  out:
   2227  1.61.2.4     skrll 	mutex_exit(&wl->wl_mtx);
   2228  1.61.2.4     skrll 
   2229       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_ALLOC,
   2230  1.61.2.5     skrll 	    ("wapbl_register_deallocation: blk=%"PRId64" len=%d error=%d\n",
   2231  1.61.2.5     skrll 	    blk, len, error));
   2232  1.61.2.5     skrll 
   2233  1.61.2.5     skrll 	return error;
   2234  1.61.2.5     skrll }
   2235  1.61.2.5     skrll 
   2236  1.61.2.5     skrll static void
   2237  1.61.2.5     skrll wapbl_deallocation_free(struct wapbl *wl, struct wapbl_dealloc *wd,
   2238  1.61.2.5     skrll 	bool locked)
   2239  1.61.2.5     skrll {
   2240  1.61.2.5     skrll 	KASSERT(!locked
   2241  1.61.2.5     skrll 	    || rw_lock_held(&wl->wl_rwlock) || mutex_owned(&wl->wl_mtx));
   2242  1.61.2.5     skrll 
   2243  1.61.2.5     skrll 	if (!locked)
   2244  1.61.2.5     skrll 		mutex_enter(&wl->wl_mtx);
   2245  1.61.2.5     skrll 
   2246  1.61.2.5     skrll 	TAILQ_REMOVE(&wl->wl_dealloclist, wd, wd_entries);
   2247  1.61.2.5     skrll 	wl->wl_dealloccnt--;
   2248  1.61.2.5     skrll 
   2249  1.61.2.5     skrll 	if (!locked)
   2250  1.61.2.5     skrll 		mutex_exit(&wl->wl_mtx);
   2251  1.61.2.5     skrll 
   2252  1.61.2.5     skrll 	pool_put(&wapbl_dealloc_pool, wd);
   2253  1.61.2.5     skrll }
   2254  1.61.2.5     skrll 
   2255  1.61.2.5     skrll void
   2256  1.61.2.5     skrll wapbl_unregister_deallocation(struct wapbl *wl, void *cookie)
   2257  1.61.2.5     skrll {
   2258  1.61.2.5     skrll 	KASSERT(cookie != NULL);
   2259  1.61.2.5     skrll 	wapbl_deallocation_free(wl, cookie, false);
   2260       1.2    simonb }
   2261       1.2    simonb 
   2262       1.2    simonb /****************************************************************/
   2263       1.2    simonb 
   2264       1.2    simonb static void
   2265       1.2    simonb wapbl_inodetrk_init(struct wapbl *wl, u_int size)
   2266       1.2    simonb {
   2267       1.2    simonb 
   2268       1.2    simonb 	wl->wl_inohash = hashinit(size, HASH_LIST, true, &wl->wl_inohashmask);
   2269       1.2    simonb 	if (atomic_inc_uint_nv(&wapbl_ino_pool_refcount) == 1) {
   2270       1.2    simonb 		pool_init(&wapbl_ino_pool, sizeof(struct wapbl_ino), 0, 0, 0,
   2271       1.2    simonb 		    "wapblinopl", &pool_allocator_nointr, IPL_NONE);
   2272       1.2    simonb 	}
   2273       1.2    simonb }
   2274       1.2    simonb 
   2275       1.2    simonb static void
   2276       1.2    simonb wapbl_inodetrk_free(struct wapbl *wl)
   2277       1.2    simonb {
   2278       1.2    simonb 
   2279       1.2    simonb 	/* XXX this KASSERT needs locking/mutex analysis */
   2280       1.2    simonb 	KASSERT(wl->wl_inohashcnt == 0);
   2281       1.2    simonb 	hashdone(wl->wl_inohash, HASH_LIST, wl->wl_inohashmask);
   2282       1.2    simonb 	if (atomic_dec_uint_nv(&wapbl_ino_pool_refcount) == 0) {
   2283       1.2    simonb 		pool_destroy(&wapbl_ino_pool);
   2284       1.2    simonb 	}
   2285       1.2    simonb }
   2286       1.2    simonb 
   2287       1.2    simonb static struct wapbl_ino *
   2288       1.2    simonb wapbl_inodetrk_get(struct wapbl *wl, ino_t ino)
   2289       1.2    simonb {
   2290       1.2    simonb 	struct wapbl_ino_head *wih;
   2291       1.2    simonb 	struct wapbl_ino *wi;
   2292       1.2    simonb 
   2293       1.2    simonb 	KASSERT(mutex_owned(&wl->wl_mtx));
   2294       1.2    simonb 
   2295       1.2    simonb 	wih = &wl->wl_inohash[ino & wl->wl_inohashmask];
   2296       1.2    simonb 	LIST_FOREACH(wi, wih, wi_hash) {
   2297       1.2    simonb 		if (ino == wi->wi_ino)
   2298       1.2    simonb 			return wi;
   2299       1.2    simonb 	}
   2300       1.2    simonb 	return 0;
   2301       1.2    simonb }
   2302       1.2    simonb 
   2303       1.2    simonb void
   2304       1.2    simonb wapbl_register_inode(struct wapbl *wl, ino_t ino, mode_t mode)
   2305       1.2    simonb {
   2306       1.2    simonb 	struct wapbl_ino_head *wih;
   2307       1.2    simonb 	struct wapbl_ino *wi;
   2308       1.2    simonb 
   2309       1.2    simonb 	wi = pool_get(&wapbl_ino_pool, PR_WAITOK);
   2310       1.2    simonb 
   2311       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   2312       1.2    simonb 	if (wapbl_inodetrk_get(wl, ino) == NULL) {
   2313       1.2    simonb 		wi->wi_ino = ino;
   2314       1.2    simonb 		wi->wi_mode = mode;
   2315       1.2    simonb 		wih = &wl->wl_inohash[ino & wl->wl_inohashmask];
   2316       1.2    simonb 		LIST_INSERT_HEAD(wih, wi, wi_hash);
   2317       1.2    simonb 		wl->wl_inohashcnt++;
   2318       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_INODE,
   2319       1.2    simonb 		    ("wapbl_register_inode: ino=%"PRId64"\n", ino));
   2320       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   2321       1.2    simonb 	} else {
   2322       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   2323       1.2    simonb 		pool_put(&wapbl_ino_pool, wi);
   2324       1.2    simonb 	}
   2325       1.2    simonb }
   2326       1.2    simonb 
   2327       1.2    simonb void
   2328       1.2    simonb wapbl_unregister_inode(struct wapbl *wl, ino_t ino, mode_t mode)
   2329       1.2    simonb {
   2330       1.2    simonb 	struct wapbl_ino *wi;
   2331       1.2    simonb 
   2332       1.2    simonb 	mutex_enter(&wl->wl_mtx);
   2333       1.2    simonb 	wi = wapbl_inodetrk_get(wl, ino);
   2334       1.2    simonb 	if (wi) {
   2335       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_INODE,
   2336       1.2    simonb 		    ("wapbl_unregister_inode: ino=%"PRId64"\n", ino));
   2337       1.2    simonb 		KASSERT(wl->wl_inohashcnt > 0);
   2338       1.2    simonb 		wl->wl_inohashcnt--;
   2339       1.2    simonb 		LIST_REMOVE(wi, wi_hash);
   2340       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   2341       1.2    simonb 
   2342       1.2    simonb 		pool_put(&wapbl_ino_pool, wi);
   2343       1.2    simonb 	} else {
   2344       1.2    simonb 		mutex_exit(&wl->wl_mtx);
   2345       1.2    simonb 	}
   2346       1.2    simonb }
   2347       1.2    simonb 
   2348       1.2    simonb /****************************************************************/
   2349       1.2    simonb 
   2350  1.61.2.3     skrll /*
   2351  1.61.2.3     skrll  * wapbl_transaction_inodes_len(wl)
   2352  1.61.2.3     skrll  *
   2353  1.61.2.3     skrll  *	Calculate the number of bytes required for inode registration
   2354  1.61.2.3     skrll  *	log records in wl.
   2355  1.61.2.3     skrll  */
   2356      1.30  uebayasi static inline size_t
   2357       1.2    simonb wapbl_transaction_inodes_len(struct wapbl *wl)
   2358       1.2    simonb {
   2359       1.2    simonb 	int blocklen = 1<<wl->wl_log_dev_bshift;
   2360       1.2    simonb 	int iph;
   2361       1.2    simonb 
   2362       1.2    simonb 	/* Calculate number of inodes described in a inodelist header */
   2363       1.2    simonb 	iph = (blocklen - offsetof(struct wapbl_wc_inodelist, wc_inodes)) /
   2364       1.2    simonb 	    sizeof(((struct wapbl_wc_inodelist *)0)->wc_inodes[0]);
   2365       1.2    simonb 
   2366       1.2    simonb 	KASSERT(iph > 0);
   2367       1.2    simonb 
   2368      1.39  christos 	return MAX(1, howmany(wl->wl_inohashcnt, iph)) * blocklen;
   2369       1.2    simonb }
   2370       1.2    simonb 
   2371       1.2    simonb 
   2372  1.61.2.3     skrll /*
   2373  1.61.2.3     skrll  * wapbl_transaction_len(wl)
   2374  1.61.2.3     skrll  *
   2375  1.61.2.3     skrll  *	Calculate number of bytes required for all log records in wl.
   2376  1.61.2.3     skrll  */
   2377       1.2    simonb static size_t
   2378       1.2    simonb wapbl_transaction_len(struct wapbl *wl)
   2379       1.2    simonb {
   2380       1.2    simonb 	int blocklen = 1<<wl->wl_log_dev_bshift;
   2381       1.2    simonb 	size_t len;
   2382       1.2    simonb 
   2383       1.2    simonb 	/* Calculate number of blocks described in a blocklist header */
   2384       1.2    simonb 	len = wl->wl_bcount;
   2385  1.61.2.4     skrll 	len += howmany(wl->wl_bufcount, wl->wl_brperjblock) * blocklen;
   2386  1.61.2.4     skrll 	len += howmany(wl->wl_dealloccnt, wl->wl_brperjblock) * blocklen;
   2387       1.2    simonb 	len += wapbl_transaction_inodes_len(wl);
   2388       1.2    simonb 
   2389       1.2    simonb 	return len;
   2390       1.2    simonb }
   2391       1.2    simonb 
   2392       1.2    simonb /*
   2393  1.61.2.3     skrll  * wapbl_cache_sync(wl, msg)
   2394  1.61.2.3     skrll  *
   2395  1.61.2.3     skrll  *	Issue DIOCCACHESYNC to wl->wl_devvp.
   2396  1.61.2.3     skrll  *
   2397  1.61.2.3     skrll  *	If sysctl(vfs.wapbl.verbose_commit) >= 2, print a message
   2398  1.61.2.3     skrll  *	including msg about the duration of the cache sync.
   2399      1.48      yamt  */
   2400      1.48      yamt static int
   2401      1.48      yamt wapbl_cache_sync(struct wapbl *wl, const char *msg)
   2402      1.48      yamt {
   2403      1.48      yamt 	const bool verbose = wapbl_verbose_commit >= 2;
   2404      1.48      yamt 	struct bintime start_time;
   2405      1.48      yamt 	int force = 1;
   2406      1.48      yamt 	int error;
   2407      1.48      yamt 
   2408  1.61.2.6     skrll 	/* Skip full cache sync if disabled, or when using FUA */
   2409  1.61.2.6     skrll 	if (!wapbl_flush_disk_cache || WAPBL_USE_FUA(wl)) {
   2410      1.48      yamt 		return 0;
   2411      1.48      yamt 	}
   2412      1.48      yamt 	if (verbose) {
   2413      1.48      yamt 		bintime(&start_time);
   2414      1.48      yamt 	}
   2415      1.48      yamt 	error = VOP_IOCTL(wl->wl_devvp, DIOCCACHESYNC, &force,
   2416      1.48      yamt 	    FWRITE, FSCRED);
   2417      1.48      yamt 	if (error) {
   2418      1.48      yamt 		WAPBL_PRINTF(WAPBL_PRINT_ERROR,
   2419  1.61.2.3     skrll 		    ("wapbl_cache_sync: DIOCCACHESYNC on dev 0x%jx "
   2420  1.61.2.3     skrll 		    "returned %d\n", (uintmax_t)wl->wl_devvp->v_rdev, error));
   2421      1.48      yamt 	}
   2422      1.48      yamt 	if (verbose) {
   2423      1.48      yamt 		struct bintime d;
   2424      1.48      yamt 		struct timespec ts;
   2425      1.48      yamt 
   2426      1.48      yamt 		bintime(&d);
   2427      1.48      yamt 		bintime_sub(&d, &start_time);
   2428      1.48      yamt 		bintime2timespec(&d, &ts);
   2429      1.48      yamt 		printf("wapbl_cache_sync: %s: dev 0x%jx %ju.%09lu\n",
   2430      1.48      yamt 		    msg, (uintmax_t)wl->wl_devvp->v_rdev,
   2431      1.48      yamt 		    (uintmax_t)ts.tv_sec, ts.tv_nsec);
   2432      1.48      yamt 	}
   2433  1.61.2.6     skrll 
   2434  1.61.2.6     skrll 	wl->wl_ev_cacheflush.ev_count++;
   2435  1.61.2.6     skrll 
   2436      1.48      yamt 	return error;
   2437      1.48      yamt }
   2438      1.48      yamt 
   2439      1.48      yamt /*
   2440  1.61.2.3     skrll  * wapbl_write_commit(wl, head, tail)
   2441  1.61.2.3     skrll  *
   2442  1.61.2.3     skrll  *	Issue a disk cache sync to wait for all pending writes to the
   2443  1.61.2.3     skrll  *	log to complete, and then synchronously commit the current
   2444  1.61.2.3     skrll  *	circular queue head and tail to the log, in the next of two
   2445  1.61.2.3     skrll  *	locations for commit headers on disk.
   2446       1.2    simonb  *
   2447  1.61.2.3     skrll  *	Increment the generation number.  If the generation number
   2448  1.61.2.3     skrll  *	rolls over to zero, then a subsequent commit would appear to
   2449  1.61.2.3     skrll  *	have an older generation than this one -- in that case, issue a
   2450  1.61.2.3     skrll  *	duplicate commit to avoid this.
   2451  1.61.2.3     skrll  *
   2452  1.61.2.3     skrll  *	=> Caller must have exclusive access to wl, either by holding
   2453  1.61.2.3     skrll  *	wl->wl_rwlock for writer or by being wapbl_start before anyone
   2454  1.61.2.3     skrll  *	else has seen wl.
   2455       1.2    simonb  */
   2456       1.2    simonb static int
   2457       1.2    simonb wapbl_write_commit(struct wapbl *wl, off_t head, off_t tail)
   2458       1.2    simonb {
   2459       1.2    simonb 	struct wapbl_wc_header *wc = wl->wl_wc_header;
   2460       1.2    simonb 	struct timespec ts;
   2461       1.2    simonb 	int error;
   2462      1.34   mlelstv 	daddr_t pbn;
   2463       1.2    simonb 
   2464  1.61.2.6     skrll 	error = wapbl_buffered_flush(wl, true);
   2465      1.54   hannken 	if (error)
   2466      1.54   hannken 		return error;
   2467      1.49      yamt 	/*
   2468      1.49      yamt 	 * flush disk cache to ensure that blocks we've written are actually
   2469      1.49      yamt 	 * written to the stable storage before the commit header.
   2470      1.49      yamt 	 *
   2471      1.49      yamt 	 * XXX Calc checksum here, instead we do this for now
   2472      1.49      yamt 	 */
   2473      1.48      yamt 	wapbl_cache_sync(wl, "1");
   2474       1.2    simonb 
   2475       1.2    simonb 	wc->wc_head = head;
   2476       1.2    simonb 	wc->wc_tail = tail;
   2477       1.2    simonb 	wc->wc_checksum = 0;
   2478       1.2    simonb 	wc->wc_version = 1;
   2479       1.2    simonb 	getnanotime(&ts);
   2480      1.17      yamt 	wc->wc_time = ts.tv_sec;
   2481       1.2    simonb 	wc->wc_timensec = ts.tv_nsec;
   2482       1.2    simonb 
   2483       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_WRITE,
   2484       1.2    simonb 	    ("wapbl_write_commit: head = %"PRIdMAX "tail = %"PRIdMAX"\n",
   2485       1.2    simonb 	    (intmax_t)head, (intmax_t)tail));
   2486       1.2    simonb 
   2487       1.2    simonb 	/*
   2488      1.49      yamt 	 * write the commit header.
   2489      1.49      yamt 	 *
   2490       1.2    simonb 	 * XXX if generation will rollover, then first zero
   2491       1.2    simonb 	 * over second commit header before trying to write both headers.
   2492       1.2    simonb 	 */
   2493       1.2    simonb 
   2494      1.34   mlelstv 	pbn = wl->wl_logpbn + (wc->wc_generation % 2);
   2495      1.34   mlelstv #ifdef _KERNEL
   2496      1.34   mlelstv 	pbn = btodb(pbn << wc->wc_log_dev_bshift);
   2497      1.34   mlelstv #endif
   2498      1.54   hannken 	error = wapbl_buffered_write(wc, wc->wc_len, wl, pbn);
   2499      1.54   hannken 	if (error)
   2500      1.54   hannken 		return error;
   2501  1.61.2.6     skrll 	error = wapbl_buffered_flush(wl, true);
   2502       1.2    simonb 	if (error)
   2503       1.2    simonb 		return error;
   2504       1.2    simonb 
   2505      1.49      yamt 	/*
   2506      1.49      yamt 	 * flush disk cache to ensure that the commit header is actually
   2507      1.49      yamt 	 * written before meta data blocks.
   2508      1.49      yamt 	 */
   2509      1.48      yamt 	wapbl_cache_sync(wl, "2");
   2510       1.2    simonb 
   2511       1.2    simonb 	/*
   2512       1.2    simonb 	 * If the generation number was zero, write it out a second time.
   2513       1.2    simonb 	 * This handles initialization and generation number rollover
   2514       1.2    simonb 	 */
   2515       1.2    simonb 	if (wc->wc_generation++ == 0) {
   2516       1.2    simonb 		error = wapbl_write_commit(wl, head, tail);
   2517       1.2    simonb 		/*
   2518       1.2    simonb 		 * This panic should be able to be removed if we do the
   2519       1.2    simonb 		 * zero'ing mentioned above, and we are certain to roll
   2520       1.2    simonb 		 * back generation number on failure.
   2521       1.2    simonb 		 */
   2522       1.2    simonb 		if (error)
   2523       1.2    simonb 			panic("wapbl_write_commit: error writing duplicate "
   2524  1.61.2.3     skrll 			      "log header: %d", error);
   2525       1.2    simonb 	}
   2526  1.61.2.6     skrll 
   2527  1.61.2.6     skrll 	wl->wl_ev_commit.ev_count++;
   2528  1.61.2.6     skrll 
   2529       1.2    simonb 	return 0;
   2530       1.2    simonb }
   2531       1.2    simonb 
   2532  1.61.2.3     skrll /*
   2533  1.61.2.3     skrll  * wapbl_write_blocks(wl, offp)
   2534  1.61.2.3     skrll  *
   2535  1.61.2.3     skrll  *	Write all pending physical blocks in the current transaction
   2536  1.61.2.3     skrll  *	from wapbl_add_buf to the log on disk, adding to the circular
   2537  1.61.2.3     skrll  *	queue head at byte offset *offp, and returning the new head's
   2538  1.61.2.3     skrll  *	byte offset in *offp.
   2539  1.61.2.3     skrll  */
   2540       1.2    simonb static int
   2541       1.2    simonb wapbl_write_blocks(struct wapbl *wl, off_t *offp)
   2542       1.2    simonb {
   2543       1.2    simonb 	struct wapbl_wc_blocklist *wc =
   2544       1.2    simonb 	    (struct wapbl_wc_blocklist *)wl->wl_wc_scratch;
   2545       1.2    simonb 	int blocklen = 1<<wl->wl_log_dev_bshift;
   2546       1.2    simonb 	struct buf *bp;
   2547       1.2    simonb 	off_t off = *offp;
   2548       1.2    simonb 	int error;
   2549       1.7     joerg 	size_t padding;
   2550       1.2    simonb 
   2551       1.2    simonb 	KASSERT(rw_write_held(&wl->wl_rwlock));
   2552       1.2    simonb 
   2553  1.61.2.6     skrll 	bp = TAILQ_FIRST(&wl->wl_bufs);
   2554       1.2    simonb 
   2555       1.2    simonb 	while (bp) {
   2556       1.2    simonb 		int cnt;
   2557       1.2    simonb 		struct buf *obp = bp;
   2558       1.2    simonb 
   2559       1.2    simonb 		KASSERT(bp->b_flags & B_LOCKED);
   2560       1.2    simonb 
   2561       1.2    simonb 		wc->wc_type = WAPBL_WC_BLOCKS;
   2562       1.2    simonb 		wc->wc_len = blocklen;
   2563       1.2    simonb 		wc->wc_blkcount = 0;
   2564  1.61.2.4     skrll 		while (bp && (wc->wc_blkcount < wl->wl_brperjblock)) {
   2565       1.2    simonb 			/*
   2566       1.2    simonb 			 * Make sure all the physical block numbers are up to
   2567       1.2    simonb 			 * date.  If this is not always true on a given
   2568       1.2    simonb 			 * filesystem, then VOP_BMAP must be called.  We
   2569       1.2    simonb 			 * could call VOP_BMAP here, or else in the filesystem
   2570       1.2    simonb 			 * specific flush callback, although neither of those
   2571       1.2    simonb 			 * solutions allow us to take the vnode lock.  If a
   2572       1.2    simonb 			 * filesystem requires that we must take the vnode lock
   2573       1.2    simonb 			 * to call VOP_BMAP, then we can probably do it in
   2574       1.2    simonb 			 * bwrite when the vnode lock should already be held
   2575       1.2    simonb 			 * by the invoking code.
   2576       1.2    simonb 			 */
   2577       1.2    simonb 			KASSERT((bp->b_vp->v_type == VBLK) ||
   2578       1.2    simonb 				 (bp->b_blkno != bp->b_lblkno));
   2579       1.2    simonb 			KASSERT(bp->b_blkno > 0);
   2580       1.2    simonb 
   2581       1.2    simonb 			wc->wc_blocks[wc->wc_blkcount].wc_daddr = bp->b_blkno;
   2582       1.2    simonb 			wc->wc_blocks[wc->wc_blkcount].wc_dlen = bp->b_bcount;
   2583       1.2    simonb 			wc->wc_len += bp->b_bcount;
   2584       1.2    simonb 			wc->wc_blkcount++;
   2585  1.61.2.6     skrll 			bp = TAILQ_NEXT(bp, b_wapbllist);
   2586       1.2    simonb 		}
   2587       1.7     joerg 		if (wc->wc_len % blocklen != 0) {
   2588       1.7     joerg 			padding = blocklen - wc->wc_len % blocklen;
   2589       1.7     joerg 			wc->wc_len += padding;
   2590       1.7     joerg 		} else {
   2591       1.7     joerg 			padding = 0;
   2592       1.7     joerg 		}
   2593       1.7     joerg 
   2594       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_WRITE,
   2595       1.7     joerg 		    ("wapbl_write_blocks: len = %u (padding %zu) off = %"PRIdMAX"\n",
   2596       1.7     joerg 		    wc->wc_len, padding, (intmax_t)off));
   2597       1.2    simonb 
   2598       1.2    simonb 		error = wapbl_circ_write(wl, wc, blocklen, &off);
   2599       1.2    simonb 		if (error)
   2600       1.2    simonb 			return error;
   2601       1.2    simonb 		bp = obp;
   2602       1.2    simonb 		cnt = 0;
   2603  1.61.2.4     skrll 		while (bp && (cnt++ < wl->wl_brperjblock)) {
   2604       1.2    simonb 			error = wapbl_circ_write(wl, bp->b_data,
   2605       1.2    simonb 			    bp->b_bcount, &off);
   2606       1.2    simonb 			if (error)
   2607       1.2    simonb 				return error;
   2608  1.61.2.6     skrll 			bp = TAILQ_NEXT(bp, b_wapbllist);
   2609       1.2    simonb 		}
   2610       1.7     joerg 		if (padding) {
   2611       1.7     joerg 			void *zero;
   2612  1.61.2.4     skrll 
   2613      1.51      para 			zero = wapbl_alloc(padding);
   2614       1.7     joerg 			memset(zero, 0, padding);
   2615       1.7     joerg 			error = wapbl_circ_write(wl, zero, padding, &off);
   2616      1.18      yamt 			wapbl_free(zero, padding);
   2617       1.7     joerg 			if (error)
   2618       1.7     joerg 				return error;
   2619       1.7     joerg 		}
   2620       1.2    simonb 	}
   2621       1.2    simonb 	*offp = off;
   2622       1.2    simonb 	return 0;
   2623       1.2    simonb }
   2624       1.2    simonb 
   2625  1.61.2.3     skrll /*
   2626  1.61.2.3     skrll  * wapbl_write_revocations(wl, offp)
   2627  1.61.2.3     skrll  *
   2628  1.61.2.3     skrll  *	Write all pending deallocations in the current transaction from
   2629  1.61.2.3     skrll  *	wapbl_register_deallocation to the log on disk, adding to the
   2630  1.61.2.3     skrll  *	circular queue's head at byte offset *offp, and returning the
   2631  1.61.2.3     skrll  *	new head's byte offset in *offp.
   2632  1.61.2.3     skrll  */
   2633       1.2    simonb static int
   2634       1.2    simonb wapbl_write_revocations(struct wapbl *wl, off_t *offp)
   2635       1.2    simonb {
   2636       1.2    simonb 	struct wapbl_wc_blocklist *wc =
   2637       1.2    simonb 	    (struct wapbl_wc_blocklist *)wl->wl_wc_scratch;
   2638  1.61.2.4     skrll 	struct wapbl_dealloc *wd, *lwd;
   2639       1.2    simonb 	int blocklen = 1<<wl->wl_log_dev_bshift;
   2640       1.2    simonb 	off_t off = *offp;
   2641       1.2    simonb 	int error;
   2642       1.2    simonb 
   2643  1.61.2.6     skrll 	KASSERT(rw_write_held(&wl->wl_rwlock));
   2644  1.61.2.6     skrll 
   2645       1.2    simonb 	if (wl->wl_dealloccnt == 0)
   2646       1.2    simonb 		return 0;
   2647       1.2    simonb 
   2648  1.61.2.5     skrll 	while ((wd = TAILQ_FIRST(&wl->wl_dealloclist)) != NULL) {
   2649       1.2    simonb 		wc->wc_type = WAPBL_WC_REVOCATIONS;
   2650       1.2    simonb 		wc->wc_len = blocklen;
   2651       1.2    simonb 		wc->wc_blkcount = 0;
   2652  1.61.2.4     skrll 		while (wd && (wc->wc_blkcount < wl->wl_brperjblock)) {
   2653       1.2    simonb 			wc->wc_blocks[wc->wc_blkcount].wc_daddr =
   2654  1.61.2.4     skrll 			    wd->wd_blkno;
   2655       1.2    simonb 			wc->wc_blocks[wc->wc_blkcount].wc_dlen =
   2656  1.61.2.4     skrll 			    wd->wd_len;
   2657       1.2    simonb 			wc->wc_blkcount++;
   2658  1.61.2.4     skrll 
   2659  1.61.2.5     skrll 			wd = TAILQ_NEXT(wd, wd_entries);
   2660       1.2    simonb 		}
   2661       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_WRITE,
   2662       1.2    simonb 		    ("wapbl_write_revocations: len = %u off = %"PRIdMAX"\n",
   2663       1.2    simonb 		    wc->wc_len, (intmax_t)off));
   2664       1.2    simonb 		error = wapbl_circ_write(wl, wc, blocklen, &off);
   2665       1.2    simonb 		if (error)
   2666       1.2    simonb 			return error;
   2667  1.61.2.4     skrll 
   2668  1.61.2.4     skrll 		/* free all successfully written deallocs */
   2669  1.61.2.4     skrll 		lwd = wd;
   2670  1.61.2.5     skrll 		while ((wd = TAILQ_FIRST(&wl->wl_dealloclist)) != NULL) {
   2671  1.61.2.4     skrll 			if (wd == lwd)
   2672  1.61.2.4     skrll 				break;
   2673  1.61.2.5     skrll 			wapbl_deallocation_free(wl, wd, true);
   2674  1.61.2.4     skrll 		}
   2675       1.2    simonb 	}
   2676       1.2    simonb 	*offp = off;
   2677       1.2    simonb 	return 0;
   2678       1.2    simonb }
   2679       1.2    simonb 
   2680  1.61.2.3     skrll /*
   2681  1.61.2.3     skrll  * wapbl_write_inodes(wl, offp)
   2682  1.61.2.3     skrll  *
   2683  1.61.2.3     skrll  *	Write all pending inode allocations in the current transaction
   2684  1.61.2.3     skrll  *	from wapbl_register_inode to the log on disk, adding to the
   2685  1.61.2.3     skrll  *	circular queue's head at byte offset *offp and returning the
   2686  1.61.2.3     skrll  *	new head's byte offset in *offp.
   2687  1.61.2.3     skrll  */
   2688       1.2    simonb static int
   2689       1.2    simonb wapbl_write_inodes(struct wapbl *wl, off_t *offp)
   2690       1.2    simonb {
   2691       1.2    simonb 	struct wapbl_wc_inodelist *wc =
   2692       1.2    simonb 	    (struct wapbl_wc_inodelist *)wl->wl_wc_scratch;
   2693       1.2    simonb 	int i;
   2694      1.14     joerg 	int blocklen = 1 << wl->wl_log_dev_bshift;
   2695       1.2    simonb 	off_t off = *offp;
   2696       1.2    simonb 	int error;
   2697       1.2    simonb 
   2698       1.2    simonb 	struct wapbl_ino_head *wih;
   2699       1.2    simonb 	struct wapbl_ino *wi;
   2700       1.2    simonb 	int iph;
   2701       1.2    simonb 
   2702       1.2    simonb 	iph = (blocklen - offsetof(struct wapbl_wc_inodelist, wc_inodes)) /
   2703       1.2    simonb 	    sizeof(((struct wapbl_wc_inodelist *)0)->wc_inodes[0]);
   2704       1.2    simonb 
   2705       1.2    simonb 	i = 0;
   2706       1.2    simonb 	wih = &wl->wl_inohash[0];
   2707       1.2    simonb 	wi = 0;
   2708       1.2    simonb 	do {
   2709       1.2    simonb 		wc->wc_type = WAPBL_WC_INODES;
   2710       1.2    simonb 		wc->wc_len = blocklen;
   2711       1.2    simonb 		wc->wc_inocnt = 0;
   2712       1.2    simonb 		wc->wc_clear = (i == 0);
   2713       1.2    simonb 		while ((i < wl->wl_inohashcnt) && (wc->wc_inocnt < iph)) {
   2714       1.2    simonb 			while (!wi) {
   2715       1.2    simonb 				KASSERT((wih - &wl->wl_inohash[0])
   2716       1.2    simonb 				    <= wl->wl_inohashmask);
   2717       1.2    simonb 				wi = LIST_FIRST(wih++);
   2718       1.2    simonb 			}
   2719       1.2    simonb 			wc->wc_inodes[wc->wc_inocnt].wc_inumber = wi->wi_ino;
   2720       1.2    simonb 			wc->wc_inodes[wc->wc_inocnt].wc_imode = wi->wi_mode;
   2721       1.2    simonb 			wc->wc_inocnt++;
   2722       1.2    simonb 			i++;
   2723       1.2    simonb 			wi = LIST_NEXT(wi, wi_hash);
   2724       1.2    simonb 		}
   2725       1.2    simonb 		WAPBL_PRINTF(WAPBL_PRINT_WRITE,
   2726       1.2    simonb 		    ("wapbl_write_inodes: len = %u off = %"PRIdMAX"\n",
   2727       1.2    simonb 		    wc->wc_len, (intmax_t)off));
   2728       1.2    simonb 		error = wapbl_circ_write(wl, wc, blocklen, &off);
   2729       1.2    simonb 		if (error)
   2730       1.2    simonb 			return error;
   2731       1.2    simonb 	} while (i < wl->wl_inohashcnt);
   2732  1.61.2.4     skrll 
   2733       1.2    simonb 	*offp = off;
   2734       1.2    simonb 	return 0;
   2735       1.2    simonb }
   2736       1.2    simonb 
   2737       1.2    simonb #endif /* _KERNEL */
   2738       1.2    simonb 
   2739       1.2    simonb /****************************************************************/
   2740       1.2    simonb 
   2741       1.2    simonb struct wapbl_blk {
   2742       1.2    simonb 	LIST_ENTRY(wapbl_blk) wb_hash;
   2743       1.2    simonb 	daddr_t wb_blk;
   2744       1.2    simonb 	off_t wb_off; /* Offset of this block in the log */
   2745       1.2    simonb };
   2746       1.2    simonb #define	WAPBL_BLKPOOL_MIN 83
   2747       1.2    simonb 
   2748       1.2    simonb static void
   2749       1.2    simonb wapbl_blkhash_init(struct wapbl_replay *wr, u_int size)
   2750       1.2    simonb {
   2751       1.2    simonb 	if (size < WAPBL_BLKPOOL_MIN)
   2752       1.2    simonb 		size = WAPBL_BLKPOOL_MIN;
   2753       1.2    simonb 	KASSERT(wr->wr_blkhash == 0);
   2754       1.2    simonb #ifdef _KERNEL
   2755       1.2    simonb 	wr->wr_blkhash = hashinit(size, HASH_LIST, true, &wr->wr_blkhashmask);
   2756       1.2    simonb #else /* ! _KERNEL */
   2757       1.2    simonb 	/* Manually implement hashinit */
   2758       1.2    simonb 	{
   2759      1.25     lukem 		unsigned long i, hashsize;
   2760       1.2    simonb 		for (hashsize = 1; hashsize < size; hashsize <<= 1)
   2761       1.2    simonb 			continue;
   2762      1.51      para 		wr->wr_blkhash = wapbl_alloc(hashsize * sizeof(*wr->wr_blkhash));
   2763      1.37  drochner 		for (i = 0; i < hashsize; i++)
   2764       1.2    simonb 			LIST_INIT(&wr->wr_blkhash[i]);
   2765       1.2    simonb 		wr->wr_blkhashmask = hashsize - 1;
   2766       1.2    simonb 	}
   2767       1.2    simonb #endif /* ! _KERNEL */
   2768       1.2    simonb }
   2769       1.2    simonb 
   2770       1.2    simonb static void
   2771       1.2    simonb wapbl_blkhash_free(struct wapbl_replay *wr)
   2772       1.2    simonb {
   2773       1.2    simonb 	KASSERT(wr->wr_blkhashcnt == 0);
   2774       1.2    simonb #ifdef _KERNEL
   2775       1.2    simonb 	hashdone(wr->wr_blkhash, HASH_LIST, wr->wr_blkhashmask);
   2776       1.2    simonb #else /* ! _KERNEL */
   2777      1.18      yamt 	wapbl_free(wr->wr_blkhash,
   2778      1.18      yamt 	    (wr->wr_blkhashmask + 1) * sizeof(*wr->wr_blkhash));
   2779       1.2    simonb #endif /* ! _KERNEL */
   2780       1.2    simonb }
   2781       1.2    simonb 
   2782       1.2    simonb static struct wapbl_blk *
   2783       1.2    simonb wapbl_blkhash_get(struct wapbl_replay *wr, daddr_t blk)
   2784       1.2    simonb {
   2785       1.2    simonb 	struct wapbl_blk_head *wbh;
   2786       1.2    simonb 	struct wapbl_blk *wb;
   2787       1.2    simonb 	wbh = &wr->wr_blkhash[blk & wr->wr_blkhashmask];
   2788       1.2    simonb 	LIST_FOREACH(wb, wbh, wb_hash) {
   2789       1.2    simonb 		if (blk == wb->wb_blk)
   2790       1.2    simonb 			return wb;
   2791       1.2    simonb 	}
   2792       1.2    simonb 	return 0;
   2793       1.2    simonb }
   2794       1.2    simonb 
   2795       1.2    simonb static void
   2796       1.2    simonb wapbl_blkhash_ins(struct wapbl_replay *wr, daddr_t blk, off_t off)
   2797       1.2    simonb {
   2798       1.2    simonb 	struct wapbl_blk_head *wbh;
   2799       1.2    simonb 	struct wapbl_blk *wb;
   2800       1.2    simonb 	wb = wapbl_blkhash_get(wr, blk);
   2801       1.2    simonb 	if (wb) {
   2802       1.2    simonb 		KASSERT(wb->wb_blk == blk);
   2803       1.2    simonb 		wb->wb_off = off;
   2804       1.2    simonb 	} else {
   2805      1.51      para 		wb = wapbl_alloc(sizeof(*wb));
   2806       1.2    simonb 		wb->wb_blk = blk;
   2807       1.2    simonb 		wb->wb_off = off;
   2808       1.2    simonb 		wbh = &wr->wr_blkhash[blk & wr->wr_blkhashmask];
   2809       1.2    simonb 		LIST_INSERT_HEAD(wbh, wb, wb_hash);
   2810       1.2    simonb 		wr->wr_blkhashcnt++;
   2811       1.2    simonb 	}
   2812       1.2    simonb }
   2813       1.2    simonb 
   2814       1.2    simonb static void
   2815       1.2    simonb wapbl_blkhash_rem(struct wapbl_replay *wr, daddr_t blk)
   2816       1.2    simonb {
   2817       1.2    simonb 	struct wapbl_blk *wb = wapbl_blkhash_get(wr, blk);
   2818       1.2    simonb 	if (wb) {
   2819       1.2    simonb 		KASSERT(wr->wr_blkhashcnt > 0);
   2820       1.2    simonb 		wr->wr_blkhashcnt--;
   2821       1.2    simonb 		LIST_REMOVE(wb, wb_hash);
   2822      1.18      yamt 		wapbl_free(wb, sizeof(*wb));
   2823       1.2    simonb 	}
   2824       1.2    simonb }
   2825       1.2    simonb 
   2826       1.2    simonb static void
   2827       1.2    simonb wapbl_blkhash_clear(struct wapbl_replay *wr)
   2828       1.2    simonb {
   2829      1.25     lukem 	unsigned long i;
   2830       1.2    simonb 	for (i = 0; i <= wr->wr_blkhashmask; i++) {
   2831       1.2    simonb 		struct wapbl_blk *wb;
   2832       1.2    simonb 
   2833       1.2    simonb 		while ((wb = LIST_FIRST(&wr->wr_blkhash[i]))) {
   2834       1.2    simonb 			KASSERT(wr->wr_blkhashcnt > 0);
   2835       1.2    simonb 			wr->wr_blkhashcnt--;
   2836       1.2    simonb 			LIST_REMOVE(wb, wb_hash);
   2837      1.18      yamt 			wapbl_free(wb, sizeof(*wb));
   2838       1.2    simonb 		}
   2839       1.2    simonb 	}
   2840       1.2    simonb 	KASSERT(wr->wr_blkhashcnt == 0);
   2841       1.2    simonb }
   2842       1.2    simonb 
   2843       1.2    simonb /****************************************************************/
   2844       1.2    simonb 
   2845  1.61.2.3     skrll /*
   2846  1.61.2.3     skrll  * wapbl_circ_read(wr, data, len, offp)
   2847  1.61.2.3     skrll  *
   2848  1.61.2.3     skrll  *	Read len bytes into data from the circular queue of wr,
   2849  1.61.2.3     skrll  *	starting at the linear byte offset *offp, and returning the new
   2850  1.61.2.3     skrll  *	linear byte offset in *offp.
   2851  1.61.2.3     skrll  *
   2852  1.61.2.3     skrll  *	If the starting linear byte offset precedes wr->wr_circ_off,
   2853  1.61.2.3     skrll  *	the read instead begins at wr->wr_circ_off.  XXX WTF?  This
   2854  1.61.2.3     skrll  *	should be a KASSERT, not a conditional.
   2855  1.61.2.3     skrll  */
   2856       1.2    simonb static int
   2857       1.2    simonb wapbl_circ_read(struct wapbl_replay *wr, void *data, size_t len, off_t *offp)
   2858       1.2    simonb {
   2859       1.2    simonb 	size_t slen;
   2860       1.2    simonb 	off_t off = *offp;
   2861       1.2    simonb 	int error;
   2862      1.34   mlelstv 	daddr_t pbn;
   2863       1.2    simonb 
   2864      1.14     joerg 	KASSERT(((len >> wr->wr_log_dev_bshift) <<
   2865      1.14     joerg 	    wr->wr_log_dev_bshift) == len);
   2866      1.34   mlelstv 
   2867      1.14     joerg 	if (off < wr->wr_circ_off)
   2868      1.14     joerg 		off = wr->wr_circ_off;
   2869      1.14     joerg 	slen = wr->wr_circ_off + wr->wr_circ_size - off;
   2870       1.2    simonb 	if (slen < len) {
   2871      1.34   mlelstv 		pbn = wr->wr_logpbn + (off >> wr->wr_log_dev_bshift);
   2872      1.34   mlelstv #ifdef _KERNEL
   2873      1.34   mlelstv 		pbn = btodb(pbn << wr->wr_log_dev_bshift);
   2874      1.34   mlelstv #endif
   2875      1.34   mlelstv 		error = wapbl_read(data, slen, wr->wr_devvp, pbn);
   2876       1.2    simonb 		if (error)
   2877       1.2    simonb 			return error;
   2878       1.2    simonb 		data = (uint8_t *)data + slen;
   2879       1.2    simonb 		len -= slen;
   2880      1.14     joerg 		off = wr->wr_circ_off;
   2881       1.2    simonb 	}
   2882      1.34   mlelstv 	pbn = wr->wr_logpbn + (off >> wr->wr_log_dev_bshift);
   2883      1.34   mlelstv #ifdef _KERNEL
   2884      1.34   mlelstv 	pbn = btodb(pbn << wr->wr_log_dev_bshift);
   2885      1.34   mlelstv #endif
   2886      1.34   mlelstv 	error = wapbl_read(data, len, wr->wr_devvp, pbn);
   2887       1.2    simonb 	if (error)
   2888       1.2    simonb 		return error;
   2889       1.2    simonb 	off += len;
   2890      1.14     joerg 	if (off >= wr->wr_circ_off + wr->wr_circ_size)
   2891      1.14     joerg 		off = wr->wr_circ_off;
   2892       1.2    simonb 	*offp = off;
   2893       1.2    simonb 	return 0;
   2894       1.2    simonb }
   2895       1.2    simonb 
   2896  1.61.2.3     skrll /*
   2897  1.61.2.3     skrll  * wapbl_circ_advance(wr, len, offp)
   2898  1.61.2.3     skrll  *
   2899  1.61.2.3     skrll  *	Compute the linear byte offset of the circular queue of wr that
   2900  1.61.2.3     skrll  *	is len bytes past *offp, and store it in *offp.
   2901  1.61.2.3     skrll  *
   2902  1.61.2.3     skrll  *	This is as if wapbl_circ_read, but without actually reading
   2903  1.61.2.3     skrll  *	anything.
   2904  1.61.2.3     skrll  *
   2905  1.61.2.3     skrll  *	If the starting linear byte offset precedes wr->wr_circ_off, it
   2906  1.61.2.3     skrll  *	is taken to be wr->wr_circ_off instead.  XXX WTF?  This should
   2907  1.61.2.3     skrll  *	be a KASSERT, not a conditional.
   2908  1.61.2.3     skrll  */
   2909       1.2    simonb static void
   2910       1.2    simonb wapbl_circ_advance(struct wapbl_replay *wr, size_t len, off_t *offp)
   2911       1.2    simonb {
   2912       1.2    simonb 	size_t slen;
   2913       1.2    simonb 	off_t off = *offp;
   2914       1.2    simonb 
   2915      1.14     joerg 	KASSERT(((len >> wr->wr_log_dev_bshift) <<
   2916      1.14     joerg 	    wr->wr_log_dev_bshift) == len);
   2917       1.2    simonb 
   2918      1.14     joerg 	if (off < wr->wr_circ_off)
   2919      1.14     joerg 		off = wr->wr_circ_off;
   2920      1.14     joerg 	slen = wr->wr_circ_off + wr->wr_circ_size - off;
   2921       1.2    simonb 	if (slen < len) {
   2922       1.2    simonb 		len -= slen;
   2923      1.14     joerg 		off = wr->wr_circ_off;
   2924       1.2    simonb 	}
   2925       1.2    simonb 	off += len;
   2926      1.14     joerg 	if (off >= wr->wr_circ_off + wr->wr_circ_size)
   2927      1.14     joerg 		off = wr->wr_circ_off;
   2928       1.2    simonb 	*offp = off;
   2929       1.2    simonb }
   2930       1.2    simonb 
   2931       1.2    simonb /****************************************************************/
   2932       1.2    simonb 
   2933       1.2    simonb int
   2934       1.2    simonb wapbl_replay_start(struct wapbl_replay **wrp, struct vnode *vp,
   2935       1.2    simonb 	daddr_t off, size_t count, size_t blksize)
   2936       1.2    simonb {
   2937       1.2    simonb 	struct wapbl_replay *wr;
   2938       1.2    simonb 	int error;
   2939       1.2    simonb 	struct vnode *devvp;
   2940       1.2    simonb 	daddr_t logpbn;
   2941       1.2    simonb 	uint8_t *scratch;
   2942       1.2    simonb 	struct wapbl_wc_header *wch;
   2943       1.2    simonb 	struct wapbl_wc_header *wch2;
   2944       1.2    simonb 	/* Use this until we read the actual log header */
   2945      1.31   mlelstv 	int log_dev_bshift = ilog2(blksize);
   2946       1.2    simonb 	size_t used;
   2947      1.34   mlelstv 	daddr_t pbn;
   2948       1.2    simonb 
   2949       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_REPLAY,
   2950       1.2    simonb 	    ("wapbl_replay_start: vp=%p off=%"PRId64 " count=%zu blksize=%zu\n",
   2951       1.2    simonb 	    vp, off, count, blksize));
   2952       1.2    simonb 
   2953       1.2    simonb 	if (off < 0)
   2954       1.2    simonb 		return EINVAL;
   2955       1.2    simonb 
   2956       1.2    simonb 	if (blksize < DEV_BSIZE)
   2957       1.2    simonb 		return EINVAL;
   2958       1.2    simonb 	if (blksize % DEV_BSIZE)
   2959       1.2    simonb 		return EINVAL;
   2960       1.2    simonb 
   2961       1.2    simonb #ifdef _KERNEL
   2962       1.2    simonb #if 0
   2963       1.2    simonb 	/* XXX vp->v_size isn't reliably set for VBLK devices,
   2964       1.2    simonb 	 * especially root.  However, we might still want to verify
   2965       1.2    simonb 	 * that the full load is readable */
   2966       1.2    simonb 	if ((off + count) * blksize > vp->v_size)
   2967       1.2    simonb 		return EINVAL;
   2968       1.2    simonb #endif
   2969       1.2    simonb 	if ((error = VOP_BMAP(vp, off, &devvp, &logpbn, 0)) != 0) {
   2970       1.2    simonb 		return error;
   2971       1.2    simonb 	}
   2972       1.2    simonb #else /* ! _KERNEL */
   2973       1.2    simonb 	devvp = vp;
   2974       1.2    simonb 	logpbn = off;
   2975       1.2    simonb #endif /* ! _KERNEL */
   2976       1.2    simonb 
   2977      1.51      para 	scratch = wapbl_alloc(MAXBSIZE);
   2978       1.2    simonb 
   2979      1.34   mlelstv 	pbn = logpbn;
   2980      1.34   mlelstv #ifdef _KERNEL
   2981      1.34   mlelstv 	pbn = btodb(pbn << log_dev_bshift);
   2982      1.34   mlelstv #endif
   2983      1.34   mlelstv 	error = wapbl_read(scratch, 2<<log_dev_bshift, devvp, pbn);
   2984       1.2    simonb 	if (error)
   2985       1.2    simonb 		goto errout;
   2986       1.2    simonb 
   2987       1.2    simonb 	wch = (struct wapbl_wc_header *)scratch;
   2988       1.2    simonb 	wch2 =
   2989       1.2    simonb 	    (struct wapbl_wc_header *)(scratch + (1<<log_dev_bshift));
   2990       1.2    simonb 	/* XXX verify checksums and magic numbers */
   2991       1.2    simonb 	if (wch->wc_type != WAPBL_WC_HEADER) {
   2992       1.2    simonb 		printf("Unrecognized wapbl magic: 0x%08x\n", wch->wc_type);
   2993       1.2    simonb 		error = EFTYPE;
   2994       1.2    simonb 		goto errout;
   2995       1.2    simonb 	}
   2996       1.2    simonb 
   2997       1.2    simonb 	if (wch2->wc_generation > wch->wc_generation)
   2998       1.2    simonb 		wch = wch2;
   2999       1.2    simonb 
   3000       1.2    simonb 	wr = wapbl_calloc(1, sizeof(*wr));
   3001       1.2    simonb 
   3002       1.2    simonb 	wr->wr_logvp = vp;
   3003       1.2    simonb 	wr->wr_devvp = devvp;
   3004       1.2    simonb 	wr->wr_logpbn = logpbn;
   3005       1.2    simonb 
   3006       1.2    simonb 	wr->wr_scratch = scratch;
   3007       1.2    simonb 
   3008      1.14     joerg 	wr->wr_log_dev_bshift = wch->wc_log_dev_bshift;
   3009      1.14     joerg 	wr->wr_fs_dev_bshift = wch->wc_fs_dev_bshift;
   3010      1.14     joerg 	wr->wr_circ_off = wch->wc_circ_off;
   3011      1.14     joerg 	wr->wr_circ_size = wch->wc_circ_size;
   3012      1.14     joerg 	wr->wr_generation = wch->wc_generation;
   3013       1.2    simonb 
   3014       1.2    simonb 	used = wapbl_space_used(wch->wc_circ_size, wch->wc_head, wch->wc_tail);
   3015       1.2    simonb 
   3016       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_REPLAY,
   3017       1.2    simonb 	    ("wapbl_replay: head=%"PRId64" tail=%"PRId64" off=%"PRId64
   3018       1.2    simonb 	    " len=%"PRId64" used=%zu\n",
   3019       1.2    simonb 	    wch->wc_head, wch->wc_tail, wch->wc_circ_off,
   3020       1.2    simonb 	    wch->wc_circ_size, used));
   3021       1.2    simonb 
   3022       1.2    simonb 	wapbl_blkhash_init(wr, (used >> wch->wc_fs_dev_bshift));
   3023      1.11     joerg 
   3024      1.14     joerg 	error = wapbl_replay_process(wr, wch->wc_head, wch->wc_tail);
   3025       1.2    simonb 	if (error) {
   3026       1.2    simonb 		wapbl_replay_stop(wr);
   3027       1.2    simonb 		wapbl_replay_free(wr);
   3028       1.2    simonb 		return error;
   3029       1.2    simonb 	}
   3030       1.2    simonb 
   3031       1.2    simonb 	*wrp = wr;
   3032       1.2    simonb 	return 0;
   3033       1.2    simonb 
   3034       1.2    simonb  errout:
   3035      1.18      yamt 	wapbl_free(scratch, MAXBSIZE);
   3036       1.2    simonb 	return error;
   3037       1.2    simonb }
   3038       1.2    simonb 
   3039       1.2    simonb void
   3040       1.2    simonb wapbl_replay_stop(struct wapbl_replay *wr)
   3041       1.2    simonb {
   3042       1.2    simonb 
   3043       1.4     joerg 	if (!wapbl_replay_isopen(wr))
   3044       1.4     joerg 		return;
   3045       1.4     joerg 
   3046       1.2    simonb 	WAPBL_PRINTF(WAPBL_PRINT_REPLAY, ("wapbl_replay_stop called\n"));
   3047       1.2    simonb 
   3048      1.18      yamt 	wapbl_free(wr->wr_scratch, MAXBSIZE);
   3049      1.18      yamt 	wr->wr_scratch = NULL;
   3050       1.2    simonb 
   3051      1.18      yamt 	wr->wr_logvp = NULL;
   3052       1.2    simonb 
   3053       1.2    simonb 	wapbl_blkhash_clear(wr);
   3054       1.2    simonb 	wapbl_blkhash_free(wr);
   3055       1.2    simonb }
   3056       1.2    simonb 
   3057       1.2    simonb void
   3058       1.2    simonb wapbl_replay_free(struct wapbl_replay *wr)
   3059       1.2    simonb {
   3060       1.2    simonb 
   3061       1.2    simonb 	KDASSERT(!wapbl_replay_isopen(wr));
   3062       1.2    simonb 
   3063       1.2    simonb 	if (wr->wr_inodes)
   3064      1.18      yamt 		wapbl_free(wr->wr_inodes,
   3065      1.18      yamt 		    wr->wr_inodescnt * sizeof(wr->wr_inodes[0]));
   3066      1.18      yamt 	wapbl_free(wr, sizeof(*wr));
   3067       1.2    simonb }
   3068       1.2    simonb 
   3069       1.4     joerg #ifdef _KERNEL
   3070       1.2    simonb int
   3071       1.2    simonb wapbl_replay_isopen1(struct wapbl_replay *wr)
   3072       1.2    simonb {
   3073       1.2    simonb 
   3074       1.2    simonb 	return wapbl_replay_isopen(wr);
   3075       1.2    simonb }
   3076       1.4     joerg #endif
   3077       1.2    simonb 
   3078  1.61.2.1     skrll /*
   3079  1.61.2.1     skrll  * calculate the disk address for the i'th block in the wc_blockblist
   3080  1.61.2.1     skrll  * offset by j blocks of size blen.
   3081  1.61.2.1     skrll  *
   3082  1.61.2.1     skrll  * wc_daddr is always a kernel disk address in DEV_BSIZE units that
   3083  1.61.2.1     skrll  * was written to the journal.
   3084  1.61.2.1     skrll  *
   3085  1.61.2.1     skrll  * The kernel needs that address plus the offset in DEV_BSIZE units.
   3086  1.61.2.1     skrll  *
   3087  1.61.2.1     skrll  * Userland needs that address plus the offset in blen units.
   3088  1.61.2.1     skrll  *
   3089  1.61.2.1     skrll  */
   3090  1.61.2.1     skrll static daddr_t
   3091  1.61.2.1     skrll wapbl_block_daddr(struct wapbl_wc_blocklist *wc, int i, int j, int blen)
   3092  1.61.2.1     skrll {
   3093  1.61.2.1     skrll 	daddr_t pbn;
   3094  1.61.2.1     skrll 
   3095  1.61.2.1     skrll #ifdef _KERNEL
   3096  1.61.2.1     skrll 	pbn = wc->wc_blocks[i].wc_daddr + btodb(j * blen);
   3097  1.61.2.1     skrll #else
   3098  1.61.2.1     skrll 	pbn = dbtob(wc->wc_blocks[i].wc_daddr) / blen + j;
   3099  1.61.2.1     skrll #endif
   3100  1.61.2.1     skrll 
   3101  1.61.2.1     skrll 	return pbn;
   3102  1.61.2.1     skrll }
   3103  1.61.2.1     skrll 
   3104      1.10     joerg static void
   3105      1.10     joerg wapbl_replay_process_blocks(struct wapbl_replay *wr, off_t *offp)
   3106      1.10     joerg {
   3107      1.10     joerg 	struct wapbl_wc_blocklist *wc =
   3108      1.10     joerg 	    (struct wapbl_wc_blocklist *)wr->wr_scratch;
   3109      1.14     joerg 	int fsblklen = 1 << wr->wr_fs_dev_bshift;
   3110      1.10     joerg 	int i, j, n;
   3111      1.10     joerg 
   3112      1.10     joerg 	for (i = 0; i < wc->wc_blkcount; i++) {
   3113      1.10     joerg 		/*
   3114      1.10     joerg 		 * Enter each physical block into the hashtable independently.
   3115      1.10     joerg 		 */
   3116      1.14     joerg 		n = wc->wc_blocks[i].wc_dlen >> wr->wr_fs_dev_bshift;
   3117      1.10     joerg 		for (j = 0; j < n; j++) {
   3118  1.61.2.1     skrll 			wapbl_blkhash_ins(wr, wapbl_block_daddr(wc, i, j, fsblklen),
   3119      1.10     joerg 			    *offp);
   3120      1.10     joerg 			wapbl_circ_advance(wr, fsblklen, offp);
   3121      1.10     joerg 		}
   3122      1.10     joerg 	}
   3123      1.10     joerg }
   3124      1.10     joerg 
   3125      1.10     joerg static void
   3126      1.10     joerg wapbl_replay_process_revocations(struct wapbl_replay *wr)
   3127      1.10     joerg {
   3128      1.10     joerg 	struct wapbl_wc_blocklist *wc =
   3129      1.10     joerg 	    (struct wapbl_wc_blocklist *)wr->wr_scratch;
   3130      1.34   mlelstv 	int fsblklen = 1 << wr->wr_fs_dev_bshift;
   3131      1.10     joerg 	int i, j, n;
   3132      1.10     joerg 
   3133      1.10     joerg 	for (i = 0; i < wc->wc_blkcount; i++) {
   3134      1.10     joerg 		/*
   3135      1.10     joerg 		 * Remove any blocks found from the hashtable.
   3136      1.10     joerg 		 */
   3137      1.14     joerg 		n = wc->wc_blocks[i].wc_dlen >> wr->wr_fs_dev_bshift;
   3138      1.10     joerg 		for (j = 0; j < n; j++)
   3139  1.61.2.1     skrll 			wapbl_blkhash_rem(wr, wapbl_block_daddr(wc, i, j, fsblklen));
   3140      1.10     joerg 	}
   3141      1.10     joerg }
   3142      1.10     joerg 
   3143      1.10     joerg static void
   3144      1.10     joerg wapbl_replay_process_inodes(struct wapbl_replay *wr, off_t oldoff, off_t newoff)
   3145      1.10     joerg {
   3146      1.10     joerg 	struct wapbl_wc_inodelist *wc =
   3147      1.10     joerg 	    (struct wapbl_wc_inodelist *)wr->wr_scratch;
   3148      1.18      yamt 	void *new_inodes;
   3149      1.18      yamt 	const size_t oldsize = wr->wr_inodescnt * sizeof(wr->wr_inodes[0]);
   3150      1.18      yamt 
   3151      1.18      yamt 	KASSERT(sizeof(wr->wr_inodes[0]) == sizeof(wc->wc_inodes[0]));
   3152      1.18      yamt 
   3153      1.10     joerg 	/*
   3154      1.10     joerg 	 * Keep track of where we found this so location won't be
   3155      1.10     joerg 	 * overwritten.
   3156      1.10     joerg 	 */
   3157      1.10     joerg 	if (wc->wc_clear) {
   3158      1.10     joerg 		wr->wr_inodestail = oldoff;
   3159      1.10     joerg 		wr->wr_inodescnt = 0;
   3160      1.12     joerg 		if (wr->wr_inodes != NULL) {
   3161      1.18      yamt 			wapbl_free(wr->wr_inodes, oldsize);
   3162      1.12     joerg 			wr->wr_inodes = NULL;
   3163      1.12     joerg 		}
   3164      1.10     joerg 	}
   3165      1.10     joerg 	wr->wr_inodeshead = newoff;
   3166      1.10     joerg 	if (wc->wc_inocnt == 0)
   3167      1.10     joerg 		return;
   3168      1.10     joerg 
   3169      1.51      para 	new_inodes = wapbl_alloc((wr->wr_inodescnt + wc->wc_inocnt) *
   3170      1.18      yamt 	    sizeof(wr->wr_inodes[0]));
   3171      1.18      yamt 	if (wr->wr_inodes != NULL) {
   3172      1.18      yamt 		memcpy(new_inodes, wr->wr_inodes, oldsize);
   3173      1.18      yamt 		wapbl_free(wr->wr_inodes, oldsize);
   3174      1.18      yamt 	}
   3175      1.18      yamt 	wr->wr_inodes = new_inodes;
   3176      1.10     joerg 	memcpy(&wr->wr_inodes[wr->wr_inodescnt], wc->wc_inodes,
   3177      1.18      yamt 	    wc->wc_inocnt * sizeof(wr->wr_inodes[0]));
   3178      1.10     joerg 	wr->wr_inodescnt += wc->wc_inocnt;
   3179      1.10     joerg }
   3180      1.10     joerg 
   3181       1.2    simonb static int
   3182      1.14     joerg wapbl_replay_process(struct wapbl_replay *wr, off_t head, off_t tail)
   3183       1.2    simonb {
   3184       1.2    simonb 	off_t off;
   3185       1.2    simonb 	int error;
   3186       1.2    simonb 
   3187      1.14     joerg 	int logblklen = 1 << wr->wr_log_dev_bshift;
   3188       1.2    simonb 
   3189       1.2    simonb 	wapbl_blkhash_clear(wr);
   3190       1.2    simonb 
   3191      1.14     joerg 	off = tail;
   3192      1.14     joerg 	while (off != head) {
   3193       1.2    simonb 		struct wapbl_wc_null *wcn;
   3194       1.2    simonb 		off_t saveoff = off;
   3195       1.2    simonb 		error = wapbl_circ_read(wr, wr->wr_scratch, logblklen, &off);
   3196       1.2    simonb 		if (error)
   3197       1.2    simonb 			goto errout;
   3198       1.2    simonb 		wcn = (struct wapbl_wc_null *)wr->wr_scratch;
   3199       1.2    simonb 		switch (wcn->wc_type) {
   3200       1.2    simonb 		case WAPBL_WC_BLOCKS:
   3201      1.10     joerg 			wapbl_replay_process_blocks(wr, &off);
   3202       1.2    simonb 			break;
   3203       1.2    simonb 
   3204       1.2    simonb 		case WAPBL_WC_REVOCATIONS:
   3205      1.10     joerg 			wapbl_replay_process_revocations(wr);
   3206       1.2    simonb 			break;
   3207       1.2    simonb 
   3208       1.2    simonb 		case WAPBL_WC_INODES:
   3209      1.10     joerg 			wapbl_replay_process_inodes(wr, saveoff, off);
   3210       1.2    simonb 			break;
   3211      1.10     joerg 
   3212       1.2    simonb 		default:
   3213       1.2    simonb 			printf("Unrecognized wapbl type: 0x%08x\n",
   3214       1.2    simonb 			       wcn->wc_type);
   3215       1.2    simonb  			error = EFTYPE;
   3216       1.2    simonb 			goto errout;
   3217       1.2    simonb 		}
   3218       1.2    simonb 		wapbl_circ_advance(wr, wcn->wc_len, &saveoff);
   3219       1.2    simonb 		if (off != saveoff) {
   3220       1.2    simonb 			printf("wapbl_replay: corrupted records\n");
   3221       1.2    simonb 			error = EFTYPE;
   3222       1.2    simonb 			goto errout;
   3223       1.2    simonb 		}
   3224       1.2    simonb 	}
   3225       1.2    simonb 	return 0;
   3226       1.2    simonb 
   3227       1.2    simonb  errout:
   3228       1.2    simonb 	wapbl_blkhash_clear(wr);
   3229       1.2    simonb 	return error;
   3230       1.2    simonb }
   3231       1.2    simonb 
   3232      1.13     joerg #if 0
   3233       1.2    simonb int
   3234       1.2    simonb wapbl_replay_verify(struct wapbl_replay *wr, struct vnode *fsdevvp)
   3235       1.2    simonb {
   3236       1.2    simonb 	off_t off;
   3237       1.2    simonb 	int mismatchcnt = 0;
   3238      1.14     joerg 	int logblklen = 1 << wr->wr_log_dev_bshift;
   3239      1.14     joerg 	int fsblklen = 1 << wr->wr_fs_dev_bshift;
   3240      1.51      para 	void *scratch1 = wapbl_alloc(MAXBSIZE);
   3241      1.51      para 	void *scratch2 = wapbl_alloc(MAXBSIZE);
   3242       1.2    simonb 	int error = 0;
   3243       1.2    simonb 
   3244       1.2    simonb 	KDASSERT(wapbl_replay_isopen(wr));
   3245       1.2    simonb 
   3246       1.2    simonb 	off = wch->wc_tail;
   3247       1.2    simonb 	while (off != wch->wc_head) {
   3248       1.2    simonb 		struct wapbl_wc_null *wcn;
   3249       1.2    simonb #ifdef DEBUG
   3250       1.2    simonb 		off_t saveoff = off;
   3251       1.2    simonb #endif
   3252       1.2    simonb 		error = wapbl_circ_read(wr, wr->wr_scratch, logblklen, &off);
   3253       1.2    simonb 		if (error)
   3254       1.2    simonb 			goto out;
   3255       1.2    simonb 		wcn = (struct wapbl_wc_null *)wr->wr_scratch;
   3256       1.2    simonb 		switch (wcn->wc_type) {
   3257       1.2    simonb 		case WAPBL_WC_BLOCKS:
   3258       1.2    simonb 			{
   3259       1.2    simonb 				struct wapbl_wc_blocklist *wc =
   3260       1.2    simonb 				    (struct wapbl_wc_blocklist *)wr->wr_scratch;
   3261       1.2    simonb 				int i;
   3262       1.2    simonb 				for (i = 0; i < wc->wc_blkcount; i++) {
   3263       1.2    simonb 					int foundcnt = 0;
   3264       1.2    simonb 					int dirtycnt = 0;
   3265       1.2    simonb 					int j, n;
   3266       1.2    simonb 					/*
   3267       1.2    simonb 					 * Check each physical block into the
   3268       1.2    simonb 					 * hashtable independently
   3269       1.2    simonb 					 */
   3270       1.2    simonb 					n = wc->wc_blocks[i].wc_dlen >>
   3271       1.2    simonb 					    wch->wc_fs_dev_bshift;
   3272       1.2    simonb 					for (j = 0; j < n; j++) {
   3273       1.2    simonb 						struct wapbl_blk *wb =
   3274       1.2    simonb 						   wapbl_blkhash_get(wr,
   3275  1.61.2.1     skrll 						   wapbl_block_daddr(wc, i, j, fsblklen));
   3276       1.2    simonb 						if (wb && (wb->wb_off == off)) {
   3277       1.2    simonb 							foundcnt++;
   3278       1.2    simonb 							error =
   3279       1.2    simonb 							    wapbl_circ_read(wr,
   3280       1.2    simonb 							    scratch1, fsblklen,
   3281       1.2    simonb 							    &off);
   3282       1.2    simonb 							if (error)
   3283       1.2    simonb 								goto out;
   3284       1.2    simonb 							error =
   3285       1.2    simonb 							    wapbl_read(scratch2,
   3286       1.2    simonb 							    fsblklen, fsdevvp,
   3287       1.2    simonb 							    wb->wb_blk);
   3288       1.2    simonb 							if (error)
   3289       1.2    simonb 								goto out;
   3290       1.2    simonb 							if (memcmp(scratch1,
   3291       1.2    simonb 								   scratch2,
   3292       1.2    simonb 								   fsblklen)) {
   3293       1.2    simonb 								printf(
   3294       1.2    simonb 		"wapbl_verify: mismatch block %"PRId64" at off %"PRIdMAX"\n",
   3295       1.2    simonb 		wb->wb_blk, (intmax_t)off);
   3296       1.2    simonb 								dirtycnt++;
   3297       1.2    simonb 								mismatchcnt++;
   3298       1.2    simonb 							}
   3299       1.2    simonb 						} else {
   3300       1.2    simonb 							wapbl_circ_advance(wr,
   3301       1.2    simonb 							    fsblklen, &off);
   3302       1.2    simonb 						}
   3303       1.2    simonb 					}
   3304       1.2    simonb #if 0
   3305       1.2    simonb 					/*
   3306       1.2    simonb 					 * If all of the blocks in an entry
   3307       1.2    simonb 					 * are clean, then remove all of its
   3308       1.2    simonb 					 * blocks from the hashtable since they
   3309       1.2    simonb 					 * never will need replay.
   3310       1.2    simonb 					 */
   3311       1.2    simonb 					if ((foundcnt != 0) &&
   3312       1.2    simonb 					    (dirtycnt == 0)) {
   3313       1.2    simonb 						off = saveoff;
   3314       1.2    simonb 						wapbl_circ_advance(wr,
   3315       1.2    simonb 						    logblklen, &off);
   3316       1.2    simonb 						for (j = 0; j < n; j++) {
   3317       1.2    simonb 							struct wapbl_blk *wb =
   3318       1.2    simonb 							   wapbl_blkhash_get(wr,
   3319  1.61.2.1     skrll 							   wapbl_block_daddr(wc, i, j, fsblklen));
   3320       1.2    simonb 							if (wb &&
   3321       1.2    simonb 							  (wb->wb_off == off)) {
   3322       1.2    simonb 								wapbl_blkhash_rem(wr, wb->wb_blk);
   3323       1.2    simonb 							}
   3324       1.2    simonb 							wapbl_circ_advance(wr,
   3325       1.2    simonb 							    fsblklen, &off);
   3326       1.2    simonb 						}
   3327       1.2    simonb 					}
   3328       1.2    simonb #endif
   3329       1.2    simonb 				}
   3330       1.2    simonb 			}
   3331       1.2    simonb 			break;
   3332       1.2    simonb 		case WAPBL_WC_REVOCATIONS:
   3333       1.2    simonb 		case WAPBL_WC_INODES:
   3334       1.2    simonb 			break;
   3335       1.2    simonb 		default:
   3336       1.2    simonb 			KASSERT(0);
   3337       1.2    simonb 		}
   3338       1.2    simonb #ifdef DEBUG
   3339       1.2    simonb 		wapbl_circ_advance(wr, wcn->wc_len, &saveoff);
   3340       1.2    simonb 		KASSERT(off == saveoff);
   3341       1.2    simonb #endif
   3342       1.2    simonb 	}
   3343       1.2    simonb  out:
   3344      1.18      yamt 	wapbl_free(scratch1, MAXBSIZE);
   3345      1.18      yamt 	wapbl_free(scratch2, MAXBSIZE);
   3346       1.2    simonb 	if (!error && mismatchcnt)
   3347       1.2    simonb 		error = EFTYPE;
   3348       1.2    simonb 	return error;
   3349       1.2    simonb }
   3350       1.2    simonb #endif
   3351       1.2    simonb 
   3352       1.2    simonb int
   3353       1.2    simonb wapbl_replay_write(struct wapbl_replay *wr, struct vnode *fsdevvp)
   3354       1.2    simonb {
   3355       1.9     joerg 	struct wapbl_blk *wb;
   3356       1.9     joerg 	size_t i;
   3357       1.2    simonb 	off_t off;
   3358       1.9     joerg 	void *scratch;
   3359       1.2    simonb 	int error = 0;
   3360      1.14     joerg 	int fsblklen = 1 << wr->wr_fs_dev_bshift;
   3361       1.2    simonb 
   3362       1.2    simonb 	KDASSERT(wapbl_replay_isopen(wr));
   3363       1.2    simonb 
   3364      1.51      para 	scratch = wapbl_alloc(MAXBSIZE);
   3365       1.2    simonb 
   3366      1.37  drochner 	for (i = 0; i <= wr->wr_blkhashmask; ++i) {
   3367       1.9     joerg 		LIST_FOREACH(wb, &wr->wr_blkhash[i], wb_hash) {
   3368       1.9     joerg 			off = wb->wb_off;
   3369       1.9     joerg 			error = wapbl_circ_read(wr, scratch, fsblklen, &off);
   3370       1.9     joerg 			if (error)
   3371       1.9     joerg 				break;
   3372       1.9     joerg 			error = wapbl_write(scratch, fsblklen, fsdevvp,
   3373       1.9     joerg 			    wb->wb_blk);
   3374       1.9     joerg 			if (error)
   3375       1.9     joerg 				break;
   3376       1.2    simonb 		}
   3377       1.2    simonb 	}
   3378       1.9     joerg 
   3379      1.18      yamt 	wapbl_free(scratch, MAXBSIZE);
   3380       1.2    simonb 	return error;
   3381       1.2    simonb }
   3382       1.2    simonb 
   3383       1.2    simonb int
   3384       1.6     joerg wapbl_replay_can_read(struct wapbl_replay *wr, daddr_t blk, long len)
   3385       1.6     joerg {
   3386      1.14     joerg 	int fsblklen = 1 << wr->wr_fs_dev_bshift;
   3387       1.6     joerg 
   3388       1.6     joerg 	KDASSERT(wapbl_replay_isopen(wr));
   3389       1.6     joerg 	KASSERT((len % fsblklen) == 0);
   3390       1.6     joerg 
   3391       1.6     joerg 	while (len != 0) {
   3392       1.6     joerg 		struct wapbl_blk *wb = wapbl_blkhash_get(wr, blk);
   3393       1.6     joerg 		if (wb)
   3394       1.6     joerg 			return 1;
   3395       1.6     joerg 		len -= fsblklen;
   3396       1.6     joerg 	}
   3397       1.6     joerg 	return 0;
   3398       1.6     joerg }
   3399       1.6     joerg 
   3400       1.6     joerg int
   3401       1.2    simonb wapbl_replay_read(struct wapbl_replay *wr, void *data, daddr_t blk, long len)
   3402       1.2    simonb {
   3403      1.14     joerg 	int fsblklen = 1 << wr->wr_fs_dev_bshift;
   3404       1.2    simonb 
   3405       1.2    simonb 	KDASSERT(wapbl_replay_isopen(wr));
   3406       1.2    simonb 
   3407       1.2    simonb 	KASSERT((len % fsblklen) == 0);
   3408       1.2    simonb 
   3409       1.2    simonb 	while (len != 0) {
   3410       1.2    simonb 		struct wapbl_blk *wb = wapbl_blkhash_get(wr, blk);
   3411       1.2    simonb 		if (wb) {
   3412       1.2    simonb 			off_t off = wb->wb_off;
   3413       1.2    simonb 			int error;
   3414       1.2    simonb 			error = wapbl_circ_read(wr, data, fsblklen, &off);
   3415       1.2    simonb 			if (error)
   3416       1.2    simonb 				return error;
   3417       1.2    simonb 		}
   3418       1.2    simonb 		data = (uint8_t *)data + fsblklen;
   3419       1.2    simonb 		len -= fsblklen;
   3420       1.2    simonb 		blk++;
   3421       1.2    simonb 	}
   3422       1.2    simonb 	return 0;
   3423       1.2    simonb }
   3424      1.35     pooka 
   3425      1.36     pooka #ifdef _KERNEL
   3426  1.61.2.2     skrll 
   3427      1.35     pooka MODULE(MODULE_CLASS_VFS, wapbl, NULL);
   3428      1.35     pooka 
   3429      1.35     pooka static int
   3430      1.35     pooka wapbl_modcmd(modcmd_t cmd, void *arg)
   3431      1.35     pooka {
   3432      1.35     pooka 
   3433      1.35     pooka 	switch (cmd) {
   3434      1.35     pooka 	case MODULE_CMD_INIT:
   3435      1.39  christos 		wapbl_init();
   3436      1.35     pooka 		return 0;
   3437      1.35     pooka 	case MODULE_CMD_FINI:
   3438  1.61.2.3     skrll 		return wapbl_fini();
   3439      1.35     pooka 	default:
   3440      1.35     pooka 		return ENOTTY;
   3441      1.35     pooka 	}
   3442      1.35     pooka }
   3443      1.36     pooka #endif /* _KERNEL */
   3444