[XFS] implement generic xfs_btree_get_rec
[linux-2.6] / fs / xfs / xfs_ialloc.c
1 /*
2  * Copyright (c) 2000-2002,2005 Silicon Graphics, Inc.
3  * All Rights Reserved.
4  *
5  * This program is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU General Public License as
7  * published by the Free Software Foundation.
8  *
9  * This program is distributed in the hope that it would be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * 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 the Free Software Foundation,
16  * Inc.,  51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
17  */
18 #include "xfs.h"
19 #include "xfs_fs.h"
20 #include "xfs_types.h"
21 #include "xfs_bit.h"
22 #include "xfs_log.h"
23 #include "xfs_inum.h"
24 #include "xfs_trans.h"
25 #include "xfs_sb.h"
26 #include "xfs_ag.h"
27 #include "xfs_dir2.h"
28 #include "xfs_dmapi.h"
29 #include "xfs_mount.h"
30 #include "xfs_bmap_btree.h"
31 #include "xfs_alloc_btree.h"
32 #include "xfs_ialloc_btree.h"
33 #include "xfs_dir2_sf.h"
34 #include "xfs_attr_sf.h"
35 #include "xfs_dinode.h"
36 #include "xfs_inode.h"
37 #include "xfs_btree.h"
38 #include "xfs_ialloc.h"
39 #include "xfs_alloc.h"
40 #include "xfs_rtalloc.h"
41 #include "xfs_error.h"
42 #include "xfs_bmap.h"
43
44 /*
45  * Log specified fields for the inode given by bp and off.
46  */
47 STATIC void
48 xfs_ialloc_log_di(
49         xfs_trans_t     *tp,            /* transaction pointer */
50         xfs_buf_t       *bp,            /* inode buffer */
51         int             off,            /* index of inode in buffer */
52         int             fields)         /* bitmask of fields to log */
53 {
54         int                     first;          /* first byte number */
55         int                     ioffset;        /* off in bytes */
56         int                     last;           /* last byte number */
57         xfs_mount_t             *mp;            /* mount point structure */
58         static const short      offsets[] = {   /* field offsets */
59                                                 /* keep in sync with bits */
60                 offsetof(xfs_dinode_core_t, di_magic),
61                 offsetof(xfs_dinode_core_t, di_mode),
62                 offsetof(xfs_dinode_core_t, di_version),
63                 offsetof(xfs_dinode_core_t, di_format),
64                 offsetof(xfs_dinode_core_t, di_onlink),
65                 offsetof(xfs_dinode_core_t, di_uid),
66                 offsetof(xfs_dinode_core_t, di_gid),
67                 offsetof(xfs_dinode_core_t, di_nlink),
68                 offsetof(xfs_dinode_core_t, di_projid),
69                 offsetof(xfs_dinode_core_t, di_pad),
70                 offsetof(xfs_dinode_core_t, di_atime),
71                 offsetof(xfs_dinode_core_t, di_mtime),
72                 offsetof(xfs_dinode_core_t, di_ctime),
73                 offsetof(xfs_dinode_core_t, di_size),
74                 offsetof(xfs_dinode_core_t, di_nblocks),
75                 offsetof(xfs_dinode_core_t, di_extsize),
76                 offsetof(xfs_dinode_core_t, di_nextents),
77                 offsetof(xfs_dinode_core_t, di_anextents),
78                 offsetof(xfs_dinode_core_t, di_forkoff),
79                 offsetof(xfs_dinode_core_t, di_aformat),
80                 offsetof(xfs_dinode_core_t, di_dmevmask),
81                 offsetof(xfs_dinode_core_t, di_dmstate),
82                 offsetof(xfs_dinode_core_t, di_flags),
83                 offsetof(xfs_dinode_core_t, di_gen),
84                 offsetof(xfs_dinode_t, di_next_unlinked),
85                 offsetof(xfs_dinode_t, di_u),
86                 offsetof(xfs_dinode_t, di_a),
87                 sizeof(xfs_dinode_t)
88         };
89
90
91         ASSERT(offsetof(xfs_dinode_t, di_core) == 0);
92         ASSERT((fields & (XFS_DI_U|XFS_DI_A)) == 0);
93         mp = tp->t_mountp;
94         /*
95          * Get the inode-relative first and last bytes for these fields
96          */
97         xfs_btree_offsets(fields, offsets, XFS_DI_NUM_BITS, &first, &last);
98         /*
99          * Convert to buffer offsets and log it.
100          */
101         ioffset = off << mp->m_sb.sb_inodelog;
102         first += ioffset;
103         last += ioffset;
104         xfs_trans_log_buf(tp, bp, first, last);
105 }
106
107 /*
108  * Allocation group level functions.
109  */
110 static inline int
111 xfs_ialloc_cluster_alignment(
112         xfs_alloc_arg_t *args)
113 {
114         if (xfs_sb_version_hasalign(&args->mp->m_sb) &&
115             args->mp->m_sb.sb_inoalignmt >=
116              XFS_B_TO_FSBT(args->mp, XFS_INODE_CLUSTER_SIZE(args->mp)))
117                 return args->mp->m_sb.sb_inoalignmt;
118         return 1;
119 }
120
121 /*
122  * Lookup the record equal to ino in the btree given by cur.
123  */
124 STATIC int                              /* error */
125 xfs_inobt_lookup_eq(
126         struct xfs_btree_cur    *cur,   /* btree cursor */
127         xfs_agino_t             ino,    /* starting inode of chunk */
128         __int32_t               fcnt,   /* free inode count */
129         xfs_inofree_t           free,   /* free inode mask */
130         int                     *stat)  /* success/failure */
131 {
132         cur->bc_rec.i.ir_startino = ino;
133         cur->bc_rec.i.ir_freecount = fcnt;
134         cur->bc_rec.i.ir_free = free;
135         return xfs_btree_lookup(cur, XFS_LOOKUP_EQ, stat);
136 }
137
138 /*
139  * Lookup the first record greater than or equal to ino
140  * in the btree given by cur.
141  */
142 int                                     /* error */
143 xfs_inobt_lookup_ge(
144         struct xfs_btree_cur    *cur,   /* btree cursor */
145         xfs_agino_t             ino,    /* starting inode of chunk */
146         __int32_t               fcnt,   /* free inode count */
147         xfs_inofree_t           free,   /* free inode mask */
148         int                     *stat)  /* success/failure */
149 {
150         cur->bc_rec.i.ir_startino = ino;
151         cur->bc_rec.i.ir_freecount = fcnt;
152         cur->bc_rec.i.ir_free = free;
153         return xfs_btree_lookup(cur, XFS_LOOKUP_GE, stat);
154 }
155
156 /*
157  * Lookup the first record less than or equal to ino
158  * in the btree given by cur.
159  */
160 int                                     /* error */
161 xfs_inobt_lookup_le(
162         struct xfs_btree_cur    *cur,   /* btree cursor */
163         xfs_agino_t             ino,    /* starting inode of chunk */
164         __int32_t               fcnt,   /* free inode count */
165         xfs_inofree_t           free,   /* free inode mask */
166         int                     *stat)  /* success/failure */
167 {
168         cur->bc_rec.i.ir_startino = ino;
169         cur->bc_rec.i.ir_freecount = fcnt;
170         cur->bc_rec.i.ir_free = free;
171         return xfs_btree_lookup(cur, XFS_LOOKUP_LE, stat);
172 }
173
174 /*
175  * Update the record referred to by cur to the value given
176  * by [ino, fcnt, free].
177  * This either works (return 0) or gets an EFSCORRUPTED error.
178  */
179 STATIC int                              /* error */
180 xfs_inobt_update(
181         struct xfs_btree_cur    *cur,   /* btree cursor */
182         xfs_agino_t             ino,    /* starting inode of chunk */
183         __int32_t               fcnt,   /* free inode count */
184         xfs_inofree_t           free)   /* free inode mask */
185 {
186         union xfs_btree_rec     rec;
187
188         rec.inobt.ir_startino = cpu_to_be32(ino);
189         rec.inobt.ir_freecount = cpu_to_be32(fcnt);
190         rec.inobt.ir_free = cpu_to_be64(free);
191         return xfs_btree_update(cur, &rec);
192 }
193
194 /*
195  * Get the data from the pointed-to record.
196  */
197 int                                     /* error */
198 xfs_inobt_get_rec(
199         struct xfs_btree_cur    *cur,   /* btree cursor */
200         xfs_agino_t             *ino,   /* output: starting inode of chunk */
201         __int32_t               *fcnt,  /* output: number of free inodes */
202         xfs_inofree_t           *free,  /* output: free inode mask */
203         int                     *stat)  /* output: success/failure */
204 {
205         union xfs_btree_rec     *rec;
206         int                     error;
207
208         error = xfs_btree_get_rec(cur, &rec, stat);
209         if (!error && *stat == 1) {
210                 *ino = be32_to_cpu(rec->inobt.ir_startino);
211                 *fcnt = be32_to_cpu(rec->inobt.ir_freecount);
212                 *free = be64_to_cpu(rec->inobt.ir_free);
213         }
214         return error;
215 }
216
217 /*
218  * Allocate new inodes in the allocation group specified by agbp.
219  * Return 0 for success, else error code.
220  */
221 STATIC int                              /* error code or 0 */
222 xfs_ialloc_ag_alloc(
223         xfs_trans_t     *tp,            /* transaction pointer */
224         xfs_buf_t       *agbp,          /* alloc group buffer */
225         int             *alloc)
226 {
227         xfs_agi_t       *agi;           /* allocation group header */
228         xfs_alloc_arg_t args;           /* allocation argument structure */
229         int             blks_per_cluster;  /* fs blocks per inode cluster */
230         xfs_btree_cur_t *cur;           /* inode btree cursor */
231         xfs_daddr_t     d;              /* disk addr of buffer */
232         xfs_agnumber_t  agno;
233         int             error;
234         xfs_buf_t       *fbuf;          /* new free inodes' buffer */
235         xfs_dinode_t    *free;          /* new free inode structure */
236         int             i;              /* inode counter */
237         int             j;              /* block counter */
238         int             nbufs;          /* num bufs of new inodes */
239         xfs_agino_t     newino;         /* new first inode's number */
240         xfs_agino_t     newlen;         /* new number of inodes */
241         int             ninodes;        /* num inodes per buf */
242         xfs_agino_t     thisino;        /* current inode number, for loop */
243         int             version;        /* inode version number to use */
244         int             isaligned = 0;  /* inode allocation at stripe unit */
245                                         /* boundary */
246         unsigned int    gen;
247
248         args.tp = tp;
249         args.mp = tp->t_mountp;
250
251         /*
252          * Locking will ensure that we don't have two callers in here
253          * at one time.
254          */
255         newlen = XFS_IALLOC_INODES(args.mp);
256         if (args.mp->m_maxicount &&
257             args.mp->m_sb.sb_icount + newlen > args.mp->m_maxicount)
258                 return XFS_ERROR(ENOSPC);
259         args.minlen = args.maxlen = XFS_IALLOC_BLOCKS(args.mp);
260         /*
261          * First try to allocate inodes contiguous with the last-allocated
262          * chunk of inodes.  If the filesystem is striped, this will fill
263          * an entire stripe unit with inodes.
264          */
265         agi = XFS_BUF_TO_AGI(agbp);
266         newino = be32_to_cpu(agi->agi_newino);
267         args.agbno = XFS_AGINO_TO_AGBNO(args.mp, newino) +
268                         XFS_IALLOC_BLOCKS(args.mp);
269         if (likely(newino != NULLAGINO &&
270                   (args.agbno < be32_to_cpu(agi->agi_length)))) {
271                 args.fsbno = XFS_AGB_TO_FSB(args.mp,
272                                 be32_to_cpu(agi->agi_seqno), args.agbno);
273                 args.type = XFS_ALLOCTYPE_THIS_BNO;
274                 args.mod = args.total = args.wasdel = args.isfl =
275                         args.userdata = args.minalignslop = 0;
276                 args.prod = 1;
277
278                 /*
279                  * We need to take into account alignment here to ensure that
280                  * we don't modify the free list if we fail to have an exact
281                  * block. If we don't have an exact match, and every oher
282                  * attempt allocation attempt fails, we'll end up cancelling
283                  * a dirty transaction and shutting down.
284                  *
285                  * For an exact allocation, alignment must be 1,
286                  * however we need to take cluster alignment into account when
287                  * fixing up the freelist. Use the minalignslop field to
288                  * indicate that extra blocks might be required for alignment,
289                  * but not to use them in the actual exact allocation.
290                  */
291                 args.alignment = 1;
292                 args.minalignslop = xfs_ialloc_cluster_alignment(&args) - 1;
293
294                 /* Allow space for the inode btree to split. */
295                 args.minleft = XFS_IN_MAXLEVELS(args.mp) - 1;
296                 if ((error = xfs_alloc_vextent(&args)))
297                         return error;
298         } else
299                 args.fsbno = NULLFSBLOCK;
300
301         if (unlikely(args.fsbno == NULLFSBLOCK)) {
302                 /*
303                  * Set the alignment for the allocation.
304                  * If stripe alignment is turned on then align at stripe unit
305                  * boundary.
306                  * If the cluster size is smaller than a filesystem block
307                  * then we're doing I/O for inodes in filesystem block size
308                  * pieces, so don't need alignment anyway.
309                  */
310                 isaligned = 0;
311                 if (args.mp->m_sinoalign) {
312                         ASSERT(!(args.mp->m_flags & XFS_MOUNT_NOALIGN));
313                         args.alignment = args.mp->m_dalign;
314                         isaligned = 1;
315                 } else
316                         args.alignment = xfs_ialloc_cluster_alignment(&args);
317                 /*
318                  * Need to figure out where to allocate the inode blocks.
319                  * Ideally they should be spaced out through the a.g.
320                  * For now, just allocate blocks up front.
321                  */
322                 args.agbno = be32_to_cpu(agi->agi_root);
323                 args.fsbno = XFS_AGB_TO_FSB(args.mp,
324                                 be32_to_cpu(agi->agi_seqno), args.agbno);
325                 /*
326                  * Allocate a fixed-size extent of inodes.
327                  */
328                 args.type = XFS_ALLOCTYPE_NEAR_BNO;
329                 args.mod = args.total = args.wasdel = args.isfl =
330                         args.userdata = args.minalignslop = 0;
331                 args.prod = 1;
332                 /*
333                  * Allow space for the inode btree to split.
334                  */
335                 args.minleft = XFS_IN_MAXLEVELS(args.mp) - 1;
336                 if ((error = xfs_alloc_vextent(&args)))
337                         return error;
338         }
339
340         /*
341          * If stripe alignment is turned on, then try again with cluster
342          * alignment.
343          */
344         if (isaligned && args.fsbno == NULLFSBLOCK) {
345                 args.type = XFS_ALLOCTYPE_NEAR_BNO;
346                 args.agbno = be32_to_cpu(agi->agi_root);
347                 args.fsbno = XFS_AGB_TO_FSB(args.mp,
348                                 be32_to_cpu(agi->agi_seqno), args.agbno);
349                 args.alignment = xfs_ialloc_cluster_alignment(&args);
350                 if ((error = xfs_alloc_vextent(&args)))
351                         return error;
352         }
353
354         if (args.fsbno == NULLFSBLOCK) {
355                 *alloc = 0;
356                 return 0;
357         }
358         ASSERT(args.len == args.minlen);
359         /*
360          * Convert the results.
361          */
362         newino = XFS_OFFBNO_TO_AGINO(args.mp, args.agbno, 0);
363         /*
364          * Loop over the new block(s), filling in the inodes.
365          * For small block sizes, manipulate the inodes in buffers
366          * which are multiples of the blocks size.
367          */
368         if (args.mp->m_sb.sb_blocksize >= XFS_INODE_CLUSTER_SIZE(args.mp)) {
369                 blks_per_cluster = 1;
370                 nbufs = (int)args.len;
371                 ninodes = args.mp->m_sb.sb_inopblock;
372         } else {
373                 blks_per_cluster = XFS_INODE_CLUSTER_SIZE(args.mp) /
374                                    args.mp->m_sb.sb_blocksize;
375                 nbufs = (int)args.len / blks_per_cluster;
376                 ninodes = blks_per_cluster * args.mp->m_sb.sb_inopblock;
377         }
378         /*
379          * Figure out what version number to use in the inodes we create.
380          * If the superblock version has caught up to the one that supports
381          * the new inode format, then use the new inode version.  Otherwise
382          * use the old version so that old kernels will continue to be
383          * able to use the file system.
384          */
385         if (xfs_sb_version_hasnlink(&args.mp->m_sb))
386                 version = XFS_DINODE_VERSION_2;
387         else
388                 version = XFS_DINODE_VERSION_1;
389
390         /*
391          * Seed the new inode cluster with a random generation number. This
392          * prevents short-term reuse of generation numbers if a chunk is
393          * freed and then immediately reallocated. We use random numbers
394          * rather than a linear progression to prevent the next generation
395          * number from being easily guessable.
396          */
397         gen = random32();
398         for (j = 0; j < nbufs; j++) {
399                 /*
400                  * Get the block.
401                  */
402                 d = XFS_AGB_TO_DADDR(args.mp, be32_to_cpu(agi->agi_seqno),
403                                      args.agbno + (j * blks_per_cluster));
404                 fbuf = xfs_trans_get_buf(tp, args.mp->m_ddev_targp, d,
405                                          args.mp->m_bsize * blks_per_cluster,
406                                          XFS_BUF_LOCK);
407                 ASSERT(fbuf);
408                 ASSERT(!XFS_BUF_GETERROR(fbuf));
409                 /*
410                  * Set initial values for the inodes in this buffer.
411                  */
412                 xfs_biozero(fbuf, 0, ninodes << args.mp->m_sb.sb_inodelog);
413                 for (i = 0; i < ninodes; i++) {
414                         free = XFS_MAKE_IPTR(args.mp, fbuf, i);
415                         free->di_core.di_magic = cpu_to_be16(XFS_DINODE_MAGIC);
416                         free->di_core.di_version = version;
417                         free->di_core.di_gen = cpu_to_be32(gen);
418                         free->di_next_unlinked = cpu_to_be32(NULLAGINO);
419                         xfs_ialloc_log_di(tp, fbuf, i,
420                                 XFS_DI_CORE_BITS | XFS_DI_NEXT_UNLINKED);
421                 }
422                 xfs_trans_inode_alloc_buf(tp, fbuf);
423         }
424         be32_add_cpu(&agi->agi_count, newlen);
425         be32_add_cpu(&agi->agi_freecount, newlen);
426         agno = be32_to_cpu(agi->agi_seqno);
427         down_read(&args.mp->m_peraglock);
428         args.mp->m_perag[agno].pagi_freecount += newlen;
429         up_read(&args.mp->m_peraglock);
430         agi->agi_newino = cpu_to_be32(newino);
431         /*
432          * Insert records describing the new inode chunk into the btree.
433          */
434         cur = xfs_inobt_init_cursor(args.mp, tp, agbp, agno);
435         for (thisino = newino;
436              thisino < newino + newlen;
437              thisino += XFS_INODES_PER_CHUNK) {
438                 if ((error = xfs_inobt_lookup_eq(cur, thisino,
439                                 XFS_INODES_PER_CHUNK, XFS_INOBT_ALL_FREE, &i))) {
440                         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
441                         return error;
442                 }
443                 ASSERT(i == 0);
444                 if ((error = xfs_btree_insert(cur, &i))) {
445                         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
446                         return error;
447                 }
448                 ASSERT(i == 1);
449         }
450         xfs_btree_del_cursor(cur, XFS_BTREE_NOERROR);
451         /*
452          * Log allocation group header fields
453          */
454         xfs_ialloc_log_agi(tp, agbp,
455                 XFS_AGI_COUNT | XFS_AGI_FREECOUNT | XFS_AGI_NEWINO);
456         /*
457          * Modify/log superblock values for inode count and inode free count.
458          */
459         xfs_trans_mod_sb(tp, XFS_TRANS_SB_ICOUNT, (long)newlen);
460         xfs_trans_mod_sb(tp, XFS_TRANS_SB_IFREE, (long)newlen);
461         *alloc = 1;
462         return 0;
463 }
464
465 STATIC_INLINE xfs_agnumber_t
466 xfs_ialloc_next_ag(
467         xfs_mount_t     *mp)
468 {
469         xfs_agnumber_t  agno;
470
471         spin_lock(&mp->m_agirotor_lock);
472         agno = mp->m_agirotor;
473         if (++mp->m_agirotor == mp->m_maxagi)
474                 mp->m_agirotor = 0;
475         spin_unlock(&mp->m_agirotor_lock);
476
477         return agno;
478 }
479
480 /*
481  * Select an allocation group to look for a free inode in, based on the parent
482  * inode and then mode.  Return the allocation group buffer.
483  */
484 STATIC xfs_buf_t *                      /* allocation group buffer */
485 xfs_ialloc_ag_select(
486         xfs_trans_t     *tp,            /* transaction pointer */
487         xfs_ino_t       parent,         /* parent directory inode number */
488         mode_t          mode,           /* bits set to indicate file type */
489         int             okalloc)        /* ok to allocate more space */
490 {
491         xfs_buf_t       *agbp;          /* allocation group header buffer */
492         xfs_agnumber_t  agcount;        /* number of ag's in the filesystem */
493         xfs_agnumber_t  agno;           /* current ag number */
494         int             flags;          /* alloc buffer locking flags */
495         xfs_extlen_t    ineed;          /* blocks needed for inode allocation */
496         xfs_extlen_t    longest = 0;    /* longest extent available */
497         xfs_mount_t     *mp;            /* mount point structure */
498         int             needspace;      /* file mode implies space allocated */
499         xfs_perag_t     *pag;           /* per allocation group data */
500         xfs_agnumber_t  pagno;          /* parent (starting) ag number */
501
502         /*
503          * Files of these types need at least one block if length > 0
504          * (and they won't fit in the inode, but that's hard to figure out).
505          */
506         needspace = S_ISDIR(mode) || S_ISREG(mode) || S_ISLNK(mode);
507         mp = tp->t_mountp;
508         agcount = mp->m_maxagi;
509         if (S_ISDIR(mode))
510                 pagno = xfs_ialloc_next_ag(mp);
511         else {
512                 pagno = XFS_INO_TO_AGNO(mp, parent);
513                 if (pagno >= agcount)
514                         pagno = 0;
515         }
516         ASSERT(pagno < agcount);
517         /*
518          * Loop through allocation groups, looking for one with a little
519          * free space in it.  Note we don't look for free inodes, exactly.
520          * Instead, we include whether there is a need to allocate inodes
521          * to mean that blocks must be allocated for them,
522          * if none are currently free.
523          */
524         agno = pagno;
525         flags = XFS_ALLOC_FLAG_TRYLOCK;
526         down_read(&mp->m_peraglock);
527         for (;;) {
528                 pag = &mp->m_perag[agno];
529                 if (!pag->pagi_init) {
530                         if (xfs_ialloc_read_agi(mp, tp, agno, &agbp)) {
531                                 agbp = NULL;
532                                 goto nextag;
533                         }
534                 } else
535                         agbp = NULL;
536
537                 if (!pag->pagi_inodeok) {
538                         xfs_ialloc_next_ag(mp);
539                         goto unlock_nextag;
540                 }
541
542                 /*
543                  * Is there enough free space for the file plus a block
544                  * of inodes (if we need to allocate some)?
545                  */
546                 ineed = pag->pagi_freecount ? 0 : XFS_IALLOC_BLOCKS(mp);
547                 if (ineed && !pag->pagf_init) {
548                         if (agbp == NULL &&
549                             xfs_ialloc_read_agi(mp, tp, agno, &agbp)) {
550                                 agbp = NULL;
551                                 goto nextag;
552                         }
553                         (void)xfs_alloc_pagf_init(mp, tp, agno, flags);
554                 }
555                 if (!ineed || pag->pagf_init) {
556                         if (ineed && !(longest = pag->pagf_longest))
557                                 longest = pag->pagf_flcount > 0;
558                         if (!ineed ||
559                             (pag->pagf_freeblks >= needspace + ineed &&
560                              longest >= ineed &&
561                              okalloc)) {
562                                 if (agbp == NULL &&
563                                     xfs_ialloc_read_agi(mp, tp, agno, &agbp)) {
564                                         agbp = NULL;
565                                         goto nextag;
566                                 }
567                                 up_read(&mp->m_peraglock);
568                                 return agbp;
569                         }
570                 }
571 unlock_nextag:
572                 if (agbp)
573                         xfs_trans_brelse(tp, agbp);
574 nextag:
575                 /*
576                  * No point in iterating over the rest, if we're shutting
577                  * down.
578                  */
579                 if (XFS_FORCED_SHUTDOWN(mp)) {
580                         up_read(&mp->m_peraglock);
581                         return NULL;
582                 }
583                 agno++;
584                 if (agno >= agcount)
585                         agno = 0;
586                 if (agno == pagno) {
587                         if (flags == 0) {
588                                 up_read(&mp->m_peraglock);
589                                 return NULL;
590                         }
591                         flags = 0;
592                 }
593         }
594 }
595
596 /*
597  * Visible inode allocation functions.
598  */
599
600 /*
601  * Allocate an inode on disk.
602  * Mode is used to tell whether the new inode will need space, and whether
603  * it is a directory.
604  *
605  * The arguments IO_agbp and alloc_done are defined to work within
606  * the constraint of one allocation per transaction.
607  * xfs_dialloc() is designed to be called twice if it has to do an
608  * allocation to make more free inodes.  On the first call,
609  * IO_agbp should be set to NULL. If an inode is available,
610  * i.e., xfs_dialloc() did not need to do an allocation, an inode
611  * number is returned.  In this case, IO_agbp would be set to the
612  * current ag_buf and alloc_done set to false.
613  * If an allocation needed to be done, xfs_dialloc would return
614  * the current ag_buf in IO_agbp and set alloc_done to true.
615  * The caller should then commit the current transaction, allocate a new
616  * transaction, and call xfs_dialloc() again, passing in the previous
617  * value of IO_agbp.  IO_agbp should be held across the transactions.
618  * Since the agbp is locked across the two calls, the second call is
619  * guaranteed to have a free inode available.
620  *
621  * Once we successfully pick an inode its number is returned and the
622  * on-disk data structures are updated.  The inode itself is not read
623  * in, since doing so would break ordering constraints with xfs_reclaim.
624  */
625 int
626 xfs_dialloc(
627         xfs_trans_t     *tp,            /* transaction pointer */
628         xfs_ino_t       parent,         /* parent inode (directory) */
629         mode_t          mode,           /* mode bits for new inode */
630         int             okalloc,        /* ok to allocate more space */
631         xfs_buf_t       **IO_agbp,      /* in/out ag header's buffer */
632         boolean_t       *alloc_done,    /* true if we needed to replenish
633                                            inode freelist */
634         xfs_ino_t       *inop)          /* inode number allocated */
635 {
636         xfs_agnumber_t  agcount;        /* number of allocation groups */
637         xfs_buf_t       *agbp;          /* allocation group header's buffer */
638         xfs_agnumber_t  agno;           /* allocation group number */
639         xfs_agi_t       *agi;           /* allocation group header structure */
640         xfs_btree_cur_t *cur;           /* inode allocation btree cursor */
641         int             error;          /* error return value */
642         int             i;              /* result code */
643         int             ialloced;       /* inode allocation status */
644         int             noroom = 0;     /* no space for inode blk allocation */
645         xfs_ino_t       ino;            /* fs-relative inode to be returned */
646         /* REFERENCED */
647         int             j;              /* result code */
648         xfs_mount_t     *mp;            /* file system mount structure */
649         int             offset;         /* index of inode in chunk */
650         xfs_agino_t     pagino;         /* parent's a.g. relative inode # */
651         xfs_agnumber_t  pagno;          /* parent's allocation group number */
652         xfs_inobt_rec_incore_t rec;     /* inode allocation record */
653         xfs_agnumber_t  tagno;          /* testing allocation group number */
654         xfs_btree_cur_t *tcur;          /* temp cursor */
655         xfs_inobt_rec_incore_t trec;    /* temp inode allocation record */
656
657
658         if (*IO_agbp == NULL) {
659                 /*
660                  * We do not have an agbp, so select an initial allocation
661                  * group for inode allocation.
662                  */
663                 agbp = xfs_ialloc_ag_select(tp, parent, mode, okalloc);
664                 /*
665                  * Couldn't find an allocation group satisfying the
666                  * criteria, give up.
667                  */
668                 if (!agbp) {
669                         *inop = NULLFSINO;
670                         return 0;
671                 }
672                 agi = XFS_BUF_TO_AGI(agbp);
673                 ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
674         } else {
675                 /*
676                  * Continue where we left off before.  In this case, we
677                  * know that the allocation group has free inodes.
678                  */
679                 agbp = *IO_agbp;
680                 agi = XFS_BUF_TO_AGI(agbp);
681                 ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
682                 ASSERT(be32_to_cpu(agi->agi_freecount) > 0);
683         }
684         mp = tp->t_mountp;
685         agcount = mp->m_sb.sb_agcount;
686         agno = be32_to_cpu(agi->agi_seqno);
687         tagno = agno;
688         pagno = XFS_INO_TO_AGNO(mp, parent);
689         pagino = XFS_INO_TO_AGINO(mp, parent);
690
691         /*
692          * If we have already hit the ceiling of inode blocks then clear
693          * okalloc so we scan all available agi structures for a free
694          * inode.
695          */
696
697         if (mp->m_maxicount &&
698             mp->m_sb.sb_icount + XFS_IALLOC_INODES(mp) > mp->m_maxicount) {
699                 noroom = 1;
700                 okalloc = 0;
701         }
702
703         /*
704          * Loop until we find an allocation group that either has free inodes
705          * or in which we can allocate some inodes.  Iterate through the
706          * allocation groups upward, wrapping at the end.
707          */
708         *alloc_done = B_FALSE;
709         while (!agi->agi_freecount) {
710                 /*
711                  * Don't do anything if we're not supposed to allocate
712                  * any blocks, just go on to the next ag.
713                  */
714                 if (okalloc) {
715                         /*
716                          * Try to allocate some new inodes in the allocation
717                          * group.
718                          */
719                         if ((error = xfs_ialloc_ag_alloc(tp, agbp, &ialloced))) {
720                                 xfs_trans_brelse(tp, agbp);
721                                 if (error == ENOSPC) {
722                                         *inop = NULLFSINO;
723                                         return 0;
724                                 } else
725                                         return error;
726                         }
727                         if (ialloced) {
728                                 /*
729                                  * We successfully allocated some inodes, return
730                                  * the current context to the caller so that it
731                                  * can commit the current transaction and call
732                                  * us again where we left off.
733                                  */
734                                 ASSERT(be32_to_cpu(agi->agi_freecount) > 0);
735                                 *alloc_done = B_TRUE;
736                                 *IO_agbp = agbp;
737                                 *inop = NULLFSINO;
738                                 return 0;
739                         }
740                 }
741                 /*
742                  * If it failed, give up on this ag.
743                  */
744                 xfs_trans_brelse(tp, agbp);
745                 /*
746                  * Go on to the next ag: get its ag header.
747                  */
748 nextag:
749                 if (++tagno == agcount)
750                         tagno = 0;
751                 if (tagno == agno) {
752                         *inop = NULLFSINO;
753                         return noroom ? ENOSPC : 0;
754                 }
755                 down_read(&mp->m_peraglock);
756                 if (mp->m_perag[tagno].pagi_inodeok == 0) {
757                         up_read(&mp->m_peraglock);
758                         goto nextag;
759                 }
760                 error = xfs_ialloc_read_agi(mp, tp, tagno, &agbp);
761                 up_read(&mp->m_peraglock);
762                 if (error)
763                         goto nextag;
764                 agi = XFS_BUF_TO_AGI(agbp);
765                 ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
766         }
767         /*
768          * Here with an allocation group that has a free inode.
769          * Reset agno since we may have chosen a new ag in the
770          * loop above.
771          */
772         agno = tagno;
773         *IO_agbp = NULL;
774         cur = xfs_inobt_init_cursor(mp, tp, agbp, be32_to_cpu(agi->agi_seqno));
775         /*
776          * If pagino is 0 (this is the root inode allocation) use newino.
777          * This must work because we've just allocated some.
778          */
779         if (!pagino)
780                 pagino = be32_to_cpu(agi->agi_newino);
781 #ifdef DEBUG
782         if (cur->bc_nlevels == 1) {
783                 int     freecount = 0;
784
785                 if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
786                         goto error0;
787                 XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
788                 do {
789                         if ((error = xfs_inobt_get_rec(cur, &rec.ir_startino,
790                                         &rec.ir_freecount, &rec.ir_free, &i)))
791                                 goto error0;
792                         XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
793                         freecount += rec.ir_freecount;
794                         if ((error = xfs_btree_increment(cur, 0, &i)))
795                                 goto error0;
796                 } while (i == 1);
797
798                 ASSERT(freecount == be32_to_cpu(agi->agi_freecount) ||
799                        XFS_FORCED_SHUTDOWN(mp));
800         }
801 #endif
802         /*
803          * If in the same a.g. as the parent, try to get near the parent.
804          */
805         if (pagno == agno) {
806                 if ((error = xfs_inobt_lookup_le(cur, pagino, 0, 0, &i)))
807                         goto error0;
808                 if (i != 0 &&
809                     (error = xfs_inobt_get_rec(cur, &rec.ir_startino,
810                             &rec.ir_freecount, &rec.ir_free, &j)) == 0 &&
811                     j == 1 &&
812                     rec.ir_freecount > 0) {
813                         /*
814                          * Found a free inode in the same chunk
815                          * as parent, done.
816                          */
817                 }
818                 /*
819                  * In the same a.g. as parent, but parent's chunk is full.
820                  */
821                 else {
822                         int     doneleft;       /* done, to the left */
823                         int     doneright;      /* done, to the right */
824
825                         if (error)
826                                 goto error0;
827                         ASSERT(i == 1);
828                         ASSERT(j == 1);
829                         /*
830                          * Duplicate the cursor, search left & right
831                          * simultaneously.
832                          */
833                         if ((error = xfs_btree_dup_cursor(cur, &tcur)))
834                                 goto error0;
835                         /*
836                          * Search left with tcur, back up 1 record.
837                          */
838                         if ((error = xfs_btree_decrement(tcur, 0, &i)))
839                                 goto error1;
840                         doneleft = !i;
841                         if (!doneleft) {
842                                 if ((error = xfs_inobt_get_rec(tcur,
843                                                 &trec.ir_startino,
844                                                 &trec.ir_freecount,
845                                                 &trec.ir_free, &i)))
846                                         goto error1;
847                                 XFS_WANT_CORRUPTED_GOTO(i == 1, error1);
848                         }
849                         /*
850                          * Search right with cur, go forward 1 record.
851                          */
852                         if ((error = xfs_btree_increment(cur, 0, &i)))
853                                 goto error1;
854                         doneright = !i;
855                         if (!doneright) {
856                                 if ((error = xfs_inobt_get_rec(cur,
857                                                 &rec.ir_startino,
858                                                 &rec.ir_freecount,
859                                                 &rec.ir_free, &i)))
860                                         goto error1;
861                                 XFS_WANT_CORRUPTED_GOTO(i == 1, error1);
862                         }
863                         /*
864                          * Loop until we find the closest inode chunk
865                          * with a free one.
866                          */
867                         while (!doneleft || !doneright) {
868                                 int     useleft;  /* using left inode
869                                                      chunk this time */
870
871                                 /*
872                                  * Figure out which block is closer,
873                                  * if both are valid.
874                                  */
875                                 if (!doneleft && !doneright)
876                                         useleft =
877                                                 pagino -
878                                                 (trec.ir_startino +
879                                                  XFS_INODES_PER_CHUNK - 1) <
880                                                  rec.ir_startino - pagino;
881                                 else
882                                         useleft = !doneleft;
883                                 /*
884                                  * If checking the left, does it have
885                                  * free inodes?
886                                  */
887                                 if (useleft && trec.ir_freecount) {
888                                         /*
889                                          * Yes, set it up as the chunk to use.
890                                          */
891                                         rec = trec;
892                                         xfs_btree_del_cursor(cur,
893                                                 XFS_BTREE_NOERROR);
894                                         cur = tcur;
895                                         break;
896                                 }
897                                 /*
898                                  * If checking the right, does it have
899                                  * free inodes?
900                                  */
901                                 if (!useleft && rec.ir_freecount) {
902                                         /*
903                                          * Yes, it's already set up.
904                                          */
905                                         xfs_btree_del_cursor(tcur,
906                                                 XFS_BTREE_NOERROR);
907                                         break;
908                                 }
909                                 /*
910                                  * If used the left, get another one
911                                  * further left.
912                                  */
913                                 if (useleft) {
914                                         if ((error = xfs_btree_decrement(tcur, 0,
915                                                         &i)))
916                                                 goto error1;
917                                         doneleft = !i;
918                                         if (!doneleft) {
919                                                 if ((error = xfs_inobt_get_rec(
920                                                             tcur,
921                                                             &trec.ir_startino,
922                                                             &trec.ir_freecount,
923                                                             &trec.ir_free, &i)))
924                                                         goto error1;
925                                                 XFS_WANT_CORRUPTED_GOTO(i == 1,
926                                                         error1);
927                                         }
928                                 }
929                                 /*
930                                  * If used the right, get another one
931                                  * further right.
932                                  */
933                                 else {
934                                         if ((error = xfs_btree_increment(cur, 0,
935                                                         &i)))
936                                                 goto error1;
937                                         doneright = !i;
938                                         if (!doneright) {
939                                                 if ((error = xfs_inobt_get_rec(
940                                                             cur,
941                                                             &rec.ir_startino,
942                                                             &rec.ir_freecount,
943                                                             &rec.ir_free, &i)))
944                                                         goto error1;
945                                                 XFS_WANT_CORRUPTED_GOTO(i == 1,
946                                                         error1);
947                                         }
948                                 }
949                         }
950                         ASSERT(!doneleft || !doneright);
951                 }
952         }
953         /*
954          * In a different a.g. from the parent.
955          * See if the most recently allocated block has any free.
956          */
957         else if (be32_to_cpu(agi->agi_newino) != NULLAGINO) {
958                 if ((error = xfs_inobt_lookup_eq(cur,
959                                 be32_to_cpu(agi->agi_newino), 0, 0, &i)))
960                         goto error0;
961                 if (i == 1 &&
962                     (error = xfs_inobt_get_rec(cur, &rec.ir_startino,
963                             &rec.ir_freecount, &rec.ir_free, &j)) == 0 &&
964                     j == 1 &&
965                     rec.ir_freecount > 0) {
966                         /*
967                          * The last chunk allocated in the group still has
968                          * a free inode.
969                          */
970                 }
971                 /*
972                  * None left in the last group, search the whole a.g.
973                  */
974                 else {
975                         if (error)
976                                 goto error0;
977                         if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
978                                 goto error0;
979                         ASSERT(i == 1);
980                         for (;;) {
981                                 if ((error = xfs_inobt_get_rec(cur,
982                                                 &rec.ir_startino,
983                                                 &rec.ir_freecount, &rec.ir_free,
984                                                 &i)))
985                                         goto error0;
986                                 XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
987                                 if (rec.ir_freecount > 0)
988                                         break;
989                                 if ((error = xfs_btree_increment(cur, 0, &i)))
990                                         goto error0;
991                                 XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
992                         }
993                 }
994         }
995         offset = XFS_IALLOC_FIND_FREE(&rec.ir_free);
996         ASSERT(offset >= 0);
997         ASSERT(offset < XFS_INODES_PER_CHUNK);
998         ASSERT((XFS_AGINO_TO_OFFSET(mp, rec.ir_startino) %
999                                    XFS_INODES_PER_CHUNK) == 0);
1000         ino = XFS_AGINO_TO_INO(mp, agno, rec.ir_startino + offset);
1001         XFS_INOBT_CLR_FREE(&rec, offset);
1002         rec.ir_freecount--;
1003         if ((error = xfs_inobt_update(cur, rec.ir_startino, rec.ir_freecount,
1004                         rec.ir_free)))
1005                 goto error0;
1006         be32_add_cpu(&agi->agi_freecount, -1);
1007         xfs_ialloc_log_agi(tp, agbp, XFS_AGI_FREECOUNT);
1008         down_read(&mp->m_peraglock);
1009         mp->m_perag[tagno].pagi_freecount--;
1010         up_read(&mp->m_peraglock);
1011 #ifdef DEBUG
1012         if (cur->bc_nlevels == 1) {
1013                 int     freecount = 0;
1014
1015                 if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
1016                         goto error0;
1017                 do {
1018                         if ((error = xfs_inobt_get_rec(cur, &rec.ir_startino,
1019                                         &rec.ir_freecount, &rec.ir_free, &i)))
1020                                 goto error0;
1021                         XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
1022                         freecount += rec.ir_freecount;
1023                         if ((error = xfs_btree_increment(cur, 0, &i)))
1024                                 goto error0;
1025                 } while (i == 1);
1026                 ASSERT(freecount == be32_to_cpu(agi->agi_freecount) ||
1027                        XFS_FORCED_SHUTDOWN(mp));
1028         }
1029 #endif
1030         xfs_btree_del_cursor(cur, XFS_BTREE_NOERROR);
1031         xfs_trans_mod_sb(tp, XFS_TRANS_SB_IFREE, -1);
1032         *inop = ino;
1033         return 0;
1034 error1:
1035         xfs_btree_del_cursor(tcur, XFS_BTREE_ERROR);
1036 error0:
1037         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
1038         return error;
1039 }
1040
1041 /*
1042  * Free disk inode.  Carefully avoids touching the incore inode, all
1043  * manipulations incore are the caller's responsibility.
1044  * The on-disk inode is not changed by this operation, only the
1045  * btree (free inode mask) is changed.
1046  */
1047 int
1048 xfs_difree(
1049         xfs_trans_t     *tp,            /* transaction pointer */
1050         xfs_ino_t       inode,          /* inode to be freed */
1051         xfs_bmap_free_t *flist,         /* extents to free */
1052         int             *delete,        /* set if inode cluster was deleted */
1053         xfs_ino_t       *first_ino)     /* first inode in deleted cluster */
1054 {
1055         /* REFERENCED */
1056         xfs_agblock_t   agbno;  /* block number containing inode */
1057         xfs_buf_t       *agbp;  /* buffer containing allocation group header */
1058         xfs_agino_t     agino;  /* inode number relative to allocation group */
1059         xfs_agnumber_t  agno;   /* allocation group number */
1060         xfs_agi_t       *agi;   /* allocation group header */
1061         xfs_btree_cur_t *cur;   /* inode btree cursor */
1062         int             error;  /* error return value */
1063         int             i;      /* result code */
1064         int             ilen;   /* inodes in an inode cluster */
1065         xfs_mount_t     *mp;    /* mount structure for filesystem */
1066         int             off;    /* offset of inode in inode chunk */
1067         xfs_inobt_rec_incore_t rec;     /* btree record */
1068
1069         mp = tp->t_mountp;
1070
1071         /*
1072          * Break up inode number into its components.
1073          */
1074         agno = XFS_INO_TO_AGNO(mp, inode);
1075         if (agno >= mp->m_sb.sb_agcount)  {
1076                 cmn_err(CE_WARN,
1077                         "xfs_difree: agno >= mp->m_sb.sb_agcount (%d >= %d) on %s.  Returning EINVAL.",
1078                         agno, mp->m_sb.sb_agcount, mp->m_fsname);
1079                 ASSERT(0);
1080                 return XFS_ERROR(EINVAL);
1081         }
1082         agino = XFS_INO_TO_AGINO(mp, inode);
1083         if (inode != XFS_AGINO_TO_INO(mp, agno, agino))  {
1084                 cmn_err(CE_WARN,
1085                         "xfs_difree: inode != XFS_AGINO_TO_INO() "
1086                         "(%llu != %llu) on %s.  Returning EINVAL.",
1087                         (unsigned long long)inode,
1088                         (unsigned long long)XFS_AGINO_TO_INO(mp, agno, agino),
1089                         mp->m_fsname);
1090                 ASSERT(0);
1091                 return XFS_ERROR(EINVAL);
1092         }
1093         agbno = XFS_AGINO_TO_AGBNO(mp, agino);
1094         if (agbno >= mp->m_sb.sb_agblocks)  {
1095                 cmn_err(CE_WARN,
1096                         "xfs_difree: agbno >= mp->m_sb.sb_agblocks (%d >= %d) on %s.  Returning EINVAL.",
1097                         agbno, mp->m_sb.sb_agblocks, mp->m_fsname);
1098                 ASSERT(0);
1099                 return XFS_ERROR(EINVAL);
1100         }
1101         /*
1102          * Get the allocation group header.
1103          */
1104         down_read(&mp->m_peraglock);
1105         error = xfs_ialloc_read_agi(mp, tp, agno, &agbp);
1106         up_read(&mp->m_peraglock);
1107         if (error) {
1108                 cmn_err(CE_WARN,
1109                         "xfs_difree: xfs_ialloc_read_agi() returned an error %d on %s.  Returning error.",
1110                         error, mp->m_fsname);
1111                 return error;
1112         }
1113         agi = XFS_BUF_TO_AGI(agbp);
1114         ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
1115         ASSERT(agbno < be32_to_cpu(agi->agi_length));
1116         /*
1117          * Initialize the cursor.
1118          */
1119         cur = xfs_inobt_init_cursor(mp, tp, agbp, agno);
1120 #ifdef DEBUG
1121         if (cur->bc_nlevels == 1) {
1122                 int freecount = 0;
1123
1124                 if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
1125                         goto error0;
1126                 do {
1127                         if ((error = xfs_inobt_get_rec(cur, &rec.ir_startino,
1128                                         &rec.ir_freecount, &rec.ir_free, &i)))
1129                                 goto error0;
1130                         if (i) {
1131                                 freecount += rec.ir_freecount;
1132                                 if ((error = xfs_btree_increment(cur, 0, &i)))
1133                                         goto error0;
1134                         }
1135                 } while (i == 1);
1136                 ASSERT(freecount == be32_to_cpu(agi->agi_freecount) ||
1137                        XFS_FORCED_SHUTDOWN(mp));
1138         }
1139 #endif
1140         /*
1141          * Look for the entry describing this inode.
1142          */
1143         if ((error = xfs_inobt_lookup_le(cur, agino, 0, 0, &i))) {
1144                 cmn_err(CE_WARN,
1145                         "xfs_difree: xfs_inobt_lookup_le returned()  an error %d on %s.  Returning error.",
1146                         error, mp->m_fsname);
1147                 goto error0;
1148         }
1149         XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
1150         if ((error = xfs_inobt_get_rec(cur, &rec.ir_startino, &rec.ir_freecount,
1151                         &rec.ir_free, &i))) {
1152                 cmn_err(CE_WARN,
1153                         "xfs_difree: xfs_inobt_get_rec()  returned an error %d on %s.  Returning error.",
1154                         error, mp->m_fsname);
1155                 goto error0;
1156         }
1157         XFS_WANT_CORRUPTED_GOTO(i == 1, error0);
1158         /*
1159          * Get the offset in the inode chunk.
1160          */
1161         off = agino - rec.ir_startino;
1162         ASSERT(off >= 0 && off < XFS_INODES_PER_CHUNK);
1163         ASSERT(!XFS_INOBT_IS_FREE(&rec, off));
1164         /*
1165          * Mark the inode free & increment the count.
1166          */
1167         XFS_INOBT_SET_FREE(&rec, off);
1168         rec.ir_freecount++;
1169
1170         /*
1171          * When an inode cluster is free, it becomes eligible for removal
1172          */
1173         if (!(mp->m_flags & XFS_MOUNT_IKEEP) &&
1174             (rec.ir_freecount == XFS_IALLOC_INODES(mp))) {
1175
1176                 *delete = 1;
1177                 *first_ino = XFS_AGINO_TO_INO(mp, agno, rec.ir_startino);
1178
1179                 /*
1180                  * Remove the inode cluster from the AGI B+Tree, adjust the
1181                  * AGI and Superblock inode counts, and mark the disk space
1182                  * to be freed when the transaction is committed.
1183                  */
1184                 ilen = XFS_IALLOC_INODES(mp);
1185                 be32_add_cpu(&agi->agi_count, -ilen);
1186                 be32_add_cpu(&agi->agi_freecount, -(ilen - 1));
1187                 xfs_ialloc_log_agi(tp, agbp, XFS_AGI_COUNT | XFS_AGI_FREECOUNT);
1188                 down_read(&mp->m_peraglock);
1189                 mp->m_perag[agno].pagi_freecount -= ilen - 1;
1190                 up_read(&mp->m_peraglock);
1191                 xfs_trans_mod_sb(tp, XFS_TRANS_SB_ICOUNT, -ilen);
1192                 xfs_trans_mod_sb(tp, XFS_TRANS_SB_IFREE, -(ilen - 1));
1193
1194                 if ((error = xfs_btree_delete(cur, &i))) {
1195                         cmn_err(CE_WARN, "xfs_difree: xfs_btree_delete returned an error %d on %s.\n",
1196                                 error, mp->m_fsname);
1197                         goto error0;
1198                 }
1199
1200                 xfs_bmap_add_free(XFS_AGB_TO_FSB(mp,
1201                                 agno, XFS_INO_TO_AGBNO(mp,rec.ir_startino)),
1202                                 XFS_IALLOC_BLOCKS(mp), flist, mp);
1203         } else {
1204                 *delete = 0;
1205
1206                 if ((error = xfs_inobt_update(cur, rec.ir_startino, rec.ir_freecount, rec.ir_free))) {
1207                         cmn_err(CE_WARN,
1208                                 "xfs_difree: xfs_inobt_update()  returned an error %d on %s.  Returning error.",
1209                                 error, mp->m_fsname);
1210                         goto error0;
1211                 }
1212                 /* 
1213                  * Change the inode free counts and log the ag/sb changes.
1214                  */
1215                 be32_add_cpu(&agi->agi_freecount, 1);
1216                 xfs_ialloc_log_agi(tp, agbp, XFS_AGI_FREECOUNT);
1217                 down_read(&mp->m_peraglock);
1218                 mp->m_perag[agno].pagi_freecount++;
1219                 up_read(&mp->m_peraglock);
1220                 xfs_trans_mod_sb(tp, XFS_TRANS_SB_IFREE, 1);
1221         }
1222
1223 #ifdef DEBUG
1224         if (cur->bc_nlevels == 1) {
1225                 int freecount = 0;
1226
1227                 if ((error = xfs_inobt_lookup_ge(cur, 0, 0, 0, &i)))
1228                         goto error0;
1229                 do {
1230                         if ((error = xfs_inobt_get_rec(cur,
1231                                         &rec.ir_startino,
1232                                         &rec.ir_freecount,
1233                                         &rec.ir_free, &i)))
1234                                 goto error0;
1235                         if (i) {
1236                                 freecount += rec.ir_freecount;
1237                                 if ((error = xfs_btree_increment(cur, 0, &i)))
1238                                         goto error0;
1239                         }
1240                 } while (i == 1);
1241                 ASSERT(freecount == be32_to_cpu(agi->agi_freecount) ||
1242                        XFS_FORCED_SHUTDOWN(mp));
1243         }
1244 #endif
1245         xfs_btree_del_cursor(cur, XFS_BTREE_NOERROR);
1246         return 0;
1247
1248 error0:
1249         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
1250         return error;
1251 }
1252
1253 /*
1254  * Return the location of the inode in bno/off, for mapping it into a buffer.
1255  */
1256 /*ARGSUSED*/
1257 int
1258 xfs_dilocate(
1259         xfs_mount_t     *mp,    /* file system mount structure */
1260         xfs_trans_t     *tp,    /* transaction pointer */
1261         xfs_ino_t       ino,    /* inode to locate */
1262         xfs_fsblock_t   *bno,   /* output: block containing inode */
1263         int             *len,   /* output: num blocks in inode cluster */
1264         int             *off,   /* output: index in block of inode */
1265         uint            flags)  /* flags concerning inode lookup */
1266 {
1267         xfs_agblock_t   agbno;  /* block number of inode in the alloc group */
1268         xfs_buf_t       *agbp;  /* agi buffer */
1269         xfs_agino_t     agino;  /* inode number within alloc group */
1270         xfs_agnumber_t  agno;   /* allocation group number */
1271         int             blks_per_cluster; /* num blocks per inode cluster */
1272         xfs_agblock_t   chunk_agbno;    /* first block in inode chunk */
1273         xfs_agino_t     chunk_agino;    /* first agino in inode chunk */
1274         __int32_t       chunk_cnt;      /* count of free inodes in chunk */
1275         xfs_inofree_t   chunk_free;     /* mask of free inodes in chunk */
1276         xfs_agblock_t   cluster_agbno;  /* first block in inode cluster */
1277         xfs_btree_cur_t *cur;   /* inode btree cursor */
1278         int             error;  /* error code */
1279         int             i;      /* temp state */
1280         int             offset; /* index of inode in its buffer */
1281         int             offset_agbno;   /* blks from chunk start to inode */
1282
1283         ASSERT(ino != NULLFSINO);
1284         /*
1285          * Split up the inode number into its parts.
1286          */
1287         agno = XFS_INO_TO_AGNO(mp, ino);
1288         agino = XFS_INO_TO_AGINO(mp, ino);
1289         agbno = XFS_AGINO_TO_AGBNO(mp, agino);
1290         if (agno >= mp->m_sb.sb_agcount || agbno >= mp->m_sb.sb_agblocks ||
1291             ino != XFS_AGINO_TO_INO(mp, agno, agino)) {
1292 #ifdef DEBUG
1293                 /* no diagnostics for bulkstat, ino comes from userspace */
1294                 if (flags & XFS_IMAP_BULKSTAT)
1295                         return XFS_ERROR(EINVAL);
1296                 if (agno >= mp->m_sb.sb_agcount) {
1297                         xfs_fs_cmn_err(CE_ALERT, mp,
1298                                         "xfs_dilocate: agno (%d) >= "
1299                                         "mp->m_sb.sb_agcount (%d)",
1300                                         agno,  mp->m_sb.sb_agcount);
1301                 }
1302                 if (agbno >= mp->m_sb.sb_agblocks) {
1303                         xfs_fs_cmn_err(CE_ALERT, mp,
1304                                         "xfs_dilocate: agbno (0x%llx) >= "
1305                                         "mp->m_sb.sb_agblocks (0x%lx)",
1306                                         (unsigned long long) agbno,
1307                                         (unsigned long) mp->m_sb.sb_agblocks);
1308                 }
1309                 if (ino != XFS_AGINO_TO_INO(mp, agno, agino)) {
1310                         xfs_fs_cmn_err(CE_ALERT, mp,
1311                                         "xfs_dilocate: ino (0x%llx) != "
1312                                         "XFS_AGINO_TO_INO(mp, agno, agino) "
1313                                         "(0x%llx)",
1314                                         ino, XFS_AGINO_TO_INO(mp, agno, agino));
1315                 }
1316                 xfs_stack_trace();
1317 #endif /* DEBUG */
1318                 return XFS_ERROR(EINVAL);
1319         }
1320         if ((mp->m_sb.sb_blocksize >= XFS_INODE_CLUSTER_SIZE(mp)) ||
1321             !(flags & XFS_IMAP_LOOKUP)) {
1322                 offset = XFS_INO_TO_OFFSET(mp, ino);
1323                 ASSERT(offset < mp->m_sb.sb_inopblock);
1324                 *bno = XFS_AGB_TO_FSB(mp, agno, agbno);
1325                 *off = offset;
1326                 *len = 1;
1327                 return 0;
1328         }
1329         blks_per_cluster = XFS_INODE_CLUSTER_SIZE(mp) >> mp->m_sb.sb_blocklog;
1330         if (*bno != NULLFSBLOCK) {
1331                 offset = XFS_INO_TO_OFFSET(mp, ino);
1332                 ASSERT(offset < mp->m_sb.sb_inopblock);
1333                 cluster_agbno = XFS_FSB_TO_AGBNO(mp, *bno);
1334                 *off = ((agbno - cluster_agbno) * mp->m_sb.sb_inopblock) +
1335                         offset;
1336                 *len = blks_per_cluster;
1337                 return 0;
1338         }
1339         if (mp->m_inoalign_mask) {
1340                 offset_agbno = agbno & mp->m_inoalign_mask;
1341                 chunk_agbno = agbno - offset_agbno;
1342         } else {
1343                 down_read(&mp->m_peraglock);
1344                 error = xfs_ialloc_read_agi(mp, tp, agno, &agbp);
1345                 up_read(&mp->m_peraglock);
1346                 if (error) {
1347 #ifdef DEBUG
1348                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_dilocate: "
1349                                         "xfs_ialloc_read_agi() returned "
1350                                         "error %d, agno %d",
1351                                         error, agno);
1352 #endif /* DEBUG */
1353                         return error;
1354                 }
1355                 cur = xfs_inobt_init_cursor(mp, tp, agbp, agno);
1356                 if ((error = xfs_inobt_lookup_le(cur, agino, 0, 0, &i))) {
1357 #ifdef DEBUG
1358                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_dilocate: "
1359                                         "xfs_inobt_lookup_le() failed");
1360 #endif /* DEBUG */
1361                         goto error0;
1362                 }
1363                 if ((error = xfs_inobt_get_rec(cur, &chunk_agino, &chunk_cnt,
1364                                 &chunk_free, &i))) {
1365 #ifdef DEBUG
1366                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_dilocate: "
1367                                         "xfs_inobt_get_rec() failed");
1368 #endif /* DEBUG */
1369                         goto error0;
1370                 }
1371                 if (i == 0) {
1372 #ifdef DEBUG
1373                         xfs_fs_cmn_err(CE_ALERT, mp, "xfs_dilocate: "
1374                                         "xfs_inobt_get_rec() failed");
1375 #endif /* DEBUG */
1376                         error = XFS_ERROR(EINVAL);
1377                 }
1378                 xfs_trans_brelse(tp, agbp);
1379                 xfs_btree_del_cursor(cur, XFS_BTREE_NOERROR);
1380                 if (error)
1381                         return error;
1382                 chunk_agbno = XFS_AGINO_TO_AGBNO(mp, chunk_agino);
1383                 offset_agbno = agbno - chunk_agbno;
1384         }
1385         ASSERT(agbno >= chunk_agbno);
1386         cluster_agbno = chunk_agbno +
1387                 ((offset_agbno / blks_per_cluster) * blks_per_cluster);
1388         offset = ((agbno - cluster_agbno) * mp->m_sb.sb_inopblock) +
1389                 XFS_INO_TO_OFFSET(mp, ino);
1390         *bno = XFS_AGB_TO_FSB(mp, agno, cluster_agbno);
1391         *off = offset;
1392         *len = blks_per_cluster;
1393         return 0;
1394 error0:
1395         xfs_trans_brelse(tp, agbp);
1396         xfs_btree_del_cursor(cur, XFS_BTREE_ERROR);
1397         return error;
1398 }
1399
1400 /*
1401  * Compute and fill in value of m_in_maxlevels.
1402  */
1403 void
1404 xfs_ialloc_compute_maxlevels(
1405         xfs_mount_t     *mp)            /* file system mount structure */
1406 {
1407         int             level;
1408         uint            maxblocks;
1409         uint            maxleafents;
1410         int             minleafrecs;
1411         int             minnoderecs;
1412
1413         maxleafents = (1LL << XFS_INO_AGINO_BITS(mp)) >>
1414                 XFS_INODES_PER_CHUNK_LOG;
1415         minleafrecs = mp->m_alloc_mnr[0];
1416         minnoderecs = mp->m_alloc_mnr[1];
1417         maxblocks = (maxleafents + minleafrecs - 1) / minleafrecs;
1418         for (level = 1; maxblocks > 1; level++)
1419                 maxblocks = (maxblocks + minnoderecs - 1) / minnoderecs;
1420         mp->m_in_maxlevels = level;
1421 }
1422
1423 /*
1424  * Log specified fields for the ag hdr (inode section)
1425  */
1426 void
1427 xfs_ialloc_log_agi(
1428         xfs_trans_t     *tp,            /* transaction pointer */
1429         xfs_buf_t       *bp,            /* allocation group header buffer */
1430         int             fields)         /* bitmask of fields to log */
1431 {
1432         int                     first;          /* first byte number */
1433         int                     last;           /* last byte number */
1434         static const short      offsets[] = {   /* field starting offsets */
1435                                         /* keep in sync with bit definitions */
1436                 offsetof(xfs_agi_t, agi_magicnum),
1437                 offsetof(xfs_agi_t, agi_versionnum),
1438                 offsetof(xfs_agi_t, agi_seqno),
1439                 offsetof(xfs_agi_t, agi_length),
1440                 offsetof(xfs_agi_t, agi_count),
1441                 offsetof(xfs_agi_t, agi_root),
1442                 offsetof(xfs_agi_t, agi_level),
1443                 offsetof(xfs_agi_t, agi_freecount),
1444                 offsetof(xfs_agi_t, agi_newino),
1445                 offsetof(xfs_agi_t, agi_dirino),
1446                 offsetof(xfs_agi_t, agi_unlinked),
1447                 sizeof(xfs_agi_t)
1448         };
1449 #ifdef DEBUG
1450         xfs_agi_t               *agi;   /* allocation group header */
1451
1452         agi = XFS_BUF_TO_AGI(bp);
1453         ASSERT(be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC);
1454 #endif
1455         /*
1456          * Compute byte offsets for the first and last fields.
1457          */
1458         xfs_btree_offsets(fields, offsets, XFS_AGI_NUM_BITS, &first, &last);
1459         /*
1460          * Log the allocation group inode header buffer.
1461          */
1462         xfs_trans_log_buf(tp, bp, first, last);
1463 }
1464
1465 /*
1466  * Read in the allocation group header (inode allocation section)
1467  */
1468 int
1469 xfs_ialloc_read_agi(
1470         xfs_mount_t     *mp,            /* file system mount structure */
1471         xfs_trans_t     *tp,            /* transaction pointer */
1472         xfs_agnumber_t  agno,           /* allocation group number */
1473         xfs_buf_t       **bpp)          /* allocation group hdr buf */
1474 {
1475         xfs_agi_t       *agi;           /* allocation group header */
1476         int             agi_ok;         /* agi is consistent */
1477         xfs_buf_t       *bp;            /* allocation group hdr buf */
1478         xfs_perag_t     *pag;           /* per allocation group data */
1479         int             error;
1480
1481         ASSERT(agno != NULLAGNUMBER);
1482         error = xfs_trans_read_buf(
1483                         mp, tp, mp->m_ddev_targp,
1484                         XFS_AG_DADDR(mp, agno, XFS_AGI_DADDR(mp)),
1485                         XFS_FSS_TO_BB(mp, 1), 0, &bp);
1486         if (error)
1487                 return error;
1488         ASSERT(bp && !XFS_BUF_GETERROR(bp));
1489
1490         /*
1491          * Validate the magic number of the agi block.
1492          */
1493         agi = XFS_BUF_TO_AGI(bp);
1494         agi_ok =
1495                 be32_to_cpu(agi->agi_magicnum) == XFS_AGI_MAGIC &&
1496                 XFS_AGI_GOOD_VERSION(be32_to_cpu(agi->agi_versionnum));
1497         if (unlikely(XFS_TEST_ERROR(!agi_ok, mp, XFS_ERRTAG_IALLOC_READ_AGI,
1498                         XFS_RANDOM_IALLOC_READ_AGI))) {
1499                 XFS_CORRUPTION_ERROR("xfs_ialloc_read_agi", XFS_ERRLEVEL_LOW,
1500                                      mp, agi);
1501                 xfs_trans_brelse(tp, bp);
1502                 return XFS_ERROR(EFSCORRUPTED);
1503         }
1504         pag = &mp->m_perag[agno];
1505         if (!pag->pagi_init) {
1506                 pag->pagi_freecount = be32_to_cpu(agi->agi_freecount);
1507                 pag->pagi_count = be32_to_cpu(agi->agi_count);
1508                 pag->pagi_init = 1;
1509         } else {
1510                 /*
1511                  * It's possible for these to be out of sync if
1512                  * we are in the middle of a forced shutdown.
1513                  */
1514                 ASSERT(pag->pagi_freecount == be32_to_cpu(agi->agi_freecount) ||
1515                         XFS_FORCED_SHUTDOWN(mp));
1516         }
1517
1518 #ifdef DEBUG
1519         {
1520                 int     i;
1521
1522                 for (i = 0; i < XFS_AGI_UNLINKED_BUCKETS; i++)
1523                         ASSERT(agi->agi_unlinked[i]);
1524         }
1525 #endif
1526
1527         XFS_BUF_SET_VTYPE_REF(bp, B_FS_AGI, XFS_AGI_REF);
1528         *bpp = bp;
1529         return 0;
1530 }
1531
1532 /*
1533  * Read in the agi to initialise the per-ag data in the mount structure
1534  */
1535 int
1536 xfs_ialloc_pagi_init(
1537         xfs_mount_t     *mp,            /* file system mount structure */
1538         xfs_trans_t     *tp,            /* transaction pointer */
1539         xfs_agnumber_t  agno)           /* allocation group number */
1540 {
1541         xfs_buf_t       *bp = NULL;
1542         int             error;
1543
1544         error = xfs_ialloc_read_agi(mp, tp, agno, &bp);
1545         if (error)
1546                 return error;
1547         if (bp)
1548                 xfs_trans_brelse(tp, bp);
1549         return 0;
1550 }