xfs_alloc.c 82.0 KB
Newer Older
L
Linus Torvalds 已提交
1
/*
2 3
 * Copyright (c) 2000-2002,2005 Silicon Graphics, Inc.
 * All Rights Reserved.
L
Linus Torvalds 已提交
4
 *
5 6
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
L
Linus Torvalds 已提交
7 8
 * published by the Free Software Foundation.
 *
9 10 11 12
 * This program is distributed in the hope that it would be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
L
Linus Torvalds 已提交
13
 *
14 15 16
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write the Free Software Foundation,
 * Inc.,  51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
L
Linus Torvalds 已提交
17 18
 */
#include "xfs.h"
19
#include "xfs_fs.h"
20
#include "xfs_format.h"
21
#include "xfs_log_format.h"
22
#include "xfs_shared.h"
23
#include "xfs_trans_resv.h"
24
#include "xfs_bit.h"
L
Linus Torvalds 已提交
25 26
#include "xfs_sb.h"
#include "xfs_mount.h"
27
#include "xfs_defer.h"
28
#include "xfs_inode.h"
L
Linus Torvalds 已提交
29
#include "xfs_btree.h"
30
#include "xfs_rmap.h"
31
#include "xfs_alloc_btree.h"
L
Linus Torvalds 已提交
32
#include "xfs_alloc.h"
33
#include "xfs_extent_busy.h"
L
Linus Torvalds 已提交
34
#include "xfs_error.h"
D
Dave Chinner 已提交
35
#include "xfs_cksum.h"
C
Christoph Hellwig 已提交
36
#include "xfs_trace.h"
37
#include "xfs_trans.h"
D
Dave Chinner 已提交
38
#include "xfs_buf_item.h"
39
#include "xfs_log.h"
40
#include "xfs_ag_resv.h"
L
Linus Torvalds 已提交
41

42
struct workqueue_struct *xfs_alloc_wq;
L
Linus Torvalds 已提交
43 44 45 46 47 48 49 50 51 52

#define XFS_ABSDIFF(a,b)	(((a) <= (b)) ? ((b) - (a)) : ((a) - (b)))

#define	XFSA_FIXUP_BNO_OK	1
#define	XFSA_FIXUP_CNT_OK	2

STATIC int xfs_alloc_ag_vextent_exact(xfs_alloc_arg_t *);
STATIC int xfs_alloc_ag_vextent_near(xfs_alloc_arg_t *);
STATIC int xfs_alloc_ag_vextent_size(xfs_alloc_arg_t *);
STATIC int xfs_alloc_ag_vextent_small(xfs_alloc_arg_t *,
53
		xfs_btree_cur_t *, xfs_agblock_t *, xfs_extlen_t *, int *);
L
Linus Torvalds 已提交
54

55 56 57 58 59 60 61 62 63 64 65
unsigned int
xfs_refc_block(
	struct xfs_mount	*mp)
{
	if (xfs_sb_version_hasrmapbt(&mp->m_sb))
		return XFS_RMAP_BLOCK(mp) + 1;
	if (xfs_sb_version_hasfinobt(&mp->m_sb))
		return XFS_FIBT_BLOCK(mp) + 1;
	return XFS_IBT_BLOCK(mp) + 1;
}

66 67 68 69
xfs_extlen_t
xfs_prealloc_blocks(
	struct xfs_mount	*mp)
{
70 71
	if (xfs_sb_version_hasreflink(&mp->m_sb))
		return xfs_refc_block(mp) + 1;
72 73 74 75 76 77 78
	if (xfs_sb_version_hasrmapbt(&mp->m_sb))
		return XFS_RMAP_BLOCK(mp) + 1;
	if (xfs_sb_version_hasfinobt(&mp->m_sb))
		return XFS_FIBT_BLOCK(mp) + 1;
	return XFS_IBT_BLOCK(mp) + 1;
}

79 80 81 82 83 84 85 86 87 88 89 90
/*
 * In order to avoid ENOSPC-related deadlock caused by out-of-order locking of
 * AGF buffer (PV 947395), we place constraints on the relationship among
 * actual allocations for data blocks, freelist blocks, and potential file data
 * bmap btree blocks. However, these restrictions may result in no actual space
 * allocated for a delayed extent, for example, a data block in a certain AG is
 * allocated but there is no additional block for the additional bmap btree
 * block due to a split of the bmap btree of the file. The result of this may
 * lead to an infinite loop when the file gets flushed to disk and all delayed
 * extents need to be actually allocated. To get around this, we explicitly set
 * aside a few blocks which will not be reserved in delayed allocation.
 *
91 92
 * We need to reserve 4 fsbs _per AG_ for the freelist and 4 more to handle a
 * potential split of the file's bmap btree.
93 94 95 96 97
 */
unsigned int
xfs_alloc_set_aside(
	struct xfs_mount	*mp)
{
98
	return mp->m_sb.sb_agcount * (XFS_ALLOC_AGFL_RESERVE + 4);
99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127
}

/*
 * When deciding how much space to allocate out of an AG, we limit the
 * allocation maximum size to the size the AG. However, we cannot use all the
 * blocks in the AG - some are permanently used by metadata. These
 * blocks are generally:
 *	- the AG superblock, AGF, AGI and AGFL
 *	- the AGF (bno and cnt) and AGI btree root blocks, and optionally
 *	  the AGI free inode and rmap btree root blocks.
 *	- blocks on the AGFL according to xfs_alloc_set_aside() limits
 *	- the rmapbt root block
 *
 * The AG headers are sector sized, so the amount of space they take up is
 * dependent on filesystem geometry. The others are all single blocks.
 */
unsigned int
xfs_alloc_ag_max_usable(
	struct xfs_mount	*mp)
{
	unsigned int		blocks;

	blocks = XFS_BB_TO_FSB(mp, XFS_FSS_TO_BB(mp, 4)); /* ag headers */
	blocks += XFS_ALLOC_AGFL_RESERVE;
	blocks += 3;			/* AGF, AGI btree root blocks */
	if (xfs_sb_version_hasfinobt(&mp->m_sb))
		blocks++;		/* finobt root block */
	if (xfs_sb_version_hasrmapbt(&mp->m_sb))
		blocks++; 		/* rmap root block */
128 129
	if (xfs_sb_version_hasreflink(&mp->m_sb))
		blocks++;		/* refcount root block */
130 131 132 133

	return mp->m_sb.sb_agblocks - blocks;
}

134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152
/*
 * Lookup the record equal to [bno, len] in the btree given by cur.
 */
STATIC int				/* error */
xfs_alloc_lookup_eq(
	struct xfs_btree_cur	*cur,	/* btree cursor */
	xfs_agblock_t		bno,	/* starting block of extent */
	xfs_extlen_t		len,	/* length of extent */
	int			*stat)	/* success/failure */
{
	cur->bc_rec.a.ar_startblock = bno;
	cur->bc_rec.a.ar_blockcount = len;
	return xfs_btree_lookup(cur, XFS_LOOKUP_EQ, stat);
}

/*
 * Lookup the first record greater than or equal to [bno, len]
 * in the btree given by cur.
 */
153
int				/* error */
154 155 156 157 158 159 160 161 162 163 164 165 166 167 168
xfs_alloc_lookup_ge(
	struct xfs_btree_cur	*cur,	/* btree cursor */
	xfs_agblock_t		bno,	/* starting block of extent */
	xfs_extlen_t		len,	/* length of extent */
	int			*stat)	/* success/failure */
{
	cur->bc_rec.a.ar_startblock = bno;
	cur->bc_rec.a.ar_blockcount = len;
	return xfs_btree_lookup(cur, XFS_LOOKUP_GE, stat);
}

/*
 * Lookup the first record less than or equal to [bno, len]
 * in the btree given by cur.
 */
169
static int				/* error */
170 171 172 173 174 175 176 177 178 179 180
xfs_alloc_lookup_le(
	struct xfs_btree_cur	*cur,	/* btree cursor */
	xfs_agblock_t		bno,	/* starting block of extent */
	xfs_extlen_t		len,	/* length of extent */
	int			*stat)	/* success/failure */
{
	cur->bc_rec.a.ar_startblock = bno;
	cur->bc_rec.a.ar_blockcount = len;
	return xfs_btree_lookup(cur, XFS_LOOKUP_LE, stat);
}

181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197
/*
 * Update the record referred to by cur to the value given
 * by [bno, len].
 * This either works (return 0) or gets an EFSCORRUPTED error.
 */
STATIC int				/* error */
xfs_alloc_update(
	struct xfs_btree_cur	*cur,	/* btree cursor */
	xfs_agblock_t		bno,	/* starting block of extent */
	xfs_extlen_t		len)	/* length of extent */
{
	union xfs_btree_rec	rec;

	rec.alloc.ar_startblock = cpu_to_be32(bno);
	rec.alloc.ar_blockcount = cpu_to_be32(len);
	return xfs_btree_update(cur, &rec);
}
198

199 200 201
/*
 * Get the data from the pointed-to record.
 */
C
Christoph Hellwig 已提交
202
int					/* error */
203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219
xfs_alloc_get_rec(
	struct xfs_btree_cur	*cur,	/* btree cursor */
	xfs_agblock_t		*bno,	/* output: starting block of extent */
	xfs_extlen_t		*len,	/* output: length of extent */
	int			*stat)	/* output: success/failure */
{
	union xfs_btree_rec	*rec;
	int			error;

	error = xfs_btree_get_rec(cur, &rec, stat);
	if (!error && *stat == 1) {
		*bno = be32_to_cpu(rec->alloc.ar_startblock);
		*len = be32_to_cpu(rec->alloc.ar_blockcount);
	}
	return error;
}

L
Linus Torvalds 已提交
220 221 222 223
/*
 * Compute aligned version of the found extent.
 * Takes alignment and min length into account.
 */
224
STATIC bool
L
Linus Torvalds 已提交
225
xfs_alloc_compute_aligned(
226
	xfs_alloc_arg_t	*args,		/* allocation argument structure */
L
Linus Torvalds 已提交
227 228 229
	xfs_agblock_t	foundbno,	/* starting block in found extent */
	xfs_extlen_t	foundlen,	/* length in found extent */
	xfs_agblock_t	*resbno,	/* result block number */
230 231
	xfs_extlen_t	*reslen,	/* result length */
	unsigned	*busy_gen)
L
Linus Torvalds 已提交
232
{
233 234
	xfs_agblock_t	bno = foundbno;
	xfs_extlen_t	len = foundlen;
235
	xfs_extlen_t	diff;
236
	bool		busy;
L
Linus Torvalds 已提交
237

238
	/* Trim busy sections out of found extent */
239
	busy = xfs_extent_busy_trim(args, &bno, &len, busy_gen);
240

241 242 243 244 245 246 247 248 249 250 251 252
	/*
	 * If we have a largish extent that happens to start before min_agbno,
	 * see if we can shift it into range...
	 */
	if (bno < args->min_agbno && bno + len > args->min_agbno) {
		diff = args->min_agbno - bno;
		if (len > diff) {
			bno += diff;
			len -= diff;
		}
	}

253 254
	if (args->alignment > 1 && len >= args->minlen) {
		xfs_agblock_t	aligned_bno = roundup(bno, args->alignment);
255 256

		diff = aligned_bno - bno;
257 258 259

		*resbno = aligned_bno;
		*reslen = diff >= len ? 0 : len - diff;
L
Linus Torvalds 已提交
260
	} else {
261 262
		*resbno = bno;
		*reslen = len;
L
Linus Torvalds 已提交
263
	}
264 265

	return busy;
L
Linus Torvalds 已提交
266 267 268 269 270 271 272 273 274 275 276
}

/*
 * Compute best start block and diff for "near" allocations.
 * freelen >= wantlen already checked by caller.
 */
STATIC xfs_extlen_t			/* difference value (absolute) */
xfs_alloc_compute_diff(
	xfs_agblock_t	wantbno,	/* target starting block */
	xfs_extlen_t	wantlen,	/* target length */
	xfs_extlen_t	alignment,	/* target alignment */
277
	int		datatype,	/* are we allocating data? */
L
Linus Torvalds 已提交
278 279 280 281 282 283 284 285 286 287
	xfs_agblock_t	freebno,	/* freespace's starting block */
	xfs_extlen_t	freelen,	/* freespace's length */
	xfs_agblock_t	*newbnop)	/* result: best start block from free */
{
	xfs_agblock_t	freeend;	/* end of freespace extent */
	xfs_agblock_t	newbno1;	/* return block number */
	xfs_agblock_t	newbno2;	/* other new block number */
	xfs_extlen_t	newlen1=0;	/* length with newbno1 */
	xfs_extlen_t	newlen2=0;	/* length with newbno2 */
	xfs_agblock_t	wantend;	/* end of target extent */
288
	bool		userdata = xfs_alloc_is_userdata(datatype);
L
Linus Torvalds 已提交
289 290 291 292

	ASSERT(freelen >= wantlen);
	freeend = freebno + freelen;
	wantend = wantbno + wantlen;
293 294 295 296 297 298 299 300
	/*
	 * We want to allocate from the start of a free extent if it is past
	 * the desired block or if we are allocating user data and the free
	 * extent is before desired block. The second case is there to allow
	 * for contiguous allocation from the remaining free space if the file
	 * grows in the short term.
	 */
	if (freebno >= wantbno || (userdata && freeend < wantend)) {
L
Linus Torvalds 已提交
301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359
		if ((newbno1 = roundup(freebno, alignment)) >= freeend)
			newbno1 = NULLAGBLOCK;
	} else if (freeend >= wantend && alignment > 1) {
		newbno1 = roundup(wantbno, alignment);
		newbno2 = newbno1 - alignment;
		if (newbno1 >= freeend)
			newbno1 = NULLAGBLOCK;
		else
			newlen1 = XFS_EXTLEN_MIN(wantlen, freeend - newbno1);
		if (newbno2 < freebno)
			newbno2 = NULLAGBLOCK;
		else
			newlen2 = XFS_EXTLEN_MIN(wantlen, freeend - newbno2);
		if (newbno1 != NULLAGBLOCK && newbno2 != NULLAGBLOCK) {
			if (newlen1 < newlen2 ||
			    (newlen1 == newlen2 &&
			     XFS_ABSDIFF(newbno1, wantbno) >
			     XFS_ABSDIFF(newbno2, wantbno)))
				newbno1 = newbno2;
		} else if (newbno2 != NULLAGBLOCK)
			newbno1 = newbno2;
	} else if (freeend >= wantend) {
		newbno1 = wantbno;
	} else if (alignment > 1) {
		newbno1 = roundup(freeend - wantlen, alignment);
		if (newbno1 > freeend - wantlen &&
		    newbno1 - alignment >= freebno)
			newbno1 -= alignment;
		else if (newbno1 >= freeend)
			newbno1 = NULLAGBLOCK;
	} else
		newbno1 = freeend - wantlen;
	*newbnop = newbno1;
	return newbno1 == NULLAGBLOCK ? 0 : XFS_ABSDIFF(newbno1, wantbno);
}

/*
 * Fix up the length, based on mod and prod.
 * len should be k * prod + mod for some k.
 * If len is too small it is returned unchanged.
 * If len hits maxlen it is left alone.
 */
STATIC void
xfs_alloc_fix_len(
	xfs_alloc_arg_t	*args)		/* allocation argument structure */
{
	xfs_extlen_t	k;
	xfs_extlen_t	rlen;

	ASSERT(args->mod < args->prod);
	rlen = args->len;
	ASSERT(rlen >= args->minlen);
	ASSERT(rlen <= args->maxlen);
	if (args->prod <= 1 || rlen < args->mod || rlen == args->maxlen ||
	    (args->mod == 0 && rlen < args->prod))
		return;
	k = rlen % args->prod;
	if (k == args->mod)
		return;
360 361 362 363
	if (k > args->mod)
		rlen = rlen - (k - args->mod);
	else
		rlen = rlen - args->prod + (args->mod - k);
364
	/* casts to (int) catch length underflows */
365 366 367 368
	if ((int)rlen < (int)args->minlen)
		return;
	ASSERT(rlen >= args->minlen && rlen <= args->maxlen);
	ASSERT(rlen % args->prod == args->mod);
369 370
	ASSERT(args->pag->pagf_freeblks + args->pag->pagf_flcount >=
		rlen + args->minleft);
L
Linus Torvalds 已提交
371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396
	args->len = rlen;
}

/*
 * Update the two btrees, logically removing from freespace the extent
 * starting at rbno, rlen blocks.  The extent is contained within the
 * actual (current) free extent fbno for flen blocks.
 * Flags are passed in indicating whether the cursors are set to the
 * relevant records.
 */
STATIC int				/* error code */
xfs_alloc_fixup_trees(
	xfs_btree_cur_t	*cnt_cur,	/* cursor for by-size btree */
	xfs_btree_cur_t	*bno_cur,	/* cursor for by-block btree */
	xfs_agblock_t	fbno,		/* starting block of free extent */
	xfs_extlen_t	flen,		/* length of free extent */
	xfs_agblock_t	rbno,		/* starting block of returned extent */
	xfs_extlen_t	rlen,		/* length of returned extent */
	int		flags)		/* flags, XFSA_FIXUP_... */
{
	int		error;		/* error code */
	int		i;		/* operation results */
	xfs_agblock_t	nfbno1;		/* first new free startblock */
	xfs_agblock_t	nfbno2;		/* second new free startblock */
	xfs_extlen_t	nflen1=0;	/* first new free length */
	xfs_extlen_t	nflen2=0;	/* second new free length */
397 398 399
	struct xfs_mount *mp;

	mp = cnt_cur->bc_mp;
L
Linus Torvalds 已提交
400 401 402 403 404 405 406 407

	/*
	 * Look up the record in the by-size tree if necessary.
	 */
	if (flags & XFSA_FIXUP_CNT_OK) {
#ifdef DEBUG
		if ((error = xfs_alloc_get_rec(cnt_cur, &nfbno1, &nflen1, &i)))
			return error;
408
		XFS_WANT_CORRUPTED_RETURN(mp,
L
Linus Torvalds 已提交
409 410 411 412 413
			i == 1 && nfbno1 == fbno && nflen1 == flen);
#endif
	} else {
		if ((error = xfs_alloc_lookup_eq(cnt_cur, fbno, flen, &i)))
			return error;
414
		XFS_WANT_CORRUPTED_RETURN(mp, i == 1);
L
Linus Torvalds 已提交
415 416 417 418 419 420 421 422
	}
	/*
	 * Look up the record in the by-block tree if necessary.
	 */
	if (flags & XFSA_FIXUP_BNO_OK) {
#ifdef DEBUG
		if ((error = xfs_alloc_get_rec(bno_cur, &nfbno1, &nflen1, &i)))
			return error;
423
		XFS_WANT_CORRUPTED_RETURN(mp,
L
Linus Torvalds 已提交
424 425 426 427 428
			i == 1 && nfbno1 == fbno && nflen1 == flen);
#endif
	} else {
		if ((error = xfs_alloc_lookup_eq(bno_cur, fbno, flen, &i)))
			return error;
429
		XFS_WANT_CORRUPTED_RETURN(mp, i == 1);
L
Linus Torvalds 已提交
430
	}
431

L
Linus Torvalds 已提交
432
#ifdef DEBUG
433 434 435 436 437 438
	if (bno_cur->bc_nlevels == 1 && cnt_cur->bc_nlevels == 1) {
		struct xfs_btree_block	*bnoblock;
		struct xfs_btree_block	*cntblock;

		bnoblock = XFS_BUF_TO_BLOCK(bno_cur->bc_bufs[0]);
		cntblock = XFS_BUF_TO_BLOCK(cnt_cur->bc_bufs[0]);
L
Linus Torvalds 已提交
439

440
		XFS_WANT_CORRUPTED_RETURN(mp,
441
			bnoblock->bb_numrecs == cntblock->bb_numrecs);
L
Linus Torvalds 已提交
442 443
	}
#endif
444

L
Linus Torvalds 已提交
445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468
	/*
	 * Deal with all four cases: the allocated record is contained
	 * within the freespace record, so we can have new freespace
	 * at either (or both) end, or no freespace remaining.
	 */
	if (rbno == fbno && rlen == flen)
		nfbno1 = nfbno2 = NULLAGBLOCK;
	else if (rbno == fbno) {
		nfbno1 = rbno + rlen;
		nflen1 = flen - rlen;
		nfbno2 = NULLAGBLOCK;
	} else if (rbno + rlen == fbno + flen) {
		nfbno1 = fbno;
		nflen1 = flen - rlen;
		nfbno2 = NULLAGBLOCK;
	} else {
		nfbno1 = fbno;
		nflen1 = rbno - fbno;
		nfbno2 = rbno + rlen;
		nflen2 = (fbno + flen) - nfbno2;
	}
	/*
	 * Delete the entry from the by-size btree.
	 */
469
	if ((error = xfs_btree_delete(cnt_cur, &i)))
L
Linus Torvalds 已提交
470
		return error;
471
	XFS_WANT_CORRUPTED_RETURN(mp, i == 1);
L
Linus Torvalds 已提交
472 473 474 475 476 477
	/*
	 * Add new by-size btree entry(s).
	 */
	if (nfbno1 != NULLAGBLOCK) {
		if ((error = xfs_alloc_lookup_eq(cnt_cur, nfbno1, nflen1, &i)))
			return error;
478
		XFS_WANT_CORRUPTED_RETURN(mp, i == 0);
479
		if ((error = xfs_btree_insert(cnt_cur, &i)))
L
Linus Torvalds 已提交
480
			return error;
481
		XFS_WANT_CORRUPTED_RETURN(mp, i == 1);
L
Linus Torvalds 已提交
482 483 484 485
	}
	if (nfbno2 != NULLAGBLOCK) {
		if ((error = xfs_alloc_lookup_eq(cnt_cur, nfbno2, nflen2, &i)))
			return error;
486
		XFS_WANT_CORRUPTED_RETURN(mp, i == 0);
487
		if ((error = xfs_btree_insert(cnt_cur, &i)))
L
Linus Torvalds 已提交
488
			return error;
489
		XFS_WANT_CORRUPTED_RETURN(mp, i == 1);
L
Linus Torvalds 已提交
490 491 492 493 494 495 496 497
	}
	/*
	 * Fix up the by-block btree entry(s).
	 */
	if (nfbno1 == NULLAGBLOCK) {
		/*
		 * No remaining freespace, just delete the by-block tree entry.
		 */
498
		if ((error = xfs_btree_delete(bno_cur, &i)))
L
Linus Torvalds 已提交
499
			return error;
500
		XFS_WANT_CORRUPTED_RETURN(mp, i == 1);
L
Linus Torvalds 已提交
501 502 503 504 505 506 507 508 509 510 511 512 513
	} else {
		/*
		 * Update the by-block entry to start later|be shorter.
		 */
		if ((error = xfs_alloc_update(bno_cur, nfbno1, nflen1)))
			return error;
	}
	if (nfbno2 != NULLAGBLOCK) {
		/*
		 * 2 resulting free entries, need to add one.
		 */
		if ((error = xfs_alloc_lookup_eq(bno_cur, nfbno2, nflen2, &i)))
			return error;
514
		XFS_WANT_CORRUPTED_RETURN(mp, i == 0);
515
		if ((error = xfs_btree_insert(bno_cur, &i)))
L
Linus Torvalds 已提交
516
			return error;
517
		XFS_WANT_CORRUPTED_RETURN(mp, i == 1);
L
Linus Torvalds 已提交
518 519 520 521
	}
	return 0;
}

522
static bool
523
xfs_agfl_verify(
524 525 526 527 528 529
	struct xfs_buf	*bp)
{
	struct xfs_mount *mp = bp->b_target->bt_mount;
	struct xfs_agfl	*agfl = XFS_BUF_TO_AGFL(bp);
	int		i;

530
	if (!uuid_equal(&agfl->agfl_uuid, &mp->m_sb.sb_meta_uuid))
531 532 533 534 535 536 537 538 539 540 541 542
		return false;
	if (be32_to_cpu(agfl->agfl_magicnum) != XFS_AGFL_MAGIC)
		return false;
	/*
	 * during growfs operations, the perag is not fully initialised,
	 * so we can't use it for any useful checking. growfs ensures we can't
	 * use it by using uncached buffers that don't have the perag attached
	 * so we can detect and avoid this problem.
	 */
	if (bp->b_pag && be32_to_cpu(agfl->agfl_seqno) != bp->b_pag->pag_agno)
		return false;

543
	for (i = 0; i < XFS_AGFL_SIZE(mp); i++) {
544
		if (be32_to_cpu(agfl->agfl_bno[i]) != NULLAGBLOCK &&
545
		    be32_to_cpu(agfl->agfl_bno[i]) >= mp->m_sb.sb_agblocks)
546
			return false;
547
	}
548 549 550

	return xfs_log_check_lsn(mp,
				 be64_to_cpu(XFS_BUF_TO_AGFL(bp)->agfl_lsn));
551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567
}

static void
xfs_agfl_read_verify(
	struct xfs_buf	*bp)
{
	struct xfs_mount *mp = bp->b_target->bt_mount;

	/*
	 * There is no verification of non-crc AGFLs because mkfs does not
	 * initialise the AGFL to zero or NULL. Hence the only valid part of the
	 * AGFL is what the AGF says is active. We can't get to the AGF, so we
	 * can't verify just those entries are valid.
	 */
	if (!xfs_sb_version_hascrc(&mp->m_sb))
		return;

568
	if (!xfs_buf_verify_cksum(bp, XFS_AGFL_CRC_OFF))
D
Dave Chinner 已提交
569
		xfs_buf_ioerror(bp, -EFSBADCRC);
570
	else if (!xfs_agfl_verify(bp))
D
Dave Chinner 已提交
571
		xfs_buf_ioerror(bp, -EFSCORRUPTED);
572 573 574

	if (bp->b_error)
		xfs_verifier_error(bp);
575 576
}

577
static void
578 579 580
xfs_agfl_write_verify(
	struct xfs_buf	*bp)
{
581 582
	struct xfs_mount *mp = bp->b_target->bt_mount;
	struct xfs_buf_log_item	*bip = bp->b_fspriv;
583

584 585 586 587 588
	/* no verification of non-crc AGFLs */
	if (!xfs_sb_version_hascrc(&mp->m_sb))
		return;

	if (!xfs_agfl_verify(bp)) {
D
Dave Chinner 已提交
589
		xfs_buf_ioerror(bp, -EFSCORRUPTED);
590
		xfs_verifier_error(bp);
591 592 593 594 595 596
		return;
	}

	if (bip)
		XFS_BUF_TO_AGFL(bp)->agfl_lsn = cpu_to_be64(bip->bli_item.li_lsn);

597
	xfs_buf_update_cksum(bp, XFS_AGFL_CRC_OFF);
598 599
}

600
const struct xfs_buf_ops xfs_agfl_buf_ops = {
601
	.name = "xfs_agfl",
602 603 604 605
	.verify_read = xfs_agfl_read_verify,
	.verify_write = xfs_agfl_write_verify,
};

L
Linus Torvalds 已提交
606 607 608
/*
 * Read in the allocation group free block array.
 */
609
int					/* error */
L
Linus Torvalds 已提交
610 611 612 613 614 615 616 617 618 619 620 621 622
xfs_alloc_read_agfl(
	xfs_mount_t	*mp,		/* mount point structure */
	xfs_trans_t	*tp,		/* transaction pointer */
	xfs_agnumber_t	agno,		/* allocation group number */
	xfs_buf_t	**bpp)		/* buffer for the ag free block array */
{
	xfs_buf_t	*bp;		/* return value */
	int		error;

	ASSERT(agno != NULLAGNUMBER);
	error = xfs_trans_read_buf(
			mp, tp, mp->m_ddev_targp,
			XFS_AG_DADDR(mp, agno, XFS_AGFL_DADDR(mp)),
623
			XFS_FSS_TO_BB(mp, 1), 0, &bp, &xfs_agfl_buf_ops);
L
Linus Torvalds 已提交
624 625
	if (error)
		return error;
626
	xfs_buf_set_ref(bp, XFS_AGFL_REF);
L
Linus Torvalds 已提交
627 628 629 630
	*bpp = bp;
	return 0;
}

631 632 633 634 635 636 637 638 639 640 641 642 643 644 645
STATIC int
xfs_alloc_update_counters(
	struct xfs_trans	*tp,
	struct xfs_perag	*pag,
	struct xfs_buf		*agbp,
	long			len)
{
	struct xfs_agf		*agf = XFS_BUF_TO_AGF(agbp);

	pag->pagf_freeblks += len;
	be32_add_cpu(&agf->agf_freeblks, len);

	xfs_trans_agblocks_delta(tp, len);
	if (unlikely(be32_to_cpu(agf->agf_freeblks) >
		     be32_to_cpu(agf->agf_length)))
D
Dave Chinner 已提交
646
		return -EFSCORRUPTED;
647 648 649 650 651

	xfs_alloc_log_agf(tp, agbp, XFS_AGF_FREEBLKS);
	return 0;
}

L
Linus Torvalds 已提交
652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674
/*
 * Allocation group level functions.
 */

/*
 * Allocate a variable extent in the allocation group agno.
 * Type and bno are used to determine where in the allocation group the
 * extent will start.
 * Extent's length (returned in *len) will be between minlen and maxlen,
 * and of the form k * prod + mod unless there's nothing that large.
 * Return the starting a.g. block, or NULLAGBLOCK if we can't do it.
 */
STATIC int			/* error */
xfs_alloc_ag_vextent(
	xfs_alloc_arg_t	*args)	/* argument structure for allocation */
{
	int		error=0;

	ASSERT(args->minlen > 0);
	ASSERT(args->maxlen > 0);
	ASSERT(args->minlen <= args->maxlen);
	ASSERT(args->mod < args->prod);
	ASSERT(args->alignment > 0);
675

L
Linus Torvalds 已提交
676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693
	/*
	 * Branch to correct routine based on the type.
	 */
	args->wasfromfl = 0;
	switch (args->type) {
	case XFS_ALLOCTYPE_THIS_AG:
		error = xfs_alloc_ag_vextent_size(args);
		break;
	case XFS_ALLOCTYPE_NEAR_BNO:
		error = xfs_alloc_ag_vextent_near(args);
		break;
	case XFS_ALLOCTYPE_THIS_BNO:
		error = xfs_alloc_ag_vextent_exact(args);
		break;
	default:
		ASSERT(0);
		/* NOTREACHED */
	}
694 695

	if (error || args->agbno == NULLAGBLOCK)
L
Linus Torvalds 已提交
696
		return error;
697 698 699

	ASSERT(args->len >= args->minlen);
	ASSERT(args->len <= args->maxlen);
700
	ASSERT(!args->wasfromfl || args->resv != XFS_AG_RESV_AGFL);
701 702
	ASSERT(args->agbno % args->alignment == 0);

703 704 705 706 707 708 709 710
	/* if not file data, insert new block into the reverse map btree */
	if (args->oinfo.oi_owner != XFS_RMAP_OWN_UNKNOWN) {
		error = xfs_rmap_alloc(args->tp, args->agbp, args->agno,
				       args->agbno, args->len, &args->oinfo);
		if (error)
			return error;
	}

711 712 713 714 715 716 717
	if (!args->wasfromfl) {
		error = xfs_alloc_update_counters(args->tp, args->pag,
						  args->agbp,
						  -((long)(args->len)));
		if (error)
			return error;

D
Dave Chinner 已提交
718
		ASSERT(!xfs_extent_busy_search(args->mp, args->agno,
719
					      args->agbno, args->len));
L
Linus Torvalds 已提交
720
	}
721

722
	xfs_ag_resv_alloc_extent(args->pag, args->resv, args);
723

724 725
	XFS_STATS_INC(args->mp, xs_allocx);
	XFS_STATS_ADD(args->mp, xs_allocb, args->len);
726
	return error;
L
Linus Torvalds 已提交
727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743
}

/*
 * Allocate a variable extent at exactly agno/bno.
 * Extent's length (returned in *len) will be between minlen and maxlen,
 * and of the form k * prod + mod unless there's nothing that large.
 * Return the starting a.g. block (bno), or NULLAGBLOCK if we can't do it.
 */
STATIC int			/* error */
xfs_alloc_ag_vextent_exact(
	xfs_alloc_arg_t	*args)	/* allocation argument structure */
{
	xfs_btree_cur_t	*bno_cur;/* by block-number btree cursor */
	xfs_btree_cur_t	*cnt_cur;/* by count btree cursor */
	int		error;
	xfs_agblock_t	fbno;	/* start block of found extent */
	xfs_extlen_t	flen;	/* length of found extent */
744 745 746
	xfs_agblock_t	tbno;	/* start block of busy extent */
	xfs_extlen_t	tlen;	/* length of busy extent */
	xfs_agblock_t	tend;	/* end block of busy extent */
L
Linus Torvalds 已提交
747
	int		i;	/* success/failure of operation */
748
	unsigned	busy_gen;
L
Linus Torvalds 已提交
749 750

	ASSERT(args->alignment == 1);
751

L
Linus Torvalds 已提交
752 753 754
	/*
	 * Allocate/initialize a cursor for the by-number freespace btree.
	 */
755
	bno_cur = xfs_allocbt_init_cursor(args->mp, args->tp, args->agbp,
756 757
					  args->agno, XFS_BTNUM_BNO);

L
Linus Torvalds 已提交
758 759 760 761 762
	/*
	 * Lookup bno and minlen in the btree (minlen is irrelevant, really).
	 * Look for the closest free block <= bno, it must contain bno
	 * if any free block does.
	 */
763 764
	error = xfs_alloc_lookup_le(bno_cur, args->agbno, args->minlen, &i);
	if (error)
L
Linus Torvalds 已提交
765
		goto error0;
766 767 768
	if (!i)
		goto not_found;

L
Linus Torvalds 已提交
769 770 771
	/*
	 * Grab the freespace record.
	 */
772 773
	error = xfs_alloc_get_rec(bno_cur, &fbno, &flen, &i);
	if (error)
L
Linus Torvalds 已提交
774
		goto error0;
775
	XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
L
Linus Torvalds 已提交
776
	ASSERT(fbno <= args->agbno);
777

L
Linus Torvalds 已提交
778
	/*
779
	 * Check for overlapping busy extents.
L
Linus Torvalds 已提交
780
	 */
781 782 783
	tbno = fbno;
	tlen = flen;
	xfs_extent_busy_trim(args, &tbno, &tlen, &busy_gen);
784 785 786 787 788 789 790 791 792 793 794

	/*
	 * Give up if the start of the extent is busy, or the freespace isn't
	 * long enough for the minimum request.
	 */
	if (tbno > args->agbno)
		goto not_found;
	if (tlen < args->minlen)
		goto not_found;
	tend = tbno + tlen;
	if (tend < args->agbno + args->minlen)
795 796
		goto not_found;

L
Linus Torvalds 已提交
797 798 799
	/*
	 * End of extent will be smaller of the freespace end and the
	 * maximal requested end.
800
	 *
L
Linus Torvalds 已提交
801 802
	 * Fix the length according to mod and prod if given.
	 */
803 804
	args->len = XFS_AGBLOCK_MIN(tend, args->agbno + args->maxlen)
						- args->agbno;
L
Linus Torvalds 已提交
805
	xfs_alloc_fix_len(args);
806
	ASSERT(args->agbno + args->len <= tend);
807

L
Linus Torvalds 已提交
808
	/*
809
	 * We are allocating agbno for args->len
L
Linus Torvalds 已提交
810 811
	 * Allocate/initialize a cursor for the by-size btree.
	 */
812 813
	cnt_cur = xfs_allocbt_init_cursor(args->mp, args->tp, args->agbp,
		args->agno, XFS_BTNUM_CNT);
L
Linus Torvalds 已提交
814
	ASSERT(args->agbno + args->len <=
815
		be32_to_cpu(XFS_BUF_TO_AGF(args->agbp)->agf_length));
816 817 818
	error = xfs_alloc_fixup_trees(cnt_cur, bno_cur, fbno, flen, args->agbno,
				      args->len, XFSA_FIXUP_BNO_OK);
	if (error) {
L
Linus Torvalds 已提交
819 820 821
		xfs_btree_del_cursor(cnt_cur, XFS_BTREE_ERROR);
		goto error0;
	}
822

L
Linus Torvalds 已提交
823 824
	xfs_btree_del_cursor(bno_cur, XFS_BTREE_NOERROR);
	xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
C
Christoph Hellwig 已提交
825

L
Linus Torvalds 已提交
826
	args->wasfromfl = 0;
827 828 829 830 831 832 833 834
	trace_xfs_alloc_exact_done(args);
	return 0;

not_found:
	/* Didn't find it, return null. */
	xfs_btree_del_cursor(bno_cur, XFS_BTREE_NOERROR);
	args->agbno = NULLAGBLOCK;
	trace_xfs_alloc_exact_notfound(args);
L
Linus Torvalds 已提交
835 836 837 838
	return 0;

error0:
	xfs_btree_del_cursor(bno_cur, XFS_BTREE_ERROR);
C
Christoph Hellwig 已提交
839
	trace_xfs_alloc_exact_error(args);
L
Linus Torvalds 已提交
840 841 842
	return error;
}

843 844 845 846 847 848 849 850 851 852 853
/*
 * Search the btree in a given direction via the search cursor and compare
 * the records found against the good extent we've already found.
 */
STATIC int
xfs_alloc_find_best_extent(
	struct xfs_alloc_arg	*args,	/* allocation argument structure */
	struct xfs_btree_cur	**gcur,	/* good cursor */
	struct xfs_btree_cur	**scur,	/* searching cursor */
	xfs_agblock_t		gdiff,	/* difference for search comparison */
	xfs_agblock_t		*sbno,	/* extent found by search */
854 855 856
	xfs_extlen_t		*slen,	/* extent length */
	xfs_agblock_t		*sbnoa,	/* aligned extent found by search */
	xfs_extlen_t		*slena,	/* aligned extent length */
857 858 859 860 861 862
	int			dir)	/* 0 = search right, 1 = search left */
{
	xfs_agblock_t		new;
	xfs_agblock_t		sdiff;
	int			error;
	int			i;
863
	unsigned		busy_gen;
864 865 866 867 868 869 870 871 872 873 874 875

	/* The good extent is perfect, no need to  search. */
	if (!gdiff)
		goto out_use_good;

	/*
	 * Look until we find a better one, run out of space or run off the end.
	 */
	do {
		error = xfs_alloc_get_rec(*scur, sbno, slen, &i);
		if (error)
			goto error0;
876
		XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
877 878
		xfs_alloc_compute_aligned(args, *sbno, *slen,
				sbnoa, slena, &busy_gen);
879 880 881 882 883

		/*
		 * The good extent is closer than this one.
		 */
		if (!dir) {
884 885
			if (*sbnoa > args->max_agbno)
				goto out_use_good;
886
			if (*sbnoa >= args->agbno + gdiff)
887 888
				goto out_use_good;
		} else {
889 890
			if (*sbnoa < args->min_agbno)
				goto out_use_good;
891
			if (*sbnoa <= args->agbno - gdiff)
892 893 894 895 896 897 898 899 900 901 902
				goto out_use_good;
		}

		/*
		 * Same distance, compare length and pick the best.
		 */
		if (*slena >= args->minlen) {
			args->len = XFS_EXTLEN_MIN(*slena, args->maxlen);
			xfs_alloc_fix_len(args);

			sdiff = xfs_alloc_compute_diff(args->agbno, args->len,
903
						       args->alignment,
904
						       args->datatype, *sbnoa,
905
						       *slena, &new);
906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937

			/*
			 * Choose closer size and invalidate other cursor.
			 */
			if (sdiff < gdiff)
				goto out_use_search;
			goto out_use_good;
		}

		if (!dir)
			error = xfs_btree_increment(*scur, 0, &i);
		else
			error = xfs_btree_decrement(*scur, 0, &i);
		if (error)
			goto error0;
	} while (i);

out_use_good:
	xfs_btree_del_cursor(*scur, XFS_BTREE_NOERROR);
	*scur = NULL;
	return 0;

out_use_search:
	xfs_btree_del_cursor(*gcur, XFS_BTREE_NOERROR);
	*gcur = NULL;
	return 0;

error0:
	/* caller invalidates cursors */
	return error;
}

L
Linus Torvalds 已提交
938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954
/*
 * Allocate a variable extent near bno in the allocation group agno.
 * Extent's length (returned in len) will be between minlen and maxlen,
 * and of the form k * prod + mod unless there's nothing that large.
 * Return the starting a.g. block, or NULLAGBLOCK if we can't do it.
 */
STATIC int				/* error */
xfs_alloc_ag_vextent_near(
	xfs_alloc_arg_t	*args)		/* allocation argument structure */
{
	xfs_btree_cur_t	*bno_cur_gt;	/* cursor for bno btree, right side */
	xfs_btree_cur_t	*bno_cur_lt;	/* cursor for bno btree, left side */
	xfs_btree_cur_t	*cnt_cur;	/* cursor for count btree */
	xfs_agblock_t	gtbno;		/* start bno of right side entry */
	xfs_agblock_t	gtbnoa;		/* aligned ... */
	xfs_extlen_t	gtdiff;		/* difference to right side entry */
	xfs_extlen_t	gtlen;		/* length of right side entry */
955
	xfs_extlen_t	gtlena;		/* aligned ... */
L
Linus Torvalds 已提交
956 957 958 959 960 961 962 963
	xfs_agblock_t	gtnew;		/* useful start bno of right side */
	int		error;		/* error code */
	int		i;		/* result code, temporary */
	int		j;		/* result code, temporary */
	xfs_agblock_t	ltbno;		/* start bno of left side entry */
	xfs_agblock_t	ltbnoa;		/* aligned ... */
	xfs_extlen_t	ltdiff;		/* difference to left side entry */
	xfs_extlen_t	ltlen;		/* length of left side entry */
964
	xfs_extlen_t	ltlena;		/* aligned ... */
L
Linus Torvalds 已提交
965 966
	xfs_agblock_t	ltnew;		/* useful start bno of left side */
	xfs_extlen_t	rlen;		/* length of returned extent */
967 968
	bool		busy;
	unsigned	busy_gen;
969
#ifdef DEBUG
L
Linus Torvalds 已提交
970 971 972 973 974
	/*
	 * Randomly don't execute the first algorithm.
	 */
	int		dofirst;	/* set to do first algorithm */

975
	dofirst = prandom_u32() & 1;
L
Linus Torvalds 已提交
976
#endif
977

978 979 980 981 982 983 984 985 986 987 988
	/* handle unitialized agbno range so caller doesn't have to */
	if (!args->min_agbno && !args->max_agbno)
		args->max_agbno = args->mp->m_sb.sb_agblocks - 1;
	ASSERT(args->min_agbno <= args->max_agbno);

	/* clamp agbno to the range if it's outside */
	if (args->agbno < args->min_agbno)
		args->agbno = args->min_agbno;
	if (args->agbno > args->max_agbno)
		args->agbno = args->max_agbno;

989 990 991 992 993 994
restart:
	bno_cur_lt = NULL;
	bno_cur_gt = NULL;
	ltlen = 0;
	gtlena = 0;
	ltlena = 0;
995
	busy = false;
996

L
Linus Torvalds 已提交
997 998 999
	/*
	 * Get a cursor for the by-size btree.
	 */
1000 1001
	cnt_cur = xfs_allocbt_init_cursor(args->mp, args->tp, args->agbp,
		args->agno, XFS_BTNUM_CNT);
1002

L
Linus Torvalds 已提交
1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017
	/*
	 * See if there are any free extents as big as maxlen.
	 */
	if ((error = xfs_alloc_lookup_ge(cnt_cur, 0, args->maxlen, &i)))
		goto error0;
	/*
	 * If none, then pick up the last entry in the tree unless the
	 * tree is empty.
	 */
	if (!i) {
		if ((error = xfs_alloc_ag_vextent_small(args, cnt_cur, &ltbno,
				&ltlen, &i)))
			goto error0;
		if (i == 0 || ltlen == 0) {
			xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
1018
			trace_xfs_alloc_near_noentry(args);
L
Linus Torvalds 已提交
1019 1020 1021 1022 1023
			return 0;
		}
		ASSERT(i == 1);
	}
	args->wasfromfl = 0;
1024

L
Linus Torvalds 已提交
1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040
	/*
	 * First algorithm.
	 * If the requested extent is large wrt the freespaces available
	 * in this a.g., then the cursor will be pointing to a btree entry
	 * near the right edge of the tree.  If it's in the last btree leaf
	 * block, then we just examine all the entries in that block
	 * that are big enough, and pick the best one.
	 * This is written as a while loop so we can break out of it,
	 * but we never loop back to the top.
	 */
	while (xfs_btree_islastblock(cnt_cur, 0)) {
		xfs_extlen_t	bdiff;
		int		besti=0;
		xfs_extlen_t	blen=0;
		xfs_agblock_t	bnew=0;

1041 1042
#ifdef DEBUG
		if (dofirst)
L
Linus Torvalds 已提交
1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056
			break;
#endif
		/*
		 * Start from the entry that lookup found, sequence through
		 * all larger free blocks.  If we're actually pointing at a
		 * record smaller than maxlen, go to the start of this block,
		 * and skip all those smaller than minlen.
		 */
		if (ltlen || args->alignment > 1) {
			cnt_cur->bc_ptrs[0] = 1;
			do {
				if ((error = xfs_alloc_get_rec(cnt_cur, &ltbno,
						&ltlen, &i)))
					goto error0;
1057
				XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
L
Linus Torvalds 已提交
1058 1059
				if (ltlen >= args->minlen)
					break;
1060
				if ((error = xfs_btree_increment(cnt_cur, 0, &i)))
L
Linus Torvalds 已提交
1061 1062 1063 1064 1065 1066 1067 1068 1069
					goto error0;
			} while (i);
			ASSERT(ltlen >= args->minlen);
			if (!i)
				break;
		}
		i = cnt_cur->bc_ptrs[0];
		for (j = 1, blen = 0, bdiff = 0;
		     !error && j && (blen < args->maxlen || bdiff > 0);
1070
		     error = xfs_btree_increment(cnt_cur, 0, &j)) {
L
Linus Torvalds 已提交
1071 1072 1073 1074 1075 1076
			/*
			 * For each entry, decide if it's better than
			 * the previous best entry.
			 */
			if ((error = xfs_alloc_get_rec(cnt_cur, &ltbno, &ltlen, &i)))
				goto error0;
1077
			XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
1078 1079
			busy = xfs_alloc_compute_aligned(args, ltbno, ltlen,
					&ltbnoa, &ltlena, &busy_gen);
1080
			if (ltlena < args->minlen)
L
Linus Torvalds 已提交
1081
				continue;
1082 1083
			if (ltbnoa < args->min_agbno || ltbnoa > args->max_agbno)
				continue;
L
Linus Torvalds 已提交
1084 1085 1086 1087 1088 1089
			args->len = XFS_EXTLEN_MIN(ltlena, args->maxlen);
			xfs_alloc_fix_len(args);
			ASSERT(args->len >= args->minlen);
			if (args->len < blen)
				continue;
			ltdiff = xfs_alloc_compute_diff(args->agbno, args->len,
1090
				args->alignment, args->datatype, ltbnoa,
1091
				ltlena, &ltnew);
L
Linus Torvalds 已提交
1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111
			if (ltnew != NULLAGBLOCK &&
			    (args->len > blen || ltdiff < bdiff)) {
				bdiff = ltdiff;
				bnew = ltnew;
				blen = args->len;
				besti = cnt_cur->bc_ptrs[0];
			}
		}
		/*
		 * It didn't work.  We COULD be in a case where
		 * there's a good record somewhere, so try again.
		 */
		if (blen == 0)
			break;
		/*
		 * Point at the best entry, and retrieve it again.
		 */
		cnt_cur->bc_ptrs[0] = besti;
		if ((error = xfs_alloc_get_rec(cnt_cur, &ltbno, &ltlen, &i)))
			goto error0;
1112
		XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
1113
		ASSERT(ltbno + ltlen <= be32_to_cpu(XFS_BUF_TO_AGF(args->agbp)->agf_length));
L
Linus Torvalds 已提交
1114
		args->len = blen;
1115

L
Linus Torvalds 已提交
1116 1117 1118 1119 1120
		/*
		 * We are allocating starting at bnew for blen blocks.
		 */
		args->agbno = bnew;
		ASSERT(bnew >= ltbno);
1121
		ASSERT(bnew + blen <= ltbno + ltlen);
L
Linus Torvalds 已提交
1122 1123 1124
		/*
		 * Set up a cursor for the by-bno tree.
		 */
1125 1126
		bno_cur_lt = xfs_allocbt_init_cursor(args->mp, args->tp,
			args->agbp, args->agno, XFS_BTNUM_BNO);
L
Linus Torvalds 已提交
1127 1128 1129 1130 1131 1132 1133 1134
		/*
		 * Fix up the btree entries.
		 */
		if ((error = xfs_alloc_fixup_trees(cnt_cur, bno_cur_lt, ltbno,
				ltlen, bnew, blen, XFSA_FIXUP_CNT_OK)))
			goto error0;
		xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
		xfs_btree_del_cursor(bno_cur_lt, XFS_BTREE_NOERROR);
C
Christoph Hellwig 已提交
1135 1136

		trace_xfs_alloc_near_first(args);
L
Linus Torvalds 已提交
1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153
		return 0;
	}
	/*
	 * Second algorithm.
	 * Search in the by-bno tree to the left and to the right
	 * simultaneously, until in each case we find a space big enough,
	 * or run into the edge of the tree.  When we run into the edge,
	 * we deallocate that cursor.
	 * If both searches succeed, we compare the two spaces and pick
	 * the better one.
	 * With alignment, it's possible for both to fail; the upper
	 * level algorithm that picks allocation groups for allocations
	 * is not supposed to do this.
	 */
	/*
	 * Allocate and initialize the cursor for the leftward search.
	 */
1154 1155
	bno_cur_lt = xfs_allocbt_init_cursor(args->mp, args->tp, args->agbp,
		args->agno, XFS_BTNUM_BNO);
L
Linus Torvalds 已提交
1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177
	/*
	 * Lookup <= bno to find the leftward search's starting point.
	 */
	if ((error = xfs_alloc_lookup_le(bno_cur_lt, args->agbno, args->maxlen, &i)))
		goto error0;
	if (!i) {
		/*
		 * Didn't find anything; use this cursor for the rightward
		 * search.
		 */
		bno_cur_gt = bno_cur_lt;
		bno_cur_lt = NULL;
	}
	/*
	 * Found something.  Duplicate the cursor for the rightward search.
	 */
	else if ((error = xfs_btree_dup_cursor(bno_cur_lt, &bno_cur_gt)))
		goto error0;
	/*
	 * Increment the cursor, so we will point at the entry just right
	 * of the leftward entry if any, or to the leftmost entry.
	 */
1178
	if ((error = xfs_btree_increment(bno_cur_gt, 0, &i)))
L
Linus Torvalds 已提交
1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195
		goto error0;
	if (!i) {
		/*
		 * It failed, there are no rightward entries.
		 */
		xfs_btree_del_cursor(bno_cur_gt, XFS_BTREE_NOERROR);
		bno_cur_gt = NULL;
	}
	/*
	 * Loop going left with the leftward cursor, right with the
	 * rightward cursor, until either both directions give up or
	 * we find an entry at least as big as minlen.
	 */
	do {
		if (bno_cur_lt) {
			if ((error = xfs_alloc_get_rec(bno_cur_lt, &ltbno, &ltlen, &i)))
				goto error0;
1196
			XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
1197 1198
			busy |= xfs_alloc_compute_aligned(args, ltbno, ltlen,
					&ltbnoa, &ltlena, &busy_gen);
1199
			if (ltlena >= args->minlen && ltbnoa >= args->min_agbno)
L
Linus Torvalds 已提交
1200
				break;
1201
			if ((error = xfs_btree_decrement(bno_cur_lt, 0, &i)))
L
Linus Torvalds 已提交
1202
				goto error0;
1203
			if (!i || ltbnoa < args->min_agbno) {
L
Linus Torvalds 已提交
1204 1205 1206 1207 1208 1209 1210 1211
				xfs_btree_del_cursor(bno_cur_lt,
						     XFS_BTREE_NOERROR);
				bno_cur_lt = NULL;
			}
		}
		if (bno_cur_gt) {
			if ((error = xfs_alloc_get_rec(bno_cur_gt, &gtbno, &gtlen, &i)))
				goto error0;
1212
			XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
1213 1214
			busy |= xfs_alloc_compute_aligned(args, gtbno, gtlen,
					&gtbnoa, &gtlena, &busy_gen);
1215
			if (gtlena >= args->minlen && gtbnoa <= args->max_agbno)
L
Linus Torvalds 已提交
1216
				break;
1217
			if ((error = xfs_btree_increment(bno_cur_gt, 0, &i)))
L
Linus Torvalds 已提交
1218
				goto error0;
1219
			if (!i || gtbnoa > args->max_agbno) {
L
Linus Torvalds 已提交
1220 1221 1222 1223 1224 1225
				xfs_btree_del_cursor(bno_cur_gt,
						     XFS_BTREE_NOERROR);
				bno_cur_gt = NULL;
			}
		}
	} while (bno_cur_lt || bno_cur_gt);
1226

L
Linus Torvalds 已提交
1227 1228 1229 1230 1231 1232
	/*
	 * Got both cursors still active, need to find better entry.
	 */
	if (bno_cur_lt && bno_cur_gt) {
		if (ltlena >= args->minlen) {
			/*
1233
			 * Left side is good, look for a right side entry.
L
Linus Torvalds 已提交
1234 1235 1236
			 */
			args->len = XFS_EXTLEN_MIN(ltlena, args->maxlen);
			xfs_alloc_fix_len(args);
1237
			ltdiff = xfs_alloc_compute_diff(args->agbno, args->len,
1238
				args->alignment, args->datatype, ltbnoa,
1239
				ltlena, &ltnew);
1240 1241 1242

			error = xfs_alloc_find_best_extent(args,
						&bno_cur_lt, &bno_cur_gt,
1243 1244
						ltdiff, &gtbno, &gtlen,
						&gtbnoa, &gtlena,
1245 1246 1247 1248
						0 /* search right */);
		} else {
			ASSERT(gtlena >= args->minlen);

L
Linus Torvalds 已提交
1249
			/*
1250
			 * Right side is good, look for a left side entry.
L
Linus Torvalds 已提交
1251 1252 1253
			 */
			args->len = XFS_EXTLEN_MIN(gtlena, args->maxlen);
			xfs_alloc_fix_len(args);
1254
			gtdiff = xfs_alloc_compute_diff(args->agbno, args->len,
1255
				args->alignment, args->datatype, gtbnoa,
1256
				gtlena, &gtnew);
1257 1258 1259

			error = xfs_alloc_find_best_extent(args,
						&bno_cur_gt, &bno_cur_lt,
1260 1261
						gtdiff, &ltbno, &ltlen,
						&ltbnoa, &ltlena,
1262
						1 /* search left */);
L
Linus Torvalds 已提交
1263
		}
1264 1265 1266

		if (error)
			goto error0;
L
Linus Torvalds 已提交
1267
	}
1268

L
Linus Torvalds 已提交
1269 1270 1271 1272
	/*
	 * If we couldn't get anything, give up.
	 */
	if (bno_cur_lt == NULL && bno_cur_gt == NULL) {
1273 1274
		xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);

1275
		if (busy) {
1276
			trace_xfs_alloc_near_busy(args);
1277
			xfs_extent_busy_flush(args->mp, args->pag, busy_gen);
1278 1279
			goto restart;
		}
C
Christoph Hellwig 已提交
1280
		trace_xfs_alloc_size_neither(args);
L
Linus Torvalds 已提交
1281 1282 1283
		args->agbno = NULLAGBLOCK;
		return 0;
	}
1284

L
Linus Torvalds 已提交
1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300
	/*
	 * At this point we have selected a freespace entry, either to the
	 * left or to the right.  If it's on the right, copy all the
	 * useful variables to the "left" set so we only have one
	 * copy of this code.
	 */
	if (bno_cur_gt) {
		bno_cur_lt = bno_cur_gt;
		bno_cur_gt = NULL;
		ltbno = gtbno;
		ltbnoa = gtbnoa;
		ltlen = gtlen;
		ltlena = gtlena;
		j = 1;
	} else
		j = 0;
1301

L
Linus Torvalds 已提交
1302 1303 1304 1305 1306 1307
	/*
	 * Fix up the length and compute the useful address.
	 */
	args->len = XFS_EXTLEN_MIN(ltlena, args->maxlen);
	xfs_alloc_fix_len(args);
	rlen = args->len;
1308
	(void)xfs_alloc_compute_diff(args->agbno, rlen, args->alignment,
1309
				     args->datatype, ltbnoa, ltlena, &ltnew);
L
Linus Torvalds 已提交
1310
	ASSERT(ltnew >= ltbno);
1311
	ASSERT(ltnew + rlen <= ltbnoa + ltlena);
1312
	ASSERT(ltnew + rlen <= be32_to_cpu(XFS_BUF_TO_AGF(args->agbp)->agf_length));
1313
	ASSERT(ltnew >= args->min_agbno && ltnew <= args->max_agbno);
L
Linus Torvalds 已提交
1314
	args->agbno = ltnew;
1315

L
Linus Torvalds 已提交
1316 1317 1318
	if ((error = xfs_alloc_fixup_trees(cnt_cur, bno_cur_lt, ltbno, ltlen,
			ltnew, rlen, XFSA_FIXUP_BNO_OK)))
		goto error0;
C
Christoph Hellwig 已提交
1319 1320 1321 1322 1323 1324

	if (j)
		trace_xfs_alloc_near_greater(args);
	else
		trace_xfs_alloc_near_lesser(args);

L
Linus Torvalds 已提交
1325 1326 1327 1328 1329
	xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
	xfs_btree_del_cursor(bno_cur_lt, XFS_BTREE_NOERROR);
	return 0;

 error0:
C
Christoph Hellwig 已提交
1330
	trace_xfs_alloc_near_error(args);
L
Linus Torvalds 已提交
1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357
	if (cnt_cur != NULL)
		xfs_btree_del_cursor(cnt_cur, XFS_BTREE_ERROR);
	if (bno_cur_lt != NULL)
		xfs_btree_del_cursor(bno_cur_lt, XFS_BTREE_ERROR);
	if (bno_cur_gt != NULL)
		xfs_btree_del_cursor(bno_cur_gt, XFS_BTREE_ERROR);
	return error;
}

/*
 * Allocate a variable extent anywhere in the allocation group agno.
 * Extent's length (returned in len) will be between minlen and maxlen,
 * and of the form k * prod + mod unless there's nothing that large.
 * Return the starting a.g. block, or NULLAGBLOCK if we can't do it.
 */
STATIC int				/* error */
xfs_alloc_ag_vextent_size(
	xfs_alloc_arg_t	*args)		/* allocation argument structure */
{
	xfs_btree_cur_t	*bno_cur;	/* cursor for bno btree */
	xfs_btree_cur_t	*cnt_cur;	/* cursor for cnt btree */
	int		error;		/* error result */
	xfs_agblock_t	fbno;		/* start of found freespace */
	xfs_extlen_t	flen;		/* length of found freespace */
	int		i;		/* temp status variable */
	xfs_agblock_t	rbno;		/* returned block number */
	xfs_extlen_t	rlen;		/* length of returned extent */
1358 1359
	bool		busy;
	unsigned	busy_gen;
L
Linus Torvalds 已提交
1360

1361
restart:
L
Linus Torvalds 已提交
1362 1363 1364
	/*
	 * Allocate and initialize a cursor for the by-size btree.
	 */
1365 1366
	cnt_cur = xfs_allocbt_init_cursor(args->mp, args->tp, args->agbp,
		args->agno, XFS_BTNUM_CNT);
L
Linus Torvalds 已提交
1367
	bno_cur = NULL;
1368
	busy = false;
1369

L
Linus Torvalds 已提交
1370 1371 1372 1373 1374 1375
	/*
	 * Look for an entry >= maxlen+alignment-1 blocks.
	 */
	if ((error = xfs_alloc_lookup_ge(cnt_cur, 0,
			args->maxlen + args->alignment - 1, &i)))
		goto error0;
1376

L
Linus Torvalds 已提交
1377
	/*
1378 1379 1380 1381
	 * If none then we have to settle for a smaller extent. In the case that
	 * there are no large extents, this will return the last entry in the
	 * tree unless the tree is empty. In the case that there are only busy
	 * large extents, this will return the largest small extent unless there
1382
	 * are no smaller extents available.
L
Linus Torvalds 已提交
1383
	 */
1384
	if (!i) {
1385 1386 1387
		error = xfs_alloc_ag_vextent_small(args, cnt_cur,
						   &fbno, &flen, &i);
		if (error)
L
Linus Torvalds 已提交
1388 1389 1390
			goto error0;
		if (i == 0 || flen == 0) {
			xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
C
Christoph Hellwig 已提交
1391
			trace_xfs_alloc_size_noentry(args);
L
Linus Torvalds 已提交
1392 1393 1394
			return 0;
		}
		ASSERT(i == 1);
1395 1396
		busy = xfs_alloc_compute_aligned(args, fbno, flen, &rbno,
				&rlen, &busy_gen);
1397 1398 1399 1400 1401 1402 1403 1404
	} else {
		/*
		 * Search for a non-busy extent that is large enough.
		 */
		for (;;) {
			error = xfs_alloc_get_rec(cnt_cur, &fbno, &flen, &i);
			if (error)
				goto error0;
1405
			XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
1406

1407 1408
			busy = xfs_alloc_compute_aligned(args, fbno, flen,
					&rbno, &rlen, &busy_gen);
1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419

			if (rlen >= args->maxlen)
				break;

			error = xfs_btree_increment(cnt_cur, 0, &i);
			if (error)
				goto error0;
			if (i == 0) {
				/*
				 * Our only valid extents must have been busy.
				 * Make it unbusy by forcing the log out and
1420
				 * retrying.
1421 1422 1423 1424
				 */
				xfs_btree_del_cursor(cnt_cur,
						     XFS_BTREE_NOERROR);
				trace_xfs_alloc_size_busy(args);
1425 1426
				xfs_extent_busy_flush(args->mp,
							args->pag, busy_gen);
1427 1428 1429
				goto restart;
			}
		}
L
Linus Torvalds 已提交
1430
	}
1431

L
Linus Torvalds 已提交
1432 1433 1434 1435 1436 1437 1438
	/*
	 * In the first case above, we got the last entry in the
	 * by-size btree.  Now we check to see if the space hits maxlen
	 * once aligned; if not, we search left for something better.
	 * This can't happen in the second case above.
	 */
	rlen = XFS_EXTLEN_MIN(args->maxlen, rlen);
1439
	XFS_WANT_CORRUPTED_GOTO(args->mp, rlen == 0 ||
L
Linus Torvalds 已提交
1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451
			(rlen <= flen && rbno + rlen <= fbno + flen), error0);
	if (rlen < args->maxlen) {
		xfs_agblock_t	bestfbno;
		xfs_extlen_t	bestflen;
		xfs_agblock_t	bestrbno;
		xfs_extlen_t	bestrlen;

		bestrlen = rlen;
		bestrbno = rbno;
		bestflen = flen;
		bestfbno = fbno;
		for (;;) {
1452
			if ((error = xfs_btree_decrement(cnt_cur, 0, &i)))
L
Linus Torvalds 已提交
1453 1454 1455 1456 1457 1458
				goto error0;
			if (i == 0)
				break;
			if ((error = xfs_alloc_get_rec(cnt_cur, &fbno, &flen,
					&i)))
				goto error0;
1459
			XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
L
Linus Torvalds 已提交
1460 1461
			if (flen < bestrlen)
				break;
1462 1463
			busy = xfs_alloc_compute_aligned(args, fbno, flen,
					&rbno, &rlen, &busy_gen);
L
Linus Torvalds 已提交
1464
			rlen = XFS_EXTLEN_MIN(args->maxlen, rlen);
1465
			XFS_WANT_CORRUPTED_GOTO(args->mp, rlen == 0 ||
L
Linus Torvalds 已提交
1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479
				(rlen <= flen && rbno + rlen <= fbno + flen),
				error0);
			if (rlen > bestrlen) {
				bestrlen = rlen;
				bestrbno = rbno;
				bestflen = flen;
				bestfbno = fbno;
				if (rlen == args->maxlen)
					break;
			}
		}
		if ((error = xfs_alloc_lookup_eq(cnt_cur, bestfbno, bestflen,
				&i)))
			goto error0;
1480
		XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
L
Linus Torvalds 已提交
1481 1482 1483 1484 1485 1486 1487 1488 1489 1490
		rlen = bestrlen;
		rbno = bestrbno;
		flen = bestflen;
		fbno = bestfbno;
	}
	args->wasfromfl = 0;
	/*
	 * Fix up the length.
	 */
	args->len = rlen;
1491
	if (rlen < args->minlen) {
1492
		if (busy) {
1493 1494
			xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
			trace_xfs_alloc_size_busy(args);
1495
			xfs_extent_busy_flush(args->mp, args->pag, busy_gen);
1496 1497 1498
			goto restart;
		}
		goto out_nominleft;
L
Linus Torvalds 已提交
1499
	}
1500 1501
	xfs_alloc_fix_len(args);

L
Linus Torvalds 已提交
1502
	rlen = args->len;
1503
	XFS_WANT_CORRUPTED_GOTO(args->mp, rlen <= flen, error0);
L
Linus Torvalds 已提交
1504 1505 1506
	/*
	 * Allocate and initialize a cursor for the by-block tree.
	 */
1507 1508
	bno_cur = xfs_allocbt_init_cursor(args->mp, args->tp, args->agbp,
		args->agno, XFS_BTNUM_BNO);
L
Linus Torvalds 已提交
1509 1510 1511 1512 1513 1514 1515 1516
	if ((error = xfs_alloc_fixup_trees(cnt_cur, bno_cur, fbno, flen,
			rbno, rlen, XFSA_FIXUP_CNT_OK)))
		goto error0;
	xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
	xfs_btree_del_cursor(bno_cur, XFS_BTREE_NOERROR);
	cnt_cur = bno_cur = NULL;
	args->len = rlen;
	args->agbno = rbno;
1517
	XFS_WANT_CORRUPTED_GOTO(args->mp,
L
Linus Torvalds 已提交
1518
		args->agbno + args->len <=
1519
			be32_to_cpu(XFS_BUF_TO_AGF(args->agbp)->agf_length),
L
Linus Torvalds 已提交
1520
		error0);
C
Christoph Hellwig 已提交
1521
	trace_xfs_alloc_size_done(args);
L
Linus Torvalds 已提交
1522 1523 1524
	return 0;

error0:
C
Christoph Hellwig 已提交
1525
	trace_xfs_alloc_size_error(args);
L
Linus Torvalds 已提交
1526 1527 1528 1529 1530
	if (cnt_cur)
		xfs_btree_del_cursor(cnt_cur, XFS_BTREE_ERROR);
	if (bno_cur)
		xfs_btree_del_cursor(bno_cur, XFS_BTREE_ERROR);
	return error;
1531 1532 1533 1534 1535 1536

out_nominleft:
	xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
	trace_xfs_alloc_size_nominleft(args);
	args->agbno = NULLAGBLOCK;
	return 0;
L
Linus Torvalds 已提交
1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551
}

/*
 * Deal with the case where only small freespaces remain.
 * Either return the contents of the last freespace record,
 * or allocate space from the freelist if there is nothing in the tree.
 */
STATIC int			/* error */
xfs_alloc_ag_vextent_small(
	xfs_alloc_arg_t	*args,	/* allocation argument structure */
	xfs_btree_cur_t	*ccur,	/* by-size cursor */
	xfs_agblock_t	*fbnop,	/* result block number */
	xfs_extlen_t	*flenp,	/* result length */
	int		*stat)	/* status: 0-freelist, 1-normal/none */
{
1552
	struct xfs_owner_info	oinfo;
1553
	struct xfs_perag	*pag;
L
Linus Torvalds 已提交
1554 1555 1556 1557 1558
	int		error;
	xfs_agblock_t	fbno;
	xfs_extlen_t	flen;
	int		i;

1559
	if ((error = xfs_btree_decrement(ccur, 0, &i)))
L
Linus Torvalds 已提交
1560 1561 1562 1563
		goto error0;
	if (i) {
		if ((error = xfs_alloc_get_rec(ccur, &fbno, &flen, &i)))
			goto error0;
1564
		XFS_WANT_CORRUPTED_GOTO(args->mp, i == 1, error0);
L
Linus Torvalds 已提交
1565 1566 1567 1568 1569 1570
	}
	/*
	 * Nothing in the btree, try the freelist.  Make sure
	 * to respect minleft even when pulling from the
	 * freelist.
	 */
1571 1572
	else if (args->minlen == 1 && args->alignment == 1 &&
		 args->resv != XFS_AG_RESV_AGFL &&
1573 1574
		 (be32_to_cpu(XFS_BUF_TO_AGF(args->agbp)->agf_flcount)
		  > args->minleft)) {
D
David Chinner 已提交
1575 1576
		error = xfs_alloc_get_freelist(args->tp, args->agbp, &fbno, 0);
		if (error)
L
Linus Torvalds 已提交
1577 1578
			goto error0;
		if (fbno != NULLAGBLOCK) {
D
Dave Chinner 已提交
1579
			xfs_extent_busy_reuse(args->mp, args->agno, fbno, 1,
1580
			      xfs_alloc_allow_busy_reuse(args->datatype));
1581

1582
			if (xfs_alloc_is_userdata(args->datatype)) {
L
Linus Torvalds 已提交
1583 1584 1585 1586
				xfs_buf_t	*bp;

				bp = xfs_btree_get_bufs(args->mp, args->tp,
					args->agno, fbno, 0);
1587 1588 1589 1590
				if (!bp) {
					error = -EFSCORRUPTED;
					goto error0;
				}
L
Linus Torvalds 已提交
1591 1592 1593 1594
				xfs_trans_binval(args->tp, bp);
			}
			args->len = 1;
			args->agbno = fbno;
1595
			XFS_WANT_CORRUPTED_GOTO(args->mp,
L
Linus Torvalds 已提交
1596
				args->agbno + args->len <=
1597
				be32_to_cpu(XFS_BUF_TO_AGF(args->agbp)->agf_length),
L
Linus Torvalds 已提交
1598 1599
				error0);
			args->wasfromfl = 1;
C
Christoph Hellwig 已提交
1600
			trace_xfs_alloc_small_freelist(args);
1601 1602 1603 1604

			/*
			 * If we're feeding an AGFL block to something that
			 * doesn't live in the free space, we need to clear
1605 1606
			 * out the OWN_AG rmap and add the block back to
			 * the AGFL per-AG reservation.
1607 1608 1609 1610 1611 1612
			 */
			xfs_rmap_ag_owner(&oinfo, XFS_RMAP_OWN_AG);
			error = xfs_rmap_free(args->tp, args->agbp, args->agno,
					fbno, 1, &oinfo);
			if (error)
				goto error0;
1613 1614 1615 1616
			pag = xfs_perag_get(args->mp, args->agno);
			xfs_ag_resv_free_extent(pag, XFS_AG_RESV_AGFL,
					args->tp, 1);
			xfs_perag_put(pag);
1617

L
Linus Torvalds 已提交
1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629
			*stat = 0;
			return 0;
		}
		/*
		 * Nothing in the freelist.
		 */
		else
			flen = 0;
	}
	/*
	 * Can't allocate from the freelist for some reason.
	 */
1630 1631
	else {
		fbno = NULLAGBLOCK;
L
Linus Torvalds 已提交
1632
		flen = 0;
1633
	}
L
Linus Torvalds 已提交
1634 1635 1636 1637 1638
	/*
	 * Can't do the allocation, give up.
	 */
	if (flen < args->minlen) {
		args->agbno = NULLAGBLOCK;
C
Christoph Hellwig 已提交
1639
		trace_xfs_alloc_small_notenough(args);
L
Linus Torvalds 已提交
1640 1641 1642 1643 1644
		flen = 0;
	}
	*fbnop = fbno;
	*flenp = flen;
	*stat = 1;
C
Christoph Hellwig 已提交
1645
	trace_xfs_alloc_small_done(args);
L
Linus Torvalds 已提交
1646 1647 1648
	return 0;

error0:
C
Christoph Hellwig 已提交
1649
	trace_xfs_alloc_small_error(args);
L
Linus Torvalds 已提交
1650 1651 1652 1653 1654 1655
	return error;
}

/*
 * Free the extent starting at agno/bno for length.
 */
1656
STATIC int
L
Linus Torvalds 已提交
1657
xfs_free_ag_extent(
1658 1659 1660 1661 1662 1663
	xfs_trans_t		*tp,
	xfs_buf_t		*agbp,
	xfs_agnumber_t		agno,
	xfs_agblock_t		bno,
	xfs_extlen_t		len,
	struct xfs_owner_info	*oinfo,
1664
	enum xfs_ag_resv_type	type)
L
Linus Torvalds 已提交
1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678
{
	xfs_btree_cur_t	*bno_cur;	/* cursor for by-block btree */
	xfs_btree_cur_t	*cnt_cur;	/* cursor for by-size btree */
	int		error;		/* error return value */
	xfs_agblock_t	gtbno;		/* start of right neighbor block */
	xfs_extlen_t	gtlen;		/* length of right neighbor block */
	int		haveleft;	/* have a left neighbor block */
	int		haveright;	/* have a right neighbor block */
	int		i;		/* temp, result code */
	xfs_agblock_t	ltbno;		/* start of left neighbor block */
	xfs_extlen_t	ltlen;		/* length of left neighbor block */
	xfs_mount_t	*mp;		/* mount point struct for filesystem */
	xfs_agblock_t	nbno;		/* new starting block of freespace */
	xfs_extlen_t	nlen;		/* new length of freespace */
1679
	xfs_perag_t	*pag;		/* per allocation group data */
L
Linus Torvalds 已提交
1680

1681
	bno_cur = cnt_cur = NULL;
L
Linus Torvalds 已提交
1682
	mp = tp->t_mountp;
1683 1684 1685 1686 1687 1688 1689

	if (oinfo->oi_owner != XFS_RMAP_OWN_UNKNOWN) {
		error = xfs_rmap_free(tp, agbp, agno, bno, len, oinfo);
		if (error)
			goto error0;
	}

L
Linus Torvalds 已提交
1690 1691 1692
	/*
	 * Allocate and initialize a cursor for the by-block btree.
	 */
1693
	bno_cur = xfs_allocbt_init_cursor(mp, tp, agbp, agno, XFS_BTNUM_BNO);
L
Linus Torvalds 已提交
1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705
	/*
	 * Look for a neighboring block on the left (lower block numbers)
	 * that is contiguous with this space.
	 */
	if ((error = xfs_alloc_lookup_le(bno_cur, bno, len, &haveleft)))
		goto error0;
	if (haveleft) {
		/*
		 * There is a block to our left.
		 */
		if ((error = xfs_alloc_get_rec(bno_cur, &ltbno, &ltlen, &i)))
			goto error0;
1706
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717
		/*
		 * It's not contiguous, though.
		 */
		if (ltbno + ltlen < bno)
			haveleft = 0;
		else {
			/*
			 * If this failure happens the request to free this
			 * space was invalid, it's (partly) already free.
			 * Very bad.
			 */
1718 1719
			XFS_WANT_CORRUPTED_GOTO(mp,
						ltbno + ltlen <= bno, error0);
L
Linus Torvalds 已提交
1720 1721 1722 1723 1724 1725
		}
	}
	/*
	 * Look for a neighboring block on the right (higher block numbers)
	 * that is contiguous with this space.
	 */
1726
	if ((error = xfs_btree_increment(bno_cur, 0, &haveright)))
L
Linus Torvalds 已提交
1727 1728 1729 1730 1731 1732 1733
		goto error0;
	if (haveright) {
		/*
		 * There is a block to our right.
		 */
		if ((error = xfs_alloc_get_rec(bno_cur, &gtbno, &gtlen, &i)))
			goto error0;
1734
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745
		/*
		 * It's not contiguous, though.
		 */
		if (bno + len < gtbno)
			haveright = 0;
		else {
			/*
			 * If this failure happens the request to free this
			 * space was invalid, it's (partly) already free.
			 * Very bad.
			 */
1746
			XFS_WANT_CORRUPTED_GOTO(mp, gtbno >= bno + len, error0);
L
Linus Torvalds 已提交
1747 1748 1749 1750 1751
		}
	}
	/*
	 * Now allocate and initialize a cursor for the by-size tree.
	 */
1752
	cnt_cur = xfs_allocbt_init_cursor(mp, tp, agbp, agno, XFS_BTNUM_CNT);
L
Linus Torvalds 已提交
1753 1754 1755 1756 1757 1758 1759 1760 1761 1762
	/*
	 * Have both left and right contiguous neighbors.
	 * Merge all three into a single free block.
	 */
	if (haveleft && haveright) {
		/*
		 * Delete the old by-size entry on the left.
		 */
		if ((error = xfs_alloc_lookup_eq(cnt_cur, ltbno, ltlen, &i)))
			goto error0;
1763
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
1764
		if ((error = xfs_btree_delete(cnt_cur, &i)))
L
Linus Torvalds 已提交
1765
			goto error0;
1766
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1767 1768 1769 1770 1771
		/*
		 * Delete the old by-size entry on the right.
		 */
		if ((error = xfs_alloc_lookup_eq(cnt_cur, gtbno, gtlen, &i)))
			goto error0;
1772
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
1773
		if ((error = xfs_btree_delete(cnt_cur, &i)))
L
Linus Torvalds 已提交
1774
			goto error0;
1775
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1776 1777 1778
		/*
		 * Delete the old by-block entry for the right block.
		 */
1779
		if ((error = xfs_btree_delete(bno_cur, &i)))
L
Linus Torvalds 已提交
1780
			goto error0;
1781
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1782 1783 1784
		/*
		 * Move the by-block cursor back to the left neighbor.
		 */
1785
		if ((error = xfs_btree_decrement(bno_cur, 0, &i)))
L
Linus Torvalds 已提交
1786
			goto error0;
1787
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799
#ifdef DEBUG
		/*
		 * Check that this is the right record: delete didn't
		 * mangle the cursor.
		 */
		{
			xfs_agblock_t	xxbno;
			xfs_extlen_t	xxlen;

			if ((error = xfs_alloc_get_rec(bno_cur, &xxbno, &xxlen,
					&i)))
				goto error0;
1800
			XFS_WANT_CORRUPTED_GOTO(mp,
L
Linus Torvalds 已提交
1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822
				i == 1 && xxbno == ltbno && xxlen == ltlen,
				error0);
		}
#endif
		/*
		 * Update remaining by-block entry to the new, joined block.
		 */
		nbno = ltbno;
		nlen = len + ltlen + gtlen;
		if ((error = xfs_alloc_update(bno_cur, nbno, nlen)))
			goto error0;
	}
	/*
	 * Have only a left contiguous neighbor.
	 * Merge it together with the new freespace.
	 */
	else if (haveleft) {
		/*
		 * Delete the old by-size entry on the left.
		 */
		if ((error = xfs_alloc_lookup_eq(cnt_cur, ltbno, ltlen, &i)))
			goto error0;
1823
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
1824
		if ((error = xfs_btree_delete(cnt_cur, &i)))
L
Linus Torvalds 已提交
1825
			goto error0;
1826
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1827 1828 1829 1830
		/*
		 * Back up the by-block cursor to the left neighbor, and
		 * update its length.
		 */
1831
		if ((error = xfs_btree_decrement(bno_cur, 0, &i)))
L
Linus Torvalds 已提交
1832
			goto error0;
1833
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848
		nbno = ltbno;
		nlen = len + ltlen;
		if ((error = xfs_alloc_update(bno_cur, nbno, nlen)))
			goto error0;
	}
	/*
	 * Have only a right contiguous neighbor.
	 * Merge it together with the new freespace.
	 */
	else if (haveright) {
		/*
		 * Delete the old by-size entry on the right.
		 */
		if ((error = xfs_alloc_lookup_eq(cnt_cur, gtbno, gtlen, &i)))
			goto error0;
1849
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
1850
		if ((error = xfs_btree_delete(cnt_cur, &i)))
L
Linus Torvalds 已提交
1851
			goto error0;
1852
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868
		/*
		 * Update the starting block and length of the right
		 * neighbor in the by-block tree.
		 */
		nbno = bno;
		nlen = len + gtlen;
		if ((error = xfs_alloc_update(bno_cur, nbno, nlen)))
			goto error0;
	}
	/*
	 * No contiguous neighbors.
	 * Insert the new freespace into the by-block tree.
	 */
	else {
		nbno = bno;
		nlen = len;
1869
		if ((error = xfs_btree_insert(bno_cur, &i)))
L
Linus Torvalds 已提交
1870
			goto error0;
1871
		XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1872 1873 1874 1875 1876 1877 1878 1879
	}
	xfs_btree_del_cursor(bno_cur, XFS_BTREE_NOERROR);
	bno_cur = NULL;
	/*
	 * In all cases we need to insert the new freespace in the by-size tree.
	 */
	if ((error = xfs_alloc_lookup_eq(cnt_cur, nbno, nlen, &i)))
		goto error0;
1880
	XFS_WANT_CORRUPTED_GOTO(mp, i == 0, error0);
1881
	if ((error = xfs_btree_insert(cnt_cur, &i)))
L
Linus Torvalds 已提交
1882
		goto error0;
1883
	XFS_WANT_CORRUPTED_GOTO(mp, i == 1, error0);
L
Linus Torvalds 已提交
1884 1885
	xfs_btree_del_cursor(cnt_cur, XFS_BTREE_NOERROR);
	cnt_cur = NULL;
1886

L
Linus Torvalds 已提交
1887 1888 1889
	/*
	 * Update the freespace totals in the ag and superblock.
	 */
1890 1891
	pag = xfs_perag_get(mp, agno);
	error = xfs_alloc_update_counters(tp, pag, agbp, len);
1892
	xfs_ag_resv_free_extent(pag, type, tp, len);
1893 1894 1895 1896
	xfs_perag_put(pag);
	if (error)
		goto error0;

1897 1898
	XFS_STATS_INC(mp, xs_freex);
	XFS_STATS_ADD(mp, xs_freeb, len);
C
Christoph Hellwig 已提交
1899

1900 1901
	trace_xfs_free_extent(mp, agno, bno, len, type == XFS_AG_RESV_AGFL,
			haveleft, haveright);
L
Linus Torvalds 已提交
1902 1903 1904 1905

	return 0;

 error0:
1906 1907
	trace_xfs_free_extent(mp, agno, bno, len, type == XFS_AG_RESV_AGFL,
			-1, -1);
L
Linus Torvalds 已提交
1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926
	if (bno_cur)
		xfs_btree_del_cursor(bno_cur, XFS_BTREE_ERROR);
	if (cnt_cur)
		xfs_btree_del_cursor(cnt_cur, XFS_BTREE_ERROR);
	return error;
}

/*
 * Visible (exported) allocation/free functions.
 * Some of these are used just by xfs_alloc_btree.c and this file.
 */

/*
 * Compute and fill in value of m_ag_maxlevels.
 */
void
xfs_alloc_compute_maxlevels(
	xfs_mount_t	*mp)	/* file system mount structure */
{
1927 1928
	mp->m_ag_maxlevels = xfs_btree_compute_maxlevels(mp, mp->m_alloc_mnr,
			(mp->m_sb.sb_agblocks + 1) / 2);
L
Linus Torvalds 已提交
1929 1930
}

1931
/*
1932 1933 1934 1935
 * Find the length of the longest extent in an AG.  The 'need' parameter
 * specifies how much space we're going to need for the AGFL and the
 * 'reserved' parameter tells us how many blocks in this AG are reserved for
 * other callers.
1936 1937 1938 1939
 */
xfs_extlen_t
xfs_alloc_longest_free_extent(
	struct xfs_mount	*mp,
1940
	struct xfs_perag	*pag,
1941 1942
	xfs_extlen_t		need,
	xfs_extlen_t		reserved)
1943
{
1944
	xfs_extlen_t		delta = 0;
1945

1946 1947 1948 1949
	/*
	 * If the AGFL needs a recharge, we'll have to subtract that from the
	 * longest extent.
	 */
1950 1951 1952
	if (need > pag->pagf_flcount)
		delta = need - pag->pagf_flcount;

1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964
	/*
	 * If we cannot maintain others' reservations with space from the
	 * not-longest freesp extents, we'll have to subtract /that/ from
	 * the longest extent too.
	 */
	if (pag->pagf_freeblks - pag->pagf_longest < reserved)
		delta += reserved - (pag->pagf_freeblks - pag->pagf_longest);

	/*
	 * If the longest extent is long enough to satisfy all the
	 * reservations and AGFL rules in place, we can return this extent.
	 */
1965 1966
	if (pag->pagf_longest > delta)
		return pag->pagf_longest - delta;
1967 1968

	/* Otherwise, let the caller try for 1 block if there's space. */
1969 1970 1971
	return pag->pagf_flcount > 0 || pag->pagf_longest > 0;
}

1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984
unsigned int
xfs_alloc_min_freelist(
	struct xfs_mount	*mp,
	struct xfs_perag	*pag)
{
	unsigned int		min_free;

	/* space needed by-bno freespace btree */
	min_free = min_t(unsigned int, pag->pagf_levels[XFS_BTNUM_BNOi] + 1,
				       mp->m_ag_maxlevels);
	/* space needed by-size freespace btree */
	min_free += min_t(unsigned int, pag->pagf_levels[XFS_BTNUM_CNTi] + 1,
				       mp->m_ag_maxlevels);
1985 1986 1987 1988 1989
	/* space needed reverse mapping used space btree */
	if (xfs_sb_version_hasrmapbt(&mp->m_sb))
		min_free += min_t(unsigned int,
				  pag->pagf_levels[XFS_BTNUM_RMAPi] + 1,
				  mp->m_rmap_maxlevels);
1990 1991 1992 1993

	return min_free;
}

1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006
/*
 * Check if the operation we are fixing up the freelist for should go ahead or
 * not. If we are freeing blocks, we always allow it, otherwise the allocation
 * is dependent on whether the size and shape of free space available will
 * permit the requested allocation to take place.
 */
static bool
xfs_alloc_space_available(
	struct xfs_alloc_arg	*args,
	xfs_extlen_t		min_free,
	int			flags)
{
	struct xfs_perag	*pag = args->pag;
2007
	xfs_extlen_t		alloc_len, longest;
2008
	xfs_extlen_t		reservation; /* blocks that are still reserved */
2009 2010 2011 2012 2013
	int			available;

	if (flags & XFS_ALLOC_FLAG_FREEING)
		return true;

2014 2015
	reservation = xfs_ag_resv_needed(pag, args->resv);

2016
	/* do we have enough contiguous free space for the allocation? */
2017
	alloc_len = args->minlen + (args->alignment - 1) + args->minalignslop;
2018 2019
	longest = xfs_alloc_longest_free_extent(args->mp, pag, min_free,
			reservation);
2020
	if (longest < alloc_len)
2021 2022
		return false;

2023
	/* do we have enough free space remaining for the allocation? */
2024
	available = (int)(pag->pagf_freeblks + pag->pagf_flcount -
2025
			  reservation - min_free - args->minleft);
2026
	if (available < (int)max(args->total, alloc_len))
2027 2028
		return false;

2029 2030 2031 2032 2033 2034 2035 2036 2037 2038
	/*
	 * Clamp maxlen to the amount of free space available for the actual
	 * extent allocation.
	 */
	if (available < (int)args->maxlen && !(flags & XFS_ALLOC_FLAG_CHECK)) {
		args->maxlen = available;
		ASSERT(args->maxlen > 0);
		ASSERT(args->maxlen >= args->minlen);
	}

2039 2040 2041
	return true;
}

L
Linus Torvalds 已提交
2042 2043 2044 2045
/*
 * Decide whether to use this allocation group for this allocation.
 * If so, fix up the btree freelist's size.
 */
2046
int			/* error */
L
Linus Torvalds 已提交
2047
xfs_alloc_fix_freelist(
2048 2049
	struct xfs_alloc_arg	*args,	/* allocation argument structure */
	int			flags)	/* XFS_ALLOC_FLAG_... */
L
Linus Torvalds 已提交
2050
{
2051 2052 2053 2054 2055 2056 2057 2058
	struct xfs_mount	*mp = args->mp;
	struct xfs_perag	*pag = args->pag;
	struct xfs_trans	*tp = args->tp;
	struct xfs_buf		*agbp = NULL;
	struct xfs_buf		*agflbp = NULL;
	struct xfs_alloc_arg	targs;	/* local allocation arguments */
	xfs_agblock_t		bno;	/* freelist block */
	xfs_extlen_t		need;	/* total blocks needed in freelist */
2059
	int			error = 0;
2060

L
Linus Torvalds 已提交
2061
	if (!pag->pagf_init) {
2062 2063 2064
		error = xfs_alloc_read_agf(mp, tp, args->agno, flags, &agbp);
		if (error)
			goto out_no_agbp;
L
Linus Torvalds 已提交
2065
		if (!pag->pagf_init) {
2066 2067
			ASSERT(flags & XFS_ALLOC_FLAG_TRYLOCK);
			ASSERT(!(flags & XFS_ALLOC_FLAG_FREEING));
2068
			goto out_agbp_relse;
L
Linus Torvalds 已提交
2069
		}
2070
	}
L
Linus Torvalds 已提交
2071

2072
	/*
2073 2074 2075
	 * If this is a metadata preferred pag and we are user data then try
	 * somewhere else if we are not being asked to try harder at this
	 * point
L
Linus Torvalds 已提交
2076
	 */
2077
	if (pag->pagf_metadata && xfs_alloc_is_userdata(args->datatype) &&
2078 2079
	    (flags & XFS_ALLOC_FLAG_TRYLOCK)) {
		ASSERT(!(flags & XFS_ALLOC_FLAG_FREEING));
2080
		goto out_agbp_relse;
L
Linus Torvalds 已提交
2081 2082
	}

2083
	need = xfs_alloc_min_freelist(mp, pag);
2084 2085
	if (!xfs_alloc_space_available(args, need, flags |
			XFS_ALLOC_FLAG_CHECK))
2086
		goto out_agbp_relse;
2087

L
Linus Torvalds 已提交
2088 2089 2090 2091
	/*
	 * Get the a.g. freespace buffer.
	 * Can fail if we're not blocking on locks, and it's held.
	 */
2092 2093 2094 2095 2096
	if (!agbp) {
		error = xfs_alloc_read_agf(mp, tp, args->agno, flags, &agbp);
		if (error)
			goto out_no_agbp;
		if (!agbp) {
2097 2098
			ASSERT(flags & XFS_ALLOC_FLAG_TRYLOCK);
			ASSERT(!(flags & XFS_ALLOC_FLAG_FREEING));
2099
			goto out_no_agbp;
2100
		}
L
Linus Torvalds 已提交
2101
	}
2102 2103

	/* If there isn't enough total space or single-extent, reject it. */
2104
	need = xfs_alloc_min_freelist(mp, pag);
2105 2106
	if (!xfs_alloc_space_available(args, need, flags))
		goto out_agbp_relse;
2107

L
Linus Torvalds 已提交
2108 2109
	/*
	 * Make the freelist shorter if it's too long.
2110
	 *
2111 2112 2113 2114 2115 2116 2117 2118
	 * Note that from this point onwards, we will always release the agf and
	 * agfl buffers on error. This handles the case where we error out and
	 * the buffers are clean or may not have been joined to the transaction
	 * and hence need to be released manually. If they have been joined to
	 * the transaction, then xfs_trans_brelse() will handle them
	 * appropriately based on the recursion count and dirty state of the
	 * buffer.
	 *
2119 2120 2121 2122
	 * XXX (dgc): When we have lots of free space, does this buy us
	 * anything other than extra overhead when we need to put more blocks
	 * back on the free list? Maybe we should only do this when space is
	 * getting low or the AGFL is more than half full?
2123 2124 2125 2126 2127 2128 2129 2130
	 *
	 * The NOSHRINK flag prevents the AGFL from being shrunk if it's too
	 * big; the NORMAP flag prevents AGFL expand/shrink operations from
	 * updating the rmapbt.  Both flags are used in xfs_repair while we're
	 * rebuilding the rmapbt, and neither are used by the kernel.  They're
	 * both required to ensure that rmaps are correctly recorded for the
	 * regenerated AGFL, bnobt, and cntbt.  See repair/phase5.c and
	 * repair/rmap.c in xfsprogs for details.
L
Linus Torvalds 已提交
2131
	 */
2132 2133 2134 2135 2136 2137
	memset(&targs, 0, sizeof(targs));
	if (flags & XFS_ALLOC_FLAG_NORMAP)
		xfs_rmap_skip_owner_update(&targs.oinfo);
	else
		xfs_rmap_ag_owner(&targs.oinfo, XFS_RMAP_OWN_AG);
	while (!(flags & XFS_ALLOC_FLAG_NOSHRINK) && pag->pagf_flcount > need) {
2138
		struct xfs_buf	*bp;
L
Linus Torvalds 已提交
2139

D
David Chinner 已提交
2140 2141
		error = xfs_alloc_get_freelist(tp, agbp, &bno, 0);
		if (error)
2142
			goto out_agbp_relse;
2143
		error = xfs_free_ag_extent(tp, agbp, args->agno, bno, 1,
2144
					   &targs.oinfo, XFS_AG_RESV_AGFL);
2145
		if (error)
2146
			goto out_agbp_relse;
L
Linus Torvalds 已提交
2147
		bp = xfs_btree_get_bufs(mp, tp, args->agno, bno, 0);
2148 2149 2150 2151
		if (!bp) {
			error = -EFSCORRUPTED;
			goto out_agbp_relse;
		}
L
Linus Torvalds 已提交
2152 2153
		xfs_trans_binval(tp, bp);
	}
2154

L
Linus Torvalds 已提交
2155 2156 2157 2158
	targs.tp = tp;
	targs.mp = mp;
	targs.agbp = agbp;
	targs.agno = args->agno;
2159
	targs.alignment = targs.minlen = targs.prod = 1;
L
Linus Torvalds 已提交
2160 2161
	targs.type = XFS_ALLOCTYPE_THIS_AG;
	targs.pag = pag;
2162 2163
	error = xfs_alloc_read_agfl(mp, tp, targs.agno, &agflbp);
	if (error)
2164
		goto out_agbp_relse;
2165 2166 2167

	/* Make the freelist longer if it's too short. */
	while (pag->pagf_flcount < need) {
L
Linus Torvalds 已提交
2168
		targs.agbno = 0;
2169
		targs.maxlen = need - pag->pagf_flcount;
2170
		targs.resv = XFS_AG_RESV_AGFL;
2171 2172 2173

		/* Allocate as many blocks as possible at once. */
		error = xfs_alloc_ag_vextent(&targs);
2174 2175 2176
		if (error)
			goto out_agflbp_relse;

L
Linus Torvalds 已提交
2177 2178 2179 2180 2181
		/*
		 * Stop if we run out.  Won't happen if callers are obeying
		 * the restrictions correctly.  Can happen for free calls
		 * on a completely full ag.
		 */
2182
		if (targs.agbno == NULLAGBLOCK) {
2183 2184
			if (flags & XFS_ALLOC_FLAG_FREEING)
				break;
2185
			goto out_agflbp_relse;
2186
		}
L
Linus Torvalds 已提交
2187 2188 2189 2190
		/*
		 * Put each allocated block on the list.
		 */
		for (bno = targs.agbno; bno < targs.agbno + targs.len; bno++) {
D
David Chinner 已提交
2191 2192 2193
			error = xfs_alloc_put_freelist(tp, agbp,
							agflbp, bno, 0);
			if (error)
2194
				goto out_agflbp_relse;
L
Linus Torvalds 已提交
2195 2196
		}
	}
2197
	xfs_trans_brelse(tp, agflbp);
L
Linus Torvalds 已提交
2198 2199
	args->agbp = agbp;
	return 0;
2200 2201 2202 2203 2204 2205 2206 2207 2208

out_agflbp_relse:
	xfs_trans_brelse(tp, agflbp);
out_agbp_relse:
	if (agbp)
		xfs_trans_brelse(tp, agbp);
out_no_agbp:
	args->agbp = NULL;
	return error;
L
Linus Torvalds 已提交
2209 2210 2211 2212 2213 2214 2215 2216 2217 2218
}

/*
 * Get a block from the freelist.
 * Returns with the buffer for the block gotten.
 */
int				/* error */
xfs_alloc_get_freelist(
	xfs_trans_t	*tp,	/* transaction pointer */
	xfs_buf_t	*agbp,	/* buffer containing the agf structure */
D
David Chinner 已提交
2219 2220
	xfs_agblock_t	*bnop,	/* block address retrieved from freelist */
	int		btreeblk) /* destination is a AGF btree */
L
Linus Torvalds 已提交
2221 2222 2223 2224
{
	xfs_agf_t	*agf;	/* a.g. freespace structure */
	xfs_buf_t	*agflbp;/* buffer for a.g. freelist structure */
	xfs_agblock_t	bno;	/* block number returned */
2225
	__be32		*agfl_bno;
L
Linus Torvalds 已提交
2226
	int		error;
D
David Chinner 已提交
2227
	int		logflags;
2228
	xfs_mount_t	*mp = tp->t_mountp;
L
Linus Torvalds 已提交
2229 2230 2231 2232 2233
	xfs_perag_t	*pag;	/* per allocation group data */

	/*
	 * Freelist is empty, give up.
	 */
2234
	agf = XFS_BUF_TO_AGF(agbp);
L
Linus Torvalds 已提交
2235 2236 2237 2238 2239 2240 2241
	if (!agf->agf_flcount) {
		*bnop = NULLAGBLOCK;
		return 0;
	}
	/*
	 * Read the array of free blocks.
	 */
2242 2243 2244
	error = xfs_alloc_read_agfl(mp, tp, be32_to_cpu(agf->agf_seqno),
				    &agflbp);
	if (error)
L
Linus Torvalds 已提交
2245
		return error;
2246 2247


L
Linus Torvalds 已提交
2248 2249 2250
	/*
	 * Get the block number and update the data structures.
	 */
2251 2252
	agfl_bno = XFS_BUF_TO_AGFL_BNO(mp, agflbp);
	bno = be32_to_cpu(agfl_bno[be32_to_cpu(agf->agf_flfirst)]);
2253
	be32_add_cpu(&agf->agf_flfirst, 1);
L
Linus Torvalds 已提交
2254
	xfs_trans_brelse(tp, agflbp);
2255
	if (be32_to_cpu(agf->agf_flfirst) == XFS_AGFL_SIZE(mp))
L
Linus Torvalds 已提交
2256
		agf->agf_flfirst = 0;
2257 2258

	pag = xfs_perag_get(mp, be32_to_cpu(agf->agf_seqno));
2259
	be32_add_cpu(&agf->agf_flcount, -1);
L
Linus Torvalds 已提交
2260 2261
	xfs_trans_agflist_delta(tp, -1);
	pag->pagf_flcount--;
2262
	xfs_perag_put(pag);
D
David Chinner 已提交
2263 2264 2265

	logflags = XFS_AGF_FLFIRST | XFS_AGF_FLCOUNT;
	if (btreeblk) {
2266
		be32_add_cpu(&agf->agf_btreeblks, 1);
D
David Chinner 已提交
2267 2268 2269 2270 2271
		pag->pagf_btreeblks++;
		logflags |= XFS_AGF_BTREEBLKS;
	}

	xfs_alloc_log_agf(tp, agbp, logflags);
L
Linus Torvalds 已提交
2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299
	*bnop = bno;

	return 0;
}

/*
 * Log the given fields from the agf structure.
 */
void
xfs_alloc_log_agf(
	xfs_trans_t	*tp,	/* transaction pointer */
	xfs_buf_t	*bp,	/* buffer for a.g. freelist header */
	int		fields)	/* mask of fields to be logged (XFS_AGF_...) */
{
	int	first;		/* first byte offset */
	int	last;		/* last byte offset */
	static const short	offsets[] = {
		offsetof(xfs_agf_t, agf_magicnum),
		offsetof(xfs_agf_t, agf_versionnum),
		offsetof(xfs_agf_t, agf_seqno),
		offsetof(xfs_agf_t, agf_length),
		offsetof(xfs_agf_t, agf_roots[0]),
		offsetof(xfs_agf_t, agf_levels[0]),
		offsetof(xfs_agf_t, agf_flfirst),
		offsetof(xfs_agf_t, agf_fllast),
		offsetof(xfs_agf_t, agf_flcount),
		offsetof(xfs_agf_t, agf_freeblks),
		offsetof(xfs_agf_t, agf_longest),
D
David Chinner 已提交
2300
		offsetof(xfs_agf_t, agf_btreeblks),
D
Dave Chinner 已提交
2301
		offsetof(xfs_agf_t, agf_uuid),
2302
		offsetof(xfs_agf_t, agf_rmap_blocks),
2303 2304 2305
		offsetof(xfs_agf_t, agf_refcount_blocks),
		offsetof(xfs_agf_t, agf_refcount_root),
		offsetof(xfs_agf_t, agf_refcount_level),
2306 2307
		/* needed so that we don't log the whole rest of the structure: */
		offsetof(xfs_agf_t, agf_spare64),
L
Linus Torvalds 已提交
2308 2309 2310
		sizeof(xfs_agf_t)
	};

C
Christoph Hellwig 已提交
2311 2312
	trace_xfs_agf(tp->t_mountp, XFS_BUF_TO_AGF(bp), fields, _RET_IP_);

2313
	xfs_trans_buf_set_type(tp, bp, XFS_BLFT_AGF_BUF);
D
Dave Chinner 已提交
2314

L
Linus Torvalds 已提交
2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326 2327 2328 2329 2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346
	xfs_btree_offsets(fields, offsets, XFS_AGF_NUM_BITS, &first, &last);
	xfs_trans_log_buf(tp, bp, (uint)first, (uint)last);
}

/*
 * Interface for inode allocation to force the pag data to be initialized.
 */
int					/* error */
xfs_alloc_pagf_init(
	xfs_mount_t		*mp,	/* file system mount structure */
	xfs_trans_t		*tp,	/* transaction pointer */
	xfs_agnumber_t		agno,	/* allocation group number */
	int			flags)	/* XFS_ALLOC_FLAGS_... */
{
	xfs_buf_t		*bp;
	int			error;

	if ((error = xfs_alloc_read_agf(mp, tp, agno, flags, &bp)))
		return error;
	if (bp)
		xfs_trans_brelse(tp, bp);
	return 0;
}

/*
 * Put the block on the freelist for the allocation group.
 */
int					/* error */
xfs_alloc_put_freelist(
	xfs_trans_t		*tp,	/* transaction pointer */
	xfs_buf_t		*agbp,	/* buffer for a.g. freelist header */
	xfs_buf_t		*agflbp,/* buffer for a.g. free block array */
D
David Chinner 已提交
2347 2348
	xfs_agblock_t		bno,	/* block being freed */
	int			btreeblk) /* block came from a AGF btree */
L
Linus Torvalds 已提交
2349 2350
{
	xfs_agf_t		*agf;	/* a.g. freespace structure */
2351
	__be32			*blockp;/* pointer to array entry */
L
Linus Torvalds 已提交
2352
	int			error;
D
David Chinner 已提交
2353
	int			logflags;
L
Linus Torvalds 已提交
2354 2355
	xfs_mount_t		*mp;	/* mount structure */
	xfs_perag_t		*pag;	/* per allocation group data */
2356 2357
	__be32			*agfl_bno;
	int			startoff;
L
Linus Torvalds 已提交
2358 2359 2360 2361 2362

	agf = XFS_BUF_TO_AGF(agbp);
	mp = tp->t_mountp;

	if (!agflbp && (error = xfs_alloc_read_agfl(mp, tp,
2363
			be32_to_cpu(agf->agf_seqno), &agflbp)))
L
Linus Torvalds 已提交
2364
		return error;
2365
	be32_add_cpu(&agf->agf_fllast, 1);
2366
	if (be32_to_cpu(agf->agf_fllast) == XFS_AGFL_SIZE(mp))
L
Linus Torvalds 已提交
2367
		agf->agf_fllast = 0;
2368 2369

	pag = xfs_perag_get(mp, be32_to_cpu(agf->agf_seqno));
2370
	be32_add_cpu(&agf->agf_flcount, 1);
L
Linus Torvalds 已提交
2371 2372
	xfs_trans_agflist_delta(tp, 1);
	pag->pagf_flcount++;
D
David Chinner 已提交
2373 2374 2375

	logflags = XFS_AGF_FLLAST | XFS_AGF_FLCOUNT;
	if (btreeblk) {
2376
		be32_add_cpu(&agf->agf_btreeblks, -1);
D
David Chinner 已提交
2377 2378 2379
		pag->pagf_btreeblks--;
		logflags |= XFS_AGF_BTREEBLKS;
	}
2380
	xfs_perag_put(pag);
D
David Chinner 已提交
2381 2382 2383

	xfs_alloc_log_agf(tp, agbp, logflags);

2384
	ASSERT(be32_to_cpu(agf->agf_flcount) <= XFS_AGFL_SIZE(mp));
2385 2386 2387

	agfl_bno = XFS_BUF_TO_AGFL_BNO(mp, agflbp);
	blockp = &agfl_bno[be32_to_cpu(agf->agf_fllast)];
2388
	*blockp = cpu_to_be32(bno);
2389 2390
	startoff = (char *)blockp - (char *)agflbp->b_addr;

D
David Chinner 已提交
2391
	xfs_alloc_log_agf(tp, agbp, logflags);
2392

2393
	xfs_trans_buf_set_type(tp, agflbp, XFS_BLFT_AGFL_BUF);
2394 2395
	xfs_trans_log_buf(tp, agflbp, startoff,
			  startoff + sizeof(xfs_agblock_t) - 1);
L
Linus Torvalds 已提交
2396 2397 2398
	return 0;
}

D
Dave Chinner 已提交
2399
static bool
2400
xfs_agf_verify(
D
Dave Chinner 已提交
2401
	struct xfs_mount *mp,
2402 2403
	struct xfs_buf	*bp)
 {
D
Dave Chinner 已提交
2404
	struct xfs_agf	*agf = XFS_BUF_TO_AGF(bp);
2405

2406 2407
	if (xfs_sb_version_hascrc(&mp->m_sb)) {
		if (!uuid_equal(&agf->agf_uuid, &mp->m_sb.sb_meta_uuid))
D
Dave Chinner 已提交
2408
			return false;
2409 2410 2411 2412
		if (!xfs_log_check_lsn(mp,
				be64_to_cpu(XFS_BUF_TO_AGF(bp)->agf_lsn)))
			return false;
	}
2413

D
Dave Chinner 已提交
2414 2415 2416 2417 2418 2419 2420
	if (!(agf->agf_magicnum == cpu_to_be32(XFS_AGF_MAGIC) &&
	      XFS_AGF_GOOD_VERSION(be32_to_cpu(agf->agf_versionnum)) &&
	      be32_to_cpu(agf->agf_freeblks) <= be32_to_cpu(agf->agf_length) &&
	      be32_to_cpu(agf->agf_flfirst) < XFS_AGFL_SIZE(mp) &&
	      be32_to_cpu(agf->agf_fllast) < XFS_AGFL_SIZE(mp) &&
	      be32_to_cpu(agf->agf_flcount) <= XFS_AGFL_SIZE(mp)))
		return false;
2421

2422 2423 2424
	if (be32_to_cpu(agf->agf_levels[XFS_BTNUM_BNO]) < 1 ||
	    be32_to_cpu(agf->agf_levels[XFS_BTNUM_CNT]) < 1 ||
	    be32_to_cpu(agf->agf_levels[XFS_BTNUM_BNO]) > XFS_BTREE_MAXLEVELS ||
2425 2426 2427
	    be32_to_cpu(agf->agf_levels[XFS_BTNUM_CNT]) > XFS_BTREE_MAXLEVELS)
		return false;

2428
	if (xfs_sb_version_hasrmapbt(&mp->m_sb) &&
2429 2430
	    (be32_to_cpu(agf->agf_levels[XFS_BTNUM_RMAP]) < 1 ||
	     be32_to_cpu(agf->agf_levels[XFS_BTNUM_RMAP]) > XFS_BTREE_MAXLEVELS))
2431 2432
		return false;

2433 2434 2435 2436 2437 2438
	/*
	 * during growfs operations, the perag is not fully initialised,
	 * so we can't use it for any useful checking. growfs ensures we can't
	 * use it by using uncached buffers that don't have the perag attached
	 * so we can detect and avoid this problem.
	 */
D
Dave Chinner 已提交
2439 2440
	if (bp->b_pag && be32_to_cpu(agf->agf_seqno) != bp->b_pag->pag_agno)
		return false;
2441

D
Dave Chinner 已提交
2442 2443 2444 2445
	if (xfs_sb_version_haslazysbcount(&mp->m_sb) &&
	    be32_to_cpu(agf->agf_btreeblks) > be32_to_cpu(agf->agf_length))
		return false;

2446
	if (xfs_sb_version_hasreflink(&mp->m_sb) &&
2447 2448
	    (be32_to_cpu(agf->agf_refcount_level) < 1 ||
	     be32_to_cpu(agf->agf_refcount_level) > XFS_BTREE_MAXLEVELS))
2449 2450
		return false;

D
Dave Chinner 已提交
2451
	return true;;
2452

2453 2454
}

2455 2456
static void
xfs_agf_read_verify(
2457 2458
	struct xfs_buf	*bp)
{
D
Dave Chinner 已提交
2459 2460
	struct xfs_mount *mp = bp->b_target->bt_mount;

2461 2462
	if (xfs_sb_version_hascrc(&mp->m_sb) &&
	    !xfs_buf_verify_cksum(bp, XFS_AGF_CRC_OFF))
D
Dave Chinner 已提交
2463
		xfs_buf_ioerror(bp, -EFSBADCRC);
2464
	else if (XFS_TEST_ERROR(!xfs_agf_verify(mp, bp), mp,
2465
				XFS_ERRTAG_ALLOC_READ_AGF))
D
Dave Chinner 已提交
2466
		xfs_buf_ioerror(bp, -EFSCORRUPTED);
2467 2468 2469

	if (bp->b_error)
		xfs_verifier_error(bp);
2470
}
2471

2472
static void
2473
xfs_agf_write_verify(
2474 2475
	struct xfs_buf	*bp)
{
D
Dave Chinner 已提交
2476 2477 2478 2479
	struct xfs_mount *mp = bp->b_target->bt_mount;
	struct xfs_buf_log_item	*bip = bp->b_fspriv;

	if (!xfs_agf_verify(mp, bp)) {
D
Dave Chinner 已提交
2480
		xfs_buf_ioerror(bp, -EFSCORRUPTED);
2481
		xfs_verifier_error(bp);
D
Dave Chinner 已提交
2482 2483 2484 2485 2486 2487 2488 2489 2490
		return;
	}

	if (!xfs_sb_version_hascrc(&mp->m_sb))
		return;

	if (bip)
		XFS_BUF_TO_AGF(bp)->agf_lsn = cpu_to_be64(bip->bli_item.li_lsn);

2491
	xfs_buf_update_cksum(bp, XFS_AGF_CRC_OFF);
2492 2493
}

2494
const struct xfs_buf_ops xfs_agf_buf_ops = {
2495
	.name = "xfs_agf",
2496 2497 2498 2499
	.verify_read = xfs_agf_read_verify,
	.verify_write = xfs_agf_write_verify,
};

L
Linus Torvalds 已提交
2500 2501 2502 2503
/*
 * Read in the allocation group header (free/alloc section).
 */
int					/* error */
2504 2505 2506 2507 2508 2509
xfs_read_agf(
	struct xfs_mount	*mp,	/* mount point structure */
	struct xfs_trans	*tp,	/* transaction pointer */
	xfs_agnumber_t		agno,	/* allocation group number */
	int			flags,	/* XFS_BUF_ */
	struct xfs_buf		**bpp)	/* buffer for the ag freelist header */
L
Linus Torvalds 已提交
2510 2511 2512
{
	int		error;

2513 2514
	trace_xfs_read_agf(mp, agno);

L
Linus Torvalds 已提交
2515 2516 2517 2518
	ASSERT(agno != NULLAGNUMBER);
	error = xfs_trans_read_buf(
			mp, tp, mp->m_ddev_targp,
			XFS_AG_DADDR(mp, agno, XFS_AGF_DADDR(mp)),
2519
			XFS_FSS_TO_BB(mp, 1), flags, bpp, &xfs_agf_buf_ops);
L
Linus Torvalds 已提交
2520 2521
	if (error)
		return error;
2522
	if (!*bpp)
L
Linus Torvalds 已提交
2523
		return 0;
2524

2525
	ASSERT(!(*bpp)->b_error);
2526
	xfs_buf_set_ref(*bpp, XFS_AGF_REF);
2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544
	return 0;
}

/*
 * Read in the allocation group header (free/alloc section).
 */
int					/* error */
xfs_alloc_read_agf(
	struct xfs_mount	*mp,	/* mount point structure */
	struct xfs_trans	*tp,	/* transaction pointer */
	xfs_agnumber_t		agno,	/* allocation group number */
	int			flags,	/* XFS_ALLOC_FLAG_... */
	struct xfs_buf		**bpp)	/* buffer for the ag freelist header */
{
	struct xfs_agf		*agf;		/* ag freelist header */
	struct xfs_perag	*pag;		/* per allocation group data */
	int			error;

2545
	trace_xfs_alloc_read_agf(mp, agno);
2546

2547
	ASSERT(agno != NULLAGNUMBER);
2548
	error = xfs_read_agf(mp, tp, agno,
2549
			(flags & XFS_ALLOC_FLAG_TRYLOCK) ? XBF_TRYLOCK : 0,
2550 2551 2552 2553 2554
			bpp);
	if (error)
		return error;
	if (!*bpp)
		return 0;
2555
	ASSERT(!(*bpp)->b_error);
2556 2557

	agf = XFS_BUF_TO_AGF(*bpp);
2558
	pag = xfs_perag_get(mp, agno);
L
Linus Torvalds 已提交
2559
	if (!pag->pagf_init) {
2560
		pag->pagf_freeblks = be32_to_cpu(agf->agf_freeblks);
D
David Chinner 已提交
2561
		pag->pagf_btreeblks = be32_to_cpu(agf->agf_btreeblks);
2562 2563
		pag->pagf_flcount = be32_to_cpu(agf->agf_flcount);
		pag->pagf_longest = be32_to_cpu(agf->agf_longest);
L
Linus Torvalds 已提交
2564
		pag->pagf_levels[XFS_BTNUM_BNOi] =
2565
			be32_to_cpu(agf->agf_levels[XFS_BTNUM_BNOi]);
L
Linus Torvalds 已提交
2566
		pag->pagf_levels[XFS_BTNUM_CNTi] =
2567
			be32_to_cpu(agf->agf_levels[XFS_BTNUM_CNTi]);
2568 2569
		pag->pagf_levels[XFS_BTNUM_RMAPi] =
			be32_to_cpu(agf->agf_levels[XFS_BTNUM_RMAPi]);
2570
		pag->pagf_refcount_level = be32_to_cpu(agf->agf_refcount_level);
E
Eric Sandeen 已提交
2571
		spin_lock_init(&pag->pagb_lock);
2572
		pag->pagb_count = 0;
2573
		pag->pagb_tree = RB_ROOT;
L
Linus Torvalds 已提交
2574 2575 2576 2577
		pag->pagf_init = 1;
	}
#ifdef DEBUG
	else if (!XFS_FORCED_SHUTDOWN(mp)) {
2578
		ASSERT(pag->pagf_freeblks == be32_to_cpu(agf->agf_freeblks));
2579
		ASSERT(pag->pagf_btreeblks == be32_to_cpu(agf->agf_btreeblks));
2580 2581
		ASSERT(pag->pagf_flcount == be32_to_cpu(agf->agf_flcount));
		ASSERT(pag->pagf_longest == be32_to_cpu(agf->agf_longest));
L
Linus Torvalds 已提交
2582
		ASSERT(pag->pagf_levels[XFS_BTNUM_BNOi] ==
2583
		       be32_to_cpu(agf->agf_levels[XFS_BTNUM_BNOi]));
L
Linus Torvalds 已提交
2584
		ASSERT(pag->pagf_levels[XFS_BTNUM_CNTi] ==
2585
		       be32_to_cpu(agf->agf_levels[XFS_BTNUM_CNTi]));
L
Linus Torvalds 已提交
2586 2587
	}
#endif
2588
	xfs_perag_put(pag);
L
Linus Torvalds 已提交
2589 2590 2591 2592 2593 2594 2595 2596 2597
	return 0;
}

/*
 * Allocate an extent (variable-size).
 * Depending on the allocation type, we either look in a single allocation
 * group or loop over the allocation groups to find the result.
 */
int				/* error */
2598
xfs_alloc_vextent(
L
Linus Torvalds 已提交
2599 2600 2601 2602 2603 2604 2605 2606 2607 2608 2609 2610 2611 2612 2613 2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628 2629 2630 2631 2632
	xfs_alloc_arg_t	*args)	/* allocation argument structure */
{
	xfs_agblock_t	agsize;	/* allocation group size */
	int		error;
	int		flags;	/* XFS_ALLOC_FLAG_... locking flags */
	xfs_mount_t	*mp;	/* mount structure pointer */
	xfs_agnumber_t	sagno;	/* starting allocation group number */
	xfs_alloctype_t	type;	/* input allocation type */
	int		bump_rotor = 0;
	xfs_agnumber_t	rotorstep = xfs_rotorstep; /* inode32 agf stepper */

	mp = args->mp;
	type = args->otype = args->type;
	args->agbno = NULLAGBLOCK;
	/*
	 * Just fix this up, for the case where the last a.g. is shorter
	 * (or there's only one a.g.) and the caller couldn't easily figure
	 * that out (xfs_bmap_alloc).
	 */
	agsize = mp->m_sb.sb_agblocks;
	if (args->maxlen > agsize)
		args->maxlen = agsize;
	if (args->alignment == 0)
		args->alignment = 1;
	ASSERT(XFS_FSB_TO_AGNO(mp, args->fsbno) < mp->m_sb.sb_agcount);
	ASSERT(XFS_FSB_TO_AGBNO(mp, args->fsbno) < agsize);
	ASSERT(args->minlen <= args->maxlen);
	ASSERT(args->minlen <= agsize);
	ASSERT(args->mod < args->prod);
	if (XFS_FSB_TO_AGNO(mp, args->fsbno) >= mp->m_sb.sb_agcount ||
	    XFS_FSB_TO_AGBNO(mp, args->fsbno) >= agsize ||
	    args->minlen > args->maxlen || args->minlen > agsize ||
	    args->mod >= args->prod) {
		args->fsbno = NULLFSBLOCK;
C
Christoph Hellwig 已提交
2633
		trace_xfs_alloc_vextent_badargs(args);
L
Linus Torvalds 已提交
2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644
		return 0;
	}

	switch (type) {
	case XFS_ALLOCTYPE_THIS_AG:
	case XFS_ALLOCTYPE_NEAR_BNO:
	case XFS_ALLOCTYPE_THIS_BNO:
		/*
		 * These three force us into a single a.g.
		 */
		args->agno = XFS_FSB_TO_AGNO(mp, args->fsbno);
2645
		args->pag = xfs_perag_get(mp, args->agno);
L
Linus Torvalds 已提交
2646 2647
		error = xfs_alloc_fix_freelist(args, 0);
		if (error) {
C
Christoph Hellwig 已提交
2648
			trace_xfs_alloc_vextent_nofix(args);
L
Linus Torvalds 已提交
2649 2650 2651
			goto error0;
		}
		if (!args->agbp) {
C
Christoph Hellwig 已提交
2652
			trace_xfs_alloc_vextent_noagbp(args);
L
Linus Torvalds 已提交
2653 2654 2655 2656 2657 2658 2659 2660 2661 2662 2663
			break;
		}
		args->agbno = XFS_FSB_TO_AGBNO(mp, args->fsbno);
		if ((error = xfs_alloc_ag_vextent(args)))
			goto error0;
		break;
	case XFS_ALLOCTYPE_START_BNO:
		/*
		 * Try near allocation first, then anywhere-in-ag after
		 * the first a.g. fails.
		 */
2664
		if ((args->datatype & XFS_ALLOC_INITIAL_USER_DATA) &&
L
Linus Torvalds 已提交
2665 2666 2667 2668 2669 2670 2671 2672 2673 2674 2675 2676 2677
		    (mp->m_flags & XFS_MOUNT_32BITINODES)) {
			args->fsbno = XFS_AGB_TO_FSB(mp,
					((mp->m_agfrotor / rotorstep) %
					mp->m_sb.sb_agcount), 0);
			bump_rotor = 1;
		}
		args->agbno = XFS_FSB_TO_AGBNO(mp, args->fsbno);
		args->type = XFS_ALLOCTYPE_NEAR_BNO;
		/* FALLTHROUGH */
	case XFS_ALLOCTYPE_FIRST_AG:
		/*
		 * Rotate through the allocation groups looking for a winner.
		 */
2678
		if (type == XFS_ALLOCTYPE_FIRST_AG) {
L
Linus Torvalds 已提交
2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697
			/*
			 * Start with allocation group given by bno.
			 */
			args->agno = XFS_FSB_TO_AGNO(mp, args->fsbno);
			args->type = XFS_ALLOCTYPE_THIS_AG;
			sagno = 0;
			flags = 0;
		} else {
			/*
			 * Start with the given allocation group.
			 */
			args->agno = sagno = XFS_FSB_TO_AGNO(mp, args->fsbno);
			flags = XFS_ALLOC_FLAG_TRYLOCK;
		}
		/*
		 * Loop over allocation groups twice; first time with
		 * trylock set, second time without.
		 */
		for (;;) {
2698
			args->pag = xfs_perag_get(mp, args->agno);
L
Linus Torvalds 已提交
2699 2700
			error = xfs_alloc_fix_freelist(args, flags);
			if (error) {
C
Christoph Hellwig 已提交
2701
				trace_xfs_alloc_vextent_nofix(args);
L
Linus Torvalds 已提交
2702 2703 2704 2705 2706 2707 2708 2709 2710 2711
				goto error0;
			}
			/*
			 * If we get a buffer back then the allocation will fly.
			 */
			if (args->agbp) {
				if ((error = xfs_alloc_ag_vextent(args)))
					goto error0;
				break;
			}
C
Christoph Hellwig 已提交
2712 2713 2714

			trace_xfs_alloc_vextent_loopfailed(args);

L
Linus Torvalds 已提交
2715 2716 2717 2718 2719 2720
			/*
			 * Didn't work, figure out the next iteration.
			 */
			if (args->agno == sagno &&
			    type == XFS_ALLOCTYPE_START_BNO)
				args->type = XFS_ALLOCTYPE_THIS_AG;
2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733
			/*
			* For the first allocation, we can try any AG to get
			* space.  However, if we already have allocated a
			* block, we don't want to try AGs whose number is below
			* sagno. Otherwise, we may end up with out-of-order
			* locking of AGF, which might cause deadlock.
			*/
			if (++(args->agno) == mp->m_sb.sb_agcount) {
				if (args->firstblock != NULLFSBLOCK)
					args->agno = sagno;
				else
					args->agno = 0;
			}
L
Linus Torvalds 已提交
2734 2735 2736 2737 2738
			/*
			 * Reached the starting a.g., must either be done
			 * or switch to non-trylock mode.
			 */
			if (args->agno == sagno) {
2739
				if (flags == 0) {
L
Linus Torvalds 已提交
2740
					args->agbno = NULLAGBLOCK;
C
Christoph Hellwig 已提交
2741
					trace_xfs_alloc_vextent_allfailed(args);
L
Linus Torvalds 已提交
2742 2743
					break;
				}
2744 2745 2746 2747 2748 2749

				flags = 0;
				if (type == XFS_ALLOCTYPE_START_BNO) {
					args->agbno = XFS_FSB_TO_AGBNO(mp,
						args->fsbno);
					args->type = XFS_ALLOCTYPE_NEAR_BNO;
L
Linus Torvalds 已提交
2750 2751
				}
			}
2752
			xfs_perag_put(args->pag);
L
Linus Torvalds 已提交
2753
		}
2754
		if (bump_rotor) {
L
Linus Torvalds 已提交
2755 2756 2757 2758 2759 2760 2761 2762 2763 2764 2765 2766 2767 2768 2769 2770 2771 2772 2773 2774 2775 2776 2777
			if (args->agno == sagno)
				mp->m_agfrotor = (mp->m_agfrotor + 1) %
					(mp->m_sb.sb_agcount * rotorstep);
			else
				mp->m_agfrotor = (args->agno * rotorstep + 1) %
					(mp->m_sb.sb_agcount * rotorstep);
		}
		break;
	default:
		ASSERT(0);
		/* NOTREACHED */
	}
	if (args->agbno == NULLAGBLOCK)
		args->fsbno = NULLFSBLOCK;
	else {
		args->fsbno = XFS_AGB_TO_FSB(mp, args->agno, args->agbno);
#ifdef DEBUG
		ASSERT(args->len >= args->minlen);
		ASSERT(args->len <= args->maxlen);
		ASSERT(args->agbno % args->alignment == 0);
		XFS_AG_CHECK_DADDR(mp, XFS_FSB_TO_DADDR(mp, args->fsbno),
			args->len);
#endif
2778 2779

		/* Zero the extent if we were asked to do so */
2780
		if (args->datatype & XFS_ALLOC_USERDATA_ZERO) {
2781 2782 2783 2784 2785
			error = xfs_zero_extent(args->ip, args->fsbno, args->len);
			if (error)
				goto error0;
		}

L
Linus Torvalds 已提交
2786
	}
2787
	xfs_perag_put(args->pag);
L
Linus Torvalds 已提交
2788 2789
	return 0;
error0:
2790
	xfs_perag_put(args->pag);
L
Linus Torvalds 已提交
2791 2792 2793
	return error;
}

2794 2795 2796 2797 2798 2799
/* Ensure that the freelist is at full capacity. */
int
xfs_free_extent_fix_freelist(
	struct xfs_trans	*tp,
	xfs_agnumber_t		agno,
	struct xfs_buf		**agbp)
L
Linus Torvalds 已提交
2800
{
2801 2802
	struct xfs_alloc_arg	args;
	int			error;
L
Linus Torvalds 已提交
2803

2804
	memset(&args, 0, sizeof(struct xfs_alloc_arg));
L
Linus Torvalds 已提交
2805 2806
	args.tp = tp;
	args.mp = tp->t_mountp;
2807
	args.agno = agno;
2808 2809 2810 2811 2812 2813

	/*
	 * validate that the block number is legal - the enables us to detect
	 * and handle a silent filesystem corruption rather than crashing.
	 */
	if (args.agno >= args.mp->m_sb.sb_agcount)
D
Dave Chinner 已提交
2814
		return -EFSCORRUPTED;
2815

2816
	args.pag = xfs_perag_get(args.mp, args.agno);
2817 2818 2819 2820
	ASSERT(args.pag);

	error = xfs_alloc_fix_freelist(&args, XFS_ALLOC_FLAG_FREEING);
	if (error)
2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 2832 2833 2834 2835 2836 2837
		goto out;

	*agbp = args.agbp;
out:
	xfs_perag_put(args.pag);
	return error;
}

/*
 * Free an extent.
 * Just break up the extent address and hand off to xfs_free_ag_extent
 * after fixing up the freelist.
 */
int				/* error */
xfs_free_extent(
	struct xfs_trans	*tp,	/* transaction pointer */
	xfs_fsblock_t		bno,	/* starting block number of extent */
2838
	xfs_extlen_t		len,	/* length of extent */
2839 2840
	struct xfs_owner_info	*oinfo,	/* extent owner */
	enum xfs_ag_resv_type	type)	/* block reservation type */
2841 2842 2843 2844 2845 2846 2847 2848
{
	struct xfs_mount	*mp = tp->t_mountp;
	struct xfs_buf		*agbp;
	xfs_agnumber_t		agno = XFS_FSB_TO_AGNO(mp, bno);
	xfs_agblock_t		agbno = XFS_FSB_TO_AGBNO(mp, bno);
	int			error;

	ASSERT(len != 0);
2849
	ASSERT(type != XFS_AG_RESV_AGFL);
2850

2851
	if (XFS_TEST_ERROR(false, mp,
2852
			XFS_ERRTAG_FREE_EXTENT))
2853 2854
		return -EIO;

2855 2856 2857 2858 2859
	error = xfs_free_extent_fix_freelist(tp, agno, &agbp);
	if (error)
		return error;

	XFS_WANT_CORRUPTED_GOTO(mp, agbno < mp->m_sb.sb_agblocks, err);
2860 2861

	/* validate the extent size is legal now we have the agf locked */
2862 2863 2864
	XFS_WANT_CORRUPTED_GOTO(mp,
		agbno + len <= be32_to_cpu(XFS_BUF_TO_AGF(agbp)->agf_length),
				err);
2865

2866
	error = xfs_free_ag_extent(tp, agbp, agno, agbno, len, oinfo, type);
2867 2868 2869 2870 2871 2872 2873 2874
	if (error)
		goto err;

	xfs_extent_busy_insert(tp, agno, agbno, len, 0);
	return 0;

err:
	xfs_trans_brelse(tp, agbp);
L
Linus Torvalds 已提交
2875 2876
	return error;
}
2877 2878 2879 2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890 2891 2892 2893 2894 2895 2896 2897 2898 2899 2900 2901 2902 2903 2904 2905 2906 2907 2908 2909 2910 2911 2912 2913 2914 2915 2916 2917 2918

struct xfs_alloc_query_range_info {
	xfs_alloc_query_range_fn	fn;
	void				*priv;
};

/* Format btree record and pass to our callback. */
STATIC int
xfs_alloc_query_range_helper(
	struct xfs_btree_cur		*cur,
	union xfs_btree_rec		*rec,
	void				*priv)
{
	struct xfs_alloc_query_range_info	*query = priv;
	struct xfs_alloc_rec_incore		irec;

	irec.ar_startblock = be32_to_cpu(rec->alloc.ar_startblock);
	irec.ar_blockcount = be32_to_cpu(rec->alloc.ar_blockcount);
	return query->fn(cur, &irec, query->priv);
}

/* Find all free space within a given range of blocks. */
int
xfs_alloc_query_range(
	struct xfs_btree_cur			*cur,
	struct xfs_alloc_rec_incore		*low_rec,
	struct xfs_alloc_rec_incore		*high_rec,
	xfs_alloc_query_range_fn		fn,
	void					*priv)
{
	union xfs_btree_irec			low_brec;
	union xfs_btree_irec			high_brec;
	struct xfs_alloc_query_range_info	query;

	ASSERT(cur->bc_btnum == XFS_BTNUM_BNO);
	low_brec.a = *low_rec;
	high_brec.a = *high_rec;
	query.priv = priv;
	query.fn = fn;
	return xfs_btree_query_range(cur, &low_brec, &high_brec,
			xfs_alloc_query_range_helper, &query);
}
2919 2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933

/* Find all free space records. */
int
xfs_alloc_query_all(
	struct xfs_btree_cur			*cur,
	xfs_alloc_query_range_fn		fn,
	void					*priv)
{
	struct xfs_alloc_query_range_info	query;

	ASSERT(cur->bc_btnum == XFS_BTNUM_BNO);
	query.priv = priv;
	query.fn = fn;
	return xfs_btree_query_all(cur, xfs_alloc_query_range_helper, &query);
}
2934 2935 2936 2937 2938 2939 2940 2941 2942 2943 2944 2945 2946 2947 2948 2949 2950 2951 2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965 2966 2967 2968 2969 2970 2971 2972 2973 2974 2975 2976 2977 2978 2979 2980 2981 2982

/* Find the size of the AG, in blocks. */
xfs_agblock_t
xfs_ag_block_count(
	struct xfs_mount	*mp,
	xfs_agnumber_t		agno)
{
	ASSERT(agno < mp->m_sb.sb_agcount);

	if (agno < mp->m_sb.sb_agcount - 1)
		return mp->m_sb.sb_agblocks;
	return mp->m_sb.sb_dblocks - (agno * mp->m_sb.sb_agblocks);
}

/*
 * Verify that an AG block number pointer neither points outside the AG
 * nor points at static metadata.
 */
bool
xfs_verify_agbno(
	struct xfs_mount	*mp,
	xfs_agnumber_t		agno,
	xfs_agblock_t		agbno)
{
	xfs_agblock_t		eoag;

	eoag = xfs_ag_block_count(mp, agno);
	if (agbno >= eoag)
		return false;
	if (agbno <= XFS_AGFL_BLOCK(mp))
		return false;
	return true;
}

/*
 * Verify that an FS block number pointer neither points outside the
 * filesystem nor points at static AG metadata.
 */
bool
xfs_verify_fsbno(
	struct xfs_mount	*mp,
	xfs_fsblock_t		fsbno)
{
	xfs_agnumber_t		agno = XFS_FSB_TO_AGNO(mp, fsbno);

	if (agno >= mp->m_sb.sb_agcount)
		return false;
	return xfs_verify_agbno(mp, agno, XFS_FSB_TO_AGBNO(mp, fsbno));
}