xref: /openbmc/linux/fs/xfs/libxfs/xfs_dir2_node.c (revision 113094f7)
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * Copyright (c) 2000-2005 Silicon Graphics, Inc.
4  * Copyright (c) 2013 Red Hat, Inc.
5  * All Rights Reserved.
6  */
7 #include "xfs.h"
8 #include "xfs_fs.h"
9 #include "xfs_shared.h"
10 #include "xfs_format.h"
11 #include "xfs_log_format.h"
12 #include "xfs_trans_resv.h"
13 #include "xfs_mount.h"
14 #include "xfs_inode.h"
15 #include "xfs_bmap.h"
16 #include "xfs_dir2.h"
17 #include "xfs_dir2_priv.h"
18 #include "xfs_error.h"
19 #include "xfs_trace.h"
20 #include "xfs_trans.h"
21 #include "xfs_buf_item.h"
22 #include "xfs_log.h"
23 
24 /*
25  * Function declarations.
26  */
27 static int xfs_dir2_leafn_add(struct xfs_buf *bp, xfs_da_args_t *args,
28 			      int index);
29 static void xfs_dir2_leafn_rebalance(xfs_da_state_t *state,
30 				     xfs_da_state_blk_t *blk1,
31 				     xfs_da_state_blk_t *blk2);
32 static int xfs_dir2_leafn_remove(xfs_da_args_t *args, struct xfs_buf *bp,
33 				 int index, xfs_da_state_blk_t *dblk,
34 				 int *rval);
35 static int xfs_dir2_node_addname_int(xfs_da_args_t *args,
36 				     xfs_da_state_blk_t *fblk);
37 
38 /*
39  * Check internal consistency of a leafn block.
40  */
41 #ifdef DEBUG
42 static xfs_failaddr_t
43 xfs_dir3_leafn_check(
44 	struct xfs_inode	*dp,
45 	struct xfs_buf		*bp)
46 {
47 	struct xfs_dir2_leaf	*leaf = bp->b_addr;
48 	struct xfs_dir3_icleaf_hdr leafhdr;
49 
50 	dp->d_ops->leaf_hdr_from_disk(&leafhdr, leaf);
51 
52 	if (leafhdr.magic == XFS_DIR3_LEAFN_MAGIC) {
53 		struct xfs_dir3_leaf_hdr *leaf3 = bp->b_addr;
54 		if (be64_to_cpu(leaf3->info.blkno) != bp->b_bn)
55 			return __this_address;
56 	} else if (leafhdr.magic != XFS_DIR2_LEAFN_MAGIC)
57 		return __this_address;
58 
59 	return xfs_dir3_leaf_check_int(dp->i_mount, dp, &leafhdr, leaf);
60 }
61 
62 static inline void
63 xfs_dir3_leaf_check(
64 	struct xfs_inode	*dp,
65 	struct xfs_buf		*bp)
66 {
67 	xfs_failaddr_t		fa;
68 
69 	fa = xfs_dir3_leafn_check(dp, bp);
70 	if (!fa)
71 		return;
72 	xfs_corruption_error(__func__, XFS_ERRLEVEL_LOW, dp->i_mount,
73 			bp->b_addr, BBTOB(bp->b_length), __FILE__, __LINE__,
74 			fa);
75 	ASSERT(0);
76 }
77 #else
78 #define	xfs_dir3_leaf_check(dp, bp)
79 #endif
80 
81 static xfs_failaddr_t
82 xfs_dir3_free_verify(
83 	struct xfs_buf		*bp)
84 {
85 	struct xfs_mount	*mp = bp->b_mount;
86 	struct xfs_dir2_free_hdr *hdr = bp->b_addr;
87 
88 	if (!xfs_verify_magic(bp, hdr->magic))
89 		return __this_address;
90 
91 	if (xfs_sb_version_hascrc(&mp->m_sb)) {
92 		struct xfs_dir3_blk_hdr *hdr3 = bp->b_addr;
93 
94 		if (!uuid_equal(&hdr3->uuid, &mp->m_sb.sb_meta_uuid))
95 			return __this_address;
96 		if (be64_to_cpu(hdr3->blkno) != bp->b_bn)
97 			return __this_address;
98 		if (!xfs_log_check_lsn(mp, be64_to_cpu(hdr3->lsn)))
99 			return __this_address;
100 	}
101 
102 	/* XXX: should bounds check the xfs_dir3_icfree_hdr here */
103 
104 	return NULL;
105 }
106 
107 static void
108 xfs_dir3_free_read_verify(
109 	struct xfs_buf	*bp)
110 {
111 	struct xfs_mount	*mp = bp->b_mount;
112 	xfs_failaddr_t		fa;
113 
114 	if (xfs_sb_version_hascrc(&mp->m_sb) &&
115 	    !xfs_buf_verify_cksum(bp, XFS_DIR3_FREE_CRC_OFF))
116 		xfs_verifier_error(bp, -EFSBADCRC, __this_address);
117 	else {
118 		fa = xfs_dir3_free_verify(bp);
119 		if (fa)
120 			xfs_verifier_error(bp, -EFSCORRUPTED, fa);
121 	}
122 }
123 
124 static void
125 xfs_dir3_free_write_verify(
126 	struct xfs_buf	*bp)
127 {
128 	struct xfs_mount	*mp = bp->b_mount;
129 	struct xfs_buf_log_item	*bip = bp->b_log_item;
130 	struct xfs_dir3_blk_hdr	*hdr3 = bp->b_addr;
131 	xfs_failaddr_t		fa;
132 
133 	fa = xfs_dir3_free_verify(bp);
134 	if (fa) {
135 		xfs_verifier_error(bp, -EFSCORRUPTED, fa);
136 		return;
137 	}
138 
139 	if (!xfs_sb_version_hascrc(&mp->m_sb))
140 		return;
141 
142 	if (bip)
143 		hdr3->lsn = cpu_to_be64(bip->bli_item.li_lsn);
144 
145 	xfs_buf_update_cksum(bp, XFS_DIR3_FREE_CRC_OFF);
146 }
147 
148 const struct xfs_buf_ops xfs_dir3_free_buf_ops = {
149 	.name = "xfs_dir3_free",
150 	.magic = { cpu_to_be32(XFS_DIR2_FREE_MAGIC),
151 		   cpu_to_be32(XFS_DIR3_FREE_MAGIC) },
152 	.verify_read = xfs_dir3_free_read_verify,
153 	.verify_write = xfs_dir3_free_write_verify,
154 	.verify_struct = xfs_dir3_free_verify,
155 };
156 
157 /* Everything ok in the free block header? */
158 static xfs_failaddr_t
159 xfs_dir3_free_header_check(
160 	struct xfs_inode	*dp,
161 	xfs_dablk_t		fbno,
162 	struct xfs_buf		*bp)
163 {
164 	struct xfs_mount	*mp = dp->i_mount;
165 	unsigned int		firstdb;
166 	int			maxbests;
167 
168 	maxbests = dp->d_ops->free_max_bests(mp->m_dir_geo);
169 	firstdb = (xfs_dir2_da_to_db(mp->m_dir_geo, fbno) -
170 		   xfs_dir2_byte_to_db(mp->m_dir_geo, XFS_DIR2_FREE_OFFSET)) *
171 			maxbests;
172 	if (xfs_sb_version_hascrc(&mp->m_sb)) {
173 		struct xfs_dir3_free_hdr *hdr3 = bp->b_addr;
174 
175 		if (be32_to_cpu(hdr3->firstdb) != firstdb)
176 			return __this_address;
177 		if (be32_to_cpu(hdr3->nvalid) > maxbests)
178 			return __this_address;
179 		if (be32_to_cpu(hdr3->nvalid) < be32_to_cpu(hdr3->nused))
180 			return __this_address;
181 	} else {
182 		struct xfs_dir2_free_hdr *hdr = bp->b_addr;
183 
184 		if (be32_to_cpu(hdr->firstdb) != firstdb)
185 			return __this_address;
186 		if (be32_to_cpu(hdr->nvalid) > maxbests)
187 			return __this_address;
188 		if (be32_to_cpu(hdr->nvalid) < be32_to_cpu(hdr->nused))
189 			return __this_address;
190 	}
191 	return NULL;
192 }
193 
194 static int
195 __xfs_dir3_free_read(
196 	struct xfs_trans	*tp,
197 	struct xfs_inode	*dp,
198 	xfs_dablk_t		fbno,
199 	xfs_daddr_t		mappedbno,
200 	struct xfs_buf		**bpp)
201 {
202 	xfs_failaddr_t		fa;
203 	int			err;
204 
205 	err = xfs_da_read_buf(tp, dp, fbno, mappedbno, bpp,
206 				XFS_DATA_FORK, &xfs_dir3_free_buf_ops);
207 	if (err || !*bpp)
208 		return err;
209 
210 	/* Check things that we can't do in the verifier. */
211 	fa = xfs_dir3_free_header_check(dp, fbno, *bpp);
212 	if (fa) {
213 		xfs_verifier_error(*bpp, -EFSCORRUPTED, fa);
214 		xfs_trans_brelse(tp, *bpp);
215 		return -EFSCORRUPTED;
216 	}
217 
218 	/* try read returns without an error or *bpp if it lands in a hole */
219 	if (tp)
220 		xfs_trans_buf_set_type(tp, *bpp, XFS_BLFT_DIR_FREE_BUF);
221 
222 	return 0;
223 }
224 
225 int
226 xfs_dir2_free_read(
227 	struct xfs_trans	*tp,
228 	struct xfs_inode	*dp,
229 	xfs_dablk_t		fbno,
230 	struct xfs_buf		**bpp)
231 {
232 	return __xfs_dir3_free_read(tp, dp, fbno, -1, bpp);
233 }
234 
235 static int
236 xfs_dir2_free_try_read(
237 	struct xfs_trans	*tp,
238 	struct xfs_inode	*dp,
239 	xfs_dablk_t		fbno,
240 	struct xfs_buf		**bpp)
241 {
242 	return __xfs_dir3_free_read(tp, dp, fbno, -2, bpp);
243 }
244 
245 static int
246 xfs_dir3_free_get_buf(
247 	xfs_da_args_t		*args,
248 	xfs_dir2_db_t		fbno,
249 	struct xfs_buf		**bpp)
250 {
251 	struct xfs_trans	*tp = args->trans;
252 	struct xfs_inode	*dp = args->dp;
253 	struct xfs_mount	*mp = dp->i_mount;
254 	struct xfs_buf		*bp;
255 	int			error;
256 	struct xfs_dir3_icfree_hdr hdr;
257 
258 	error = xfs_da_get_buf(tp, dp, xfs_dir2_db_to_da(args->geo, fbno),
259 				   -1, &bp, XFS_DATA_FORK);
260 	if (error)
261 		return error;
262 
263 	xfs_trans_buf_set_type(tp, bp, XFS_BLFT_DIR_FREE_BUF);
264 	bp->b_ops = &xfs_dir3_free_buf_ops;
265 
266 	/*
267 	 * Initialize the new block to be empty, and remember
268 	 * its first slot as our empty slot.
269 	 */
270 	memset(bp->b_addr, 0, sizeof(struct xfs_dir3_free_hdr));
271 	memset(&hdr, 0, sizeof(hdr));
272 
273 	if (xfs_sb_version_hascrc(&mp->m_sb)) {
274 		struct xfs_dir3_free_hdr *hdr3 = bp->b_addr;
275 
276 		hdr.magic = XFS_DIR3_FREE_MAGIC;
277 
278 		hdr3->hdr.blkno = cpu_to_be64(bp->b_bn);
279 		hdr3->hdr.owner = cpu_to_be64(dp->i_ino);
280 		uuid_copy(&hdr3->hdr.uuid, &mp->m_sb.sb_meta_uuid);
281 	} else
282 		hdr.magic = XFS_DIR2_FREE_MAGIC;
283 	dp->d_ops->free_hdr_to_disk(bp->b_addr, &hdr);
284 	*bpp = bp;
285 	return 0;
286 }
287 
288 /*
289  * Log entries from a freespace block.
290  */
291 STATIC void
292 xfs_dir2_free_log_bests(
293 	struct xfs_da_args	*args,
294 	struct xfs_buf		*bp,
295 	int			first,		/* first entry to log */
296 	int			last)		/* last entry to log */
297 {
298 	xfs_dir2_free_t		*free;		/* freespace structure */
299 	__be16			*bests;
300 
301 	free = bp->b_addr;
302 	bests = args->dp->d_ops->free_bests_p(free);
303 	ASSERT(free->hdr.magic == cpu_to_be32(XFS_DIR2_FREE_MAGIC) ||
304 	       free->hdr.magic == cpu_to_be32(XFS_DIR3_FREE_MAGIC));
305 	xfs_trans_log_buf(args->trans, bp,
306 		(uint)((char *)&bests[first] - (char *)free),
307 		(uint)((char *)&bests[last] - (char *)free +
308 		       sizeof(bests[0]) - 1));
309 }
310 
311 /*
312  * Log header from a freespace block.
313  */
314 static void
315 xfs_dir2_free_log_header(
316 	struct xfs_da_args	*args,
317 	struct xfs_buf		*bp)
318 {
319 #ifdef DEBUG
320 	xfs_dir2_free_t		*free;		/* freespace structure */
321 
322 	free = bp->b_addr;
323 	ASSERT(free->hdr.magic == cpu_to_be32(XFS_DIR2_FREE_MAGIC) ||
324 	       free->hdr.magic == cpu_to_be32(XFS_DIR3_FREE_MAGIC));
325 #endif
326 	xfs_trans_log_buf(args->trans, bp, 0,
327 			  args->dp->d_ops->free_hdr_size - 1);
328 }
329 
330 /*
331  * Convert a leaf-format directory to a node-format directory.
332  * We need to change the magic number of the leaf block, and copy
333  * the freespace table out of the leaf block into its own block.
334  */
335 int						/* error */
336 xfs_dir2_leaf_to_node(
337 	xfs_da_args_t		*args,		/* operation arguments */
338 	struct xfs_buf		*lbp)		/* leaf buffer */
339 {
340 	xfs_inode_t		*dp;		/* incore directory inode */
341 	int			error;		/* error return value */
342 	struct xfs_buf		*fbp;		/* freespace buffer */
343 	xfs_dir2_db_t		fdb;		/* freespace block number */
344 	xfs_dir2_free_t		*free;		/* freespace structure */
345 	__be16			*from;		/* pointer to freespace entry */
346 	int			i;		/* leaf freespace index */
347 	xfs_dir2_leaf_t		*leaf;		/* leaf structure */
348 	xfs_dir2_leaf_tail_t	*ltp;		/* leaf tail structure */
349 	int			n;		/* count of live freespc ents */
350 	xfs_dir2_data_off_t	off;		/* freespace entry value */
351 	__be16			*to;		/* pointer to freespace entry */
352 	xfs_trans_t		*tp;		/* transaction pointer */
353 	struct xfs_dir3_icfree_hdr freehdr;
354 
355 	trace_xfs_dir2_leaf_to_node(args);
356 
357 	dp = args->dp;
358 	tp = args->trans;
359 	/*
360 	 * Add a freespace block to the directory.
361 	 */
362 	if ((error = xfs_dir2_grow_inode(args, XFS_DIR2_FREE_SPACE, &fdb))) {
363 		return error;
364 	}
365 	ASSERT(fdb == xfs_dir2_byte_to_db(args->geo, XFS_DIR2_FREE_OFFSET));
366 	/*
367 	 * Get the buffer for the new freespace block.
368 	 */
369 	error = xfs_dir3_free_get_buf(args, fdb, &fbp);
370 	if (error)
371 		return error;
372 
373 	free = fbp->b_addr;
374 	dp->d_ops->free_hdr_from_disk(&freehdr, free);
375 	leaf = lbp->b_addr;
376 	ltp = xfs_dir2_leaf_tail_p(args->geo, leaf);
377 	if (be32_to_cpu(ltp->bestcount) >
378 				(uint)dp->i_d.di_size / args->geo->blksize)
379 		return -EFSCORRUPTED;
380 
381 	/*
382 	 * Copy freespace entries from the leaf block to the new block.
383 	 * Count active entries.
384 	 */
385 	from = xfs_dir2_leaf_bests_p(ltp);
386 	to = dp->d_ops->free_bests_p(free);
387 	for (i = n = 0; i < be32_to_cpu(ltp->bestcount); i++, from++, to++) {
388 		if ((off = be16_to_cpu(*from)) != NULLDATAOFF)
389 			n++;
390 		*to = cpu_to_be16(off);
391 	}
392 
393 	/*
394 	 * Now initialize the freespace block header.
395 	 */
396 	freehdr.nused = n;
397 	freehdr.nvalid = be32_to_cpu(ltp->bestcount);
398 
399 	dp->d_ops->free_hdr_to_disk(fbp->b_addr, &freehdr);
400 	xfs_dir2_free_log_bests(args, fbp, 0, freehdr.nvalid - 1);
401 	xfs_dir2_free_log_header(args, fbp);
402 
403 	/*
404 	 * Converting the leaf to a leafnode is just a matter of changing the
405 	 * magic number and the ops. Do the change directly to the buffer as
406 	 * it's less work (and less code) than decoding the header to host
407 	 * format and back again.
408 	 */
409 	if (leaf->hdr.info.magic == cpu_to_be16(XFS_DIR2_LEAF1_MAGIC))
410 		leaf->hdr.info.magic = cpu_to_be16(XFS_DIR2_LEAFN_MAGIC);
411 	else
412 		leaf->hdr.info.magic = cpu_to_be16(XFS_DIR3_LEAFN_MAGIC);
413 	lbp->b_ops = &xfs_dir3_leafn_buf_ops;
414 	xfs_trans_buf_set_type(tp, lbp, XFS_BLFT_DIR_LEAFN_BUF);
415 	xfs_dir3_leaf_log_header(args, lbp);
416 	xfs_dir3_leaf_check(dp, lbp);
417 	return 0;
418 }
419 
420 /*
421  * Add a leaf entry to a leaf block in a node-form directory.
422  * The other work necessary is done from the caller.
423  */
424 static int					/* error */
425 xfs_dir2_leafn_add(
426 	struct xfs_buf		*bp,		/* leaf buffer */
427 	struct xfs_da_args	*args,		/* operation arguments */
428 	int			index)		/* insertion pt for new entry */
429 {
430 	struct xfs_dir3_icleaf_hdr leafhdr;
431 	struct xfs_inode	*dp = args->dp;
432 	struct xfs_dir2_leaf	*leaf = bp->b_addr;
433 	struct xfs_dir2_leaf_entry *lep;
434 	struct xfs_dir2_leaf_entry *ents;
435 	int			compact;	/* compacting stale leaves */
436 	int			highstale = 0;	/* next stale entry */
437 	int			lfloghigh;	/* high leaf entry logging */
438 	int			lfloglow;	/* low leaf entry logging */
439 	int			lowstale = 0;	/* previous stale entry */
440 
441 	trace_xfs_dir2_leafn_add(args, index);
442 
443 	dp->d_ops->leaf_hdr_from_disk(&leafhdr, leaf);
444 	ents = dp->d_ops->leaf_ents_p(leaf);
445 
446 	/*
447 	 * Quick check just to make sure we are not going to index
448 	 * into other peoples memory
449 	 */
450 	if (index < 0)
451 		return -EFSCORRUPTED;
452 
453 	/*
454 	 * If there are already the maximum number of leaf entries in
455 	 * the block, if there are no stale entries it won't fit.
456 	 * Caller will do a split.  If there are stale entries we'll do
457 	 * a compact.
458 	 */
459 
460 	if (leafhdr.count == dp->d_ops->leaf_max_ents(args->geo)) {
461 		if (!leafhdr.stale)
462 			return -ENOSPC;
463 		compact = leafhdr.stale > 1;
464 	} else
465 		compact = 0;
466 	ASSERT(index == 0 || be32_to_cpu(ents[index - 1].hashval) <= args->hashval);
467 	ASSERT(index == leafhdr.count ||
468 	       be32_to_cpu(ents[index].hashval) >= args->hashval);
469 
470 	if (args->op_flags & XFS_DA_OP_JUSTCHECK)
471 		return 0;
472 
473 	/*
474 	 * Compact out all but one stale leaf entry.  Leaves behind
475 	 * the entry closest to index.
476 	 */
477 	if (compact)
478 		xfs_dir3_leaf_compact_x1(&leafhdr, ents, &index, &lowstale,
479 					 &highstale, &lfloglow, &lfloghigh);
480 	else if (leafhdr.stale) {
481 		/*
482 		 * Set impossible logging indices for this case.
483 		 */
484 		lfloglow = leafhdr.count;
485 		lfloghigh = -1;
486 	}
487 
488 	/*
489 	 * Insert the new entry, log everything.
490 	 */
491 	lep = xfs_dir3_leaf_find_entry(&leafhdr, ents, index, compact, lowstale,
492 				       highstale, &lfloglow, &lfloghigh);
493 
494 	lep->hashval = cpu_to_be32(args->hashval);
495 	lep->address = cpu_to_be32(xfs_dir2_db_off_to_dataptr(args->geo,
496 				args->blkno, args->index));
497 
498 	dp->d_ops->leaf_hdr_to_disk(leaf, &leafhdr);
499 	xfs_dir3_leaf_log_header(args, bp);
500 	xfs_dir3_leaf_log_ents(args, bp, lfloglow, lfloghigh);
501 	xfs_dir3_leaf_check(dp, bp);
502 	return 0;
503 }
504 
505 #ifdef DEBUG
506 static void
507 xfs_dir2_free_hdr_check(
508 	struct xfs_inode *dp,
509 	struct xfs_buf	*bp,
510 	xfs_dir2_db_t	db)
511 {
512 	struct xfs_dir3_icfree_hdr hdr;
513 
514 	dp->d_ops->free_hdr_from_disk(&hdr, bp->b_addr);
515 
516 	ASSERT((hdr.firstdb %
517 		dp->d_ops->free_max_bests(dp->i_mount->m_dir_geo)) == 0);
518 	ASSERT(hdr.firstdb <= db);
519 	ASSERT(db < hdr.firstdb + hdr.nvalid);
520 }
521 #else
522 #define xfs_dir2_free_hdr_check(dp, bp, db)
523 #endif	/* DEBUG */
524 
525 /*
526  * Return the last hash value in the leaf.
527  * Stale entries are ok.
528  */
529 xfs_dahash_t					/* hash value */
530 xfs_dir2_leaf_lasthash(
531 	struct xfs_inode *dp,
532 	struct xfs_buf	*bp,			/* leaf buffer */
533 	int		*count)			/* count of entries in leaf */
534 {
535 	struct xfs_dir2_leaf	*leaf = bp->b_addr;
536 	struct xfs_dir2_leaf_entry *ents;
537 	struct xfs_dir3_icleaf_hdr leafhdr;
538 
539 	dp->d_ops->leaf_hdr_from_disk(&leafhdr, leaf);
540 
541 	ASSERT(leafhdr.magic == XFS_DIR2_LEAFN_MAGIC ||
542 	       leafhdr.magic == XFS_DIR3_LEAFN_MAGIC ||
543 	       leafhdr.magic == XFS_DIR2_LEAF1_MAGIC ||
544 	       leafhdr.magic == XFS_DIR3_LEAF1_MAGIC);
545 
546 	if (count)
547 		*count = leafhdr.count;
548 	if (!leafhdr.count)
549 		return 0;
550 
551 	ents = dp->d_ops->leaf_ents_p(leaf);
552 	return be32_to_cpu(ents[leafhdr.count - 1].hashval);
553 }
554 
555 /*
556  * Look up a leaf entry for space to add a name in a node-format leaf block.
557  * The extrablk in state is a freespace block.
558  */
559 STATIC int
560 xfs_dir2_leafn_lookup_for_addname(
561 	struct xfs_buf		*bp,		/* leaf buffer */
562 	xfs_da_args_t		*args,		/* operation arguments */
563 	int			*indexp,	/* out: leaf entry index */
564 	xfs_da_state_t		*state)		/* state to fill in */
565 {
566 	struct xfs_buf		*curbp = NULL;	/* current data/free buffer */
567 	xfs_dir2_db_t		curdb = -1;	/* current data block number */
568 	xfs_dir2_db_t		curfdb = -1;	/* current free block number */
569 	xfs_inode_t		*dp;		/* incore directory inode */
570 	int			error;		/* error return value */
571 	int			fi;		/* free entry index */
572 	xfs_dir2_free_t		*free = NULL;	/* free block structure */
573 	int			index;		/* leaf entry index */
574 	xfs_dir2_leaf_t		*leaf;		/* leaf structure */
575 	int			length;		/* length of new data entry */
576 	xfs_dir2_leaf_entry_t	*lep;		/* leaf entry */
577 	xfs_mount_t		*mp;		/* filesystem mount point */
578 	xfs_dir2_db_t		newdb;		/* new data block number */
579 	xfs_dir2_db_t		newfdb;		/* new free block number */
580 	xfs_trans_t		*tp;		/* transaction pointer */
581 	struct xfs_dir2_leaf_entry *ents;
582 	struct xfs_dir3_icleaf_hdr leafhdr;
583 
584 	dp = args->dp;
585 	tp = args->trans;
586 	mp = dp->i_mount;
587 	leaf = bp->b_addr;
588 	dp->d_ops->leaf_hdr_from_disk(&leafhdr, leaf);
589 	ents = dp->d_ops->leaf_ents_p(leaf);
590 
591 	xfs_dir3_leaf_check(dp, bp);
592 	ASSERT(leafhdr.count > 0);
593 
594 	/*
595 	 * Look up the hash value in the leaf entries.
596 	 */
597 	index = xfs_dir2_leaf_search_hash(args, bp);
598 	/*
599 	 * Do we have a buffer coming in?
600 	 */
601 	if (state->extravalid) {
602 		/* If so, it's a free block buffer, get the block number. */
603 		curbp = state->extrablk.bp;
604 		curfdb = state->extrablk.blkno;
605 		free = curbp->b_addr;
606 		ASSERT(free->hdr.magic == cpu_to_be32(XFS_DIR2_FREE_MAGIC) ||
607 		       free->hdr.magic == cpu_to_be32(XFS_DIR3_FREE_MAGIC));
608 	}
609 	length = dp->d_ops->data_entsize(args->namelen);
610 	/*
611 	 * Loop over leaf entries with the right hash value.
612 	 */
613 	for (lep = &ents[index];
614 	     index < leafhdr.count && be32_to_cpu(lep->hashval) == args->hashval;
615 	     lep++, index++) {
616 		/*
617 		 * Skip stale leaf entries.
618 		 */
619 		if (be32_to_cpu(lep->address) == XFS_DIR2_NULL_DATAPTR)
620 			continue;
621 		/*
622 		 * Pull the data block number from the entry.
623 		 */
624 		newdb = xfs_dir2_dataptr_to_db(args->geo,
625 					       be32_to_cpu(lep->address));
626 		/*
627 		 * For addname, we're looking for a place to put the new entry.
628 		 * We want to use a data block with an entry of equal
629 		 * hash value to ours if there is one with room.
630 		 *
631 		 * If this block isn't the data block we already have
632 		 * in hand, take a look at it.
633 		 */
634 		if (newdb != curdb) {
635 			__be16 *bests;
636 
637 			curdb = newdb;
638 			/*
639 			 * Convert the data block to the free block
640 			 * holding its freespace information.
641 			 */
642 			newfdb = dp->d_ops->db_to_fdb(args->geo, newdb);
643 			/*
644 			 * If it's not the one we have in hand, read it in.
645 			 */
646 			if (newfdb != curfdb) {
647 				/*
648 				 * If we had one before, drop it.
649 				 */
650 				if (curbp)
651 					xfs_trans_brelse(tp, curbp);
652 
653 				error = xfs_dir2_free_read(tp, dp,
654 						xfs_dir2_db_to_da(args->geo,
655 								  newfdb),
656 						&curbp);
657 				if (error)
658 					return error;
659 				free = curbp->b_addr;
660 
661 				xfs_dir2_free_hdr_check(dp, curbp, curdb);
662 			}
663 			/*
664 			 * Get the index for our entry.
665 			 */
666 			fi = dp->d_ops->db_to_fdindex(args->geo, curdb);
667 			/*
668 			 * If it has room, return it.
669 			 */
670 			bests = dp->d_ops->free_bests_p(free);
671 			if (unlikely(bests[fi] == cpu_to_be16(NULLDATAOFF))) {
672 				XFS_ERROR_REPORT("xfs_dir2_leafn_lookup_int",
673 							XFS_ERRLEVEL_LOW, mp);
674 				if (curfdb != newfdb)
675 					xfs_trans_brelse(tp, curbp);
676 				return -EFSCORRUPTED;
677 			}
678 			curfdb = newfdb;
679 			if (be16_to_cpu(bests[fi]) >= length)
680 				goto out;
681 		}
682 	}
683 	/* Didn't find any space */
684 	fi = -1;
685 out:
686 	ASSERT(args->op_flags & XFS_DA_OP_OKNOENT);
687 	if (curbp) {
688 		/* Giving back a free block. */
689 		state->extravalid = 1;
690 		state->extrablk.bp = curbp;
691 		state->extrablk.index = fi;
692 		state->extrablk.blkno = curfdb;
693 
694 		/*
695 		 * Important: this magic number is not in the buffer - it's for
696 		 * buffer type information and therefore only the free/data type
697 		 * matters here, not whether CRCs are enabled or not.
698 		 */
699 		state->extrablk.magic = XFS_DIR2_FREE_MAGIC;
700 	} else {
701 		state->extravalid = 0;
702 	}
703 	/*
704 	 * Return the index, that will be the insertion point.
705 	 */
706 	*indexp = index;
707 	return -ENOENT;
708 }
709 
710 /*
711  * Look up a leaf entry in a node-format leaf block.
712  * The extrablk in state a data block.
713  */
714 STATIC int
715 xfs_dir2_leafn_lookup_for_entry(
716 	struct xfs_buf		*bp,		/* leaf buffer */
717 	xfs_da_args_t		*args,		/* operation arguments */
718 	int			*indexp,	/* out: leaf entry index */
719 	xfs_da_state_t		*state)		/* state to fill in */
720 {
721 	struct xfs_buf		*curbp = NULL;	/* current data/free buffer */
722 	xfs_dir2_db_t		curdb = -1;	/* current data block number */
723 	xfs_dir2_data_entry_t	*dep;		/* data block entry */
724 	xfs_inode_t		*dp;		/* incore directory inode */
725 	int			error;		/* error return value */
726 	int			index;		/* leaf entry index */
727 	xfs_dir2_leaf_t		*leaf;		/* leaf structure */
728 	xfs_dir2_leaf_entry_t	*lep;		/* leaf entry */
729 	xfs_mount_t		*mp;		/* filesystem mount point */
730 	xfs_dir2_db_t		newdb;		/* new data block number */
731 	xfs_trans_t		*tp;		/* transaction pointer */
732 	enum xfs_dacmp		cmp;		/* comparison result */
733 	struct xfs_dir2_leaf_entry *ents;
734 	struct xfs_dir3_icleaf_hdr leafhdr;
735 
736 	dp = args->dp;
737 	tp = args->trans;
738 	mp = dp->i_mount;
739 	leaf = bp->b_addr;
740 	dp->d_ops->leaf_hdr_from_disk(&leafhdr, leaf);
741 	ents = dp->d_ops->leaf_ents_p(leaf);
742 
743 	xfs_dir3_leaf_check(dp, bp);
744 	ASSERT(leafhdr.count > 0);
745 
746 	/*
747 	 * Look up the hash value in the leaf entries.
748 	 */
749 	index = xfs_dir2_leaf_search_hash(args, bp);
750 	/*
751 	 * Do we have a buffer coming in?
752 	 */
753 	if (state->extravalid) {
754 		curbp = state->extrablk.bp;
755 		curdb = state->extrablk.blkno;
756 	}
757 	/*
758 	 * Loop over leaf entries with the right hash value.
759 	 */
760 	for (lep = &ents[index];
761 	     index < leafhdr.count && be32_to_cpu(lep->hashval) == args->hashval;
762 	     lep++, index++) {
763 		/*
764 		 * Skip stale leaf entries.
765 		 */
766 		if (be32_to_cpu(lep->address) == XFS_DIR2_NULL_DATAPTR)
767 			continue;
768 		/*
769 		 * Pull the data block number from the entry.
770 		 */
771 		newdb = xfs_dir2_dataptr_to_db(args->geo,
772 					       be32_to_cpu(lep->address));
773 		/*
774 		 * Not adding a new entry, so we really want to find
775 		 * the name given to us.
776 		 *
777 		 * If it's a different data block, go get it.
778 		 */
779 		if (newdb != curdb) {
780 			/*
781 			 * If we had a block before that we aren't saving
782 			 * for a CI name, drop it
783 			 */
784 			if (curbp && (args->cmpresult == XFS_CMP_DIFFERENT ||
785 						curdb != state->extrablk.blkno))
786 				xfs_trans_brelse(tp, curbp);
787 			/*
788 			 * If needing the block that is saved with a CI match,
789 			 * use it otherwise read in the new data block.
790 			 */
791 			if (args->cmpresult != XFS_CMP_DIFFERENT &&
792 					newdb == state->extrablk.blkno) {
793 				ASSERT(state->extravalid);
794 				curbp = state->extrablk.bp;
795 			} else {
796 				error = xfs_dir3_data_read(tp, dp,
797 						xfs_dir2_db_to_da(args->geo,
798 								  newdb),
799 						-1, &curbp);
800 				if (error)
801 					return error;
802 			}
803 			xfs_dir3_data_check(dp, curbp);
804 			curdb = newdb;
805 		}
806 		/*
807 		 * Point to the data entry.
808 		 */
809 		dep = (xfs_dir2_data_entry_t *)((char *)curbp->b_addr +
810 			xfs_dir2_dataptr_to_off(args->geo,
811 						be32_to_cpu(lep->address)));
812 		/*
813 		 * Compare the entry and if it's an exact match, return
814 		 * EEXIST immediately. If it's the first case-insensitive
815 		 * match, store the block & inode number and continue looking.
816 		 */
817 		cmp = mp->m_dirnameops->compname(args, dep->name, dep->namelen);
818 		if (cmp != XFS_CMP_DIFFERENT && cmp != args->cmpresult) {
819 			/* If there is a CI match block, drop it */
820 			if (args->cmpresult != XFS_CMP_DIFFERENT &&
821 						curdb != state->extrablk.blkno)
822 				xfs_trans_brelse(tp, state->extrablk.bp);
823 			args->cmpresult = cmp;
824 			args->inumber = be64_to_cpu(dep->inumber);
825 			args->filetype = dp->d_ops->data_get_ftype(dep);
826 			*indexp = index;
827 			state->extravalid = 1;
828 			state->extrablk.bp = curbp;
829 			state->extrablk.blkno = curdb;
830 			state->extrablk.index = (int)((char *)dep -
831 							(char *)curbp->b_addr);
832 			state->extrablk.magic = XFS_DIR2_DATA_MAGIC;
833 			curbp->b_ops = &xfs_dir3_data_buf_ops;
834 			xfs_trans_buf_set_type(tp, curbp, XFS_BLFT_DIR_DATA_BUF);
835 			if (cmp == XFS_CMP_EXACT)
836 				return -EEXIST;
837 		}
838 	}
839 	ASSERT(index == leafhdr.count || (args->op_flags & XFS_DA_OP_OKNOENT));
840 	if (curbp) {
841 		if (args->cmpresult == XFS_CMP_DIFFERENT) {
842 			/* Giving back last used data block. */
843 			state->extravalid = 1;
844 			state->extrablk.bp = curbp;
845 			state->extrablk.index = -1;
846 			state->extrablk.blkno = curdb;
847 			state->extrablk.magic = XFS_DIR2_DATA_MAGIC;
848 			curbp->b_ops = &xfs_dir3_data_buf_ops;
849 			xfs_trans_buf_set_type(tp, curbp, XFS_BLFT_DIR_DATA_BUF);
850 		} else {
851 			/* If the curbp is not the CI match block, drop it */
852 			if (state->extrablk.bp != curbp)
853 				xfs_trans_brelse(tp, curbp);
854 		}
855 	} else {
856 		state->extravalid = 0;
857 	}
858 	*indexp = index;
859 	return -ENOENT;
860 }
861 
862 /*
863  * Look up a leaf entry in a node-format leaf block.
864  * If this is an addname then the extrablk in state is a freespace block,
865  * otherwise it's a data block.
866  */
867 int
868 xfs_dir2_leafn_lookup_int(
869 	struct xfs_buf		*bp,		/* leaf buffer */
870 	xfs_da_args_t		*args,		/* operation arguments */
871 	int			*indexp,	/* out: leaf entry index */
872 	xfs_da_state_t		*state)		/* state to fill in */
873 {
874 	if (args->op_flags & XFS_DA_OP_ADDNAME)
875 		return xfs_dir2_leafn_lookup_for_addname(bp, args, indexp,
876 							state);
877 	return xfs_dir2_leafn_lookup_for_entry(bp, args, indexp, state);
878 }
879 
880 /*
881  * Move count leaf entries from source to destination leaf.
882  * Log entries and headers.  Stale entries are preserved.
883  */
884 static void
885 xfs_dir3_leafn_moveents(
886 	xfs_da_args_t			*args,	/* operation arguments */
887 	struct xfs_buf			*bp_s,	/* source */
888 	struct xfs_dir3_icleaf_hdr	*shdr,
889 	struct xfs_dir2_leaf_entry	*sents,
890 	int				start_s,/* source leaf index */
891 	struct xfs_buf			*bp_d,	/* destination */
892 	struct xfs_dir3_icleaf_hdr	*dhdr,
893 	struct xfs_dir2_leaf_entry	*dents,
894 	int				start_d,/* destination leaf index */
895 	int				count)	/* count of leaves to copy */
896 {
897 	int				stale;	/* count stale leaves copied */
898 
899 	trace_xfs_dir2_leafn_moveents(args, start_s, start_d, count);
900 
901 	/*
902 	 * Silently return if nothing to do.
903 	 */
904 	if (count == 0)
905 		return;
906 
907 	/*
908 	 * If the destination index is not the end of the current
909 	 * destination leaf entries, open up a hole in the destination
910 	 * to hold the new entries.
911 	 */
912 	if (start_d < dhdr->count) {
913 		memmove(&dents[start_d + count], &dents[start_d],
914 			(dhdr->count - start_d) * sizeof(xfs_dir2_leaf_entry_t));
915 		xfs_dir3_leaf_log_ents(args, bp_d, start_d + count,
916 				       count + dhdr->count - 1);
917 	}
918 	/*
919 	 * If the source has stale leaves, count the ones in the copy range
920 	 * so we can update the header correctly.
921 	 */
922 	if (shdr->stale) {
923 		int	i;			/* temp leaf index */
924 
925 		for (i = start_s, stale = 0; i < start_s + count; i++) {
926 			if (sents[i].address ==
927 					cpu_to_be32(XFS_DIR2_NULL_DATAPTR))
928 				stale++;
929 		}
930 	} else
931 		stale = 0;
932 	/*
933 	 * Copy the leaf entries from source to destination.
934 	 */
935 	memcpy(&dents[start_d], &sents[start_s],
936 		count * sizeof(xfs_dir2_leaf_entry_t));
937 	xfs_dir3_leaf_log_ents(args, bp_d, start_d, start_d + count - 1);
938 
939 	/*
940 	 * If there are source entries after the ones we copied,
941 	 * delete the ones we copied by sliding the next ones down.
942 	 */
943 	if (start_s + count < shdr->count) {
944 		memmove(&sents[start_s], &sents[start_s + count],
945 			count * sizeof(xfs_dir2_leaf_entry_t));
946 		xfs_dir3_leaf_log_ents(args, bp_s, start_s, start_s + count - 1);
947 	}
948 
949 	/*
950 	 * Update the headers and log them.
951 	 */
952 	shdr->count -= count;
953 	shdr->stale -= stale;
954 	dhdr->count += count;
955 	dhdr->stale += stale;
956 }
957 
958 /*
959  * Determine the sort order of two leaf blocks.
960  * Returns 1 if both are valid and leaf2 should be before leaf1, else 0.
961  */
962 int						/* sort order */
963 xfs_dir2_leafn_order(
964 	struct xfs_inode	*dp,
965 	struct xfs_buf		*leaf1_bp,		/* leaf1 buffer */
966 	struct xfs_buf		*leaf2_bp)		/* leaf2 buffer */
967 {
968 	struct xfs_dir2_leaf	*leaf1 = leaf1_bp->b_addr;
969 	struct xfs_dir2_leaf	*leaf2 = leaf2_bp->b_addr;
970 	struct xfs_dir2_leaf_entry *ents1;
971 	struct xfs_dir2_leaf_entry *ents2;
972 	struct xfs_dir3_icleaf_hdr hdr1;
973 	struct xfs_dir3_icleaf_hdr hdr2;
974 
975 	dp->d_ops->leaf_hdr_from_disk(&hdr1, leaf1);
976 	dp->d_ops->leaf_hdr_from_disk(&hdr2, leaf2);
977 	ents1 = dp->d_ops->leaf_ents_p(leaf1);
978 	ents2 = dp->d_ops->leaf_ents_p(leaf2);
979 
980 	if (hdr1.count > 0 && hdr2.count > 0 &&
981 	    (be32_to_cpu(ents2[0].hashval) < be32_to_cpu(ents1[0].hashval) ||
982 	     be32_to_cpu(ents2[hdr2.count - 1].hashval) <
983 				be32_to_cpu(ents1[hdr1.count - 1].hashval)))
984 		return 1;
985 	return 0;
986 }
987 
988 /*
989  * Rebalance leaf entries between two leaf blocks.
990  * This is actually only called when the second block is new,
991  * though the code deals with the general case.
992  * A new entry will be inserted in one of the blocks, and that
993  * entry is taken into account when balancing.
994  */
995 static void
996 xfs_dir2_leafn_rebalance(
997 	xfs_da_state_t		*state,		/* btree cursor */
998 	xfs_da_state_blk_t	*blk1,		/* first btree block */
999 	xfs_da_state_blk_t	*blk2)		/* second btree block */
1000 {
1001 	xfs_da_args_t		*args;		/* operation arguments */
1002 	int			count;		/* count (& direction) leaves */
1003 	int			isleft;		/* new goes in left leaf */
1004 	xfs_dir2_leaf_t		*leaf1;		/* first leaf structure */
1005 	xfs_dir2_leaf_t		*leaf2;		/* second leaf structure */
1006 	int			mid;		/* midpoint leaf index */
1007 #if defined(DEBUG) || defined(XFS_WARN)
1008 	int			oldstale;	/* old count of stale leaves */
1009 #endif
1010 	int			oldsum;		/* old total leaf count */
1011 	int			swap_blocks;	/* swapped leaf blocks */
1012 	struct xfs_dir2_leaf_entry *ents1;
1013 	struct xfs_dir2_leaf_entry *ents2;
1014 	struct xfs_dir3_icleaf_hdr hdr1;
1015 	struct xfs_dir3_icleaf_hdr hdr2;
1016 	struct xfs_inode	*dp = state->args->dp;
1017 
1018 	args = state->args;
1019 	/*
1020 	 * If the block order is wrong, swap the arguments.
1021 	 */
1022 	swap_blocks = xfs_dir2_leafn_order(dp, blk1->bp, blk2->bp);
1023 	if (swap_blocks)
1024 		swap(blk1, blk2);
1025 
1026 	leaf1 = blk1->bp->b_addr;
1027 	leaf2 = blk2->bp->b_addr;
1028 	dp->d_ops->leaf_hdr_from_disk(&hdr1, leaf1);
1029 	dp->d_ops->leaf_hdr_from_disk(&hdr2, leaf2);
1030 	ents1 = dp->d_ops->leaf_ents_p(leaf1);
1031 	ents2 = dp->d_ops->leaf_ents_p(leaf2);
1032 
1033 	oldsum = hdr1.count + hdr2.count;
1034 #if defined(DEBUG) || defined(XFS_WARN)
1035 	oldstale = hdr1.stale + hdr2.stale;
1036 #endif
1037 	mid = oldsum >> 1;
1038 
1039 	/*
1040 	 * If the old leaf count was odd then the new one will be even,
1041 	 * so we need to divide the new count evenly.
1042 	 */
1043 	if (oldsum & 1) {
1044 		xfs_dahash_t	midhash;	/* middle entry hash value */
1045 
1046 		if (mid >= hdr1.count)
1047 			midhash = be32_to_cpu(ents2[mid - hdr1.count].hashval);
1048 		else
1049 			midhash = be32_to_cpu(ents1[mid].hashval);
1050 		isleft = args->hashval <= midhash;
1051 	}
1052 	/*
1053 	 * If the old count is even then the new count is odd, so there's
1054 	 * no preferred side for the new entry.
1055 	 * Pick the left one.
1056 	 */
1057 	else
1058 		isleft = 1;
1059 	/*
1060 	 * Calculate moved entry count.  Positive means left-to-right,
1061 	 * negative means right-to-left.  Then move the entries.
1062 	 */
1063 	count = hdr1.count - mid + (isleft == 0);
1064 	if (count > 0)
1065 		xfs_dir3_leafn_moveents(args, blk1->bp, &hdr1, ents1,
1066 					hdr1.count - count, blk2->bp,
1067 					&hdr2, ents2, 0, count);
1068 	else if (count < 0)
1069 		xfs_dir3_leafn_moveents(args, blk2->bp, &hdr2, ents2, 0,
1070 					blk1->bp, &hdr1, ents1,
1071 					hdr1.count, count);
1072 
1073 	ASSERT(hdr1.count + hdr2.count == oldsum);
1074 	ASSERT(hdr1.stale + hdr2.stale == oldstale);
1075 
1076 	/* log the changes made when moving the entries */
1077 	dp->d_ops->leaf_hdr_to_disk(leaf1, &hdr1);
1078 	dp->d_ops->leaf_hdr_to_disk(leaf2, &hdr2);
1079 	xfs_dir3_leaf_log_header(args, blk1->bp);
1080 	xfs_dir3_leaf_log_header(args, blk2->bp);
1081 
1082 	xfs_dir3_leaf_check(dp, blk1->bp);
1083 	xfs_dir3_leaf_check(dp, blk2->bp);
1084 
1085 	/*
1086 	 * Mark whether we're inserting into the old or new leaf.
1087 	 */
1088 	if (hdr1.count < hdr2.count)
1089 		state->inleaf = swap_blocks;
1090 	else if (hdr1.count > hdr2.count)
1091 		state->inleaf = !swap_blocks;
1092 	else
1093 		state->inleaf = swap_blocks ^ (blk1->index <= hdr1.count);
1094 	/*
1095 	 * Adjust the expected index for insertion.
1096 	 */
1097 	if (!state->inleaf)
1098 		blk2->index = blk1->index - hdr1.count;
1099 
1100 	/*
1101 	 * Finally sanity check just to make sure we are not returning a
1102 	 * negative index
1103 	 */
1104 	if (blk2->index < 0) {
1105 		state->inleaf = 1;
1106 		blk2->index = 0;
1107 		xfs_alert(dp->i_mount,
1108 	"%s: picked the wrong leaf? reverting original leaf: blk1->index %d",
1109 			__func__, blk1->index);
1110 	}
1111 }
1112 
1113 static int
1114 xfs_dir3_data_block_free(
1115 	xfs_da_args_t		*args,
1116 	struct xfs_dir2_data_hdr *hdr,
1117 	struct xfs_dir2_free	*free,
1118 	xfs_dir2_db_t		fdb,
1119 	int			findex,
1120 	struct xfs_buf		*fbp,
1121 	int			longest)
1122 {
1123 	int			logfree = 0;
1124 	__be16			*bests;
1125 	struct xfs_dir3_icfree_hdr freehdr;
1126 	struct xfs_inode	*dp = args->dp;
1127 
1128 	dp->d_ops->free_hdr_from_disk(&freehdr, free);
1129 	bests = dp->d_ops->free_bests_p(free);
1130 	if (hdr) {
1131 		/*
1132 		 * Data block is not empty, just set the free entry to the new
1133 		 * value.
1134 		 */
1135 		bests[findex] = cpu_to_be16(longest);
1136 		xfs_dir2_free_log_bests(args, fbp, findex, findex);
1137 		return 0;
1138 	}
1139 
1140 	/* One less used entry in the free table. */
1141 	freehdr.nused--;
1142 
1143 	/*
1144 	 * If this was the last entry in the table, we can trim the table size
1145 	 * back.  There might be other entries at the end referring to
1146 	 * non-existent data blocks, get those too.
1147 	 */
1148 	if (findex == freehdr.nvalid - 1) {
1149 		int	i;		/* free entry index */
1150 
1151 		for (i = findex - 1; i >= 0; i--) {
1152 			if (bests[i] != cpu_to_be16(NULLDATAOFF))
1153 				break;
1154 		}
1155 		freehdr.nvalid = i + 1;
1156 		logfree = 0;
1157 	} else {
1158 		/* Not the last entry, just punch it out.  */
1159 		bests[findex] = cpu_to_be16(NULLDATAOFF);
1160 		logfree = 1;
1161 	}
1162 
1163 	dp->d_ops->free_hdr_to_disk(free, &freehdr);
1164 	xfs_dir2_free_log_header(args, fbp);
1165 
1166 	/*
1167 	 * If there are no useful entries left in the block, get rid of the
1168 	 * block if we can.
1169 	 */
1170 	if (!freehdr.nused) {
1171 		int error;
1172 
1173 		error = xfs_dir2_shrink_inode(args, fdb, fbp);
1174 		if (error == 0) {
1175 			fbp = NULL;
1176 			logfree = 0;
1177 		} else if (error != -ENOSPC || args->total != 0)
1178 			return error;
1179 		/*
1180 		 * It's possible to get ENOSPC if there is no
1181 		 * space reservation.  In this case some one
1182 		 * else will eventually get rid of this block.
1183 		 */
1184 	}
1185 
1186 	/* Log the free entry that changed, unless we got rid of it.  */
1187 	if (logfree)
1188 		xfs_dir2_free_log_bests(args, fbp, findex, findex);
1189 	return 0;
1190 }
1191 
1192 /*
1193  * Remove an entry from a node directory.
1194  * This removes the leaf entry and the data entry,
1195  * and updates the free block if necessary.
1196  */
1197 static int					/* error */
1198 xfs_dir2_leafn_remove(
1199 	xfs_da_args_t		*args,		/* operation arguments */
1200 	struct xfs_buf		*bp,		/* leaf buffer */
1201 	int			index,		/* leaf entry index */
1202 	xfs_da_state_blk_t	*dblk,		/* data block */
1203 	int			*rval)		/* resulting block needs join */
1204 {
1205 	xfs_dir2_data_hdr_t	*hdr;		/* data block header */
1206 	xfs_dir2_db_t		db;		/* data block number */
1207 	struct xfs_buf		*dbp;		/* data block buffer */
1208 	xfs_dir2_data_entry_t	*dep;		/* data block entry */
1209 	xfs_inode_t		*dp;		/* incore directory inode */
1210 	xfs_dir2_leaf_t		*leaf;		/* leaf structure */
1211 	xfs_dir2_leaf_entry_t	*lep;		/* leaf entry */
1212 	int			longest;	/* longest data free entry */
1213 	int			off;		/* data block entry offset */
1214 	int			needlog;	/* need to log data header */
1215 	int			needscan;	/* need to rescan data frees */
1216 	xfs_trans_t		*tp;		/* transaction pointer */
1217 	struct xfs_dir2_data_free *bf;		/* bestfree table */
1218 	struct xfs_dir3_icleaf_hdr leafhdr;
1219 	struct xfs_dir2_leaf_entry *ents;
1220 
1221 	trace_xfs_dir2_leafn_remove(args, index);
1222 
1223 	dp = args->dp;
1224 	tp = args->trans;
1225 	leaf = bp->b_addr;
1226 	dp->d_ops->leaf_hdr_from_disk(&leafhdr, leaf);
1227 	ents = dp->d_ops->leaf_ents_p(leaf);
1228 
1229 	/*
1230 	 * Point to the entry we're removing.
1231 	 */
1232 	lep = &ents[index];
1233 
1234 	/*
1235 	 * Extract the data block and offset from the entry.
1236 	 */
1237 	db = xfs_dir2_dataptr_to_db(args->geo, be32_to_cpu(lep->address));
1238 	ASSERT(dblk->blkno == db);
1239 	off = xfs_dir2_dataptr_to_off(args->geo, be32_to_cpu(lep->address));
1240 	ASSERT(dblk->index == off);
1241 
1242 	/*
1243 	 * Kill the leaf entry by marking it stale.
1244 	 * Log the leaf block changes.
1245 	 */
1246 	leafhdr.stale++;
1247 	dp->d_ops->leaf_hdr_to_disk(leaf, &leafhdr);
1248 	xfs_dir3_leaf_log_header(args, bp);
1249 
1250 	lep->address = cpu_to_be32(XFS_DIR2_NULL_DATAPTR);
1251 	xfs_dir3_leaf_log_ents(args, bp, index, index);
1252 
1253 	/*
1254 	 * Make the data entry free.  Keep track of the longest freespace
1255 	 * in the data block in case it changes.
1256 	 */
1257 	dbp = dblk->bp;
1258 	hdr = dbp->b_addr;
1259 	dep = (xfs_dir2_data_entry_t *)((char *)hdr + off);
1260 	bf = dp->d_ops->data_bestfree_p(hdr);
1261 	longest = be16_to_cpu(bf[0].length);
1262 	needlog = needscan = 0;
1263 	xfs_dir2_data_make_free(args, dbp, off,
1264 		dp->d_ops->data_entsize(dep->namelen), &needlog, &needscan);
1265 	/*
1266 	 * Rescan the data block freespaces for bestfree.
1267 	 * Log the data block header if needed.
1268 	 */
1269 	if (needscan)
1270 		xfs_dir2_data_freescan(dp, hdr, &needlog);
1271 	if (needlog)
1272 		xfs_dir2_data_log_header(args, dbp);
1273 	xfs_dir3_data_check(dp, dbp);
1274 	/*
1275 	 * If the longest data block freespace changes, need to update
1276 	 * the corresponding freeblock entry.
1277 	 */
1278 	if (longest < be16_to_cpu(bf[0].length)) {
1279 		int		error;		/* error return value */
1280 		struct xfs_buf	*fbp;		/* freeblock buffer */
1281 		xfs_dir2_db_t	fdb;		/* freeblock block number */
1282 		int		findex;		/* index in freeblock entries */
1283 		xfs_dir2_free_t	*free;		/* freeblock structure */
1284 
1285 		/*
1286 		 * Convert the data block number to a free block,
1287 		 * read in the free block.
1288 		 */
1289 		fdb = dp->d_ops->db_to_fdb(args->geo, db);
1290 		error = xfs_dir2_free_read(tp, dp,
1291 					   xfs_dir2_db_to_da(args->geo, fdb),
1292 					   &fbp);
1293 		if (error)
1294 			return error;
1295 		free = fbp->b_addr;
1296 #ifdef DEBUG
1297 	{
1298 		struct xfs_dir3_icfree_hdr freehdr;
1299 		dp->d_ops->free_hdr_from_disk(&freehdr, free);
1300 		ASSERT(freehdr.firstdb == dp->d_ops->free_max_bests(args->geo) *
1301 			(fdb - xfs_dir2_byte_to_db(args->geo,
1302 						   XFS_DIR2_FREE_OFFSET)));
1303 	}
1304 #endif
1305 		/*
1306 		 * Calculate which entry we need to fix.
1307 		 */
1308 		findex = dp->d_ops->db_to_fdindex(args->geo, db);
1309 		longest = be16_to_cpu(bf[0].length);
1310 		/*
1311 		 * If the data block is now empty we can get rid of it
1312 		 * (usually).
1313 		 */
1314 		if (longest == args->geo->blksize -
1315 			       dp->d_ops->data_entry_offset) {
1316 			/*
1317 			 * Try to punch out the data block.
1318 			 */
1319 			error = xfs_dir2_shrink_inode(args, db, dbp);
1320 			if (error == 0) {
1321 				dblk->bp = NULL;
1322 				hdr = NULL;
1323 			}
1324 			/*
1325 			 * We can get ENOSPC if there's no space reservation.
1326 			 * In this case just drop the buffer and some one else
1327 			 * will eventually get rid of the empty block.
1328 			 */
1329 			else if (!(error == -ENOSPC && args->total == 0))
1330 				return error;
1331 		}
1332 		/*
1333 		 * If we got rid of the data block, we can eliminate that entry
1334 		 * in the free block.
1335 		 */
1336 		error = xfs_dir3_data_block_free(args, hdr, free,
1337 						 fdb, findex, fbp, longest);
1338 		if (error)
1339 			return error;
1340 	}
1341 
1342 	xfs_dir3_leaf_check(dp, bp);
1343 	/*
1344 	 * Return indication of whether this leaf block is empty enough
1345 	 * to justify trying to join it with a neighbor.
1346 	 */
1347 	*rval = (dp->d_ops->leaf_hdr_size +
1348 		 (uint)sizeof(ents[0]) * (leafhdr.count - leafhdr.stale)) <
1349 		args->geo->magicpct;
1350 	return 0;
1351 }
1352 
1353 /*
1354  * Split the leaf entries in the old block into old and new blocks.
1355  */
1356 int						/* error */
1357 xfs_dir2_leafn_split(
1358 	xfs_da_state_t		*state,		/* btree cursor */
1359 	xfs_da_state_blk_t	*oldblk,	/* original block */
1360 	xfs_da_state_blk_t	*newblk)	/* newly created block */
1361 {
1362 	xfs_da_args_t		*args;		/* operation arguments */
1363 	xfs_dablk_t		blkno;		/* new leaf block number */
1364 	int			error;		/* error return value */
1365 	struct xfs_inode	*dp;
1366 
1367 	/*
1368 	 * Allocate space for a new leaf node.
1369 	 */
1370 	args = state->args;
1371 	dp = args->dp;
1372 	ASSERT(oldblk->magic == XFS_DIR2_LEAFN_MAGIC);
1373 	error = xfs_da_grow_inode(args, &blkno);
1374 	if (error) {
1375 		return error;
1376 	}
1377 	/*
1378 	 * Initialize the new leaf block.
1379 	 */
1380 	error = xfs_dir3_leaf_get_buf(args, xfs_dir2_da_to_db(args->geo, blkno),
1381 				      &newblk->bp, XFS_DIR2_LEAFN_MAGIC);
1382 	if (error)
1383 		return error;
1384 
1385 	newblk->blkno = blkno;
1386 	newblk->magic = XFS_DIR2_LEAFN_MAGIC;
1387 	/*
1388 	 * Rebalance the entries across the two leaves, link the new
1389 	 * block into the leaves.
1390 	 */
1391 	xfs_dir2_leafn_rebalance(state, oldblk, newblk);
1392 	error = xfs_da3_blk_link(state, oldblk, newblk);
1393 	if (error) {
1394 		return error;
1395 	}
1396 	/*
1397 	 * Insert the new entry in the correct block.
1398 	 */
1399 	if (state->inleaf)
1400 		error = xfs_dir2_leafn_add(oldblk->bp, args, oldblk->index);
1401 	else
1402 		error = xfs_dir2_leafn_add(newblk->bp, args, newblk->index);
1403 	/*
1404 	 * Update last hashval in each block since we added the name.
1405 	 */
1406 	oldblk->hashval = xfs_dir2_leaf_lasthash(dp, oldblk->bp, NULL);
1407 	newblk->hashval = xfs_dir2_leaf_lasthash(dp, newblk->bp, NULL);
1408 	xfs_dir3_leaf_check(dp, oldblk->bp);
1409 	xfs_dir3_leaf_check(dp, newblk->bp);
1410 	return error;
1411 }
1412 
1413 /*
1414  * Check a leaf block and its neighbors to see if the block should be
1415  * collapsed into one or the other neighbor.  Always keep the block
1416  * with the smaller block number.
1417  * If the current block is over 50% full, don't try to join it, return 0.
1418  * If the block is empty, fill in the state structure and return 2.
1419  * If it can be collapsed, fill in the state structure and return 1.
1420  * If nothing can be done, return 0.
1421  */
1422 int						/* error */
1423 xfs_dir2_leafn_toosmall(
1424 	xfs_da_state_t		*state,		/* btree cursor */
1425 	int			*action)	/* resulting action to take */
1426 {
1427 	xfs_da_state_blk_t	*blk;		/* leaf block */
1428 	xfs_dablk_t		blkno;		/* leaf block number */
1429 	struct xfs_buf		*bp;		/* leaf buffer */
1430 	int			bytes;		/* bytes in use */
1431 	int			count;		/* leaf live entry count */
1432 	int			error;		/* error return value */
1433 	int			forward;	/* sibling block direction */
1434 	int			i;		/* sibling counter */
1435 	xfs_dir2_leaf_t		*leaf;		/* leaf structure */
1436 	int			rval;		/* result from path_shift */
1437 	struct xfs_dir3_icleaf_hdr leafhdr;
1438 	struct xfs_dir2_leaf_entry *ents;
1439 	struct xfs_inode	*dp = state->args->dp;
1440 
1441 	/*
1442 	 * Check for the degenerate case of the block being over 50% full.
1443 	 * If so, it's not worth even looking to see if we might be able
1444 	 * to coalesce with a sibling.
1445 	 */
1446 	blk = &state->path.blk[state->path.active - 1];
1447 	leaf = blk->bp->b_addr;
1448 	dp->d_ops->leaf_hdr_from_disk(&leafhdr, leaf);
1449 	ents = dp->d_ops->leaf_ents_p(leaf);
1450 	xfs_dir3_leaf_check(dp, blk->bp);
1451 
1452 	count = leafhdr.count - leafhdr.stale;
1453 	bytes = dp->d_ops->leaf_hdr_size + count * sizeof(ents[0]);
1454 	if (bytes > (state->args->geo->blksize >> 1)) {
1455 		/*
1456 		 * Blk over 50%, don't try to join.
1457 		 */
1458 		*action = 0;
1459 		return 0;
1460 	}
1461 	/*
1462 	 * Check for the degenerate case of the block being empty.
1463 	 * If the block is empty, we'll simply delete it, no need to
1464 	 * coalesce it with a sibling block.  We choose (arbitrarily)
1465 	 * to merge with the forward block unless it is NULL.
1466 	 */
1467 	if (count == 0) {
1468 		/*
1469 		 * Make altpath point to the block we want to keep and
1470 		 * path point to the block we want to drop (this one).
1471 		 */
1472 		forward = (leafhdr.forw != 0);
1473 		memcpy(&state->altpath, &state->path, sizeof(state->path));
1474 		error = xfs_da3_path_shift(state, &state->altpath, forward, 0,
1475 			&rval);
1476 		if (error)
1477 			return error;
1478 		*action = rval ? 2 : 0;
1479 		return 0;
1480 	}
1481 	/*
1482 	 * Examine each sibling block to see if we can coalesce with
1483 	 * at least 25% free space to spare.  We need to figure out
1484 	 * whether to merge with the forward or the backward block.
1485 	 * We prefer coalescing with the lower numbered sibling so as
1486 	 * to shrink a directory over time.
1487 	 */
1488 	forward = leafhdr.forw < leafhdr.back;
1489 	for (i = 0, bp = NULL; i < 2; forward = !forward, i++) {
1490 		struct xfs_dir3_icleaf_hdr hdr2;
1491 
1492 		blkno = forward ? leafhdr.forw : leafhdr.back;
1493 		if (blkno == 0)
1494 			continue;
1495 		/*
1496 		 * Read the sibling leaf block.
1497 		 */
1498 		error = xfs_dir3_leafn_read(state->args->trans, dp,
1499 					    blkno, -1, &bp);
1500 		if (error)
1501 			return error;
1502 
1503 		/*
1504 		 * Count bytes in the two blocks combined.
1505 		 */
1506 		count = leafhdr.count - leafhdr.stale;
1507 		bytes = state->args->geo->blksize -
1508 			(state->args->geo->blksize >> 2);
1509 
1510 		leaf = bp->b_addr;
1511 		dp->d_ops->leaf_hdr_from_disk(&hdr2, leaf);
1512 		ents = dp->d_ops->leaf_ents_p(leaf);
1513 		count += hdr2.count - hdr2.stale;
1514 		bytes -= count * sizeof(ents[0]);
1515 
1516 		/*
1517 		 * Fits with at least 25% to spare.
1518 		 */
1519 		if (bytes >= 0)
1520 			break;
1521 		xfs_trans_brelse(state->args->trans, bp);
1522 	}
1523 	/*
1524 	 * Didn't like either block, give up.
1525 	 */
1526 	if (i >= 2) {
1527 		*action = 0;
1528 		return 0;
1529 	}
1530 
1531 	/*
1532 	 * Make altpath point to the block we want to keep (the lower
1533 	 * numbered block) and path point to the block we want to drop.
1534 	 */
1535 	memcpy(&state->altpath, &state->path, sizeof(state->path));
1536 	if (blkno < blk->blkno)
1537 		error = xfs_da3_path_shift(state, &state->altpath, forward, 0,
1538 			&rval);
1539 	else
1540 		error = xfs_da3_path_shift(state, &state->path, forward, 0,
1541 			&rval);
1542 	if (error) {
1543 		return error;
1544 	}
1545 	*action = rval ? 0 : 1;
1546 	return 0;
1547 }
1548 
1549 /*
1550  * Move all the leaf entries from drop_blk to save_blk.
1551  * This is done as part of a join operation.
1552  */
1553 void
1554 xfs_dir2_leafn_unbalance(
1555 	xfs_da_state_t		*state,		/* cursor */
1556 	xfs_da_state_blk_t	*drop_blk,	/* dead block */
1557 	xfs_da_state_blk_t	*save_blk)	/* surviving block */
1558 {
1559 	xfs_da_args_t		*args;		/* operation arguments */
1560 	xfs_dir2_leaf_t		*drop_leaf;	/* dead leaf structure */
1561 	xfs_dir2_leaf_t		*save_leaf;	/* surviving leaf structure */
1562 	struct xfs_dir3_icleaf_hdr savehdr;
1563 	struct xfs_dir3_icleaf_hdr drophdr;
1564 	struct xfs_dir2_leaf_entry *sents;
1565 	struct xfs_dir2_leaf_entry *dents;
1566 	struct xfs_inode	*dp = state->args->dp;
1567 
1568 	args = state->args;
1569 	ASSERT(drop_blk->magic == XFS_DIR2_LEAFN_MAGIC);
1570 	ASSERT(save_blk->magic == XFS_DIR2_LEAFN_MAGIC);
1571 	drop_leaf = drop_blk->bp->b_addr;
1572 	save_leaf = save_blk->bp->b_addr;
1573 
1574 	dp->d_ops->leaf_hdr_from_disk(&savehdr, save_leaf);
1575 	dp->d_ops->leaf_hdr_from_disk(&drophdr, drop_leaf);
1576 	sents = dp->d_ops->leaf_ents_p(save_leaf);
1577 	dents = dp->d_ops->leaf_ents_p(drop_leaf);
1578 
1579 	/*
1580 	 * If there are any stale leaf entries, take this opportunity
1581 	 * to purge them.
1582 	 */
1583 	if (drophdr.stale)
1584 		xfs_dir3_leaf_compact(args, &drophdr, drop_blk->bp);
1585 	if (savehdr.stale)
1586 		xfs_dir3_leaf_compact(args, &savehdr, save_blk->bp);
1587 
1588 	/*
1589 	 * Move the entries from drop to the appropriate end of save.
1590 	 */
1591 	drop_blk->hashval = be32_to_cpu(dents[drophdr.count - 1].hashval);
1592 	if (xfs_dir2_leafn_order(dp, save_blk->bp, drop_blk->bp))
1593 		xfs_dir3_leafn_moveents(args, drop_blk->bp, &drophdr, dents, 0,
1594 					save_blk->bp, &savehdr, sents, 0,
1595 					drophdr.count);
1596 	else
1597 		xfs_dir3_leafn_moveents(args, drop_blk->bp, &drophdr, dents, 0,
1598 					save_blk->bp, &savehdr, sents,
1599 					savehdr.count, drophdr.count);
1600 	save_blk->hashval = be32_to_cpu(sents[savehdr.count - 1].hashval);
1601 
1602 	/* log the changes made when moving the entries */
1603 	dp->d_ops->leaf_hdr_to_disk(save_leaf, &savehdr);
1604 	dp->d_ops->leaf_hdr_to_disk(drop_leaf, &drophdr);
1605 	xfs_dir3_leaf_log_header(args, save_blk->bp);
1606 	xfs_dir3_leaf_log_header(args, drop_blk->bp);
1607 
1608 	xfs_dir3_leaf_check(dp, save_blk->bp);
1609 	xfs_dir3_leaf_check(dp, drop_blk->bp);
1610 }
1611 
1612 /*
1613  * Top-level node form directory addname routine.
1614  */
1615 int						/* error */
1616 xfs_dir2_node_addname(
1617 	xfs_da_args_t		*args)		/* operation arguments */
1618 {
1619 	xfs_da_state_blk_t	*blk;		/* leaf block for insert */
1620 	int			error;		/* error return value */
1621 	int			rval;		/* sub-return value */
1622 	xfs_da_state_t		*state;		/* btree cursor */
1623 
1624 	trace_xfs_dir2_node_addname(args);
1625 
1626 	/*
1627 	 * Allocate and initialize the state (btree cursor).
1628 	 */
1629 	state = xfs_da_state_alloc();
1630 	state->args = args;
1631 	state->mp = args->dp->i_mount;
1632 	/*
1633 	 * Look up the name.  We're not supposed to find it, but
1634 	 * this gives us the insertion point.
1635 	 */
1636 	error = xfs_da3_node_lookup_int(state, &rval);
1637 	if (error)
1638 		rval = error;
1639 	if (rval != -ENOENT) {
1640 		goto done;
1641 	}
1642 	/*
1643 	 * Add the data entry to a data block.
1644 	 * Extravalid is set to a freeblock found by lookup.
1645 	 */
1646 	rval = xfs_dir2_node_addname_int(args,
1647 		state->extravalid ? &state->extrablk : NULL);
1648 	if (rval) {
1649 		goto done;
1650 	}
1651 	blk = &state->path.blk[state->path.active - 1];
1652 	ASSERT(blk->magic == XFS_DIR2_LEAFN_MAGIC);
1653 	/*
1654 	 * Add the new leaf entry.
1655 	 */
1656 	rval = xfs_dir2_leafn_add(blk->bp, args, blk->index);
1657 	if (rval == 0) {
1658 		/*
1659 		 * It worked, fix the hash values up the btree.
1660 		 */
1661 		if (!(args->op_flags & XFS_DA_OP_JUSTCHECK))
1662 			xfs_da3_fixhashpath(state, &state->path);
1663 	} else {
1664 		/*
1665 		 * It didn't work, we need to split the leaf block.
1666 		 */
1667 		if (args->total == 0) {
1668 			ASSERT(rval == -ENOSPC);
1669 			goto done;
1670 		}
1671 		/*
1672 		 * Split the leaf block and insert the new entry.
1673 		 */
1674 		rval = xfs_da3_split(state);
1675 	}
1676 done:
1677 	xfs_da_state_free(state);
1678 	return rval;
1679 }
1680 
1681 /*
1682  * Add the data entry for a node-format directory name addition.
1683  * The leaf entry is added in xfs_dir2_leafn_add.
1684  * We may enter with a freespace block that the lookup found.
1685  */
1686 static int					/* error */
1687 xfs_dir2_node_addname_int(
1688 	xfs_da_args_t		*args,		/* operation arguments */
1689 	xfs_da_state_blk_t	*fblk)		/* optional freespace block */
1690 {
1691 	xfs_dir2_data_hdr_t	*hdr;		/* data block header */
1692 	xfs_dir2_db_t		dbno;		/* data block number */
1693 	struct xfs_buf		*dbp;		/* data block buffer */
1694 	xfs_dir2_data_entry_t	*dep;		/* data entry pointer */
1695 	xfs_inode_t		*dp;		/* incore directory inode */
1696 	xfs_dir2_data_unused_t	*dup;		/* data unused entry pointer */
1697 	int			error;		/* error return value */
1698 	xfs_dir2_db_t		fbno;		/* freespace block number */
1699 	struct xfs_buf		*fbp;		/* freespace buffer */
1700 	int			findex;		/* freespace entry index */
1701 	xfs_dir2_free_t		*free=NULL;	/* freespace block structure */
1702 	xfs_dir2_db_t		ifbno;		/* initial freespace block no */
1703 	xfs_dir2_db_t		lastfbno=0;	/* highest freespace block no */
1704 	int			length;		/* length of the new entry */
1705 	int			logfree;	/* need to log free entry */
1706 	xfs_mount_t		*mp;		/* filesystem mount point */
1707 	int			needlog;	/* need to log data header */
1708 	int			needscan;	/* need to rescan data frees */
1709 	__be16			*tagp;		/* data entry tag pointer */
1710 	xfs_trans_t		*tp;		/* transaction pointer */
1711 	__be16			*bests;
1712 	struct xfs_dir3_icfree_hdr freehdr;
1713 	struct xfs_dir2_data_free *bf;
1714 	xfs_dir2_data_aoff_t	aoff;
1715 
1716 	dp = args->dp;
1717 	mp = dp->i_mount;
1718 	tp = args->trans;
1719 	length = dp->d_ops->data_entsize(args->namelen);
1720 	/*
1721 	 * If we came in with a freespace block that means that lookup
1722 	 * found an entry with our hash value.  This is the freespace
1723 	 * block for that data entry.
1724 	 */
1725 	if (fblk) {
1726 		fbp = fblk->bp;
1727 		/*
1728 		 * Remember initial freespace block number.
1729 		 */
1730 		ifbno = fblk->blkno;
1731 		free = fbp->b_addr;
1732 		findex = fblk->index;
1733 		bests = dp->d_ops->free_bests_p(free);
1734 		dp->d_ops->free_hdr_from_disk(&freehdr, free);
1735 
1736 		/*
1737 		 * This means the free entry showed that the data block had
1738 		 * space for our entry, so we remembered it.
1739 		 * Use that data block.
1740 		 */
1741 		if (findex >= 0) {
1742 			ASSERT(findex < freehdr.nvalid);
1743 			ASSERT(be16_to_cpu(bests[findex]) != NULLDATAOFF);
1744 			ASSERT(be16_to_cpu(bests[findex]) >= length);
1745 			dbno = freehdr.firstdb + findex;
1746 		} else {
1747 			/*
1748 			 * The data block looked at didn't have enough room.
1749 			 * We'll start at the beginning of the freespace entries.
1750 			 */
1751 			dbno = -1;
1752 			findex = 0;
1753 		}
1754 	} else {
1755 		/*
1756 		 * Didn't come in with a freespace block, so no data block.
1757 		 */
1758 		ifbno = dbno = -1;
1759 		fbp = NULL;
1760 		findex = 0;
1761 	}
1762 
1763 	/*
1764 	 * If we don't have a data block yet, we're going to scan the
1765 	 * freespace blocks looking for one.  Figure out what the
1766 	 * highest freespace block number is.
1767 	 */
1768 	if (dbno == -1) {
1769 		xfs_fileoff_t	fo;		/* freespace block number */
1770 
1771 		if ((error = xfs_bmap_last_offset(dp, &fo, XFS_DATA_FORK)))
1772 			return error;
1773 		lastfbno = xfs_dir2_da_to_db(args->geo, (xfs_dablk_t)fo);
1774 		fbno = ifbno;
1775 	}
1776 	/*
1777 	 * While we haven't identified a data block, search the freeblock
1778 	 * data for a good data block.  If we find a null freeblock entry,
1779 	 * indicating a hole in the data blocks, remember that.
1780 	 */
1781 	while (dbno == -1) {
1782 		/*
1783 		 * If we don't have a freeblock in hand, get the next one.
1784 		 */
1785 		if (fbp == NULL) {
1786 			/*
1787 			 * Happens the first time through unless lookup gave
1788 			 * us a freespace block to start with.
1789 			 */
1790 			if (++fbno == 0)
1791 				fbno = xfs_dir2_byte_to_db(args->geo,
1792 							XFS_DIR2_FREE_OFFSET);
1793 			/*
1794 			 * If it's ifbno we already looked at it.
1795 			 */
1796 			if (fbno == ifbno)
1797 				fbno++;
1798 			/*
1799 			 * If it's off the end we're done.
1800 			 */
1801 			if (fbno >= lastfbno)
1802 				break;
1803 			/*
1804 			 * Read the block.  There can be holes in the
1805 			 * freespace blocks, so this might not succeed.
1806 			 * This should be really rare, so there's no reason
1807 			 * to avoid it.
1808 			 */
1809 			error = xfs_dir2_free_try_read(tp, dp,
1810 					xfs_dir2_db_to_da(args->geo, fbno),
1811 					&fbp);
1812 			if (error)
1813 				return error;
1814 			if (!fbp)
1815 				continue;
1816 			free = fbp->b_addr;
1817 			findex = 0;
1818 		}
1819 		/*
1820 		 * Look at the current free entry.  Is it good enough?
1821 		 *
1822 		 * The bests initialisation should be where the bufer is read in
1823 		 * the above branch. But gcc is too stupid to realise that bests
1824 		 * and the freehdr are actually initialised if they are placed
1825 		 * there, so we have to do it here to avoid warnings. Blech.
1826 		 */
1827 		bests = dp->d_ops->free_bests_p(free);
1828 		dp->d_ops->free_hdr_from_disk(&freehdr, free);
1829 		if (be16_to_cpu(bests[findex]) != NULLDATAOFF &&
1830 		    be16_to_cpu(bests[findex]) >= length)
1831 			dbno = freehdr.firstdb + findex;
1832 		else {
1833 			/*
1834 			 * Are we done with the freeblock?
1835 			 */
1836 			if (++findex == freehdr.nvalid) {
1837 				/*
1838 				 * Drop the block.
1839 				 */
1840 				xfs_trans_brelse(tp, fbp);
1841 				fbp = NULL;
1842 				if (fblk && fblk->bp)
1843 					fblk->bp = NULL;
1844 			}
1845 		}
1846 	}
1847 	/*
1848 	 * If we don't have a data block, we need to allocate one and make
1849 	 * the freespace entries refer to it.
1850 	 */
1851 	if (unlikely(dbno == -1)) {
1852 		/*
1853 		 * Not allowed to allocate, return failure.
1854 		 */
1855 		if ((args->op_flags & XFS_DA_OP_JUSTCHECK) || args->total == 0)
1856 			return -ENOSPC;
1857 
1858 		/*
1859 		 * Allocate and initialize the new data block.
1860 		 */
1861 		if (unlikely((error = xfs_dir2_grow_inode(args,
1862 							 XFS_DIR2_DATA_SPACE,
1863 							 &dbno)) ||
1864 		    (error = xfs_dir3_data_init(args, dbno, &dbp))))
1865 			return error;
1866 
1867 		/*
1868 		 * If (somehow) we have a freespace block, get rid of it.
1869 		 */
1870 		if (fbp)
1871 			xfs_trans_brelse(tp, fbp);
1872 		if (fblk && fblk->bp)
1873 			fblk->bp = NULL;
1874 
1875 		/*
1876 		 * Get the freespace block corresponding to the data block
1877 		 * that was just allocated.
1878 		 */
1879 		fbno = dp->d_ops->db_to_fdb(args->geo, dbno);
1880 		error = xfs_dir2_free_try_read(tp, dp,
1881 				       xfs_dir2_db_to_da(args->geo, fbno),
1882 				       &fbp);
1883 		if (error)
1884 			return error;
1885 
1886 		/*
1887 		 * If there wasn't a freespace block, the read will
1888 		 * return a NULL fbp.  Allocate and initialize a new one.
1889 		 */
1890 		if (!fbp) {
1891 			error = xfs_dir2_grow_inode(args, XFS_DIR2_FREE_SPACE,
1892 						    &fbno);
1893 			if (error)
1894 				return error;
1895 
1896 			if (dp->d_ops->db_to_fdb(args->geo, dbno) != fbno) {
1897 				xfs_alert(mp,
1898 "%s: dir ino %llu needed freesp block %lld for data block %lld, got %lld ifbno %llu lastfbno %d",
1899 					__func__, (unsigned long long)dp->i_ino,
1900 					(long long)dp->d_ops->db_to_fdb(
1901 								args->geo, dbno),
1902 					(long long)dbno, (long long)fbno,
1903 					(unsigned long long)ifbno, lastfbno);
1904 				if (fblk) {
1905 					xfs_alert(mp,
1906 				" fblk "PTR_FMT" blkno %llu index %d magic 0x%x",
1907 						fblk,
1908 						(unsigned long long)fblk->blkno,
1909 						fblk->index,
1910 						fblk->magic);
1911 				} else {
1912 					xfs_alert(mp, " ... fblk is NULL");
1913 				}
1914 				XFS_ERROR_REPORT("xfs_dir2_node_addname_int",
1915 						 XFS_ERRLEVEL_LOW, mp);
1916 				return -EFSCORRUPTED;
1917 			}
1918 
1919 			/*
1920 			 * Get a buffer for the new block.
1921 			 */
1922 			error = xfs_dir3_free_get_buf(args, fbno, &fbp);
1923 			if (error)
1924 				return error;
1925 			free = fbp->b_addr;
1926 			bests = dp->d_ops->free_bests_p(free);
1927 			dp->d_ops->free_hdr_from_disk(&freehdr, free);
1928 
1929 			/*
1930 			 * Remember the first slot as our empty slot.
1931 			 */
1932 			freehdr.firstdb =
1933 				(fbno - xfs_dir2_byte_to_db(args->geo,
1934 							XFS_DIR2_FREE_OFFSET)) *
1935 					dp->d_ops->free_max_bests(args->geo);
1936 		} else {
1937 			free = fbp->b_addr;
1938 			bests = dp->d_ops->free_bests_p(free);
1939 			dp->d_ops->free_hdr_from_disk(&freehdr, free);
1940 		}
1941 
1942 		/*
1943 		 * Set the freespace block index from the data block number.
1944 		 */
1945 		findex = dp->d_ops->db_to_fdindex(args->geo, dbno);
1946 		/*
1947 		 * If it's after the end of the current entries in the
1948 		 * freespace block, extend that table.
1949 		 */
1950 		if (findex >= freehdr.nvalid) {
1951 			ASSERT(findex < dp->d_ops->free_max_bests(args->geo));
1952 			freehdr.nvalid = findex + 1;
1953 			/*
1954 			 * Tag new entry so nused will go up.
1955 			 */
1956 			bests[findex] = cpu_to_be16(NULLDATAOFF);
1957 		}
1958 		/*
1959 		 * If this entry was for an empty data block
1960 		 * (this should always be true) then update the header.
1961 		 */
1962 		if (bests[findex] == cpu_to_be16(NULLDATAOFF)) {
1963 			freehdr.nused++;
1964 			dp->d_ops->free_hdr_to_disk(fbp->b_addr, &freehdr);
1965 			xfs_dir2_free_log_header(args, fbp);
1966 		}
1967 		/*
1968 		 * Update the real value in the table.
1969 		 * We haven't allocated the data entry yet so this will
1970 		 * change again.
1971 		 */
1972 		hdr = dbp->b_addr;
1973 		bf = dp->d_ops->data_bestfree_p(hdr);
1974 		bests[findex] = bf[0].length;
1975 		logfree = 1;
1976 	}
1977 	/*
1978 	 * We had a data block so we don't have to make a new one.
1979 	 */
1980 	else {
1981 		/*
1982 		 * If just checking, we succeeded.
1983 		 */
1984 		if (args->op_flags & XFS_DA_OP_JUSTCHECK)
1985 			return 0;
1986 
1987 		/*
1988 		 * Read the data block in.
1989 		 */
1990 		error = xfs_dir3_data_read(tp, dp,
1991 					   xfs_dir2_db_to_da(args->geo, dbno),
1992 					   -1, &dbp);
1993 		if (error)
1994 			return error;
1995 		hdr = dbp->b_addr;
1996 		bf = dp->d_ops->data_bestfree_p(hdr);
1997 		logfree = 0;
1998 	}
1999 	ASSERT(be16_to_cpu(bf[0].length) >= length);
2000 	/*
2001 	 * Point to the existing unused space.
2002 	 */
2003 	dup = (xfs_dir2_data_unused_t *)
2004 	      ((char *)hdr + be16_to_cpu(bf[0].offset));
2005 	needscan = needlog = 0;
2006 	/*
2007 	 * Mark the first part of the unused space, inuse for us.
2008 	 */
2009 	aoff = (xfs_dir2_data_aoff_t)((char *)dup - (char *)hdr);
2010 	error = xfs_dir2_data_use_free(args, dbp, dup, aoff, length,
2011 			&needlog, &needscan);
2012 	if (error) {
2013 		xfs_trans_brelse(tp, dbp);
2014 		return error;
2015 	}
2016 	/*
2017 	 * Fill in the new entry and log it.
2018 	 */
2019 	dep = (xfs_dir2_data_entry_t *)dup;
2020 	dep->inumber = cpu_to_be64(args->inumber);
2021 	dep->namelen = args->namelen;
2022 	memcpy(dep->name, args->name, dep->namelen);
2023 	dp->d_ops->data_put_ftype(dep, args->filetype);
2024 	tagp = dp->d_ops->data_entry_tag_p(dep);
2025 	*tagp = cpu_to_be16((char *)dep - (char *)hdr);
2026 	xfs_dir2_data_log_entry(args, dbp, dep);
2027 	/*
2028 	 * Rescan the block for bestfree if needed.
2029 	 */
2030 	if (needscan)
2031 		xfs_dir2_data_freescan(dp, hdr, &needlog);
2032 	/*
2033 	 * Log the data block header if needed.
2034 	 */
2035 	if (needlog)
2036 		xfs_dir2_data_log_header(args, dbp);
2037 	/*
2038 	 * If the freespace entry is now wrong, update it.
2039 	 */
2040 	bests = dp->d_ops->free_bests_p(free); /* gcc is so stupid */
2041 	if (be16_to_cpu(bests[findex]) != be16_to_cpu(bf[0].length)) {
2042 		bests[findex] = bf[0].length;
2043 		logfree = 1;
2044 	}
2045 	/*
2046 	 * Log the freespace entry if needed.
2047 	 */
2048 	if (logfree)
2049 		xfs_dir2_free_log_bests(args, fbp, findex, findex);
2050 	/*
2051 	 * Return the data block and offset in args, then drop the data block.
2052 	 */
2053 	args->blkno = (xfs_dablk_t)dbno;
2054 	args->index = be16_to_cpu(*tagp);
2055 	return 0;
2056 }
2057 
2058 /*
2059  * Lookup an entry in a node-format directory.
2060  * All the real work happens in xfs_da3_node_lookup_int.
2061  * The only real output is the inode number of the entry.
2062  */
2063 int						/* error */
2064 xfs_dir2_node_lookup(
2065 	xfs_da_args_t	*args)			/* operation arguments */
2066 {
2067 	int		error;			/* error return value */
2068 	int		i;			/* btree level */
2069 	int		rval;			/* operation return value */
2070 	xfs_da_state_t	*state;			/* btree cursor */
2071 
2072 	trace_xfs_dir2_node_lookup(args);
2073 
2074 	/*
2075 	 * Allocate and initialize the btree cursor.
2076 	 */
2077 	state = xfs_da_state_alloc();
2078 	state->args = args;
2079 	state->mp = args->dp->i_mount;
2080 	/*
2081 	 * Fill in the path to the entry in the cursor.
2082 	 */
2083 	error = xfs_da3_node_lookup_int(state, &rval);
2084 	if (error)
2085 		rval = error;
2086 	else if (rval == -ENOENT && args->cmpresult == XFS_CMP_CASE) {
2087 		/* If a CI match, dup the actual name and return -EEXIST */
2088 		xfs_dir2_data_entry_t	*dep;
2089 
2090 		dep = (xfs_dir2_data_entry_t *)
2091 			((char *)state->extrablk.bp->b_addr +
2092 						 state->extrablk.index);
2093 		rval = xfs_dir_cilookup_result(args, dep->name, dep->namelen);
2094 	}
2095 	/*
2096 	 * Release the btree blocks and leaf block.
2097 	 */
2098 	for (i = 0; i < state->path.active; i++) {
2099 		xfs_trans_brelse(args->trans, state->path.blk[i].bp);
2100 		state->path.blk[i].bp = NULL;
2101 	}
2102 	/*
2103 	 * Release the data block if we have it.
2104 	 */
2105 	if (state->extravalid && state->extrablk.bp) {
2106 		xfs_trans_brelse(args->trans, state->extrablk.bp);
2107 		state->extrablk.bp = NULL;
2108 	}
2109 	xfs_da_state_free(state);
2110 	return rval;
2111 }
2112 
2113 /*
2114  * Remove an entry from a node-format directory.
2115  */
2116 int						/* error */
2117 xfs_dir2_node_removename(
2118 	struct xfs_da_args	*args)		/* operation arguments */
2119 {
2120 	struct xfs_da_state_blk	*blk;		/* leaf block */
2121 	int			error;		/* error return value */
2122 	int			rval;		/* operation return value */
2123 	struct xfs_da_state	*state;		/* btree cursor */
2124 
2125 	trace_xfs_dir2_node_removename(args);
2126 
2127 	/*
2128 	 * Allocate and initialize the btree cursor.
2129 	 */
2130 	state = xfs_da_state_alloc();
2131 	state->args = args;
2132 	state->mp = args->dp->i_mount;
2133 
2134 	/* Look up the entry we're deleting, set up the cursor. */
2135 	error = xfs_da3_node_lookup_int(state, &rval);
2136 	if (error)
2137 		goto out_free;
2138 
2139 	/* Didn't find it, upper layer screwed up. */
2140 	if (rval != -EEXIST) {
2141 		error = rval;
2142 		goto out_free;
2143 	}
2144 
2145 	blk = &state->path.blk[state->path.active - 1];
2146 	ASSERT(blk->magic == XFS_DIR2_LEAFN_MAGIC);
2147 	ASSERT(state->extravalid);
2148 	/*
2149 	 * Remove the leaf and data entries.
2150 	 * Extrablk refers to the data block.
2151 	 */
2152 	error = xfs_dir2_leafn_remove(args, blk->bp, blk->index,
2153 		&state->extrablk, &rval);
2154 	if (error)
2155 		goto out_free;
2156 	/*
2157 	 * Fix the hash values up the btree.
2158 	 */
2159 	xfs_da3_fixhashpath(state, &state->path);
2160 	/*
2161 	 * If we need to join leaf blocks, do it.
2162 	 */
2163 	if (rval && state->path.active > 1)
2164 		error = xfs_da3_join(state);
2165 	/*
2166 	 * If no errors so far, try conversion to leaf format.
2167 	 */
2168 	if (!error)
2169 		error = xfs_dir2_node_to_leaf(state);
2170 out_free:
2171 	xfs_da_state_free(state);
2172 	return error;
2173 }
2174 
2175 /*
2176  * Replace an entry's inode number in a node-format directory.
2177  */
2178 int						/* error */
2179 xfs_dir2_node_replace(
2180 	xfs_da_args_t		*args)		/* operation arguments */
2181 {
2182 	xfs_da_state_blk_t	*blk;		/* leaf block */
2183 	xfs_dir2_data_hdr_t	*hdr;		/* data block header */
2184 	xfs_dir2_data_entry_t	*dep;		/* data entry changed */
2185 	int			error;		/* error return value */
2186 	int			i;		/* btree level */
2187 	xfs_ino_t		inum;		/* new inode number */
2188 	int			ftype;		/* new file type */
2189 	xfs_dir2_leaf_t		*leaf;		/* leaf structure */
2190 	xfs_dir2_leaf_entry_t	*lep;		/* leaf entry being changed */
2191 	int			rval;		/* internal return value */
2192 	xfs_da_state_t		*state;		/* btree cursor */
2193 
2194 	trace_xfs_dir2_node_replace(args);
2195 
2196 	/*
2197 	 * Allocate and initialize the btree cursor.
2198 	 */
2199 	state = xfs_da_state_alloc();
2200 	state->args = args;
2201 	state->mp = args->dp->i_mount;
2202 
2203 	/*
2204 	 * We have to save new inode number and ftype since
2205 	 * xfs_da3_node_lookup_int() is going to overwrite them
2206 	 */
2207 	inum = args->inumber;
2208 	ftype = args->filetype;
2209 
2210 	/*
2211 	 * Lookup the entry to change in the btree.
2212 	 */
2213 	error = xfs_da3_node_lookup_int(state, &rval);
2214 	if (error) {
2215 		rval = error;
2216 	}
2217 	/*
2218 	 * It should be found, since the vnodeops layer has looked it up
2219 	 * and locked it.  But paranoia is good.
2220 	 */
2221 	if (rval == -EEXIST) {
2222 		struct xfs_dir2_leaf_entry *ents;
2223 		/*
2224 		 * Find the leaf entry.
2225 		 */
2226 		blk = &state->path.blk[state->path.active - 1];
2227 		ASSERT(blk->magic == XFS_DIR2_LEAFN_MAGIC);
2228 		leaf = blk->bp->b_addr;
2229 		ents = args->dp->d_ops->leaf_ents_p(leaf);
2230 		lep = &ents[blk->index];
2231 		ASSERT(state->extravalid);
2232 		/*
2233 		 * Point to the data entry.
2234 		 */
2235 		hdr = state->extrablk.bp->b_addr;
2236 		ASSERT(hdr->magic == cpu_to_be32(XFS_DIR2_DATA_MAGIC) ||
2237 		       hdr->magic == cpu_to_be32(XFS_DIR3_DATA_MAGIC));
2238 		dep = (xfs_dir2_data_entry_t *)
2239 		      ((char *)hdr +
2240 		       xfs_dir2_dataptr_to_off(args->geo,
2241 					       be32_to_cpu(lep->address)));
2242 		ASSERT(inum != be64_to_cpu(dep->inumber));
2243 		/*
2244 		 * Fill in the new inode number and log the entry.
2245 		 */
2246 		dep->inumber = cpu_to_be64(inum);
2247 		args->dp->d_ops->data_put_ftype(dep, ftype);
2248 		xfs_dir2_data_log_entry(args, state->extrablk.bp, dep);
2249 		rval = 0;
2250 	}
2251 	/*
2252 	 * Didn't find it, and we're holding a data block.  Drop it.
2253 	 */
2254 	else if (state->extravalid) {
2255 		xfs_trans_brelse(args->trans, state->extrablk.bp);
2256 		state->extrablk.bp = NULL;
2257 	}
2258 	/*
2259 	 * Release all the buffers in the cursor.
2260 	 */
2261 	for (i = 0; i < state->path.active; i++) {
2262 		xfs_trans_brelse(args->trans, state->path.blk[i].bp);
2263 		state->path.blk[i].bp = NULL;
2264 	}
2265 	xfs_da_state_free(state);
2266 	return rval;
2267 }
2268 
2269 /*
2270  * Trim off a trailing empty freespace block.
2271  * Return (in rvalp) 1 if we did it, 0 if not.
2272  */
2273 int						/* error */
2274 xfs_dir2_node_trim_free(
2275 	xfs_da_args_t		*args,		/* operation arguments */
2276 	xfs_fileoff_t		fo,		/* free block number */
2277 	int			*rvalp)		/* out: did something */
2278 {
2279 	struct xfs_buf		*bp;		/* freespace buffer */
2280 	xfs_inode_t		*dp;		/* incore directory inode */
2281 	int			error;		/* error return code */
2282 	xfs_dir2_free_t		*free;		/* freespace structure */
2283 	xfs_trans_t		*tp;		/* transaction pointer */
2284 	struct xfs_dir3_icfree_hdr freehdr;
2285 
2286 	dp = args->dp;
2287 	tp = args->trans;
2288 
2289 	*rvalp = 0;
2290 
2291 	/*
2292 	 * Read the freespace block.
2293 	 */
2294 	error = xfs_dir2_free_try_read(tp, dp, fo, &bp);
2295 	if (error)
2296 		return error;
2297 	/*
2298 	 * There can be holes in freespace.  If fo is a hole, there's
2299 	 * nothing to do.
2300 	 */
2301 	if (!bp)
2302 		return 0;
2303 	free = bp->b_addr;
2304 	dp->d_ops->free_hdr_from_disk(&freehdr, free);
2305 
2306 	/*
2307 	 * If there are used entries, there's nothing to do.
2308 	 */
2309 	if (freehdr.nused > 0) {
2310 		xfs_trans_brelse(tp, bp);
2311 		return 0;
2312 	}
2313 	/*
2314 	 * Blow the block away.
2315 	 */
2316 	error = xfs_dir2_shrink_inode(args,
2317 			xfs_dir2_da_to_db(args->geo, (xfs_dablk_t)fo), bp);
2318 	if (error) {
2319 		/*
2320 		 * Can't fail with ENOSPC since that only happens with no
2321 		 * space reservation, when breaking up an extent into two
2322 		 * pieces.  This is the last block of an extent.
2323 		 */
2324 		ASSERT(error != -ENOSPC);
2325 		xfs_trans_brelse(tp, bp);
2326 		return error;
2327 	}
2328 	/*
2329 	 * Return that we succeeded.
2330 	 */
2331 	*rvalp = 1;
2332 	return 0;
2333 }
2334