vfs_wapbl.c revision 1.7 1 1.7 joerg /* $NetBSD: vfs_wapbl.c,v 1.7 2008/11/17 19:31:47 joerg Exp $ */
2 1.2 simonb
3 1.2 simonb /*-
4 1.2 simonb * Copyright (c) 2003,2008 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.7 joerg __KERNEL_RCSID(0, "$NetBSD: vfs_wapbl.c,v 1.7 2008/11/17 19:31:47 joerg Exp $");
40 1.2 simonb
41 1.2 simonb #include <sys/param.h>
42 1.2 simonb
43 1.2 simonb #ifdef _KERNEL
44 1.2 simonb #include <sys/param.h>
45 1.2 simonb #include <sys/namei.h>
46 1.2 simonb #include <sys/proc.h>
47 1.2 simonb #include <sys/uio.h>
48 1.2 simonb #include <sys/vnode.h>
49 1.2 simonb #include <sys/file.h>
50 1.2 simonb #include <sys/malloc.h>
51 1.2 simonb #include <sys/resourcevar.h>
52 1.2 simonb #include <sys/conf.h>
53 1.2 simonb #include <sys/mount.h>
54 1.2 simonb #include <sys/kernel.h>
55 1.2 simonb #include <sys/kauth.h>
56 1.2 simonb #include <sys/mutex.h>
57 1.2 simonb #include <sys/atomic.h>
58 1.2 simonb #include <sys/wapbl.h>
59 1.2 simonb
60 1.2 simonb #if WAPBL_UVM_ALLOC
61 1.2 simonb #include <uvm/uvm.h>
62 1.2 simonb #endif
63 1.2 simonb
64 1.2 simonb #include <miscfs/specfs/specdev.h>
65 1.2 simonb
66 1.2 simonb MALLOC_JUSTDEFINE(M_WAPBL, "wapbl", "write-ahead physical block logging");
67 1.2 simonb #define wapbl_malloc(s) malloc((s), M_WAPBL, M_WAITOK)
68 1.2 simonb #define wapbl_free(a) free((a), M_WAPBL)
69 1.2 simonb #define wapbl_calloc(n, s) malloc((n)*(s), M_WAPBL, M_WAITOK | M_ZERO)
70 1.2 simonb
71 1.2 simonb #else /* !_KERNEL */
72 1.2 simonb #include <assert.h>
73 1.2 simonb #include <errno.h>
74 1.2 simonb #include <stdio.h>
75 1.2 simonb #include <stdbool.h>
76 1.2 simonb #include <stdlib.h>
77 1.2 simonb #include <string.h>
78 1.2 simonb
79 1.2 simonb #include <sys/time.h>
80 1.2 simonb #include <sys/wapbl.h>
81 1.2 simonb
82 1.2 simonb #define KDASSERT(x) assert(x)
83 1.2 simonb #define KASSERT(x) assert(x)
84 1.2 simonb #define wapbl_malloc(s) malloc(s)
85 1.2 simonb #define wapbl_free(a) free(a)
86 1.2 simonb #define wapbl_calloc(n, s) calloc((n), (s))
87 1.2 simonb
88 1.2 simonb #endif /* !_KERNEL */
89 1.2 simonb
90 1.2 simonb /*
91 1.2 simonb * INTERNAL DATA STRUCTURES
92 1.2 simonb */
93 1.2 simonb
94 1.2 simonb /*
95 1.2 simonb * This structure holds per-mount log information.
96 1.2 simonb *
97 1.2 simonb * Legend: a = atomic access only
98 1.2 simonb * r = read-only after init
99 1.2 simonb * l = rwlock held
100 1.2 simonb * m = mutex held
101 1.2 simonb * u = unlocked access ok
102 1.2 simonb * b = bufcache_lock held
103 1.2 simonb */
104 1.2 simonb struct wapbl {
105 1.2 simonb struct vnode *wl_logvp; /* r: log here */
106 1.2 simonb struct vnode *wl_devvp; /* r: log on this device */
107 1.2 simonb struct mount *wl_mount; /* r: mountpoint wl is associated with */
108 1.2 simonb daddr_t wl_logpbn; /* r: Physical block number of start of log */
109 1.2 simonb int wl_log_dev_bshift; /* r: logarithm of device block size of log
110 1.2 simonb device */
111 1.2 simonb int wl_fs_dev_bshift; /* r: logarithm of device block size of
112 1.2 simonb filesystem device */
113 1.2 simonb
114 1.3 yamt unsigned wl_lock_count; /* m: Count of transactions in progress */
115 1.2 simonb
116 1.2 simonb size_t wl_circ_size; /* r: Number of bytes in buffer of log */
117 1.2 simonb size_t wl_circ_off; /* r: Number of bytes reserved at start */
118 1.2 simonb
119 1.2 simonb size_t wl_bufcount_max; /* r: Number of buffers reserved for log */
120 1.2 simonb size_t wl_bufbytes_max; /* r: Number of buf bytes reserved for log */
121 1.2 simonb
122 1.2 simonb off_t wl_head; /* l: Byte offset of log head */
123 1.2 simonb off_t wl_tail; /* l: Byte offset of log tail */
124 1.2 simonb /*
125 1.2 simonb * head == tail == 0 means log is empty
126 1.2 simonb * head == tail != 0 means log is full
127 1.2 simonb * see assertions in wapbl_advance() for other boundary conditions.
128 1.2 simonb * only truncate moves the tail, except when flush sets it to
129 1.2 simonb * wl_header_size only flush moves the head, except when truncate
130 1.2 simonb * sets it to 0.
131 1.2 simonb */
132 1.2 simonb
133 1.2 simonb struct wapbl_wc_header *wl_wc_header; /* l */
134 1.2 simonb void *wl_wc_scratch; /* l: scratch space (XXX: por que?!?) */
135 1.2 simonb
136 1.2 simonb kmutex_t wl_mtx; /* u: short-term lock */
137 1.2 simonb krwlock_t wl_rwlock; /* u: File system transaction lock */
138 1.2 simonb
139 1.2 simonb /*
140 1.2 simonb * Must be held while accessing
141 1.2 simonb * wl_count or wl_bufs or head or tail
142 1.2 simonb */
143 1.2 simonb
144 1.2 simonb /*
145 1.2 simonb * Callback called from within the flush routine to flush any extra
146 1.2 simonb * bits. Note that flush may be skipped without calling this if
147 1.2 simonb * there are no outstanding buffers in the transaction.
148 1.2 simonb */
149 1.5 joerg #if _KERNEL
150 1.2 simonb wapbl_flush_fn_t wl_flush; /* r */
151 1.2 simonb wapbl_flush_fn_t wl_flush_abort;/* r */
152 1.5 joerg #endif
153 1.2 simonb
154 1.2 simonb size_t wl_bufbytes; /* m: Byte count of pages in wl_bufs */
155 1.2 simonb size_t wl_bufcount; /* m: Count of buffers in wl_bufs */
156 1.2 simonb size_t wl_bcount; /* m: Total bcount of wl_bufs */
157 1.2 simonb
158 1.2 simonb LIST_HEAD(, buf) wl_bufs; /* m: Buffers in current transaction */
159 1.2 simonb
160 1.2 simonb kcondvar_t wl_reclaimable_cv; /* m (obviously) */
161 1.2 simonb size_t wl_reclaimable_bytes; /* m: Amount of space available for
162 1.2 simonb reclamation by truncate */
163 1.2 simonb int wl_error_count; /* m: # of wl_entries with errors */
164 1.2 simonb size_t wl_reserved_bytes; /* never truncate log smaller than this */
165 1.2 simonb
166 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
167 1.2 simonb size_t wl_unsynced_bufbytes; /* Byte count of unsynced buffers */
168 1.2 simonb #endif
169 1.2 simonb
170 1.2 simonb daddr_t *wl_deallocblks;/* l: address of block */
171 1.2 simonb int *wl_dealloclens; /* l: size of block (fragments, kom ihg) */
172 1.2 simonb int wl_dealloccnt; /* l: total count */
173 1.2 simonb int wl_dealloclim; /* l: max count */
174 1.2 simonb
175 1.2 simonb /* hashtable of inode numbers for allocated but unlinked inodes */
176 1.2 simonb /* synch ??? */
177 1.2 simonb LIST_HEAD(wapbl_ino_head, wapbl_ino) *wl_inohash;
178 1.2 simonb u_long wl_inohashmask;
179 1.2 simonb int wl_inohashcnt;
180 1.2 simonb
181 1.2 simonb SIMPLEQ_HEAD(, wapbl_entry) wl_entries; /* On disk transaction
182 1.2 simonb accounting */
183 1.2 simonb };
184 1.2 simonb
185 1.2 simonb #ifdef WAPBL_DEBUG_PRINT
186 1.2 simonb int wapbl_debug_print = WAPBL_DEBUG_PRINT;
187 1.2 simonb #endif
188 1.2 simonb
189 1.2 simonb /****************************************************************/
190 1.2 simonb #ifdef _KERNEL
191 1.2 simonb
192 1.2 simonb #ifdef WAPBL_DEBUG
193 1.2 simonb struct wapbl *wapbl_debug_wl;
194 1.2 simonb #endif
195 1.2 simonb
196 1.2 simonb static int wapbl_write_commit(struct wapbl *wl, off_t head, off_t tail);
197 1.2 simonb static int wapbl_write_blocks(struct wapbl *wl, off_t *offp);
198 1.2 simonb static int wapbl_write_revocations(struct wapbl *wl, off_t *offp);
199 1.2 simonb static int wapbl_write_inodes(struct wapbl *wl, off_t *offp);
200 1.2 simonb #endif /* _KERNEL */
201 1.2 simonb
202 1.2 simonb static int wapbl_replay_prescan(struct wapbl_replay *wr);
203 1.2 simonb static int wapbl_replay_get_inodes(struct wapbl_replay *wr);
204 1.2 simonb
205 1.2 simonb static __inline size_t wapbl_space_free(size_t avail, off_t head,
206 1.2 simonb off_t tail);
207 1.2 simonb static __inline size_t wapbl_space_used(size_t avail, off_t head,
208 1.2 simonb off_t tail);
209 1.2 simonb
210 1.2 simonb #ifdef _KERNEL
211 1.2 simonb
212 1.2 simonb #define WAPBL_INODETRK_SIZE 83
213 1.2 simonb static int wapbl_ino_pool_refcount;
214 1.2 simonb static struct pool wapbl_ino_pool;
215 1.2 simonb struct wapbl_ino {
216 1.2 simonb LIST_ENTRY(wapbl_ino) wi_hash;
217 1.2 simonb ino_t wi_ino;
218 1.2 simonb mode_t wi_mode;
219 1.2 simonb };
220 1.2 simonb
221 1.2 simonb static void wapbl_inodetrk_init(struct wapbl *wl, u_int size);
222 1.2 simonb static void wapbl_inodetrk_free(struct wapbl *wl);
223 1.2 simonb static struct wapbl_ino *wapbl_inodetrk_get(struct wapbl *wl, ino_t ino);
224 1.2 simonb
225 1.2 simonb static size_t wapbl_transaction_len(struct wapbl *wl);
226 1.2 simonb static __inline size_t wapbl_transaction_inodes_len(struct wapbl *wl);
227 1.2 simonb
228 1.4 joerg #ifdef DEBUG
229 1.4 joerg int wapbl_replay_verify(struct wapbl_replay *, struct vnode *);
230 1.4 joerg #endif
231 1.4 joerg
232 1.4 joerg static int wapbl_replay_isopen1(struct wapbl_replay *);
233 1.4 joerg
234 1.2 simonb /*
235 1.2 simonb * This is useful for debugging. If set, the log will
236 1.2 simonb * only be truncated when necessary.
237 1.2 simonb */
238 1.2 simonb int wapbl_lazy_truncate = 0;
239 1.2 simonb
240 1.2 simonb struct wapbl_ops wapbl_ops = {
241 1.2 simonb .wo_wapbl_discard = wapbl_discard,
242 1.2 simonb .wo_wapbl_replay_isopen = wapbl_replay_isopen1,
243 1.6 joerg .wo_wapbl_replay_can_read = wapbl_replay_can_read,
244 1.2 simonb .wo_wapbl_replay_read = wapbl_replay_read,
245 1.2 simonb .wo_wapbl_add_buf = wapbl_add_buf,
246 1.2 simonb .wo_wapbl_remove_buf = wapbl_remove_buf,
247 1.2 simonb .wo_wapbl_resize_buf = wapbl_resize_buf,
248 1.2 simonb .wo_wapbl_begin = wapbl_begin,
249 1.2 simonb .wo_wapbl_end = wapbl_end,
250 1.2 simonb .wo_wapbl_junlock_assert= wapbl_junlock_assert,
251 1.2 simonb
252 1.2 simonb /* XXX: the following is only used to say "this is a wapbl buf" */
253 1.2 simonb .wo_wapbl_biodone = wapbl_biodone,
254 1.2 simonb };
255 1.2 simonb
256 1.2 simonb void
257 1.2 simonb wapbl_init()
258 1.2 simonb {
259 1.2 simonb
260 1.2 simonb malloc_type_attach(M_WAPBL);
261 1.2 simonb }
262 1.2 simonb
263 1.2 simonb int
264 1.2 simonb wapbl_start(struct wapbl ** wlp, struct mount *mp, struct vnode *vp,
265 1.2 simonb daddr_t off, size_t count, size_t blksize, struct wapbl_replay *wr,
266 1.2 simonb wapbl_flush_fn_t flushfn, wapbl_flush_fn_t flushabortfn)
267 1.2 simonb {
268 1.2 simonb struct wapbl *wl;
269 1.2 simonb struct vnode *devvp;
270 1.2 simonb daddr_t logpbn;
271 1.2 simonb int error;
272 1.2 simonb int log_dev_bshift = DEV_BSHIFT;
273 1.2 simonb int fs_dev_bshift = DEV_BSHIFT;
274 1.2 simonb int run;
275 1.2 simonb
276 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_OPEN, ("wapbl_start: vp=%p off=%" PRId64
277 1.2 simonb " count=%zu blksize=%zu\n", vp, off, count, blksize));
278 1.2 simonb
279 1.2 simonb if (log_dev_bshift > fs_dev_bshift) {
280 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_OPEN,
281 1.2 simonb ("wapbl: log device's block size cannot be larger "
282 1.2 simonb "than filesystem's\n"));
283 1.2 simonb /*
284 1.2 simonb * Not currently implemented, although it could be if
285 1.2 simonb * needed someday.
286 1.2 simonb */
287 1.2 simonb return ENOSYS;
288 1.2 simonb }
289 1.2 simonb
290 1.2 simonb if (off < 0)
291 1.2 simonb return EINVAL;
292 1.2 simonb
293 1.2 simonb if (blksize < DEV_BSIZE)
294 1.2 simonb return EINVAL;
295 1.2 simonb if (blksize % DEV_BSIZE)
296 1.2 simonb return EINVAL;
297 1.2 simonb
298 1.2 simonb /* XXXTODO: verify that the full load is writable */
299 1.2 simonb
300 1.2 simonb /*
301 1.2 simonb * XXX check for minimum log size
302 1.2 simonb * minimum is governed by minimum amount of space
303 1.2 simonb * to complete a transaction. (probably truncate)
304 1.2 simonb */
305 1.2 simonb /* XXX for now pick something minimal */
306 1.2 simonb if ((count * blksize) < MAXPHYS) {
307 1.2 simonb return ENOSPC;
308 1.2 simonb }
309 1.2 simonb
310 1.2 simonb if ((error = VOP_BMAP(vp, off, &devvp, &logpbn, &run)) != 0) {
311 1.2 simonb return error;
312 1.2 simonb }
313 1.2 simonb
314 1.2 simonb wl = wapbl_calloc(1, sizeof(*wl));
315 1.2 simonb rw_init(&wl->wl_rwlock);
316 1.2 simonb mutex_init(&wl->wl_mtx, MUTEX_DEFAULT, IPL_NONE);
317 1.2 simonb cv_init(&wl->wl_reclaimable_cv, "wapblrec");
318 1.2 simonb LIST_INIT(&wl->wl_bufs);
319 1.2 simonb SIMPLEQ_INIT(&wl->wl_entries);
320 1.2 simonb
321 1.2 simonb wl->wl_logvp = vp;
322 1.2 simonb wl->wl_devvp = devvp;
323 1.2 simonb wl->wl_mount = mp;
324 1.2 simonb wl->wl_logpbn = logpbn;
325 1.2 simonb wl->wl_log_dev_bshift = log_dev_bshift;
326 1.2 simonb wl->wl_fs_dev_bshift = fs_dev_bshift;
327 1.2 simonb
328 1.2 simonb wl->wl_flush = flushfn;
329 1.2 simonb wl->wl_flush_abort = flushabortfn;
330 1.2 simonb
331 1.2 simonb /* Reserve two log device blocks for the commit headers */
332 1.2 simonb wl->wl_circ_off = 2<<wl->wl_log_dev_bshift;
333 1.2 simonb wl->wl_circ_size = ((count * blksize) - wl->wl_circ_off);
334 1.2 simonb /* truncate the log usage to a multiple of log_dev_bshift */
335 1.2 simonb wl->wl_circ_size >>= wl->wl_log_dev_bshift;
336 1.2 simonb wl->wl_circ_size <<= wl->wl_log_dev_bshift;
337 1.2 simonb
338 1.2 simonb /*
339 1.2 simonb * wl_bufbytes_max limits the size of the in memory transaction space.
340 1.2 simonb * - Since buffers are allocated and accounted for in units of
341 1.2 simonb * PAGE_SIZE it is required to be a multiple of PAGE_SIZE
342 1.2 simonb * (i.e. 1<<PAGE_SHIFT)
343 1.2 simonb * - Since the log device has to be written in units of
344 1.2 simonb * 1<<wl_log_dev_bshift it is required to be a mulitple of
345 1.2 simonb * 1<<wl_log_dev_bshift.
346 1.2 simonb * - Since filesystem will provide data in units of 1<<wl_fs_dev_bshift,
347 1.2 simonb * it is convenient to be a multiple of 1<<wl_fs_dev_bshift.
348 1.2 simonb * Therefore it must be multiple of the least common multiple of those
349 1.2 simonb * three quantities. Fortunately, all of those quantities are
350 1.2 simonb * guaranteed to be a power of two, and the least common multiple of
351 1.2 simonb * a set of numbers which are all powers of two is simply the maximum
352 1.2 simonb * of those numbers. Finally, the maximum logarithm of a power of two
353 1.2 simonb * is the same as the log of the maximum power of two. So we can do
354 1.2 simonb * the following operations to size wl_bufbytes_max:
355 1.2 simonb */
356 1.2 simonb
357 1.2 simonb /* XXX fix actual number of pages reserved per filesystem. */
358 1.2 simonb wl->wl_bufbytes_max = MIN(wl->wl_circ_size, buf_memcalc() / 2);
359 1.2 simonb
360 1.2 simonb /* Round wl_bufbytes_max to the largest power of two constraint */
361 1.2 simonb wl->wl_bufbytes_max >>= PAGE_SHIFT;
362 1.2 simonb wl->wl_bufbytes_max <<= PAGE_SHIFT;
363 1.2 simonb wl->wl_bufbytes_max >>= wl->wl_log_dev_bshift;
364 1.2 simonb wl->wl_bufbytes_max <<= wl->wl_log_dev_bshift;
365 1.2 simonb wl->wl_bufbytes_max >>= wl->wl_fs_dev_bshift;
366 1.2 simonb wl->wl_bufbytes_max <<= wl->wl_fs_dev_bshift;
367 1.2 simonb
368 1.2 simonb /* XXX maybe use filesystem fragment size instead of 1024 */
369 1.2 simonb /* XXX fix actual number of buffers reserved per filesystem. */
370 1.2 simonb wl->wl_bufcount_max = (nbuf / 2) * 1024;
371 1.2 simonb
372 1.2 simonb /* XXX tie this into resource estimation */
373 1.2 simonb wl->wl_dealloclim = 2 * btodb(wl->wl_bufbytes_max);
374 1.2 simonb
375 1.2 simonb #if WAPBL_UVM_ALLOC
376 1.2 simonb wl->wl_deallocblks = (void *) uvm_km_zalloc(kernel_map,
377 1.2 simonb round_page(sizeof(*wl->wl_deallocblks) * wl->wl_dealloclim));
378 1.2 simonb KASSERT(wl->wl_deallocblks != NULL);
379 1.2 simonb wl->wl_dealloclens = (void *) uvm_km_zalloc(kernel_map,
380 1.2 simonb round_page(sizeof(*wl->wl_dealloclens) * wl->wl_dealloclim));
381 1.2 simonb KASSERT(wl->wl_dealloclens != NULL);
382 1.2 simonb #else
383 1.2 simonb wl->wl_deallocblks = wapbl_malloc(sizeof(*wl->wl_deallocblks) *
384 1.2 simonb wl->wl_dealloclim);
385 1.2 simonb wl->wl_dealloclens = wapbl_malloc(sizeof(*wl->wl_dealloclens) *
386 1.2 simonb wl->wl_dealloclim);
387 1.2 simonb #endif
388 1.2 simonb
389 1.2 simonb wapbl_inodetrk_init(wl, WAPBL_INODETRK_SIZE);
390 1.2 simonb
391 1.2 simonb /* Initialize the commit header */
392 1.2 simonb {
393 1.2 simonb struct wapbl_wc_header *wc;
394 1.2 simonb size_t len = 1<<wl->wl_log_dev_bshift;
395 1.2 simonb wc = wapbl_calloc(1, len);
396 1.2 simonb wc->wc_type = WAPBL_WC_HEADER;
397 1.2 simonb wc->wc_len = len;
398 1.2 simonb wc->wc_circ_off = wl->wl_circ_off;
399 1.2 simonb wc->wc_circ_size = wl->wl_circ_size;
400 1.2 simonb /* XXX wc->wc_fsid */
401 1.2 simonb wc->wc_log_dev_bshift = wl->wl_log_dev_bshift;
402 1.2 simonb wc->wc_fs_dev_bshift = wl->wl_fs_dev_bshift;
403 1.2 simonb wl->wl_wc_header = wc;
404 1.2 simonb wl->wl_wc_scratch = wapbl_malloc(len);
405 1.2 simonb }
406 1.2 simonb
407 1.2 simonb /*
408 1.2 simonb * if there was an existing set of unlinked but
409 1.2 simonb * allocated inodes, preserve it in the new
410 1.2 simonb * log.
411 1.2 simonb */
412 1.2 simonb if (wr && wr->wr_inodescnt) {
413 1.2 simonb int i;
414 1.2 simonb
415 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_REPLAY,
416 1.2 simonb ("wapbl_start: reusing log with %d inodes\n",
417 1.2 simonb wr->wr_inodescnt));
418 1.2 simonb
419 1.2 simonb /*
420 1.2 simonb * Its only valid to reuse the replay log if its
421 1.2 simonb * the same as the new log we just opened.
422 1.2 simonb */
423 1.2 simonb KDASSERT(!wapbl_replay_isopen(wr));
424 1.2 simonb KASSERT(devvp->v_rdev == wr->wr_devvp->v_rdev);
425 1.2 simonb KASSERT(logpbn == wr->wr_logpbn);
426 1.2 simonb KASSERT(wl->wl_circ_size == wr->wr_wc_header.wc_circ_size);
427 1.2 simonb KASSERT(wl->wl_circ_off == wr->wr_wc_header.wc_circ_off);
428 1.2 simonb KASSERT(wl->wl_log_dev_bshift ==
429 1.2 simonb wr->wr_wc_header.wc_log_dev_bshift);
430 1.2 simonb KASSERT(wl->wl_fs_dev_bshift ==
431 1.2 simonb wr->wr_wc_header.wc_fs_dev_bshift);
432 1.2 simonb
433 1.2 simonb wl->wl_wc_header->wc_generation =
434 1.2 simonb wr->wr_wc_header.wc_generation + 1;
435 1.2 simonb
436 1.2 simonb for (i = 0; i < wr->wr_inodescnt; i++)
437 1.2 simonb wapbl_register_inode(wl, wr->wr_inodes[i].wr_inumber,
438 1.2 simonb wr->wr_inodes[i].wr_imode);
439 1.2 simonb
440 1.2 simonb /* Make sure new transaction won't overwrite old inodes list */
441 1.2 simonb KDASSERT(wapbl_transaction_len(wl) <=
442 1.2 simonb wapbl_space_free(wl->wl_circ_size, wr->wr_inodeshead,
443 1.2 simonb wr->wr_inodestail));
444 1.2 simonb
445 1.2 simonb wl->wl_head = wl->wl_tail = wr->wr_inodeshead;
446 1.2 simonb wl->wl_reclaimable_bytes = wl->wl_reserved_bytes =
447 1.2 simonb wapbl_transaction_len(wl);
448 1.2 simonb
449 1.2 simonb error = wapbl_write_inodes(wl, &wl->wl_head);
450 1.2 simonb if (error)
451 1.2 simonb goto errout;
452 1.2 simonb
453 1.2 simonb KASSERT(wl->wl_head != wl->wl_tail);
454 1.2 simonb KASSERT(wl->wl_head != 0);
455 1.2 simonb }
456 1.2 simonb
457 1.2 simonb error = wapbl_write_commit(wl, wl->wl_head, wl->wl_tail);
458 1.2 simonb if (error) {
459 1.2 simonb goto errout;
460 1.2 simonb }
461 1.2 simonb
462 1.2 simonb *wlp = wl;
463 1.2 simonb #if defined(WAPBL_DEBUG)
464 1.2 simonb wapbl_debug_wl = wl;
465 1.2 simonb #endif
466 1.2 simonb
467 1.2 simonb return 0;
468 1.2 simonb errout:
469 1.2 simonb wapbl_discard(wl);
470 1.2 simonb wapbl_free(wl->wl_wc_scratch);
471 1.2 simonb wapbl_free(wl->wl_wc_header);
472 1.2 simonb #if WAPBL_UVM_ALLOC
473 1.2 simonb uvm_km_free_wakeup(kernel_map, (vaddr_t) wl->wl_deallocblks,
474 1.2 simonb round_page(sizeof(*wl->wl_deallocblks *
475 1.2 simonb wl->wl_dealloclim)));
476 1.2 simonb uvm_km_free_wakeup(kernel_map, (vaddr_t) wl->wl_dealloclens,
477 1.2 simonb round_page(sizeof(*wl->wl_dealloclens *
478 1.2 simonb wl->wl_dealloclim)));
479 1.2 simonb #else
480 1.2 simonb wapbl_free(wl->wl_deallocblks);
481 1.2 simonb wapbl_free(wl->wl_dealloclens);
482 1.2 simonb #endif
483 1.2 simonb wapbl_inodetrk_free(wl);
484 1.2 simonb wapbl_free(wl);
485 1.2 simonb
486 1.2 simonb return error;
487 1.2 simonb }
488 1.2 simonb
489 1.2 simonb /*
490 1.2 simonb * Like wapbl_flush, only discards the transaction
491 1.2 simonb * completely
492 1.2 simonb */
493 1.2 simonb
494 1.2 simonb void
495 1.2 simonb wapbl_discard(struct wapbl *wl)
496 1.2 simonb {
497 1.2 simonb struct wapbl_entry *we;
498 1.2 simonb struct buf *bp;
499 1.2 simonb int i;
500 1.2 simonb
501 1.2 simonb /*
502 1.2 simonb * XXX we may consider using upgrade here
503 1.2 simonb * if we want to call flush from inside a transaction
504 1.2 simonb */
505 1.2 simonb rw_enter(&wl->wl_rwlock, RW_WRITER);
506 1.2 simonb wl->wl_flush(wl->wl_mount, wl->wl_deallocblks, wl->wl_dealloclens,
507 1.2 simonb wl->wl_dealloccnt);
508 1.2 simonb
509 1.2 simonb #ifdef WAPBL_DEBUG_PRINT
510 1.2 simonb {
511 1.2 simonb struct wapbl_entry *we;
512 1.2 simonb pid_t pid = -1;
513 1.2 simonb lwpid_t lid = -1;
514 1.2 simonb if (curproc)
515 1.2 simonb pid = curproc->p_pid;
516 1.2 simonb if (curlwp)
517 1.2 simonb lid = curlwp->l_lid;
518 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
519 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_DISCARD,
520 1.2 simonb ("wapbl_discard: thread %d.%d discarding "
521 1.2 simonb "transaction\n"
522 1.2 simonb "\tbufcount=%zu bufbytes=%zu bcount=%zu "
523 1.2 simonb "deallocs=%d inodes=%d\n"
524 1.2 simonb "\terrcnt = %u, reclaimable=%zu reserved=%zu "
525 1.2 simonb "unsynced=%zu\n",
526 1.2 simonb pid, lid, wl->wl_bufcount, wl->wl_bufbytes,
527 1.2 simonb wl->wl_bcount, wl->wl_dealloccnt,
528 1.2 simonb wl->wl_inohashcnt, wl->wl_error_count,
529 1.2 simonb wl->wl_reclaimable_bytes, wl->wl_reserved_bytes,
530 1.2 simonb wl->wl_unsynced_bufbytes));
531 1.2 simonb SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
532 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_DISCARD,
533 1.2 simonb ("\tentry: bufcount = %zu, reclaimable = %zu, "
534 1.2 simonb "error = %d, unsynced = %zu\n",
535 1.2 simonb we->we_bufcount, we->we_reclaimable_bytes,
536 1.2 simonb we->we_error, we->we_unsynced_bufbytes));
537 1.2 simonb }
538 1.2 simonb #else /* !WAPBL_DEBUG_BUFBYTES */
539 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_DISCARD,
540 1.2 simonb ("wapbl_discard: thread %d.%d discarding transaction\n"
541 1.2 simonb "\tbufcount=%zu bufbytes=%zu bcount=%zu "
542 1.2 simonb "deallocs=%d inodes=%d\n"
543 1.2 simonb "\terrcnt = %u, reclaimable=%zu reserved=%zu\n",
544 1.2 simonb pid, lid, wl->wl_bufcount, wl->wl_bufbytes,
545 1.2 simonb wl->wl_bcount, wl->wl_dealloccnt,
546 1.2 simonb wl->wl_inohashcnt, wl->wl_error_count,
547 1.2 simonb wl->wl_reclaimable_bytes, wl->wl_reserved_bytes));
548 1.2 simonb SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
549 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_DISCARD,
550 1.2 simonb ("\tentry: bufcount = %zu, reclaimable = %zu, "
551 1.2 simonb "error = %d\n",
552 1.2 simonb we->we_bufcount, we->we_reclaimable_bytes,
553 1.2 simonb we->we_error));
554 1.2 simonb }
555 1.2 simonb #endif /* !WAPBL_DEBUG_BUFBYTES */
556 1.2 simonb }
557 1.2 simonb #endif /* WAPBL_DEBUG_PRINT */
558 1.2 simonb
559 1.2 simonb for (i = 0; i <= wl->wl_inohashmask; i++) {
560 1.2 simonb struct wapbl_ino_head *wih;
561 1.2 simonb struct wapbl_ino *wi;
562 1.2 simonb
563 1.2 simonb wih = &wl->wl_inohash[i];
564 1.2 simonb while ((wi = LIST_FIRST(wih)) != NULL) {
565 1.2 simonb LIST_REMOVE(wi, wi_hash);
566 1.2 simonb pool_put(&wapbl_ino_pool, wi);
567 1.2 simonb KASSERT(wl->wl_inohashcnt > 0);
568 1.2 simonb wl->wl_inohashcnt--;
569 1.2 simonb }
570 1.2 simonb }
571 1.2 simonb
572 1.2 simonb /*
573 1.2 simonb * clean buffer list
574 1.2 simonb */
575 1.2 simonb mutex_enter(&bufcache_lock);
576 1.2 simonb mutex_enter(&wl->wl_mtx);
577 1.2 simonb while ((bp = LIST_FIRST(&wl->wl_bufs)) != NULL) {
578 1.2 simonb if (bbusy(bp, 0, 0, &wl->wl_mtx) == 0) {
579 1.2 simonb /*
580 1.2 simonb * The buffer will be unlocked and
581 1.2 simonb * removed from the transaction in brelse
582 1.2 simonb */
583 1.2 simonb mutex_exit(&wl->wl_mtx);
584 1.2 simonb brelsel(bp, 0);
585 1.2 simonb mutex_enter(&wl->wl_mtx);
586 1.2 simonb }
587 1.2 simonb }
588 1.2 simonb mutex_exit(&wl->wl_mtx);
589 1.2 simonb mutex_exit(&bufcache_lock);
590 1.2 simonb
591 1.2 simonb /*
592 1.2 simonb * Remove references to this wl from wl_entries, free any which
593 1.2 simonb * no longer have buffers, others will be freed in wapbl_biodone
594 1.2 simonb * when they no longer have any buffers.
595 1.2 simonb */
596 1.2 simonb while ((we = SIMPLEQ_FIRST(&wl->wl_entries)) != NULL) {
597 1.2 simonb SIMPLEQ_REMOVE_HEAD(&wl->wl_entries, we_entries);
598 1.2 simonb /* XXX should we be accumulating wl_error_count
599 1.2 simonb * and increasing reclaimable bytes ? */
600 1.2 simonb we->we_wapbl = NULL;
601 1.2 simonb if (we->we_bufcount == 0) {
602 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
603 1.2 simonb KASSERT(we->we_unsynced_bufbytes == 0);
604 1.2 simonb #endif
605 1.2 simonb wapbl_free(we);
606 1.2 simonb }
607 1.2 simonb }
608 1.2 simonb
609 1.2 simonb /* Discard list of deallocs */
610 1.2 simonb wl->wl_dealloccnt = 0;
611 1.2 simonb /* XXX should we clear wl_reserved_bytes? */
612 1.2 simonb
613 1.2 simonb KASSERT(wl->wl_bufbytes == 0);
614 1.2 simonb KASSERT(wl->wl_bcount == 0);
615 1.2 simonb KASSERT(wl->wl_bufcount == 0);
616 1.2 simonb KASSERT(LIST_EMPTY(&wl->wl_bufs));
617 1.2 simonb KASSERT(SIMPLEQ_EMPTY(&wl->wl_entries));
618 1.2 simonb KASSERT(wl->wl_inohashcnt == 0);
619 1.2 simonb
620 1.2 simonb rw_exit(&wl->wl_rwlock);
621 1.2 simonb }
622 1.2 simonb
623 1.2 simonb int
624 1.2 simonb wapbl_stop(struct wapbl *wl, int force)
625 1.2 simonb {
626 1.2 simonb struct vnode *vp;
627 1.2 simonb int error;
628 1.2 simonb
629 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_OPEN, ("wapbl_stop called\n"));
630 1.2 simonb error = wapbl_flush(wl, 1);
631 1.2 simonb if (error) {
632 1.2 simonb if (force)
633 1.2 simonb wapbl_discard(wl);
634 1.2 simonb else
635 1.2 simonb return error;
636 1.2 simonb }
637 1.2 simonb
638 1.2 simonb /* Unlinked inodes persist after a flush */
639 1.2 simonb if (wl->wl_inohashcnt) {
640 1.2 simonb if (force) {
641 1.2 simonb wapbl_discard(wl);
642 1.2 simonb } else {
643 1.2 simonb return EBUSY;
644 1.2 simonb }
645 1.2 simonb }
646 1.2 simonb
647 1.2 simonb KASSERT(wl->wl_bufbytes == 0);
648 1.2 simonb KASSERT(wl->wl_bcount == 0);
649 1.2 simonb KASSERT(wl->wl_bufcount == 0);
650 1.2 simonb KASSERT(LIST_EMPTY(&wl->wl_bufs));
651 1.2 simonb KASSERT(wl->wl_dealloccnt == 0);
652 1.2 simonb KASSERT(SIMPLEQ_EMPTY(&wl->wl_entries));
653 1.2 simonb KASSERT(wl->wl_inohashcnt == 0);
654 1.2 simonb
655 1.2 simonb vp = wl->wl_logvp;
656 1.2 simonb
657 1.2 simonb wapbl_free(wl->wl_wc_scratch);
658 1.2 simonb wapbl_free(wl->wl_wc_header);
659 1.2 simonb #if WAPBL_UVM_ALLOC
660 1.2 simonb uvm_km_free_wakeup(kernel_map, (vaddr_t) wl->wl_deallocblks,
661 1.2 simonb round_page(sizeof(*wl->wl_deallocblks *
662 1.2 simonb wl->wl_dealloclim)));
663 1.2 simonb uvm_km_free_wakeup(kernel_map, (vaddr_t) wl->wl_dealloclens,
664 1.2 simonb round_page(sizeof(*wl->wl_dealloclens *
665 1.2 simonb wl->wl_dealloclim)));
666 1.2 simonb #else
667 1.2 simonb wapbl_free(wl->wl_deallocblks);
668 1.2 simonb wapbl_free(wl->wl_dealloclens);
669 1.2 simonb #endif
670 1.2 simonb wapbl_inodetrk_free(wl);
671 1.2 simonb
672 1.2 simonb cv_destroy(&wl->wl_reclaimable_cv);
673 1.2 simonb mutex_destroy(&wl->wl_mtx);
674 1.2 simonb rw_destroy(&wl->wl_rwlock);
675 1.2 simonb wapbl_free(wl);
676 1.2 simonb
677 1.2 simonb return 0;
678 1.2 simonb }
679 1.2 simonb
680 1.2 simonb static int
681 1.2 simonb wapbl_doio(void *data, size_t len, struct vnode *devvp, daddr_t pbn, int flags)
682 1.2 simonb {
683 1.2 simonb struct pstats *pstats = curlwp->l_proc->p_stats;
684 1.2 simonb struct buf *bp;
685 1.2 simonb int error;
686 1.2 simonb
687 1.2 simonb KASSERT((flags & ~(B_WRITE | B_READ)) == 0);
688 1.2 simonb KASSERT(devvp->v_type == VBLK);
689 1.2 simonb
690 1.2 simonb if ((flags & (B_WRITE | B_READ)) == B_WRITE) {
691 1.2 simonb mutex_enter(&devvp->v_interlock);
692 1.2 simonb devvp->v_numoutput++;
693 1.2 simonb mutex_exit(&devvp->v_interlock);
694 1.2 simonb pstats->p_ru.ru_oublock++;
695 1.2 simonb } else {
696 1.2 simonb pstats->p_ru.ru_inblock++;
697 1.2 simonb }
698 1.2 simonb
699 1.2 simonb bp = getiobuf(devvp, true);
700 1.2 simonb bp->b_flags = flags;
701 1.2 simonb bp->b_cflags = BC_BUSY; /* silly & dubious */
702 1.2 simonb bp->b_dev = devvp->v_rdev;
703 1.2 simonb bp->b_data = data;
704 1.2 simonb bp->b_bufsize = bp->b_resid = bp->b_bcount = len;
705 1.2 simonb bp->b_blkno = pbn;
706 1.2 simonb
707 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_IO,
708 1.2 simonb ("wapbl_doio: %s %d bytes at block %"PRId64" on dev 0x%x\n",
709 1.2 simonb BUF_ISWRITE(bp) ? "write" : "read", bp->b_bcount,
710 1.2 simonb bp->b_blkno, bp->b_dev));
711 1.2 simonb
712 1.2 simonb VOP_STRATEGY(devvp, bp);
713 1.2 simonb
714 1.2 simonb error = biowait(bp);
715 1.2 simonb putiobuf(bp);
716 1.2 simonb
717 1.2 simonb if (error) {
718 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_ERROR,
719 1.2 simonb ("wapbl_doio: %s %zu bytes at block %" PRId64
720 1.2 simonb " on dev 0x%x failed with error %d\n",
721 1.2 simonb (((flags & (B_WRITE | B_READ)) == B_WRITE) ?
722 1.2 simonb "write" : "read"),
723 1.2 simonb len, pbn, devvp->v_rdev, error));
724 1.2 simonb }
725 1.2 simonb
726 1.2 simonb return error;
727 1.2 simonb }
728 1.2 simonb
729 1.2 simonb int
730 1.2 simonb wapbl_write(void *data, size_t len, struct vnode *devvp, daddr_t pbn)
731 1.2 simonb {
732 1.2 simonb
733 1.2 simonb return wapbl_doio(data, len, devvp, pbn, B_WRITE);
734 1.2 simonb }
735 1.2 simonb
736 1.2 simonb int
737 1.2 simonb wapbl_read(void *data, size_t len, struct vnode *devvp, daddr_t pbn)
738 1.2 simonb {
739 1.2 simonb
740 1.2 simonb return wapbl_doio(data, len, devvp, pbn, B_READ);
741 1.2 simonb }
742 1.2 simonb
743 1.2 simonb /*
744 1.2 simonb * Off is byte offset returns new offset for next write
745 1.2 simonb * handles log wraparound
746 1.2 simonb */
747 1.2 simonb static int
748 1.2 simonb wapbl_circ_write(struct wapbl *wl, void *data, size_t len, off_t *offp)
749 1.2 simonb {
750 1.2 simonb size_t slen;
751 1.2 simonb off_t off = *offp;
752 1.2 simonb int error;
753 1.2 simonb
754 1.2 simonb KDASSERT(((len >> wl->wl_log_dev_bshift) <<
755 1.2 simonb wl->wl_log_dev_bshift) == len);
756 1.2 simonb
757 1.2 simonb if (off < wl->wl_circ_off)
758 1.2 simonb off = wl->wl_circ_off;
759 1.2 simonb slen = wl->wl_circ_off + wl->wl_circ_size - off;
760 1.2 simonb if (slen < len) {
761 1.2 simonb error = wapbl_write(data, slen, wl->wl_devvp,
762 1.2 simonb wl->wl_logpbn + (off >> wl->wl_log_dev_bshift));
763 1.2 simonb if (error)
764 1.2 simonb return error;
765 1.2 simonb data = (uint8_t *)data + slen;
766 1.2 simonb len -= slen;
767 1.2 simonb off = wl->wl_circ_off;
768 1.2 simonb }
769 1.2 simonb error = wapbl_write(data, len, wl->wl_devvp,
770 1.2 simonb wl->wl_logpbn + (off >> wl->wl_log_dev_bshift));
771 1.2 simonb if (error)
772 1.2 simonb return error;
773 1.2 simonb off += len;
774 1.2 simonb if (off >= wl->wl_circ_off + wl->wl_circ_size)
775 1.2 simonb off = wl->wl_circ_off;
776 1.2 simonb *offp = off;
777 1.2 simonb return 0;
778 1.2 simonb }
779 1.2 simonb
780 1.2 simonb /****************************************************************/
781 1.2 simonb
782 1.2 simonb int
783 1.2 simonb wapbl_begin(struct wapbl *wl, const char *file, int line)
784 1.2 simonb {
785 1.2 simonb int doflush;
786 1.2 simonb unsigned lockcount;
787 1.2 simonb krw_t op;
788 1.2 simonb
789 1.2 simonb KDASSERT(wl);
790 1.2 simonb
791 1.2 simonb /*
792 1.2 simonb * XXX: The original code calls for the use of a RW_READER lock
793 1.2 simonb * here, but it turns out there are performance issues with high
794 1.2 simonb * metadata-rate workloads (e.g. multiple simultaneous tar
795 1.2 simonb * extractions). For now, we force the lock to be RW_WRITER,
796 1.2 simonb * since that currently has the best performance characteristics
797 1.2 simonb * (even for a single tar-file extraction).
798 1.2 simonb *
799 1.2 simonb */
800 1.2 simonb #define WAPBL_DEBUG_SERIALIZE 1
801 1.2 simonb
802 1.2 simonb #ifdef WAPBL_DEBUG_SERIALIZE
803 1.2 simonb op = RW_WRITER;
804 1.2 simonb #else
805 1.2 simonb op = RW_READER;
806 1.2 simonb #endif
807 1.2 simonb
808 1.2 simonb /*
809 1.2 simonb * XXX this needs to be made much more sophisticated.
810 1.2 simonb * perhaps each wapbl_begin could reserve a specified
811 1.2 simonb * number of buffers and bytes.
812 1.2 simonb */
813 1.2 simonb mutex_enter(&wl->wl_mtx);
814 1.2 simonb lockcount = wl->wl_lock_count;
815 1.2 simonb doflush = ((wl->wl_bufbytes + (lockcount * MAXPHYS)) >
816 1.2 simonb wl->wl_bufbytes_max / 2) ||
817 1.2 simonb ((wl->wl_bufcount + (lockcount * 10)) >
818 1.2 simonb wl->wl_bufcount_max / 2) ||
819 1.2 simonb (wapbl_transaction_len(wl) > wl->wl_circ_size / 2);
820 1.2 simonb mutex_exit(&wl->wl_mtx);
821 1.2 simonb
822 1.2 simonb if (doflush) {
823 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
824 1.2 simonb ("force flush lockcnt=%d bufbytes=%zu "
825 1.2 simonb "(max=%zu) bufcount=%zu (max=%zu)\n",
826 1.2 simonb lockcount, wl->wl_bufbytes,
827 1.2 simonb wl->wl_bufbytes_max, wl->wl_bufcount,
828 1.2 simonb wl->wl_bufcount_max));
829 1.2 simonb }
830 1.2 simonb
831 1.2 simonb if (doflush) {
832 1.2 simonb int error = wapbl_flush(wl, 0);
833 1.2 simonb if (error)
834 1.2 simonb return error;
835 1.2 simonb }
836 1.2 simonb
837 1.2 simonb rw_enter(&wl->wl_rwlock, op);
838 1.2 simonb mutex_enter(&wl->wl_mtx);
839 1.2 simonb wl->wl_lock_count++;
840 1.2 simonb mutex_exit(&wl->wl_mtx);
841 1.2 simonb
842 1.2 simonb #if defined(WAPBL_DEBUG_PRINT) && defined(WAPBL_DEBUG_SERIALIZE)
843 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_TRANSACTION,
844 1.2 simonb ("wapbl_begin thread %d.%d with bufcount=%zu "
845 1.2 simonb "bufbytes=%zu bcount=%zu at %s:%d\n",
846 1.2 simonb curproc->p_pid, curlwp->l_lid, wl->wl_bufcount,
847 1.2 simonb wl->wl_bufbytes, wl->wl_bcount, file, line));
848 1.2 simonb #endif
849 1.2 simonb
850 1.2 simonb return 0;
851 1.2 simonb }
852 1.2 simonb
853 1.2 simonb void
854 1.2 simonb wapbl_end(struct wapbl *wl)
855 1.2 simonb {
856 1.2 simonb
857 1.2 simonb #if defined(WAPBL_DEBUG_PRINT) && defined(WAPBL_DEBUG_SERIALIZE)
858 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_TRANSACTION,
859 1.2 simonb ("wapbl_end thread %d.%d with bufcount=%zu "
860 1.2 simonb "bufbytes=%zu bcount=%zu\n",
861 1.2 simonb curproc->p_pid, curlwp->l_lid, wl->wl_bufcount,
862 1.2 simonb wl->wl_bufbytes, wl->wl_bcount));
863 1.2 simonb #endif
864 1.2 simonb
865 1.2 simonb mutex_enter(&wl->wl_mtx);
866 1.2 simonb KASSERT(wl->wl_lock_count > 0);
867 1.2 simonb wl->wl_lock_count--;
868 1.2 simonb mutex_exit(&wl->wl_mtx);
869 1.2 simonb
870 1.2 simonb rw_exit(&wl->wl_rwlock);
871 1.2 simonb }
872 1.2 simonb
873 1.2 simonb void
874 1.2 simonb wapbl_add_buf(struct wapbl *wl, struct buf * bp)
875 1.2 simonb {
876 1.2 simonb
877 1.2 simonb KASSERT(bp->b_cflags & BC_BUSY);
878 1.2 simonb KASSERT(bp->b_vp);
879 1.2 simonb
880 1.2 simonb wapbl_jlock_assert(wl);
881 1.2 simonb
882 1.2 simonb #if 0
883 1.2 simonb /*
884 1.2 simonb * XXX this might be an issue for swapfiles.
885 1.2 simonb * see uvm_swap.c:1702
886 1.2 simonb *
887 1.2 simonb * XXX2 why require it then? leap of semantics?
888 1.2 simonb */
889 1.2 simonb KASSERT((bp->b_cflags & BC_NOCACHE) == 0);
890 1.2 simonb #endif
891 1.2 simonb
892 1.2 simonb mutex_enter(&wl->wl_mtx);
893 1.2 simonb if (bp->b_flags & B_LOCKED) {
894 1.2 simonb LIST_REMOVE(bp, b_wapbllist);
895 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_BUFFER2,
896 1.2 simonb ("wapbl_add_buf thread %d.%d re-adding buf %p "
897 1.2 simonb "with %d bytes %d bcount\n",
898 1.2 simonb curproc->p_pid, curlwp->l_lid, bp, bp->b_bufsize,
899 1.2 simonb bp->b_bcount));
900 1.2 simonb } else {
901 1.2 simonb /* unlocked by dirty buffers shouldn't exist */
902 1.2 simonb KASSERT(!(bp->b_oflags & BO_DELWRI));
903 1.2 simonb wl->wl_bufbytes += bp->b_bufsize;
904 1.2 simonb wl->wl_bcount += bp->b_bcount;
905 1.2 simonb wl->wl_bufcount++;
906 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_BUFFER,
907 1.2 simonb ("wapbl_add_buf thread %d.%d adding buf %p "
908 1.2 simonb "with %d bytes %d bcount\n",
909 1.2 simonb curproc->p_pid, curlwp->l_lid, bp, bp->b_bufsize,
910 1.2 simonb bp->b_bcount));
911 1.2 simonb }
912 1.2 simonb LIST_INSERT_HEAD(&wl->wl_bufs, bp, b_wapbllist);
913 1.2 simonb mutex_exit(&wl->wl_mtx);
914 1.2 simonb
915 1.2 simonb bp->b_flags |= B_LOCKED;
916 1.2 simonb }
917 1.2 simonb
918 1.2 simonb static void
919 1.2 simonb wapbl_remove_buf_locked(struct wapbl * wl, struct buf *bp)
920 1.2 simonb {
921 1.2 simonb
922 1.2 simonb KASSERT(mutex_owned(&wl->wl_mtx));
923 1.2 simonb KASSERT(bp->b_cflags & BC_BUSY);
924 1.2 simonb wapbl_jlock_assert(wl);
925 1.2 simonb
926 1.2 simonb #if 0
927 1.2 simonb /*
928 1.2 simonb * XXX this might be an issue for swapfiles.
929 1.2 simonb * see uvm_swap.c:1725
930 1.2 simonb *
931 1.2 simonb * XXXdeux: see above
932 1.2 simonb */
933 1.2 simonb KASSERT((bp->b_flags & BC_NOCACHE) == 0);
934 1.2 simonb #endif
935 1.2 simonb KASSERT(bp->b_flags & B_LOCKED);
936 1.2 simonb
937 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_BUFFER,
938 1.2 simonb ("wapbl_remove_buf thread %d.%d removing buf %p with "
939 1.2 simonb "%d bytes %d bcount\n",
940 1.2 simonb curproc->p_pid, curlwp->l_lid, bp, bp->b_bufsize, bp->b_bcount));
941 1.2 simonb
942 1.2 simonb KASSERT(wl->wl_bufbytes >= bp->b_bufsize);
943 1.2 simonb wl->wl_bufbytes -= bp->b_bufsize;
944 1.2 simonb KASSERT(wl->wl_bcount >= bp->b_bcount);
945 1.2 simonb wl->wl_bcount -= bp->b_bcount;
946 1.2 simonb KASSERT(wl->wl_bufcount > 0);
947 1.2 simonb wl->wl_bufcount--;
948 1.2 simonb KASSERT((wl->wl_bufcount == 0) == (wl->wl_bufbytes == 0));
949 1.2 simonb KASSERT((wl->wl_bufcount == 0) == (wl->wl_bcount == 0));
950 1.2 simonb LIST_REMOVE(bp, b_wapbllist);
951 1.2 simonb
952 1.2 simonb bp->b_flags &= ~B_LOCKED;
953 1.2 simonb }
954 1.2 simonb
955 1.2 simonb /* called from brelsel() in vfs_bio among other places */
956 1.2 simonb void
957 1.2 simonb wapbl_remove_buf(struct wapbl * wl, struct buf *bp)
958 1.2 simonb {
959 1.2 simonb
960 1.2 simonb mutex_enter(&wl->wl_mtx);
961 1.2 simonb wapbl_remove_buf_locked(wl, bp);
962 1.2 simonb mutex_exit(&wl->wl_mtx);
963 1.2 simonb }
964 1.2 simonb
965 1.2 simonb void
966 1.2 simonb wapbl_resize_buf(struct wapbl *wl, struct buf *bp, long oldsz, long oldcnt)
967 1.2 simonb {
968 1.2 simonb
969 1.2 simonb KASSERT(bp->b_cflags & BC_BUSY);
970 1.2 simonb
971 1.2 simonb /*
972 1.2 simonb * XXX: why does this depend on B_LOCKED? otherwise the buf
973 1.2 simonb * is not for a transaction? if so, why is this called in the
974 1.2 simonb * first place?
975 1.2 simonb */
976 1.2 simonb if (bp->b_flags & B_LOCKED) {
977 1.2 simonb mutex_enter(&wl->wl_mtx);
978 1.2 simonb wl->wl_bufbytes += bp->b_bufsize - oldsz;
979 1.2 simonb wl->wl_bcount += bp->b_bcount - oldcnt;
980 1.2 simonb mutex_exit(&wl->wl_mtx);
981 1.2 simonb }
982 1.2 simonb }
983 1.2 simonb
984 1.2 simonb #endif /* _KERNEL */
985 1.2 simonb
986 1.2 simonb /****************************************************************/
987 1.2 simonb /* Some utility inlines */
988 1.2 simonb
989 1.2 simonb /* This is used to advance the pointer at old to new value at old+delta */
990 1.2 simonb static __inline off_t
991 1.2 simonb wapbl_advance(size_t size, size_t off, off_t old, size_t delta)
992 1.2 simonb {
993 1.2 simonb off_t new;
994 1.2 simonb
995 1.2 simonb /* Define acceptable ranges for inputs. */
996 1.2 simonb KASSERT(delta <= size);
997 1.2 simonb KASSERT((old == 0) || (old >= off));
998 1.2 simonb KASSERT(old < (size + off));
999 1.2 simonb
1000 1.2 simonb if ((old == 0) && (delta != 0))
1001 1.2 simonb new = off + delta;
1002 1.2 simonb else if ((old + delta) < (size + off))
1003 1.2 simonb new = old + delta;
1004 1.2 simonb else
1005 1.2 simonb new = (old + delta) - size;
1006 1.2 simonb
1007 1.2 simonb /* Note some interesting axioms */
1008 1.2 simonb KASSERT((delta != 0) || (new == old));
1009 1.2 simonb KASSERT((delta == 0) || (new != 0));
1010 1.2 simonb KASSERT((delta != (size)) || (new == old));
1011 1.2 simonb
1012 1.2 simonb /* Define acceptable ranges for output. */
1013 1.2 simonb KASSERT((new == 0) || (new >= off));
1014 1.2 simonb KASSERT(new < (size + off));
1015 1.2 simonb return new;
1016 1.2 simonb }
1017 1.2 simonb
1018 1.2 simonb static __inline size_t
1019 1.2 simonb wapbl_space_used(size_t avail, off_t head, off_t tail)
1020 1.2 simonb {
1021 1.2 simonb
1022 1.2 simonb if (tail == 0) {
1023 1.2 simonb KASSERT(head == 0);
1024 1.2 simonb return 0;
1025 1.2 simonb }
1026 1.2 simonb return ((head + (avail - 1) - tail) % avail) + 1;
1027 1.2 simonb }
1028 1.2 simonb
1029 1.2 simonb static __inline size_t
1030 1.2 simonb wapbl_space_free(size_t avail, off_t head, off_t tail)
1031 1.2 simonb {
1032 1.2 simonb
1033 1.2 simonb return avail - wapbl_space_used(avail, head, tail);
1034 1.2 simonb }
1035 1.2 simonb
1036 1.2 simonb static __inline void
1037 1.2 simonb wapbl_advance_head(size_t size, size_t off, size_t delta, off_t *headp,
1038 1.2 simonb off_t *tailp)
1039 1.2 simonb {
1040 1.2 simonb off_t head = *headp;
1041 1.2 simonb off_t tail = *tailp;
1042 1.2 simonb
1043 1.2 simonb KASSERT(delta <= wapbl_space_free(size, head, tail));
1044 1.2 simonb head = wapbl_advance(size, off, head, delta);
1045 1.2 simonb if ((tail == 0) && (head != 0))
1046 1.2 simonb tail = off;
1047 1.2 simonb *headp = head;
1048 1.2 simonb *tailp = tail;
1049 1.2 simonb }
1050 1.2 simonb
1051 1.2 simonb static __inline void
1052 1.2 simonb wapbl_advance_tail(size_t size, size_t off, size_t delta, off_t *headp,
1053 1.2 simonb off_t *tailp)
1054 1.2 simonb {
1055 1.2 simonb off_t head = *headp;
1056 1.2 simonb off_t tail = *tailp;
1057 1.2 simonb
1058 1.2 simonb KASSERT(delta <= wapbl_space_used(size, head, tail));
1059 1.2 simonb tail = wapbl_advance(size, off, tail, delta);
1060 1.2 simonb if (head == tail) {
1061 1.2 simonb head = tail = 0;
1062 1.2 simonb }
1063 1.2 simonb *headp = head;
1064 1.2 simonb *tailp = tail;
1065 1.2 simonb }
1066 1.2 simonb
1067 1.2 simonb #ifdef _KERNEL
1068 1.2 simonb
1069 1.2 simonb /****************************************************************/
1070 1.2 simonb
1071 1.2 simonb /*
1072 1.2 simonb * Remove transactions whose buffers are completely flushed to disk.
1073 1.2 simonb * Will block until at least minfree space is available.
1074 1.2 simonb * only intended to be called from inside wapbl_flush and therefore
1075 1.2 simonb * does not protect against commit races with itself or with flush.
1076 1.2 simonb */
1077 1.2 simonb static int
1078 1.2 simonb wapbl_truncate(struct wapbl *wl, size_t minfree, int waitonly)
1079 1.2 simonb {
1080 1.2 simonb size_t delta;
1081 1.2 simonb size_t avail;
1082 1.2 simonb off_t head;
1083 1.2 simonb off_t tail;
1084 1.2 simonb int error = 0;
1085 1.2 simonb
1086 1.2 simonb KASSERT(minfree <= (wl->wl_circ_size - wl->wl_reserved_bytes));
1087 1.2 simonb KASSERT(rw_write_held(&wl->wl_rwlock));
1088 1.2 simonb
1089 1.2 simonb mutex_enter(&wl->wl_mtx);
1090 1.2 simonb
1091 1.2 simonb /*
1092 1.2 simonb * First check to see if we have to do a commit
1093 1.2 simonb * at all.
1094 1.2 simonb */
1095 1.2 simonb avail = wapbl_space_free(wl->wl_circ_size, wl->wl_head, wl->wl_tail);
1096 1.2 simonb if (minfree < avail) {
1097 1.2 simonb mutex_exit(&wl->wl_mtx);
1098 1.2 simonb return 0;
1099 1.2 simonb }
1100 1.2 simonb minfree -= avail;
1101 1.2 simonb while ((wl->wl_error_count == 0) &&
1102 1.2 simonb (wl->wl_reclaimable_bytes < minfree)) {
1103 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_TRUNCATE,
1104 1.2 simonb ("wapbl_truncate: sleeping on %p wl=%p bytes=%zd "
1105 1.2 simonb "minfree=%zd\n",
1106 1.2 simonb &wl->wl_reclaimable_bytes, wl, wl->wl_reclaimable_bytes,
1107 1.2 simonb minfree));
1108 1.2 simonb
1109 1.2 simonb cv_wait(&wl->wl_reclaimable_cv, &wl->wl_mtx);
1110 1.2 simonb }
1111 1.2 simonb if (wl->wl_reclaimable_bytes < minfree) {
1112 1.2 simonb KASSERT(wl->wl_error_count);
1113 1.2 simonb /* XXX maybe get actual error from buffer instead someday? */
1114 1.2 simonb error = EIO;
1115 1.2 simonb }
1116 1.2 simonb head = wl->wl_head;
1117 1.2 simonb tail = wl->wl_tail;
1118 1.2 simonb delta = wl->wl_reclaimable_bytes;
1119 1.2 simonb
1120 1.2 simonb /* If all of of the entries are flushed, then be sure to keep
1121 1.2 simonb * the reserved bytes reserved. Watch out for discarded transactions,
1122 1.2 simonb * which could leave more bytes reserved than are reclaimable.
1123 1.2 simonb */
1124 1.2 simonb if (SIMPLEQ_EMPTY(&wl->wl_entries) &&
1125 1.2 simonb (delta >= wl->wl_reserved_bytes)) {
1126 1.2 simonb delta -= wl->wl_reserved_bytes;
1127 1.2 simonb }
1128 1.2 simonb wapbl_advance_tail(wl->wl_circ_size, wl->wl_circ_off, delta, &head,
1129 1.2 simonb &tail);
1130 1.2 simonb KDASSERT(wl->wl_reserved_bytes <=
1131 1.2 simonb wapbl_space_used(wl->wl_circ_size, head, tail));
1132 1.2 simonb mutex_exit(&wl->wl_mtx);
1133 1.2 simonb
1134 1.2 simonb if (error)
1135 1.2 simonb return error;
1136 1.2 simonb
1137 1.2 simonb if (waitonly)
1138 1.2 simonb return 0;
1139 1.2 simonb
1140 1.2 simonb /*
1141 1.2 simonb * This is where head, tail and delta are unprotected
1142 1.2 simonb * from races against itself or flush. This is ok since
1143 1.2 simonb * we only call this routine from inside flush itself.
1144 1.2 simonb *
1145 1.2 simonb * XXX: how can it race against itself when accessed only
1146 1.2 simonb * from behind the write-locked rwlock?
1147 1.2 simonb */
1148 1.2 simonb error = wapbl_write_commit(wl, head, tail);
1149 1.2 simonb if (error)
1150 1.2 simonb return error;
1151 1.2 simonb
1152 1.2 simonb wl->wl_head = head;
1153 1.2 simonb wl->wl_tail = tail;
1154 1.2 simonb
1155 1.2 simonb mutex_enter(&wl->wl_mtx);
1156 1.2 simonb KASSERT(wl->wl_reclaimable_bytes >= delta);
1157 1.2 simonb wl->wl_reclaimable_bytes -= delta;
1158 1.2 simonb mutex_exit(&wl->wl_mtx);
1159 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_TRUNCATE,
1160 1.2 simonb ("wapbl_truncate thread %d.%d truncating %zu bytes\n",
1161 1.2 simonb curproc->p_pid, curlwp->l_lid, delta));
1162 1.2 simonb
1163 1.2 simonb return 0;
1164 1.2 simonb }
1165 1.2 simonb
1166 1.2 simonb /****************************************************************/
1167 1.2 simonb
1168 1.2 simonb void
1169 1.2 simonb wapbl_biodone(struct buf *bp)
1170 1.2 simonb {
1171 1.2 simonb struct wapbl_entry *we = bp->b_private;
1172 1.2 simonb struct wapbl *wl = we->we_wapbl;
1173 1.2 simonb
1174 1.2 simonb /*
1175 1.2 simonb * Handle possible flushing of buffers after log has been
1176 1.2 simonb * decomissioned.
1177 1.2 simonb */
1178 1.2 simonb if (!wl) {
1179 1.2 simonb KASSERT(we->we_bufcount > 0);
1180 1.2 simonb we->we_bufcount--;
1181 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1182 1.2 simonb KASSERT(we->we_unsynced_bufbytes >= bp->b_bufsize);
1183 1.2 simonb we->we_unsynced_bufbytes -= bp->b_bufsize;
1184 1.2 simonb #endif
1185 1.2 simonb
1186 1.2 simonb if (we->we_bufcount == 0) {
1187 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1188 1.2 simonb KASSERT(we->we_unsynced_bufbytes == 0);
1189 1.2 simonb #endif
1190 1.2 simonb wapbl_free(we);
1191 1.2 simonb }
1192 1.2 simonb
1193 1.2 simonb brelse(bp, 0);
1194 1.2 simonb return;
1195 1.2 simonb }
1196 1.2 simonb
1197 1.2 simonb #ifdef ohbother
1198 1.2 simonb KDASSERT(bp->b_flags & B_DONE);
1199 1.2 simonb KDASSERT(!(bp->b_flags & B_DELWRI));
1200 1.2 simonb KDASSERT(bp->b_flags & B_ASYNC);
1201 1.2 simonb KDASSERT(bp->b_flags & B_BUSY);
1202 1.2 simonb KDASSERT(!(bp->b_flags & B_LOCKED));
1203 1.2 simonb KDASSERT(!(bp->b_flags & B_READ));
1204 1.2 simonb KDASSERT(!(bp->b_flags & B_INVAL));
1205 1.2 simonb KDASSERT(!(bp->b_flags & B_NOCACHE));
1206 1.2 simonb #endif
1207 1.2 simonb
1208 1.2 simonb if (bp->b_error) {
1209 1.2 simonb #ifdef notyet /* Can't currently handle possible dirty buffer reuse */
1210 1.2 simonb XXXpooka: interfaces not fully updated
1211 1.2 simonb Note: this was not enabled in the original patch
1212 1.2 simonb against netbsd4 either. I don't know if comment
1213 1.2 simonb above is true or not.
1214 1.2 simonb
1215 1.2 simonb /*
1216 1.2 simonb * If an error occurs, report the error and leave the
1217 1.2 simonb * buffer as a delayed write on the LRU queue.
1218 1.2 simonb * restarting the write would likely result in
1219 1.2 simonb * an error spinloop, so let it be done harmlessly
1220 1.2 simonb * by the syncer.
1221 1.2 simonb */
1222 1.2 simonb bp->b_flags &= ~(B_DONE);
1223 1.2 simonb simple_unlock(&bp->b_interlock);
1224 1.2 simonb
1225 1.2 simonb if (we->we_error == 0) {
1226 1.2 simonb mutex_enter(&wl->wl_mtx);
1227 1.2 simonb wl->wl_error_count++;
1228 1.2 simonb mutex_exit(&wl->wl_mtx);
1229 1.2 simonb cv_broadcast(&wl->wl_reclaimable_cv);
1230 1.2 simonb }
1231 1.2 simonb we->we_error = bp->b_error;
1232 1.2 simonb bp->b_error = 0;
1233 1.2 simonb brelse(bp);
1234 1.2 simonb return;
1235 1.2 simonb #else
1236 1.2 simonb /* For now, just mark the log permanently errored out */
1237 1.2 simonb
1238 1.2 simonb mutex_enter(&wl->wl_mtx);
1239 1.2 simonb if (wl->wl_error_count == 0) {
1240 1.2 simonb wl->wl_error_count++;
1241 1.2 simonb cv_broadcast(&wl->wl_reclaimable_cv);
1242 1.2 simonb }
1243 1.2 simonb mutex_exit(&wl->wl_mtx);
1244 1.2 simonb #endif
1245 1.2 simonb }
1246 1.2 simonb
1247 1.2 simonb mutex_enter(&wl->wl_mtx);
1248 1.2 simonb
1249 1.2 simonb KASSERT(we->we_bufcount > 0);
1250 1.2 simonb we->we_bufcount--;
1251 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1252 1.2 simonb KASSERT(we->we_unsynced_bufbytes >= bp->b_bufsize);
1253 1.2 simonb we->we_unsynced_bufbytes -= bp->b_bufsize;
1254 1.2 simonb KASSERT(wl->wl_unsynced_bufbytes >= bp->b_bufsize);
1255 1.2 simonb wl->wl_unsynced_bufbytes -= bp->b_bufsize;
1256 1.2 simonb #endif
1257 1.2 simonb
1258 1.2 simonb /*
1259 1.2 simonb * If the current transaction can be reclaimed, start
1260 1.2 simonb * at the beginning and reclaim any consecutive reclaimable
1261 1.2 simonb * transactions. If we successfully reclaim anything,
1262 1.2 simonb * then wakeup anyone waiting for the reclaim.
1263 1.2 simonb */
1264 1.2 simonb if (we->we_bufcount == 0) {
1265 1.2 simonb size_t delta = 0;
1266 1.2 simonb int errcnt = 0;
1267 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1268 1.2 simonb KDASSERT(we->we_unsynced_bufbytes == 0);
1269 1.2 simonb #endif
1270 1.2 simonb /*
1271 1.2 simonb * clear any posted error, since the buffer it came from
1272 1.2 simonb * has successfully flushed by now
1273 1.2 simonb */
1274 1.2 simonb while ((we = SIMPLEQ_FIRST(&wl->wl_entries)) &&
1275 1.2 simonb (we->we_bufcount == 0)) {
1276 1.2 simonb delta += we->we_reclaimable_bytes;
1277 1.2 simonb if (we->we_error)
1278 1.2 simonb errcnt++;
1279 1.2 simonb SIMPLEQ_REMOVE_HEAD(&wl->wl_entries, we_entries);
1280 1.2 simonb wapbl_free(we);
1281 1.2 simonb }
1282 1.2 simonb
1283 1.2 simonb if (delta) {
1284 1.2 simonb wl->wl_reclaimable_bytes += delta;
1285 1.2 simonb KASSERT(wl->wl_error_count >= errcnt);
1286 1.2 simonb wl->wl_error_count -= errcnt;
1287 1.2 simonb cv_broadcast(&wl->wl_reclaimable_cv);
1288 1.2 simonb }
1289 1.2 simonb }
1290 1.2 simonb
1291 1.2 simonb mutex_exit(&wl->wl_mtx);
1292 1.2 simonb brelse(bp, 0);
1293 1.2 simonb }
1294 1.2 simonb
1295 1.2 simonb /*
1296 1.2 simonb * Write transactions to disk + start I/O for contents
1297 1.2 simonb */
1298 1.2 simonb int
1299 1.2 simonb wapbl_flush(struct wapbl *wl, int waitfor)
1300 1.2 simonb {
1301 1.2 simonb struct buf *bp;
1302 1.2 simonb struct wapbl_entry *we;
1303 1.2 simonb off_t off;
1304 1.2 simonb off_t head;
1305 1.2 simonb off_t tail;
1306 1.2 simonb size_t delta = 0;
1307 1.2 simonb size_t flushsize;
1308 1.2 simonb size_t reserved;
1309 1.2 simonb int error = 0;
1310 1.2 simonb
1311 1.2 simonb /*
1312 1.2 simonb * Do a quick check to see if a full flush can be skipped
1313 1.2 simonb * This assumes that the flush callback does not need to be called
1314 1.2 simonb * unless there are other outstanding bufs.
1315 1.2 simonb */
1316 1.2 simonb if (!waitfor) {
1317 1.2 simonb size_t nbufs;
1318 1.2 simonb mutex_enter(&wl->wl_mtx); /* XXX need mutex here to
1319 1.2 simonb protect the KASSERTS */
1320 1.2 simonb nbufs = wl->wl_bufcount;
1321 1.2 simonb KASSERT((wl->wl_bufcount == 0) == (wl->wl_bufbytes == 0));
1322 1.2 simonb KASSERT((wl->wl_bufcount == 0) == (wl->wl_bcount == 0));
1323 1.2 simonb mutex_exit(&wl->wl_mtx);
1324 1.2 simonb if (nbufs == 0)
1325 1.2 simonb return 0;
1326 1.2 simonb }
1327 1.2 simonb
1328 1.2 simonb /*
1329 1.2 simonb * XXX we may consider using LK_UPGRADE here
1330 1.2 simonb * if we want to call flush from inside a transaction
1331 1.2 simonb */
1332 1.2 simonb rw_enter(&wl->wl_rwlock, RW_WRITER);
1333 1.2 simonb wl->wl_flush(wl->wl_mount, wl->wl_deallocblks, wl->wl_dealloclens,
1334 1.2 simonb wl->wl_dealloccnt);
1335 1.2 simonb
1336 1.2 simonb /*
1337 1.2 simonb * Now that we are fully locked and flushed,
1338 1.2 simonb * do another check for nothing to do.
1339 1.2 simonb */
1340 1.2 simonb if (wl->wl_bufcount == 0) {
1341 1.2 simonb goto out;
1342 1.2 simonb }
1343 1.2 simonb
1344 1.2 simonb #if 0
1345 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
1346 1.2 simonb ("wapbl_flush thread %d.%d flushing entries with "
1347 1.2 simonb "bufcount=%zu bufbytes=%zu\n",
1348 1.2 simonb curproc->p_pid, curlwp->l_lid, wl->wl_bufcount,
1349 1.2 simonb wl->wl_bufbytes));
1350 1.2 simonb #endif
1351 1.2 simonb
1352 1.2 simonb /* Calculate amount of space needed to flush */
1353 1.2 simonb flushsize = wapbl_transaction_len(wl);
1354 1.2 simonb
1355 1.2 simonb if (flushsize > (wl->wl_circ_size - wl->wl_reserved_bytes)) {
1356 1.2 simonb /*
1357 1.2 simonb * XXX this could be handled more gracefully, perhaps place
1358 1.2 simonb * only a partial transaction in the log and allow the
1359 1.2 simonb * remaining to flush without the protection of the journal.
1360 1.2 simonb */
1361 1.2 simonb panic("wapbl_flush: current transaction too big to flush\n");
1362 1.2 simonb }
1363 1.2 simonb
1364 1.2 simonb error = wapbl_truncate(wl, flushsize, 0);
1365 1.2 simonb if (error)
1366 1.2 simonb goto out2;
1367 1.2 simonb
1368 1.2 simonb off = wl->wl_head;
1369 1.2 simonb KASSERT((off == 0) || ((off >= wl->wl_circ_off) &&
1370 1.2 simonb (off < wl->wl_circ_off + wl->wl_circ_size)));
1371 1.2 simonb error = wapbl_write_blocks(wl, &off);
1372 1.2 simonb if (error)
1373 1.2 simonb goto out2;
1374 1.2 simonb error = wapbl_write_revocations(wl, &off);
1375 1.2 simonb if (error)
1376 1.2 simonb goto out2;
1377 1.2 simonb error = wapbl_write_inodes(wl, &off);
1378 1.2 simonb if (error)
1379 1.2 simonb goto out2;
1380 1.2 simonb
1381 1.2 simonb reserved = 0;
1382 1.2 simonb if (wl->wl_inohashcnt)
1383 1.2 simonb reserved = wapbl_transaction_inodes_len(wl);
1384 1.2 simonb
1385 1.2 simonb head = wl->wl_head;
1386 1.2 simonb tail = wl->wl_tail;
1387 1.2 simonb
1388 1.2 simonb wapbl_advance_head(wl->wl_circ_size, wl->wl_circ_off, flushsize,
1389 1.2 simonb &head, &tail);
1390 1.2 simonb #ifdef WAPBL_DEBUG
1391 1.2 simonb if (head != off) {
1392 1.2 simonb panic("lost head! head=%"PRIdMAX" tail=%" PRIdMAX
1393 1.2 simonb " off=%"PRIdMAX" flush=%zu\n",
1394 1.2 simonb (intmax_t)head, (intmax_t)tail, (intmax_t)off,
1395 1.2 simonb flushsize);
1396 1.2 simonb }
1397 1.2 simonb #else
1398 1.2 simonb KASSERT(head == off);
1399 1.2 simonb #endif
1400 1.2 simonb
1401 1.2 simonb /* Opportunistically move the tail forward if we can */
1402 1.2 simonb if (!wapbl_lazy_truncate) {
1403 1.2 simonb mutex_enter(&wl->wl_mtx);
1404 1.2 simonb delta = wl->wl_reclaimable_bytes;
1405 1.2 simonb mutex_exit(&wl->wl_mtx);
1406 1.2 simonb wapbl_advance_tail(wl->wl_circ_size, wl->wl_circ_off, delta,
1407 1.2 simonb &head, &tail);
1408 1.2 simonb }
1409 1.2 simonb
1410 1.2 simonb error = wapbl_write_commit(wl, head, tail);
1411 1.2 simonb if (error)
1412 1.2 simonb goto out2;
1413 1.2 simonb
1414 1.2 simonb /* poolme? or kmemme? */
1415 1.2 simonb we = wapbl_calloc(1, sizeof(*we));
1416 1.2 simonb
1417 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1418 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
1419 1.2 simonb ("wapbl_flush: thread %d.%d head+=%zu tail+=%zu used=%zu"
1420 1.2 simonb " unsynced=%zu"
1421 1.2 simonb "\n\tbufcount=%zu bufbytes=%zu bcount=%zu deallocs=%d "
1422 1.2 simonb "inodes=%d\n",
1423 1.2 simonb curproc->p_pid, curlwp->l_lid, flushsize, delta,
1424 1.2 simonb wapbl_space_used(wl->wl_circ_size, head, tail),
1425 1.2 simonb wl->wl_unsynced_bufbytes, wl->wl_bufcount,
1426 1.2 simonb wl->wl_bufbytes, wl->wl_bcount, wl->wl_dealloccnt,
1427 1.2 simonb wl->wl_inohashcnt));
1428 1.2 simonb #else
1429 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
1430 1.2 simonb ("wapbl_flush: thread %d.%d head+=%zu tail+=%zu used=%zu"
1431 1.2 simonb "\n\tbufcount=%zu bufbytes=%zu bcount=%zu deallocs=%d "
1432 1.2 simonb "inodes=%d\n",
1433 1.2 simonb curproc->p_pid, curlwp->l_lid, flushsize, delta,
1434 1.2 simonb wapbl_space_used(wl->wl_circ_size, head, tail),
1435 1.2 simonb wl->wl_bufcount, wl->wl_bufbytes, wl->wl_bcount,
1436 1.2 simonb wl->wl_dealloccnt, wl->wl_inohashcnt));
1437 1.2 simonb #endif
1438 1.2 simonb
1439 1.2 simonb
1440 1.2 simonb mutex_enter(&bufcache_lock);
1441 1.2 simonb mutex_enter(&wl->wl_mtx);
1442 1.2 simonb
1443 1.2 simonb wl->wl_reserved_bytes = reserved;
1444 1.2 simonb wl->wl_head = head;
1445 1.2 simonb wl->wl_tail = tail;
1446 1.2 simonb KASSERT(wl->wl_reclaimable_bytes >= delta);
1447 1.2 simonb wl->wl_reclaimable_bytes -= delta;
1448 1.2 simonb wl->wl_dealloccnt = 0;
1449 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1450 1.2 simonb wl->wl_unsynced_bufbytes += wl->wl_bufbytes;
1451 1.2 simonb #endif
1452 1.2 simonb
1453 1.2 simonb we->we_wapbl = wl;
1454 1.2 simonb we->we_bufcount = wl->wl_bufcount;
1455 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1456 1.2 simonb we->we_unsynced_bufbytes = wl->wl_bufbytes;
1457 1.2 simonb #endif
1458 1.2 simonb we->we_reclaimable_bytes = flushsize;
1459 1.2 simonb we->we_error = 0;
1460 1.2 simonb SIMPLEQ_INSERT_TAIL(&wl->wl_entries, we, we_entries);
1461 1.2 simonb
1462 1.2 simonb /*
1463 1.2 simonb * this flushes bufs in reverse order than they were queued
1464 1.2 simonb * it shouldn't matter, but if we care we could use TAILQ instead.
1465 1.2 simonb * XXX Note they will get put on the lru queue when they flush
1466 1.2 simonb * so we might actually want to change this to preserve order.
1467 1.2 simonb */
1468 1.2 simonb while ((bp = LIST_FIRST(&wl->wl_bufs)) != NULL) {
1469 1.2 simonb if (bbusy(bp, 0, 0, &wl->wl_mtx)) {
1470 1.2 simonb continue;
1471 1.2 simonb }
1472 1.2 simonb bp->b_iodone = wapbl_biodone;
1473 1.2 simonb bp->b_private = we;
1474 1.2 simonb bremfree(bp);
1475 1.2 simonb wapbl_remove_buf_locked(wl, bp);
1476 1.2 simonb mutex_exit(&wl->wl_mtx);
1477 1.2 simonb mutex_exit(&bufcache_lock);
1478 1.2 simonb bawrite(bp);
1479 1.2 simonb mutex_enter(&bufcache_lock);
1480 1.2 simonb mutex_enter(&wl->wl_mtx);
1481 1.2 simonb }
1482 1.2 simonb mutex_exit(&wl->wl_mtx);
1483 1.2 simonb mutex_exit(&bufcache_lock);
1484 1.2 simonb
1485 1.2 simonb #if 0
1486 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_FLUSH,
1487 1.2 simonb ("wapbl_flush thread %d.%d done flushing entries...\n",
1488 1.2 simonb curproc->p_pid, curlwp->l_lid));
1489 1.2 simonb #endif
1490 1.2 simonb
1491 1.2 simonb out:
1492 1.2 simonb
1493 1.2 simonb /*
1494 1.2 simonb * If the waitfor flag is set, don't return until everything is
1495 1.2 simonb * fully flushed and the on disk log is empty.
1496 1.2 simonb */
1497 1.2 simonb if (waitfor) {
1498 1.2 simonb error = wapbl_truncate(wl, wl->wl_circ_size -
1499 1.2 simonb wl->wl_reserved_bytes, wapbl_lazy_truncate);
1500 1.2 simonb }
1501 1.2 simonb
1502 1.2 simonb out2:
1503 1.2 simonb if (error) {
1504 1.2 simonb wl->wl_flush_abort(wl->wl_mount, wl->wl_deallocblks,
1505 1.2 simonb wl->wl_dealloclens, wl->wl_dealloccnt);
1506 1.2 simonb }
1507 1.2 simonb
1508 1.2 simonb #ifdef WAPBL_DEBUG_PRINT
1509 1.2 simonb if (error) {
1510 1.2 simonb pid_t pid = -1;
1511 1.2 simonb lwpid_t lid = -1;
1512 1.2 simonb if (curproc)
1513 1.2 simonb pid = curproc->p_pid;
1514 1.2 simonb if (curlwp)
1515 1.2 simonb lid = curlwp->l_lid;
1516 1.2 simonb mutex_enter(&wl->wl_mtx);
1517 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1518 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_ERROR,
1519 1.2 simonb ("wapbl_flush: thread %d.%d aborted flush: "
1520 1.2 simonb "error = %d\n"
1521 1.2 simonb "\tbufcount=%zu bufbytes=%zu bcount=%zu "
1522 1.2 simonb "deallocs=%d inodes=%d\n"
1523 1.2 simonb "\terrcnt = %d, reclaimable=%zu reserved=%zu "
1524 1.2 simonb "unsynced=%zu\n",
1525 1.2 simonb pid, lid, error, wl->wl_bufcount,
1526 1.2 simonb wl->wl_bufbytes, wl->wl_bcount,
1527 1.2 simonb wl->wl_dealloccnt, wl->wl_inohashcnt,
1528 1.2 simonb wl->wl_error_count, wl->wl_reclaimable_bytes,
1529 1.2 simonb wl->wl_reserved_bytes, wl->wl_unsynced_bufbytes));
1530 1.2 simonb SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
1531 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_ERROR,
1532 1.2 simonb ("\tentry: bufcount = %zu, reclaimable = %zu, "
1533 1.2 simonb "error = %d, unsynced = %zu\n",
1534 1.2 simonb we->we_bufcount, we->we_reclaimable_bytes,
1535 1.2 simonb we->we_error, we->we_unsynced_bufbytes));
1536 1.2 simonb }
1537 1.2 simonb #else
1538 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_ERROR,
1539 1.2 simonb ("wapbl_flush: thread %d.%d aborted flush: "
1540 1.2 simonb "error = %d\n"
1541 1.2 simonb "\tbufcount=%zu bufbytes=%zu bcount=%zu "
1542 1.2 simonb "deallocs=%d inodes=%d\n"
1543 1.2 simonb "\terrcnt = %d, reclaimable=%zu reserved=%zu\n",
1544 1.2 simonb pid, lid, error, wl->wl_bufcount,
1545 1.2 simonb wl->wl_bufbytes, wl->wl_bcount,
1546 1.2 simonb wl->wl_dealloccnt, wl->wl_inohashcnt,
1547 1.2 simonb wl->wl_error_count, wl->wl_reclaimable_bytes,
1548 1.2 simonb wl->wl_reserved_bytes));
1549 1.2 simonb SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
1550 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_ERROR,
1551 1.2 simonb ("\tentry: bufcount = %zu, reclaimable = %zu, "
1552 1.2 simonb "error = %d\n", we->we_bufcount,
1553 1.2 simonb we->we_reclaimable_bytes, we->we_error));
1554 1.2 simonb }
1555 1.2 simonb #endif
1556 1.2 simonb mutex_exit(&wl->wl_mtx);
1557 1.2 simonb }
1558 1.2 simonb #endif
1559 1.2 simonb
1560 1.2 simonb rw_exit(&wl->wl_rwlock);
1561 1.2 simonb return error;
1562 1.2 simonb }
1563 1.2 simonb
1564 1.2 simonb /****************************************************************/
1565 1.2 simonb
1566 1.2 simonb void
1567 1.2 simonb wapbl_jlock_assert(struct wapbl *wl)
1568 1.2 simonb {
1569 1.2 simonb
1570 1.2 simonb #ifdef WAPBL_DEBUG_SERIALIZE
1571 1.2 simonb KASSERT(rw_write_held(&wl->wl_rwlock));
1572 1.2 simonb #else
1573 1.2 simonb KASSERT(rw_read_held(&wl->wl_rwlock) || rw_write_held(&wl->wl_rwlock));
1574 1.2 simonb #endif
1575 1.2 simonb }
1576 1.2 simonb
1577 1.2 simonb void
1578 1.2 simonb wapbl_junlock_assert(struct wapbl *wl)
1579 1.2 simonb {
1580 1.2 simonb
1581 1.2 simonb #ifdef WAPBL_DEBUG_SERIALIZE
1582 1.2 simonb KASSERT(!rw_write_held(&wl->wl_rwlock));
1583 1.2 simonb #endif
1584 1.2 simonb }
1585 1.2 simonb
1586 1.2 simonb /****************************************************************/
1587 1.2 simonb
1588 1.2 simonb /* locks missing */
1589 1.2 simonb void
1590 1.2 simonb wapbl_print(struct wapbl *wl,
1591 1.2 simonb int full,
1592 1.2 simonb void (*pr)(const char *, ...))
1593 1.2 simonb {
1594 1.2 simonb struct buf *bp;
1595 1.2 simonb struct wapbl_entry *we;
1596 1.2 simonb (*pr)("wapbl %p", wl);
1597 1.2 simonb (*pr)("\nlogvp = %p, devvp = %p, logpbn = %"PRId64"\n",
1598 1.2 simonb wl->wl_logvp, wl->wl_devvp, wl->wl_logpbn);
1599 1.2 simonb (*pr)("circ = %zu, header = %zu, head = %"PRIdMAX" tail = %"PRIdMAX"\n",
1600 1.2 simonb wl->wl_circ_size, wl->wl_circ_off,
1601 1.2 simonb (intmax_t)wl->wl_head, (intmax_t)wl->wl_tail);
1602 1.2 simonb (*pr)("fs_dev_bshift = %d, log_dev_bshift = %d\n",
1603 1.2 simonb wl->wl_log_dev_bshift, wl->wl_fs_dev_bshift);
1604 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1605 1.2 simonb (*pr)("bufcount = %zu, bufbytes = %zu bcount = %zu reclaimable = %zu "
1606 1.2 simonb "reserved = %zu errcnt = %d unsynced = %zu\n",
1607 1.2 simonb wl->wl_bufcount, wl->wl_bufbytes, wl->wl_bcount,
1608 1.2 simonb wl->wl_reclaimable_bytes, wl->wl_reserved_bytes,
1609 1.2 simonb wl->wl_error_count, wl->wl_unsynced_bufbytes);
1610 1.2 simonb #else
1611 1.2 simonb (*pr)("bufcount = %zu, bufbytes = %zu bcount = %zu reclaimable = %zu "
1612 1.2 simonb "reserved = %zu errcnt = %d\n", wl->wl_bufcount, wl->wl_bufbytes,
1613 1.2 simonb wl->wl_bcount, wl->wl_reclaimable_bytes, wl->wl_reserved_bytes,
1614 1.2 simonb wl->wl_error_count);
1615 1.2 simonb #endif
1616 1.2 simonb (*pr)("\tdealloccnt = %d, dealloclim = %d\n",
1617 1.2 simonb wl->wl_dealloccnt, wl->wl_dealloclim);
1618 1.2 simonb (*pr)("\tinohashcnt = %d, inohashmask = 0x%08x\n",
1619 1.2 simonb wl->wl_inohashcnt, wl->wl_inohashmask);
1620 1.2 simonb (*pr)("entries:\n");
1621 1.2 simonb SIMPLEQ_FOREACH(we, &wl->wl_entries, we_entries) {
1622 1.2 simonb #ifdef WAPBL_DEBUG_BUFBYTES
1623 1.2 simonb (*pr)("\tbufcount = %zu, reclaimable = %zu, error = %d, "
1624 1.2 simonb "unsynced = %zu\n",
1625 1.2 simonb we->we_bufcount, we->we_reclaimable_bytes,
1626 1.2 simonb we->we_error, we->we_unsynced_bufbytes);
1627 1.2 simonb #else
1628 1.2 simonb (*pr)("\tbufcount = %zu, reclaimable = %zu, error = %d\n",
1629 1.2 simonb we->we_bufcount, we->we_reclaimable_bytes, we->we_error);
1630 1.2 simonb #endif
1631 1.2 simonb }
1632 1.2 simonb if (full) {
1633 1.2 simonb int cnt = 0;
1634 1.2 simonb (*pr)("bufs =");
1635 1.2 simonb LIST_FOREACH(bp, &wl->wl_bufs, b_wapbllist) {
1636 1.2 simonb if (!LIST_NEXT(bp, b_wapbllist)) {
1637 1.2 simonb (*pr)(" %p", bp);
1638 1.2 simonb } else if ((++cnt % 6) == 0) {
1639 1.2 simonb (*pr)(" %p,\n\t", bp);
1640 1.2 simonb } else {
1641 1.2 simonb (*pr)(" %p,", bp);
1642 1.2 simonb }
1643 1.2 simonb }
1644 1.2 simonb (*pr)("\n");
1645 1.2 simonb
1646 1.2 simonb (*pr)("dealloced blks = ");
1647 1.2 simonb {
1648 1.2 simonb int i;
1649 1.2 simonb cnt = 0;
1650 1.2 simonb for (i = 0; i < wl->wl_dealloccnt; i++) {
1651 1.2 simonb (*pr)(" %"PRId64":%d,",
1652 1.2 simonb wl->wl_deallocblks[i],
1653 1.2 simonb wl->wl_dealloclens[i]);
1654 1.2 simonb if ((++cnt % 4) == 0) {
1655 1.2 simonb (*pr)("\n\t");
1656 1.2 simonb }
1657 1.2 simonb }
1658 1.2 simonb }
1659 1.2 simonb (*pr)("\n");
1660 1.2 simonb
1661 1.2 simonb (*pr)("registered inodes = ");
1662 1.2 simonb {
1663 1.2 simonb int i;
1664 1.2 simonb cnt = 0;
1665 1.2 simonb for (i = 0; i <= wl->wl_inohashmask; i++) {
1666 1.2 simonb struct wapbl_ino_head *wih;
1667 1.2 simonb struct wapbl_ino *wi;
1668 1.2 simonb
1669 1.2 simonb wih = &wl->wl_inohash[i];
1670 1.2 simonb LIST_FOREACH(wi, wih, wi_hash) {
1671 1.2 simonb if (wi->wi_ino == 0)
1672 1.2 simonb continue;
1673 1.2 simonb (*pr)(" %"PRId32"/0%06"PRIo32",",
1674 1.2 simonb wi->wi_ino, wi->wi_mode);
1675 1.2 simonb if ((++cnt % 4) == 0) {
1676 1.2 simonb (*pr)("\n\t");
1677 1.2 simonb }
1678 1.2 simonb }
1679 1.2 simonb }
1680 1.2 simonb (*pr)("\n");
1681 1.2 simonb }
1682 1.2 simonb }
1683 1.2 simonb }
1684 1.2 simonb
1685 1.2 simonb #if defined(WAPBL_DEBUG) || defined(DDB)
1686 1.2 simonb void
1687 1.2 simonb wapbl_dump(struct wapbl *wl)
1688 1.2 simonb {
1689 1.2 simonb #if defined(WAPBL_DEBUG)
1690 1.2 simonb if (!wl)
1691 1.2 simonb wl = wapbl_debug_wl;
1692 1.2 simonb #endif
1693 1.2 simonb if (!wl)
1694 1.2 simonb return;
1695 1.2 simonb wapbl_print(wl, 1, printf);
1696 1.2 simonb }
1697 1.2 simonb #endif
1698 1.2 simonb
1699 1.2 simonb /****************************************************************/
1700 1.2 simonb
1701 1.2 simonb void
1702 1.2 simonb wapbl_register_deallocation(struct wapbl *wl, daddr_t blk, int len)
1703 1.2 simonb {
1704 1.2 simonb
1705 1.2 simonb wapbl_jlock_assert(wl);
1706 1.2 simonb
1707 1.2 simonb /* XXX should eventually instead tie this into resource estimation */
1708 1.2 simonb /* XXX this KASSERT needs locking/mutex analysis */
1709 1.2 simonb KASSERT(wl->wl_dealloccnt < wl->wl_dealloclim);
1710 1.2 simonb wl->wl_deallocblks[wl->wl_dealloccnt] = blk;
1711 1.2 simonb wl->wl_dealloclens[wl->wl_dealloccnt] = len;
1712 1.2 simonb wl->wl_dealloccnt++;
1713 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_ALLOC,
1714 1.2 simonb ("wapbl_register_deallocation: blk=%"PRId64" len=%d\n", blk, len));
1715 1.2 simonb }
1716 1.2 simonb
1717 1.2 simonb /****************************************************************/
1718 1.2 simonb
1719 1.2 simonb static void
1720 1.2 simonb wapbl_inodetrk_init(struct wapbl *wl, u_int size)
1721 1.2 simonb {
1722 1.2 simonb
1723 1.2 simonb wl->wl_inohash = hashinit(size, HASH_LIST, true, &wl->wl_inohashmask);
1724 1.2 simonb if (atomic_inc_uint_nv(&wapbl_ino_pool_refcount) == 1) {
1725 1.2 simonb pool_init(&wapbl_ino_pool, sizeof(struct wapbl_ino), 0, 0, 0,
1726 1.2 simonb "wapblinopl", &pool_allocator_nointr, IPL_NONE);
1727 1.2 simonb }
1728 1.2 simonb }
1729 1.2 simonb
1730 1.2 simonb static void
1731 1.2 simonb wapbl_inodetrk_free(struct wapbl *wl)
1732 1.2 simonb {
1733 1.2 simonb
1734 1.2 simonb /* XXX this KASSERT needs locking/mutex analysis */
1735 1.2 simonb KASSERT(wl->wl_inohashcnt == 0);
1736 1.2 simonb hashdone(wl->wl_inohash, HASH_LIST, wl->wl_inohashmask);
1737 1.2 simonb if (atomic_dec_uint_nv(&wapbl_ino_pool_refcount) == 0) {
1738 1.2 simonb pool_destroy(&wapbl_ino_pool);
1739 1.2 simonb }
1740 1.2 simonb }
1741 1.2 simonb
1742 1.2 simonb static struct wapbl_ino *
1743 1.2 simonb wapbl_inodetrk_get(struct wapbl *wl, ino_t ino)
1744 1.2 simonb {
1745 1.2 simonb struct wapbl_ino_head *wih;
1746 1.2 simonb struct wapbl_ino *wi;
1747 1.2 simonb
1748 1.2 simonb KASSERT(mutex_owned(&wl->wl_mtx));
1749 1.2 simonb
1750 1.2 simonb wih = &wl->wl_inohash[ino & wl->wl_inohashmask];
1751 1.2 simonb LIST_FOREACH(wi, wih, wi_hash) {
1752 1.2 simonb if (ino == wi->wi_ino)
1753 1.2 simonb return wi;
1754 1.2 simonb }
1755 1.2 simonb return 0;
1756 1.2 simonb }
1757 1.2 simonb
1758 1.2 simonb void
1759 1.2 simonb wapbl_register_inode(struct wapbl *wl, ino_t ino, mode_t mode)
1760 1.2 simonb {
1761 1.2 simonb struct wapbl_ino_head *wih;
1762 1.2 simonb struct wapbl_ino *wi;
1763 1.2 simonb
1764 1.2 simonb wi = pool_get(&wapbl_ino_pool, PR_WAITOK);
1765 1.2 simonb
1766 1.2 simonb mutex_enter(&wl->wl_mtx);
1767 1.2 simonb if (wapbl_inodetrk_get(wl, ino) == NULL) {
1768 1.2 simonb wi->wi_ino = ino;
1769 1.2 simonb wi->wi_mode = mode;
1770 1.2 simonb wih = &wl->wl_inohash[ino & wl->wl_inohashmask];
1771 1.2 simonb LIST_INSERT_HEAD(wih, wi, wi_hash);
1772 1.2 simonb wl->wl_inohashcnt++;
1773 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_INODE,
1774 1.2 simonb ("wapbl_register_inode: ino=%"PRId64"\n", ino));
1775 1.2 simonb mutex_exit(&wl->wl_mtx);
1776 1.2 simonb } else {
1777 1.2 simonb mutex_exit(&wl->wl_mtx);
1778 1.2 simonb pool_put(&wapbl_ino_pool, wi);
1779 1.2 simonb }
1780 1.2 simonb }
1781 1.2 simonb
1782 1.2 simonb void
1783 1.2 simonb wapbl_unregister_inode(struct wapbl *wl, ino_t ino, mode_t mode)
1784 1.2 simonb {
1785 1.2 simonb struct wapbl_ino *wi;
1786 1.2 simonb
1787 1.2 simonb mutex_enter(&wl->wl_mtx);
1788 1.2 simonb wi = wapbl_inodetrk_get(wl, ino);
1789 1.2 simonb if (wi) {
1790 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_INODE,
1791 1.2 simonb ("wapbl_unregister_inode: ino=%"PRId64"\n", ino));
1792 1.2 simonb KASSERT(wl->wl_inohashcnt > 0);
1793 1.2 simonb wl->wl_inohashcnt--;
1794 1.2 simonb LIST_REMOVE(wi, wi_hash);
1795 1.2 simonb mutex_exit(&wl->wl_mtx);
1796 1.2 simonb
1797 1.2 simonb pool_put(&wapbl_ino_pool, wi);
1798 1.2 simonb } else {
1799 1.2 simonb mutex_exit(&wl->wl_mtx);
1800 1.2 simonb }
1801 1.2 simonb }
1802 1.2 simonb
1803 1.2 simonb /****************************************************************/
1804 1.2 simonb
1805 1.2 simonb static __inline size_t
1806 1.2 simonb wapbl_transaction_inodes_len(struct wapbl *wl)
1807 1.2 simonb {
1808 1.2 simonb int blocklen = 1<<wl->wl_log_dev_bshift;
1809 1.2 simonb int iph;
1810 1.2 simonb
1811 1.2 simonb /* Calculate number of inodes described in a inodelist header */
1812 1.2 simonb iph = (blocklen - offsetof(struct wapbl_wc_inodelist, wc_inodes)) /
1813 1.2 simonb sizeof(((struct wapbl_wc_inodelist *)0)->wc_inodes[0]);
1814 1.2 simonb
1815 1.2 simonb KASSERT(iph > 0);
1816 1.2 simonb
1817 1.2 simonb return MAX(1, howmany(wl->wl_inohashcnt, iph))*blocklen;
1818 1.2 simonb }
1819 1.2 simonb
1820 1.2 simonb
1821 1.2 simonb /* Calculate amount of space a transaction will take on disk */
1822 1.2 simonb static size_t
1823 1.2 simonb wapbl_transaction_len(struct wapbl *wl)
1824 1.2 simonb {
1825 1.2 simonb int blocklen = 1<<wl->wl_log_dev_bshift;
1826 1.2 simonb size_t len;
1827 1.2 simonb int bph;
1828 1.2 simonb
1829 1.2 simonb /* Calculate number of blocks described in a blocklist header */
1830 1.2 simonb bph = (blocklen - offsetof(struct wapbl_wc_blocklist, wc_blocks)) /
1831 1.2 simonb sizeof(((struct wapbl_wc_blocklist *)0)->wc_blocks[0]);
1832 1.2 simonb
1833 1.2 simonb KASSERT(bph > 0);
1834 1.2 simonb
1835 1.2 simonb len = wl->wl_bcount;
1836 1.2 simonb len += howmany(wl->wl_bufcount, bph)*blocklen;
1837 1.2 simonb len += howmany(wl->wl_dealloccnt, bph)*blocklen;
1838 1.2 simonb len += wapbl_transaction_inodes_len(wl);
1839 1.2 simonb
1840 1.2 simonb return len;
1841 1.2 simonb }
1842 1.2 simonb
1843 1.2 simonb /*
1844 1.2 simonb * Perform commit operation
1845 1.2 simonb *
1846 1.2 simonb * Note that generation number incrementation needs to
1847 1.2 simonb * be protected against racing with other invocations
1848 1.2 simonb * of wapbl_commit. This is ok since this routine
1849 1.2 simonb * is only invoked from wapbl_flush
1850 1.2 simonb */
1851 1.2 simonb static int
1852 1.2 simonb wapbl_write_commit(struct wapbl *wl, off_t head, off_t tail)
1853 1.2 simonb {
1854 1.2 simonb struct wapbl_wc_header *wc = wl->wl_wc_header;
1855 1.2 simonb struct timespec ts;
1856 1.2 simonb int error;
1857 1.2 simonb int force = 1;
1858 1.2 simonb
1859 1.2 simonb /* XXX Calc checksum here, instead we do this for now */
1860 1.2 simonb error = VOP_IOCTL(wl->wl_devvp, DIOCCACHESYNC, &force, FWRITE, FSCRED);
1861 1.2 simonb if (error) {
1862 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_ERROR,
1863 1.2 simonb ("wapbl_write_commit: DIOCCACHESYNC on dev 0x%x "
1864 1.2 simonb "returned %d\n", wl->wl_devvp->v_rdev, error));
1865 1.2 simonb }
1866 1.2 simonb
1867 1.2 simonb wc->wc_head = head;
1868 1.2 simonb wc->wc_tail = tail;
1869 1.2 simonb wc->wc_checksum = 0;
1870 1.2 simonb wc->wc_version = 1;
1871 1.2 simonb getnanotime(&ts);
1872 1.2 simonb wc->wc_time = ts.tv_sec;;
1873 1.2 simonb wc->wc_timensec = ts.tv_nsec;
1874 1.2 simonb
1875 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_WRITE,
1876 1.2 simonb ("wapbl_write_commit: head = %"PRIdMAX "tail = %"PRIdMAX"\n",
1877 1.2 simonb (intmax_t)head, (intmax_t)tail));
1878 1.2 simonb
1879 1.2 simonb /*
1880 1.2 simonb * XXX if generation will rollover, then first zero
1881 1.2 simonb * over second commit header before trying to write both headers.
1882 1.2 simonb */
1883 1.2 simonb
1884 1.2 simonb error = wapbl_write(wc, wc->wc_len, wl->wl_devvp,
1885 1.2 simonb wl->wl_logpbn + wc->wc_generation % 2);
1886 1.2 simonb if (error)
1887 1.2 simonb return error;
1888 1.2 simonb
1889 1.2 simonb error = VOP_IOCTL(wl->wl_devvp, DIOCCACHESYNC, &force, FWRITE, FSCRED);
1890 1.2 simonb if (error) {
1891 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_ERROR,
1892 1.2 simonb ("wapbl_write_commit: DIOCCACHESYNC on dev 0x%x "
1893 1.2 simonb "returned %d\n", wl->wl_devvp->v_rdev, error));
1894 1.2 simonb }
1895 1.2 simonb
1896 1.2 simonb /*
1897 1.2 simonb * If the generation number was zero, write it out a second time.
1898 1.2 simonb * This handles initialization and generation number rollover
1899 1.2 simonb */
1900 1.2 simonb if (wc->wc_generation++ == 0) {
1901 1.2 simonb error = wapbl_write_commit(wl, head, tail);
1902 1.2 simonb /*
1903 1.2 simonb * This panic should be able to be removed if we do the
1904 1.2 simonb * zero'ing mentioned above, and we are certain to roll
1905 1.2 simonb * back generation number on failure.
1906 1.2 simonb */
1907 1.2 simonb if (error)
1908 1.2 simonb panic("wapbl_write_commit: error writing duplicate "
1909 1.2 simonb "log header: %d\n", error);
1910 1.2 simonb }
1911 1.2 simonb return 0;
1912 1.2 simonb }
1913 1.2 simonb
1914 1.2 simonb /* Returns new offset value */
1915 1.2 simonb static int
1916 1.2 simonb wapbl_write_blocks(struct wapbl *wl, off_t *offp)
1917 1.2 simonb {
1918 1.2 simonb struct wapbl_wc_blocklist *wc =
1919 1.2 simonb (struct wapbl_wc_blocklist *)wl->wl_wc_scratch;
1920 1.2 simonb int blocklen = 1<<wl->wl_log_dev_bshift;
1921 1.2 simonb int bph;
1922 1.2 simonb struct buf *bp;
1923 1.2 simonb off_t off = *offp;
1924 1.2 simonb int error;
1925 1.7 joerg size_t padding;
1926 1.2 simonb
1927 1.2 simonb KASSERT(rw_write_held(&wl->wl_rwlock));
1928 1.2 simonb
1929 1.2 simonb bph = (blocklen - offsetof(struct wapbl_wc_blocklist, wc_blocks)) /
1930 1.2 simonb sizeof(((struct wapbl_wc_blocklist *)0)->wc_blocks[0]);
1931 1.2 simonb
1932 1.2 simonb bp = LIST_FIRST(&wl->wl_bufs);
1933 1.2 simonb
1934 1.2 simonb while (bp) {
1935 1.2 simonb int cnt;
1936 1.2 simonb struct buf *obp = bp;
1937 1.2 simonb
1938 1.2 simonb KASSERT(bp->b_flags & B_LOCKED);
1939 1.2 simonb
1940 1.2 simonb wc->wc_type = WAPBL_WC_BLOCKS;
1941 1.2 simonb wc->wc_len = blocklen;
1942 1.2 simonb wc->wc_blkcount = 0;
1943 1.2 simonb while (bp && (wc->wc_blkcount < bph)) {
1944 1.2 simonb /*
1945 1.2 simonb * Make sure all the physical block numbers are up to
1946 1.2 simonb * date. If this is not always true on a given
1947 1.2 simonb * filesystem, then VOP_BMAP must be called. We
1948 1.2 simonb * could call VOP_BMAP here, or else in the filesystem
1949 1.2 simonb * specific flush callback, although neither of those
1950 1.2 simonb * solutions allow us to take the vnode lock. If a
1951 1.2 simonb * filesystem requires that we must take the vnode lock
1952 1.2 simonb * to call VOP_BMAP, then we can probably do it in
1953 1.2 simonb * bwrite when the vnode lock should already be held
1954 1.2 simonb * by the invoking code.
1955 1.2 simonb */
1956 1.2 simonb KASSERT((bp->b_vp->v_type == VBLK) ||
1957 1.2 simonb (bp->b_blkno != bp->b_lblkno));
1958 1.2 simonb KASSERT(bp->b_blkno > 0);
1959 1.2 simonb
1960 1.2 simonb wc->wc_blocks[wc->wc_blkcount].wc_daddr = bp->b_blkno;
1961 1.2 simonb wc->wc_blocks[wc->wc_blkcount].wc_dlen = bp->b_bcount;
1962 1.2 simonb wc->wc_len += bp->b_bcount;
1963 1.2 simonb wc->wc_blkcount++;
1964 1.2 simonb bp = LIST_NEXT(bp, b_wapbllist);
1965 1.2 simonb }
1966 1.7 joerg if (wc->wc_len % blocklen != 0) {
1967 1.7 joerg printf("Padding WAPBL record...");
1968 1.7 joerg padding = blocklen - wc->wc_len % blocklen;
1969 1.7 joerg wc->wc_len += padding;
1970 1.7 joerg } else {
1971 1.7 joerg padding = 0;
1972 1.7 joerg }
1973 1.7 joerg
1974 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_WRITE,
1975 1.7 joerg ("wapbl_write_blocks: len = %u (padding %zu) off = %"PRIdMAX"\n",
1976 1.7 joerg wc->wc_len, padding, (intmax_t)off));
1977 1.2 simonb
1978 1.2 simonb error = wapbl_circ_write(wl, wc, blocklen, &off);
1979 1.2 simonb if (error)
1980 1.2 simonb return error;
1981 1.2 simonb bp = obp;
1982 1.2 simonb cnt = 0;
1983 1.2 simonb while (bp && (cnt++ < bph)) {
1984 1.2 simonb error = wapbl_circ_write(wl, bp->b_data,
1985 1.2 simonb bp->b_bcount, &off);
1986 1.2 simonb if (error)
1987 1.2 simonb return error;
1988 1.2 simonb bp = LIST_NEXT(bp, b_wapbllist);
1989 1.2 simonb }
1990 1.7 joerg if (padding) {
1991 1.7 joerg void *zero;
1992 1.7 joerg
1993 1.7 joerg zero = wapbl_malloc(padding);
1994 1.7 joerg memset(zero, 0, padding);
1995 1.7 joerg error = wapbl_circ_write(wl, zero, padding, &off);
1996 1.7 joerg wapbl_free(zero);
1997 1.7 joerg if (error)
1998 1.7 joerg return error;
1999 1.7 joerg }
2000 1.2 simonb }
2001 1.2 simonb *offp = off;
2002 1.2 simonb return 0;
2003 1.2 simonb }
2004 1.2 simonb
2005 1.2 simonb static int
2006 1.2 simonb wapbl_write_revocations(struct wapbl *wl, off_t *offp)
2007 1.2 simonb {
2008 1.2 simonb struct wapbl_wc_blocklist *wc =
2009 1.2 simonb (struct wapbl_wc_blocklist *)wl->wl_wc_scratch;
2010 1.2 simonb int i;
2011 1.2 simonb int blocklen = 1<<wl->wl_log_dev_bshift;
2012 1.2 simonb int bph;
2013 1.2 simonb off_t off = *offp;
2014 1.2 simonb int error;
2015 1.2 simonb
2016 1.2 simonb if (wl->wl_dealloccnt == 0)
2017 1.2 simonb return 0;
2018 1.2 simonb
2019 1.2 simonb bph = (blocklen - offsetof(struct wapbl_wc_blocklist, wc_blocks)) /
2020 1.2 simonb sizeof(((struct wapbl_wc_blocklist *)0)->wc_blocks[0]);
2021 1.2 simonb
2022 1.2 simonb i = 0;
2023 1.2 simonb while (i < wl->wl_dealloccnt) {
2024 1.2 simonb wc->wc_type = WAPBL_WC_REVOCATIONS;
2025 1.2 simonb wc->wc_len = blocklen;
2026 1.2 simonb wc->wc_blkcount = 0;
2027 1.2 simonb while ((i < wl->wl_dealloccnt) && (wc->wc_blkcount < bph)) {
2028 1.2 simonb wc->wc_blocks[wc->wc_blkcount].wc_daddr =
2029 1.2 simonb wl->wl_deallocblks[i];
2030 1.2 simonb wc->wc_blocks[wc->wc_blkcount].wc_dlen =
2031 1.2 simonb wl->wl_dealloclens[i];
2032 1.2 simonb wc->wc_blkcount++;
2033 1.2 simonb i++;
2034 1.2 simonb }
2035 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_WRITE,
2036 1.2 simonb ("wapbl_write_revocations: len = %u off = %"PRIdMAX"\n",
2037 1.2 simonb wc->wc_len, (intmax_t)off));
2038 1.2 simonb error = wapbl_circ_write(wl, wc, blocklen, &off);
2039 1.2 simonb if (error)
2040 1.2 simonb return error;
2041 1.2 simonb }
2042 1.2 simonb *offp = off;
2043 1.2 simonb return 0;
2044 1.2 simonb }
2045 1.2 simonb
2046 1.2 simonb static int
2047 1.2 simonb wapbl_write_inodes(struct wapbl *wl, off_t *offp)
2048 1.2 simonb {
2049 1.2 simonb struct wapbl_wc_inodelist *wc =
2050 1.2 simonb (struct wapbl_wc_inodelist *)wl->wl_wc_scratch;
2051 1.2 simonb int i;
2052 1.2 simonb int blocklen = 1<<wl->wl_log_dev_bshift;
2053 1.2 simonb off_t off = *offp;
2054 1.2 simonb int error;
2055 1.2 simonb
2056 1.2 simonb struct wapbl_ino_head *wih;
2057 1.2 simonb struct wapbl_ino *wi;
2058 1.2 simonb int iph;
2059 1.2 simonb
2060 1.2 simonb iph = (blocklen - offsetof(struct wapbl_wc_inodelist, wc_inodes)) /
2061 1.2 simonb sizeof(((struct wapbl_wc_inodelist *)0)->wc_inodes[0]);
2062 1.2 simonb
2063 1.2 simonb i = 0;
2064 1.2 simonb wih = &wl->wl_inohash[0];
2065 1.2 simonb wi = 0;
2066 1.2 simonb do {
2067 1.2 simonb wc->wc_type = WAPBL_WC_INODES;
2068 1.2 simonb wc->wc_len = blocklen;
2069 1.2 simonb wc->wc_inocnt = 0;
2070 1.2 simonb wc->wc_clear = (i == 0);
2071 1.2 simonb while ((i < wl->wl_inohashcnt) && (wc->wc_inocnt < iph)) {
2072 1.2 simonb while (!wi) {
2073 1.2 simonb KASSERT((wih - &wl->wl_inohash[0])
2074 1.2 simonb <= wl->wl_inohashmask);
2075 1.2 simonb wi = LIST_FIRST(wih++);
2076 1.2 simonb }
2077 1.2 simonb wc->wc_inodes[wc->wc_inocnt].wc_inumber = wi->wi_ino;
2078 1.2 simonb wc->wc_inodes[wc->wc_inocnt].wc_imode = wi->wi_mode;
2079 1.2 simonb wc->wc_inocnt++;
2080 1.2 simonb i++;
2081 1.2 simonb wi = LIST_NEXT(wi, wi_hash);
2082 1.2 simonb }
2083 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_WRITE,
2084 1.2 simonb ("wapbl_write_inodes: len = %u off = %"PRIdMAX"\n",
2085 1.2 simonb wc->wc_len, (intmax_t)off));
2086 1.2 simonb error = wapbl_circ_write(wl, wc, blocklen, &off);
2087 1.2 simonb if (error)
2088 1.2 simonb return error;
2089 1.2 simonb } while (i < wl->wl_inohashcnt);
2090 1.2 simonb
2091 1.2 simonb *offp = off;
2092 1.2 simonb return 0;
2093 1.2 simonb }
2094 1.2 simonb
2095 1.2 simonb #endif /* _KERNEL */
2096 1.2 simonb
2097 1.2 simonb /****************************************************************/
2098 1.2 simonb
2099 1.2 simonb #ifdef _KERNEL
2100 1.2 simonb static struct pool wapbl_blk_pool;
2101 1.2 simonb static int wapbl_blk_pool_refcount;
2102 1.2 simonb #endif
2103 1.2 simonb struct wapbl_blk {
2104 1.2 simonb LIST_ENTRY(wapbl_blk) wb_hash;
2105 1.2 simonb daddr_t wb_blk;
2106 1.2 simonb off_t wb_off; /* Offset of this block in the log */
2107 1.2 simonb };
2108 1.2 simonb #define WAPBL_BLKPOOL_MIN 83
2109 1.2 simonb
2110 1.2 simonb static void
2111 1.2 simonb wapbl_blkhash_init(struct wapbl_replay *wr, u_int size)
2112 1.2 simonb {
2113 1.2 simonb if (size < WAPBL_BLKPOOL_MIN)
2114 1.2 simonb size = WAPBL_BLKPOOL_MIN;
2115 1.2 simonb KASSERT(wr->wr_blkhash == 0);
2116 1.2 simonb #ifdef _KERNEL
2117 1.2 simonb wr->wr_blkhash = hashinit(size, HASH_LIST, true, &wr->wr_blkhashmask);
2118 1.2 simonb if (atomic_inc_uint_nv(&wapbl_blk_pool_refcount) == 1) {
2119 1.2 simonb pool_init(&wapbl_blk_pool, sizeof(struct wapbl_blk), 0, 0, 0,
2120 1.2 simonb "wapblblkpl", &pool_allocator_nointr, IPL_NONE);
2121 1.2 simonb }
2122 1.2 simonb #else /* ! _KERNEL */
2123 1.2 simonb /* Manually implement hashinit */
2124 1.2 simonb {
2125 1.2 simonb int i;
2126 1.2 simonb unsigned long hashsize;
2127 1.2 simonb for (hashsize = 1; hashsize < size; hashsize <<= 1)
2128 1.2 simonb continue;
2129 1.2 simonb wr->wr_blkhash = wapbl_malloc(hashsize * sizeof(*wr->wr_blkhash));
2130 1.2 simonb for (i = 0; i < wr->wr_blkhashmask; i++)
2131 1.2 simonb LIST_INIT(&wr->wr_blkhash[i]);
2132 1.2 simonb wr->wr_blkhashmask = hashsize - 1;
2133 1.2 simonb }
2134 1.2 simonb #endif /* ! _KERNEL */
2135 1.2 simonb }
2136 1.2 simonb
2137 1.2 simonb static void
2138 1.2 simonb wapbl_blkhash_free(struct wapbl_replay *wr)
2139 1.2 simonb {
2140 1.2 simonb KASSERT(wr->wr_blkhashcnt == 0);
2141 1.2 simonb #ifdef _KERNEL
2142 1.2 simonb hashdone(wr->wr_blkhash, HASH_LIST, wr->wr_blkhashmask);
2143 1.2 simonb if (atomic_dec_uint_nv(&wapbl_blk_pool_refcount) == 0) {
2144 1.2 simonb pool_destroy(&wapbl_blk_pool);
2145 1.2 simonb }
2146 1.2 simonb #else /* ! _KERNEL */
2147 1.2 simonb wapbl_free(wr->wr_blkhash);
2148 1.2 simonb #endif /* ! _KERNEL */
2149 1.2 simonb }
2150 1.2 simonb
2151 1.2 simonb static struct wapbl_blk *
2152 1.2 simonb wapbl_blkhash_get(struct wapbl_replay *wr, daddr_t blk)
2153 1.2 simonb {
2154 1.2 simonb struct wapbl_blk_head *wbh;
2155 1.2 simonb struct wapbl_blk *wb;
2156 1.2 simonb wbh = &wr->wr_blkhash[blk & wr->wr_blkhashmask];
2157 1.2 simonb LIST_FOREACH(wb, wbh, wb_hash) {
2158 1.2 simonb if (blk == wb->wb_blk)
2159 1.2 simonb return wb;
2160 1.2 simonb }
2161 1.2 simonb return 0;
2162 1.2 simonb }
2163 1.2 simonb
2164 1.2 simonb static void
2165 1.2 simonb wapbl_blkhash_ins(struct wapbl_replay *wr, daddr_t blk, off_t off)
2166 1.2 simonb {
2167 1.2 simonb struct wapbl_blk_head *wbh;
2168 1.2 simonb struct wapbl_blk *wb;
2169 1.2 simonb wb = wapbl_blkhash_get(wr, blk);
2170 1.2 simonb if (wb) {
2171 1.2 simonb KASSERT(wb->wb_blk == blk);
2172 1.2 simonb wb->wb_off = off;
2173 1.2 simonb } else {
2174 1.2 simonb #ifdef _KERNEL
2175 1.2 simonb wb = pool_get(&wapbl_blk_pool, PR_WAITOK);
2176 1.2 simonb #else /* ! _KERNEL */
2177 1.2 simonb wb = wapbl_malloc(sizeof(*wb));
2178 1.2 simonb #endif /* ! _KERNEL */
2179 1.2 simonb wb->wb_blk = blk;
2180 1.2 simonb wb->wb_off = off;
2181 1.2 simonb wbh = &wr->wr_blkhash[blk & wr->wr_blkhashmask];
2182 1.2 simonb LIST_INSERT_HEAD(wbh, wb, wb_hash);
2183 1.2 simonb wr->wr_blkhashcnt++;
2184 1.2 simonb }
2185 1.2 simonb }
2186 1.2 simonb
2187 1.2 simonb static void
2188 1.2 simonb wapbl_blkhash_rem(struct wapbl_replay *wr, daddr_t blk)
2189 1.2 simonb {
2190 1.2 simonb struct wapbl_blk *wb = wapbl_blkhash_get(wr, blk);
2191 1.2 simonb if (wb) {
2192 1.2 simonb KASSERT(wr->wr_blkhashcnt > 0);
2193 1.2 simonb wr->wr_blkhashcnt--;
2194 1.2 simonb LIST_REMOVE(wb, wb_hash);
2195 1.2 simonb #ifdef _KERNEL
2196 1.2 simonb pool_put(&wapbl_blk_pool, wb);
2197 1.2 simonb #else /* ! _KERNEL */
2198 1.2 simonb wapbl_free(wb);
2199 1.2 simonb #endif /* ! _KERNEL */
2200 1.2 simonb }
2201 1.2 simonb }
2202 1.2 simonb
2203 1.2 simonb static void
2204 1.2 simonb wapbl_blkhash_clear(struct wapbl_replay *wr)
2205 1.2 simonb {
2206 1.2 simonb int i;
2207 1.2 simonb for (i = 0; i <= wr->wr_blkhashmask; i++) {
2208 1.2 simonb struct wapbl_blk *wb;
2209 1.2 simonb
2210 1.2 simonb while ((wb = LIST_FIRST(&wr->wr_blkhash[i]))) {
2211 1.2 simonb KASSERT(wr->wr_blkhashcnt > 0);
2212 1.2 simonb wr->wr_blkhashcnt--;
2213 1.2 simonb LIST_REMOVE(wb, wb_hash);
2214 1.2 simonb #ifdef _KERNEL
2215 1.2 simonb pool_put(&wapbl_blk_pool, wb);
2216 1.2 simonb #else /* ! _KERNEL */
2217 1.2 simonb wapbl_free(wb);
2218 1.2 simonb #endif /* ! _KERNEL */
2219 1.2 simonb }
2220 1.2 simonb }
2221 1.2 simonb KASSERT(wr->wr_blkhashcnt == 0);
2222 1.2 simonb }
2223 1.2 simonb
2224 1.2 simonb /****************************************************************/
2225 1.2 simonb
2226 1.2 simonb static int
2227 1.2 simonb wapbl_circ_read(struct wapbl_replay *wr, void *data, size_t len, off_t *offp)
2228 1.2 simonb {
2229 1.2 simonb size_t slen;
2230 1.2 simonb struct wapbl_wc_header *wc = &wr->wr_wc_header;
2231 1.2 simonb off_t off = *offp;
2232 1.2 simonb int error;
2233 1.2 simonb
2234 1.2 simonb KASSERT(((len >> wc->wc_log_dev_bshift) <<
2235 1.2 simonb wc->wc_log_dev_bshift) == len);
2236 1.2 simonb if (off < wc->wc_circ_off)
2237 1.2 simonb off = wc->wc_circ_off;
2238 1.2 simonb slen = wc->wc_circ_off + wc->wc_circ_size - off;
2239 1.2 simonb if (slen < len) {
2240 1.2 simonb error = wapbl_read(data, slen, wr->wr_devvp,
2241 1.2 simonb wr->wr_logpbn + (off >> wc->wc_log_dev_bshift));
2242 1.2 simonb if (error)
2243 1.2 simonb return error;
2244 1.2 simonb data = (uint8_t *)data + slen;
2245 1.2 simonb len -= slen;
2246 1.2 simonb off = wc->wc_circ_off;
2247 1.2 simonb }
2248 1.2 simonb error = wapbl_read(data, len, wr->wr_devvp,
2249 1.2 simonb wr->wr_logpbn + (off >> wc->wc_log_dev_bshift));
2250 1.2 simonb if (error)
2251 1.2 simonb return error;
2252 1.2 simonb off += len;
2253 1.2 simonb if (off >= wc->wc_circ_off + wc->wc_circ_size)
2254 1.2 simonb off = wc->wc_circ_off;
2255 1.2 simonb *offp = off;
2256 1.2 simonb return 0;
2257 1.2 simonb }
2258 1.2 simonb
2259 1.2 simonb static void
2260 1.2 simonb wapbl_circ_advance(struct wapbl_replay *wr, size_t len, off_t *offp)
2261 1.2 simonb {
2262 1.2 simonb size_t slen;
2263 1.2 simonb struct wapbl_wc_header *wc = &wr->wr_wc_header;
2264 1.2 simonb off_t off = *offp;
2265 1.2 simonb
2266 1.2 simonb KASSERT(((len >> wc->wc_log_dev_bshift) <<
2267 1.2 simonb wc->wc_log_dev_bshift) == len);
2268 1.2 simonb
2269 1.2 simonb if (off < wc->wc_circ_off)
2270 1.2 simonb off = wc->wc_circ_off;
2271 1.2 simonb slen = wc->wc_circ_off + wc->wc_circ_size - off;
2272 1.2 simonb if (slen < len) {
2273 1.2 simonb len -= slen;
2274 1.2 simonb off = wc->wc_circ_off;
2275 1.2 simonb }
2276 1.2 simonb off += len;
2277 1.2 simonb if (off >= wc->wc_circ_off + wc->wc_circ_size)
2278 1.2 simonb off = wc->wc_circ_off;
2279 1.2 simonb *offp = off;
2280 1.2 simonb }
2281 1.2 simonb
2282 1.2 simonb /****************************************************************/
2283 1.2 simonb
2284 1.2 simonb int
2285 1.2 simonb wapbl_replay_start(struct wapbl_replay **wrp, struct vnode *vp,
2286 1.2 simonb daddr_t off, size_t count, size_t blksize)
2287 1.2 simonb {
2288 1.2 simonb struct wapbl_replay *wr;
2289 1.2 simonb int error;
2290 1.2 simonb struct vnode *devvp;
2291 1.2 simonb daddr_t logpbn;
2292 1.2 simonb uint8_t *scratch;
2293 1.2 simonb struct wapbl_wc_header *wch;
2294 1.2 simonb struct wapbl_wc_header *wch2;
2295 1.2 simonb /* Use this until we read the actual log header */
2296 1.2 simonb int log_dev_bshift = DEV_BSHIFT;
2297 1.2 simonb size_t used;
2298 1.2 simonb
2299 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_REPLAY,
2300 1.2 simonb ("wapbl_replay_start: vp=%p off=%"PRId64 " count=%zu blksize=%zu\n",
2301 1.2 simonb vp, off, count, blksize));
2302 1.2 simonb
2303 1.2 simonb if (off < 0)
2304 1.2 simonb return EINVAL;
2305 1.2 simonb
2306 1.2 simonb if (blksize < DEV_BSIZE)
2307 1.2 simonb return EINVAL;
2308 1.2 simonb if (blksize % DEV_BSIZE)
2309 1.2 simonb return EINVAL;
2310 1.2 simonb
2311 1.2 simonb #ifdef _KERNEL
2312 1.2 simonb #if 0
2313 1.2 simonb /* XXX vp->v_size isn't reliably set for VBLK devices,
2314 1.2 simonb * especially root. However, we might still want to verify
2315 1.2 simonb * that the full load is readable */
2316 1.2 simonb if ((off + count) * blksize > vp->v_size)
2317 1.2 simonb return EINVAL;
2318 1.2 simonb #endif
2319 1.2 simonb
2320 1.2 simonb if ((error = VOP_BMAP(vp, off, &devvp, &logpbn, 0)) != 0) {
2321 1.2 simonb return error;
2322 1.2 simonb }
2323 1.2 simonb #else /* ! _KERNEL */
2324 1.2 simonb devvp = vp;
2325 1.2 simonb logpbn = off;
2326 1.2 simonb #endif /* ! _KERNEL */
2327 1.2 simonb
2328 1.2 simonb scratch = wapbl_malloc(MAXBSIZE);
2329 1.2 simonb
2330 1.2 simonb error = wapbl_read(scratch, 2<<log_dev_bshift, devvp, logpbn);
2331 1.2 simonb if (error)
2332 1.2 simonb goto errout;
2333 1.2 simonb
2334 1.2 simonb wch = (struct wapbl_wc_header *)scratch;
2335 1.2 simonb wch2 =
2336 1.2 simonb (struct wapbl_wc_header *)(scratch + (1<<log_dev_bshift));
2337 1.2 simonb /* XXX verify checksums and magic numbers */
2338 1.2 simonb if (wch->wc_type != WAPBL_WC_HEADER) {
2339 1.2 simonb printf("Unrecognized wapbl magic: 0x%08x\n", wch->wc_type);
2340 1.2 simonb error = EFTYPE;
2341 1.2 simonb goto errout;
2342 1.2 simonb }
2343 1.2 simonb
2344 1.2 simonb if (wch2->wc_generation > wch->wc_generation)
2345 1.2 simonb wch = wch2;
2346 1.2 simonb
2347 1.2 simonb wr = wapbl_calloc(1, sizeof(*wr));
2348 1.2 simonb
2349 1.2 simonb wr->wr_logvp = vp;
2350 1.2 simonb wr->wr_devvp = devvp;
2351 1.2 simonb wr->wr_logpbn = logpbn;
2352 1.2 simonb
2353 1.2 simonb wr->wr_scratch = scratch;
2354 1.2 simonb
2355 1.2 simonb memcpy(&wr->wr_wc_header, wch, sizeof(wr->wr_wc_header));
2356 1.2 simonb
2357 1.2 simonb used = wapbl_space_used(wch->wc_circ_size, wch->wc_head, wch->wc_tail);
2358 1.2 simonb
2359 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_REPLAY,
2360 1.2 simonb ("wapbl_replay: head=%"PRId64" tail=%"PRId64" off=%"PRId64
2361 1.2 simonb " len=%"PRId64" used=%zu\n",
2362 1.2 simonb wch->wc_head, wch->wc_tail, wch->wc_circ_off,
2363 1.2 simonb wch->wc_circ_size, used));
2364 1.2 simonb
2365 1.2 simonb wapbl_blkhash_init(wr, (used >> wch->wc_fs_dev_bshift));
2366 1.2 simonb error = wapbl_replay_prescan(wr);
2367 1.2 simonb if (error) {
2368 1.2 simonb wapbl_replay_stop(wr);
2369 1.2 simonb wapbl_replay_free(wr);
2370 1.2 simonb return error;
2371 1.2 simonb }
2372 1.2 simonb
2373 1.2 simonb error = wapbl_replay_get_inodes(wr);
2374 1.2 simonb if (error) {
2375 1.2 simonb wapbl_replay_stop(wr);
2376 1.2 simonb wapbl_replay_free(wr);
2377 1.2 simonb return error;
2378 1.2 simonb }
2379 1.2 simonb
2380 1.2 simonb *wrp = wr;
2381 1.2 simonb return 0;
2382 1.2 simonb
2383 1.2 simonb errout:
2384 1.2 simonb wapbl_free(scratch);
2385 1.2 simonb return error;
2386 1.2 simonb }
2387 1.2 simonb
2388 1.2 simonb void
2389 1.2 simonb wapbl_replay_stop(struct wapbl_replay *wr)
2390 1.2 simonb {
2391 1.2 simonb
2392 1.4 joerg if (!wapbl_replay_isopen(wr))
2393 1.4 joerg return;
2394 1.4 joerg
2395 1.2 simonb WAPBL_PRINTF(WAPBL_PRINT_REPLAY, ("wapbl_replay_stop called\n"));
2396 1.2 simonb
2397 1.2 simonb wapbl_free(wr->wr_scratch);
2398 1.2 simonb wr->wr_scratch = 0;
2399 1.2 simonb
2400 1.2 simonb wr->wr_logvp = 0;
2401 1.2 simonb
2402 1.2 simonb wapbl_blkhash_clear(wr);
2403 1.2 simonb wapbl_blkhash_free(wr);
2404 1.2 simonb }
2405 1.2 simonb
2406 1.2 simonb void
2407 1.2 simonb wapbl_replay_free(struct wapbl_replay *wr)
2408 1.2 simonb {
2409 1.2 simonb
2410 1.2 simonb KDASSERT(!wapbl_replay_isopen(wr));
2411 1.2 simonb
2412 1.2 simonb if (wr->wr_inodes)
2413 1.2 simonb wapbl_free(wr->wr_inodes);
2414 1.2 simonb wapbl_free(wr);
2415 1.2 simonb }
2416 1.2 simonb
2417 1.4 joerg #ifdef _KERNEL
2418 1.2 simonb int
2419 1.2 simonb wapbl_replay_isopen1(struct wapbl_replay *wr)
2420 1.2 simonb {
2421 1.2 simonb
2422 1.2 simonb return wapbl_replay_isopen(wr);
2423 1.2 simonb }
2424 1.4 joerg #endif
2425 1.2 simonb
2426 1.2 simonb static int
2427 1.2 simonb wapbl_replay_prescan(struct wapbl_replay *wr)
2428 1.2 simonb {
2429 1.2 simonb off_t off;
2430 1.2 simonb struct wapbl_wc_header *wch = &wr->wr_wc_header;
2431 1.2 simonb int error;
2432 1.2 simonb
2433 1.2 simonb int logblklen = 1<<wch->wc_log_dev_bshift;
2434 1.2 simonb int fsblklen = 1<<wch->wc_fs_dev_bshift;
2435 1.2 simonb
2436 1.2 simonb wapbl_blkhash_clear(wr);
2437 1.2 simonb
2438 1.2 simonb off = wch->wc_tail;
2439 1.2 simonb while (off != wch->wc_head) {
2440 1.2 simonb struct wapbl_wc_null *wcn;
2441 1.2 simonb off_t saveoff = off;
2442 1.2 simonb error = wapbl_circ_read(wr, wr->wr_scratch, logblklen, &off);
2443 1.2 simonb if (error)
2444 1.2 simonb goto errout;
2445 1.2 simonb wcn = (struct wapbl_wc_null *)wr->wr_scratch;
2446 1.2 simonb switch (wcn->wc_type) {
2447 1.2 simonb case WAPBL_WC_BLOCKS:
2448 1.2 simonb {
2449 1.2 simonb struct wapbl_wc_blocklist *wc =
2450 1.2 simonb (struct wapbl_wc_blocklist *)wr->wr_scratch;
2451 1.2 simonb int i;
2452 1.2 simonb for (i = 0; i < wc->wc_blkcount; i++) {
2453 1.2 simonb int j, n;
2454 1.2 simonb /*
2455 1.2 simonb * Enter each physical block into the
2456 1.2 simonb * hashtable independently
2457 1.2 simonb */
2458 1.2 simonb n = wc->wc_blocks[i].wc_dlen >>
2459 1.2 simonb wch->wc_fs_dev_bshift;
2460 1.2 simonb for (j = 0; j < n; j++) {
2461 1.2 simonb wapbl_blkhash_ins(wr,
2462 1.2 simonb wc->wc_blocks[i].wc_daddr + j,
2463 1.2 simonb off);
2464 1.2 simonb wapbl_circ_advance(wr,
2465 1.2 simonb fsblklen, &off);
2466 1.2 simonb }
2467 1.2 simonb }
2468 1.2 simonb }
2469 1.2 simonb break;
2470 1.2 simonb
2471 1.2 simonb case WAPBL_WC_REVOCATIONS:
2472 1.2 simonb {
2473 1.2 simonb struct wapbl_wc_blocklist *wc =
2474 1.2 simonb (struct wapbl_wc_blocklist *)wr->wr_scratch;
2475 1.2 simonb int i;
2476 1.2 simonb for (i = 0; i < wc->wc_blkcount; i++) {
2477 1.2 simonb int j, n;
2478 1.2 simonb /*
2479 1.2 simonb * Remove any blocks found from the
2480 1.2 simonb * hashtable
2481 1.2 simonb */
2482 1.2 simonb n = wc->wc_blocks[i].wc_dlen >>
2483 1.2 simonb wch->wc_fs_dev_bshift;
2484 1.2 simonb for (j = 0; j < n; j++) {
2485 1.2 simonb wapbl_blkhash_rem(wr,
2486 1.2 simonb wc->wc_blocks[i].wc_daddr + j);
2487 1.2 simonb }
2488 1.2 simonb }
2489 1.2 simonb }
2490 1.2 simonb break;
2491 1.2 simonb
2492 1.2 simonb case WAPBL_WC_INODES:
2493 1.2 simonb {
2494 1.2 simonb struct wapbl_wc_inodelist *wc =
2495 1.2 simonb (struct wapbl_wc_inodelist *)wr->wr_scratch;
2496 1.2 simonb /*
2497 1.2 simonb * Keep track of where we found this so we
2498 1.2 simonb * can use it later
2499 1.2 simonb */
2500 1.2 simonb if (wc->wc_clear) {
2501 1.2 simonb wr->wr_inodestail = saveoff;
2502 1.2 simonb wr->wr_inodescnt = 0;
2503 1.2 simonb }
2504 1.2 simonb if (wr->wr_inodestail)
2505 1.2 simonb wr->wr_inodeshead = off;
2506 1.2 simonb wr->wr_inodescnt += wc->wc_inocnt;
2507 1.2 simonb }
2508 1.2 simonb break;
2509 1.2 simonb default:
2510 1.2 simonb printf("Unrecognized wapbl type: 0x%08x\n",
2511 1.2 simonb wcn->wc_type);
2512 1.2 simonb error = EFTYPE;
2513 1.2 simonb goto errout;
2514 1.2 simonb }
2515 1.2 simonb wapbl_circ_advance(wr, wcn->wc_len, &saveoff);
2516 1.2 simonb if (off != saveoff) {
2517 1.2 simonb printf("wapbl_replay: corrupted records\n");
2518 1.2 simonb error = EFTYPE;
2519 1.2 simonb goto errout;
2520 1.2 simonb }
2521 1.2 simonb }
2522 1.2 simonb return 0;
2523 1.2 simonb
2524 1.2 simonb errout:
2525 1.2 simonb wapbl_blkhash_clear(wr);
2526 1.2 simonb return error;
2527 1.2 simonb }
2528 1.2 simonb
2529 1.2 simonb static int
2530 1.2 simonb wapbl_replay_get_inodes(struct wapbl_replay *wr)
2531 1.2 simonb {
2532 1.2 simonb off_t off;
2533 1.2 simonb struct wapbl_wc_header *wch = &wr->wr_wc_header;
2534 1.2 simonb int logblklen = 1<<wch->wc_log_dev_bshift;
2535 1.2 simonb int cnt= 0;
2536 1.2 simonb
2537 1.2 simonb KDASSERT(wapbl_replay_isopen(wr));
2538 1.2 simonb
2539 1.2 simonb if (wr->wr_inodescnt == 0)
2540 1.2 simonb return 0;
2541 1.2 simonb
2542 1.2 simonb KASSERT(!wr->wr_inodes);
2543 1.2 simonb
2544 1.2 simonb wr->wr_inodes = wapbl_malloc(wr->wr_inodescnt*sizeof(wr->wr_inodes[0]));
2545 1.2 simonb
2546 1.2 simonb off = wr->wr_inodestail;
2547 1.2 simonb
2548 1.2 simonb while (off != wr->wr_inodeshead) {
2549 1.2 simonb struct wapbl_wc_null *wcn;
2550 1.2 simonb int error;
2551 1.2 simonb off_t saveoff = off;
2552 1.2 simonb error = wapbl_circ_read(wr, wr->wr_scratch, logblklen, &off);
2553 1.2 simonb if (error) {
2554 1.2 simonb wapbl_free(wr->wr_inodes);
2555 1.2 simonb wr->wr_inodes = 0;
2556 1.2 simonb return error;
2557 1.2 simonb }
2558 1.2 simonb wcn = (struct wapbl_wc_null *)wr->wr_scratch;
2559 1.2 simonb switch (wcn->wc_type) {
2560 1.2 simonb case WAPBL_WC_BLOCKS:
2561 1.2 simonb case WAPBL_WC_REVOCATIONS:
2562 1.2 simonb break;
2563 1.2 simonb case WAPBL_WC_INODES:
2564 1.2 simonb {
2565 1.2 simonb struct wapbl_wc_inodelist *wc =
2566 1.2 simonb (struct wapbl_wc_inodelist *)wr->wr_scratch;
2567 1.2 simonb /*
2568 1.2 simonb * Keep track of where we found this so we
2569 1.2 simonb * can use it later
2570 1.2 simonb */
2571 1.2 simonb if (wc->wc_clear) {
2572 1.2 simonb cnt = 0;
2573 1.2 simonb }
2574 1.2 simonb /* This memcpy assumes that wr_inodes is
2575 1.2 simonb * laid out the same as wc_inodes. */
2576 1.2 simonb memcpy(&wr->wr_inodes[cnt], wc->wc_inodes,
2577 1.2 simonb wc->wc_inocnt*sizeof(wc->wc_inodes[0]));
2578 1.2 simonb cnt += wc->wc_inocnt;
2579 1.2 simonb }
2580 1.2 simonb break;
2581 1.2 simonb default:
2582 1.2 simonb KASSERT(0);
2583 1.2 simonb }
2584 1.2 simonb off = saveoff;
2585 1.2 simonb wapbl_circ_advance(wr, wcn->wc_len, &off);
2586 1.2 simonb }
2587 1.2 simonb KASSERT(cnt == wr->wr_inodescnt);
2588 1.2 simonb return 0;
2589 1.2 simonb }
2590 1.2 simonb
2591 1.2 simonb #ifdef DEBUG
2592 1.2 simonb int
2593 1.2 simonb wapbl_replay_verify(struct wapbl_replay *wr, struct vnode *fsdevvp)
2594 1.2 simonb {
2595 1.2 simonb off_t off;
2596 1.2 simonb struct wapbl_wc_header *wch = &wr->wr_wc_header;
2597 1.2 simonb int mismatchcnt = 0;
2598 1.2 simonb int logblklen = 1<<wch->wc_log_dev_bshift;
2599 1.2 simonb int fsblklen = 1<<wch->wc_fs_dev_bshift;
2600 1.2 simonb void *scratch1 = wapbl_malloc(MAXBSIZE);
2601 1.2 simonb void *scratch2 = wapbl_malloc(MAXBSIZE);
2602 1.2 simonb int error = 0;
2603 1.2 simonb
2604 1.2 simonb KDASSERT(wapbl_replay_isopen(wr));
2605 1.2 simonb
2606 1.2 simonb off = wch->wc_tail;
2607 1.2 simonb while (off != wch->wc_head) {
2608 1.2 simonb struct wapbl_wc_null *wcn;
2609 1.2 simonb #ifdef DEBUG
2610 1.2 simonb off_t saveoff = off;
2611 1.2 simonb #endif
2612 1.2 simonb error = wapbl_circ_read(wr, wr->wr_scratch, logblklen, &off);
2613 1.2 simonb if (error)
2614 1.2 simonb goto out;
2615 1.2 simonb wcn = (struct wapbl_wc_null *)wr->wr_scratch;
2616 1.2 simonb switch (wcn->wc_type) {
2617 1.2 simonb case WAPBL_WC_BLOCKS:
2618 1.2 simonb {
2619 1.2 simonb struct wapbl_wc_blocklist *wc =
2620 1.2 simonb (struct wapbl_wc_blocklist *)wr->wr_scratch;
2621 1.2 simonb int i;
2622 1.2 simonb for (i = 0; i < wc->wc_blkcount; i++) {
2623 1.2 simonb int foundcnt = 0;
2624 1.2 simonb int dirtycnt = 0;
2625 1.2 simonb int j, n;
2626 1.2 simonb /*
2627 1.2 simonb * Check each physical block into the
2628 1.2 simonb * hashtable independently
2629 1.2 simonb */
2630 1.2 simonb n = wc->wc_blocks[i].wc_dlen >>
2631 1.2 simonb wch->wc_fs_dev_bshift;
2632 1.2 simonb for (j = 0; j < n; j++) {
2633 1.2 simonb struct wapbl_blk *wb =
2634 1.2 simonb wapbl_blkhash_get(wr,
2635 1.2 simonb wc->wc_blocks[i].wc_daddr + j);
2636 1.2 simonb if (wb && (wb->wb_off == off)) {
2637 1.2 simonb foundcnt++;
2638 1.2 simonb error =
2639 1.2 simonb wapbl_circ_read(wr,
2640 1.2 simonb scratch1, fsblklen,
2641 1.2 simonb &off);
2642 1.2 simonb if (error)
2643 1.2 simonb goto out;
2644 1.2 simonb error =
2645 1.2 simonb wapbl_read(scratch2,
2646 1.2 simonb fsblklen, fsdevvp,
2647 1.2 simonb wb->wb_blk);
2648 1.2 simonb if (error)
2649 1.2 simonb goto out;
2650 1.2 simonb if (memcmp(scratch1,
2651 1.2 simonb scratch2,
2652 1.2 simonb fsblklen)) {
2653 1.2 simonb printf(
2654 1.2 simonb "wapbl_verify: mismatch block %"PRId64" at off %"PRIdMAX"\n",
2655 1.2 simonb wb->wb_blk, (intmax_t)off);
2656 1.2 simonb dirtycnt++;
2657 1.2 simonb mismatchcnt++;
2658 1.2 simonb }
2659 1.2 simonb } else {
2660 1.2 simonb wapbl_circ_advance(wr,
2661 1.2 simonb fsblklen, &off);
2662 1.2 simonb }
2663 1.2 simonb }
2664 1.2 simonb #if 0
2665 1.2 simonb /*
2666 1.2 simonb * If all of the blocks in an entry
2667 1.2 simonb * are clean, then remove all of its
2668 1.2 simonb * blocks from the hashtable since they
2669 1.2 simonb * never will need replay.
2670 1.2 simonb */
2671 1.2 simonb if ((foundcnt != 0) &&
2672 1.2 simonb (dirtycnt == 0)) {
2673 1.2 simonb off = saveoff;
2674 1.2 simonb wapbl_circ_advance(wr,
2675 1.2 simonb logblklen, &off);
2676 1.2 simonb for (j = 0; j < n; j++) {
2677 1.2 simonb struct wapbl_blk *wb =
2678 1.2 simonb wapbl_blkhash_get(wr,
2679 1.2 simonb wc->wc_blocks[i].wc_daddr + j);
2680 1.2 simonb if (wb &&
2681 1.2 simonb (wb->wb_off == off)) {
2682 1.2 simonb wapbl_blkhash_rem(wr, wb->wb_blk);
2683 1.2 simonb }
2684 1.2 simonb wapbl_circ_advance(wr,
2685 1.2 simonb fsblklen, &off);
2686 1.2 simonb }
2687 1.2 simonb }
2688 1.2 simonb #endif
2689 1.2 simonb }
2690 1.2 simonb }
2691 1.2 simonb break;
2692 1.2 simonb case WAPBL_WC_REVOCATIONS:
2693 1.2 simonb case WAPBL_WC_INODES:
2694 1.2 simonb break;
2695 1.2 simonb default:
2696 1.2 simonb KASSERT(0);
2697 1.2 simonb }
2698 1.2 simonb #ifdef DEBUG
2699 1.2 simonb wapbl_circ_advance(wr, wcn->wc_len, &saveoff);
2700 1.2 simonb KASSERT(off == saveoff);
2701 1.2 simonb #endif
2702 1.2 simonb }
2703 1.2 simonb out:
2704 1.2 simonb wapbl_free(scratch1);
2705 1.2 simonb wapbl_free(scratch2);
2706 1.2 simonb if (!error && mismatchcnt)
2707 1.2 simonb error = EFTYPE;
2708 1.2 simonb return error;
2709 1.2 simonb }
2710 1.2 simonb #endif
2711 1.2 simonb
2712 1.2 simonb int
2713 1.2 simonb wapbl_replay_write(struct wapbl_replay *wr, struct vnode *fsdevvp)
2714 1.2 simonb {
2715 1.2 simonb off_t off;
2716 1.2 simonb struct wapbl_wc_header *wch = &wr->wr_wc_header;
2717 1.2 simonb int logblklen = 1<<wch->wc_log_dev_bshift;
2718 1.2 simonb int fsblklen = 1<<wch->wc_fs_dev_bshift;
2719 1.2 simonb void *scratch1 = wapbl_malloc(MAXBSIZE);
2720 1.2 simonb int error = 0;
2721 1.2 simonb
2722 1.2 simonb KDASSERT(wapbl_replay_isopen(wr));
2723 1.2 simonb
2724 1.2 simonb /*
2725 1.2 simonb * This parses the journal for replay, although it could
2726 1.2 simonb * just as easily walk the hashtable instead.
2727 1.2 simonb */
2728 1.2 simonb
2729 1.2 simonb off = wch->wc_tail;
2730 1.2 simonb while (off != wch->wc_head) {
2731 1.2 simonb struct wapbl_wc_null *wcn;
2732 1.2 simonb #ifdef DEBUG
2733 1.2 simonb off_t saveoff = off;
2734 1.2 simonb #endif
2735 1.2 simonb error = wapbl_circ_read(wr, wr->wr_scratch, logblklen, &off);
2736 1.2 simonb if (error)
2737 1.2 simonb goto out;
2738 1.2 simonb wcn = (struct wapbl_wc_null *)wr->wr_scratch;
2739 1.2 simonb switch (wcn->wc_type) {
2740 1.2 simonb case WAPBL_WC_BLOCKS:
2741 1.2 simonb {
2742 1.2 simonb struct wapbl_wc_blocklist *wc =
2743 1.2 simonb (struct wapbl_wc_blocklist *)wr->wr_scratch;
2744 1.2 simonb int i;
2745 1.2 simonb for (i = 0; i < wc->wc_blkcount; i++) {
2746 1.2 simonb int j, n;
2747 1.2 simonb /*
2748 1.2 simonb * Check each physical block against
2749 1.2 simonb * the hashtable independently
2750 1.2 simonb */
2751 1.2 simonb n = wc->wc_blocks[i].wc_dlen >>
2752 1.2 simonb wch->wc_fs_dev_bshift;
2753 1.2 simonb for (j = 0; j < n; j++) {
2754 1.2 simonb struct wapbl_blk *wb =
2755 1.2 simonb wapbl_blkhash_get(wr,
2756 1.2 simonb wc->wc_blocks[i].wc_daddr + j);
2757 1.2 simonb if (wb && (wb->wb_off == off)) {
2758 1.2 simonb error = wapbl_circ_read(
2759 1.2 simonb wr, scratch1,
2760 1.2 simonb fsblklen, &off);
2761 1.2 simonb if (error)
2762 1.2 simonb goto out;
2763 1.2 simonb error =
2764 1.2 simonb wapbl_write(scratch1,
2765 1.2 simonb fsblklen, fsdevvp,
2766 1.2 simonb wb->wb_blk);
2767 1.2 simonb if (error)
2768 1.2 simonb goto out;
2769 1.2 simonb } else {
2770 1.2 simonb wapbl_circ_advance(wr,
2771 1.2 simonb fsblklen, &off);
2772 1.2 simonb }
2773 1.2 simonb }
2774 1.2 simonb }
2775 1.2 simonb }
2776 1.2 simonb break;
2777 1.2 simonb case WAPBL_WC_REVOCATIONS:
2778 1.2 simonb case WAPBL_WC_INODES:
2779 1.2 simonb break;
2780 1.2 simonb default:
2781 1.2 simonb KASSERT(0);
2782 1.2 simonb }
2783 1.2 simonb #ifdef DEBUG
2784 1.2 simonb wapbl_circ_advance(wr, wcn->wc_len, &saveoff);
2785 1.2 simonb KASSERT(off == saveoff);
2786 1.2 simonb #endif
2787 1.2 simonb }
2788 1.2 simonb out:
2789 1.2 simonb wapbl_free(scratch1);
2790 1.2 simonb return error;
2791 1.2 simonb }
2792 1.2 simonb
2793 1.2 simonb int
2794 1.6 joerg wapbl_replay_can_read(struct wapbl_replay *wr, daddr_t blk, long len)
2795 1.6 joerg {
2796 1.6 joerg struct wapbl_wc_header *wch = &wr->wr_wc_header;
2797 1.6 joerg int fsblklen = 1<<wch->wc_fs_dev_bshift;
2798 1.6 joerg
2799 1.6 joerg KDASSERT(wapbl_replay_isopen(wr));
2800 1.6 joerg KASSERT((len % fsblklen) == 0);
2801 1.6 joerg
2802 1.6 joerg while (len != 0) {
2803 1.6 joerg struct wapbl_blk *wb = wapbl_blkhash_get(wr, blk);
2804 1.6 joerg if (wb)
2805 1.6 joerg return 1;
2806 1.6 joerg len -= fsblklen;
2807 1.6 joerg }
2808 1.6 joerg return 0;
2809 1.6 joerg }
2810 1.6 joerg
2811 1.6 joerg int
2812 1.2 simonb wapbl_replay_read(struct wapbl_replay *wr, void *data, daddr_t blk, long len)
2813 1.2 simonb {
2814 1.2 simonb struct wapbl_wc_header *wch = &wr->wr_wc_header;
2815 1.2 simonb int fsblklen = 1<<wch->wc_fs_dev_bshift;
2816 1.2 simonb
2817 1.2 simonb KDASSERT(wapbl_replay_isopen(wr));
2818 1.2 simonb
2819 1.2 simonb KASSERT((len % fsblklen) == 0);
2820 1.2 simonb
2821 1.2 simonb while (len != 0) {
2822 1.2 simonb struct wapbl_blk *wb = wapbl_blkhash_get(wr, blk);
2823 1.2 simonb if (wb) {
2824 1.2 simonb off_t off = wb->wb_off;
2825 1.2 simonb int error;
2826 1.2 simonb error = wapbl_circ_read(wr, data, fsblklen, &off);
2827 1.2 simonb if (error)
2828 1.2 simonb return error;
2829 1.2 simonb }
2830 1.2 simonb data = (uint8_t *)data + fsblklen;
2831 1.2 simonb len -= fsblklen;
2832 1.2 simonb blk++;
2833 1.2 simonb }
2834 1.2 simonb return 0;
2835 1.2 simonb }
2836