blob: 0a7a8cef6019b90be91b8cf9408724915130edcd [file] [log] [blame]
Dave Chinner71e330b2010-05-21 14:37:18 +10001/*
2 * Copyright (c) 2010 Red Hat, Inc. All Rights Reserved.
3 *
4 * This program is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU General Public License as
6 * published by the Free Software Foundation.
7 *
8 * This program is distributed in the hope that it would be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
12 *
13 * You should have received a copy of the GNU General Public License
14 * along with this program; if not, write the Free Software Foundation,
15 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
16 */
17
18#include "xfs.h"
19#include "xfs_fs.h"
Dave Chinner239880e2013-10-23 10:50:10 +110020#include "xfs_log_format.h"
Dave Chinner70a98832013-10-23 10:36:05 +110021#include "xfs_shared.h"
Dave Chinner239880e2013-10-23 10:50:10 +110022#include "xfs_trans_resv.h"
Dave Chinner71e330b2010-05-21 14:37:18 +100023#include "xfs_sb.h"
24#include "xfs_ag.h"
Dave Chinner71e330b2010-05-21 14:37:18 +100025#include "xfs_mount.h"
26#include "xfs_error.h"
27#include "xfs_alloc.h"
Dave Chinnerefc27b52012-04-29 10:39:43 +000028#include "xfs_extent_busy.h"
Christoph Hellwige84661a2011-05-20 13:45:32 +000029#include "xfs_discard.h"
Dave Chinner239880e2013-10-23 10:50:10 +110030#include "xfs_trans.h"
31#include "xfs_trans_priv.h"
32#include "xfs_log.h"
33#include "xfs_log_priv.h"
Dave Chinner71e330b2010-05-21 14:37:18 +100034
35/*
Dave Chinner71e330b2010-05-21 14:37:18 +100036 * Allocate a new ticket. Failing to get a new ticket makes it really hard to
37 * recover, so we don't allow failure here. Also, we allocate in a context that
38 * we don't want to be issuing transactions from, so we need to tell the
39 * allocation code this as well.
40 *
41 * We don't reserve any space for the ticket - we are going to steal whatever
42 * space we require from transactions as they commit. To ensure we reserve all
43 * the space required, we need to set the current reservation of the ticket to
44 * zero so that we know to steal the initial transaction overhead from the
45 * first transaction commit.
46 */
47static struct xlog_ticket *
48xlog_cil_ticket_alloc(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -050049 struct xlog *log)
Dave Chinner71e330b2010-05-21 14:37:18 +100050{
51 struct xlog_ticket *tic;
52
53 tic = xlog_ticket_alloc(log, 0, 1, XFS_TRANSACTION, 0,
54 KM_SLEEP|KM_NOFS);
55 tic->t_trans_type = XFS_TRANS_CHECKPOINT;
56
57 /*
58 * set the current reservation to zero so we know to steal the basic
59 * transaction overhead reservation from the first transaction commit.
60 */
61 tic->t_curr_res = 0;
62 return tic;
63}
64
65/*
66 * After the first stage of log recovery is done, we know where the head and
67 * tail of the log are. We need this log initialisation done before we can
68 * initialise the first CIL checkpoint context.
69 *
70 * Here we allocate a log ticket to track space usage during a CIL push. This
71 * ticket is passed to xlog_write() directly so that we don't slowly leak log
72 * space by failing to account for space used by log headers and additional
73 * region headers for split regions.
74 */
75void
76xlog_cil_init_post_recovery(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -050077 struct xlog *log)
Dave Chinner71e330b2010-05-21 14:37:18 +100078{
Dave Chinner71e330b2010-05-21 14:37:18 +100079 log->l_cilp->xc_ctx->ticket = xlog_cil_ticket_alloc(log);
80 log->l_cilp->xc_ctx->sequence = 1;
81 log->l_cilp->xc_ctx->commit_lsn = xlog_assign_lsn(log->l_curr_cycle,
82 log->l_curr_block);
83}
84
Dave Chinner7492c5b2013-08-12 20:50:05 +100085STATIC int
86xlog_cil_lv_item_format(
87 struct xfs_log_item *lip,
88 struct xfs_log_vec *lv)
89{
90 int index;
91 char *ptr;
92
93 /* format new vectors into array */
94 lip->li_ops->iop_format(lip, lv->lv_iovecp);
95
96 /* copy data into existing array */
97 ptr = lv->lv_buf;
98 for (index = 0; index < lv->lv_niovecs; index++) {
99 struct xfs_log_iovec *vec = &lv->lv_iovecp[index];
100
101 memcpy(ptr, vec->i_addr, vec->i_len);
102 vec->i_addr = ptr;
103 ptr += vec->i_len;
104 }
105
106 /*
107 * some size calculations for log vectors over-estimate, so the caller
108 * doesn't know the amount of space actually used by the item. Return
109 * the byte count to the caller so they can check and store it
110 * appropriately.
111 */
112 return ptr - lv->lv_buf;
113}
114
Dave Chinner71e330b2010-05-21 14:37:18 +1000115/*
Dave Chinner991aaf62013-08-12 20:50:07 +1000116 * Prepare the log item for insertion into the CIL. Calculate the difference in
117 * log space and vectors it will consume, and if it is a new item pin it as
118 * well.
119 */
120STATIC void
121xfs_cil_prepare_item(
122 struct xlog *log,
123 struct xfs_log_vec *lv,
124 struct xfs_log_vec *old_lv,
125 int *diff_len,
126 int *diff_iovecs)
127{
128 /* Account for the new LV being passed in */
129 if (lv->lv_buf_len != XFS_LOG_VEC_ORDERED) {
130 *diff_len += lv->lv_buf_len;
131 *diff_iovecs += lv->lv_niovecs;
132 }
133
134 /*
135 * If there is no old LV, this is the first time we've seen the item in
136 * this CIL context and so we need to pin it. If we are replacing the
137 * old_lv, then remove the space it accounts for and free it.
138 */
139 if (!old_lv)
140 lv->lv_item->li_ops->iop_pin(lv->lv_item);
141 else if (old_lv != lv) {
142 ASSERT(lv->lv_buf_len != XFS_LOG_VEC_ORDERED);
143
144 *diff_len -= old_lv->lv_buf_len;
145 *diff_iovecs -= old_lv->lv_niovecs;
146 kmem_free(old_lv);
147 }
148
149 /* attach new log vector to log item */
150 lv->lv_item->li_lv = lv;
151
152 /*
153 * If this is the first time the item is being committed to the
154 * CIL, store the sequence number on the log item so we can
155 * tell in future commits whether this is the first checkpoint
156 * the item is being committed into.
157 */
158 if (!lv->lv_item->li_seq)
159 lv->lv_item->li_seq = log->l_cilp->xc_ctx->sequence;
160}
161
162/*
Dave Chinner71e330b2010-05-21 14:37:18 +1000163 * Format log item into a flat buffers
164 *
165 * For delayed logging, we need to hold a formatted buffer containing all the
166 * changes on the log item. This enables us to relog the item in memory and
167 * write it out asynchronously without needing to relock the object that was
168 * modified at the time it gets written into the iclog.
169 *
170 * This function builds a vector for the changes in each log item in the
171 * transaction. It then works out the length of the buffer needed for each log
172 * item, allocates them and formats the vector for the item into the buffer.
173 * The buffer is then attached to the log item are then inserted into the
174 * Committed Item List for tracking until the next checkpoint is written out.
175 *
176 * We don't set up region headers during this process; we simply copy the
177 * regions into the flat buffer. We can do this because we still have to do a
178 * formatting step to write the regions into the iclog buffer. Writing the
179 * ophdrs during the iclog write means that we can support splitting large
180 * regions across iclog boundares without needing a change in the format of the
181 * item/region encapsulation.
182 *
183 * Hence what we need to do now is change the rewrite the vector array to point
184 * to the copied region inside the buffer we just allocated. This allows us to
185 * format the regions into the iclog as though they are being formatted
186 * directly out of the objects themselves.
187 */
Dave Chinner991aaf62013-08-12 20:50:07 +1000188static void
189xlog_cil_insert_format_items(
190 struct xlog *log,
191 struct xfs_trans *tp,
192 int *diff_len,
193 int *diff_iovecs)
Dave Chinner71e330b2010-05-21 14:37:18 +1000194{
Christoph Hellwig0244b962011-12-06 21:58:08 +0000195 struct xfs_log_item_desc *lidp;
Dave Chinner71e330b2010-05-21 14:37:18 +1000196
Christoph Hellwig0244b962011-12-06 21:58:08 +0000197
198 /* Bail out if we didn't find a log item. */
199 if (list_empty(&tp->t_items)) {
200 ASSERT(0);
Dave Chinner991aaf62013-08-12 20:50:07 +1000201 return;
Christoph Hellwig0244b962011-12-06 21:58:08 +0000202 }
203
204 list_for_each_entry(lidp, &tp->t_items, lid_trans) {
Dave Chinner166d1362013-08-12 20:50:04 +1000205 struct xfs_log_item *lip = lidp->lid_item;
Dave Chinner7492c5b2013-08-12 20:50:05 +1000206 struct xfs_log_vec *lv;
Dave Chinner991aaf62013-08-12 20:50:07 +1000207 struct xfs_log_vec *old_lv;
Dave Chinner7492c5b2013-08-12 20:50:05 +1000208 int niovecs = 0;
209 int nbytes = 0;
210 int buf_size;
Dave Chinnerfd638752013-06-27 16:04:51 +1000211 bool ordered = false;
Dave Chinner71e330b2010-05-21 14:37:18 +1000212
Christoph Hellwig0244b962011-12-06 21:58:08 +0000213 /* Skip items which aren't dirty in this transaction. */
214 if (!(lidp->lid_flags & XFS_LID_DIRTY))
215 continue;
216
Dave Chinner166d1362013-08-12 20:50:04 +1000217 /* get number of vecs and size of data to be stored */
218 lip->li_ops->iop_size(lip, &niovecs, &nbytes);
219
Christoph Hellwig0244b962011-12-06 21:58:08 +0000220 /* Skip items that do not have any vectors for writing */
Christoph Hellwigb3934212011-12-06 21:58:09 +0000221 if (!niovecs)
Christoph Hellwig0244b962011-12-06 21:58:08 +0000222 continue;
223
Dave Chinnerfd638752013-06-27 16:04:51 +1000224 /*
225 * Ordered items need to be tracked but we do not wish to write
226 * them. We need a logvec to track the object, but we do not
227 * need an iovec or buffer to be allocated for copying data.
228 */
229 if (niovecs == XFS_LOG_VEC_ORDERED) {
230 ordered = true;
231 niovecs = 0;
Dave Chinner7492c5b2013-08-12 20:50:05 +1000232 nbytes = 0;
Dave Chinnerfd638752013-06-27 16:04:51 +1000233 }
234
Dave Chinner991aaf62013-08-12 20:50:07 +1000235 /* grab the old item if it exists for reservation accounting */
236 old_lv = lip->li_lv;
237
Dave Chinner7492c5b2013-08-12 20:50:05 +1000238 /* calc buffer size */
239 buf_size = sizeof(struct xfs_log_vec) + nbytes +
240 niovecs * sizeof(struct xfs_log_iovec);
Christoph Hellwig0244b962011-12-06 21:58:08 +0000241
Dave Chinnerf5baac32013-08-12 20:50:06 +1000242 /* compare to existing item size */
243 if (lip->li_lv && buf_size <= lip->li_lv->lv_size) {
244 /* same or smaller, optimise common overwrite case */
245 lv = lip->li_lv;
246 lv->lv_next = NULL;
247
248 if (ordered)
249 goto insert;
250
Dave Chinner991aaf62013-08-12 20:50:07 +1000251 /*
252 * set the item up as though it is a new insertion so
253 * that the space reservation accounting is correct.
254 */
255 *diff_iovecs -= lv->lv_niovecs;
256 *diff_len -= lv->lv_buf_len;
Christoph Hellwig9597df62013-12-13 11:00:42 +1100257 } else {
258 /* allocate new data chunk */
259 lv = kmem_zalloc(buf_size, KM_SLEEP|KM_NOFS);
260 lv->lv_item = lip;
261 lv->lv_size = buf_size;
262 if (ordered) {
263 /* track as an ordered logvec */
264 ASSERT(lip->li_lv == NULL);
265 lv->lv_buf_len = XFS_LOG_VEC_ORDERED;
266 goto insert;
267 }
268 lv->lv_iovecp = (struct xfs_log_iovec *)&lv[1];
Dave Chinnerf5baac32013-08-12 20:50:06 +1000269 }
270
Christoph Hellwig9597df62013-12-13 11:00:42 +1100271 /* Ensure the lv is set up according to ->iop_size */
Dave Chinner7492c5b2013-08-12 20:50:05 +1000272 lv->lv_niovecs = niovecs;
Christoph Hellwig0244b962011-12-06 21:58:08 +0000273
Dave Chinner7492c5b2013-08-12 20:50:05 +1000274 /* The allocated data region lies beyond the iovec region */
275 lv->lv_buf = (char *)lv + buf_size - nbytes;
Dave Chinner71e330b2010-05-21 14:37:18 +1000276
Dave Chinner7492c5b2013-08-12 20:50:05 +1000277 lv->lv_buf_len = xlog_cil_lv_item_format(lip, lv);
Dave Chinner7492c5b2013-08-12 20:50:05 +1000278insert:
Dave Chinnerf5baac32013-08-12 20:50:06 +1000279 ASSERT(lv->lv_buf_len <= nbytes);
Dave Chinner991aaf62013-08-12 20:50:07 +1000280 xfs_cil_prepare_item(log, lv, old_lv, diff_len, diff_iovecs);
Dave Chinner71e330b2010-05-21 14:37:18 +1000281 }
Dave Chinnerd1583a32010-09-24 18:14:13 +1000282}
283
284/*
285 * Insert the log items into the CIL and calculate the difference in space
286 * consumed by the item. Add the space to the checkpoint ticket and calculate
287 * if the change requires additional log metadata. If it does, take that space
Justin P. Mattock42b2aa82011-11-28 20:31:00 -0800288 * as well. Remove the amount of space we added to the checkpoint ticket from
Dave Chinnerd1583a32010-09-24 18:14:13 +1000289 * the current transaction ticket so that the accounting works out correctly.
290 */
Dave Chinner71e330b2010-05-21 14:37:18 +1000291static void
Dave Chinner3b93c7a2010-08-24 11:45:53 +1000292xlog_cil_insert_items(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -0500293 struct xlog *log,
Dave Chinner991aaf62013-08-12 20:50:07 +1000294 struct xfs_trans *tp)
Dave Chinner3b93c7a2010-08-24 11:45:53 +1000295{
Dave Chinnerd1583a32010-09-24 18:14:13 +1000296 struct xfs_cil *cil = log->l_cilp;
297 struct xfs_cil_ctx *ctx = cil->xc_ctx;
Dave Chinner991aaf62013-08-12 20:50:07 +1000298 struct xfs_log_item_desc *lidp;
Dave Chinnerd1583a32010-09-24 18:14:13 +1000299 int len = 0;
300 int diff_iovecs = 0;
301 int iclog_space;
Dave Chinner3b93c7a2010-08-24 11:45:53 +1000302
Dave Chinner991aaf62013-08-12 20:50:07 +1000303 ASSERT(tp);
Dave Chinnerd1583a32010-09-24 18:14:13 +1000304
305 /*
Dave Chinnerd1583a32010-09-24 18:14:13 +1000306 * We can do this safely because the context can't checkpoint until we
307 * are done so it doesn't matter exactly how we update the CIL.
308 */
Dave Chinner991aaf62013-08-12 20:50:07 +1000309 xlog_cil_insert_format_items(log, tp, &len, &diff_iovecs);
310
311 /*
312 * Now (re-)position everything modified at the tail of the CIL.
313 * We do this here so we only need to take the CIL lock once during
314 * the transaction commit.
315 */
Dave Chinnerfd638752013-06-27 16:04:51 +1000316 spin_lock(&cil->xc_cil_lock);
Dave Chinner991aaf62013-08-12 20:50:07 +1000317 list_for_each_entry(lidp, &tp->t_items, lid_trans) {
318 struct xfs_log_item *lip = lidp->lid_item;
Dave Chinnerfd638752013-06-27 16:04:51 +1000319
Dave Chinner991aaf62013-08-12 20:50:07 +1000320 /* Skip items which aren't dirty in this transaction. */
321 if (!(lidp->lid_flags & XFS_LID_DIRTY))
322 continue;
Dave Chinnerfd638752013-06-27 16:04:51 +1000323
Dave Chinner991aaf62013-08-12 20:50:07 +1000324 list_move_tail(&lip->li_cil, &cil->xc_cil);
Dave Chinnerfd638752013-06-27 16:04:51 +1000325 }
Dave Chinnerd1583a32010-09-24 18:14:13 +1000326
327 /* account for space used by new iovec headers */
328 len += diff_iovecs * sizeof(xlog_op_header_t);
Dave Chinnerd1583a32010-09-24 18:14:13 +1000329 ctx->nvecs += diff_iovecs;
330
Dave Chinner991aaf62013-08-12 20:50:07 +1000331 /* attach the transaction to the CIL if it has any busy extents */
332 if (!list_empty(&tp->t_busy))
333 list_splice_init(&tp->t_busy, &ctx->busy_extents);
334
Dave Chinnerd1583a32010-09-24 18:14:13 +1000335 /*
336 * Now transfer enough transaction reservation to the context ticket
337 * for the checkpoint. The context ticket is special - the unit
338 * reservation has to grow as well as the current reservation as we
339 * steal from tickets so we can correctly determine the space used
340 * during the transaction commit.
341 */
342 if (ctx->ticket->t_curr_res == 0) {
Dave Chinnerd1583a32010-09-24 18:14:13 +1000343 ctx->ticket->t_curr_res = ctx->ticket->t_unit_res;
Dave Chinner991aaf62013-08-12 20:50:07 +1000344 tp->t_ticket->t_curr_res -= ctx->ticket->t_unit_res;
Dave Chinnerd1583a32010-09-24 18:14:13 +1000345 }
346
347 /* do we need space for more log record headers? */
348 iclog_space = log->l_iclog_size - log->l_iclog_hsize;
349 if (len > 0 && (ctx->space_used / iclog_space !=
350 (ctx->space_used + len) / iclog_space)) {
351 int hdrs;
352
353 hdrs = (len + iclog_space - 1) / iclog_space;
354 /* need to take into account split region headers, too */
355 hdrs *= log->l_iclog_hsize + sizeof(struct xlog_op_header);
356 ctx->ticket->t_unit_res += hdrs;
357 ctx->ticket->t_curr_res += hdrs;
Dave Chinner991aaf62013-08-12 20:50:07 +1000358 tp->t_ticket->t_curr_res -= hdrs;
359 ASSERT(tp->t_ticket->t_curr_res >= len);
Dave Chinnerd1583a32010-09-24 18:14:13 +1000360 }
Dave Chinner991aaf62013-08-12 20:50:07 +1000361 tp->t_ticket->t_curr_res -= len;
Dave Chinnerd1583a32010-09-24 18:14:13 +1000362 ctx->space_used += len;
363
364 spin_unlock(&cil->xc_cil_lock);
Dave Chinner3b93c7a2010-08-24 11:45:53 +1000365}
366
367static void
Dave Chinner71e330b2010-05-21 14:37:18 +1000368xlog_cil_free_logvec(
369 struct xfs_log_vec *log_vector)
370{
371 struct xfs_log_vec *lv;
372
373 for (lv = log_vector; lv; ) {
374 struct xfs_log_vec *next = lv->lv_next;
Dave Chinner71e330b2010-05-21 14:37:18 +1000375 kmem_free(lv);
376 lv = next;
377 }
378}
379
380/*
Dave Chinner71e330b2010-05-21 14:37:18 +1000381 * Mark all items committed and clear busy extents. We free the log vector
382 * chains in a separate pass so that we unpin the log items as quickly as
383 * possible.
384 */
385static void
386xlog_cil_committed(
387 void *args,
388 int abort)
389{
390 struct xfs_cil_ctx *ctx = args;
Christoph Hellwige84661a2011-05-20 13:45:32 +0000391 struct xfs_mount *mp = ctx->cil->xc_log->l_mp;
Dave Chinner71e330b2010-05-21 14:37:18 +1000392
Dave Chinner0e57f6a2010-12-20 12:02:19 +1100393 xfs_trans_committed_bulk(ctx->cil->xc_log->l_ailp, ctx->lv_chain,
394 ctx->start_lsn, abort);
Dave Chinner71e330b2010-05-21 14:37:18 +1000395
Dave Chinner4ecbfe62012-04-29 10:41:10 +0000396 xfs_extent_busy_sort(&ctx->busy_extents);
397 xfs_extent_busy_clear(mp, &ctx->busy_extents,
Christoph Hellwige84661a2011-05-20 13:45:32 +0000398 (mp->m_flags & XFS_MOUNT_DISCARD) && !abort);
Dave Chinner71e330b2010-05-21 14:37:18 +1000399
Dave Chinner4bb928c2013-08-12 20:50:08 +1000400 spin_lock(&ctx->cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000401 list_del(&ctx->committing);
Dave Chinner4bb928c2013-08-12 20:50:08 +1000402 spin_unlock(&ctx->cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000403
404 xlog_cil_free_logvec(ctx->lv_chain);
Christoph Hellwige84661a2011-05-20 13:45:32 +0000405
406 if (!list_empty(&ctx->busy_extents)) {
407 ASSERT(mp->m_flags & XFS_MOUNT_DISCARD);
408
409 xfs_discard_extents(mp, &ctx->busy_extents);
Dave Chinner4ecbfe62012-04-29 10:41:10 +0000410 xfs_extent_busy_clear(mp, &ctx->busy_extents, false);
Christoph Hellwige84661a2011-05-20 13:45:32 +0000411 }
412
Dave Chinner71e330b2010-05-21 14:37:18 +1000413 kmem_free(ctx);
414}
415
416/*
Dave Chinnera44f13e2010-08-24 11:40:03 +1000417 * Push the Committed Item List to the log. If @push_seq flag is zero, then it
418 * is a background flush and so we can chose to ignore it. Otherwise, if the
419 * current sequence is the same as @push_seq we need to do a flush. If
420 * @push_seq is less than the current sequence, then it has already been
421 * flushed and we don't need to do anything - the caller will wait for it to
422 * complete if necessary.
423 *
424 * @push_seq is a value rather than a flag because that allows us to do an
425 * unlocked check of the sequence number for a match. Hence we can allows log
426 * forces to run racily and not issue pushes for the same sequence twice. If we
427 * get a race between multiple pushes for the same sequence they will block on
428 * the first one and then abort, hence avoiding needless pushes.
Dave Chinner71e330b2010-05-21 14:37:18 +1000429 */
Dave Chinnera44f13e2010-08-24 11:40:03 +1000430STATIC int
Dave Chinner71e330b2010-05-21 14:37:18 +1000431xlog_cil_push(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -0500432 struct xlog *log)
Dave Chinner71e330b2010-05-21 14:37:18 +1000433{
434 struct xfs_cil *cil = log->l_cilp;
435 struct xfs_log_vec *lv;
436 struct xfs_cil_ctx *ctx;
437 struct xfs_cil_ctx *new_ctx;
438 struct xlog_in_core *commit_iclog;
439 struct xlog_ticket *tic;
Dave Chinner71e330b2010-05-21 14:37:18 +1000440 int num_iovecs;
Dave Chinner71e330b2010-05-21 14:37:18 +1000441 int error = 0;
442 struct xfs_trans_header thdr;
443 struct xfs_log_iovec lhdr;
444 struct xfs_log_vec lvhdr = { NULL };
445 xfs_lsn_t commit_lsn;
Dave Chinner4c2d5422012-04-23 17:54:32 +1000446 xfs_lsn_t push_seq;
Dave Chinner71e330b2010-05-21 14:37:18 +1000447
448 if (!cil)
449 return 0;
450
Dave Chinner71e330b2010-05-21 14:37:18 +1000451 new_ctx = kmem_zalloc(sizeof(*new_ctx), KM_SLEEP|KM_NOFS);
452 new_ctx->ticket = xlog_cil_ticket_alloc(log);
453
Dave Chinner4c2d5422012-04-23 17:54:32 +1000454 down_write(&cil->xc_ctx_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000455 ctx = cil->xc_ctx;
456
Dave Chinner4bb928c2013-08-12 20:50:08 +1000457 spin_lock(&cil->xc_push_lock);
Dave Chinner4c2d5422012-04-23 17:54:32 +1000458 push_seq = cil->xc_push_seq;
459 ASSERT(push_seq <= ctx->sequence);
Dave Chinner71e330b2010-05-21 14:37:18 +1000460
Dave Chinner4c2d5422012-04-23 17:54:32 +1000461 /*
462 * Check if we've anything to push. If there is nothing, then we don't
463 * move on to a new sequence number and so we have to be able to push
464 * this sequence again later.
465 */
466 if (list_empty(&cil->xc_cil)) {
467 cil->xc_push_seq = 0;
Dave Chinner4bb928c2013-08-12 20:50:08 +1000468 spin_unlock(&cil->xc_push_lock);
Dave Chinnera44f13e2010-08-24 11:40:03 +1000469 goto out_skip;
Dave Chinner4c2d5422012-04-23 17:54:32 +1000470 }
Dave Chinner4bb928c2013-08-12 20:50:08 +1000471 spin_unlock(&cil->xc_push_lock);
Dave Chinner4c2d5422012-04-23 17:54:32 +1000472
Dave Chinnera44f13e2010-08-24 11:40:03 +1000473
474 /* check for a previously pushed seqeunce */
Dave Chinner4c2d5422012-04-23 17:54:32 +1000475 if (push_seq < cil->xc_ctx->sequence)
Dave Chinnerdf806152010-05-17 15:52:13 +1000476 goto out_skip;
477
Dave Chinner71e330b2010-05-21 14:37:18 +1000478 /*
479 * pull all the log vectors off the items in the CIL, and
480 * remove the items from the CIL. We don't need the CIL lock
481 * here because it's only needed on the transaction commit
482 * side which is currently locked out by the flush lock.
483 */
484 lv = NULL;
Dave Chinner71e330b2010-05-21 14:37:18 +1000485 num_iovecs = 0;
Dave Chinner71e330b2010-05-21 14:37:18 +1000486 while (!list_empty(&cil->xc_cil)) {
487 struct xfs_log_item *item;
Dave Chinner71e330b2010-05-21 14:37:18 +1000488
489 item = list_first_entry(&cil->xc_cil,
490 struct xfs_log_item, li_cil);
491 list_del_init(&item->li_cil);
492 if (!ctx->lv_chain)
493 ctx->lv_chain = item->li_lv;
494 else
495 lv->lv_next = item->li_lv;
496 lv = item->li_lv;
497 item->li_lv = NULL;
Dave Chinner71e330b2010-05-21 14:37:18 +1000498 num_iovecs += lv->lv_niovecs;
Dave Chinner71e330b2010-05-21 14:37:18 +1000499 }
500
501 /*
502 * initialise the new context and attach it to the CIL. Then attach
503 * the current context to the CIL committing lsit so it can be found
504 * during log forces to extract the commit lsn of the sequence that
505 * needs to be forced.
506 */
507 INIT_LIST_HEAD(&new_ctx->committing);
508 INIT_LIST_HEAD(&new_ctx->busy_extents);
509 new_ctx->sequence = ctx->sequence + 1;
510 new_ctx->cil = cil;
511 cil->xc_ctx = new_ctx;
512
513 /*
Dave Chinnera44f13e2010-08-24 11:40:03 +1000514 * mirror the new sequence into the cil structure so that we can do
515 * unlocked checks against the current sequence in log forces without
516 * risking deferencing a freed context pointer.
517 */
518 cil->xc_current_sequence = new_ctx->sequence;
519
520 /*
Dave Chinner71e330b2010-05-21 14:37:18 +1000521 * The switch is now done, so we can drop the context lock and move out
522 * of a shared context. We can't just go straight to the commit record,
523 * though - we need to synchronise with previous and future commits so
524 * that the commit records are correctly ordered in the log to ensure
525 * that we process items during log IO completion in the correct order.
526 *
527 * For example, if we get an EFI in one checkpoint and the EFD in the
528 * next (e.g. due to log forces), we do not want the checkpoint with
529 * the EFD to be committed before the checkpoint with the EFI. Hence
530 * we must strictly order the commit records of the checkpoints so
531 * that: a) the checkpoint callbacks are attached to the iclogs in the
532 * correct order; and b) the checkpoints are replayed in correct order
533 * in log recovery.
534 *
535 * Hence we need to add this context to the committing context list so
536 * that higher sequences will wait for us to write out a commit record
537 * before they do.
538 */
Dave Chinner4bb928c2013-08-12 20:50:08 +1000539 spin_lock(&cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000540 list_add(&ctx->committing, &cil->xc_committing);
Dave Chinner4bb928c2013-08-12 20:50:08 +1000541 spin_unlock(&cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000542 up_write(&cil->xc_ctx_lock);
543
544 /*
545 * Build a checkpoint transaction header and write it to the log to
546 * begin the transaction. We need to account for the space used by the
547 * transaction header here as it is not accounted for in xlog_write().
548 *
549 * The LSN we need to pass to the log items on transaction commit is
550 * the LSN reported by the first log vector write. If we use the commit
551 * record lsn then we can move the tail beyond the grant write head.
552 */
553 tic = ctx->ticket;
554 thdr.th_magic = XFS_TRANS_HEADER_MAGIC;
555 thdr.th_type = XFS_TRANS_CHECKPOINT;
556 thdr.th_tid = tic->t_tid;
557 thdr.th_num_items = num_iovecs;
Christoph Hellwig4e0d5f92010-06-23 18:11:15 +1000558 lhdr.i_addr = &thdr;
Dave Chinner71e330b2010-05-21 14:37:18 +1000559 lhdr.i_len = sizeof(xfs_trans_header_t);
560 lhdr.i_type = XLOG_REG_TYPE_TRANSHDR;
561 tic->t_curr_res -= lhdr.i_len + sizeof(xlog_op_header_t);
562
563 lvhdr.lv_niovecs = 1;
564 lvhdr.lv_iovecp = &lhdr;
565 lvhdr.lv_next = ctx->lv_chain;
566
567 error = xlog_write(log, &lvhdr, tic, &ctx->start_lsn, NULL, 0);
568 if (error)
Dave Chinner7db37c52011-01-27 12:02:00 +1100569 goto out_abort_free_ticket;
Dave Chinner71e330b2010-05-21 14:37:18 +1000570
571 /*
572 * now that we've written the checkpoint into the log, strictly
573 * order the commit records so replay will get them in the right order.
574 */
575restart:
Dave Chinner4bb928c2013-08-12 20:50:08 +1000576 spin_lock(&cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000577 list_for_each_entry(new_ctx, &cil->xc_committing, committing) {
578 /*
579 * Higher sequences will wait for this one so skip them.
580 * Don't wait for own own sequence, either.
581 */
582 if (new_ctx->sequence >= ctx->sequence)
583 continue;
584 if (!new_ctx->commit_lsn) {
585 /*
586 * It is still being pushed! Wait for the push to
587 * complete, then start again from the beginning.
588 */
Dave Chinner4bb928c2013-08-12 20:50:08 +1000589 xlog_wait(&cil->xc_commit_wait, &cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000590 goto restart;
591 }
592 }
Dave Chinner4bb928c2013-08-12 20:50:08 +1000593 spin_unlock(&cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000594
Dave Chinner7db37c52011-01-27 12:02:00 +1100595 /* xfs_log_done always frees the ticket on error. */
Dave Chinner71e330b2010-05-21 14:37:18 +1000596 commit_lsn = xfs_log_done(log->l_mp, tic, &commit_iclog, 0);
Dave Chinner7db37c52011-01-27 12:02:00 +1100597 if (commit_lsn == -1)
Dave Chinner71e330b2010-05-21 14:37:18 +1000598 goto out_abort;
599
600 /* attach all the transactions w/ busy extents to iclog */
601 ctx->log_cb.cb_func = xlog_cil_committed;
602 ctx->log_cb.cb_arg = ctx;
603 error = xfs_log_notify(log->l_mp, commit_iclog, &ctx->log_cb);
604 if (error)
605 goto out_abort;
606
607 /*
608 * now the checkpoint commit is complete and we've attached the
609 * callbacks to the iclog we can assign the commit LSN to the context
610 * and wake up anyone who is waiting for the commit to complete.
611 */
Dave Chinner4bb928c2013-08-12 20:50:08 +1000612 spin_lock(&cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000613 ctx->commit_lsn = commit_lsn;
Dave Chinnereb40a872010-12-21 12:09:01 +1100614 wake_up_all(&cil->xc_commit_wait);
Dave Chinner4bb928c2013-08-12 20:50:08 +1000615 spin_unlock(&cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000616
617 /* release the hounds! */
618 return xfs_log_release_iclog(log->l_mp, commit_iclog);
619
620out_skip:
621 up_write(&cil->xc_ctx_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000622 xfs_log_ticket_put(new_ctx->ticket);
623 kmem_free(new_ctx);
624 return 0;
625
Dave Chinner7db37c52011-01-27 12:02:00 +1100626out_abort_free_ticket:
627 xfs_log_ticket_put(tic);
Dave Chinner71e330b2010-05-21 14:37:18 +1000628out_abort:
629 xlog_cil_committed(ctx, XFS_LI_ABORTED);
630 return XFS_ERROR(EIO);
631}
632
Dave Chinner4c2d5422012-04-23 17:54:32 +1000633static void
634xlog_cil_push_work(
635 struct work_struct *work)
636{
637 struct xfs_cil *cil = container_of(work, struct xfs_cil,
638 xc_push_work);
639 xlog_cil_push(cil->xc_log);
640}
641
642/*
643 * We need to push CIL every so often so we don't cache more than we can fit in
644 * the log. The limit really is that a checkpoint can't be more than half the
645 * log (the current checkpoint is not allowed to overwrite the previous
646 * checkpoint), but commit latency and memory usage limit this to a smaller
647 * size.
648 */
649static void
650xlog_cil_push_background(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -0500651 struct xlog *log)
Dave Chinner4c2d5422012-04-23 17:54:32 +1000652{
653 struct xfs_cil *cil = log->l_cilp;
654
655 /*
656 * The cil won't be empty because we are called while holding the
657 * context lock so whatever we added to the CIL will still be there
658 */
659 ASSERT(!list_empty(&cil->xc_cil));
660
661 /*
662 * don't do a background push if we haven't used up all the
663 * space available yet.
664 */
665 if (cil->xc_ctx->space_used < XLOG_CIL_SPACE_LIMIT(log))
666 return;
667
Dave Chinner4bb928c2013-08-12 20:50:08 +1000668 spin_lock(&cil->xc_push_lock);
Dave Chinner4c2d5422012-04-23 17:54:32 +1000669 if (cil->xc_push_seq < cil->xc_current_sequence) {
670 cil->xc_push_seq = cil->xc_current_sequence;
671 queue_work(log->l_mp->m_cil_workqueue, &cil->xc_push_work);
672 }
Dave Chinner4bb928c2013-08-12 20:50:08 +1000673 spin_unlock(&cil->xc_push_lock);
Dave Chinner4c2d5422012-04-23 17:54:32 +1000674
675}
676
677static void
678xlog_cil_push_foreground(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -0500679 struct xlog *log,
Dave Chinner4c2d5422012-04-23 17:54:32 +1000680 xfs_lsn_t push_seq)
681{
682 struct xfs_cil *cil = log->l_cilp;
683
684 if (!cil)
685 return;
686
687 ASSERT(push_seq && push_seq <= cil->xc_current_sequence);
688
689 /* start on any pending background push to minimise wait time on it */
690 flush_work(&cil->xc_push_work);
691
692 /*
693 * If the CIL is empty or we've already pushed the sequence then
694 * there's no work we need to do.
695 */
Dave Chinner4bb928c2013-08-12 20:50:08 +1000696 spin_lock(&cil->xc_push_lock);
Dave Chinner4c2d5422012-04-23 17:54:32 +1000697 if (list_empty(&cil->xc_cil) || push_seq <= cil->xc_push_seq) {
Dave Chinner4bb928c2013-08-12 20:50:08 +1000698 spin_unlock(&cil->xc_push_lock);
Dave Chinner4c2d5422012-04-23 17:54:32 +1000699 return;
700 }
701
702 cil->xc_push_seq = push_seq;
Dave Chinner4bb928c2013-08-12 20:50:08 +1000703 spin_unlock(&cil->xc_push_lock);
Dave Chinner4c2d5422012-04-23 17:54:32 +1000704
705 /* do the push now */
706 xlog_cil_push(log);
707}
708
Dave Chinner2c6e24c2013-10-15 09:17:49 +1100709bool
710xlog_cil_empty(
711 struct xlog *log)
712{
713 struct xfs_cil *cil = log->l_cilp;
714 bool empty = false;
715
716 spin_lock(&cil->xc_push_lock);
717 if (list_empty(&cil->xc_cil))
718 empty = true;
719 spin_unlock(&cil->xc_push_lock);
720 return empty;
721}
722
Dave Chinner71e330b2010-05-21 14:37:18 +1000723/*
Dave Chinnera44f13e2010-08-24 11:40:03 +1000724 * Commit a transaction with the given vector to the Committed Item List.
725 *
726 * To do this, we need to format the item, pin it in memory if required and
727 * account for the space used by the transaction. Once we have done that we
728 * need to release the unused reservation for the transaction, attach the
729 * transaction to the checkpoint context so we carry the busy extents through
730 * to checkpoint completion, and then unlock all the items in the transaction.
731 *
Dave Chinnera44f13e2010-08-24 11:40:03 +1000732 * Called with the context lock already held in read mode to lock out
733 * background commit, returns without it held once background commits are
734 * allowed again.
735 */
Christoph Hellwig0244b962011-12-06 21:58:08 +0000736int
Dave Chinnera44f13e2010-08-24 11:40:03 +1000737xfs_log_commit_cil(
738 struct xfs_mount *mp,
739 struct xfs_trans *tp,
Dave Chinnera44f13e2010-08-24 11:40:03 +1000740 xfs_lsn_t *commit_lsn,
741 int flags)
742{
Mark Tinguelyf7bdf032012-06-14 09:22:15 -0500743 struct xlog *log = mp->m_log;
Dave Chinner991aaf62013-08-12 20:50:07 +1000744 struct xfs_cil *cil = log->l_cilp;
Dave Chinnera44f13e2010-08-24 11:40:03 +1000745 int log_flags = 0;
Dave Chinnera44f13e2010-08-24 11:40:03 +1000746
747 if (flags & XFS_TRANS_RELEASE_LOG_RES)
748 log_flags = XFS_LOG_REL_PERM_RESERV;
749
Dave Chinnerf5baac32013-08-12 20:50:06 +1000750 /* lock out background commit */
Dave Chinner991aaf62013-08-12 20:50:07 +1000751 down_read(&cil->xc_ctx_lock);
Dave Chinnerf5baac32013-08-12 20:50:06 +1000752
Dave Chinner991aaf62013-08-12 20:50:07 +1000753 xlog_cil_insert_items(log, tp);
Dave Chinnera44f13e2010-08-24 11:40:03 +1000754
755 /* check we didn't blow the reservation */
756 if (tp->t_ticket->t_curr_res < 0)
Dave Chinner991aaf62013-08-12 20:50:07 +1000757 xlog_print_tic_res(mp, tp->t_ticket);
Dave Chinnera44f13e2010-08-24 11:40:03 +1000758
Dave Chinner991aaf62013-08-12 20:50:07 +1000759 tp->t_commit_lsn = cil->xc_ctx->sequence;
760 if (commit_lsn)
761 *commit_lsn = tp->t_commit_lsn;
Dave Chinnera44f13e2010-08-24 11:40:03 +1000762
Dave Chinnera44f13e2010-08-24 11:40:03 +1000763 xfs_log_done(mp, tp->t_ticket, NULL, log_flags);
764 xfs_trans_unreserve_and_mod_sb(tp);
765
766 /*
767 * Once all the items of the transaction have been copied to the CIL,
768 * the items can be unlocked and freed.
769 *
770 * This needs to be done before we drop the CIL context lock because we
771 * have to update state in the log items and unlock them before they go
772 * to disk. If we don't, then the CIL checkpoint can race with us and
773 * we can run checkpoint completion before we've updated and unlocked
774 * the log items. This affects (at least) processing of stale buffers,
775 * inodes and EFIs.
776 */
Dave Chinner991aaf62013-08-12 20:50:07 +1000777 xfs_trans_free_items(tp, tp->t_commit_lsn, 0);
Dave Chinnera44f13e2010-08-24 11:40:03 +1000778
Dave Chinner4c2d5422012-04-23 17:54:32 +1000779 xlog_cil_push_background(log);
Dave Chinnera44f13e2010-08-24 11:40:03 +1000780
Dave Chinner991aaf62013-08-12 20:50:07 +1000781 up_read(&cil->xc_ctx_lock);
Christoph Hellwig0244b962011-12-06 21:58:08 +0000782 return 0;
Dave Chinnera44f13e2010-08-24 11:40:03 +1000783}
784
785/*
Dave Chinner71e330b2010-05-21 14:37:18 +1000786 * Conditionally push the CIL based on the sequence passed in.
787 *
788 * We only need to push if we haven't already pushed the sequence
789 * number given. Hence the only time we will trigger a push here is
790 * if the push sequence is the same as the current context.
791 *
792 * We return the current commit lsn to allow the callers to determine if a
793 * iclog flush is necessary following this call.
Dave Chinner71e330b2010-05-21 14:37:18 +1000794 */
795xfs_lsn_t
Dave Chinnera44f13e2010-08-24 11:40:03 +1000796xlog_cil_force_lsn(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -0500797 struct xlog *log,
Dave Chinnera44f13e2010-08-24 11:40:03 +1000798 xfs_lsn_t sequence)
Dave Chinner71e330b2010-05-21 14:37:18 +1000799{
800 struct xfs_cil *cil = log->l_cilp;
801 struct xfs_cil_ctx *ctx;
802 xfs_lsn_t commit_lsn = NULLCOMMITLSN;
803
Dave Chinnera44f13e2010-08-24 11:40:03 +1000804 ASSERT(sequence <= cil->xc_current_sequence);
Dave Chinner71e330b2010-05-21 14:37:18 +1000805
Dave Chinnera44f13e2010-08-24 11:40:03 +1000806 /*
807 * check to see if we need to force out the current context.
808 * xlog_cil_push() handles racing pushes for the same sequence,
809 * so no need to deal with it here.
810 */
Dave Chinner4c2d5422012-04-23 17:54:32 +1000811 xlog_cil_push_foreground(log, sequence);
Dave Chinner71e330b2010-05-21 14:37:18 +1000812
813 /*
814 * See if we can find a previous sequence still committing.
Dave Chinner71e330b2010-05-21 14:37:18 +1000815 * We need to wait for all previous sequence commits to complete
816 * before allowing the force of push_seq to go ahead. Hence block
817 * on commits for those as well.
818 */
Dave Chinnera44f13e2010-08-24 11:40:03 +1000819restart:
Dave Chinner4bb928c2013-08-12 20:50:08 +1000820 spin_lock(&cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000821 list_for_each_entry(ctx, &cil->xc_committing, committing) {
Dave Chinnera44f13e2010-08-24 11:40:03 +1000822 if (ctx->sequence > sequence)
Dave Chinner71e330b2010-05-21 14:37:18 +1000823 continue;
824 if (!ctx->commit_lsn) {
825 /*
826 * It is still being pushed! Wait for the push to
827 * complete, then start again from the beginning.
828 */
Dave Chinner4bb928c2013-08-12 20:50:08 +1000829 xlog_wait(&cil->xc_commit_wait, &cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000830 goto restart;
831 }
Dave Chinnera44f13e2010-08-24 11:40:03 +1000832 if (ctx->sequence != sequence)
Dave Chinner71e330b2010-05-21 14:37:18 +1000833 continue;
834 /* found it! */
835 commit_lsn = ctx->commit_lsn;
836 }
Dave Chinner4bb928c2013-08-12 20:50:08 +1000837 spin_unlock(&cil->xc_push_lock);
Dave Chinner71e330b2010-05-21 14:37:18 +1000838 return commit_lsn;
839}
Dave Chinnerccf7c232010-05-20 23:19:42 +1000840
841/*
842 * Check if the current log item was first committed in this sequence.
843 * We can't rely on just the log item being in the CIL, we have to check
844 * the recorded commit sequence number.
845 *
846 * Note: for this to be used in a non-racy manner, it has to be called with
847 * CIL flushing locked out. As a result, it should only be used during the
848 * transaction commit process when deciding what to format into the item.
849 */
850bool
851xfs_log_item_in_current_chkpt(
852 struct xfs_log_item *lip)
853{
854 struct xfs_cil_ctx *ctx;
855
Dave Chinnerccf7c232010-05-20 23:19:42 +1000856 if (list_empty(&lip->li_cil))
857 return false;
858
859 ctx = lip->li_mountp->m_log->l_cilp->xc_ctx;
860
861 /*
862 * li_seq is written on the first commit of a log item to record the
863 * first checkpoint it is written to. Hence if it is different to the
864 * current sequence, we're in a new checkpoint.
865 */
866 if (XFS_LSN_CMP(lip->li_seq, ctx->sequence) != 0)
867 return false;
868 return true;
869}
Dave Chinner4c2d5422012-04-23 17:54:32 +1000870
871/*
872 * Perform initial CIL structure initialisation.
873 */
874int
875xlog_cil_init(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -0500876 struct xlog *log)
Dave Chinner4c2d5422012-04-23 17:54:32 +1000877{
878 struct xfs_cil *cil;
879 struct xfs_cil_ctx *ctx;
880
881 cil = kmem_zalloc(sizeof(*cil), KM_SLEEP|KM_MAYFAIL);
882 if (!cil)
883 return ENOMEM;
884
885 ctx = kmem_zalloc(sizeof(*ctx), KM_SLEEP|KM_MAYFAIL);
886 if (!ctx) {
887 kmem_free(cil);
888 return ENOMEM;
889 }
890
891 INIT_WORK(&cil->xc_push_work, xlog_cil_push_work);
892 INIT_LIST_HEAD(&cil->xc_cil);
893 INIT_LIST_HEAD(&cil->xc_committing);
894 spin_lock_init(&cil->xc_cil_lock);
Dave Chinner4bb928c2013-08-12 20:50:08 +1000895 spin_lock_init(&cil->xc_push_lock);
Dave Chinner4c2d5422012-04-23 17:54:32 +1000896 init_rwsem(&cil->xc_ctx_lock);
897 init_waitqueue_head(&cil->xc_commit_wait);
898
899 INIT_LIST_HEAD(&ctx->committing);
900 INIT_LIST_HEAD(&ctx->busy_extents);
901 ctx->sequence = 1;
902 ctx->cil = cil;
903 cil->xc_ctx = ctx;
904 cil->xc_current_sequence = ctx->sequence;
905
906 cil->xc_log = log;
907 log->l_cilp = cil;
908 return 0;
909}
910
911void
912xlog_cil_destroy(
Mark Tinguelyf7bdf032012-06-14 09:22:15 -0500913 struct xlog *log)
Dave Chinner4c2d5422012-04-23 17:54:32 +1000914{
915 if (log->l_cilp->xc_ctx) {
916 if (log->l_cilp->xc_ctx->ticket)
917 xfs_log_ticket_put(log->l_cilp->xc_ctx->ticket);
918 kmem_free(log->l_cilp->xc_ctx);
919 }
920
921 ASSERT(list_empty(&log->l_cilp->xc_cil));
922 kmem_free(log->l_cilp);
923}
924