Linux Audio

Check our new training course

Loading...
v4.17
 
   1/*
   2 *   Copyright (C) International Business Machines Corp., 2000-2004
   3 *
   4 *   This program is free software;  you can redistribute it and/or modify
   5 *   it under the terms of the GNU General Public License as published by
   6 *   the Free Software Foundation; either version 2 of the License, or
   7 *   (at your option) any later version.
   8 *
   9 *   This program is distributed in the hope that it will be useful,
  10 *   but WITHOUT ANY WARRANTY;  without even the implied warranty of
  11 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
  12 *   the GNU General Public License for more details.
  13 *
  14 *   You should have received a copy of the GNU General Public License
  15 *   along with this program;  if not, write to the Free Software
  16 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  17 */
  18
  19/*
  20 *	jfs_imap.c: inode allocation map manager
  21 *
  22 * Serialization:
  23 *   Each AG has a simple lock which is used to control the serialization of
  24 *	the AG level lists.  This lock should be taken first whenever an AG
  25 *	level list will be modified or accessed.
  26 *
  27 *   Each IAG is locked by obtaining the buffer for the IAG page.
  28 *
  29 *   There is also a inode lock for the inode map inode.  A read lock needs to
  30 *	be taken whenever an IAG is read from the map or the global level
  31 *	information is read.  A write lock needs to be taken whenever the global
  32 *	level information is modified or an atomic operation needs to be used.
  33 *
  34 *	If more than one IAG is read at one time, the read lock may not
  35 *	be given up until all of the IAG's are read.  Otherwise, a deadlock
  36 *	may occur when trying to obtain the read lock while another thread
  37 *	holding the read lock is waiting on the IAG already being held.
  38 *
  39 *   The control page of the inode map is read into memory by diMount().
  40 *	Thereafter it should only be modified in memory and then it will be
  41 *	written out when the filesystem is unmounted by diUnmount().
  42 */
  43
  44#include <linux/fs.h>
  45#include <linux/buffer_head.h>
  46#include <linux/pagemap.h>
  47#include <linux/quotaops.h>
  48#include <linux/slab.h>
  49
  50#include "jfs_incore.h"
  51#include "jfs_inode.h"
  52#include "jfs_filsys.h"
  53#include "jfs_dinode.h"
  54#include "jfs_dmap.h"
  55#include "jfs_imap.h"
  56#include "jfs_metapage.h"
  57#include "jfs_superblock.h"
  58#include "jfs_debug.h"
  59
  60/*
  61 * imap locks
  62 */
  63/* iag free list lock */
  64#define IAGFREE_LOCK_INIT(imap)		mutex_init(&imap->im_freelock)
  65#define IAGFREE_LOCK(imap)		mutex_lock(&imap->im_freelock)
  66#define IAGFREE_UNLOCK(imap)		mutex_unlock(&imap->im_freelock)
  67
  68/* per ag iag list locks */
  69#define AG_LOCK_INIT(imap,index)	mutex_init(&(imap->im_aglock[index]))
  70#define AG_LOCK(imap,agno)		mutex_lock(&imap->im_aglock[agno])
  71#define AG_UNLOCK(imap,agno)		mutex_unlock(&imap->im_aglock[agno])
  72
  73/*
  74 * forward references
  75 */
  76static int diAllocAG(struct inomap *, int, bool, struct inode *);
  77static int diAllocAny(struct inomap *, int, bool, struct inode *);
  78static int diAllocBit(struct inomap *, struct iag *, int);
  79static int diAllocExt(struct inomap *, int, struct inode *);
  80static int diAllocIno(struct inomap *, int, struct inode *);
  81static int diFindFree(u32, int);
  82static int diNewExt(struct inomap *, struct iag *, int);
  83static int diNewIAG(struct inomap *, int *, int, struct metapage **);
  84static void duplicateIXtree(struct super_block *, s64, int, s64 *);
  85
  86static int diIAGRead(struct inomap * imap, int, struct metapage **);
  87static int copy_from_dinode(struct dinode *, struct inode *);
  88static void copy_to_dinode(struct dinode *, struct inode *);
  89
  90/*
  91 * NAME:	diMount()
  92 *
  93 * FUNCTION:	initialize the incore inode map control structures for
  94 *		a fileset or aggregate init time.
  95 *
  96 *		the inode map's control structure (dinomap) is
  97 *		brought in from disk and placed in virtual memory.
  98 *
  99 * PARAMETERS:
 100 *	ipimap	- pointer to inode map inode for the aggregate or fileset.
 101 *
 102 * RETURN VALUES:
 103 *	0	- success
 104 *	-ENOMEM	- insufficient free virtual memory.
 105 *	-EIO	- i/o error.
 106 */
 107int diMount(struct inode *ipimap)
 108{
 109	struct inomap *imap;
 110	struct metapage *mp;
 111	int index;
 112	struct dinomap_disk *dinom_le;
 113
 114	/*
 115	 * allocate/initialize the in-memory inode map control structure
 116	 */
 117	/* allocate the in-memory inode map control structure. */
 118	imap = kmalloc(sizeof(struct inomap), GFP_KERNEL);
 119	if (imap == NULL) {
 120		jfs_err("diMount: kmalloc returned NULL!");
 121		return -ENOMEM;
 122	}
 123
 124	/* read the on-disk inode map control structure. */
 125
 126	mp = read_metapage(ipimap,
 127			   IMAPBLKNO << JFS_SBI(ipimap->i_sb)->l2nbperpage,
 128			   PSIZE, 0);
 129	if (mp == NULL) {
 130		kfree(imap);
 131		return -EIO;
 132	}
 133
 134	/* copy the on-disk version to the in-memory version. */
 135	dinom_le = (struct dinomap_disk *) mp->data;
 136	imap->im_freeiag = le32_to_cpu(dinom_le->in_freeiag);
 137	imap->im_nextiag = le32_to_cpu(dinom_le->in_nextiag);
 138	atomic_set(&imap->im_numinos, le32_to_cpu(dinom_le->in_numinos));
 139	atomic_set(&imap->im_numfree, le32_to_cpu(dinom_le->in_numfree));
 140	imap->im_nbperiext = le32_to_cpu(dinom_le->in_nbperiext);
 141	imap->im_l2nbperiext = le32_to_cpu(dinom_le->in_l2nbperiext);
 142	for (index = 0; index < MAXAG; index++) {
 143		imap->im_agctl[index].inofree =
 144		    le32_to_cpu(dinom_le->in_agctl[index].inofree);
 145		imap->im_agctl[index].extfree =
 146		    le32_to_cpu(dinom_le->in_agctl[index].extfree);
 147		imap->im_agctl[index].numinos =
 148		    le32_to_cpu(dinom_le->in_agctl[index].numinos);
 149		imap->im_agctl[index].numfree =
 150		    le32_to_cpu(dinom_le->in_agctl[index].numfree);
 151	}
 152
 153	/* release the buffer. */
 154	release_metapage(mp);
 155
 156	/*
 157	 * allocate/initialize inode allocation map locks
 158	 */
 159	/* allocate and init iag free list lock */
 160	IAGFREE_LOCK_INIT(imap);
 161
 162	/* allocate and init ag list locks */
 163	for (index = 0; index < MAXAG; index++) {
 164		AG_LOCK_INIT(imap, index);
 165	}
 166
 167	/* bind the inode map inode and inode map control structure
 168	 * to each other.
 169	 */
 170	imap->im_ipimap = ipimap;
 171	JFS_IP(ipimap)->i_imap = imap;
 172
 173	return (0);
 174}
 175
 176
 177/*
 178 * NAME:	diUnmount()
 179 *
 180 * FUNCTION:	write to disk the incore inode map control structures for
 181 *		a fileset or aggregate at unmount time.
 182 *
 183 * PARAMETERS:
 184 *	ipimap	- pointer to inode map inode for the aggregate or fileset.
 185 *
 186 * RETURN VALUES:
 187 *	0	- success
 188 *	-ENOMEM	- insufficient free virtual memory.
 189 *	-EIO	- i/o error.
 190 */
 191int diUnmount(struct inode *ipimap, int mounterror)
 192{
 193	struct inomap *imap = JFS_IP(ipimap)->i_imap;
 194
 195	/*
 196	 * update the on-disk inode map control structure
 197	 */
 198
 199	if (!(mounterror || isReadOnly(ipimap)))
 200		diSync(ipimap);
 201
 202	/*
 203	 * Invalidate the page cache buffers
 204	 */
 205	truncate_inode_pages(ipimap->i_mapping, 0);
 206
 207	/*
 208	 * free in-memory control structure
 209	 */
 210	kfree(imap);
 211
 212	return (0);
 213}
 214
 215
 216/*
 217 *	diSync()
 218 */
 219int diSync(struct inode *ipimap)
 220{
 221	struct dinomap_disk *dinom_le;
 222	struct inomap *imp = JFS_IP(ipimap)->i_imap;
 223	struct metapage *mp;
 224	int index;
 225
 226	/*
 227	 * write imap global conrol page
 228	 */
 229	/* read the on-disk inode map control structure */
 230	mp = get_metapage(ipimap,
 231			  IMAPBLKNO << JFS_SBI(ipimap->i_sb)->l2nbperpage,
 232			  PSIZE, 0);
 233	if (mp == NULL) {
 234		jfs_err("diSync: get_metapage failed!");
 235		return -EIO;
 236	}
 237
 238	/* copy the in-memory version to the on-disk version */
 239	dinom_le = (struct dinomap_disk *) mp->data;
 240	dinom_le->in_freeiag = cpu_to_le32(imp->im_freeiag);
 241	dinom_le->in_nextiag = cpu_to_le32(imp->im_nextiag);
 242	dinom_le->in_numinos = cpu_to_le32(atomic_read(&imp->im_numinos));
 243	dinom_le->in_numfree = cpu_to_le32(atomic_read(&imp->im_numfree));
 244	dinom_le->in_nbperiext = cpu_to_le32(imp->im_nbperiext);
 245	dinom_le->in_l2nbperiext = cpu_to_le32(imp->im_l2nbperiext);
 246	for (index = 0; index < MAXAG; index++) {
 247		dinom_le->in_agctl[index].inofree =
 248		    cpu_to_le32(imp->im_agctl[index].inofree);
 249		dinom_le->in_agctl[index].extfree =
 250		    cpu_to_le32(imp->im_agctl[index].extfree);
 251		dinom_le->in_agctl[index].numinos =
 252		    cpu_to_le32(imp->im_agctl[index].numinos);
 253		dinom_le->in_agctl[index].numfree =
 254		    cpu_to_le32(imp->im_agctl[index].numfree);
 255	}
 256
 257	/* write out the control structure */
 258	write_metapage(mp);
 259
 260	/*
 261	 * write out dirty pages of imap
 262	 */
 263	filemap_write_and_wait(ipimap->i_mapping);
 264
 265	diWriteSpecial(ipimap, 0);
 266
 267	return (0);
 268}
 269
 270
 271/*
 272 * NAME:	diRead()
 273 *
 274 * FUNCTION:	initialize an incore inode from disk.
 275 *
 276 *		on entry, the specifed incore inode should itself
 277 *		specify the disk inode number corresponding to the
 278 *		incore inode (i.e. i_number should be initialized).
 279 *
 280 *		this routine handles incore inode initialization for
 281 *		both "special" and "regular" inodes.  special inodes
 282 *		are those required early in the mount process and
 283 *		require special handling since much of the file system
 284 *		is not yet initialized.  these "special" inodes are
 285 *		identified by a NULL inode map inode pointer and are
 286 *		actually initialized by a call to diReadSpecial().
 287 *
 288 *		for regular inodes, the iag describing the disk inode
 289 *		is read from disk to determine the inode extent address
 290 *		for the disk inode.  with the inode extent address in
 291 *		hand, the page of the extent that contains the disk
 292 *		inode is read and the disk inode is copied to the
 293 *		incore inode.
 294 *
 295 * PARAMETERS:
 296 *	ip	-  pointer to incore inode to be initialized from disk.
 297 *
 298 * RETURN VALUES:
 299 *	0	- success
 300 *	-EIO	- i/o error.
 301 *	-ENOMEM	- insufficient memory
 302 *
 303 */
 304int diRead(struct inode *ip)
 305{
 306	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
 307	int iagno, ino, extno, rc;
 308	struct inode *ipimap;
 309	struct dinode *dp;
 310	struct iag *iagp;
 311	struct metapage *mp;
 312	s64 blkno, agstart;
 313	struct inomap *imap;
 314	int block_offset;
 315	int inodes_left;
 316	unsigned long pageno;
 317	int rel_inode;
 318
 319	jfs_info("diRead: ino = %ld", ip->i_ino);
 320
 321	ipimap = sbi->ipimap;
 322	JFS_IP(ip)->ipimap = ipimap;
 323
 324	/* determine the iag number for this inode (number) */
 325	iagno = INOTOIAG(ip->i_ino);
 326
 327	/* read the iag */
 328	imap = JFS_IP(ipimap)->i_imap;
 329	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
 330	rc = diIAGRead(imap, iagno, &mp);
 331	IREAD_UNLOCK(ipimap);
 332	if (rc) {
 333		jfs_err("diRead: diIAGRead returned %d", rc);
 334		return (rc);
 335	}
 336
 337	iagp = (struct iag *) mp->data;
 338
 339	/* determine inode extent that holds the disk inode */
 340	ino = ip->i_ino & (INOSPERIAG - 1);
 341	extno = ino >> L2INOSPEREXT;
 342
 343	if ((lengthPXD(&iagp->inoext[extno]) != imap->im_nbperiext) ||
 344	    (addressPXD(&iagp->inoext[extno]) == 0)) {
 345		release_metapage(mp);
 346		return -ESTALE;
 347	}
 348
 349	/* get disk block number of the page within the inode extent
 350	 * that holds the disk inode.
 351	 */
 352	blkno = INOPBLK(&iagp->inoext[extno], ino, sbi->l2nbperpage);
 353
 354	/* get the ag for the iag */
 355	agstart = le64_to_cpu(iagp->agstart);
 356
 357	release_metapage(mp);
 358
 359	rel_inode = (ino & (INOSPERPAGE - 1));
 360	pageno = blkno >> sbi->l2nbperpage;
 361
 362	if ((block_offset = ((u32) blkno & (sbi->nbperpage - 1)))) {
 363		/*
 364		 * OS/2 didn't always align inode extents on page boundaries
 365		 */
 366		inodes_left =
 367		     (sbi->nbperpage - block_offset) << sbi->l2niperblk;
 368
 369		if (rel_inode < inodes_left)
 370			rel_inode += block_offset << sbi->l2niperblk;
 371		else {
 372			pageno += 1;
 373			rel_inode -= inodes_left;
 374		}
 375	}
 376
 377	/* read the page of disk inode */
 378	mp = read_metapage(ipimap, pageno << sbi->l2nbperpage, PSIZE, 1);
 379	if (!mp) {
 380		jfs_err("diRead: read_metapage failed");
 381		return -EIO;
 382	}
 383
 384	/* locate the disk inode requested */
 385	dp = (struct dinode *) mp->data;
 386	dp += rel_inode;
 387
 388	if (ip->i_ino != le32_to_cpu(dp->di_number)) {
 389		jfs_error(ip->i_sb, "i_ino != di_number\n");
 390		rc = -EIO;
 391	} else if (le32_to_cpu(dp->di_nlink) == 0)
 392		rc = -ESTALE;
 393	else
 394		/* copy the disk inode to the in-memory inode */
 395		rc = copy_from_dinode(dp, ip);
 396
 397	release_metapage(mp);
 398
 399	/* set the ag for the inode */
 400	JFS_IP(ip)->agstart = agstart;
 401	JFS_IP(ip)->active_ag = -1;
 402
 403	return (rc);
 404}
 405
 406
 407/*
 408 * NAME:	diReadSpecial()
 409 *
 410 * FUNCTION:	initialize a 'special' inode from disk.
 411 *
 412 *		this routines handles aggregate level inodes.  The
 413 *		inode cache cannot differentiate between the
 414 *		aggregate inodes and the filesystem inodes, so we
 415 *		handle these here.  We don't actually use the aggregate
 416 *		inode map, since these inodes are at a fixed location
 417 *		and in some cases the aggregate inode map isn't initialized
 418 *		yet.
 419 *
 420 * PARAMETERS:
 421 *	sb - filesystem superblock
 422 *	inum - aggregate inode number
 423 *	secondary - 1 if secondary aggregate inode table
 424 *
 425 * RETURN VALUES:
 426 *	new inode	- success
 427 *	NULL		- i/o error.
 428 */
 429struct inode *diReadSpecial(struct super_block *sb, ino_t inum, int secondary)
 430{
 431	struct jfs_sb_info *sbi = JFS_SBI(sb);
 432	uint address;
 433	struct dinode *dp;
 434	struct inode *ip;
 435	struct metapage *mp;
 436
 437	ip = new_inode(sb);
 438	if (ip == NULL) {
 439		jfs_err("diReadSpecial: new_inode returned NULL!");
 440		return ip;
 441	}
 442
 443	if (secondary) {
 444		address = addressPXD(&sbi->ait2) >> sbi->l2nbperpage;
 445		JFS_IP(ip)->ipimap = sbi->ipaimap2;
 446	} else {
 447		address = AITBL_OFF >> L2PSIZE;
 448		JFS_IP(ip)->ipimap = sbi->ipaimap;
 449	}
 450
 451	ASSERT(inum < INOSPEREXT);
 452
 453	ip->i_ino = inum;
 454
 455	address += inum >> 3;	/* 8 inodes per 4K page */
 456
 457	/* read the page of fixed disk inode (AIT) in raw mode */
 458	mp = read_metapage(ip, address << sbi->l2nbperpage, PSIZE, 1);
 459	if (mp == NULL) {
 460		set_nlink(ip, 1);	/* Don't want iput() deleting it */
 461		iput(ip);
 462		return (NULL);
 463	}
 464
 465	/* get the pointer to the disk inode of interest */
 466	dp = (struct dinode *) (mp->data);
 467	dp += inum % 8;		/* 8 inodes per 4K page */
 468
 469	/* copy on-disk inode to in-memory inode */
 470	if ((copy_from_dinode(dp, ip)) != 0) {
 471		/* handle bad return by returning NULL for ip */
 472		set_nlink(ip, 1);	/* Don't want iput() deleting it */
 473		iput(ip);
 474		/* release the page */
 475		release_metapage(mp);
 476		return (NULL);
 477
 478	}
 479
 480	ip->i_mapping->a_ops = &jfs_metapage_aops;
 481	mapping_set_gfp_mask(ip->i_mapping, GFP_NOFS);
 482
 483	/* Allocations to metadata inodes should not affect quotas */
 484	ip->i_flags |= S_NOQUOTA;
 485
 486	if ((inum == FILESYSTEM_I) && (JFS_IP(ip)->ipimap == sbi->ipaimap)) {
 487		sbi->gengen = le32_to_cpu(dp->di_gengen);
 488		sbi->inostamp = le32_to_cpu(dp->di_inostamp);
 489	}
 490
 491	/* release the page */
 492	release_metapage(mp);
 493
 494	/*
 495	 * __mark_inode_dirty expects inodes to be hashed.  Since we don't
 496	 * want special inodes in the fileset inode space, we make them
 497	 * appear hashed, but do not put on any lists.  hlist_del()
 498	 * will work fine and require no locking.
 499	 */
 500	hlist_add_fake(&ip->i_hash);
 501
 502	return (ip);
 503}
 504
 505/*
 506 * NAME:	diWriteSpecial()
 507 *
 508 * FUNCTION:	Write the special inode to disk
 509 *
 510 * PARAMETERS:
 511 *	ip - special inode
 512 *	secondary - 1 if secondary aggregate inode table
 513 *
 514 * RETURN VALUES: none
 515 */
 516
 517void diWriteSpecial(struct inode *ip, int secondary)
 518{
 519	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
 520	uint address;
 521	struct dinode *dp;
 522	ino_t inum = ip->i_ino;
 523	struct metapage *mp;
 524
 525	if (secondary)
 526		address = addressPXD(&sbi->ait2) >> sbi->l2nbperpage;
 527	else
 528		address = AITBL_OFF >> L2PSIZE;
 529
 530	ASSERT(inum < INOSPEREXT);
 531
 532	address += inum >> 3;	/* 8 inodes per 4K page */
 533
 534	/* read the page of fixed disk inode (AIT) in raw mode */
 535	mp = read_metapage(ip, address << sbi->l2nbperpage, PSIZE, 1);
 536	if (mp == NULL) {
 537		jfs_err("diWriteSpecial: failed to read aggregate inode extent!");
 538		return;
 539	}
 540
 541	/* get the pointer to the disk inode of interest */
 542	dp = (struct dinode *) (mp->data);
 543	dp += inum % 8;		/* 8 inodes per 4K page */
 544
 545	/* copy on-disk inode to in-memory inode */
 546	copy_to_dinode(dp, ip);
 547	memcpy(&dp->di_xtroot, &JFS_IP(ip)->i_xtroot, 288);
 548
 549	if (inum == FILESYSTEM_I)
 550		dp->di_gengen = cpu_to_le32(sbi->gengen);
 551
 552	/* write the page */
 553	write_metapage(mp);
 554}
 555
 556/*
 557 * NAME:	diFreeSpecial()
 558 *
 559 * FUNCTION:	Free allocated space for special inode
 560 */
 561void diFreeSpecial(struct inode *ip)
 562{
 563	if (ip == NULL) {
 564		jfs_err("diFreeSpecial called with NULL ip!");
 565		return;
 566	}
 567	filemap_write_and_wait(ip->i_mapping);
 568	truncate_inode_pages(ip->i_mapping, 0);
 569	iput(ip);
 570}
 571
 572
 573
 574/*
 575 * NAME:	diWrite()
 576 *
 577 * FUNCTION:	write the on-disk inode portion of the in-memory inode
 578 *		to its corresponding on-disk inode.
 579 *
 580 *		on entry, the specifed incore inode should itself
 581 *		specify the disk inode number corresponding to the
 582 *		incore inode (i.e. i_number should be initialized).
 583 *
 584 *		the inode contains the inode extent address for the disk
 585 *		inode.  with the inode extent address in hand, the
 586 *		page of the extent that contains the disk inode is
 587 *		read and the disk inode portion of the incore inode
 588 *		is copied to the disk inode.
 589 *
 590 * PARAMETERS:
 591 *	tid -  transacation id
 592 *	ip  -  pointer to incore inode to be written to the inode extent.
 593 *
 594 * RETURN VALUES:
 595 *	0	- success
 596 *	-EIO	- i/o error.
 597 */
 598int diWrite(tid_t tid, struct inode *ip)
 599{
 600	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
 601	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
 602	int rc = 0;
 603	s32 ino;
 604	struct dinode *dp;
 605	s64 blkno;
 606	int block_offset;
 607	int inodes_left;
 608	struct metapage *mp;
 609	unsigned long pageno;
 610	int rel_inode;
 611	int dioffset;
 612	struct inode *ipimap;
 613	uint type;
 614	lid_t lid;
 615	struct tlock *ditlck, *tlck;
 616	struct linelock *dilinelock, *ilinelock;
 617	struct lv *lv;
 618	int n;
 619
 620	ipimap = jfs_ip->ipimap;
 621
 622	ino = ip->i_ino & (INOSPERIAG - 1);
 623
 624	if (!addressPXD(&(jfs_ip->ixpxd)) ||
 625	    (lengthPXD(&(jfs_ip->ixpxd)) !=
 626	     JFS_IP(ipimap)->i_imap->im_nbperiext)) {
 627		jfs_error(ip->i_sb, "ixpxd invalid\n");
 628		return -EIO;
 629	}
 630
 631	/*
 632	 * read the page of disk inode containing the specified inode:
 633	 */
 634	/* compute the block address of the page */
 635	blkno = INOPBLK(&(jfs_ip->ixpxd), ino, sbi->l2nbperpage);
 636
 637	rel_inode = (ino & (INOSPERPAGE - 1));
 638	pageno = blkno >> sbi->l2nbperpage;
 639
 640	if ((block_offset = ((u32) blkno & (sbi->nbperpage - 1)))) {
 641		/*
 642		 * OS/2 didn't always align inode extents on page boundaries
 643		 */
 644		inodes_left =
 645		    (sbi->nbperpage - block_offset) << sbi->l2niperblk;
 646
 647		if (rel_inode < inodes_left)
 648			rel_inode += block_offset << sbi->l2niperblk;
 649		else {
 650			pageno += 1;
 651			rel_inode -= inodes_left;
 652		}
 653	}
 654	/* read the page of disk inode */
 655      retry:
 656	mp = read_metapage(ipimap, pageno << sbi->l2nbperpage, PSIZE, 1);
 657	if (!mp)
 658		return -EIO;
 659
 660	/* get the pointer to the disk inode */
 661	dp = (struct dinode *) mp->data;
 662	dp += rel_inode;
 663
 664	dioffset = (ino & (INOSPERPAGE - 1)) << L2DISIZE;
 665
 666	/*
 667	 * acquire transaction lock on the on-disk inode;
 668	 * N.B. tlock is acquired on ipimap not ip;
 669	 */
 670	if ((ditlck =
 671	     txLock(tid, ipimap, mp, tlckINODE | tlckENTRY)) == NULL)
 672		goto retry;
 673	dilinelock = (struct linelock *) & ditlck->lock;
 674
 675	/*
 676	 * copy btree root from in-memory inode to on-disk inode
 677	 *
 678	 * (tlock is taken from inline B+-tree root in in-memory
 679	 * inode when the B+-tree root is updated, which is pointed
 680	 * by jfs_ip->blid as well as being on tx tlock list)
 681	 *
 682	 * further processing of btree root is based on the copy
 683	 * in in-memory inode, where txLog() will log from, and,
 684	 * for xtree root, txUpdateMap() will update map and reset
 685	 * XAD_NEW bit;
 686	 */
 687
 688	if (S_ISDIR(ip->i_mode) && (lid = jfs_ip->xtlid)) {
 689		/*
 690		 * This is the special xtree inside the directory for storing
 691		 * the directory table
 692		 */
 693		xtpage_t *p, *xp;
 694		xad_t *xad;
 695
 696		jfs_ip->xtlid = 0;
 697		tlck = lid_to_tlock(lid);
 698		assert(tlck->type & tlckXTREE);
 699		tlck->type |= tlckBTROOT;
 700		tlck->mp = mp;
 701		ilinelock = (struct linelock *) & tlck->lock;
 702
 703		/*
 704		 * copy xtree root from inode to dinode:
 705		 */
 706		p = &jfs_ip->i_xtroot;
 707		xp = (xtpage_t *) &dp->di_dirtable;
 708		lv = ilinelock->lv;
 709		for (n = 0; n < ilinelock->index; n++, lv++) {
 710			memcpy(&xp->xad[lv->offset], &p->xad[lv->offset],
 711			       lv->length << L2XTSLOTSIZE);
 712		}
 713
 714		/* reset on-disk (metadata page) xtree XAD_NEW bit */
 715		xad = &xp->xad[XTENTRYSTART];
 716		for (n = XTENTRYSTART;
 717		     n < le16_to_cpu(xp->header.nextindex); n++, xad++)
 718			if (xad->flag & (XAD_NEW | XAD_EXTENDED))
 719				xad->flag &= ~(XAD_NEW | XAD_EXTENDED);
 720	}
 721
 722	if ((lid = jfs_ip->blid) == 0)
 723		goto inlineData;
 724	jfs_ip->blid = 0;
 725
 726	tlck = lid_to_tlock(lid);
 727	type = tlck->type;
 728	tlck->type |= tlckBTROOT;
 729	tlck->mp = mp;
 730	ilinelock = (struct linelock *) & tlck->lock;
 731
 732	/*
 733	 *	regular file: 16 byte (XAD slot) granularity
 734	 */
 735	if (type & tlckXTREE) {
 736		xtpage_t *p, *xp;
 737		xad_t *xad;
 738
 739		/*
 740		 * copy xtree root from inode to dinode:
 741		 */
 742		p = &jfs_ip->i_xtroot;
 743		xp = &dp->di_xtroot;
 744		lv = ilinelock->lv;
 745		for (n = 0; n < ilinelock->index; n++, lv++) {
 746			memcpy(&xp->xad[lv->offset], &p->xad[lv->offset],
 747			       lv->length << L2XTSLOTSIZE);
 748		}
 749
 750		/* reset on-disk (metadata page) xtree XAD_NEW bit */
 751		xad = &xp->xad[XTENTRYSTART];
 752		for (n = XTENTRYSTART;
 753		     n < le16_to_cpu(xp->header.nextindex); n++, xad++)
 754			if (xad->flag & (XAD_NEW | XAD_EXTENDED))
 755				xad->flag &= ~(XAD_NEW | XAD_EXTENDED);
 756	}
 757	/*
 758	 *	directory: 32 byte (directory entry slot) granularity
 759	 */
 760	else if (type & tlckDTREE) {
 761		dtpage_t *p, *xp;
 762
 763		/*
 764		 * copy dtree root from inode to dinode:
 765		 */
 766		p = (dtpage_t *) &jfs_ip->i_dtroot;
 767		xp = (dtpage_t *) & dp->di_dtroot;
 768		lv = ilinelock->lv;
 769		for (n = 0; n < ilinelock->index; n++, lv++) {
 770			memcpy(&xp->slot[lv->offset], &p->slot[lv->offset],
 771			       lv->length << L2DTSLOTSIZE);
 772		}
 773	} else {
 774		jfs_err("diWrite: UFO tlock");
 775	}
 776
 777      inlineData:
 778	/*
 779	 * copy inline symlink from in-memory inode to on-disk inode
 780	 */
 781	if (S_ISLNK(ip->i_mode) && ip->i_size < IDATASIZE) {
 782		lv = & dilinelock->lv[dilinelock->index];
 783		lv->offset = (dioffset + 2 * 128) >> L2INODESLOTSIZE;
 784		lv->length = 2;
 785		memcpy(&dp->di_fastsymlink, jfs_ip->i_inline, IDATASIZE);
 786		dilinelock->index++;
 787	}
 788	/*
 789	 * copy inline data from in-memory inode to on-disk inode:
 790	 * 128 byte slot granularity
 791	 */
 792	if (test_cflag(COMMIT_Inlineea, ip)) {
 793		lv = & dilinelock->lv[dilinelock->index];
 794		lv->offset = (dioffset + 3 * 128) >> L2INODESLOTSIZE;
 795		lv->length = 1;
 796		memcpy(&dp->di_inlineea, jfs_ip->i_inline_ea, INODESLOTSIZE);
 797		dilinelock->index++;
 798
 799		clear_cflag(COMMIT_Inlineea, ip);
 800	}
 801
 802	/*
 803	 *	lock/copy inode base: 128 byte slot granularity
 804	 */
 805	lv = & dilinelock->lv[dilinelock->index];
 806	lv->offset = dioffset >> L2INODESLOTSIZE;
 807	copy_to_dinode(dp, ip);
 808	if (test_and_clear_cflag(COMMIT_Dirtable, ip)) {
 809		lv->length = 2;
 810		memcpy(&dp->di_dirtable, &jfs_ip->i_dirtable, 96);
 811	} else
 812		lv->length = 1;
 813	dilinelock->index++;
 814
 815	/* release the buffer holding the updated on-disk inode.
 816	 * the buffer will be later written by commit processing.
 817	 */
 818	write_metapage(mp);
 819
 820	return (rc);
 821}
 822
 823
 824/*
 825 * NAME:	diFree(ip)
 826 *
 827 * FUNCTION:	free a specified inode from the inode working map
 828 *		for a fileset or aggregate.
 829 *
 830 *		if the inode to be freed represents the first (only)
 831 *		free inode within the iag, the iag will be placed on
 832 *		the ag free inode list.
 833 *
 834 *		freeing the inode will cause the inode extent to be
 835 *		freed if the inode is the only allocated inode within
 836 *		the extent.  in this case all the disk resource backing
 837 *		up the inode extent will be freed. in addition, the iag
 838 *		will be placed on the ag extent free list if the extent
 839 *		is the first free extent in the iag.  if freeing the
 840 *		extent also means that no free inodes will exist for
 841 *		the iag, the iag will also be removed from the ag free
 842 *		inode list.
 843 *
 844 *		the iag describing the inode will be freed if the extent
 845 *		is to be freed and it is the only backed extent within
 846 *		the iag.  in this case, the iag will be removed from the
 847 *		ag free extent list and ag free inode list and placed on
 848 *		the inode map's free iag list.
 849 *
 850 *		a careful update approach is used to provide consistency
 851 *		in the face of updates to multiple buffers.  under this
 852 *		approach, all required buffers are obtained before making
 853 *		any updates and are held until all updates are complete.
 854 *
 855 * PARAMETERS:
 856 *	ip	- inode to be freed.
 857 *
 858 * RETURN VALUES:
 859 *	0	- success
 860 *	-EIO	- i/o error.
 861 */
 862int diFree(struct inode *ip)
 863{
 864	int rc;
 865	ino_t inum = ip->i_ino;
 866	struct iag *iagp, *aiagp, *biagp, *ciagp, *diagp;
 867	struct metapage *mp, *amp, *bmp, *cmp, *dmp;
 868	int iagno, ino, extno, bitno, sword, agno;
 869	int back, fwd;
 870	u32 bitmap, mask;
 871	struct inode *ipimap = JFS_SBI(ip->i_sb)->ipimap;
 872	struct inomap *imap = JFS_IP(ipimap)->i_imap;
 873	pxd_t freepxd;
 874	tid_t tid;
 875	struct inode *iplist[3];
 876	struct tlock *tlck;
 877	struct pxd_lock *pxdlock;
 878
 879	/*
 880	 * This is just to suppress compiler warnings.  The same logic that
 881	 * references these variables is used to initialize them.
 882	 */
 883	aiagp = biagp = ciagp = diagp = NULL;
 884
 885	/* get the iag number containing the inode.
 886	 */
 887	iagno = INOTOIAG(inum);
 888
 889	/* make sure that the iag is contained within
 890	 * the map.
 891	 */
 892	if (iagno >= imap->im_nextiag) {
 893		print_hex_dump(KERN_ERR, "imap: ", DUMP_PREFIX_ADDRESS, 16, 4,
 894			       imap, 32, 0);
 895		jfs_error(ip->i_sb, "inum = %d, iagno = %d, nextiag = %d\n",
 896			  (uint) inum, iagno, imap->im_nextiag);
 897		return -EIO;
 898	}
 899
 900	/* get the allocation group for this ino.
 901	 */
 902	agno = BLKTOAG(JFS_IP(ip)->agstart, JFS_SBI(ip->i_sb));
 903
 904	/* Lock the AG specific inode map information
 905	 */
 906	AG_LOCK(imap, agno);
 907
 908	/* Obtain read lock in imap inode.  Don't release it until we have
 909	 * read all of the IAG's that we are going to.
 910	 */
 911	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
 912
 913	/* read the iag.
 914	 */
 915	if ((rc = diIAGRead(imap, iagno, &mp))) {
 916		IREAD_UNLOCK(ipimap);
 917		AG_UNLOCK(imap, agno);
 918		return (rc);
 919	}
 920	iagp = (struct iag *) mp->data;
 921
 922	/* get the inode number and extent number of the inode within
 923	 * the iag and the inode number within the extent.
 924	 */
 925	ino = inum & (INOSPERIAG - 1);
 926	extno = ino >> L2INOSPEREXT;
 927	bitno = ino & (INOSPEREXT - 1);
 928	mask = HIGHORDER >> bitno;
 929
 930	if (!(le32_to_cpu(iagp->wmap[extno]) & mask)) {
 931		jfs_error(ip->i_sb, "wmap shows inode already free\n");
 932	}
 933
 934	if (!addressPXD(&iagp->inoext[extno])) {
 935		release_metapage(mp);
 936		IREAD_UNLOCK(ipimap);
 937		AG_UNLOCK(imap, agno);
 938		jfs_error(ip->i_sb, "invalid inoext\n");
 939		return -EIO;
 940	}
 941
 942	/* compute the bitmap for the extent reflecting the freed inode.
 943	 */
 944	bitmap = le32_to_cpu(iagp->wmap[extno]) & ~mask;
 945
 946	if (imap->im_agctl[agno].numfree > imap->im_agctl[agno].numinos) {
 947		release_metapage(mp);
 948		IREAD_UNLOCK(ipimap);
 949		AG_UNLOCK(imap, agno);
 950		jfs_error(ip->i_sb, "numfree > numinos\n");
 951		return -EIO;
 952	}
 953	/*
 954	 *	inode extent still has some inodes or below low water mark:
 955	 *	keep the inode extent;
 956	 */
 957	if (bitmap ||
 958	    imap->im_agctl[agno].numfree < 96 ||
 959	    (imap->im_agctl[agno].numfree < 288 &&
 960	     (((imap->im_agctl[agno].numfree * 100) /
 961	       imap->im_agctl[agno].numinos) <= 25))) {
 962		/* if the iag currently has no free inodes (i.e.,
 963		 * the inode being freed is the first free inode of iag),
 964		 * insert the iag at head of the inode free list for the ag.
 965		 */
 966		if (iagp->nfreeinos == 0) {
 967			/* check if there are any iags on the ag inode
 968			 * free list.  if so, read the first one so that
 969			 * we can link the current iag onto the list at
 970			 * the head.
 971			 */
 972			if ((fwd = imap->im_agctl[agno].inofree) >= 0) {
 973				/* read the iag that currently is the head
 974				 * of the list.
 975				 */
 976				if ((rc = diIAGRead(imap, fwd, &amp))) {
 977					IREAD_UNLOCK(ipimap);
 978					AG_UNLOCK(imap, agno);
 979					release_metapage(mp);
 980					return (rc);
 981				}
 982				aiagp = (struct iag *) amp->data;
 983
 984				/* make current head point back to the iag.
 985				 */
 986				aiagp->inofreeback = cpu_to_le32(iagno);
 987
 988				write_metapage(amp);
 989			}
 990
 991			/* iag points forward to current head and iag
 992			 * becomes the new head of the list.
 993			 */
 994			iagp->inofreefwd =
 995			    cpu_to_le32(imap->im_agctl[agno].inofree);
 996			iagp->inofreeback = cpu_to_le32(-1);
 997			imap->im_agctl[agno].inofree = iagno;
 998		}
 999		IREAD_UNLOCK(ipimap);
1000
1001		/* update the free inode summary map for the extent if
1002		 * freeing the inode means the extent will now have free
1003		 * inodes (i.e., the inode being freed is the first free
1004		 * inode of extent),
1005		 */
1006		if (iagp->wmap[extno] == cpu_to_le32(ONES)) {
1007			sword = extno >> L2EXTSPERSUM;
1008			bitno = extno & (EXTSPERSUM - 1);
1009			iagp->inosmap[sword] &=
1010			    cpu_to_le32(~(HIGHORDER >> bitno));
1011		}
1012
1013		/* update the bitmap.
1014		 */
1015		iagp->wmap[extno] = cpu_to_le32(bitmap);
1016
1017		/* update the free inode counts at the iag, ag and
1018		 * map level.
1019		 */
1020		le32_add_cpu(&iagp->nfreeinos, 1);
1021		imap->im_agctl[agno].numfree += 1;
1022		atomic_inc(&imap->im_numfree);
1023
1024		/* release the AG inode map lock
1025		 */
1026		AG_UNLOCK(imap, agno);
1027
1028		/* write the iag */
1029		write_metapage(mp);
1030
1031		return (0);
1032	}
1033
1034
1035	/*
1036	 *	inode extent has become free and above low water mark:
1037	 *	free the inode extent;
1038	 */
1039
1040	/*
1041	 *	prepare to update iag list(s) (careful update step 1)
1042	 */
1043	amp = bmp = cmp = dmp = NULL;
1044	fwd = back = -1;
1045
1046	/* check if the iag currently has no free extents.  if so,
1047	 * it will be placed on the head of the ag extent free list.
1048	 */
1049	if (iagp->nfreeexts == 0) {
1050		/* check if the ag extent free list has any iags.
1051		 * if so, read the iag at the head of the list now.
1052		 * this (head) iag will be updated later to reflect
1053		 * the addition of the current iag at the head of
1054		 * the list.
1055		 */
1056		if ((fwd = imap->im_agctl[agno].extfree) >= 0) {
1057			if ((rc = diIAGRead(imap, fwd, &amp)))
1058				goto error_out;
1059			aiagp = (struct iag *) amp->data;
1060		}
1061	} else {
1062		/* iag has free extents. check if the addition of a free
1063		 * extent will cause all extents to be free within this
1064		 * iag.  if so, the iag will be removed from the ag extent
1065		 * free list and placed on the inode map's free iag list.
1066		 */
1067		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG - 1)) {
1068			/* in preparation for removing the iag from the
1069			 * ag extent free list, read the iags preceding
1070			 * and following the iag on the ag extent free
1071			 * list.
1072			 */
1073			if ((fwd = le32_to_cpu(iagp->extfreefwd)) >= 0) {
1074				if ((rc = diIAGRead(imap, fwd, &amp)))
1075					goto error_out;
1076				aiagp = (struct iag *) amp->data;
1077			}
1078
1079			if ((back = le32_to_cpu(iagp->extfreeback)) >= 0) {
1080				if ((rc = diIAGRead(imap, back, &bmp)))
1081					goto error_out;
1082				biagp = (struct iag *) bmp->data;
1083			}
1084		}
1085	}
1086
1087	/* remove the iag from the ag inode free list if freeing
1088	 * this extent cause the iag to have no free inodes.
1089	 */
1090	if (iagp->nfreeinos == cpu_to_le32(INOSPEREXT - 1)) {
1091		int inofreeback = le32_to_cpu(iagp->inofreeback);
1092		int inofreefwd = le32_to_cpu(iagp->inofreefwd);
1093
1094		/* in preparation for removing the iag from the
1095		 * ag inode free list, read the iags preceding
1096		 * and following the iag on the ag inode free
1097		 * list.  before reading these iags, we must make
1098		 * sure that we already don't have them in hand
1099		 * from up above, since re-reading an iag (buffer)
1100		 * we are currently holding would cause a deadlock.
1101		 */
1102		if (inofreefwd >= 0) {
1103
1104			if (inofreefwd == fwd)
1105				ciagp = (struct iag *) amp->data;
1106			else if (inofreefwd == back)
1107				ciagp = (struct iag *) bmp->data;
1108			else {
1109				if ((rc =
1110				     diIAGRead(imap, inofreefwd, &cmp)))
1111					goto error_out;
1112				ciagp = (struct iag *) cmp->data;
1113			}
1114			assert(ciagp != NULL);
1115		}
1116
1117		if (inofreeback >= 0) {
1118			if (inofreeback == fwd)
1119				diagp = (struct iag *) amp->data;
1120			else if (inofreeback == back)
1121				diagp = (struct iag *) bmp->data;
1122			else {
1123				if ((rc =
1124				     diIAGRead(imap, inofreeback, &dmp)))
1125					goto error_out;
1126				diagp = (struct iag *) dmp->data;
1127			}
1128			assert(diagp != NULL);
1129		}
1130	}
1131
1132	IREAD_UNLOCK(ipimap);
1133
1134	/*
1135	 * invalidate any page of the inode extent freed from buffer cache;
1136	 */
1137	freepxd = iagp->inoext[extno];
1138	invalidate_pxd_metapages(ip, freepxd);
1139
1140	/*
1141	 *	update iag list(s) (careful update step 2)
1142	 */
1143	/* add the iag to the ag extent free list if this is the
1144	 * first free extent for the iag.
1145	 */
1146	if (iagp->nfreeexts == 0) {
1147		if (fwd >= 0)
1148			aiagp->extfreeback = cpu_to_le32(iagno);
1149
1150		iagp->extfreefwd =
1151		    cpu_to_le32(imap->im_agctl[agno].extfree);
1152		iagp->extfreeback = cpu_to_le32(-1);
1153		imap->im_agctl[agno].extfree = iagno;
1154	} else {
1155		/* remove the iag from the ag extent list if all extents
1156		 * are now free and place it on the inode map iag free list.
1157		 */
1158		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG - 1)) {
1159			if (fwd >= 0)
1160				aiagp->extfreeback = iagp->extfreeback;
1161
1162			if (back >= 0)
1163				biagp->extfreefwd = iagp->extfreefwd;
1164			else
1165				imap->im_agctl[agno].extfree =
1166				    le32_to_cpu(iagp->extfreefwd);
1167
1168			iagp->extfreefwd = iagp->extfreeback = cpu_to_le32(-1);
1169
1170			IAGFREE_LOCK(imap);
1171			iagp->iagfree = cpu_to_le32(imap->im_freeiag);
1172			imap->im_freeiag = iagno;
1173			IAGFREE_UNLOCK(imap);
1174		}
1175	}
1176
1177	/* remove the iag from the ag inode free list if freeing
1178	 * this extent causes the iag to have no free inodes.
1179	 */
1180	if (iagp->nfreeinos == cpu_to_le32(INOSPEREXT - 1)) {
1181		if ((int) le32_to_cpu(iagp->inofreefwd) >= 0)
1182			ciagp->inofreeback = iagp->inofreeback;
1183
1184		if ((int) le32_to_cpu(iagp->inofreeback) >= 0)
1185			diagp->inofreefwd = iagp->inofreefwd;
1186		else
1187			imap->im_agctl[agno].inofree =
1188			    le32_to_cpu(iagp->inofreefwd);
1189
1190		iagp->inofreefwd = iagp->inofreeback = cpu_to_le32(-1);
1191	}
1192
1193	/* update the inode extent address and working map
1194	 * to reflect the free extent.
1195	 * the permanent map should have been updated already
1196	 * for the inode being freed.
1197	 */
1198	if (iagp->pmap[extno] != 0) {
1199		jfs_error(ip->i_sb, "the pmap does not show inode free\n");
1200	}
1201	iagp->wmap[extno] = 0;
1202	PXDlength(&iagp->inoext[extno], 0);
1203	PXDaddress(&iagp->inoext[extno], 0);
1204
1205	/* update the free extent and free inode summary maps
1206	 * to reflect the freed extent.
1207	 * the inode summary map is marked to indicate no inodes
1208	 * available for the freed extent.
1209	 */
1210	sword = extno >> L2EXTSPERSUM;
1211	bitno = extno & (EXTSPERSUM - 1);
1212	mask = HIGHORDER >> bitno;
1213	iagp->inosmap[sword] |= cpu_to_le32(mask);
1214	iagp->extsmap[sword] &= cpu_to_le32(~mask);
1215
1216	/* update the number of free inodes and number of free extents
1217	 * for the iag.
1218	 */
1219	le32_add_cpu(&iagp->nfreeinos, -(INOSPEREXT - 1));
1220	le32_add_cpu(&iagp->nfreeexts, 1);
1221
1222	/* update the number of free inodes and backed inodes
1223	 * at the ag and inode map level.
1224	 */
1225	imap->im_agctl[agno].numfree -= (INOSPEREXT - 1);
1226	imap->im_agctl[agno].numinos -= INOSPEREXT;
1227	atomic_sub(INOSPEREXT - 1, &imap->im_numfree);
1228	atomic_sub(INOSPEREXT, &imap->im_numinos);
1229
1230	if (amp)
1231		write_metapage(amp);
1232	if (bmp)
1233		write_metapage(bmp);
1234	if (cmp)
1235		write_metapage(cmp);
1236	if (dmp)
1237		write_metapage(dmp);
1238
1239	/*
1240	 * start transaction to update block allocation map
1241	 * for the inode extent freed;
1242	 *
1243	 * N.B. AG_LOCK is released and iag will be released below, and
1244	 * other thread may allocate inode from/reusing the ixad freed
1245	 * BUT with new/different backing inode extent from the extent
1246	 * to be freed by the transaction;
1247	 */
1248	tid = txBegin(ipimap->i_sb, COMMIT_FORCE);
1249	mutex_lock(&JFS_IP(ipimap)->commit_mutex);
1250
1251	/* acquire tlock of the iag page of the freed ixad
1252	 * to force the page NOHOMEOK (even though no data is
1253	 * logged from the iag page) until NOREDOPAGE|FREEXTENT log
1254	 * for the free of the extent is committed;
1255	 * write FREEXTENT|NOREDOPAGE log record
1256	 * N.B. linelock is overlaid as freed extent descriptor;
1257	 */
1258	tlck = txLock(tid, ipimap, mp, tlckINODE | tlckFREE);
1259	pxdlock = (struct pxd_lock *) & tlck->lock;
1260	pxdlock->flag = mlckFREEPXD;
1261	pxdlock->pxd = freepxd;
1262	pxdlock->index = 1;
1263
1264	write_metapage(mp);
1265
1266	iplist[0] = ipimap;
1267
1268	/*
1269	 * logredo needs the IAG number and IAG extent index in order
1270	 * to ensure that the IMap is consistent.  The least disruptive
1271	 * way to pass these values through  to the transaction manager
1272	 * is in the iplist array.
1273	 *
1274	 * It's not pretty, but it works.
1275	 */
1276	iplist[1] = (struct inode *) (size_t)iagno;
1277	iplist[2] = (struct inode *) (size_t)extno;
1278
1279	rc = txCommit(tid, 1, &iplist[0], COMMIT_FORCE);
1280
1281	txEnd(tid);
1282	mutex_unlock(&JFS_IP(ipimap)->commit_mutex);
1283
1284	/* unlock the AG inode map information */
1285	AG_UNLOCK(imap, agno);
1286
1287	return (0);
1288
1289      error_out:
1290	IREAD_UNLOCK(ipimap);
1291
1292	if (amp)
1293		release_metapage(amp);
1294	if (bmp)
1295		release_metapage(bmp);
1296	if (cmp)
1297		release_metapage(cmp);
1298	if (dmp)
1299		release_metapage(dmp);
1300
1301	AG_UNLOCK(imap, agno);
1302
1303	release_metapage(mp);
1304
1305	return (rc);
1306}
1307
1308/*
1309 * There are several places in the diAlloc* routines where we initialize
1310 * the inode.
1311 */
1312static inline void
1313diInitInode(struct inode *ip, int iagno, int ino, int extno, struct iag * iagp)
1314{
1315	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
1316
1317	ip->i_ino = (iagno << L2INOSPERIAG) + ino;
1318	jfs_ip->ixpxd = iagp->inoext[extno];
1319	jfs_ip->agstart = le64_to_cpu(iagp->agstart);
1320	jfs_ip->active_ag = -1;
1321}
1322
1323
1324/*
1325 * NAME:	diAlloc(pip,dir,ip)
1326 *
1327 * FUNCTION:	allocate a disk inode from the inode working map
1328 *		for a fileset or aggregate.
1329 *
1330 * PARAMETERS:
1331 *	pip	- pointer to incore inode for the parent inode.
1332 *	dir	- 'true' if the new disk inode is for a directory.
1333 *	ip	- pointer to a new inode
1334 *
1335 * RETURN VALUES:
1336 *	0	- success.
1337 *	-ENOSPC	- insufficient disk resources.
1338 *	-EIO	- i/o error.
1339 */
1340int diAlloc(struct inode *pip, bool dir, struct inode *ip)
1341{
1342	int rc, ino, iagno, addext, extno, bitno, sword;
1343	int nwords, rem, i, agno;
1344	u32 mask, inosmap, extsmap;
1345	struct inode *ipimap;
1346	struct metapage *mp;
1347	ino_t inum;
1348	struct iag *iagp;
1349	struct inomap *imap;
1350
1351	/* get the pointers to the inode map inode and the
1352	 * corresponding imap control structure.
1353	 */
1354	ipimap = JFS_SBI(pip->i_sb)->ipimap;
1355	imap = JFS_IP(ipimap)->i_imap;
1356	JFS_IP(ip)->ipimap = ipimap;
1357	JFS_IP(ip)->fileset = FILESYSTEM_I;
1358
1359	/* for a directory, the allocation policy is to start
1360	 * at the ag level using the preferred ag.
1361	 */
1362	if (dir) {
1363		agno = dbNextAG(JFS_SBI(pip->i_sb)->ipbmap);
1364		AG_LOCK(imap, agno);
1365		goto tryag;
1366	}
1367
1368	/* for files, the policy starts off by trying to allocate from
1369	 * the same iag containing the parent disk inode:
1370	 * try to allocate the new disk inode close to the parent disk
1371	 * inode, using parent disk inode number + 1 as the allocation
1372	 * hint.  (we use a left-to-right policy to attempt to avoid
1373	 * moving backward on the disk.)  compute the hint within the
1374	 * file system and the iag.
1375	 */
1376
1377	/* get the ag number of this iag */
1378	agno = BLKTOAG(JFS_IP(pip)->agstart, JFS_SBI(pip->i_sb));
1379
1380	if (atomic_read(&JFS_SBI(pip->i_sb)->bmap->db_active[agno])) {
1381		/*
1382		 * There is an open file actively growing.  We want to
1383		 * allocate new inodes from a different ag to avoid
1384		 * fragmentation problems.
1385		 */
1386		agno = dbNextAG(JFS_SBI(pip->i_sb)->ipbmap);
1387		AG_LOCK(imap, agno);
1388		goto tryag;
1389	}
1390
1391	inum = pip->i_ino + 1;
1392	ino = inum & (INOSPERIAG - 1);
1393
1394	/* back off the hint if it is outside of the iag */
1395	if (ino == 0)
1396		inum = pip->i_ino;
1397
1398	/* lock the AG inode map information */
1399	AG_LOCK(imap, agno);
1400
1401	/* Get read lock on imap inode */
1402	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
1403
1404	/* get the iag number and read the iag */
1405	iagno = INOTOIAG(inum);
1406	if ((rc = diIAGRead(imap, iagno, &mp))) {
1407		IREAD_UNLOCK(ipimap);
1408		AG_UNLOCK(imap, agno);
1409		return (rc);
1410	}
1411	iagp = (struct iag *) mp->data;
1412
1413	/* determine if new inode extent is allowed to be added to the iag.
1414	 * new inode extent can be added to the iag if the ag
1415	 * has less than 32 free disk inodes and the iag has free extents.
1416	 */
1417	addext = (imap->im_agctl[agno].numfree < 32 && iagp->nfreeexts);
1418
1419	/*
1420	 *	try to allocate from the IAG
1421	 */
1422	/* check if the inode may be allocated from the iag
1423	 * (i.e. the inode has free inodes or new extent can be added).
1424	 */
1425	if (iagp->nfreeinos || addext) {
1426		/* determine the extent number of the hint.
1427		 */
1428		extno = ino >> L2INOSPEREXT;
1429
1430		/* check if the extent containing the hint has backed
1431		 * inodes.  if so, try to allocate within this extent.
1432		 */
1433		if (addressPXD(&iagp->inoext[extno])) {
1434			bitno = ino & (INOSPEREXT - 1);
1435			if ((bitno =
1436			     diFindFree(le32_to_cpu(iagp->wmap[extno]),
1437					bitno))
1438			    < INOSPEREXT) {
1439				ino = (extno << L2INOSPEREXT) + bitno;
1440
1441				/* a free inode (bit) was found within this
1442				 * extent, so allocate it.
1443				 */
1444				rc = diAllocBit(imap, iagp, ino);
1445				IREAD_UNLOCK(ipimap);
1446				if (rc) {
1447					assert(rc == -EIO);
1448				} else {
1449					/* set the results of the allocation
1450					 * and write the iag.
1451					 */
1452					diInitInode(ip, iagno, ino, extno,
1453						    iagp);
1454					mark_metapage_dirty(mp);
1455				}
1456				release_metapage(mp);
1457
1458				/* free the AG lock and return.
1459				 */
1460				AG_UNLOCK(imap, agno);
1461				return (rc);
1462			}
1463
1464			if (!addext)
1465				extno =
1466				    (extno ==
1467				     EXTSPERIAG - 1) ? 0 : extno + 1;
1468		}
1469
1470		/*
1471		 * no free inodes within the extent containing the hint.
1472		 *
1473		 * try to allocate from the backed extents following
1474		 * hint or, if appropriate (i.e. addext is true), allocate
1475		 * an extent of free inodes at or following the extent
1476		 * containing the hint.
1477		 *
1478		 * the free inode and free extent summary maps are used
1479		 * here, so determine the starting summary map position
1480		 * and the number of words we'll have to examine.  again,
1481		 * the approach is to allocate following the hint, so we
1482		 * might have to initially ignore prior bits of the summary
1483		 * map that represent extents prior to the extent containing
1484		 * the hint and later revisit these bits.
1485		 */
1486		bitno = extno & (EXTSPERSUM - 1);
1487		nwords = (bitno == 0) ? SMAPSZ : SMAPSZ + 1;
1488		sword = extno >> L2EXTSPERSUM;
1489
1490		/* mask any prior bits for the starting words of the
1491		 * summary map.
1492		 */
1493		mask = (bitno == 0) ? 0 : (ONES << (EXTSPERSUM - bitno));
1494		inosmap = le32_to_cpu(iagp->inosmap[sword]) | mask;
1495		extsmap = le32_to_cpu(iagp->extsmap[sword]) | mask;
1496
1497		/* scan the free inode and free extent summary maps for
1498		 * free resources.
1499		 */
1500		for (i = 0; i < nwords; i++) {
1501			/* check if this word of the free inode summary
1502			 * map describes an extent with free inodes.
1503			 */
1504			if (~inosmap) {
1505				/* an extent with free inodes has been
1506				 * found. determine the extent number
1507				 * and the inode number within the extent.
1508				 */
1509				rem = diFindFree(inosmap, 0);
1510				extno = (sword << L2EXTSPERSUM) + rem;
1511				rem = diFindFree(le32_to_cpu(iagp->wmap[extno]),
1512						 0);
1513				if (rem >= INOSPEREXT) {
1514					IREAD_UNLOCK(ipimap);
1515					release_metapage(mp);
1516					AG_UNLOCK(imap, agno);
1517					jfs_error(ip->i_sb,
1518						  "can't find free bit in wmap\n");
1519					return -EIO;
1520				}
1521
1522				/* determine the inode number within the
1523				 * iag and allocate the inode from the
1524				 * map.
1525				 */
1526				ino = (extno << L2INOSPEREXT) + rem;
1527				rc = diAllocBit(imap, iagp, ino);
1528				IREAD_UNLOCK(ipimap);
1529				if (rc)
1530					assert(rc == -EIO);
1531				else {
1532					/* set the results of the allocation
1533					 * and write the iag.
1534					 */
1535					diInitInode(ip, iagno, ino, extno,
1536						    iagp);
1537					mark_metapage_dirty(mp);
1538				}
1539				release_metapage(mp);
1540
1541				/* free the AG lock and return.
1542				 */
1543				AG_UNLOCK(imap, agno);
1544				return (rc);
1545
1546			}
1547
1548			/* check if we may allocate an extent of free
1549			 * inodes and whether this word of the free
1550			 * extents summary map describes a free extent.
1551			 */
1552			if (addext && ~extsmap) {
1553				/* a free extent has been found.  determine
1554				 * the extent number.
1555				 */
1556				rem = diFindFree(extsmap, 0);
1557				extno = (sword << L2EXTSPERSUM) + rem;
1558
1559				/* allocate an extent of free inodes.
1560				 */
1561				if ((rc = diNewExt(imap, iagp, extno))) {
1562					/* if there is no disk space for a
1563					 * new extent, try to allocate the
1564					 * disk inode from somewhere else.
1565					 */
1566					if (rc == -ENOSPC)
1567						break;
1568
1569					assert(rc == -EIO);
1570				} else {
1571					/* set the results of the allocation
1572					 * and write the iag.
1573					 */
1574					diInitInode(ip, iagno,
1575						    extno << L2INOSPEREXT,
1576						    extno, iagp);
1577					mark_metapage_dirty(mp);
1578				}
1579				release_metapage(mp);
1580				/* free the imap inode & the AG lock & return.
1581				 */
1582				IREAD_UNLOCK(ipimap);
1583				AG_UNLOCK(imap, agno);
1584				return (rc);
1585			}
1586
1587			/* move on to the next set of summary map words.
1588			 */
1589			sword = (sword == SMAPSZ - 1) ? 0 : sword + 1;
1590			inosmap = le32_to_cpu(iagp->inosmap[sword]);
1591			extsmap = le32_to_cpu(iagp->extsmap[sword]);
1592		}
1593	}
1594	/* unlock imap inode */
1595	IREAD_UNLOCK(ipimap);
1596
1597	/* nothing doing in this iag, so release it. */
1598	release_metapage(mp);
1599
1600      tryag:
1601	/*
1602	 * try to allocate anywhere within the same AG as the parent inode.
1603	 */
1604	rc = diAllocAG(imap, agno, dir, ip);
1605
1606	AG_UNLOCK(imap, agno);
1607
1608	if (rc != -ENOSPC)
1609		return (rc);
1610
1611	/*
1612	 * try to allocate in any AG.
1613	 */
1614	return (diAllocAny(imap, agno, dir, ip));
1615}
1616
1617
1618/*
1619 * NAME:	diAllocAG(imap,agno,dir,ip)
1620 *
1621 * FUNCTION:	allocate a disk inode from the allocation group.
1622 *
1623 *		this routine first determines if a new extent of free
1624 *		inodes should be added for the allocation group, with
1625 *		the current request satisfied from this extent. if this
1626 *		is the case, an attempt will be made to do just that.  if
1627 *		this attempt fails or it has been determined that a new
1628 *		extent should not be added, an attempt is made to satisfy
1629 *		the request by allocating an existing (backed) free inode
1630 *		from the allocation group.
1631 *
1632 * PRE CONDITION: Already have the AG lock for this AG.
1633 *
1634 * PARAMETERS:
1635 *	imap	- pointer to inode map control structure.
1636 *	agno	- allocation group to allocate from.
1637 *	dir	- 'true' if the new disk inode is for a directory.
1638 *	ip	- pointer to the new inode to be filled in on successful return
1639 *		  with the disk inode number allocated, its extent address
1640 *		  and the start of the ag.
1641 *
1642 * RETURN VALUES:
1643 *	0	- success.
1644 *	-ENOSPC	- insufficient disk resources.
1645 *	-EIO	- i/o error.
1646 */
1647static int
1648diAllocAG(struct inomap * imap, int agno, bool dir, struct inode *ip)
1649{
1650	int rc, addext, numfree, numinos;
1651
1652	/* get the number of free and the number of backed disk
1653	 * inodes currently within the ag.
1654	 */
1655	numfree = imap->im_agctl[agno].numfree;
1656	numinos = imap->im_agctl[agno].numinos;
1657
1658	if (numfree > numinos) {
1659		jfs_error(ip->i_sb, "numfree > numinos\n");
1660		return -EIO;
1661	}
1662
1663	/* determine if we should allocate a new extent of free inodes
1664	 * within the ag: for directory inodes, add a new extent
1665	 * if there are a small number of free inodes or number of free
1666	 * inodes is a small percentage of the number of backed inodes.
1667	 */
1668	if (dir)
1669		addext = (numfree < 64 ||
1670			  (numfree < 256
1671			   && ((numfree * 100) / numinos) <= 20));
1672	else
1673		addext = (numfree == 0);
1674
1675	/*
1676	 * try to allocate a new extent of free inodes.
1677	 */
1678	if (addext) {
1679		/* if free space is not available for this new extent, try
1680		 * below to allocate a free and existing (already backed)
1681		 * inode from the ag.
1682		 */
1683		if ((rc = diAllocExt(imap, agno, ip)) != -ENOSPC)
1684			return (rc);
1685	}
1686
1687	/*
1688	 * try to allocate an existing free inode from the ag.
1689	 */
1690	return (diAllocIno(imap, agno, ip));
1691}
1692
1693
1694/*
1695 * NAME:	diAllocAny(imap,agno,dir,iap)
1696 *
1697 * FUNCTION:	allocate a disk inode from any other allocation group.
1698 *
1699 *		this routine is called when an allocation attempt within
1700 *		the primary allocation group has failed. if attempts to
1701 *		allocate an inode from any allocation group other than the
1702 *		specified primary group.
1703 *
1704 * PARAMETERS:
1705 *	imap	- pointer to inode map control structure.
1706 *	agno	- primary allocation group (to avoid).
1707 *	dir	- 'true' if the new disk inode is for a directory.
1708 *	ip	- pointer to a new inode to be filled in on successful return
1709 *		  with the disk inode number allocated, its extent address
1710 *		  and the start of the ag.
1711 *
1712 * RETURN VALUES:
1713 *	0	- success.
1714 *	-ENOSPC	- insufficient disk resources.
1715 *	-EIO	- i/o error.
1716 */
1717static int
1718diAllocAny(struct inomap * imap, int agno, bool dir, struct inode *ip)
1719{
1720	int ag, rc;
1721	int maxag = JFS_SBI(imap->im_ipimap->i_sb)->bmap->db_maxag;
1722
1723
1724	/* try to allocate from the ags following agno up to
1725	 * the maximum ag number.
1726	 */
1727	for (ag = agno + 1; ag <= maxag; ag++) {
1728		AG_LOCK(imap, ag);
1729
1730		rc = diAllocAG(imap, ag, dir, ip);
1731
1732		AG_UNLOCK(imap, ag);
1733
1734		if (rc != -ENOSPC)
1735			return (rc);
1736	}
1737
1738	/* try to allocate from the ags in front of agno.
1739	 */
1740	for (ag = 0; ag < agno; ag++) {
1741		AG_LOCK(imap, ag);
1742
1743		rc = diAllocAG(imap, ag, dir, ip);
1744
1745		AG_UNLOCK(imap, ag);
1746
1747		if (rc != -ENOSPC)
1748			return (rc);
1749	}
1750
1751	/* no free disk inodes.
1752	 */
1753	return -ENOSPC;
1754}
1755
1756
1757/*
1758 * NAME:	diAllocIno(imap,agno,ip)
1759 *
1760 * FUNCTION:	allocate a disk inode from the allocation group's free
1761 *		inode list, returning an error if this free list is
1762 *		empty (i.e. no iags on the list).
1763 *
1764 *		allocation occurs from the first iag on the list using
1765 *		the iag's free inode summary map to find the leftmost
1766 *		free inode in the iag.
1767 *
1768 * PRE CONDITION: Already have AG lock for this AG.
1769 *
1770 * PARAMETERS:
1771 *	imap	- pointer to inode map control structure.
1772 *	agno	- allocation group.
1773 *	ip	- pointer to new inode to be filled in on successful return
1774 *		  with the disk inode number allocated, its extent address
1775 *		  and the start of the ag.
1776 *
1777 * RETURN VALUES:
1778 *	0	- success.
1779 *	-ENOSPC	- insufficient disk resources.
1780 *	-EIO	- i/o error.
1781 */
1782static int diAllocIno(struct inomap * imap, int agno, struct inode *ip)
1783{
1784	int iagno, ino, rc, rem, extno, sword;
1785	struct metapage *mp;
1786	struct iag *iagp;
1787
1788	/* check if there are iags on the ag's free inode list.
1789	 */
1790	if ((iagno = imap->im_agctl[agno].inofree) < 0)
1791		return -ENOSPC;
1792
1793	/* obtain read lock on imap inode */
1794	IREAD_LOCK(imap->im_ipimap, RDWRLOCK_IMAP);
1795
1796	/* read the iag at the head of the list.
1797	 */
1798	if ((rc = diIAGRead(imap, iagno, &mp))) {
1799		IREAD_UNLOCK(imap->im_ipimap);
1800		return (rc);
1801	}
1802	iagp = (struct iag *) mp->data;
1803
1804	/* better be free inodes in this iag if it is on the
1805	 * list.
1806	 */
1807	if (!iagp->nfreeinos) {
1808		IREAD_UNLOCK(imap->im_ipimap);
1809		release_metapage(mp);
1810		jfs_error(ip->i_sb, "nfreeinos = 0, but iag on freelist\n");
1811		return -EIO;
1812	}
1813
1814	/* scan the free inode summary map to find an extent
1815	 * with free inodes.
1816	 */
1817	for (sword = 0;; sword++) {
1818		if (sword >= SMAPSZ) {
1819			IREAD_UNLOCK(imap->im_ipimap);
1820			release_metapage(mp);
1821			jfs_error(ip->i_sb,
1822				  "free inode not found in summary map\n");
1823			return -EIO;
1824		}
1825
1826		if (~iagp->inosmap[sword])
1827			break;
1828	}
1829
1830	/* found a extent with free inodes. determine
1831	 * the extent number.
1832	 */
1833	rem = diFindFree(le32_to_cpu(iagp->inosmap[sword]), 0);
1834	if (rem >= EXTSPERSUM) {
1835		IREAD_UNLOCK(imap->im_ipimap);
1836		release_metapage(mp);
1837		jfs_error(ip->i_sb, "no free extent found\n");
1838		return -EIO;
1839	}
1840	extno = (sword << L2EXTSPERSUM) + rem;
1841
1842	/* find the first free inode in the extent.
1843	 */
1844	rem = diFindFree(le32_to_cpu(iagp->wmap[extno]), 0);
1845	if (rem >= INOSPEREXT) {
1846		IREAD_UNLOCK(imap->im_ipimap);
1847		release_metapage(mp);
1848		jfs_error(ip->i_sb, "free inode not found\n");
1849		return -EIO;
1850	}
1851
1852	/* compute the inode number within the iag.
1853	 */
1854	ino = (extno << L2INOSPEREXT) + rem;
1855
1856	/* allocate the inode.
1857	 */
1858	rc = diAllocBit(imap, iagp, ino);
1859	IREAD_UNLOCK(imap->im_ipimap);
1860	if (rc) {
1861		release_metapage(mp);
1862		return (rc);
1863	}
1864
1865	/* set the results of the allocation and write the iag.
1866	 */
1867	diInitInode(ip, iagno, ino, extno, iagp);
1868	write_metapage(mp);
1869
1870	return (0);
1871}
1872
1873
1874/*
1875 * NAME:	diAllocExt(imap,agno,ip)
1876 *
1877 * FUNCTION:	add a new extent of free inodes to an iag, allocating
1878 *		an inode from this extent to satisfy the current allocation
1879 *		request.
1880 *
1881 *		this routine first tries to find an existing iag with free
1882 *		extents through the ag free extent list.  if list is not
1883 *		empty, the head of the list will be selected as the home
1884 *		of the new extent of free inodes.  otherwise (the list is
1885 *		empty), a new iag will be allocated for the ag to contain
1886 *		the extent.
1887 *
1888 *		once an iag has been selected, the free extent summary map
1889 *		is used to locate a free extent within the iag and diNewExt()
1890 *		is called to initialize the extent, with initialization
1891 *		including the allocation of the first inode of the extent
1892 *		for the purpose of satisfying this request.
1893 *
1894 * PARAMETERS:
1895 *	imap	- pointer to inode map control structure.
1896 *	agno	- allocation group number.
1897 *	ip	- pointer to new inode to be filled in on successful return
1898 *		  with the disk inode number allocated, its extent address
1899 *		  and the start of the ag.
1900 *
1901 * RETURN VALUES:
1902 *	0	- success.
1903 *	-ENOSPC	- insufficient disk resources.
1904 *	-EIO	- i/o error.
1905 */
1906static int diAllocExt(struct inomap * imap, int agno, struct inode *ip)
1907{
1908	int rem, iagno, sword, extno, rc;
1909	struct metapage *mp;
1910	struct iag *iagp;
1911
1912	/* check if the ag has any iags with free extents.  if not,
1913	 * allocate a new iag for the ag.
1914	 */
1915	if ((iagno = imap->im_agctl[agno].extfree) < 0) {
1916		/* If successful, diNewIAG will obtain the read lock on the
1917		 * imap inode.
1918		 */
1919		if ((rc = diNewIAG(imap, &iagno, agno, &mp))) {
1920			return (rc);
1921		}
1922		iagp = (struct iag *) mp->data;
1923
1924		/* set the ag number if this a brand new iag
1925		 */
1926		iagp->agstart =
1927		    cpu_to_le64(AGTOBLK(agno, imap->im_ipimap));
1928	} else {
1929		/* read the iag.
1930		 */
1931		IREAD_LOCK(imap->im_ipimap, RDWRLOCK_IMAP);
1932		if ((rc = diIAGRead(imap, iagno, &mp))) {
1933			IREAD_UNLOCK(imap->im_ipimap);
1934			jfs_error(ip->i_sb, "error reading iag\n");
1935			return rc;
1936		}
1937		iagp = (struct iag *) mp->data;
1938	}
1939
1940	/* using the free extent summary map, find a free extent.
1941	 */
1942	for (sword = 0;; sword++) {
1943		if (sword >= SMAPSZ) {
1944			release_metapage(mp);
1945			IREAD_UNLOCK(imap->im_ipimap);
1946			jfs_error(ip->i_sb, "free ext summary map not found\n");
1947			return -EIO;
1948		}
1949		if (~iagp->extsmap[sword])
1950			break;
1951	}
1952
1953	/* determine the extent number of the free extent.
1954	 */
1955	rem = diFindFree(le32_to_cpu(iagp->extsmap[sword]), 0);
1956	if (rem >= EXTSPERSUM) {
1957		release_metapage(mp);
1958		IREAD_UNLOCK(imap->im_ipimap);
1959		jfs_error(ip->i_sb, "free extent not found\n");
1960		return -EIO;
1961	}
1962	extno = (sword << L2EXTSPERSUM) + rem;
1963
1964	/* initialize the new extent.
1965	 */
1966	rc = diNewExt(imap, iagp, extno);
1967	IREAD_UNLOCK(imap->im_ipimap);
1968	if (rc) {
1969		/* something bad happened.  if a new iag was allocated,
1970		 * place it back on the inode map's iag free list, and
1971		 * clear the ag number information.
1972		 */
1973		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG)) {
1974			IAGFREE_LOCK(imap);
1975			iagp->iagfree = cpu_to_le32(imap->im_freeiag);
1976			imap->im_freeiag = iagno;
1977			IAGFREE_UNLOCK(imap);
1978		}
1979		write_metapage(mp);
1980		return (rc);
1981	}
1982
1983	/* set the results of the allocation and write the iag.
1984	 */
1985	diInitInode(ip, iagno, extno << L2INOSPEREXT, extno, iagp);
1986
1987	write_metapage(mp);
1988
1989	return (0);
1990}
1991
1992
1993/*
1994 * NAME:	diAllocBit(imap,iagp,ino)
1995 *
1996 * FUNCTION:	allocate a backed inode from an iag.
1997 *
1998 *		this routine performs the mechanics of allocating a
1999 *		specified inode from a backed extent.
2000 *
2001 *		if the inode to be allocated represents the last free
2002 *		inode within the iag, the iag will be removed from the
2003 *		ag free inode list.
2004 *
2005 *		a careful update approach is used to provide consistency
2006 *		in the face of updates to multiple buffers.  under this
2007 *		approach, all required buffers are obtained before making
2008 *		any updates and are held all are updates are complete.
2009 *
2010 * PRE CONDITION: Already have buffer lock on iagp.  Already have AG lock on
2011 *	this AG.  Must have read lock on imap inode.
2012 *
2013 * PARAMETERS:
2014 *	imap	- pointer to inode map control structure.
2015 *	iagp	- pointer to iag.
2016 *	ino	- inode number to be allocated within the iag.
2017 *
2018 * RETURN VALUES:
2019 *	0	- success.
2020 *	-ENOSPC	- insufficient disk resources.
2021 *	-EIO	- i/o error.
2022 */
2023static int diAllocBit(struct inomap * imap, struct iag * iagp, int ino)
2024{
2025	int extno, bitno, agno, sword, rc;
2026	struct metapage *amp = NULL, *bmp = NULL;
2027	struct iag *aiagp = NULL, *biagp = NULL;
2028	u32 mask;
2029
2030	/* check if this is the last free inode within the iag.
2031	 * if so, it will have to be removed from the ag free
2032	 * inode list, so get the iags preceding and following
2033	 * it on the list.
2034	 */
2035	if (iagp->nfreeinos == cpu_to_le32(1)) {
2036		if ((int) le32_to_cpu(iagp->inofreefwd) >= 0) {
2037			if ((rc =
2038			     diIAGRead(imap, le32_to_cpu(iagp->inofreefwd),
2039				       &amp)))
2040				return (rc);
2041			aiagp = (struct iag *) amp->data;
2042		}
2043
2044		if ((int) le32_to_cpu(iagp->inofreeback) >= 0) {
2045			if ((rc =
2046			     diIAGRead(imap,
2047				       le32_to_cpu(iagp->inofreeback),
2048				       &bmp))) {
2049				if (amp)
2050					release_metapage(amp);
2051				return (rc);
2052			}
2053			biagp = (struct iag *) bmp->data;
2054		}
2055	}
2056
2057	/* get the ag number, extent number, inode number within
2058	 * the extent.
2059	 */
2060	agno = BLKTOAG(le64_to_cpu(iagp->agstart), JFS_SBI(imap->im_ipimap->i_sb));
2061	extno = ino >> L2INOSPEREXT;
2062	bitno = ino & (INOSPEREXT - 1);
2063
2064	/* compute the mask for setting the map.
2065	 */
2066	mask = HIGHORDER >> bitno;
2067
2068	/* the inode should be free and backed.
2069	 */
2070	if (((le32_to_cpu(iagp->pmap[extno]) & mask) != 0) ||
2071	    ((le32_to_cpu(iagp->wmap[extno]) & mask) != 0) ||
2072	    (addressPXD(&iagp->inoext[extno]) == 0)) {
2073		if (amp)
2074			release_metapage(amp);
2075		if (bmp)
2076			release_metapage(bmp);
2077
2078		jfs_error(imap->im_ipimap->i_sb, "iag inconsistent\n");
2079		return -EIO;
2080	}
2081
2082	/* mark the inode as allocated in the working map.
2083	 */
2084	iagp->wmap[extno] |= cpu_to_le32(mask);
2085
2086	/* check if all inodes within the extent are now
2087	 * allocated.  if so, update the free inode summary
2088	 * map to reflect this.
2089	 */
2090	if (iagp->wmap[extno] == cpu_to_le32(ONES)) {
2091		sword = extno >> L2EXTSPERSUM;
2092		bitno = extno & (EXTSPERSUM - 1);
2093		iagp->inosmap[sword] |= cpu_to_le32(HIGHORDER >> bitno);
2094	}
2095
2096	/* if this was the last free inode in the iag, remove the
2097	 * iag from the ag free inode list.
2098	 */
2099	if (iagp->nfreeinos == cpu_to_le32(1)) {
2100		if (amp) {
2101			aiagp->inofreeback = iagp->inofreeback;
2102			write_metapage(amp);
2103		}
2104
2105		if (bmp) {
2106			biagp->inofreefwd = iagp->inofreefwd;
2107			write_metapage(bmp);
2108		} else {
2109			imap->im_agctl[agno].inofree =
2110			    le32_to_cpu(iagp->inofreefwd);
2111		}
2112		iagp->inofreefwd = iagp->inofreeback = cpu_to_le32(-1);
2113	}
2114
2115	/* update the free inode count at the iag, ag, inode
2116	 * map levels.
2117	 */
2118	le32_add_cpu(&iagp->nfreeinos, -1);
2119	imap->im_agctl[agno].numfree -= 1;
2120	atomic_dec(&imap->im_numfree);
2121
2122	return (0);
2123}
2124
2125
2126/*
2127 * NAME:	diNewExt(imap,iagp,extno)
2128 *
2129 * FUNCTION:	initialize a new extent of inodes for an iag, allocating
2130 *		the first inode of the extent for use for the current
2131 *		allocation request.
2132 *
2133 *		disk resources are allocated for the new extent of inodes
2134 *		and the inodes themselves are initialized to reflect their
2135 *		existence within the extent (i.e. their inode numbers and
2136 *		inode extent addresses are set) and their initial state
2137 *		(mode and link count are set to zero).
2138 *
2139 *		if the iag is new, it is not yet on an ag extent free list
2140 *		but will now be placed on this list.
2141 *
2142 *		if the allocation of the new extent causes the iag to
2143 *		have no free extent, the iag will be removed from the
2144 *		ag extent free list.
2145 *
2146 *		if the iag has no free backed inodes, it will be placed
2147 *		on the ag free inode list, since the addition of the new
2148 *		extent will now cause it to have free inodes.
2149 *
2150 *		a careful update approach is used to provide consistency
2151 *		(i.e. list consistency) in the face of updates to multiple
2152 *		buffers.  under this approach, all required buffers are
2153 *		obtained before making any updates and are held until all
2154 *		updates are complete.
2155 *
2156 * PRE CONDITION: Already have buffer lock on iagp.  Already have AG lock on
2157 *	this AG.  Must have read lock on imap inode.
2158 *
2159 * PARAMETERS:
2160 *	imap	- pointer to inode map control structure.
2161 *	iagp	- pointer to iag.
2162 *	extno	- extent number.
2163 *
2164 * RETURN VALUES:
2165 *	0	- success.
2166 *	-ENOSPC	- insufficient disk resources.
2167 *	-EIO	- i/o error.
2168 */
2169static int diNewExt(struct inomap * imap, struct iag * iagp, int extno)
2170{
2171	int agno, iagno, fwd, back, freei = 0, sword, rc;
2172	struct iag *aiagp = NULL, *biagp = NULL, *ciagp = NULL;
2173	struct metapage *amp, *bmp, *cmp, *dmp;
2174	struct inode *ipimap;
2175	s64 blkno, hint;
2176	int i, j;
2177	u32 mask;
2178	ino_t ino;
2179	struct dinode *dp;
2180	struct jfs_sb_info *sbi;
2181
2182	/* better have free extents.
2183	 */
2184	if (!iagp->nfreeexts) {
2185		jfs_error(imap->im_ipimap->i_sb, "no free extents\n");
2186		return -EIO;
2187	}
2188
2189	/* get the inode map inode.
2190	 */
2191	ipimap = imap->im_ipimap;
2192	sbi = JFS_SBI(ipimap->i_sb);
2193
2194	amp = bmp = cmp = NULL;
2195
2196	/* get the ag and iag numbers for this iag.
2197	 */
2198	agno = BLKTOAG(le64_to_cpu(iagp->agstart), sbi);
2199	iagno = le32_to_cpu(iagp->iagnum);
2200
2201	/* check if this is the last free extent within the
2202	 * iag.  if so, the iag must be removed from the ag
2203	 * free extent list, so get the iags preceding and
2204	 * following the iag on this list.
2205	 */
2206	if (iagp->nfreeexts == cpu_to_le32(1)) {
2207		if ((fwd = le32_to_cpu(iagp->extfreefwd)) >= 0) {
2208			if ((rc = diIAGRead(imap, fwd, &amp)))
2209				return (rc);
2210			aiagp = (struct iag *) amp->data;
2211		}
2212
2213		if ((back = le32_to_cpu(iagp->extfreeback)) >= 0) {
2214			if ((rc = diIAGRead(imap, back, &bmp)))
2215				goto error_out;
2216			biagp = (struct iag *) bmp->data;
2217		}
2218	} else {
2219		/* the iag has free extents.  if all extents are free
2220		 * (as is the case for a newly allocated iag), the iag
2221		 * must be added to the ag free extent list, so get
2222		 * the iag at the head of the list in preparation for
2223		 * adding this iag to this list.
2224		 */
2225		fwd = back = -1;
2226		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG)) {
2227			if ((fwd = imap->im_agctl[agno].extfree) >= 0) {
2228				if ((rc = diIAGRead(imap, fwd, &amp)))
2229					goto error_out;
2230				aiagp = (struct iag *) amp->data;
2231			}
2232		}
2233	}
2234
2235	/* check if the iag has no free inodes.  if so, the iag
2236	 * will have to be added to the ag free inode list, so get
2237	 * the iag at the head of the list in preparation for
2238	 * adding this iag to this list.  in doing this, we must
2239	 * check if we already have the iag at the head of
2240	 * the list in hand.
2241	 */
2242	if (iagp->nfreeinos == 0) {
2243		freei = imap->im_agctl[agno].inofree;
2244
2245		if (freei >= 0) {
2246			if (freei == fwd) {
2247				ciagp = aiagp;
2248			} else if (freei == back) {
2249				ciagp = biagp;
2250			} else {
2251				if ((rc = diIAGRead(imap, freei, &cmp)))
2252					goto error_out;
2253				ciagp = (struct iag *) cmp->data;
2254			}
2255			if (ciagp == NULL) {
2256				jfs_error(imap->im_ipimap->i_sb,
2257					  "ciagp == NULL\n");
2258				rc = -EIO;
2259				goto error_out;
2260			}
2261		}
2262	}
2263
2264	/* allocate disk space for the inode extent.
2265	 */
2266	if ((extno == 0) || (addressPXD(&iagp->inoext[extno - 1]) == 0))
2267		hint = ((s64) agno << sbi->bmap->db_agl2size) - 1;
2268	else
2269		hint = addressPXD(&iagp->inoext[extno - 1]) +
2270		    lengthPXD(&iagp->inoext[extno - 1]) - 1;
2271
2272	if ((rc = dbAlloc(ipimap, hint, (s64) imap->im_nbperiext, &blkno)))
2273		goto error_out;
2274
2275	/* compute the inode number of the first inode within the
2276	 * extent.
2277	 */
2278	ino = (iagno << L2INOSPERIAG) + (extno << L2INOSPEREXT);
2279
2280	/* initialize the inodes within the newly allocated extent a
2281	 * page at a time.
2282	 */
2283	for (i = 0; i < imap->im_nbperiext; i += sbi->nbperpage) {
2284		/* get a buffer for this page of disk inodes.
2285		 */
2286		dmp = get_metapage(ipimap, blkno + i, PSIZE, 1);
2287		if (dmp == NULL) {
2288			rc = -EIO;
2289			goto error_out;
2290		}
2291		dp = (struct dinode *) dmp->data;
2292
2293		/* initialize the inode number, mode, link count and
2294		 * inode extent address.
2295		 */
2296		for (j = 0; j < INOSPERPAGE; j++, dp++, ino++) {
2297			dp->di_inostamp = cpu_to_le32(sbi->inostamp);
2298			dp->di_number = cpu_to_le32(ino);
2299			dp->di_fileset = cpu_to_le32(FILESYSTEM_I);
2300			dp->di_mode = 0;
2301			dp->di_nlink = 0;
2302			PXDaddress(&(dp->di_ixpxd), blkno);
2303			PXDlength(&(dp->di_ixpxd), imap->im_nbperiext);
2304		}
2305		write_metapage(dmp);
2306	}
2307
2308	/* if this is the last free extent within the iag, remove the
2309	 * iag from the ag free extent list.
2310	 */
2311	if (iagp->nfreeexts == cpu_to_le32(1)) {
2312		if (fwd >= 0)
2313			aiagp->extfreeback = iagp->extfreeback;
2314
2315		if (back >= 0)
2316			biagp->extfreefwd = iagp->extfreefwd;
2317		else
2318			imap->im_agctl[agno].extfree =
2319			    le32_to_cpu(iagp->extfreefwd);
2320
2321		iagp->extfreefwd = iagp->extfreeback = cpu_to_le32(-1);
2322	} else {
2323		/* if the iag has all free extents (newly allocated iag),
2324		 * add the iag to the ag free extent list.
2325		 */
2326		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG)) {
2327			if (fwd >= 0)
2328				aiagp->extfreeback = cpu_to_le32(iagno);
2329
2330			iagp->extfreefwd = cpu_to_le32(fwd);
2331			iagp->extfreeback = cpu_to_le32(-1);
2332			imap->im_agctl[agno].extfree = iagno;
2333		}
2334	}
2335
2336	/* if the iag has no free inodes, add the iag to the
2337	 * ag free inode list.
2338	 */
2339	if (iagp->nfreeinos == 0) {
2340		if (freei >= 0)
2341			ciagp->inofreeback = cpu_to_le32(iagno);
2342
2343		iagp->inofreefwd =
2344		    cpu_to_le32(imap->im_agctl[agno].inofree);
2345		iagp->inofreeback = cpu_to_le32(-1);
2346		imap->im_agctl[agno].inofree = iagno;
2347	}
2348
2349	/* initialize the extent descriptor of the extent. */
2350	PXDlength(&iagp->inoext[extno], imap->im_nbperiext);
2351	PXDaddress(&iagp->inoext[extno], blkno);
2352
2353	/* initialize the working and persistent map of the extent.
2354	 * the working map will be initialized such that
2355	 * it indicates the first inode of the extent is allocated.
2356	 */
2357	iagp->wmap[extno] = cpu_to_le32(HIGHORDER);
2358	iagp->pmap[extno] = 0;
2359
2360	/* update the free inode and free extent summary maps
2361	 * for the extent to indicate the extent has free inodes
2362	 * and no longer represents a free extent.
2363	 */
2364	sword = extno >> L2EXTSPERSUM;
2365	mask = HIGHORDER >> (extno & (EXTSPERSUM - 1));
2366	iagp->extsmap[sword] |= cpu_to_le32(mask);
2367	iagp->inosmap[sword] &= cpu_to_le32(~mask);
2368
2369	/* update the free inode and free extent counts for the
2370	 * iag.
2371	 */
2372	le32_add_cpu(&iagp->nfreeinos, (INOSPEREXT - 1));
2373	le32_add_cpu(&iagp->nfreeexts, -1);
2374
2375	/* update the free and backed inode counts for the ag.
2376	 */
2377	imap->im_agctl[agno].numfree += (INOSPEREXT - 1);
2378	imap->im_agctl[agno].numinos += INOSPEREXT;
2379
2380	/* update the free and backed inode counts for the inode map.
2381	 */
2382	atomic_add(INOSPEREXT - 1, &imap->im_numfree);
2383	atomic_add(INOSPEREXT, &imap->im_numinos);
2384
2385	/* write the iags.
2386	 */
2387	if (amp)
2388		write_metapage(amp);
2389	if (bmp)
2390		write_metapage(bmp);
2391	if (cmp)
2392		write_metapage(cmp);
2393
2394	return (0);
2395
2396      error_out:
2397
2398	/* release the iags.
2399	 */
2400	if (amp)
2401		release_metapage(amp);
2402	if (bmp)
2403		release_metapage(bmp);
2404	if (cmp)
2405		release_metapage(cmp);
2406
2407	return (rc);
2408}
2409
2410
2411/*
2412 * NAME:	diNewIAG(imap,iagnop,agno)
2413 *
2414 * FUNCTION:	allocate a new iag for an allocation group.
2415 *
2416 *		first tries to allocate the iag from the inode map
2417 *		iagfree list:
2418 *		if the list has free iags, the head of the list is removed
2419 *		and returned to satisfy the request.
2420 *		if the inode map's iag free list is empty, the inode map
2421 *		is extended to hold a new iag. this new iag is initialized
2422 *		and returned to satisfy the request.
2423 *
2424 * PARAMETERS:
2425 *	imap	- pointer to inode map control structure.
2426 *	iagnop	- pointer to an iag number set with the number of the
2427 *		  newly allocated iag upon successful return.
2428 *	agno	- allocation group number.
2429 *	bpp	- Buffer pointer to be filled in with new IAG's buffer
2430 *
2431 * RETURN VALUES:
2432 *	0	- success.
2433 *	-ENOSPC	- insufficient disk resources.
2434 *	-EIO	- i/o error.
2435 *
2436 * serialization:
2437 *	AG lock held on entry/exit;
2438 *	write lock on the map is held inside;
2439 *	read lock on the map is held on successful completion;
2440 *
2441 * note: new iag transaction:
2442 * . synchronously write iag;
2443 * . write log of xtree and inode of imap;
2444 * . commit;
2445 * . synchronous write of xtree (right to left, bottom to top);
2446 * . at start of logredo(): init in-memory imap with one additional iag page;
2447 * . at end of logredo(): re-read imap inode to determine
2448 *   new imap size;
2449 */
2450static int
2451diNewIAG(struct inomap * imap, int *iagnop, int agno, struct metapage ** mpp)
2452{
2453	int rc;
2454	int iagno, i, xlen;
2455	struct inode *ipimap;
2456	struct super_block *sb;
2457	struct jfs_sb_info *sbi;
2458	struct metapage *mp;
2459	struct iag *iagp;
2460	s64 xaddr = 0;
2461	s64 blkno;
2462	tid_t tid;
2463	struct inode *iplist[1];
2464
2465	/* pick up pointers to the inode map and mount inodes */
2466	ipimap = imap->im_ipimap;
2467	sb = ipimap->i_sb;
2468	sbi = JFS_SBI(sb);
2469
2470	/* acquire the free iag lock */
2471	IAGFREE_LOCK(imap);
2472
2473	/* if there are any iags on the inode map free iag list,
2474	 * allocate the iag from the head of the list.
2475	 */
2476	if (imap->im_freeiag >= 0) {
2477		/* pick up the iag number at the head of the list */
2478		iagno = imap->im_freeiag;
2479
2480		/* determine the logical block number of the iag */
2481		blkno = IAGTOLBLK(iagno, sbi->l2nbperpage);
2482	} else {
2483		/* no free iags. the inode map will have to be extented
2484		 * to include a new iag.
2485		 */
2486
2487		/* acquire inode map lock */
2488		IWRITE_LOCK(ipimap, RDWRLOCK_IMAP);
2489
2490		if (ipimap->i_size >> L2PSIZE != imap->im_nextiag + 1) {
2491			IWRITE_UNLOCK(ipimap);
2492			IAGFREE_UNLOCK(imap);
2493			jfs_error(imap->im_ipimap->i_sb,
2494				  "ipimap->i_size is wrong\n");
2495			return -EIO;
2496		}
2497
2498
2499		/* get the next available iag number */
2500		iagno = imap->im_nextiag;
2501
2502		/* make sure that we have not exceeded the maximum inode
2503		 * number limit.
2504		 */
2505		if (iagno > (MAXIAGS - 1)) {
2506			/* release the inode map lock */
2507			IWRITE_UNLOCK(ipimap);
2508
2509			rc = -ENOSPC;
2510			goto out;
2511		}
2512
2513		/*
2514		 * synchronously append new iag page.
2515		 */
2516		/* determine the logical address of iag page to append */
2517		blkno = IAGTOLBLK(iagno, sbi->l2nbperpage);
2518
2519		/* Allocate extent for new iag page */
2520		xlen = sbi->nbperpage;
2521		if ((rc = dbAlloc(ipimap, 0, (s64) xlen, &xaddr))) {
2522			/* release the inode map lock */
2523			IWRITE_UNLOCK(ipimap);
2524
2525			goto out;
2526		}
2527
2528		/*
2529		 * start transaction of update of the inode map
2530		 * addressing structure pointing to the new iag page;
2531		 */
2532		tid = txBegin(sb, COMMIT_FORCE);
2533		mutex_lock(&JFS_IP(ipimap)->commit_mutex);
2534
2535		/* update the inode map addressing structure to point to it */
2536		if ((rc =
2537		     xtInsert(tid, ipimap, 0, blkno, xlen, &xaddr, 0))) {
2538			txEnd(tid);
2539			mutex_unlock(&JFS_IP(ipimap)->commit_mutex);
2540			/* Free the blocks allocated for the iag since it was
2541			 * not successfully added to the inode map
2542			 */
2543			dbFree(ipimap, xaddr, (s64) xlen);
2544
2545			/* release the inode map lock */
2546			IWRITE_UNLOCK(ipimap);
2547
2548			goto out;
2549		}
2550
2551		/* update the inode map's inode to reflect the extension */
2552		ipimap->i_size += PSIZE;
2553		inode_add_bytes(ipimap, PSIZE);
2554
2555		/* assign a buffer for the page */
2556		mp = get_metapage(ipimap, blkno, PSIZE, 0);
2557		if (!mp) {
2558			/*
2559			 * This is very unlikely since we just created the
2560			 * extent, but let's try to handle it correctly
2561			 */
2562			xtTruncate(tid, ipimap, ipimap->i_size - PSIZE,
2563				   COMMIT_PWMAP);
2564
2565			txAbort(tid, 0);
2566			txEnd(tid);
2567			mutex_unlock(&JFS_IP(ipimap)->commit_mutex);
2568
2569			/* release the inode map lock */
2570			IWRITE_UNLOCK(ipimap);
2571
2572			rc = -EIO;
2573			goto out;
2574		}
2575		iagp = (struct iag *) mp->data;
2576
2577		/* init the iag */
2578		memset(iagp, 0, sizeof(struct iag));
2579		iagp->iagnum = cpu_to_le32(iagno);
2580		iagp->inofreefwd = iagp->inofreeback = cpu_to_le32(-1);
2581		iagp->extfreefwd = iagp->extfreeback = cpu_to_le32(-1);
2582		iagp->iagfree = cpu_to_le32(-1);
2583		iagp->nfreeinos = 0;
2584		iagp->nfreeexts = cpu_to_le32(EXTSPERIAG);
2585
2586		/* initialize the free inode summary map (free extent
2587		 * summary map initialization handled by bzero).
2588		 */
2589		for (i = 0; i < SMAPSZ; i++)
2590			iagp->inosmap[i] = cpu_to_le32(ONES);
2591
2592		/*
2593		 * Write and sync the metapage
2594		 */
2595		flush_metapage(mp);
2596
2597		/*
2598		 * txCommit(COMMIT_FORCE) will synchronously write address
2599		 * index pages and inode after commit in careful update order
2600		 * of address index pages (right to left, bottom up);
2601		 */
2602		iplist[0] = ipimap;
2603		rc = txCommit(tid, 1, &iplist[0], COMMIT_FORCE);
2604
2605		txEnd(tid);
2606		mutex_unlock(&JFS_IP(ipimap)->commit_mutex);
2607
2608		duplicateIXtree(sb, blkno, xlen, &xaddr);
2609
2610		/* update the next available iag number */
2611		imap->im_nextiag += 1;
2612
2613		/* Add the iag to the iag free list so we don't lose the iag
2614		 * if a failure happens now.
2615		 */
2616		imap->im_freeiag = iagno;
2617
2618		/* Until we have logredo working, we want the imap inode &
2619		 * control page to be up to date.
2620		 */
2621		diSync(ipimap);
2622
2623		/* release the inode map lock */
2624		IWRITE_UNLOCK(ipimap);
2625	}
2626
2627	/* obtain read lock on map */
2628	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
2629
2630	/* read the iag */
2631	if ((rc = diIAGRead(imap, iagno, &mp))) {
2632		IREAD_UNLOCK(ipimap);
2633		rc = -EIO;
2634		goto out;
2635	}
2636	iagp = (struct iag *) mp->data;
2637
2638	/* remove the iag from the iag free list */
2639	imap->im_freeiag = le32_to_cpu(iagp->iagfree);
2640	iagp->iagfree = cpu_to_le32(-1);
2641
2642	/* set the return iag number and buffer pointer */
2643	*iagnop = iagno;
2644	*mpp = mp;
2645
2646      out:
2647	/* release the iag free lock */
2648	IAGFREE_UNLOCK(imap);
2649
2650	return (rc);
2651}
2652
2653/*
2654 * NAME:	diIAGRead()
2655 *
2656 * FUNCTION:	get the buffer for the specified iag within a fileset
2657 *		or aggregate inode map.
2658 *
2659 * PARAMETERS:
2660 *	imap	- pointer to inode map control structure.
2661 *	iagno	- iag number.
2662 *	bpp	- point to buffer pointer to be filled in on successful
2663 *		  exit.
2664 *
2665 * SERIALIZATION:
2666 *	must have read lock on imap inode
2667 *	(When called by diExtendFS, the filesystem is quiesced, therefore
2668 *	 the read lock is unnecessary.)
2669 *
2670 * RETURN VALUES:
2671 *	0	- success.
2672 *	-EIO	- i/o error.
2673 */
2674static int diIAGRead(struct inomap * imap, int iagno, struct metapage ** mpp)
2675{
2676	struct inode *ipimap = imap->im_ipimap;
2677	s64 blkno;
2678
2679	/* compute the logical block number of the iag. */
2680	blkno = IAGTOLBLK(iagno, JFS_SBI(ipimap->i_sb)->l2nbperpage);
2681
2682	/* read the iag. */
2683	*mpp = read_metapage(ipimap, blkno, PSIZE, 0);
2684	if (*mpp == NULL) {
2685		return -EIO;
2686	}
2687
2688	return (0);
2689}
2690
2691/*
2692 * NAME:	diFindFree()
2693 *
2694 * FUNCTION:	find the first free bit in a word starting at
2695 *		the specified bit position.
2696 *
2697 * PARAMETERS:
2698 *	word	- word to be examined.
2699 *	start	- starting bit position.
2700 *
2701 * RETURN VALUES:
2702 *	bit position of first free bit in the word or 32 if
2703 *	no free bits were found.
2704 */
2705static int diFindFree(u32 word, int start)
2706{
2707	int bitno;
2708	assert(start < 32);
2709	/* scan the word for the first free bit. */
2710	for (word <<= start, bitno = start; bitno < 32;
2711	     bitno++, word <<= 1) {
2712		if ((word & HIGHORDER) == 0)
2713			break;
2714	}
2715	return (bitno);
2716}
2717
2718/*
2719 * NAME:	diUpdatePMap()
2720 *
2721 * FUNCTION: Update the persistent map in an IAG for the allocation or
2722 *	freeing of the specified inode.
2723 *
2724 * PRE CONDITIONS: Working map has already been updated for allocate.
2725 *
2726 * PARAMETERS:
2727 *	ipimap	- Incore inode map inode
2728 *	inum	- Number of inode to mark in permanent map
2729 *	is_free	- If 'true' indicates inode should be marked freed, otherwise
2730 *		  indicates inode should be marked allocated.
2731 *
2732 * RETURN VALUES:
2733 *		0 for success
2734 */
2735int
2736diUpdatePMap(struct inode *ipimap,
2737	     unsigned long inum, bool is_free, struct tblock * tblk)
2738{
2739	int rc;
2740	struct iag *iagp;
2741	struct metapage *mp;
2742	int iagno, ino, extno, bitno;
2743	struct inomap *imap;
2744	u32 mask;
2745	struct jfs_log *log;
2746	int lsn, difft, diffp;
2747	unsigned long flags;
2748
2749	imap = JFS_IP(ipimap)->i_imap;
2750	/* get the iag number containing the inode */
2751	iagno = INOTOIAG(inum);
2752	/* make sure that the iag is contained within the map */
2753	if (iagno >= imap->im_nextiag) {
2754		jfs_error(ipimap->i_sb, "the iag is outside the map\n");
2755		return -EIO;
2756	}
2757	/* read the iag */
2758	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
2759	rc = diIAGRead(imap, iagno, &mp);
2760	IREAD_UNLOCK(ipimap);
2761	if (rc)
2762		return (rc);
2763	metapage_wait_for_io(mp);
2764	iagp = (struct iag *) mp->data;
2765	/* get the inode number and extent number of the inode within
2766	 * the iag and the inode number within the extent.
2767	 */
2768	ino = inum & (INOSPERIAG - 1);
2769	extno = ino >> L2INOSPEREXT;
2770	bitno = ino & (INOSPEREXT - 1);
2771	mask = HIGHORDER >> bitno;
2772	/*
2773	 * mark the inode free in persistent map:
2774	 */
2775	if (is_free) {
2776		/* The inode should have been allocated both in working
2777		 * map and in persistent map;
2778		 * the inode will be freed from working map at the release
2779		 * of last reference release;
2780		 */
2781		if (!(le32_to_cpu(iagp->wmap[extno]) & mask)) {
2782			jfs_error(ipimap->i_sb,
2783				  "inode %ld not marked as allocated in wmap!\n",
2784				  inum);
2785		}
2786		if (!(le32_to_cpu(iagp->pmap[extno]) & mask)) {
2787			jfs_error(ipimap->i_sb,
2788				  "inode %ld not marked as allocated in pmap!\n",
2789				  inum);
2790		}
2791		/* update the bitmap for the extent of the freed inode */
2792		iagp->pmap[extno] &= cpu_to_le32(~mask);
2793	}
2794	/*
2795	 * mark the inode allocated in persistent map:
2796	 */
2797	else {
2798		/* The inode should be already allocated in the working map
2799		 * and should be free in persistent map;
2800		 */
2801		if (!(le32_to_cpu(iagp->wmap[extno]) & mask)) {
2802			release_metapage(mp);
2803			jfs_error(ipimap->i_sb,
2804				  "the inode is not allocated in the working map\n");
2805			return -EIO;
2806		}
2807		if ((le32_to_cpu(iagp->pmap[extno]) & mask) != 0) {
2808			release_metapage(mp);
2809			jfs_error(ipimap->i_sb,
2810				  "the inode is not free in the persistent map\n");
2811			return -EIO;
2812		}
2813		/* update the bitmap for the extent of the allocated inode */
2814		iagp->pmap[extno] |= cpu_to_le32(mask);
2815	}
2816	/*
2817	 * update iag lsn
2818	 */
2819	lsn = tblk->lsn;
2820	log = JFS_SBI(tblk->sb)->log;
2821	LOGSYNC_LOCK(log, flags);
2822	if (mp->lsn != 0) {
2823		/* inherit older/smaller lsn */
2824		logdiff(difft, lsn, log);
2825		logdiff(diffp, mp->lsn, log);
2826		if (difft < diffp) {
2827			mp->lsn = lsn;
2828			/* move mp after tblock in logsync list */
2829			list_move(&mp->synclist, &tblk->synclist);
2830		}
2831		/* inherit younger/larger clsn */
2832		assert(mp->clsn);
2833		logdiff(difft, tblk->clsn, log);
2834		logdiff(diffp, mp->clsn, log);
2835		if (difft > diffp)
2836			mp->clsn = tblk->clsn;
2837	} else {
2838		mp->log = log;
2839		mp->lsn = lsn;
2840		/* insert mp after tblock in logsync list */
2841		log->count++;
2842		list_add(&mp->synclist, &tblk->synclist);
2843		mp->clsn = tblk->clsn;
2844	}
2845	LOGSYNC_UNLOCK(log, flags);
2846	write_metapage(mp);
2847	return (0);
2848}
2849
2850/*
2851 *	diExtendFS()
2852 *
2853 * function: update imap for extendfs();
2854 *
2855 * note: AG size has been increased s.t. each k old contiguous AGs are
2856 * coalesced into a new AG;
2857 */
2858int diExtendFS(struct inode *ipimap, struct inode *ipbmap)
2859{
2860	int rc, rcx = 0;
2861	struct inomap *imap = JFS_IP(ipimap)->i_imap;
2862	struct iag *iagp = NULL, *hiagp = NULL;
2863	struct bmap *mp = JFS_SBI(ipbmap->i_sb)->bmap;
2864	struct metapage *bp, *hbp;
2865	int i, n, head;
2866	int numinos, xnuminos = 0, xnumfree = 0;
2867	s64 agstart;
2868
2869	jfs_info("diExtendFS: nextiag:%d numinos:%d numfree:%d",
2870		   imap->im_nextiag, atomic_read(&imap->im_numinos),
2871		   atomic_read(&imap->im_numfree));
2872
2873	/*
2874	 *	reconstruct imap
2875	 *
2876	 * coalesce contiguous k (newAGSize/oldAGSize) AGs;
2877	 * i.e., (AGi, ..., AGj) where i = k*n and j = k*(n+1) - 1 to AGn;
2878	 * note: new AG size = old AG size * (2**x).
2879	 */
2880
2881	/* init per AG control information im_agctl[] */
2882	for (i = 0; i < MAXAG; i++) {
2883		imap->im_agctl[i].inofree = -1;
2884		imap->im_agctl[i].extfree = -1;
2885		imap->im_agctl[i].numinos = 0;	/* number of backed inodes */
2886		imap->im_agctl[i].numfree = 0;	/* number of free backed inodes */
2887	}
2888
2889	/*
2890	 *	process each iag page of the map.
2891	 *
2892	 * rebuild AG Free Inode List, AG Free Inode Extent List;
2893	 */
2894	for (i = 0; i < imap->im_nextiag; i++) {
2895		if ((rc = diIAGRead(imap, i, &bp))) {
2896			rcx = rc;
2897			continue;
2898		}
2899		iagp = (struct iag *) bp->data;
2900		if (le32_to_cpu(iagp->iagnum) != i) {
2901			release_metapage(bp);
2902			jfs_error(ipimap->i_sb, "unexpected value of iagnum\n");
2903			return -EIO;
2904		}
2905
2906		/* leave free iag in the free iag list */
2907		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG)) {
2908			release_metapage(bp);
2909			continue;
2910		}
2911
2912		agstart = le64_to_cpu(iagp->agstart);
2913		n = agstart >> mp->db_agl2size;
2914		iagp->agstart = cpu_to_le64((s64)n << mp->db_agl2size);
2915
2916		/* compute backed inodes */
2917		numinos = (EXTSPERIAG - le32_to_cpu(iagp->nfreeexts))
2918		    << L2INOSPEREXT;
2919		if (numinos > 0) {
2920			/* merge AG backed inodes */
2921			imap->im_agctl[n].numinos += numinos;
2922			xnuminos += numinos;
2923		}
2924
2925		/* if any backed free inodes, insert at AG free inode list */
2926		if ((int) le32_to_cpu(iagp->nfreeinos) > 0) {
2927			if ((head = imap->im_agctl[n].inofree) == -1) {
2928				iagp->inofreefwd = cpu_to_le32(-1);
2929				iagp->inofreeback = cpu_to_le32(-1);
2930			} else {
2931				if ((rc = diIAGRead(imap, head, &hbp))) {
2932					rcx = rc;
2933					goto nextiag;
2934				}
2935				hiagp = (struct iag *) hbp->data;
2936				hiagp->inofreeback = iagp->iagnum;
2937				iagp->inofreefwd = cpu_to_le32(head);
2938				iagp->inofreeback = cpu_to_le32(-1);
2939				write_metapage(hbp);
2940			}
2941
2942			imap->im_agctl[n].inofree =
2943			    le32_to_cpu(iagp->iagnum);
2944
2945			/* merge AG backed free inodes */
2946			imap->im_agctl[n].numfree +=
2947			    le32_to_cpu(iagp->nfreeinos);
2948			xnumfree += le32_to_cpu(iagp->nfreeinos);
2949		}
2950
2951		/* if any free extents, insert at AG free extent list */
2952		if (le32_to_cpu(iagp->nfreeexts) > 0) {
2953			if ((head = imap->im_agctl[n].extfree) == -1) {
2954				iagp->extfreefwd = cpu_to_le32(-1);
2955				iagp->extfreeback = cpu_to_le32(-1);
2956			} else {
2957				if ((rc = diIAGRead(imap, head, &hbp))) {
2958					rcx = rc;
2959					goto nextiag;
2960				}
2961				hiagp = (struct iag *) hbp->data;
2962				hiagp->extfreeback = iagp->iagnum;
2963				iagp->extfreefwd = cpu_to_le32(head);
2964				iagp->extfreeback = cpu_to_le32(-1);
2965				write_metapage(hbp);
2966			}
2967
2968			imap->im_agctl[n].extfree =
2969			    le32_to_cpu(iagp->iagnum);
2970		}
2971
2972	      nextiag:
2973		write_metapage(bp);
2974	}
2975
2976	if (xnuminos != atomic_read(&imap->im_numinos) ||
2977	    xnumfree != atomic_read(&imap->im_numfree)) {
2978		jfs_error(ipimap->i_sb, "numinos or numfree incorrect\n");
2979		return -EIO;
2980	}
2981
2982	return rcx;
2983}
2984
2985
2986/*
2987 *	duplicateIXtree()
2988 *
2989 * serialization: IWRITE_LOCK held on entry/exit
2990 *
2991 * note: shadow page with regular inode (rel.2);
2992 */
2993static void duplicateIXtree(struct super_block *sb, s64 blkno,
2994			    int xlen, s64 *xaddr)
2995{
2996	struct jfs_superblock *j_sb;
2997	struct buffer_head *bh;
2998	struct inode *ip;
2999	tid_t tid;
3000
3001	/* if AIT2 ipmap2 is bad, do not try to update it */
3002	if (JFS_SBI(sb)->mntflag & JFS_BAD_SAIT)	/* s_flag */
3003		return;
3004	ip = diReadSpecial(sb, FILESYSTEM_I, 1);
3005	if (ip == NULL) {
3006		JFS_SBI(sb)->mntflag |= JFS_BAD_SAIT;
3007		if (readSuper(sb, &bh))
3008			return;
3009		j_sb = (struct jfs_superblock *)bh->b_data;
3010		j_sb->s_flag |= cpu_to_le32(JFS_BAD_SAIT);
3011
3012		mark_buffer_dirty(bh);
3013		sync_dirty_buffer(bh);
3014		brelse(bh);
3015		return;
3016	}
3017
3018	/* start transaction */
3019	tid = txBegin(sb, COMMIT_FORCE);
3020	/* update the inode map addressing structure to point to it */
3021	if (xtInsert(tid, ip, 0, blkno, xlen, xaddr, 0)) {
3022		JFS_SBI(sb)->mntflag |= JFS_BAD_SAIT;
3023		txAbort(tid, 1);
3024		goto cleanup;
3025
3026	}
3027	/* update the inode map's inode to reflect the extension */
3028	ip->i_size += PSIZE;
3029	inode_add_bytes(ip, PSIZE);
3030	txCommit(tid, 1, &ip, COMMIT_FORCE);
3031      cleanup:
3032	txEnd(tid);
3033	diFreeSpecial(ip);
3034}
3035
3036/*
3037 * NAME:	copy_from_dinode()
3038 *
3039 * FUNCTION:	Copies inode info from disk inode to in-memory inode
3040 *
3041 * RETURN VALUES:
3042 *	0	- success
3043 *	-ENOMEM	- insufficient memory
3044 */
3045static int copy_from_dinode(struct dinode * dip, struct inode *ip)
3046{
3047	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
3048	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
3049
3050	jfs_ip->fileset = le32_to_cpu(dip->di_fileset);
3051	jfs_ip->mode2 = le32_to_cpu(dip->di_mode);
3052	jfs_set_inode_flags(ip);
3053
3054	ip->i_mode = le32_to_cpu(dip->di_mode) & 0xffff;
3055	if (sbi->umask != -1) {
3056		ip->i_mode = (ip->i_mode & ~0777) | (0777 & ~sbi->umask);
3057		/* For directories, add x permission if r is allowed by umask */
3058		if (S_ISDIR(ip->i_mode)) {
3059			if (ip->i_mode & 0400)
3060				ip->i_mode |= 0100;
3061			if (ip->i_mode & 0040)
3062				ip->i_mode |= 0010;
3063			if (ip->i_mode & 0004)
3064				ip->i_mode |= 0001;
3065		}
3066	}
3067	set_nlink(ip, le32_to_cpu(dip->di_nlink));
3068
3069	jfs_ip->saved_uid = make_kuid(&init_user_ns, le32_to_cpu(dip->di_uid));
3070	if (!uid_valid(sbi->uid))
3071		ip->i_uid = jfs_ip->saved_uid;
3072	else {
3073		ip->i_uid = sbi->uid;
3074	}
3075
3076	jfs_ip->saved_gid = make_kgid(&init_user_ns, le32_to_cpu(dip->di_gid));
3077	if (!gid_valid(sbi->gid))
3078		ip->i_gid = jfs_ip->saved_gid;
3079	else {
3080		ip->i_gid = sbi->gid;
3081	}
3082
3083	ip->i_size = le64_to_cpu(dip->di_size);
3084	ip->i_atime.tv_sec = le32_to_cpu(dip->di_atime.tv_sec);
3085	ip->i_atime.tv_nsec = le32_to_cpu(dip->di_atime.tv_nsec);
3086	ip->i_mtime.tv_sec = le32_to_cpu(dip->di_mtime.tv_sec);
3087	ip->i_mtime.tv_nsec = le32_to_cpu(dip->di_mtime.tv_nsec);
3088	ip->i_ctime.tv_sec = le32_to_cpu(dip->di_ctime.tv_sec);
3089	ip->i_ctime.tv_nsec = le32_to_cpu(dip->di_ctime.tv_nsec);
3090	ip->i_blocks = LBLK2PBLK(ip->i_sb, le64_to_cpu(dip->di_nblocks));
3091	ip->i_generation = le32_to_cpu(dip->di_gen);
3092
3093	jfs_ip->ixpxd = dip->di_ixpxd;	/* in-memory pxd's are little-endian */
3094	jfs_ip->acl = dip->di_acl;	/* as are dxd's */
3095	jfs_ip->ea = dip->di_ea;
3096	jfs_ip->next_index = le32_to_cpu(dip->di_next_index);
3097	jfs_ip->otime = le32_to_cpu(dip->di_otime.tv_sec);
3098	jfs_ip->acltype = le32_to_cpu(dip->di_acltype);
3099
3100	if (S_ISCHR(ip->i_mode) || S_ISBLK(ip->i_mode)) {
3101		jfs_ip->dev = le32_to_cpu(dip->di_rdev);
3102		ip->i_rdev = new_decode_dev(jfs_ip->dev);
3103	}
3104
3105	if (S_ISDIR(ip->i_mode)) {
3106		memcpy(&jfs_ip->i_dirtable, &dip->di_dirtable, 384);
3107	} else if (S_ISREG(ip->i_mode) || S_ISLNK(ip->i_mode)) {
3108		memcpy(&jfs_ip->i_xtroot, &dip->di_xtroot, 288);
3109	} else
3110		memcpy(&jfs_ip->i_inline_ea, &dip->di_inlineea, 128);
3111
3112	/* Zero the in-memory-only stuff */
3113	jfs_ip->cflag = 0;
3114	jfs_ip->btindex = 0;
3115	jfs_ip->btorder = 0;
3116	jfs_ip->bxflag = 0;
3117	jfs_ip->blid = 0;
3118	jfs_ip->atlhead = 0;
3119	jfs_ip->atltail = 0;
3120	jfs_ip->xtlid = 0;
3121	return (0);
3122}
3123
3124/*
3125 * NAME:	copy_to_dinode()
3126 *
3127 * FUNCTION:	Copies inode info from in-memory inode to disk inode
3128 */
3129static void copy_to_dinode(struct dinode * dip, struct inode *ip)
3130{
3131	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
3132	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
3133
3134	dip->di_fileset = cpu_to_le32(jfs_ip->fileset);
3135	dip->di_inostamp = cpu_to_le32(sbi->inostamp);
3136	dip->di_number = cpu_to_le32(ip->i_ino);
3137	dip->di_gen = cpu_to_le32(ip->i_generation);
3138	dip->di_size = cpu_to_le64(ip->i_size);
3139	dip->di_nblocks = cpu_to_le64(PBLK2LBLK(ip->i_sb, ip->i_blocks));
3140	dip->di_nlink = cpu_to_le32(ip->i_nlink);
3141	if (!uid_valid(sbi->uid))
3142		dip->di_uid = cpu_to_le32(i_uid_read(ip));
3143	else
3144		dip->di_uid =cpu_to_le32(from_kuid(&init_user_ns,
3145						   jfs_ip->saved_uid));
3146	if (!gid_valid(sbi->gid))
3147		dip->di_gid = cpu_to_le32(i_gid_read(ip));
3148	else
3149		dip->di_gid = cpu_to_le32(from_kgid(&init_user_ns,
3150						    jfs_ip->saved_gid));
3151	/*
3152	 * mode2 is only needed for storing the higher order bits.
3153	 * Trust i_mode for the lower order ones
3154	 */
3155	if (sbi->umask == -1)
3156		dip->di_mode = cpu_to_le32((jfs_ip->mode2 & 0xffff0000) |
3157					   ip->i_mode);
3158	else /* Leave the original permissions alone */
3159		dip->di_mode = cpu_to_le32(jfs_ip->mode2);
3160
3161	dip->di_atime.tv_sec = cpu_to_le32(ip->i_atime.tv_sec);
3162	dip->di_atime.tv_nsec = cpu_to_le32(ip->i_atime.tv_nsec);
3163	dip->di_ctime.tv_sec = cpu_to_le32(ip->i_ctime.tv_sec);
3164	dip->di_ctime.tv_nsec = cpu_to_le32(ip->i_ctime.tv_nsec);
3165	dip->di_mtime.tv_sec = cpu_to_le32(ip->i_mtime.tv_sec);
3166	dip->di_mtime.tv_nsec = cpu_to_le32(ip->i_mtime.tv_nsec);
3167	dip->di_ixpxd = jfs_ip->ixpxd;	/* in-memory pxd's are little-endian */
3168	dip->di_acl = jfs_ip->acl;	/* as are dxd's */
3169	dip->di_ea = jfs_ip->ea;
3170	dip->di_next_index = cpu_to_le32(jfs_ip->next_index);
3171	dip->di_otime.tv_sec = cpu_to_le32(jfs_ip->otime);
3172	dip->di_otime.tv_nsec = 0;
3173	dip->di_acltype = cpu_to_le32(jfs_ip->acltype);
3174	if (S_ISCHR(ip->i_mode) || S_ISBLK(ip->i_mode))
3175		dip->di_rdev = cpu_to_le32(jfs_ip->dev);
3176}
v5.4
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 *   Copyright (C) International Business Machines Corp., 2000-2004
 
 
 
 
 
 
 
 
 
 
 
 
 
 
   4 */
   5
   6/*
   7 *	jfs_imap.c: inode allocation map manager
   8 *
   9 * Serialization:
  10 *   Each AG has a simple lock which is used to control the serialization of
  11 *	the AG level lists.  This lock should be taken first whenever an AG
  12 *	level list will be modified or accessed.
  13 *
  14 *   Each IAG is locked by obtaining the buffer for the IAG page.
  15 *
  16 *   There is also a inode lock for the inode map inode.  A read lock needs to
  17 *	be taken whenever an IAG is read from the map or the global level
  18 *	information is read.  A write lock needs to be taken whenever the global
  19 *	level information is modified or an atomic operation needs to be used.
  20 *
  21 *	If more than one IAG is read at one time, the read lock may not
  22 *	be given up until all of the IAG's are read.  Otherwise, a deadlock
  23 *	may occur when trying to obtain the read lock while another thread
  24 *	holding the read lock is waiting on the IAG already being held.
  25 *
  26 *   The control page of the inode map is read into memory by diMount().
  27 *	Thereafter it should only be modified in memory and then it will be
  28 *	written out when the filesystem is unmounted by diUnmount().
  29 */
  30
  31#include <linux/fs.h>
  32#include <linux/buffer_head.h>
  33#include <linux/pagemap.h>
  34#include <linux/quotaops.h>
  35#include <linux/slab.h>
  36
  37#include "jfs_incore.h"
  38#include "jfs_inode.h"
  39#include "jfs_filsys.h"
  40#include "jfs_dinode.h"
  41#include "jfs_dmap.h"
  42#include "jfs_imap.h"
  43#include "jfs_metapage.h"
  44#include "jfs_superblock.h"
  45#include "jfs_debug.h"
  46
  47/*
  48 * imap locks
  49 */
  50/* iag free list lock */
  51#define IAGFREE_LOCK_INIT(imap)		mutex_init(&imap->im_freelock)
  52#define IAGFREE_LOCK(imap)		mutex_lock(&imap->im_freelock)
  53#define IAGFREE_UNLOCK(imap)		mutex_unlock(&imap->im_freelock)
  54
  55/* per ag iag list locks */
  56#define AG_LOCK_INIT(imap,index)	mutex_init(&(imap->im_aglock[index]))
  57#define AG_LOCK(imap,agno)		mutex_lock(&imap->im_aglock[agno])
  58#define AG_UNLOCK(imap,agno)		mutex_unlock(&imap->im_aglock[agno])
  59
  60/*
  61 * forward references
  62 */
  63static int diAllocAG(struct inomap *, int, bool, struct inode *);
  64static int diAllocAny(struct inomap *, int, bool, struct inode *);
  65static int diAllocBit(struct inomap *, struct iag *, int);
  66static int diAllocExt(struct inomap *, int, struct inode *);
  67static int diAllocIno(struct inomap *, int, struct inode *);
  68static int diFindFree(u32, int);
  69static int diNewExt(struct inomap *, struct iag *, int);
  70static int diNewIAG(struct inomap *, int *, int, struct metapage **);
  71static void duplicateIXtree(struct super_block *, s64, int, s64 *);
  72
  73static int diIAGRead(struct inomap * imap, int, struct metapage **);
  74static int copy_from_dinode(struct dinode *, struct inode *);
  75static void copy_to_dinode(struct dinode *, struct inode *);
  76
  77/*
  78 * NAME:	diMount()
  79 *
  80 * FUNCTION:	initialize the incore inode map control structures for
  81 *		a fileset or aggregate init time.
  82 *
  83 *		the inode map's control structure (dinomap) is
  84 *		brought in from disk and placed in virtual memory.
  85 *
  86 * PARAMETERS:
  87 *	ipimap	- pointer to inode map inode for the aggregate or fileset.
  88 *
  89 * RETURN VALUES:
  90 *	0	- success
  91 *	-ENOMEM	- insufficient free virtual memory.
  92 *	-EIO	- i/o error.
  93 */
  94int diMount(struct inode *ipimap)
  95{
  96	struct inomap *imap;
  97	struct metapage *mp;
  98	int index;
  99	struct dinomap_disk *dinom_le;
 100
 101	/*
 102	 * allocate/initialize the in-memory inode map control structure
 103	 */
 104	/* allocate the in-memory inode map control structure. */
 105	imap = kmalloc(sizeof(struct inomap), GFP_KERNEL);
 106	if (imap == NULL) {
 107		jfs_err("diMount: kmalloc returned NULL!");
 108		return -ENOMEM;
 109	}
 110
 111	/* read the on-disk inode map control structure. */
 112
 113	mp = read_metapage(ipimap,
 114			   IMAPBLKNO << JFS_SBI(ipimap->i_sb)->l2nbperpage,
 115			   PSIZE, 0);
 116	if (mp == NULL) {
 117		kfree(imap);
 118		return -EIO;
 119	}
 120
 121	/* copy the on-disk version to the in-memory version. */
 122	dinom_le = (struct dinomap_disk *) mp->data;
 123	imap->im_freeiag = le32_to_cpu(dinom_le->in_freeiag);
 124	imap->im_nextiag = le32_to_cpu(dinom_le->in_nextiag);
 125	atomic_set(&imap->im_numinos, le32_to_cpu(dinom_le->in_numinos));
 126	atomic_set(&imap->im_numfree, le32_to_cpu(dinom_le->in_numfree));
 127	imap->im_nbperiext = le32_to_cpu(dinom_le->in_nbperiext);
 128	imap->im_l2nbperiext = le32_to_cpu(dinom_le->in_l2nbperiext);
 129	for (index = 0; index < MAXAG; index++) {
 130		imap->im_agctl[index].inofree =
 131		    le32_to_cpu(dinom_le->in_agctl[index].inofree);
 132		imap->im_agctl[index].extfree =
 133		    le32_to_cpu(dinom_le->in_agctl[index].extfree);
 134		imap->im_agctl[index].numinos =
 135		    le32_to_cpu(dinom_le->in_agctl[index].numinos);
 136		imap->im_agctl[index].numfree =
 137		    le32_to_cpu(dinom_le->in_agctl[index].numfree);
 138	}
 139
 140	/* release the buffer. */
 141	release_metapage(mp);
 142
 143	/*
 144	 * allocate/initialize inode allocation map locks
 145	 */
 146	/* allocate and init iag free list lock */
 147	IAGFREE_LOCK_INIT(imap);
 148
 149	/* allocate and init ag list locks */
 150	for (index = 0; index < MAXAG; index++) {
 151		AG_LOCK_INIT(imap, index);
 152	}
 153
 154	/* bind the inode map inode and inode map control structure
 155	 * to each other.
 156	 */
 157	imap->im_ipimap = ipimap;
 158	JFS_IP(ipimap)->i_imap = imap;
 159
 160	return (0);
 161}
 162
 163
 164/*
 165 * NAME:	diUnmount()
 166 *
 167 * FUNCTION:	write to disk the incore inode map control structures for
 168 *		a fileset or aggregate at unmount time.
 169 *
 170 * PARAMETERS:
 171 *	ipimap	- pointer to inode map inode for the aggregate or fileset.
 172 *
 173 * RETURN VALUES:
 174 *	0	- success
 175 *	-ENOMEM	- insufficient free virtual memory.
 176 *	-EIO	- i/o error.
 177 */
 178int diUnmount(struct inode *ipimap, int mounterror)
 179{
 180	struct inomap *imap = JFS_IP(ipimap)->i_imap;
 181
 182	/*
 183	 * update the on-disk inode map control structure
 184	 */
 185
 186	if (!(mounterror || isReadOnly(ipimap)))
 187		diSync(ipimap);
 188
 189	/*
 190	 * Invalidate the page cache buffers
 191	 */
 192	truncate_inode_pages(ipimap->i_mapping, 0);
 193
 194	/*
 195	 * free in-memory control structure
 196	 */
 197	kfree(imap);
 198
 199	return (0);
 200}
 201
 202
 203/*
 204 *	diSync()
 205 */
 206int diSync(struct inode *ipimap)
 207{
 208	struct dinomap_disk *dinom_le;
 209	struct inomap *imp = JFS_IP(ipimap)->i_imap;
 210	struct metapage *mp;
 211	int index;
 212
 213	/*
 214	 * write imap global conrol page
 215	 */
 216	/* read the on-disk inode map control structure */
 217	mp = get_metapage(ipimap,
 218			  IMAPBLKNO << JFS_SBI(ipimap->i_sb)->l2nbperpage,
 219			  PSIZE, 0);
 220	if (mp == NULL) {
 221		jfs_err("diSync: get_metapage failed!");
 222		return -EIO;
 223	}
 224
 225	/* copy the in-memory version to the on-disk version */
 226	dinom_le = (struct dinomap_disk *) mp->data;
 227	dinom_le->in_freeiag = cpu_to_le32(imp->im_freeiag);
 228	dinom_le->in_nextiag = cpu_to_le32(imp->im_nextiag);
 229	dinom_le->in_numinos = cpu_to_le32(atomic_read(&imp->im_numinos));
 230	dinom_le->in_numfree = cpu_to_le32(atomic_read(&imp->im_numfree));
 231	dinom_le->in_nbperiext = cpu_to_le32(imp->im_nbperiext);
 232	dinom_le->in_l2nbperiext = cpu_to_le32(imp->im_l2nbperiext);
 233	for (index = 0; index < MAXAG; index++) {
 234		dinom_le->in_agctl[index].inofree =
 235		    cpu_to_le32(imp->im_agctl[index].inofree);
 236		dinom_le->in_agctl[index].extfree =
 237		    cpu_to_le32(imp->im_agctl[index].extfree);
 238		dinom_le->in_agctl[index].numinos =
 239		    cpu_to_le32(imp->im_agctl[index].numinos);
 240		dinom_le->in_agctl[index].numfree =
 241		    cpu_to_le32(imp->im_agctl[index].numfree);
 242	}
 243
 244	/* write out the control structure */
 245	write_metapage(mp);
 246
 247	/*
 248	 * write out dirty pages of imap
 249	 */
 250	filemap_write_and_wait(ipimap->i_mapping);
 251
 252	diWriteSpecial(ipimap, 0);
 253
 254	return (0);
 255}
 256
 257
 258/*
 259 * NAME:	diRead()
 260 *
 261 * FUNCTION:	initialize an incore inode from disk.
 262 *
 263 *		on entry, the specifed incore inode should itself
 264 *		specify the disk inode number corresponding to the
 265 *		incore inode (i.e. i_number should be initialized).
 266 *
 267 *		this routine handles incore inode initialization for
 268 *		both "special" and "regular" inodes.  special inodes
 269 *		are those required early in the mount process and
 270 *		require special handling since much of the file system
 271 *		is not yet initialized.  these "special" inodes are
 272 *		identified by a NULL inode map inode pointer and are
 273 *		actually initialized by a call to diReadSpecial().
 274 *
 275 *		for regular inodes, the iag describing the disk inode
 276 *		is read from disk to determine the inode extent address
 277 *		for the disk inode.  with the inode extent address in
 278 *		hand, the page of the extent that contains the disk
 279 *		inode is read and the disk inode is copied to the
 280 *		incore inode.
 281 *
 282 * PARAMETERS:
 283 *	ip	-  pointer to incore inode to be initialized from disk.
 284 *
 285 * RETURN VALUES:
 286 *	0	- success
 287 *	-EIO	- i/o error.
 288 *	-ENOMEM	- insufficient memory
 289 *
 290 */
 291int diRead(struct inode *ip)
 292{
 293	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
 294	int iagno, ino, extno, rc;
 295	struct inode *ipimap;
 296	struct dinode *dp;
 297	struct iag *iagp;
 298	struct metapage *mp;
 299	s64 blkno, agstart;
 300	struct inomap *imap;
 301	int block_offset;
 302	int inodes_left;
 303	unsigned long pageno;
 304	int rel_inode;
 305
 306	jfs_info("diRead: ino = %ld", ip->i_ino);
 307
 308	ipimap = sbi->ipimap;
 309	JFS_IP(ip)->ipimap = ipimap;
 310
 311	/* determine the iag number for this inode (number) */
 312	iagno = INOTOIAG(ip->i_ino);
 313
 314	/* read the iag */
 315	imap = JFS_IP(ipimap)->i_imap;
 316	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
 317	rc = diIAGRead(imap, iagno, &mp);
 318	IREAD_UNLOCK(ipimap);
 319	if (rc) {
 320		jfs_err("diRead: diIAGRead returned %d", rc);
 321		return (rc);
 322	}
 323
 324	iagp = (struct iag *) mp->data;
 325
 326	/* determine inode extent that holds the disk inode */
 327	ino = ip->i_ino & (INOSPERIAG - 1);
 328	extno = ino >> L2INOSPEREXT;
 329
 330	if ((lengthPXD(&iagp->inoext[extno]) != imap->im_nbperiext) ||
 331	    (addressPXD(&iagp->inoext[extno]) == 0)) {
 332		release_metapage(mp);
 333		return -ESTALE;
 334	}
 335
 336	/* get disk block number of the page within the inode extent
 337	 * that holds the disk inode.
 338	 */
 339	blkno = INOPBLK(&iagp->inoext[extno], ino, sbi->l2nbperpage);
 340
 341	/* get the ag for the iag */
 342	agstart = le64_to_cpu(iagp->agstart);
 343
 344	release_metapage(mp);
 345
 346	rel_inode = (ino & (INOSPERPAGE - 1));
 347	pageno = blkno >> sbi->l2nbperpage;
 348
 349	if ((block_offset = ((u32) blkno & (sbi->nbperpage - 1)))) {
 350		/*
 351		 * OS/2 didn't always align inode extents on page boundaries
 352		 */
 353		inodes_left =
 354		     (sbi->nbperpage - block_offset) << sbi->l2niperblk;
 355
 356		if (rel_inode < inodes_left)
 357			rel_inode += block_offset << sbi->l2niperblk;
 358		else {
 359			pageno += 1;
 360			rel_inode -= inodes_left;
 361		}
 362	}
 363
 364	/* read the page of disk inode */
 365	mp = read_metapage(ipimap, pageno << sbi->l2nbperpage, PSIZE, 1);
 366	if (!mp) {
 367		jfs_err("diRead: read_metapage failed");
 368		return -EIO;
 369	}
 370
 371	/* locate the disk inode requested */
 372	dp = (struct dinode *) mp->data;
 373	dp += rel_inode;
 374
 375	if (ip->i_ino != le32_to_cpu(dp->di_number)) {
 376		jfs_error(ip->i_sb, "i_ino != di_number\n");
 377		rc = -EIO;
 378	} else if (le32_to_cpu(dp->di_nlink) == 0)
 379		rc = -ESTALE;
 380	else
 381		/* copy the disk inode to the in-memory inode */
 382		rc = copy_from_dinode(dp, ip);
 383
 384	release_metapage(mp);
 385
 386	/* set the ag for the inode */
 387	JFS_IP(ip)->agstart = agstart;
 388	JFS_IP(ip)->active_ag = -1;
 389
 390	return (rc);
 391}
 392
 393
 394/*
 395 * NAME:	diReadSpecial()
 396 *
 397 * FUNCTION:	initialize a 'special' inode from disk.
 398 *
 399 *		this routines handles aggregate level inodes.  The
 400 *		inode cache cannot differentiate between the
 401 *		aggregate inodes and the filesystem inodes, so we
 402 *		handle these here.  We don't actually use the aggregate
 403 *		inode map, since these inodes are at a fixed location
 404 *		and in some cases the aggregate inode map isn't initialized
 405 *		yet.
 406 *
 407 * PARAMETERS:
 408 *	sb - filesystem superblock
 409 *	inum - aggregate inode number
 410 *	secondary - 1 if secondary aggregate inode table
 411 *
 412 * RETURN VALUES:
 413 *	new inode	- success
 414 *	NULL		- i/o error.
 415 */
 416struct inode *diReadSpecial(struct super_block *sb, ino_t inum, int secondary)
 417{
 418	struct jfs_sb_info *sbi = JFS_SBI(sb);
 419	uint address;
 420	struct dinode *dp;
 421	struct inode *ip;
 422	struct metapage *mp;
 423
 424	ip = new_inode(sb);
 425	if (ip == NULL) {
 426		jfs_err("diReadSpecial: new_inode returned NULL!");
 427		return ip;
 428	}
 429
 430	if (secondary) {
 431		address = addressPXD(&sbi->ait2) >> sbi->l2nbperpage;
 432		JFS_IP(ip)->ipimap = sbi->ipaimap2;
 433	} else {
 434		address = AITBL_OFF >> L2PSIZE;
 435		JFS_IP(ip)->ipimap = sbi->ipaimap;
 436	}
 437
 438	ASSERT(inum < INOSPEREXT);
 439
 440	ip->i_ino = inum;
 441
 442	address += inum >> 3;	/* 8 inodes per 4K page */
 443
 444	/* read the page of fixed disk inode (AIT) in raw mode */
 445	mp = read_metapage(ip, address << sbi->l2nbperpage, PSIZE, 1);
 446	if (mp == NULL) {
 447		set_nlink(ip, 1);	/* Don't want iput() deleting it */
 448		iput(ip);
 449		return (NULL);
 450	}
 451
 452	/* get the pointer to the disk inode of interest */
 453	dp = (struct dinode *) (mp->data);
 454	dp += inum % 8;		/* 8 inodes per 4K page */
 455
 456	/* copy on-disk inode to in-memory inode */
 457	if ((copy_from_dinode(dp, ip)) != 0) {
 458		/* handle bad return by returning NULL for ip */
 459		set_nlink(ip, 1);	/* Don't want iput() deleting it */
 460		iput(ip);
 461		/* release the page */
 462		release_metapage(mp);
 463		return (NULL);
 464
 465	}
 466
 467	ip->i_mapping->a_ops = &jfs_metapage_aops;
 468	mapping_set_gfp_mask(ip->i_mapping, GFP_NOFS);
 469
 470	/* Allocations to metadata inodes should not affect quotas */
 471	ip->i_flags |= S_NOQUOTA;
 472
 473	if ((inum == FILESYSTEM_I) && (JFS_IP(ip)->ipimap == sbi->ipaimap)) {
 474		sbi->gengen = le32_to_cpu(dp->di_gengen);
 475		sbi->inostamp = le32_to_cpu(dp->di_inostamp);
 476	}
 477
 478	/* release the page */
 479	release_metapage(mp);
 480
 481	inode_fake_hash(ip);
 
 
 
 
 
 
 482
 483	return (ip);
 484}
 485
 486/*
 487 * NAME:	diWriteSpecial()
 488 *
 489 * FUNCTION:	Write the special inode to disk
 490 *
 491 * PARAMETERS:
 492 *	ip - special inode
 493 *	secondary - 1 if secondary aggregate inode table
 494 *
 495 * RETURN VALUES: none
 496 */
 497
 498void diWriteSpecial(struct inode *ip, int secondary)
 499{
 500	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
 501	uint address;
 502	struct dinode *dp;
 503	ino_t inum = ip->i_ino;
 504	struct metapage *mp;
 505
 506	if (secondary)
 507		address = addressPXD(&sbi->ait2) >> sbi->l2nbperpage;
 508	else
 509		address = AITBL_OFF >> L2PSIZE;
 510
 511	ASSERT(inum < INOSPEREXT);
 512
 513	address += inum >> 3;	/* 8 inodes per 4K page */
 514
 515	/* read the page of fixed disk inode (AIT) in raw mode */
 516	mp = read_metapage(ip, address << sbi->l2nbperpage, PSIZE, 1);
 517	if (mp == NULL) {
 518		jfs_err("diWriteSpecial: failed to read aggregate inode extent!");
 519		return;
 520	}
 521
 522	/* get the pointer to the disk inode of interest */
 523	dp = (struct dinode *) (mp->data);
 524	dp += inum % 8;		/* 8 inodes per 4K page */
 525
 526	/* copy on-disk inode to in-memory inode */
 527	copy_to_dinode(dp, ip);
 528	memcpy(&dp->di_xtroot, &JFS_IP(ip)->i_xtroot, 288);
 529
 530	if (inum == FILESYSTEM_I)
 531		dp->di_gengen = cpu_to_le32(sbi->gengen);
 532
 533	/* write the page */
 534	write_metapage(mp);
 535}
 536
 537/*
 538 * NAME:	diFreeSpecial()
 539 *
 540 * FUNCTION:	Free allocated space for special inode
 541 */
 542void diFreeSpecial(struct inode *ip)
 543{
 544	if (ip == NULL) {
 545		jfs_err("diFreeSpecial called with NULL ip!");
 546		return;
 547	}
 548	filemap_write_and_wait(ip->i_mapping);
 549	truncate_inode_pages(ip->i_mapping, 0);
 550	iput(ip);
 551}
 552
 553
 554
 555/*
 556 * NAME:	diWrite()
 557 *
 558 * FUNCTION:	write the on-disk inode portion of the in-memory inode
 559 *		to its corresponding on-disk inode.
 560 *
 561 *		on entry, the specifed incore inode should itself
 562 *		specify the disk inode number corresponding to the
 563 *		incore inode (i.e. i_number should be initialized).
 564 *
 565 *		the inode contains the inode extent address for the disk
 566 *		inode.  with the inode extent address in hand, the
 567 *		page of the extent that contains the disk inode is
 568 *		read and the disk inode portion of the incore inode
 569 *		is copied to the disk inode.
 570 *
 571 * PARAMETERS:
 572 *	tid -  transacation id
 573 *	ip  -  pointer to incore inode to be written to the inode extent.
 574 *
 575 * RETURN VALUES:
 576 *	0	- success
 577 *	-EIO	- i/o error.
 578 */
 579int diWrite(tid_t tid, struct inode *ip)
 580{
 581	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
 582	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
 583	int rc = 0;
 584	s32 ino;
 585	struct dinode *dp;
 586	s64 blkno;
 587	int block_offset;
 588	int inodes_left;
 589	struct metapage *mp;
 590	unsigned long pageno;
 591	int rel_inode;
 592	int dioffset;
 593	struct inode *ipimap;
 594	uint type;
 595	lid_t lid;
 596	struct tlock *ditlck, *tlck;
 597	struct linelock *dilinelock, *ilinelock;
 598	struct lv *lv;
 599	int n;
 600
 601	ipimap = jfs_ip->ipimap;
 602
 603	ino = ip->i_ino & (INOSPERIAG - 1);
 604
 605	if (!addressPXD(&(jfs_ip->ixpxd)) ||
 606	    (lengthPXD(&(jfs_ip->ixpxd)) !=
 607	     JFS_IP(ipimap)->i_imap->im_nbperiext)) {
 608		jfs_error(ip->i_sb, "ixpxd invalid\n");
 609		return -EIO;
 610	}
 611
 612	/*
 613	 * read the page of disk inode containing the specified inode:
 614	 */
 615	/* compute the block address of the page */
 616	blkno = INOPBLK(&(jfs_ip->ixpxd), ino, sbi->l2nbperpage);
 617
 618	rel_inode = (ino & (INOSPERPAGE - 1));
 619	pageno = blkno >> sbi->l2nbperpage;
 620
 621	if ((block_offset = ((u32) blkno & (sbi->nbperpage - 1)))) {
 622		/*
 623		 * OS/2 didn't always align inode extents on page boundaries
 624		 */
 625		inodes_left =
 626		    (sbi->nbperpage - block_offset) << sbi->l2niperblk;
 627
 628		if (rel_inode < inodes_left)
 629			rel_inode += block_offset << sbi->l2niperblk;
 630		else {
 631			pageno += 1;
 632			rel_inode -= inodes_left;
 633		}
 634	}
 635	/* read the page of disk inode */
 636      retry:
 637	mp = read_metapage(ipimap, pageno << sbi->l2nbperpage, PSIZE, 1);
 638	if (!mp)
 639		return -EIO;
 640
 641	/* get the pointer to the disk inode */
 642	dp = (struct dinode *) mp->data;
 643	dp += rel_inode;
 644
 645	dioffset = (ino & (INOSPERPAGE - 1)) << L2DISIZE;
 646
 647	/*
 648	 * acquire transaction lock on the on-disk inode;
 649	 * N.B. tlock is acquired on ipimap not ip;
 650	 */
 651	if ((ditlck =
 652	     txLock(tid, ipimap, mp, tlckINODE | tlckENTRY)) == NULL)
 653		goto retry;
 654	dilinelock = (struct linelock *) & ditlck->lock;
 655
 656	/*
 657	 * copy btree root from in-memory inode to on-disk inode
 658	 *
 659	 * (tlock is taken from inline B+-tree root in in-memory
 660	 * inode when the B+-tree root is updated, which is pointed
 661	 * by jfs_ip->blid as well as being on tx tlock list)
 662	 *
 663	 * further processing of btree root is based on the copy
 664	 * in in-memory inode, where txLog() will log from, and,
 665	 * for xtree root, txUpdateMap() will update map and reset
 666	 * XAD_NEW bit;
 667	 */
 668
 669	if (S_ISDIR(ip->i_mode) && (lid = jfs_ip->xtlid)) {
 670		/*
 671		 * This is the special xtree inside the directory for storing
 672		 * the directory table
 673		 */
 674		xtpage_t *p, *xp;
 675		xad_t *xad;
 676
 677		jfs_ip->xtlid = 0;
 678		tlck = lid_to_tlock(lid);
 679		assert(tlck->type & tlckXTREE);
 680		tlck->type |= tlckBTROOT;
 681		tlck->mp = mp;
 682		ilinelock = (struct linelock *) & tlck->lock;
 683
 684		/*
 685		 * copy xtree root from inode to dinode:
 686		 */
 687		p = &jfs_ip->i_xtroot;
 688		xp = (xtpage_t *) &dp->di_dirtable;
 689		lv = ilinelock->lv;
 690		for (n = 0; n < ilinelock->index; n++, lv++) {
 691			memcpy(&xp->xad[lv->offset], &p->xad[lv->offset],
 692			       lv->length << L2XTSLOTSIZE);
 693		}
 694
 695		/* reset on-disk (metadata page) xtree XAD_NEW bit */
 696		xad = &xp->xad[XTENTRYSTART];
 697		for (n = XTENTRYSTART;
 698		     n < le16_to_cpu(xp->header.nextindex); n++, xad++)
 699			if (xad->flag & (XAD_NEW | XAD_EXTENDED))
 700				xad->flag &= ~(XAD_NEW | XAD_EXTENDED);
 701	}
 702
 703	if ((lid = jfs_ip->blid) == 0)
 704		goto inlineData;
 705	jfs_ip->blid = 0;
 706
 707	tlck = lid_to_tlock(lid);
 708	type = tlck->type;
 709	tlck->type |= tlckBTROOT;
 710	tlck->mp = mp;
 711	ilinelock = (struct linelock *) & tlck->lock;
 712
 713	/*
 714	 *	regular file: 16 byte (XAD slot) granularity
 715	 */
 716	if (type & tlckXTREE) {
 717		xtpage_t *p, *xp;
 718		xad_t *xad;
 719
 720		/*
 721		 * copy xtree root from inode to dinode:
 722		 */
 723		p = &jfs_ip->i_xtroot;
 724		xp = &dp->di_xtroot;
 725		lv = ilinelock->lv;
 726		for (n = 0; n < ilinelock->index; n++, lv++) {
 727			memcpy(&xp->xad[lv->offset], &p->xad[lv->offset],
 728			       lv->length << L2XTSLOTSIZE);
 729		}
 730
 731		/* reset on-disk (metadata page) xtree XAD_NEW bit */
 732		xad = &xp->xad[XTENTRYSTART];
 733		for (n = XTENTRYSTART;
 734		     n < le16_to_cpu(xp->header.nextindex); n++, xad++)
 735			if (xad->flag & (XAD_NEW | XAD_EXTENDED))
 736				xad->flag &= ~(XAD_NEW | XAD_EXTENDED);
 737	}
 738	/*
 739	 *	directory: 32 byte (directory entry slot) granularity
 740	 */
 741	else if (type & tlckDTREE) {
 742		dtpage_t *p, *xp;
 743
 744		/*
 745		 * copy dtree root from inode to dinode:
 746		 */
 747		p = (dtpage_t *) &jfs_ip->i_dtroot;
 748		xp = (dtpage_t *) & dp->di_dtroot;
 749		lv = ilinelock->lv;
 750		for (n = 0; n < ilinelock->index; n++, lv++) {
 751			memcpy(&xp->slot[lv->offset], &p->slot[lv->offset],
 752			       lv->length << L2DTSLOTSIZE);
 753		}
 754	} else {
 755		jfs_err("diWrite: UFO tlock");
 756	}
 757
 758      inlineData:
 759	/*
 760	 * copy inline symlink from in-memory inode to on-disk inode
 761	 */
 762	if (S_ISLNK(ip->i_mode) && ip->i_size < IDATASIZE) {
 763		lv = & dilinelock->lv[dilinelock->index];
 764		lv->offset = (dioffset + 2 * 128) >> L2INODESLOTSIZE;
 765		lv->length = 2;
 766		memcpy(&dp->di_fastsymlink, jfs_ip->i_inline, IDATASIZE);
 767		dilinelock->index++;
 768	}
 769	/*
 770	 * copy inline data from in-memory inode to on-disk inode:
 771	 * 128 byte slot granularity
 772	 */
 773	if (test_cflag(COMMIT_Inlineea, ip)) {
 774		lv = & dilinelock->lv[dilinelock->index];
 775		lv->offset = (dioffset + 3 * 128) >> L2INODESLOTSIZE;
 776		lv->length = 1;
 777		memcpy(&dp->di_inlineea, jfs_ip->i_inline_ea, INODESLOTSIZE);
 778		dilinelock->index++;
 779
 780		clear_cflag(COMMIT_Inlineea, ip);
 781	}
 782
 783	/*
 784	 *	lock/copy inode base: 128 byte slot granularity
 785	 */
 786	lv = & dilinelock->lv[dilinelock->index];
 787	lv->offset = dioffset >> L2INODESLOTSIZE;
 788	copy_to_dinode(dp, ip);
 789	if (test_and_clear_cflag(COMMIT_Dirtable, ip)) {
 790		lv->length = 2;
 791		memcpy(&dp->di_dirtable, &jfs_ip->i_dirtable, 96);
 792	} else
 793		lv->length = 1;
 794	dilinelock->index++;
 795
 796	/* release the buffer holding the updated on-disk inode.
 797	 * the buffer will be later written by commit processing.
 798	 */
 799	write_metapage(mp);
 800
 801	return (rc);
 802}
 803
 804
 805/*
 806 * NAME:	diFree(ip)
 807 *
 808 * FUNCTION:	free a specified inode from the inode working map
 809 *		for a fileset or aggregate.
 810 *
 811 *		if the inode to be freed represents the first (only)
 812 *		free inode within the iag, the iag will be placed on
 813 *		the ag free inode list.
 814 *
 815 *		freeing the inode will cause the inode extent to be
 816 *		freed if the inode is the only allocated inode within
 817 *		the extent.  in this case all the disk resource backing
 818 *		up the inode extent will be freed. in addition, the iag
 819 *		will be placed on the ag extent free list if the extent
 820 *		is the first free extent in the iag.  if freeing the
 821 *		extent also means that no free inodes will exist for
 822 *		the iag, the iag will also be removed from the ag free
 823 *		inode list.
 824 *
 825 *		the iag describing the inode will be freed if the extent
 826 *		is to be freed and it is the only backed extent within
 827 *		the iag.  in this case, the iag will be removed from the
 828 *		ag free extent list and ag free inode list and placed on
 829 *		the inode map's free iag list.
 830 *
 831 *		a careful update approach is used to provide consistency
 832 *		in the face of updates to multiple buffers.  under this
 833 *		approach, all required buffers are obtained before making
 834 *		any updates and are held until all updates are complete.
 835 *
 836 * PARAMETERS:
 837 *	ip	- inode to be freed.
 838 *
 839 * RETURN VALUES:
 840 *	0	- success
 841 *	-EIO	- i/o error.
 842 */
 843int diFree(struct inode *ip)
 844{
 845	int rc;
 846	ino_t inum = ip->i_ino;
 847	struct iag *iagp, *aiagp, *biagp, *ciagp, *diagp;
 848	struct metapage *mp, *amp, *bmp, *cmp, *dmp;
 849	int iagno, ino, extno, bitno, sword, agno;
 850	int back, fwd;
 851	u32 bitmap, mask;
 852	struct inode *ipimap = JFS_SBI(ip->i_sb)->ipimap;
 853	struct inomap *imap = JFS_IP(ipimap)->i_imap;
 854	pxd_t freepxd;
 855	tid_t tid;
 856	struct inode *iplist[3];
 857	struct tlock *tlck;
 858	struct pxd_lock *pxdlock;
 859
 860	/*
 861	 * This is just to suppress compiler warnings.  The same logic that
 862	 * references these variables is used to initialize them.
 863	 */
 864	aiagp = biagp = ciagp = diagp = NULL;
 865
 866	/* get the iag number containing the inode.
 867	 */
 868	iagno = INOTOIAG(inum);
 869
 870	/* make sure that the iag is contained within
 871	 * the map.
 872	 */
 873	if (iagno >= imap->im_nextiag) {
 874		print_hex_dump(KERN_ERR, "imap: ", DUMP_PREFIX_ADDRESS, 16, 4,
 875			       imap, 32, 0);
 876		jfs_error(ip->i_sb, "inum = %d, iagno = %d, nextiag = %d\n",
 877			  (uint) inum, iagno, imap->im_nextiag);
 878		return -EIO;
 879	}
 880
 881	/* get the allocation group for this ino.
 882	 */
 883	agno = BLKTOAG(JFS_IP(ip)->agstart, JFS_SBI(ip->i_sb));
 884
 885	/* Lock the AG specific inode map information
 886	 */
 887	AG_LOCK(imap, agno);
 888
 889	/* Obtain read lock in imap inode.  Don't release it until we have
 890	 * read all of the IAG's that we are going to.
 891	 */
 892	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
 893
 894	/* read the iag.
 895	 */
 896	if ((rc = diIAGRead(imap, iagno, &mp))) {
 897		IREAD_UNLOCK(ipimap);
 898		AG_UNLOCK(imap, agno);
 899		return (rc);
 900	}
 901	iagp = (struct iag *) mp->data;
 902
 903	/* get the inode number and extent number of the inode within
 904	 * the iag and the inode number within the extent.
 905	 */
 906	ino = inum & (INOSPERIAG - 1);
 907	extno = ino >> L2INOSPEREXT;
 908	bitno = ino & (INOSPEREXT - 1);
 909	mask = HIGHORDER >> bitno;
 910
 911	if (!(le32_to_cpu(iagp->wmap[extno]) & mask)) {
 912		jfs_error(ip->i_sb, "wmap shows inode already free\n");
 913	}
 914
 915	if (!addressPXD(&iagp->inoext[extno])) {
 916		release_metapage(mp);
 917		IREAD_UNLOCK(ipimap);
 918		AG_UNLOCK(imap, agno);
 919		jfs_error(ip->i_sb, "invalid inoext\n");
 920		return -EIO;
 921	}
 922
 923	/* compute the bitmap for the extent reflecting the freed inode.
 924	 */
 925	bitmap = le32_to_cpu(iagp->wmap[extno]) & ~mask;
 926
 927	if (imap->im_agctl[agno].numfree > imap->im_agctl[agno].numinos) {
 928		release_metapage(mp);
 929		IREAD_UNLOCK(ipimap);
 930		AG_UNLOCK(imap, agno);
 931		jfs_error(ip->i_sb, "numfree > numinos\n");
 932		return -EIO;
 933	}
 934	/*
 935	 *	inode extent still has some inodes or below low water mark:
 936	 *	keep the inode extent;
 937	 */
 938	if (bitmap ||
 939	    imap->im_agctl[agno].numfree < 96 ||
 940	    (imap->im_agctl[agno].numfree < 288 &&
 941	     (((imap->im_agctl[agno].numfree * 100) /
 942	       imap->im_agctl[agno].numinos) <= 25))) {
 943		/* if the iag currently has no free inodes (i.e.,
 944		 * the inode being freed is the first free inode of iag),
 945		 * insert the iag at head of the inode free list for the ag.
 946		 */
 947		if (iagp->nfreeinos == 0) {
 948			/* check if there are any iags on the ag inode
 949			 * free list.  if so, read the first one so that
 950			 * we can link the current iag onto the list at
 951			 * the head.
 952			 */
 953			if ((fwd = imap->im_agctl[agno].inofree) >= 0) {
 954				/* read the iag that currently is the head
 955				 * of the list.
 956				 */
 957				if ((rc = diIAGRead(imap, fwd, &amp))) {
 958					IREAD_UNLOCK(ipimap);
 959					AG_UNLOCK(imap, agno);
 960					release_metapage(mp);
 961					return (rc);
 962				}
 963				aiagp = (struct iag *) amp->data;
 964
 965				/* make current head point back to the iag.
 966				 */
 967				aiagp->inofreeback = cpu_to_le32(iagno);
 968
 969				write_metapage(amp);
 970			}
 971
 972			/* iag points forward to current head and iag
 973			 * becomes the new head of the list.
 974			 */
 975			iagp->inofreefwd =
 976			    cpu_to_le32(imap->im_agctl[agno].inofree);
 977			iagp->inofreeback = cpu_to_le32(-1);
 978			imap->im_agctl[agno].inofree = iagno;
 979		}
 980		IREAD_UNLOCK(ipimap);
 981
 982		/* update the free inode summary map for the extent if
 983		 * freeing the inode means the extent will now have free
 984		 * inodes (i.e., the inode being freed is the first free
 985		 * inode of extent),
 986		 */
 987		if (iagp->wmap[extno] == cpu_to_le32(ONES)) {
 988			sword = extno >> L2EXTSPERSUM;
 989			bitno = extno & (EXTSPERSUM - 1);
 990			iagp->inosmap[sword] &=
 991			    cpu_to_le32(~(HIGHORDER >> bitno));
 992		}
 993
 994		/* update the bitmap.
 995		 */
 996		iagp->wmap[extno] = cpu_to_le32(bitmap);
 997
 998		/* update the free inode counts at the iag, ag and
 999		 * map level.
1000		 */
1001		le32_add_cpu(&iagp->nfreeinos, 1);
1002		imap->im_agctl[agno].numfree += 1;
1003		atomic_inc(&imap->im_numfree);
1004
1005		/* release the AG inode map lock
1006		 */
1007		AG_UNLOCK(imap, agno);
1008
1009		/* write the iag */
1010		write_metapage(mp);
1011
1012		return (0);
1013	}
1014
1015
1016	/*
1017	 *	inode extent has become free and above low water mark:
1018	 *	free the inode extent;
1019	 */
1020
1021	/*
1022	 *	prepare to update iag list(s) (careful update step 1)
1023	 */
1024	amp = bmp = cmp = dmp = NULL;
1025	fwd = back = -1;
1026
1027	/* check if the iag currently has no free extents.  if so,
1028	 * it will be placed on the head of the ag extent free list.
1029	 */
1030	if (iagp->nfreeexts == 0) {
1031		/* check if the ag extent free list has any iags.
1032		 * if so, read the iag at the head of the list now.
1033		 * this (head) iag will be updated later to reflect
1034		 * the addition of the current iag at the head of
1035		 * the list.
1036		 */
1037		if ((fwd = imap->im_agctl[agno].extfree) >= 0) {
1038			if ((rc = diIAGRead(imap, fwd, &amp)))
1039				goto error_out;
1040			aiagp = (struct iag *) amp->data;
1041		}
1042	} else {
1043		/* iag has free extents. check if the addition of a free
1044		 * extent will cause all extents to be free within this
1045		 * iag.  if so, the iag will be removed from the ag extent
1046		 * free list and placed on the inode map's free iag list.
1047		 */
1048		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG - 1)) {
1049			/* in preparation for removing the iag from the
1050			 * ag extent free list, read the iags preceding
1051			 * and following the iag on the ag extent free
1052			 * list.
1053			 */
1054			if ((fwd = le32_to_cpu(iagp->extfreefwd)) >= 0) {
1055				if ((rc = diIAGRead(imap, fwd, &amp)))
1056					goto error_out;
1057				aiagp = (struct iag *) amp->data;
1058			}
1059
1060			if ((back = le32_to_cpu(iagp->extfreeback)) >= 0) {
1061				if ((rc = diIAGRead(imap, back, &bmp)))
1062					goto error_out;
1063				biagp = (struct iag *) bmp->data;
1064			}
1065		}
1066	}
1067
1068	/* remove the iag from the ag inode free list if freeing
1069	 * this extent cause the iag to have no free inodes.
1070	 */
1071	if (iagp->nfreeinos == cpu_to_le32(INOSPEREXT - 1)) {
1072		int inofreeback = le32_to_cpu(iagp->inofreeback);
1073		int inofreefwd = le32_to_cpu(iagp->inofreefwd);
1074
1075		/* in preparation for removing the iag from the
1076		 * ag inode free list, read the iags preceding
1077		 * and following the iag on the ag inode free
1078		 * list.  before reading these iags, we must make
1079		 * sure that we already don't have them in hand
1080		 * from up above, since re-reading an iag (buffer)
1081		 * we are currently holding would cause a deadlock.
1082		 */
1083		if (inofreefwd >= 0) {
1084
1085			if (inofreefwd == fwd)
1086				ciagp = (struct iag *) amp->data;
1087			else if (inofreefwd == back)
1088				ciagp = (struct iag *) bmp->data;
1089			else {
1090				if ((rc =
1091				     diIAGRead(imap, inofreefwd, &cmp)))
1092					goto error_out;
1093				ciagp = (struct iag *) cmp->data;
1094			}
1095			assert(ciagp != NULL);
1096		}
1097
1098		if (inofreeback >= 0) {
1099			if (inofreeback == fwd)
1100				diagp = (struct iag *) amp->data;
1101			else if (inofreeback == back)
1102				diagp = (struct iag *) bmp->data;
1103			else {
1104				if ((rc =
1105				     diIAGRead(imap, inofreeback, &dmp)))
1106					goto error_out;
1107				diagp = (struct iag *) dmp->data;
1108			}
1109			assert(diagp != NULL);
1110		}
1111	}
1112
1113	IREAD_UNLOCK(ipimap);
1114
1115	/*
1116	 * invalidate any page of the inode extent freed from buffer cache;
1117	 */
1118	freepxd = iagp->inoext[extno];
1119	invalidate_pxd_metapages(ip, freepxd);
1120
1121	/*
1122	 *	update iag list(s) (careful update step 2)
1123	 */
1124	/* add the iag to the ag extent free list if this is the
1125	 * first free extent for the iag.
1126	 */
1127	if (iagp->nfreeexts == 0) {
1128		if (fwd >= 0)
1129			aiagp->extfreeback = cpu_to_le32(iagno);
1130
1131		iagp->extfreefwd =
1132		    cpu_to_le32(imap->im_agctl[agno].extfree);
1133		iagp->extfreeback = cpu_to_le32(-1);
1134		imap->im_agctl[agno].extfree = iagno;
1135	} else {
1136		/* remove the iag from the ag extent list if all extents
1137		 * are now free and place it on the inode map iag free list.
1138		 */
1139		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG - 1)) {
1140			if (fwd >= 0)
1141				aiagp->extfreeback = iagp->extfreeback;
1142
1143			if (back >= 0)
1144				biagp->extfreefwd = iagp->extfreefwd;
1145			else
1146				imap->im_agctl[agno].extfree =
1147				    le32_to_cpu(iagp->extfreefwd);
1148
1149			iagp->extfreefwd = iagp->extfreeback = cpu_to_le32(-1);
1150
1151			IAGFREE_LOCK(imap);
1152			iagp->iagfree = cpu_to_le32(imap->im_freeiag);
1153			imap->im_freeiag = iagno;
1154			IAGFREE_UNLOCK(imap);
1155		}
1156	}
1157
1158	/* remove the iag from the ag inode free list if freeing
1159	 * this extent causes the iag to have no free inodes.
1160	 */
1161	if (iagp->nfreeinos == cpu_to_le32(INOSPEREXT - 1)) {
1162		if ((int) le32_to_cpu(iagp->inofreefwd) >= 0)
1163			ciagp->inofreeback = iagp->inofreeback;
1164
1165		if ((int) le32_to_cpu(iagp->inofreeback) >= 0)
1166			diagp->inofreefwd = iagp->inofreefwd;
1167		else
1168			imap->im_agctl[agno].inofree =
1169			    le32_to_cpu(iagp->inofreefwd);
1170
1171		iagp->inofreefwd = iagp->inofreeback = cpu_to_le32(-1);
1172	}
1173
1174	/* update the inode extent address and working map
1175	 * to reflect the free extent.
1176	 * the permanent map should have been updated already
1177	 * for the inode being freed.
1178	 */
1179	if (iagp->pmap[extno] != 0) {
1180		jfs_error(ip->i_sb, "the pmap does not show inode free\n");
1181	}
1182	iagp->wmap[extno] = 0;
1183	PXDlength(&iagp->inoext[extno], 0);
1184	PXDaddress(&iagp->inoext[extno], 0);
1185
1186	/* update the free extent and free inode summary maps
1187	 * to reflect the freed extent.
1188	 * the inode summary map is marked to indicate no inodes
1189	 * available for the freed extent.
1190	 */
1191	sword = extno >> L2EXTSPERSUM;
1192	bitno = extno & (EXTSPERSUM - 1);
1193	mask = HIGHORDER >> bitno;
1194	iagp->inosmap[sword] |= cpu_to_le32(mask);
1195	iagp->extsmap[sword] &= cpu_to_le32(~mask);
1196
1197	/* update the number of free inodes and number of free extents
1198	 * for the iag.
1199	 */
1200	le32_add_cpu(&iagp->nfreeinos, -(INOSPEREXT - 1));
1201	le32_add_cpu(&iagp->nfreeexts, 1);
1202
1203	/* update the number of free inodes and backed inodes
1204	 * at the ag and inode map level.
1205	 */
1206	imap->im_agctl[agno].numfree -= (INOSPEREXT - 1);
1207	imap->im_agctl[agno].numinos -= INOSPEREXT;
1208	atomic_sub(INOSPEREXT - 1, &imap->im_numfree);
1209	atomic_sub(INOSPEREXT, &imap->im_numinos);
1210
1211	if (amp)
1212		write_metapage(amp);
1213	if (bmp)
1214		write_metapage(bmp);
1215	if (cmp)
1216		write_metapage(cmp);
1217	if (dmp)
1218		write_metapage(dmp);
1219
1220	/*
1221	 * start transaction to update block allocation map
1222	 * for the inode extent freed;
1223	 *
1224	 * N.B. AG_LOCK is released and iag will be released below, and
1225	 * other thread may allocate inode from/reusing the ixad freed
1226	 * BUT with new/different backing inode extent from the extent
1227	 * to be freed by the transaction;
1228	 */
1229	tid = txBegin(ipimap->i_sb, COMMIT_FORCE);
1230	mutex_lock(&JFS_IP(ipimap)->commit_mutex);
1231
1232	/* acquire tlock of the iag page of the freed ixad
1233	 * to force the page NOHOMEOK (even though no data is
1234	 * logged from the iag page) until NOREDOPAGE|FREEXTENT log
1235	 * for the free of the extent is committed;
1236	 * write FREEXTENT|NOREDOPAGE log record
1237	 * N.B. linelock is overlaid as freed extent descriptor;
1238	 */
1239	tlck = txLock(tid, ipimap, mp, tlckINODE | tlckFREE);
1240	pxdlock = (struct pxd_lock *) & tlck->lock;
1241	pxdlock->flag = mlckFREEPXD;
1242	pxdlock->pxd = freepxd;
1243	pxdlock->index = 1;
1244
1245	write_metapage(mp);
1246
1247	iplist[0] = ipimap;
1248
1249	/*
1250	 * logredo needs the IAG number and IAG extent index in order
1251	 * to ensure that the IMap is consistent.  The least disruptive
1252	 * way to pass these values through  to the transaction manager
1253	 * is in the iplist array.
1254	 *
1255	 * It's not pretty, but it works.
1256	 */
1257	iplist[1] = (struct inode *) (size_t)iagno;
1258	iplist[2] = (struct inode *) (size_t)extno;
1259
1260	rc = txCommit(tid, 1, &iplist[0], COMMIT_FORCE);
1261
1262	txEnd(tid);
1263	mutex_unlock(&JFS_IP(ipimap)->commit_mutex);
1264
1265	/* unlock the AG inode map information */
1266	AG_UNLOCK(imap, agno);
1267
1268	return (0);
1269
1270      error_out:
1271	IREAD_UNLOCK(ipimap);
1272
1273	if (amp)
1274		release_metapage(amp);
1275	if (bmp)
1276		release_metapage(bmp);
1277	if (cmp)
1278		release_metapage(cmp);
1279	if (dmp)
1280		release_metapage(dmp);
1281
1282	AG_UNLOCK(imap, agno);
1283
1284	release_metapage(mp);
1285
1286	return (rc);
1287}
1288
1289/*
1290 * There are several places in the diAlloc* routines where we initialize
1291 * the inode.
1292 */
1293static inline void
1294diInitInode(struct inode *ip, int iagno, int ino, int extno, struct iag * iagp)
1295{
1296	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
1297
1298	ip->i_ino = (iagno << L2INOSPERIAG) + ino;
1299	jfs_ip->ixpxd = iagp->inoext[extno];
1300	jfs_ip->agstart = le64_to_cpu(iagp->agstart);
1301	jfs_ip->active_ag = -1;
1302}
1303
1304
1305/*
1306 * NAME:	diAlloc(pip,dir,ip)
1307 *
1308 * FUNCTION:	allocate a disk inode from the inode working map
1309 *		for a fileset or aggregate.
1310 *
1311 * PARAMETERS:
1312 *	pip	- pointer to incore inode for the parent inode.
1313 *	dir	- 'true' if the new disk inode is for a directory.
1314 *	ip	- pointer to a new inode
1315 *
1316 * RETURN VALUES:
1317 *	0	- success.
1318 *	-ENOSPC	- insufficient disk resources.
1319 *	-EIO	- i/o error.
1320 */
1321int diAlloc(struct inode *pip, bool dir, struct inode *ip)
1322{
1323	int rc, ino, iagno, addext, extno, bitno, sword;
1324	int nwords, rem, i, agno;
1325	u32 mask, inosmap, extsmap;
1326	struct inode *ipimap;
1327	struct metapage *mp;
1328	ino_t inum;
1329	struct iag *iagp;
1330	struct inomap *imap;
1331
1332	/* get the pointers to the inode map inode and the
1333	 * corresponding imap control structure.
1334	 */
1335	ipimap = JFS_SBI(pip->i_sb)->ipimap;
1336	imap = JFS_IP(ipimap)->i_imap;
1337	JFS_IP(ip)->ipimap = ipimap;
1338	JFS_IP(ip)->fileset = FILESYSTEM_I;
1339
1340	/* for a directory, the allocation policy is to start
1341	 * at the ag level using the preferred ag.
1342	 */
1343	if (dir) {
1344		agno = dbNextAG(JFS_SBI(pip->i_sb)->ipbmap);
1345		AG_LOCK(imap, agno);
1346		goto tryag;
1347	}
1348
1349	/* for files, the policy starts off by trying to allocate from
1350	 * the same iag containing the parent disk inode:
1351	 * try to allocate the new disk inode close to the parent disk
1352	 * inode, using parent disk inode number + 1 as the allocation
1353	 * hint.  (we use a left-to-right policy to attempt to avoid
1354	 * moving backward on the disk.)  compute the hint within the
1355	 * file system and the iag.
1356	 */
1357
1358	/* get the ag number of this iag */
1359	agno = BLKTOAG(JFS_IP(pip)->agstart, JFS_SBI(pip->i_sb));
1360
1361	if (atomic_read(&JFS_SBI(pip->i_sb)->bmap->db_active[agno])) {
1362		/*
1363		 * There is an open file actively growing.  We want to
1364		 * allocate new inodes from a different ag to avoid
1365		 * fragmentation problems.
1366		 */
1367		agno = dbNextAG(JFS_SBI(pip->i_sb)->ipbmap);
1368		AG_LOCK(imap, agno);
1369		goto tryag;
1370	}
1371
1372	inum = pip->i_ino + 1;
1373	ino = inum & (INOSPERIAG - 1);
1374
1375	/* back off the hint if it is outside of the iag */
1376	if (ino == 0)
1377		inum = pip->i_ino;
1378
1379	/* lock the AG inode map information */
1380	AG_LOCK(imap, agno);
1381
1382	/* Get read lock on imap inode */
1383	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
1384
1385	/* get the iag number and read the iag */
1386	iagno = INOTOIAG(inum);
1387	if ((rc = diIAGRead(imap, iagno, &mp))) {
1388		IREAD_UNLOCK(ipimap);
1389		AG_UNLOCK(imap, agno);
1390		return (rc);
1391	}
1392	iagp = (struct iag *) mp->data;
1393
1394	/* determine if new inode extent is allowed to be added to the iag.
1395	 * new inode extent can be added to the iag if the ag
1396	 * has less than 32 free disk inodes and the iag has free extents.
1397	 */
1398	addext = (imap->im_agctl[agno].numfree < 32 && iagp->nfreeexts);
1399
1400	/*
1401	 *	try to allocate from the IAG
1402	 */
1403	/* check if the inode may be allocated from the iag
1404	 * (i.e. the inode has free inodes or new extent can be added).
1405	 */
1406	if (iagp->nfreeinos || addext) {
1407		/* determine the extent number of the hint.
1408		 */
1409		extno = ino >> L2INOSPEREXT;
1410
1411		/* check if the extent containing the hint has backed
1412		 * inodes.  if so, try to allocate within this extent.
1413		 */
1414		if (addressPXD(&iagp->inoext[extno])) {
1415			bitno = ino & (INOSPEREXT - 1);
1416			if ((bitno =
1417			     diFindFree(le32_to_cpu(iagp->wmap[extno]),
1418					bitno))
1419			    < INOSPEREXT) {
1420				ino = (extno << L2INOSPEREXT) + bitno;
1421
1422				/* a free inode (bit) was found within this
1423				 * extent, so allocate it.
1424				 */
1425				rc = diAllocBit(imap, iagp, ino);
1426				IREAD_UNLOCK(ipimap);
1427				if (rc) {
1428					assert(rc == -EIO);
1429				} else {
1430					/* set the results of the allocation
1431					 * and write the iag.
1432					 */
1433					diInitInode(ip, iagno, ino, extno,
1434						    iagp);
1435					mark_metapage_dirty(mp);
1436				}
1437				release_metapage(mp);
1438
1439				/* free the AG lock and return.
1440				 */
1441				AG_UNLOCK(imap, agno);
1442				return (rc);
1443			}
1444
1445			if (!addext)
1446				extno =
1447				    (extno ==
1448				     EXTSPERIAG - 1) ? 0 : extno + 1;
1449		}
1450
1451		/*
1452		 * no free inodes within the extent containing the hint.
1453		 *
1454		 * try to allocate from the backed extents following
1455		 * hint or, if appropriate (i.e. addext is true), allocate
1456		 * an extent of free inodes at or following the extent
1457		 * containing the hint.
1458		 *
1459		 * the free inode and free extent summary maps are used
1460		 * here, so determine the starting summary map position
1461		 * and the number of words we'll have to examine.  again,
1462		 * the approach is to allocate following the hint, so we
1463		 * might have to initially ignore prior bits of the summary
1464		 * map that represent extents prior to the extent containing
1465		 * the hint and later revisit these bits.
1466		 */
1467		bitno = extno & (EXTSPERSUM - 1);
1468		nwords = (bitno == 0) ? SMAPSZ : SMAPSZ + 1;
1469		sword = extno >> L2EXTSPERSUM;
1470
1471		/* mask any prior bits for the starting words of the
1472		 * summary map.
1473		 */
1474		mask = (bitno == 0) ? 0 : (ONES << (EXTSPERSUM - bitno));
1475		inosmap = le32_to_cpu(iagp->inosmap[sword]) | mask;
1476		extsmap = le32_to_cpu(iagp->extsmap[sword]) | mask;
1477
1478		/* scan the free inode and free extent summary maps for
1479		 * free resources.
1480		 */
1481		for (i = 0; i < nwords; i++) {
1482			/* check if this word of the free inode summary
1483			 * map describes an extent with free inodes.
1484			 */
1485			if (~inosmap) {
1486				/* an extent with free inodes has been
1487				 * found. determine the extent number
1488				 * and the inode number within the extent.
1489				 */
1490				rem = diFindFree(inosmap, 0);
1491				extno = (sword << L2EXTSPERSUM) + rem;
1492				rem = diFindFree(le32_to_cpu(iagp->wmap[extno]),
1493						 0);
1494				if (rem >= INOSPEREXT) {
1495					IREAD_UNLOCK(ipimap);
1496					release_metapage(mp);
1497					AG_UNLOCK(imap, agno);
1498					jfs_error(ip->i_sb,
1499						  "can't find free bit in wmap\n");
1500					return -EIO;
1501				}
1502
1503				/* determine the inode number within the
1504				 * iag and allocate the inode from the
1505				 * map.
1506				 */
1507				ino = (extno << L2INOSPEREXT) + rem;
1508				rc = diAllocBit(imap, iagp, ino);
1509				IREAD_UNLOCK(ipimap);
1510				if (rc)
1511					assert(rc == -EIO);
1512				else {
1513					/* set the results of the allocation
1514					 * and write the iag.
1515					 */
1516					diInitInode(ip, iagno, ino, extno,
1517						    iagp);
1518					mark_metapage_dirty(mp);
1519				}
1520				release_metapage(mp);
1521
1522				/* free the AG lock and return.
1523				 */
1524				AG_UNLOCK(imap, agno);
1525				return (rc);
1526
1527			}
1528
1529			/* check if we may allocate an extent of free
1530			 * inodes and whether this word of the free
1531			 * extents summary map describes a free extent.
1532			 */
1533			if (addext && ~extsmap) {
1534				/* a free extent has been found.  determine
1535				 * the extent number.
1536				 */
1537				rem = diFindFree(extsmap, 0);
1538				extno = (sword << L2EXTSPERSUM) + rem;
1539
1540				/* allocate an extent of free inodes.
1541				 */
1542				if ((rc = diNewExt(imap, iagp, extno))) {
1543					/* if there is no disk space for a
1544					 * new extent, try to allocate the
1545					 * disk inode from somewhere else.
1546					 */
1547					if (rc == -ENOSPC)
1548						break;
1549
1550					assert(rc == -EIO);
1551				} else {
1552					/* set the results of the allocation
1553					 * and write the iag.
1554					 */
1555					diInitInode(ip, iagno,
1556						    extno << L2INOSPEREXT,
1557						    extno, iagp);
1558					mark_metapage_dirty(mp);
1559				}
1560				release_metapage(mp);
1561				/* free the imap inode & the AG lock & return.
1562				 */
1563				IREAD_UNLOCK(ipimap);
1564				AG_UNLOCK(imap, agno);
1565				return (rc);
1566			}
1567
1568			/* move on to the next set of summary map words.
1569			 */
1570			sword = (sword == SMAPSZ - 1) ? 0 : sword + 1;
1571			inosmap = le32_to_cpu(iagp->inosmap[sword]);
1572			extsmap = le32_to_cpu(iagp->extsmap[sword]);
1573		}
1574	}
1575	/* unlock imap inode */
1576	IREAD_UNLOCK(ipimap);
1577
1578	/* nothing doing in this iag, so release it. */
1579	release_metapage(mp);
1580
1581      tryag:
1582	/*
1583	 * try to allocate anywhere within the same AG as the parent inode.
1584	 */
1585	rc = diAllocAG(imap, agno, dir, ip);
1586
1587	AG_UNLOCK(imap, agno);
1588
1589	if (rc != -ENOSPC)
1590		return (rc);
1591
1592	/*
1593	 * try to allocate in any AG.
1594	 */
1595	return (diAllocAny(imap, agno, dir, ip));
1596}
1597
1598
1599/*
1600 * NAME:	diAllocAG(imap,agno,dir,ip)
1601 *
1602 * FUNCTION:	allocate a disk inode from the allocation group.
1603 *
1604 *		this routine first determines if a new extent of free
1605 *		inodes should be added for the allocation group, with
1606 *		the current request satisfied from this extent. if this
1607 *		is the case, an attempt will be made to do just that.  if
1608 *		this attempt fails or it has been determined that a new
1609 *		extent should not be added, an attempt is made to satisfy
1610 *		the request by allocating an existing (backed) free inode
1611 *		from the allocation group.
1612 *
1613 * PRE CONDITION: Already have the AG lock for this AG.
1614 *
1615 * PARAMETERS:
1616 *	imap	- pointer to inode map control structure.
1617 *	agno	- allocation group to allocate from.
1618 *	dir	- 'true' if the new disk inode is for a directory.
1619 *	ip	- pointer to the new inode to be filled in on successful return
1620 *		  with the disk inode number allocated, its extent address
1621 *		  and the start of the ag.
1622 *
1623 * RETURN VALUES:
1624 *	0	- success.
1625 *	-ENOSPC	- insufficient disk resources.
1626 *	-EIO	- i/o error.
1627 */
1628static int
1629diAllocAG(struct inomap * imap, int agno, bool dir, struct inode *ip)
1630{
1631	int rc, addext, numfree, numinos;
1632
1633	/* get the number of free and the number of backed disk
1634	 * inodes currently within the ag.
1635	 */
1636	numfree = imap->im_agctl[agno].numfree;
1637	numinos = imap->im_agctl[agno].numinos;
1638
1639	if (numfree > numinos) {
1640		jfs_error(ip->i_sb, "numfree > numinos\n");
1641		return -EIO;
1642	}
1643
1644	/* determine if we should allocate a new extent of free inodes
1645	 * within the ag: for directory inodes, add a new extent
1646	 * if there are a small number of free inodes or number of free
1647	 * inodes is a small percentage of the number of backed inodes.
1648	 */
1649	if (dir)
1650		addext = (numfree < 64 ||
1651			  (numfree < 256
1652			   && ((numfree * 100) / numinos) <= 20));
1653	else
1654		addext = (numfree == 0);
1655
1656	/*
1657	 * try to allocate a new extent of free inodes.
1658	 */
1659	if (addext) {
1660		/* if free space is not available for this new extent, try
1661		 * below to allocate a free and existing (already backed)
1662		 * inode from the ag.
1663		 */
1664		if ((rc = diAllocExt(imap, agno, ip)) != -ENOSPC)
1665			return (rc);
1666	}
1667
1668	/*
1669	 * try to allocate an existing free inode from the ag.
1670	 */
1671	return (diAllocIno(imap, agno, ip));
1672}
1673
1674
1675/*
1676 * NAME:	diAllocAny(imap,agno,dir,iap)
1677 *
1678 * FUNCTION:	allocate a disk inode from any other allocation group.
1679 *
1680 *		this routine is called when an allocation attempt within
1681 *		the primary allocation group has failed. if attempts to
1682 *		allocate an inode from any allocation group other than the
1683 *		specified primary group.
1684 *
1685 * PARAMETERS:
1686 *	imap	- pointer to inode map control structure.
1687 *	agno	- primary allocation group (to avoid).
1688 *	dir	- 'true' if the new disk inode is for a directory.
1689 *	ip	- pointer to a new inode to be filled in on successful return
1690 *		  with the disk inode number allocated, its extent address
1691 *		  and the start of the ag.
1692 *
1693 * RETURN VALUES:
1694 *	0	- success.
1695 *	-ENOSPC	- insufficient disk resources.
1696 *	-EIO	- i/o error.
1697 */
1698static int
1699diAllocAny(struct inomap * imap, int agno, bool dir, struct inode *ip)
1700{
1701	int ag, rc;
1702	int maxag = JFS_SBI(imap->im_ipimap->i_sb)->bmap->db_maxag;
1703
1704
1705	/* try to allocate from the ags following agno up to
1706	 * the maximum ag number.
1707	 */
1708	for (ag = agno + 1; ag <= maxag; ag++) {
1709		AG_LOCK(imap, ag);
1710
1711		rc = diAllocAG(imap, ag, dir, ip);
1712
1713		AG_UNLOCK(imap, ag);
1714
1715		if (rc != -ENOSPC)
1716			return (rc);
1717	}
1718
1719	/* try to allocate from the ags in front of agno.
1720	 */
1721	for (ag = 0; ag < agno; ag++) {
1722		AG_LOCK(imap, ag);
1723
1724		rc = diAllocAG(imap, ag, dir, ip);
1725
1726		AG_UNLOCK(imap, ag);
1727
1728		if (rc != -ENOSPC)
1729			return (rc);
1730	}
1731
1732	/* no free disk inodes.
1733	 */
1734	return -ENOSPC;
1735}
1736
1737
1738/*
1739 * NAME:	diAllocIno(imap,agno,ip)
1740 *
1741 * FUNCTION:	allocate a disk inode from the allocation group's free
1742 *		inode list, returning an error if this free list is
1743 *		empty (i.e. no iags on the list).
1744 *
1745 *		allocation occurs from the first iag on the list using
1746 *		the iag's free inode summary map to find the leftmost
1747 *		free inode in the iag.
1748 *
1749 * PRE CONDITION: Already have AG lock for this AG.
1750 *
1751 * PARAMETERS:
1752 *	imap	- pointer to inode map control structure.
1753 *	agno	- allocation group.
1754 *	ip	- pointer to new inode to be filled in on successful return
1755 *		  with the disk inode number allocated, its extent address
1756 *		  and the start of the ag.
1757 *
1758 * RETURN VALUES:
1759 *	0	- success.
1760 *	-ENOSPC	- insufficient disk resources.
1761 *	-EIO	- i/o error.
1762 */
1763static int diAllocIno(struct inomap * imap, int agno, struct inode *ip)
1764{
1765	int iagno, ino, rc, rem, extno, sword;
1766	struct metapage *mp;
1767	struct iag *iagp;
1768
1769	/* check if there are iags on the ag's free inode list.
1770	 */
1771	if ((iagno = imap->im_agctl[agno].inofree) < 0)
1772		return -ENOSPC;
1773
1774	/* obtain read lock on imap inode */
1775	IREAD_LOCK(imap->im_ipimap, RDWRLOCK_IMAP);
1776
1777	/* read the iag at the head of the list.
1778	 */
1779	if ((rc = diIAGRead(imap, iagno, &mp))) {
1780		IREAD_UNLOCK(imap->im_ipimap);
1781		return (rc);
1782	}
1783	iagp = (struct iag *) mp->data;
1784
1785	/* better be free inodes in this iag if it is on the
1786	 * list.
1787	 */
1788	if (!iagp->nfreeinos) {
1789		IREAD_UNLOCK(imap->im_ipimap);
1790		release_metapage(mp);
1791		jfs_error(ip->i_sb, "nfreeinos = 0, but iag on freelist\n");
1792		return -EIO;
1793	}
1794
1795	/* scan the free inode summary map to find an extent
1796	 * with free inodes.
1797	 */
1798	for (sword = 0;; sword++) {
1799		if (sword >= SMAPSZ) {
1800			IREAD_UNLOCK(imap->im_ipimap);
1801			release_metapage(mp);
1802			jfs_error(ip->i_sb,
1803				  "free inode not found in summary map\n");
1804			return -EIO;
1805		}
1806
1807		if (~iagp->inosmap[sword])
1808			break;
1809	}
1810
1811	/* found a extent with free inodes. determine
1812	 * the extent number.
1813	 */
1814	rem = diFindFree(le32_to_cpu(iagp->inosmap[sword]), 0);
1815	if (rem >= EXTSPERSUM) {
1816		IREAD_UNLOCK(imap->im_ipimap);
1817		release_metapage(mp);
1818		jfs_error(ip->i_sb, "no free extent found\n");
1819		return -EIO;
1820	}
1821	extno = (sword << L2EXTSPERSUM) + rem;
1822
1823	/* find the first free inode in the extent.
1824	 */
1825	rem = diFindFree(le32_to_cpu(iagp->wmap[extno]), 0);
1826	if (rem >= INOSPEREXT) {
1827		IREAD_UNLOCK(imap->im_ipimap);
1828		release_metapage(mp);
1829		jfs_error(ip->i_sb, "free inode not found\n");
1830		return -EIO;
1831	}
1832
1833	/* compute the inode number within the iag.
1834	 */
1835	ino = (extno << L2INOSPEREXT) + rem;
1836
1837	/* allocate the inode.
1838	 */
1839	rc = diAllocBit(imap, iagp, ino);
1840	IREAD_UNLOCK(imap->im_ipimap);
1841	if (rc) {
1842		release_metapage(mp);
1843		return (rc);
1844	}
1845
1846	/* set the results of the allocation and write the iag.
1847	 */
1848	diInitInode(ip, iagno, ino, extno, iagp);
1849	write_metapage(mp);
1850
1851	return (0);
1852}
1853
1854
1855/*
1856 * NAME:	diAllocExt(imap,agno,ip)
1857 *
1858 * FUNCTION:	add a new extent of free inodes to an iag, allocating
1859 *		an inode from this extent to satisfy the current allocation
1860 *		request.
1861 *
1862 *		this routine first tries to find an existing iag with free
1863 *		extents through the ag free extent list.  if list is not
1864 *		empty, the head of the list will be selected as the home
1865 *		of the new extent of free inodes.  otherwise (the list is
1866 *		empty), a new iag will be allocated for the ag to contain
1867 *		the extent.
1868 *
1869 *		once an iag has been selected, the free extent summary map
1870 *		is used to locate a free extent within the iag and diNewExt()
1871 *		is called to initialize the extent, with initialization
1872 *		including the allocation of the first inode of the extent
1873 *		for the purpose of satisfying this request.
1874 *
1875 * PARAMETERS:
1876 *	imap	- pointer to inode map control structure.
1877 *	agno	- allocation group number.
1878 *	ip	- pointer to new inode to be filled in on successful return
1879 *		  with the disk inode number allocated, its extent address
1880 *		  and the start of the ag.
1881 *
1882 * RETURN VALUES:
1883 *	0	- success.
1884 *	-ENOSPC	- insufficient disk resources.
1885 *	-EIO	- i/o error.
1886 */
1887static int diAllocExt(struct inomap * imap, int agno, struct inode *ip)
1888{
1889	int rem, iagno, sword, extno, rc;
1890	struct metapage *mp;
1891	struct iag *iagp;
1892
1893	/* check if the ag has any iags with free extents.  if not,
1894	 * allocate a new iag for the ag.
1895	 */
1896	if ((iagno = imap->im_agctl[agno].extfree) < 0) {
1897		/* If successful, diNewIAG will obtain the read lock on the
1898		 * imap inode.
1899		 */
1900		if ((rc = diNewIAG(imap, &iagno, agno, &mp))) {
1901			return (rc);
1902		}
1903		iagp = (struct iag *) mp->data;
1904
1905		/* set the ag number if this a brand new iag
1906		 */
1907		iagp->agstart =
1908		    cpu_to_le64(AGTOBLK(agno, imap->im_ipimap));
1909	} else {
1910		/* read the iag.
1911		 */
1912		IREAD_LOCK(imap->im_ipimap, RDWRLOCK_IMAP);
1913		if ((rc = diIAGRead(imap, iagno, &mp))) {
1914			IREAD_UNLOCK(imap->im_ipimap);
1915			jfs_error(ip->i_sb, "error reading iag\n");
1916			return rc;
1917		}
1918		iagp = (struct iag *) mp->data;
1919	}
1920
1921	/* using the free extent summary map, find a free extent.
1922	 */
1923	for (sword = 0;; sword++) {
1924		if (sword >= SMAPSZ) {
1925			release_metapage(mp);
1926			IREAD_UNLOCK(imap->im_ipimap);
1927			jfs_error(ip->i_sb, "free ext summary map not found\n");
1928			return -EIO;
1929		}
1930		if (~iagp->extsmap[sword])
1931			break;
1932	}
1933
1934	/* determine the extent number of the free extent.
1935	 */
1936	rem = diFindFree(le32_to_cpu(iagp->extsmap[sword]), 0);
1937	if (rem >= EXTSPERSUM) {
1938		release_metapage(mp);
1939		IREAD_UNLOCK(imap->im_ipimap);
1940		jfs_error(ip->i_sb, "free extent not found\n");
1941		return -EIO;
1942	}
1943	extno = (sword << L2EXTSPERSUM) + rem;
1944
1945	/* initialize the new extent.
1946	 */
1947	rc = diNewExt(imap, iagp, extno);
1948	IREAD_UNLOCK(imap->im_ipimap);
1949	if (rc) {
1950		/* something bad happened.  if a new iag was allocated,
1951		 * place it back on the inode map's iag free list, and
1952		 * clear the ag number information.
1953		 */
1954		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG)) {
1955			IAGFREE_LOCK(imap);
1956			iagp->iagfree = cpu_to_le32(imap->im_freeiag);
1957			imap->im_freeiag = iagno;
1958			IAGFREE_UNLOCK(imap);
1959		}
1960		write_metapage(mp);
1961		return (rc);
1962	}
1963
1964	/* set the results of the allocation and write the iag.
1965	 */
1966	diInitInode(ip, iagno, extno << L2INOSPEREXT, extno, iagp);
1967
1968	write_metapage(mp);
1969
1970	return (0);
1971}
1972
1973
1974/*
1975 * NAME:	diAllocBit(imap,iagp,ino)
1976 *
1977 * FUNCTION:	allocate a backed inode from an iag.
1978 *
1979 *		this routine performs the mechanics of allocating a
1980 *		specified inode from a backed extent.
1981 *
1982 *		if the inode to be allocated represents the last free
1983 *		inode within the iag, the iag will be removed from the
1984 *		ag free inode list.
1985 *
1986 *		a careful update approach is used to provide consistency
1987 *		in the face of updates to multiple buffers.  under this
1988 *		approach, all required buffers are obtained before making
1989 *		any updates and are held all are updates are complete.
1990 *
1991 * PRE CONDITION: Already have buffer lock on iagp.  Already have AG lock on
1992 *	this AG.  Must have read lock on imap inode.
1993 *
1994 * PARAMETERS:
1995 *	imap	- pointer to inode map control structure.
1996 *	iagp	- pointer to iag.
1997 *	ino	- inode number to be allocated within the iag.
1998 *
1999 * RETURN VALUES:
2000 *	0	- success.
2001 *	-ENOSPC	- insufficient disk resources.
2002 *	-EIO	- i/o error.
2003 */
2004static int diAllocBit(struct inomap * imap, struct iag * iagp, int ino)
2005{
2006	int extno, bitno, agno, sword, rc;
2007	struct metapage *amp = NULL, *bmp = NULL;
2008	struct iag *aiagp = NULL, *biagp = NULL;
2009	u32 mask;
2010
2011	/* check if this is the last free inode within the iag.
2012	 * if so, it will have to be removed from the ag free
2013	 * inode list, so get the iags preceding and following
2014	 * it on the list.
2015	 */
2016	if (iagp->nfreeinos == cpu_to_le32(1)) {
2017		if ((int) le32_to_cpu(iagp->inofreefwd) >= 0) {
2018			if ((rc =
2019			     diIAGRead(imap, le32_to_cpu(iagp->inofreefwd),
2020				       &amp)))
2021				return (rc);
2022			aiagp = (struct iag *) amp->data;
2023		}
2024
2025		if ((int) le32_to_cpu(iagp->inofreeback) >= 0) {
2026			if ((rc =
2027			     diIAGRead(imap,
2028				       le32_to_cpu(iagp->inofreeback),
2029				       &bmp))) {
2030				if (amp)
2031					release_metapage(amp);
2032				return (rc);
2033			}
2034			biagp = (struct iag *) bmp->data;
2035		}
2036	}
2037
2038	/* get the ag number, extent number, inode number within
2039	 * the extent.
2040	 */
2041	agno = BLKTOAG(le64_to_cpu(iagp->agstart), JFS_SBI(imap->im_ipimap->i_sb));
2042	extno = ino >> L2INOSPEREXT;
2043	bitno = ino & (INOSPEREXT - 1);
2044
2045	/* compute the mask for setting the map.
2046	 */
2047	mask = HIGHORDER >> bitno;
2048
2049	/* the inode should be free and backed.
2050	 */
2051	if (((le32_to_cpu(iagp->pmap[extno]) & mask) != 0) ||
2052	    ((le32_to_cpu(iagp->wmap[extno]) & mask) != 0) ||
2053	    (addressPXD(&iagp->inoext[extno]) == 0)) {
2054		if (amp)
2055			release_metapage(amp);
2056		if (bmp)
2057			release_metapage(bmp);
2058
2059		jfs_error(imap->im_ipimap->i_sb, "iag inconsistent\n");
2060		return -EIO;
2061	}
2062
2063	/* mark the inode as allocated in the working map.
2064	 */
2065	iagp->wmap[extno] |= cpu_to_le32(mask);
2066
2067	/* check if all inodes within the extent are now
2068	 * allocated.  if so, update the free inode summary
2069	 * map to reflect this.
2070	 */
2071	if (iagp->wmap[extno] == cpu_to_le32(ONES)) {
2072		sword = extno >> L2EXTSPERSUM;
2073		bitno = extno & (EXTSPERSUM - 1);
2074		iagp->inosmap[sword] |= cpu_to_le32(HIGHORDER >> bitno);
2075	}
2076
2077	/* if this was the last free inode in the iag, remove the
2078	 * iag from the ag free inode list.
2079	 */
2080	if (iagp->nfreeinos == cpu_to_le32(1)) {
2081		if (amp) {
2082			aiagp->inofreeback = iagp->inofreeback;
2083			write_metapage(amp);
2084		}
2085
2086		if (bmp) {
2087			biagp->inofreefwd = iagp->inofreefwd;
2088			write_metapage(bmp);
2089		} else {
2090			imap->im_agctl[agno].inofree =
2091			    le32_to_cpu(iagp->inofreefwd);
2092		}
2093		iagp->inofreefwd = iagp->inofreeback = cpu_to_le32(-1);
2094	}
2095
2096	/* update the free inode count at the iag, ag, inode
2097	 * map levels.
2098	 */
2099	le32_add_cpu(&iagp->nfreeinos, -1);
2100	imap->im_agctl[agno].numfree -= 1;
2101	atomic_dec(&imap->im_numfree);
2102
2103	return (0);
2104}
2105
2106
2107/*
2108 * NAME:	diNewExt(imap,iagp,extno)
2109 *
2110 * FUNCTION:	initialize a new extent of inodes for an iag, allocating
2111 *		the first inode of the extent for use for the current
2112 *		allocation request.
2113 *
2114 *		disk resources are allocated for the new extent of inodes
2115 *		and the inodes themselves are initialized to reflect their
2116 *		existence within the extent (i.e. their inode numbers and
2117 *		inode extent addresses are set) and their initial state
2118 *		(mode and link count are set to zero).
2119 *
2120 *		if the iag is new, it is not yet on an ag extent free list
2121 *		but will now be placed on this list.
2122 *
2123 *		if the allocation of the new extent causes the iag to
2124 *		have no free extent, the iag will be removed from the
2125 *		ag extent free list.
2126 *
2127 *		if the iag has no free backed inodes, it will be placed
2128 *		on the ag free inode list, since the addition of the new
2129 *		extent will now cause it to have free inodes.
2130 *
2131 *		a careful update approach is used to provide consistency
2132 *		(i.e. list consistency) in the face of updates to multiple
2133 *		buffers.  under this approach, all required buffers are
2134 *		obtained before making any updates and are held until all
2135 *		updates are complete.
2136 *
2137 * PRE CONDITION: Already have buffer lock on iagp.  Already have AG lock on
2138 *	this AG.  Must have read lock on imap inode.
2139 *
2140 * PARAMETERS:
2141 *	imap	- pointer to inode map control structure.
2142 *	iagp	- pointer to iag.
2143 *	extno	- extent number.
2144 *
2145 * RETURN VALUES:
2146 *	0	- success.
2147 *	-ENOSPC	- insufficient disk resources.
2148 *	-EIO	- i/o error.
2149 */
2150static int diNewExt(struct inomap * imap, struct iag * iagp, int extno)
2151{
2152	int agno, iagno, fwd, back, freei = 0, sword, rc;
2153	struct iag *aiagp = NULL, *biagp = NULL, *ciagp = NULL;
2154	struct metapage *amp, *bmp, *cmp, *dmp;
2155	struct inode *ipimap;
2156	s64 blkno, hint;
2157	int i, j;
2158	u32 mask;
2159	ino_t ino;
2160	struct dinode *dp;
2161	struct jfs_sb_info *sbi;
2162
2163	/* better have free extents.
2164	 */
2165	if (!iagp->nfreeexts) {
2166		jfs_error(imap->im_ipimap->i_sb, "no free extents\n");
2167		return -EIO;
2168	}
2169
2170	/* get the inode map inode.
2171	 */
2172	ipimap = imap->im_ipimap;
2173	sbi = JFS_SBI(ipimap->i_sb);
2174
2175	amp = bmp = cmp = NULL;
2176
2177	/* get the ag and iag numbers for this iag.
2178	 */
2179	agno = BLKTOAG(le64_to_cpu(iagp->agstart), sbi);
2180	iagno = le32_to_cpu(iagp->iagnum);
2181
2182	/* check if this is the last free extent within the
2183	 * iag.  if so, the iag must be removed from the ag
2184	 * free extent list, so get the iags preceding and
2185	 * following the iag on this list.
2186	 */
2187	if (iagp->nfreeexts == cpu_to_le32(1)) {
2188		if ((fwd = le32_to_cpu(iagp->extfreefwd)) >= 0) {
2189			if ((rc = diIAGRead(imap, fwd, &amp)))
2190				return (rc);
2191			aiagp = (struct iag *) amp->data;
2192		}
2193
2194		if ((back = le32_to_cpu(iagp->extfreeback)) >= 0) {
2195			if ((rc = diIAGRead(imap, back, &bmp)))
2196				goto error_out;
2197			biagp = (struct iag *) bmp->data;
2198		}
2199	} else {
2200		/* the iag has free extents.  if all extents are free
2201		 * (as is the case for a newly allocated iag), the iag
2202		 * must be added to the ag free extent list, so get
2203		 * the iag at the head of the list in preparation for
2204		 * adding this iag to this list.
2205		 */
2206		fwd = back = -1;
2207		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG)) {
2208			if ((fwd = imap->im_agctl[agno].extfree) >= 0) {
2209				if ((rc = diIAGRead(imap, fwd, &amp)))
2210					goto error_out;
2211				aiagp = (struct iag *) amp->data;
2212			}
2213		}
2214	}
2215
2216	/* check if the iag has no free inodes.  if so, the iag
2217	 * will have to be added to the ag free inode list, so get
2218	 * the iag at the head of the list in preparation for
2219	 * adding this iag to this list.  in doing this, we must
2220	 * check if we already have the iag at the head of
2221	 * the list in hand.
2222	 */
2223	if (iagp->nfreeinos == 0) {
2224		freei = imap->im_agctl[agno].inofree;
2225
2226		if (freei >= 0) {
2227			if (freei == fwd) {
2228				ciagp = aiagp;
2229			} else if (freei == back) {
2230				ciagp = biagp;
2231			} else {
2232				if ((rc = diIAGRead(imap, freei, &cmp)))
2233					goto error_out;
2234				ciagp = (struct iag *) cmp->data;
2235			}
2236			if (ciagp == NULL) {
2237				jfs_error(imap->im_ipimap->i_sb,
2238					  "ciagp == NULL\n");
2239				rc = -EIO;
2240				goto error_out;
2241			}
2242		}
2243	}
2244
2245	/* allocate disk space for the inode extent.
2246	 */
2247	if ((extno == 0) || (addressPXD(&iagp->inoext[extno - 1]) == 0))
2248		hint = ((s64) agno << sbi->bmap->db_agl2size) - 1;
2249	else
2250		hint = addressPXD(&iagp->inoext[extno - 1]) +
2251		    lengthPXD(&iagp->inoext[extno - 1]) - 1;
2252
2253	if ((rc = dbAlloc(ipimap, hint, (s64) imap->im_nbperiext, &blkno)))
2254		goto error_out;
2255
2256	/* compute the inode number of the first inode within the
2257	 * extent.
2258	 */
2259	ino = (iagno << L2INOSPERIAG) + (extno << L2INOSPEREXT);
2260
2261	/* initialize the inodes within the newly allocated extent a
2262	 * page at a time.
2263	 */
2264	for (i = 0; i < imap->im_nbperiext; i += sbi->nbperpage) {
2265		/* get a buffer for this page of disk inodes.
2266		 */
2267		dmp = get_metapage(ipimap, blkno + i, PSIZE, 1);
2268		if (dmp == NULL) {
2269			rc = -EIO;
2270			goto error_out;
2271		}
2272		dp = (struct dinode *) dmp->data;
2273
2274		/* initialize the inode number, mode, link count and
2275		 * inode extent address.
2276		 */
2277		for (j = 0; j < INOSPERPAGE; j++, dp++, ino++) {
2278			dp->di_inostamp = cpu_to_le32(sbi->inostamp);
2279			dp->di_number = cpu_to_le32(ino);
2280			dp->di_fileset = cpu_to_le32(FILESYSTEM_I);
2281			dp->di_mode = 0;
2282			dp->di_nlink = 0;
2283			PXDaddress(&(dp->di_ixpxd), blkno);
2284			PXDlength(&(dp->di_ixpxd), imap->im_nbperiext);
2285		}
2286		write_metapage(dmp);
2287	}
2288
2289	/* if this is the last free extent within the iag, remove the
2290	 * iag from the ag free extent list.
2291	 */
2292	if (iagp->nfreeexts == cpu_to_le32(1)) {
2293		if (fwd >= 0)
2294			aiagp->extfreeback = iagp->extfreeback;
2295
2296		if (back >= 0)
2297			biagp->extfreefwd = iagp->extfreefwd;
2298		else
2299			imap->im_agctl[agno].extfree =
2300			    le32_to_cpu(iagp->extfreefwd);
2301
2302		iagp->extfreefwd = iagp->extfreeback = cpu_to_le32(-1);
2303	} else {
2304		/* if the iag has all free extents (newly allocated iag),
2305		 * add the iag to the ag free extent list.
2306		 */
2307		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG)) {
2308			if (fwd >= 0)
2309				aiagp->extfreeback = cpu_to_le32(iagno);
2310
2311			iagp->extfreefwd = cpu_to_le32(fwd);
2312			iagp->extfreeback = cpu_to_le32(-1);
2313			imap->im_agctl[agno].extfree = iagno;
2314		}
2315	}
2316
2317	/* if the iag has no free inodes, add the iag to the
2318	 * ag free inode list.
2319	 */
2320	if (iagp->nfreeinos == 0) {
2321		if (freei >= 0)
2322			ciagp->inofreeback = cpu_to_le32(iagno);
2323
2324		iagp->inofreefwd =
2325		    cpu_to_le32(imap->im_agctl[agno].inofree);
2326		iagp->inofreeback = cpu_to_le32(-1);
2327		imap->im_agctl[agno].inofree = iagno;
2328	}
2329
2330	/* initialize the extent descriptor of the extent. */
2331	PXDlength(&iagp->inoext[extno], imap->im_nbperiext);
2332	PXDaddress(&iagp->inoext[extno], blkno);
2333
2334	/* initialize the working and persistent map of the extent.
2335	 * the working map will be initialized such that
2336	 * it indicates the first inode of the extent is allocated.
2337	 */
2338	iagp->wmap[extno] = cpu_to_le32(HIGHORDER);
2339	iagp->pmap[extno] = 0;
2340
2341	/* update the free inode and free extent summary maps
2342	 * for the extent to indicate the extent has free inodes
2343	 * and no longer represents a free extent.
2344	 */
2345	sword = extno >> L2EXTSPERSUM;
2346	mask = HIGHORDER >> (extno & (EXTSPERSUM - 1));
2347	iagp->extsmap[sword] |= cpu_to_le32(mask);
2348	iagp->inosmap[sword] &= cpu_to_le32(~mask);
2349
2350	/* update the free inode and free extent counts for the
2351	 * iag.
2352	 */
2353	le32_add_cpu(&iagp->nfreeinos, (INOSPEREXT - 1));
2354	le32_add_cpu(&iagp->nfreeexts, -1);
2355
2356	/* update the free and backed inode counts for the ag.
2357	 */
2358	imap->im_agctl[agno].numfree += (INOSPEREXT - 1);
2359	imap->im_agctl[agno].numinos += INOSPEREXT;
2360
2361	/* update the free and backed inode counts for the inode map.
2362	 */
2363	atomic_add(INOSPEREXT - 1, &imap->im_numfree);
2364	atomic_add(INOSPEREXT, &imap->im_numinos);
2365
2366	/* write the iags.
2367	 */
2368	if (amp)
2369		write_metapage(amp);
2370	if (bmp)
2371		write_metapage(bmp);
2372	if (cmp)
2373		write_metapage(cmp);
2374
2375	return (0);
2376
2377      error_out:
2378
2379	/* release the iags.
2380	 */
2381	if (amp)
2382		release_metapage(amp);
2383	if (bmp)
2384		release_metapage(bmp);
2385	if (cmp)
2386		release_metapage(cmp);
2387
2388	return (rc);
2389}
2390
2391
2392/*
2393 * NAME:	diNewIAG(imap,iagnop,agno)
2394 *
2395 * FUNCTION:	allocate a new iag for an allocation group.
2396 *
2397 *		first tries to allocate the iag from the inode map
2398 *		iagfree list:
2399 *		if the list has free iags, the head of the list is removed
2400 *		and returned to satisfy the request.
2401 *		if the inode map's iag free list is empty, the inode map
2402 *		is extended to hold a new iag. this new iag is initialized
2403 *		and returned to satisfy the request.
2404 *
2405 * PARAMETERS:
2406 *	imap	- pointer to inode map control structure.
2407 *	iagnop	- pointer to an iag number set with the number of the
2408 *		  newly allocated iag upon successful return.
2409 *	agno	- allocation group number.
2410 *	bpp	- Buffer pointer to be filled in with new IAG's buffer
2411 *
2412 * RETURN VALUES:
2413 *	0	- success.
2414 *	-ENOSPC	- insufficient disk resources.
2415 *	-EIO	- i/o error.
2416 *
2417 * serialization:
2418 *	AG lock held on entry/exit;
2419 *	write lock on the map is held inside;
2420 *	read lock on the map is held on successful completion;
2421 *
2422 * note: new iag transaction:
2423 * . synchronously write iag;
2424 * . write log of xtree and inode of imap;
2425 * . commit;
2426 * . synchronous write of xtree (right to left, bottom to top);
2427 * . at start of logredo(): init in-memory imap with one additional iag page;
2428 * . at end of logredo(): re-read imap inode to determine
2429 *   new imap size;
2430 */
2431static int
2432diNewIAG(struct inomap * imap, int *iagnop, int agno, struct metapage ** mpp)
2433{
2434	int rc;
2435	int iagno, i, xlen;
2436	struct inode *ipimap;
2437	struct super_block *sb;
2438	struct jfs_sb_info *sbi;
2439	struct metapage *mp;
2440	struct iag *iagp;
2441	s64 xaddr = 0;
2442	s64 blkno;
2443	tid_t tid;
2444	struct inode *iplist[1];
2445
2446	/* pick up pointers to the inode map and mount inodes */
2447	ipimap = imap->im_ipimap;
2448	sb = ipimap->i_sb;
2449	sbi = JFS_SBI(sb);
2450
2451	/* acquire the free iag lock */
2452	IAGFREE_LOCK(imap);
2453
2454	/* if there are any iags on the inode map free iag list,
2455	 * allocate the iag from the head of the list.
2456	 */
2457	if (imap->im_freeiag >= 0) {
2458		/* pick up the iag number at the head of the list */
2459		iagno = imap->im_freeiag;
2460
2461		/* determine the logical block number of the iag */
2462		blkno = IAGTOLBLK(iagno, sbi->l2nbperpage);
2463	} else {
2464		/* no free iags. the inode map will have to be extented
2465		 * to include a new iag.
2466		 */
2467
2468		/* acquire inode map lock */
2469		IWRITE_LOCK(ipimap, RDWRLOCK_IMAP);
2470
2471		if (ipimap->i_size >> L2PSIZE != imap->im_nextiag + 1) {
2472			IWRITE_UNLOCK(ipimap);
2473			IAGFREE_UNLOCK(imap);
2474			jfs_error(imap->im_ipimap->i_sb,
2475				  "ipimap->i_size is wrong\n");
2476			return -EIO;
2477		}
2478
2479
2480		/* get the next available iag number */
2481		iagno = imap->im_nextiag;
2482
2483		/* make sure that we have not exceeded the maximum inode
2484		 * number limit.
2485		 */
2486		if (iagno > (MAXIAGS - 1)) {
2487			/* release the inode map lock */
2488			IWRITE_UNLOCK(ipimap);
2489
2490			rc = -ENOSPC;
2491			goto out;
2492		}
2493
2494		/*
2495		 * synchronously append new iag page.
2496		 */
2497		/* determine the logical address of iag page to append */
2498		blkno = IAGTOLBLK(iagno, sbi->l2nbperpage);
2499
2500		/* Allocate extent for new iag page */
2501		xlen = sbi->nbperpage;
2502		if ((rc = dbAlloc(ipimap, 0, (s64) xlen, &xaddr))) {
2503			/* release the inode map lock */
2504			IWRITE_UNLOCK(ipimap);
2505
2506			goto out;
2507		}
2508
2509		/*
2510		 * start transaction of update of the inode map
2511		 * addressing structure pointing to the new iag page;
2512		 */
2513		tid = txBegin(sb, COMMIT_FORCE);
2514		mutex_lock(&JFS_IP(ipimap)->commit_mutex);
2515
2516		/* update the inode map addressing structure to point to it */
2517		if ((rc =
2518		     xtInsert(tid, ipimap, 0, blkno, xlen, &xaddr, 0))) {
2519			txEnd(tid);
2520			mutex_unlock(&JFS_IP(ipimap)->commit_mutex);
2521			/* Free the blocks allocated for the iag since it was
2522			 * not successfully added to the inode map
2523			 */
2524			dbFree(ipimap, xaddr, (s64) xlen);
2525
2526			/* release the inode map lock */
2527			IWRITE_UNLOCK(ipimap);
2528
2529			goto out;
2530		}
2531
2532		/* update the inode map's inode to reflect the extension */
2533		ipimap->i_size += PSIZE;
2534		inode_add_bytes(ipimap, PSIZE);
2535
2536		/* assign a buffer for the page */
2537		mp = get_metapage(ipimap, blkno, PSIZE, 0);
2538		if (!mp) {
2539			/*
2540			 * This is very unlikely since we just created the
2541			 * extent, but let's try to handle it correctly
2542			 */
2543			xtTruncate(tid, ipimap, ipimap->i_size - PSIZE,
2544				   COMMIT_PWMAP);
2545
2546			txAbort(tid, 0);
2547			txEnd(tid);
2548			mutex_unlock(&JFS_IP(ipimap)->commit_mutex);
2549
2550			/* release the inode map lock */
2551			IWRITE_UNLOCK(ipimap);
2552
2553			rc = -EIO;
2554			goto out;
2555		}
2556		iagp = (struct iag *) mp->data;
2557
2558		/* init the iag */
2559		memset(iagp, 0, sizeof(struct iag));
2560		iagp->iagnum = cpu_to_le32(iagno);
2561		iagp->inofreefwd = iagp->inofreeback = cpu_to_le32(-1);
2562		iagp->extfreefwd = iagp->extfreeback = cpu_to_le32(-1);
2563		iagp->iagfree = cpu_to_le32(-1);
2564		iagp->nfreeinos = 0;
2565		iagp->nfreeexts = cpu_to_le32(EXTSPERIAG);
2566
2567		/* initialize the free inode summary map (free extent
2568		 * summary map initialization handled by bzero).
2569		 */
2570		for (i = 0; i < SMAPSZ; i++)
2571			iagp->inosmap[i] = cpu_to_le32(ONES);
2572
2573		/*
2574		 * Write and sync the metapage
2575		 */
2576		flush_metapage(mp);
2577
2578		/*
2579		 * txCommit(COMMIT_FORCE) will synchronously write address
2580		 * index pages and inode after commit in careful update order
2581		 * of address index pages (right to left, bottom up);
2582		 */
2583		iplist[0] = ipimap;
2584		rc = txCommit(tid, 1, &iplist[0], COMMIT_FORCE);
2585
2586		txEnd(tid);
2587		mutex_unlock(&JFS_IP(ipimap)->commit_mutex);
2588
2589		duplicateIXtree(sb, blkno, xlen, &xaddr);
2590
2591		/* update the next available iag number */
2592		imap->im_nextiag += 1;
2593
2594		/* Add the iag to the iag free list so we don't lose the iag
2595		 * if a failure happens now.
2596		 */
2597		imap->im_freeiag = iagno;
2598
2599		/* Until we have logredo working, we want the imap inode &
2600		 * control page to be up to date.
2601		 */
2602		diSync(ipimap);
2603
2604		/* release the inode map lock */
2605		IWRITE_UNLOCK(ipimap);
2606	}
2607
2608	/* obtain read lock on map */
2609	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
2610
2611	/* read the iag */
2612	if ((rc = diIAGRead(imap, iagno, &mp))) {
2613		IREAD_UNLOCK(ipimap);
2614		rc = -EIO;
2615		goto out;
2616	}
2617	iagp = (struct iag *) mp->data;
2618
2619	/* remove the iag from the iag free list */
2620	imap->im_freeiag = le32_to_cpu(iagp->iagfree);
2621	iagp->iagfree = cpu_to_le32(-1);
2622
2623	/* set the return iag number and buffer pointer */
2624	*iagnop = iagno;
2625	*mpp = mp;
2626
2627      out:
2628	/* release the iag free lock */
2629	IAGFREE_UNLOCK(imap);
2630
2631	return (rc);
2632}
2633
2634/*
2635 * NAME:	diIAGRead()
2636 *
2637 * FUNCTION:	get the buffer for the specified iag within a fileset
2638 *		or aggregate inode map.
2639 *
2640 * PARAMETERS:
2641 *	imap	- pointer to inode map control structure.
2642 *	iagno	- iag number.
2643 *	bpp	- point to buffer pointer to be filled in on successful
2644 *		  exit.
2645 *
2646 * SERIALIZATION:
2647 *	must have read lock on imap inode
2648 *	(When called by diExtendFS, the filesystem is quiesced, therefore
2649 *	 the read lock is unnecessary.)
2650 *
2651 * RETURN VALUES:
2652 *	0	- success.
2653 *	-EIO	- i/o error.
2654 */
2655static int diIAGRead(struct inomap * imap, int iagno, struct metapage ** mpp)
2656{
2657	struct inode *ipimap = imap->im_ipimap;
2658	s64 blkno;
2659
2660	/* compute the logical block number of the iag. */
2661	blkno = IAGTOLBLK(iagno, JFS_SBI(ipimap->i_sb)->l2nbperpage);
2662
2663	/* read the iag. */
2664	*mpp = read_metapage(ipimap, blkno, PSIZE, 0);
2665	if (*mpp == NULL) {
2666		return -EIO;
2667	}
2668
2669	return (0);
2670}
2671
2672/*
2673 * NAME:	diFindFree()
2674 *
2675 * FUNCTION:	find the first free bit in a word starting at
2676 *		the specified bit position.
2677 *
2678 * PARAMETERS:
2679 *	word	- word to be examined.
2680 *	start	- starting bit position.
2681 *
2682 * RETURN VALUES:
2683 *	bit position of first free bit in the word or 32 if
2684 *	no free bits were found.
2685 */
2686static int diFindFree(u32 word, int start)
2687{
2688	int bitno;
2689	assert(start < 32);
2690	/* scan the word for the first free bit. */
2691	for (word <<= start, bitno = start; bitno < 32;
2692	     bitno++, word <<= 1) {
2693		if ((word & HIGHORDER) == 0)
2694			break;
2695	}
2696	return (bitno);
2697}
2698
2699/*
2700 * NAME:	diUpdatePMap()
2701 *
2702 * FUNCTION: Update the persistent map in an IAG for the allocation or
2703 *	freeing of the specified inode.
2704 *
2705 * PRE CONDITIONS: Working map has already been updated for allocate.
2706 *
2707 * PARAMETERS:
2708 *	ipimap	- Incore inode map inode
2709 *	inum	- Number of inode to mark in permanent map
2710 *	is_free	- If 'true' indicates inode should be marked freed, otherwise
2711 *		  indicates inode should be marked allocated.
2712 *
2713 * RETURN VALUES:
2714 *		0 for success
2715 */
2716int
2717diUpdatePMap(struct inode *ipimap,
2718	     unsigned long inum, bool is_free, struct tblock * tblk)
2719{
2720	int rc;
2721	struct iag *iagp;
2722	struct metapage *mp;
2723	int iagno, ino, extno, bitno;
2724	struct inomap *imap;
2725	u32 mask;
2726	struct jfs_log *log;
2727	int lsn, difft, diffp;
2728	unsigned long flags;
2729
2730	imap = JFS_IP(ipimap)->i_imap;
2731	/* get the iag number containing the inode */
2732	iagno = INOTOIAG(inum);
2733	/* make sure that the iag is contained within the map */
2734	if (iagno >= imap->im_nextiag) {
2735		jfs_error(ipimap->i_sb, "the iag is outside the map\n");
2736		return -EIO;
2737	}
2738	/* read the iag */
2739	IREAD_LOCK(ipimap, RDWRLOCK_IMAP);
2740	rc = diIAGRead(imap, iagno, &mp);
2741	IREAD_UNLOCK(ipimap);
2742	if (rc)
2743		return (rc);
2744	metapage_wait_for_io(mp);
2745	iagp = (struct iag *) mp->data;
2746	/* get the inode number and extent number of the inode within
2747	 * the iag and the inode number within the extent.
2748	 */
2749	ino = inum & (INOSPERIAG - 1);
2750	extno = ino >> L2INOSPEREXT;
2751	bitno = ino & (INOSPEREXT - 1);
2752	mask = HIGHORDER >> bitno;
2753	/*
2754	 * mark the inode free in persistent map:
2755	 */
2756	if (is_free) {
2757		/* The inode should have been allocated both in working
2758		 * map and in persistent map;
2759		 * the inode will be freed from working map at the release
2760		 * of last reference release;
2761		 */
2762		if (!(le32_to_cpu(iagp->wmap[extno]) & mask)) {
2763			jfs_error(ipimap->i_sb,
2764				  "inode %ld not marked as allocated in wmap!\n",
2765				  inum);
2766		}
2767		if (!(le32_to_cpu(iagp->pmap[extno]) & mask)) {
2768			jfs_error(ipimap->i_sb,
2769				  "inode %ld not marked as allocated in pmap!\n",
2770				  inum);
2771		}
2772		/* update the bitmap for the extent of the freed inode */
2773		iagp->pmap[extno] &= cpu_to_le32(~mask);
2774	}
2775	/*
2776	 * mark the inode allocated in persistent map:
2777	 */
2778	else {
2779		/* The inode should be already allocated in the working map
2780		 * and should be free in persistent map;
2781		 */
2782		if (!(le32_to_cpu(iagp->wmap[extno]) & mask)) {
2783			release_metapage(mp);
2784			jfs_error(ipimap->i_sb,
2785				  "the inode is not allocated in the working map\n");
2786			return -EIO;
2787		}
2788		if ((le32_to_cpu(iagp->pmap[extno]) & mask) != 0) {
2789			release_metapage(mp);
2790			jfs_error(ipimap->i_sb,
2791				  "the inode is not free in the persistent map\n");
2792			return -EIO;
2793		}
2794		/* update the bitmap for the extent of the allocated inode */
2795		iagp->pmap[extno] |= cpu_to_le32(mask);
2796	}
2797	/*
2798	 * update iag lsn
2799	 */
2800	lsn = tblk->lsn;
2801	log = JFS_SBI(tblk->sb)->log;
2802	LOGSYNC_LOCK(log, flags);
2803	if (mp->lsn != 0) {
2804		/* inherit older/smaller lsn */
2805		logdiff(difft, lsn, log);
2806		logdiff(diffp, mp->lsn, log);
2807		if (difft < diffp) {
2808			mp->lsn = lsn;
2809			/* move mp after tblock in logsync list */
2810			list_move(&mp->synclist, &tblk->synclist);
2811		}
2812		/* inherit younger/larger clsn */
2813		assert(mp->clsn);
2814		logdiff(difft, tblk->clsn, log);
2815		logdiff(diffp, mp->clsn, log);
2816		if (difft > diffp)
2817			mp->clsn = tblk->clsn;
2818	} else {
2819		mp->log = log;
2820		mp->lsn = lsn;
2821		/* insert mp after tblock in logsync list */
2822		log->count++;
2823		list_add(&mp->synclist, &tblk->synclist);
2824		mp->clsn = tblk->clsn;
2825	}
2826	LOGSYNC_UNLOCK(log, flags);
2827	write_metapage(mp);
2828	return (0);
2829}
2830
2831/*
2832 *	diExtendFS()
2833 *
2834 * function: update imap for extendfs();
2835 *
2836 * note: AG size has been increased s.t. each k old contiguous AGs are
2837 * coalesced into a new AG;
2838 */
2839int diExtendFS(struct inode *ipimap, struct inode *ipbmap)
2840{
2841	int rc, rcx = 0;
2842	struct inomap *imap = JFS_IP(ipimap)->i_imap;
2843	struct iag *iagp = NULL, *hiagp = NULL;
2844	struct bmap *mp = JFS_SBI(ipbmap->i_sb)->bmap;
2845	struct metapage *bp, *hbp;
2846	int i, n, head;
2847	int numinos, xnuminos = 0, xnumfree = 0;
2848	s64 agstart;
2849
2850	jfs_info("diExtendFS: nextiag:%d numinos:%d numfree:%d",
2851		   imap->im_nextiag, atomic_read(&imap->im_numinos),
2852		   atomic_read(&imap->im_numfree));
2853
2854	/*
2855	 *	reconstruct imap
2856	 *
2857	 * coalesce contiguous k (newAGSize/oldAGSize) AGs;
2858	 * i.e., (AGi, ..., AGj) where i = k*n and j = k*(n+1) - 1 to AGn;
2859	 * note: new AG size = old AG size * (2**x).
2860	 */
2861
2862	/* init per AG control information im_agctl[] */
2863	for (i = 0; i < MAXAG; i++) {
2864		imap->im_agctl[i].inofree = -1;
2865		imap->im_agctl[i].extfree = -1;
2866		imap->im_agctl[i].numinos = 0;	/* number of backed inodes */
2867		imap->im_agctl[i].numfree = 0;	/* number of free backed inodes */
2868	}
2869
2870	/*
2871	 *	process each iag page of the map.
2872	 *
2873	 * rebuild AG Free Inode List, AG Free Inode Extent List;
2874	 */
2875	for (i = 0; i < imap->im_nextiag; i++) {
2876		if ((rc = diIAGRead(imap, i, &bp))) {
2877			rcx = rc;
2878			continue;
2879		}
2880		iagp = (struct iag *) bp->data;
2881		if (le32_to_cpu(iagp->iagnum) != i) {
2882			release_metapage(bp);
2883			jfs_error(ipimap->i_sb, "unexpected value of iagnum\n");
2884			return -EIO;
2885		}
2886
2887		/* leave free iag in the free iag list */
2888		if (iagp->nfreeexts == cpu_to_le32(EXTSPERIAG)) {
2889			release_metapage(bp);
2890			continue;
2891		}
2892
2893		agstart = le64_to_cpu(iagp->agstart);
2894		n = agstart >> mp->db_agl2size;
2895		iagp->agstart = cpu_to_le64((s64)n << mp->db_agl2size);
2896
2897		/* compute backed inodes */
2898		numinos = (EXTSPERIAG - le32_to_cpu(iagp->nfreeexts))
2899		    << L2INOSPEREXT;
2900		if (numinos > 0) {
2901			/* merge AG backed inodes */
2902			imap->im_agctl[n].numinos += numinos;
2903			xnuminos += numinos;
2904		}
2905
2906		/* if any backed free inodes, insert at AG free inode list */
2907		if ((int) le32_to_cpu(iagp->nfreeinos) > 0) {
2908			if ((head = imap->im_agctl[n].inofree) == -1) {
2909				iagp->inofreefwd = cpu_to_le32(-1);
2910				iagp->inofreeback = cpu_to_le32(-1);
2911			} else {
2912				if ((rc = diIAGRead(imap, head, &hbp))) {
2913					rcx = rc;
2914					goto nextiag;
2915				}
2916				hiagp = (struct iag *) hbp->data;
2917				hiagp->inofreeback = iagp->iagnum;
2918				iagp->inofreefwd = cpu_to_le32(head);
2919				iagp->inofreeback = cpu_to_le32(-1);
2920				write_metapage(hbp);
2921			}
2922
2923			imap->im_agctl[n].inofree =
2924			    le32_to_cpu(iagp->iagnum);
2925
2926			/* merge AG backed free inodes */
2927			imap->im_agctl[n].numfree +=
2928			    le32_to_cpu(iagp->nfreeinos);
2929			xnumfree += le32_to_cpu(iagp->nfreeinos);
2930		}
2931
2932		/* if any free extents, insert at AG free extent list */
2933		if (le32_to_cpu(iagp->nfreeexts) > 0) {
2934			if ((head = imap->im_agctl[n].extfree) == -1) {
2935				iagp->extfreefwd = cpu_to_le32(-1);
2936				iagp->extfreeback = cpu_to_le32(-1);
2937			} else {
2938				if ((rc = diIAGRead(imap, head, &hbp))) {
2939					rcx = rc;
2940					goto nextiag;
2941				}
2942				hiagp = (struct iag *) hbp->data;
2943				hiagp->extfreeback = iagp->iagnum;
2944				iagp->extfreefwd = cpu_to_le32(head);
2945				iagp->extfreeback = cpu_to_le32(-1);
2946				write_metapage(hbp);
2947			}
2948
2949			imap->im_agctl[n].extfree =
2950			    le32_to_cpu(iagp->iagnum);
2951		}
2952
2953	      nextiag:
2954		write_metapage(bp);
2955	}
2956
2957	if (xnuminos != atomic_read(&imap->im_numinos) ||
2958	    xnumfree != atomic_read(&imap->im_numfree)) {
2959		jfs_error(ipimap->i_sb, "numinos or numfree incorrect\n");
2960		return -EIO;
2961	}
2962
2963	return rcx;
2964}
2965
2966
2967/*
2968 *	duplicateIXtree()
2969 *
2970 * serialization: IWRITE_LOCK held on entry/exit
2971 *
2972 * note: shadow page with regular inode (rel.2);
2973 */
2974static void duplicateIXtree(struct super_block *sb, s64 blkno,
2975			    int xlen, s64 *xaddr)
2976{
2977	struct jfs_superblock *j_sb;
2978	struct buffer_head *bh;
2979	struct inode *ip;
2980	tid_t tid;
2981
2982	/* if AIT2 ipmap2 is bad, do not try to update it */
2983	if (JFS_SBI(sb)->mntflag & JFS_BAD_SAIT)	/* s_flag */
2984		return;
2985	ip = diReadSpecial(sb, FILESYSTEM_I, 1);
2986	if (ip == NULL) {
2987		JFS_SBI(sb)->mntflag |= JFS_BAD_SAIT;
2988		if (readSuper(sb, &bh))
2989			return;
2990		j_sb = (struct jfs_superblock *)bh->b_data;
2991		j_sb->s_flag |= cpu_to_le32(JFS_BAD_SAIT);
2992
2993		mark_buffer_dirty(bh);
2994		sync_dirty_buffer(bh);
2995		brelse(bh);
2996		return;
2997	}
2998
2999	/* start transaction */
3000	tid = txBegin(sb, COMMIT_FORCE);
3001	/* update the inode map addressing structure to point to it */
3002	if (xtInsert(tid, ip, 0, blkno, xlen, xaddr, 0)) {
3003		JFS_SBI(sb)->mntflag |= JFS_BAD_SAIT;
3004		txAbort(tid, 1);
3005		goto cleanup;
3006
3007	}
3008	/* update the inode map's inode to reflect the extension */
3009	ip->i_size += PSIZE;
3010	inode_add_bytes(ip, PSIZE);
3011	txCommit(tid, 1, &ip, COMMIT_FORCE);
3012      cleanup:
3013	txEnd(tid);
3014	diFreeSpecial(ip);
3015}
3016
3017/*
3018 * NAME:	copy_from_dinode()
3019 *
3020 * FUNCTION:	Copies inode info from disk inode to in-memory inode
3021 *
3022 * RETURN VALUES:
3023 *	0	- success
3024 *	-ENOMEM	- insufficient memory
3025 */
3026static int copy_from_dinode(struct dinode * dip, struct inode *ip)
3027{
3028	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
3029	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
3030
3031	jfs_ip->fileset = le32_to_cpu(dip->di_fileset);
3032	jfs_ip->mode2 = le32_to_cpu(dip->di_mode);
3033	jfs_set_inode_flags(ip);
3034
3035	ip->i_mode = le32_to_cpu(dip->di_mode) & 0xffff;
3036	if (sbi->umask != -1) {
3037		ip->i_mode = (ip->i_mode & ~0777) | (0777 & ~sbi->umask);
3038		/* For directories, add x permission if r is allowed by umask */
3039		if (S_ISDIR(ip->i_mode)) {
3040			if (ip->i_mode & 0400)
3041				ip->i_mode |= 0100;
3042			if (ip->i_mode & 0040)
3043				ip->i_mode |= 0010;
3044			if (ip->i_mode & 0004)
3045				ip->i_mode |= 0001;
3046		}
3047	}
3048	set_nlink(ip, le32_to_cpu(dip->di_nlink));
3049
3050	jfs_ip->saved_uid = make_kuid(&init_user_ns, le32_to_cpu(dip->di_uid));
3051	if (!uid_valid(sbi->uid))
3052		ip->i_uid = jfs_ip->saved_uid;
3053	else {
3054		ip->i_uid = sbi->uid;
3055	}
3056
3057	jfs_ip->saved_gid = make_kgid(&init_user_ns, le32_to_cpu(dip->di_gid));
3058	if (!gid_valid(sbi->gid))
3059		ip->i_gid = jfs_ip->saved_gid;
3060	else {
3061		ip->i_gid = sbi->gid;
3062	}
3063
3064	ip->i_size = le64_to_cpu(dip->di_size);
3065	ip->i_atime.tv_sec = le32_to_cpu(dip->di_atime.tv_sec);
3066	ip->i_atime.tv_nsec = le32_to_cpu(dip->di_atime.tv_nsec);
3067	ip->i_mtime.tv_sec = le32_to_cpu(dip->di_mtime.tv_sec);
3068	ip->i_mtime.tv_nsec = le32_to_cpu(dip->di_mtime.tv_nsec);
3069	ip->i_ctime.tv_sec = le32_to_cpu(dip->di_ctime.tv_sec);
3070	ip->i_ctime.tv_nsec = le32_to_cpu(dip->di_ctime.tv_nsec);
3071	ip->i_blocks = LBLK2PBLK(ip->i_sb, le64_to_cpu(dip->di_nblocks));
3072	ip->i_generation = le32_to_cpu(dip->di_gen);
3073
3074	jfs_ip->ixpxd = dip->di_ixpxd;	/* in-memory pxd's are little-endian */
3075	jfs_ip->acl = dip->di_acl;	/* as are dxd's */
3076	jfs_ip->ea = dip->di_ea;
3077	jfs_ip->next_index = le32_to_cpu(dip->di_next_index);
3078	jfs_ip->otime = le32_to_cpu(dip->di_otime.tv_sec);
3079	jfs_ip->acltype = le32_to_cpu(dip->di_acltype);
3080
3081	if (S_ISCHR(ip->i_mode) || S_ISBLK(ip->i_mode)) {
3082		jfs_ip->dev = le32_to_cpu(dip->di_rdev);
3083		ip->i_rdev = new_decode_dev(jfs_ip->dev);
3084	}
3085
3086	if (S_ISDIR(ip->i_mode)) {
3087		memcpy(&jfs_ip->i_dirtable, &dip->di_dirtable, 384);
3088	} else if (S_ISREG(ip->i_mode) || S_ISLNK(ip->i_mode)) {
3089		memcpy(&jfs_ip->i_xtroot, &dip->di_xtroot, 288);
3090	} else
3091		memcpy(&jfs_ip->i_inline_ea, &dip->di_inlineea, 128);
3092
3093	/* Zero the in-memory-only stuff */
3094	jfs_ip->cflag = 0;
3095	jfs_ip->btindex = 0;
3096	jfs_ip->btorder = 0;
3097	jfs_ip->bxflag = 0;
3098	jfs_ip->blid = 0;
3099	jfs_ip->atlhead = 0;
3100	jfs_ip->atltail = 0;
3101	jfs_ip->xtlid = 0;
3102	return (0);
3103}
3104
3105/*
3106 * NAME:	copy_to_dinode()
3107 *
3108 * FUNCTION:	Copies inode info from in-memory inode to disk inode
3109 */
3110static void copy_to_dinode(struct dinode * dip, struct inode *ip)
3111{
3112	struct jfs_inode_info *jfs_ip = JFS_IP(ip);
3113	struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
3114
3115	dip->di_fileset = cpu_to_le32(jfs_ip->fileset);
3116	dip->di_inostamp = cpu_to_le32(sbi->inostamp);
3117	dip->di_number = cpu_to_le32(ip->i_ino);
3118	dip->di_gen = cpu_to_le32(ip->i_generation);
3119	dip->di_size = cpu_to_le64(ip->i_size);
3120	dip->di_nblocks = cpu_to_le64(PBLK2LBLK(ip->i_sb, ip->i_blocks));
3121	dip->di_nlink = cpu_to_le32(ip->i_nlink);
3122	if (!uid_valid(sbi->uid))
3123		dip->di_uid = cpu_to_le32(i_uid_read(ip));
3124	else
3125		dip->di_uid =cpu_to_le32(from_kuid(&init_user_ns,
3126						   jfs_ip->saved_uid));
3127	if (!gid_valid(sbi->gid))
3128		dip->di_gid = cpu_to_le32(i_gid_read(ip));
3129	else
3130		dip->di_gid = cpu_to_le32(from_kgid(&init_user_ns,
3131						    jfs_ip->saved_gid));
3132	/*
3133	 * mode2 is only needed for storing the higher order bits.
3134	 * Trust i_mode for the lower order ones
3135	 */
3136	if (sbi->umask == -1)
3137		dip->di_mode = cpu_to_le32((jfs_ip->mode2 & 0xffff0000) |
3138					   ip->i_mode);
3139	else /* Leave the original permissions alone */
3140		dip->di_mode = cpu_to_le32(jfs_ip->mode2);
3141
3142	dip->di_atime.tv_sec = cpu_to_le32(ip->i_atime.tv_sec);
3143	dip->di_atime.tv_nsec = cpu_to_le32(ip->i_atime.tv_nsec);
3144	dip->di_ctime.tv_sec = cpu_to_le32(ip->i_ctime.tv_sec);
3145	dip->di_ctime.tv_nsec = cpu_to_le32(ip->i_ctime.tv_nsec);
3146	dip->di_mtime.tv_sec = cpu_to_le32(ip->i_mtime.tv_sec);
3147	dip->di_mtime.tv_nsec = cpu_to_le32(ip->i_mtime.tv_nsec);
3148	dip->di_ixpxd = jfs_ip->ixpxd;	/* in-memory pxd's are little-endian */
3149	dip->di_acl = jfs_ip->acl;	/* as are dxd's */
3150	dip->di_ea = jfs_ip->ea;
3151	dip->di_next_index = cpu_to_le32(jfs_ip->next_index);
3152	dip->di_otime.tv_sec = cpu_to_le32(jfs_ip->otime);
3153	dip->di_otime.tv_nsec = 0;
3154	dip->di_acltype = cpu_to_le32(jfs_ip->acltype);
3155	if (S_ISCHR(ip->i_mode) || S_ISBLK(ip->i_mode))
3156		dip->di_rdev = cpu_to_le32(jfs_ip->dev);
3157}