[PATCH] introduce a "kernel-internal pipe object" abstraction
[linux-2.6] / fs / xfs / xfs_dir2_leaf.c
1 /*
2  * Copyright (c) 2000-2003,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_dir.h"
28 #include "xfs_dir2.h"
29 #include "xfs_dmapi.h"
30 #include "xfs_mount.h"
31 #include "xfs_da_btree.h"
32 #include "xfs_bmap_btree.h"
33 #include "xfs_attr_sf.h"
34 #include "xfs_dir_sf.h"
35 #include "xfs_dir2_sf.h"
36 #include "xfs_dinode.h"
37 #include "xfs_inode.h"
38 #include "xfs_bmap.h"
39 #include "xfs_dir2_data.h"
40 #include "xfs_dir2_leaf.h"
41 #include "xfs_dir2_block.h"
42 #include "xfs_dir2_node.h"
43 #include "xfs_dir2_trace.h"
44 #include "xfs_error.h"
45
46 /*
47  * Local function declarations.
48  */
49 #ifdef DEBUG
50 static void xfs_dir2_leaf_check(xfs_inode_t *dp, xfs_dabuf_t *bp);
51 #else
52 #define xfs_dir2_leaf_check(dp, bp)
53 #endif
54 static int xfs_dir2_leaf_lookup_int(xfs_da_args_t *args, xfs_dabuf_t **lbpp,
55                                     int *indexp, xfs_dabuf_t **dbpp);
56 static void xfs_dir2_leaf_log_bests(struct xfs_trans *tp, struct xfs_dabuf *bp,
57                                     int first, int last);
58 static void xfs_dir2_leaf_log_tail(struct xfs_trans *tp, struct xfs_dabuf *bp);
59
60
61 /*
62  * Convert a block form directory to a leaf form directory.
63  */
64 int                                             /* error */
65 xfs_dir2_block_to_leaf(
66         xfs_da_args_t           *args,          /* operation arguments */
67         xfs_dabuf_t             *dbp)           /* input block's buffer */
68 {
69         __be16                  *bestsp;        /* leaf's bestsp entries */
70         xfs_dablk_t             blkno;          /* leaf block's bno */
71         xfs_dir2_block_t        *block;         /* block structure */
72         xfs_dir2_leaf_entry_t   *blp;           /* block's leaf entries */
73         xfs_dir2_block_tail_t   *btp;           /* block's tail */
74         xfs_inode_t             *dp;            /* incore directory inode */
75         int                     error;          /* error return code */
76         xfs_dabuf_t             *lbp;           /* leaf block's buffer */
77         xfs_dir2_db_t           ldb;            /* leaf block's bno */
78         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
79         xfs_dir2_leaf_tail_t    *ltp;           /* leaf's tail */
80         xfs_mount_t             *mp;            /* filesystem mount point */
81         int                     needlog;        /* need to log block header */
82         int                     needscan;       /* need to rescan bestfree */
83         xfs_trans_t             *tp;            /* transaction pointer */
84
85         xfs_dir2_trace_args_b("block_to_leaf", args, dbp);
86         dp = args->dp;
87         mp = dp->i_mount;
88         tp = args->trans;
89         /*
90          * Add the leaf block to the inode.
91          * This interface will only put blocks in the leaf/node range.
92          * Since that's empty now, we'll get the root (block 0 in range).
93          */
94         if ((error = xfs_da_grow_inode(args, &blkno))) {
95                 return error;
96         }
97         ldb = XFS_DIR2_DA_TO_DB(mp, blkno);
98         ASSERT(ldb == XFS_DIR2_LEAF_FIRSTDB(mp));
99         /*
100          * Initialize the leaf block, get a buffer for it.
101          */
102         if ((error = xfs_dir2_leaf_init(args, ldb, &lbp, XFS_DIR2_LEAF1_MAGIC))) {
103                 return error;
104         }
105         ASSERT(lbp != NULL);
106         leaf = lbp->data;
107         block = dbp->data;
108         xfs_dir2_data_check(dp, dbp);
109         btp = XFS_DIR2_BLOCK_TAIL_P(mp, block);
110         blp = XFS_DIR2_BLOCK_LEAF_P(btp);
111         /*
112          * Set the counts in the leaf header.
113          */
114         leaf->hdr.count = cpu_to_be16(be32_to_cpu(btp->count));
115         leaf->hdr.stale = cpu_to_be16(be32_to_cpu(btp->stale));
116         /*
117          * Could compact these but I think we always do the conversion
118          * after squeezing out stale entries.
119          */
120         memcpy(leaf->ents, blp, be32_to_cpu(btp->count) * sizeof(xfs_dir2_leaf_entry_t));
121         xfs_dir2_leaf_log_ents(tp, lbp, 0, be16_to_cpu(leaf->hdr.count) - 1);
122         needscan = 0;
123         needlog = 1;
124         /*
125          * Make the space formerly occupied by the leaf entries and block
126          * tail be free.
127          */
128         xfs_dir2_data_make_free(tp, dbp,
129                 (xfs_dir2_data_aoff_t)((char *)blp - (char *)block),
130                 (xfs_dir2_data_aoff_t)((char *)block + mp->m_dirblksize -
131                                        (char *)blp),
132                 &needlog, &needscan);
133         /*
134          * Fix up the block header, make it a data block.
135          */
136         block->hdr.magic = cpu_to_be32(XFS_DIR2_DATA_MAGIC);
137         if (needscan)
138                 xfs_dir2_data_freescan(mp, (xfs_dir2_data_t *)block, &needlog,
139                         NULL);
140         /*
141          * Set up leaf tail and bests table.
142          */
143         ltp = XFS_DIR2_LEAF_TAIL_P(mp, leaf);
144         ltp->bestcount = cpu_to_be32(1);
145         bestsp = XFS_DIR2_LEAF_BESTS_P(ltp);
146         bestsp[0] =  block->hdr.bestfree[0].length;
147         /*
148          * Log the data header and leaf bests table.
149          */
150         if (needlog)
151                 xfs_dir2_data_log_header(tp, dbp);
152         xfs_dir2_leaf_check(dp, lbp);
153         xfs_dir2_data_check(dp, dbp);
154         xfs_dir2_leaf_log_bests(tp, lbp, 0, 0);
155         xfs_da_buf_done(lbp);
156         return 0;
157 }
158
159 /*
160  * Add an entry to a leaf form directory.
161  */
162 int                                             /* error */
163 xfs_dir2_leaf_addname(
164         xfs_da_args_t           *args)          /* operation arguments */
165 {
166         __be16                  *bestsp;        /* freespace table in leaf */
167         int                     compact;        /* need to compact leaves */
168         xfs_dir2_data_t         *data;          /* data block structure */
169         xfs_dabuf_t             *dbp;           /* data block buffer */
170         xfs_dir2_data_entry_t   *dep;           /* data block entry */
171         xfs_inode_t             *dp;            /* incore directory inode */
172         xfs_dir2_data_unused_t  *dup;           /* data unused entry */
173         int                     error;          /* error return value */
174         int                     grown;          /* allocated new data block */
175         int                     highstale;      /* index of next stale leaf */
176         int                     i;              /* temporary, index */
177         int                     index;          /* leaf table position */
178         xfs_dabuf_t             *lbp;           /* leaf's buffer */
179         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
180         int                     length;         /* length of new entry */
181         xfs_dir2_leaf_entry_t   *lep;           /* leaf entry table pointer */
182         int                     lfloglow;       /* low leaf logging index */
183         int                     lfloghigh;      /* high leaf logging index */
184         int                     lowstale;       /* index of prev stale leaf */
185         xfs_dir2_leaf_tail_t    *ltp;           /* leaf tail pointer */
186         xfs_mount_t             *mp;            /* filesystem mount point */
187         int                     needbytes;      /* leaf block bytes needed */
188         int                     needlog;        /* need to log data header */
189         int                     needscan;       /* need to rescan data free */
190         __be16                  *tagp;          /* end of data entry */
191         xfs_trans_t             *tp;            /* transaction pointer */
192         xfs_dir2_db_t           use_block;      /* data block number */
193
194         xfs_dir2_trace_args("leaf_addname", args);
195         dp = args->dp;
196         tp = args->trans;
197         mp = dp->i_mount;
198         /*
199          * Read the leaf block.
200          */
201         error = xfs_da_read_buf(tp, dp, mp->m_dirleafblk, -1, &lbp,
202                 XFS_DATA_FORK);
203         if (error) {
204                 return error;
205         }
206         ASSERT(lbp != NULL);
207         /*
208          * Look up the entry by hash value and name.
209          * We know it's not there, our caller has already done a lookup.
210          * So the index is of the entry to insert in front of.
211          * But if there are dup hash values the index is of the first of those.
212          */
213         index = xfs_dir2_leaf_search_hash(args, lbp);
214         leaf = lbp->data;
215         ltp = XFS_DIR2_LEAF_TAIL_P(mp, leaf);
216         bestsp = XFS_DIR2_LEAF_BESTS_P(ltp);
217         length = XFS_DIR2_DATA_ENTSIZE(args->namelen);
218         /*
219          * See if there are any entries with the same hash value
220          * and space in their block for the new entry.
221          * This is good because it puts multiple same-hash value entries
222          * in a data block, improving the lookup of those entries.
223          */
224         for (use_block = -1, lep = &leaf->ents[index];
225              index < be16_to_cpu(leaf->hdr.count) && be32_to_cpu(lep->hashval) == args->hashval;
226              index++, lep++) {
227                 if (be32_to_cpu(lep->address) == XFS_DIR2_NULL_DATAPTR)
228                         continue;
229                 i = XFS_DIR2_DATAPTR_TO_DB(mp, be32_to_cpu(lep->address));
230                 ASSERT(i < be32_to_cpu(ltp->bestcount));
231                 ASSERT(be16_to_cpu(bestsp[i]) != NULLDATAOFF);
232                 if (be16_to_cpu(bestsp[i]) >= length) {
233                         use_block = i;
234                         break;
235                 }
236         }
237         /*
238          * Didn't find a block yet, linear search all the data blocks.
239          */
240         if (use_block == -1) {
241                 for (i = 0; i < be32_to_cpu(ltp->bestcount); i++) {
242                         /*
243                          * Remember a block we see that's missing.
244                          */
245                         if (be16_to_cpu(bestsp[i]) == NULLDATAOFF && use_block == -1)
246                                 use_block = i;
247                         else if (be16_to_cpu(bestsp[i]) >= length) {
248                                 use_block = i;
249                                 break;
250                         }
251                 }
252         }
253         /*
254          * How many bytes do we need in the leaf block?
255          */
256         needbytes =
257                 (leaf->hdr.stale ? 0 : (uint)sizeof(leaf->ents[0])) +
258                 (use_block != -1 ? 0 : (uint)sizeof(leaf->bests[0]));
259         /*
260          * Now kill use_block if it refers to a missing block, so we
261          * can use it as an indication of allocation needed.
262          */
263         if (use_block != -1 && be16_to_cpu(bestsp[use_block]) == NULLDATAOFF)
264                 use_block = -1;
265         /*
266          * If we don't have enough free bytes but we can make enough
267          * by compacting out stale entries, we'll do that.
268          */
269         if ((char *)bestsp - (char *)&leaf->ents[be16_to_cpu(leaf->hdr.count)] < needbytes &&
270             be16_to_cpu(leaf->hdr.stale) > 1) {
271                 compact = 1;
272         }
273         /*
274          * Otherwise if we don't have enough free bytes we need to
275          * convert to node form.
276          */
277         else if ((char *)bestsp - (char *)&leaf->ents[be16_to_cpu(leaf->hdr.count)] <
278                  needbytes) {
279                 /*
280                  * Just checking or no space reservation, give up.
281                  */
282                 if (args->justcheck || args->total == 0) {
283                         xfs_da_brelse(tp, lbp);
284                         return XFS_ERROR(ENOSPC);
285                 }
286                 /*
287                  * Convert to node form.
288                  */
289                 error = xfs_dir2_leaf_to_node(args, lbp);
290                 xfs_da_buf_done(lbp);
291                 if (error)
292                         return error;
293                 /*
294                  * Then add the new entry.
295                  */
296                 return xfs_dir2_node_addname(args);
297         }
298         /*
299          * Otherwise it will fit without compaction.
300          */
301         else
302                 compact = 0;
303         /*
304          * If just checking, then it will fit unless we needed to allocate
305          * a new data block.
306          */
307         if (args->justcheck) {
308                 xfs_da_brelse(tp, lbp);
309                 return use_block == -1 ? XFS_ERROR(ENOSPC) : 0;
310         }
311         /*
312          * If no allocations are allowed, return now before we've
313          * changed anything.
314          */
315         if (args->total == 0 && use_block == -1) {
316                 xfs_da_brelse(tp, lbp);
317                 return XFS_ERROR(ENOSPC);
318         }
319         /*
320          * Need to compact the leaf entries, removing stale ones.
321          * Leave one stale entry behind - the one closest to our
322          * insertion index - and we'll shift that one to our insertion
323          * point later.
324          */
325         if (compact) {
326                 xfs_dir2_leaf_compact_x1(lbp, &index, &lowstale, &highstale,
327                         &lfloglow, &lfloghigh);
328         }
329         /*
330          * There are stale entries, so we'll need log-low and log-high
331          * impossibly bad values later.
332          */
333         else if (be16_to_cpu(leaf->hdr.stale)) {
334                 lfloglow = be16_to_cpu(leaf->hdr.count);
335                 lfloghigh = -1;
336         }
337         /*
338          * If there was no data block space found, we need to allocate
339          * a new one.
340          */
341         if (use_block == -1) {
342                 /*
343                  * Add the new data block.
344                  */
345                 if ((error = xfs_dir2_grow_inode(args, XFS_DIR2_DATA_SPACE,
346                                 &use_block))) {
347                         xfs_da_brelse(tp, lbp);
348                         return error;
349                 }
350                 /*
351                  * Initialize the block.
352                  */
353                 if ((error = xfs_dir2_data_init(args, use_block, &dbp))) {
354                         xfs_da_brelse(tp, lbp);
355                         return error;
356                 }
357                 /*
358                  * If we're adding a new data block on the end we need to
359                  * extend the bests table.  Copy it up one entry.
360                  */
361                 if (use_block >= be32_to_cpu(ltp->bestcount)) {
362                         bestsp--;
363                         memmove(&bestsp[0], &bestsp[1],
364                                 be32_to_cpu(ltp->bestcount) * sizeof(bestsp[0]));
365                         be32_add(&ltp->bestcount, 1);
366                         xfs_dir2_leaf_log_tail(tp, lbp);
367                         xfs_dir2_leaf_log_bests(tp, lbp, 0, be32_to_cpu(ltp->bestcount) - 1);
368                 }
369                 /*
370                  * If we're filling in a previously empty block just log it.
371                  */
372                 else
373                         xfs_dir2_leaf_log_bests(tp, lbp, use_block, use_block);
374                 data = dbp->data;
375                 bestsp[use_block] = data->hdr.bestfree[0].length;
376                 grown = 1;
377         }
378         /*
379          * Already had space in some data block.
380          * Just read that one in.
381          */
382         else {
383                 if ((error =
384                     xfs_da_read_buf(tp, dp, XFS_DIR2_DB_TO_DA(mp, use_block),
385                             -1, &dbp, XFS_DATA_FORK))) {
386                         xfs_da_brelse(tp, lbp);
387                         return error;
388                 }
389                 data = dbp->data;
390                 grown = 0;
391         }
392         xfs_dir2_data_check(dp, dbp);
393         /*
394          * Point to the biggest freespace in our data block.
395          */
396         dup = (xfs_dir2_data_unused_t *)
397               ((char *)data + be16_to_cpu(data->hdr.bestfree[0].offset));
398         ASSERT(be16_to_cpu(dup->length) >= length);
399         needscan = needlog = 0;
400         /*
401          * Mark the initial part of our freespace in use for the new entry.
402          */
403         xfs_dir2_data_use_free(tp, dbp, dup,
404                 (xfs_dir2_data_aoff_t)((char *)dup - (char *)data), length,
405                 &needlog, &needscan);
406         /*
407          * Initialize our new entry (at last).
408          */
409         dep = (xfs_dir2_data_entry_t *)dup;
410         INT_SET(dep->inumber, ARCH_CONVERT, args->inumber);
411         dep->namelen = args->namelen;
412         memcpy(dep->name, args->name, dep->namelen);
413         tagp = XFS_DIR2_DATA_ENTRY_TAG_P(dep);
414         *tagp = cpu_to_be16((char *)dep - (char *)data);
415         /*
416          * Need to scan fix up the bestfree table.
417          */
418         if (needscan)
419                 xfs_dir2_data_freescan(mp, data, &needlog, NULL);
420         /*
421          * Need to log the data block's header.
422          */
423         if (needlog)
424                 xfs_dir2_data_log_header(tp, dbp);
425         xfs_dir2_data_log_entry(tp, dbp, dep);
426         /*
427          * If the bests table needs to be changed, do it.
428          * Log the change unless we've already done that.
429          */
430         if (be16_to_cpu(bestsp[use_block]) != be16_to_cpu(data->hdr.bestfree[0].length)) {
431                 bestsp[use_block] = data->hdr.bestfree[0].length;
432                 if (!grown)
433                         xfs_dir2_leaf_log_bests(tp, lbp, use_block, use_block);
434         }
435         /*
436          * Now we need to make room to insert the leaf entry.
437          * If there are no stale entries, we just insert a hole at index.
438          */
439         if (!leaf->hdr.stale) {
440                 /*
441                  * lep is still good as the index leaf entry.
442                  */
443                 if (index < be16_to_cpu(leaf->hdr.count))
444                         memmove(lep + 1, lep,
445                                 (be16_to_cpu(leaf->hdr.count) - index) * sizeof(*lep));
446                 /*
447                  * Record low and high logging indices for the leaf.
448                  */
449                 lfloglow = index;
450                 lfloghigh = be16_to_cpu(leaf->hdr.count);
451                 be16_add(&leaf->hdr.count, 1);
452         }
453         /*
454          * There are stale entries.
455          * We will use one of them for the new entry.
456          * It's probably not at the right location, so we'll have to
457          * shift some up or down first.
458          */
459         else {
460                 /*
461                  * If we didn't compact before, we need to find the nearest
462                  * stale entries before and after our insertion point.
463                  */
464                 if (compact == 0) {
465                         /*
466                          * Find the first stale entry before the insertion
467                          * point, if any.
468                          */
469                         for (lowstale = index - 1;
470                              lowstale >= 0 &&
471                                 be32_to_cpu(leaf->ents[lowstale].address) !=
472                                 XFS_DIR2_NULL_DATAPTR;
473                              lowstale--)
474                                 continue;
475                         /*
476                          * Find the next stale entry at or after the insertion
477                          * point, if any.   Stop if we go so far that the
478                          * lowstale entry would be better.
479                          */
480                         for (highstale = index;
481                              highstale < be16_to_cpu(leaf->hdr.count) &&
482                                 be32_to_cpu(leaf->ents[highstale].address) !=
483                                 XFS_DIR2_NULL_DATAPTR &&
484                                 (lowstale < 0 ||
485                                  index - lowstale - 1 >= highstale - index);
486                              highstale++)
487                                 continue;
488                 }
489                 /*
490                  * If the low one is better, use it.
491                  */
492                 if (lowstale >= 0 &&
493                     (highstale == be16_to_cpu(leaf->hdr.count) ||
494                      index - lowstale - 1 < highstale - index)) {
495                         ASSERT(index - lowstale - 1 >= 0);
496                         ASSERT(be32_to_cpu(leaf->ents[lowstale].address) ==
497                                XFS_DIR2_NULL_DATAPTR);
498                         /*
499                          * Copy entries up to cover the stale entry
500                          * and make room for the new entry.
501                          */
502                         if (index - lowstale - 1 > 0)
503                                 memmove(&leaf->ents[lowstale],
504                                         &leaf->ents[lowstale + 1],
505                                         (index - lowstale - 1) * sizeof(*lep));
506                         lep = &leaf->ents[index - 1];
507                         lfloglow = MIN(lowstale, lfloglow);
508                         lfloghigh = MAX(index - 1, lfloghigh);
509                 }
510                 /*
511                  * The high one is better, so use that one.
512                  */
513                 else {
514                         ASSERT(highstale - index >= 0);
515                         ASSERT(be32_to_cpu(leaf->ents[highstale].address) ==
516                                XFS_DIR2_NULL_DATAPTR);
517                         /*
518                          * Copy entries down to cover the stale entry
519                          * and make room for the new entry.
520                          */
521                         if (highstale - index > 0)
522                                 memmove(&leaf->ents[index + 1],
523                                         &leaf->ents[index],
524                                         (highstale - index) * sizeof(*lep));
525                         lep = &leaf->ents[index];
526                         lfloglow = MIN(index, lfloglow);
527                         lfloghigh = MAX(highstale, lfloghigh);
528                 }
529                 be16_add(&leaf->hdr.stale, -1);
530         }
531         /*
532          * Fill in the new leaf entry.
533          */
534         lep->hashval = cpu_to_be32(args->hashval);
535         lep->address = cpu_to_be32(XFS_DIR2_DB_OFF_TO_DATAPTR(mp, use_block,
536                                 be16_to_cpu(*tagp)));
537         /*
538          * Log the leaf fields and give up the buffers.
539          */
540         xfs_dir2_leaf_log_header(tp, lbp);
541         xfs_dir2_leaf_log_ents(tp, lbp, lfloglow, lfloghigh);
542         xfs_dir2_leaf_check(dp, lbp);
543         xfs_da_buf_done(lbp);
544         xfs_dir2_data_check(dp, dbp);
545         xfs_da_buf_done(dbp);
546         return 0;
547 }
548
549 #ifdef DEBUG
550 /*
551  * Check the internal consistency of a leaf1 block.
552  * Pop an assert if something is wrong.
553  */
554 void
555 xfs_dir2_leaf_check(
556         xfs_inode_t             *dp,            /* incore directory inode */
557         xfs_dabuf_t             *bp)            /* leaf's buffer */
558 {
559         int                     i;              /* leaf index */
560         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
561         xfs_dir2_leaf_tail_t    *ltp;           /* leaf tail pointer */
562         xfs_mount_t             *mp;            /* filesystem mount point */
563         int                     stale;          /* count of stale leaves */
564
565         leaf = bp->data;
566         mp = dp->i_mount;
567         ASSERT(be16_to_cpu(leaf->hdr.info.magic) == XFS_DIR2_LEAF1_MAGIC);
568         /*
569          * This value is not restrictive enough.
570          * Should factor in the size of the bests table as well.
571          * We can deduce a value for that from di_size.
572          */
573         ASSERT(be16_to_cpu(leaf->hdr.count) <= XFS_DIR2_MAX_LEAF_ENTS(mp));
574         ltp = XFS_DIR2_LEAF_TAIL_P(mp, leaf);
575         /*
576          * Leaves and bests don't overlap.
577          */
578         ASSERT((char *)&leaf->ents[be16_to_cpu(leaf->hdr.count)] <=
579                (char *)XFS_DIR2_LEAF_BESTS_P(ltp));
580         /*
581          * Check hash value order, count stale entries.
582          */
583         for (i = stale = 0; i < be16_to_cpu(leaf->hdr.count); i++) {
584                 if (i + 1 < be16_to_cpu(leaf->hdr.count))
585                         ASSERT(be32_to_cpu(leaf->ents[i].hashval) <=
586                                be32_to_cpu(leaf->ents[i + 1].hashval));
587                 if (be32_to_cpu(leaf->ents[i].address) == XFS_DIR2_NULL_DATAPTR)
588                         stale++;
589         }
590         ASSERT(be16_to_cpu(leaf->hdr.stale) == stale);
591 }
592 #endif  /* DEBUG */
593
594 /*
595  * Compact out any stale entries in the leaf.
596  * Log the header and changed leaf entries, if any.
597  */
598 void
599 xfs_dir2_leaf_compact(
600         xfs_da_args_t   *args,          /* operation arguments */
601         xfs_dabuf_t     *bp)            /* leaf buffer */
602 {
603         int             from;           /* source leaf index */
604         xfs_dir2_leaf_t *leaf;          /* leaf structure */
605         int             loglow;         /* first leaf entry to log */
606         int             to;             /* target leaf index */
607
608         leaf = bp->data;
609         if (!leaf->hdr.stale) {
610                 return;
611         }
612         /*
613          * Compress out the stale entries in place.
614          */
615         for (from = to = 0, loglow = -1; from < be16_to_cpu(leaf->hdr.count); from++) {
616                 if (be32_to_cpu(leaf->ents[from].address) == XFS_DIR2_NULL_DATAPTR)
617                         continue;
618                 /*
619                  * Only actually copy the entries that are different.
620                  */
621                 if (from > to) {
622                         if (loglow == -1)
623                                 loglow = to;
624                         leaf->ents[to] = leaf->ents[from];
625                 }
626                 to++;
627         }
628         /*
629          * Update and log the header, log the leaf entries.
630          */
631         ASSERT(be16_to_cpu(leaf->hdr.stale) == from - to);
632         be16_add(&leaf->hdr.count, -(be16_to_cpu(leaf->hdr.stale)));
633         leaf->hdr.stale = 0;
634         xfs_dir2_leaf_log_header(args->trans, bp);
635         if (loglow != -1)
636                 xfs_dir2_leaf_log_ents(args->trans, bp, loglow, to - 1);
637 }
638
639 /*
640  * Compact the leaf entries, removing stale ones.
641  * Leave one stale entry behind - the one closest to our
642  * insertion index - and the caller will shift that one to our insertion
643  * point later.
644  * Return new insertion index, where the remaining stale entry is,
645  * and leaf logging indices.
646  */
647 void
648 xfs_dir2_leaf_compact_x1(
649         xfs_dabuf_t     *bp,            /* leaf buffer */
650         int             *indexp,        /* insertion index */
651         int             *lowstalep,     /* out: stale entry before us */
652         int             *highstalep,    /* out: stale entry after us */
653         int             *lowlogp,       /* out: low log index */
654         int             *highlogp)      /* out: high log index */
655 {
656         int             from;           /* source copy index */
657         int             highstale;      /* stale entry at/after index */
658         int             index;          /* insertion index */
659         int             keepstale;      /* source index of kept stale */
660         xfs_dir2_leaf_t *leaf;          /* leaf structure */
661         int             lowstale;       /* stale entry before index */
662         int             newindex=0;     /* new insertion index */
663         int             to;             /* destination copy index */
664
665         leaf = bp->data;
666         ASSERT(be16_to_cpu(leaf->hdr.stale) > 1);
667         index = *indexp;
668         /*
669          * Find the first stale entry before our index, if any.
670          */
671         for (lowstale = index - 1;
672              lowstale >= 0 &&
673                 be32_to_cpu(leaf->ents[lowstale].address) != XFS_DIR2_NULL_DATAPTR;
674              lowstale--)
675                 continue;
676         /*
677          * Find the first stale entry at or after our index, if any.
678          * Stop if the answer would be worse than lowstale.
679          */
680         for (highstale = index;
681              highstale < be16_to_cpu(leaf->hdr.count) &&
682                 be32_to_cpu(leaf->ents[highstale].address) != XFS_DIR2_NULL_DATAPTR &&
683                 (lowstale < 0 || index - lowstale > highstale - index);
684              highstale++)
685                 continue;
686         /*
687          * Pick the better of lowstale and highstale.
688          */
689         if (lowstale >= 0 &&
690             (highstale == be16_to_cpu(leaf->hdr.count) ||
691              index - lowstale <= highstale - index))
692                 keepstale = lowstale;
693         else
694                 keepstale = highstale;
695         /*
696          * Copy the entries in place, removing all the stale entries
697          * except keepstale.
698          */
699         for (from = to = 0; from < be16_to_cpu(leaf->hdr.count); from++) {
700                 /*
701                  * Notice the new value of index.
702                  */
703                 if (index == from)
704                         newindex = to;
705                 if (from != keepstale &&
706                     be32_to_cpu(leaf->ents[from].address) == XFS_DIR2_NULL_DATAPTR) {
707                         if (from == to)
708                                 *lowlogp = to;
709                         continue;
710                 }
711                 /*
712                  * Record the new keepstale value for the insertion.
713                  */
714                 if (from == keepstale)
715                         lowstale = highstale = to;
716                 /*
717                  * Copy only the entries that have moved.
718                  */
719                 if (from > to)
720                         leaf->ents[to] = leaf->ents[from];
721                 to++;
722         }
723         ASSERT(from > to);
724         /*
725          * If the insertion point was past the last entry,
726          * set the new insertion point accordingly.
727          */
728         if (index == from)
729                 newindex = to;
730         *indexp = newindex;
731         /*
732          * Adjust the leaf header values.
733          */
734         be16_add(&leaf->hdr.count, -(from - to));
735         leaf->hdr.stale = cpu_to_be16(1);
736         /*
737          * Remember the low/high stale value only in the "right"
738          * direction.
739          */
740         if (lowstale >= newindex)
741                 lowstale = -1;
742         else
743                 highstale = be16_to_cpu(leaf->hdr.count);
744         *highlogp = be16_to_cpu(leaf->hdr.count) - 1;
745         *lowstalep = lowstale;
746         *highstalep = highstale;
747 }
748
749 /*
750  * Getdents (readdir) for leaf and node directories.
751  * This reads the data blocks only, so is the same for both forms.
752  */
753 int                                             /* error */
754 xfs_dir2_leaf_getdents(
755         xfs_trans_t             *tp,            /* transaction pointer */
756         xfs_inode_t             *dp,            /* incore directory inode */
757         uio_t                   *uio,           /* I/O control & vectors */
758         int                     *eofp,          /* out: reached end of dir */
759         xfs_dirent_t            *dbp,           /* caller's buffer */
760         xfs_dir2_put_t          put)            /* ABI formatting routine */
761 {
762         xfs_dabuf_t             *bp;            /* data block buffer */
763         int                     byteoff;        /* offset in current block */
764         xfs_dir2_db_t           curdb;          /* db for current block */
765         xfs_dir2_off_t          curoff;         /* current overall offset */
766         xfs_dir2_data_t         *data;          /* data block structure */
767         xfs_dir2_data_entry_t   *dep;           /* data entry */
768         xfs_dir2_data_unused_t  *dup;           /* unused entry */
769         int                     eof;            /* reached end of directory */
770         int                     error = 0;      /* error return value */
771         int                     i;              /* temporary loop index */
772         int                     j;              /* temporary loop index */
773         int                     length;         /* temporary length value */
774         xfs_bmbt_irec_t         *map;           /* map vector for blocks */
775         xfs_extlen_t            map_blocks;     /* number of fsbs in map */
776         xfs_dablk_t             map_off;        /* last mapped file offset */
777         int                     map_size;       /* total entries in *map */
778         int                     map_valid;      /* valid entries in *map */
779         xfs_mount_t             *mp;            /* filesystem mount point */
780         xfs_dir2_off_t          newoff;         /* new curoff after new blk */
781         int                     nmap;           /* mappings to ask xfs_bmapi */
782         xfs_dir2_put_args_t     *p;             /* formatting arg bundle */
783         char                    *ptr = NULL;    /* pointer to current data */
784         int                     ra_current;     /* number of read-ahead blks */
785         int                     ra_index;       /* *map index for read-ahead */
786         int                     ra_offset;      /* map entry offset for ra */
787         int                     ra_want;        /* readahead count wanted */
788
789         /*
790          * If the offset is at or past the largest allowed value,
791          * give up right away, return eof.
792          */
793         if (uio->uio_offset >= XFS_DIR2_MAX_DATAPTR) {
794                 *eofp = 1;
795                 return 0;
796         }
797         mp = dp->i_mount;
798         /*
799          * Setup formatting arguments.
800          */
801         p = kmem_alloc(sizeof(*p), KM_SLEEP);
802         p->dbp = dbp;
803         p->put = put;
804         p->uio = uio;
805         /*
806          * Set up to bmap a number of blocks based on the caller's
807          * buffer size, the directory block size, and the filesystem
808          * block size.
809          */
810         map_size =
811                 howmany(uio->uio_resid + mp->m_dirblksize,
812                         mp->m_sb.sb_blocksize);
813         map = kmem_alloc(map_size * sizeof(*map), KM_SLEEP);
814         map_valid = ra_index = ra_offset = ra_current = map_blocks = 0;
815         bp = NULL;
816         eof = 1;
817         /*
818          * Inside the loop we keep the main offset value as a byte offset
819          * in the directory file.
820          */
821         curoff = XFS_DIR2_DATAPTR_TO_BYTE(mp, uio->uio_offset);
822         /*
823          * Force this conversion through db so we truncate the offset
824          * down to get the start of the data block.
825          */
826         map_off = XFS_DIR2_DB_TO_DA(mp, XFS_DIR2_BYTE_TO_DB(mp, curoff));
827         /*
828          * Loop over directory entries until we reach the end offset.
829          * Get more blocks and readahead as necessary.
830          */
831         while (curoff < XFS_DIR2_LEAF_OFFSET) {
832                 /*
833                  * If we have no buffer, or we're off the end of the
834                  * current buffer, need to get another one.
835                  */
836                 if (!bp || ptr >= (char *)bp->data + mp->m_dirblksize) {
837                         /*
838                          * If we have a buffer, we need to release it and
839                          * take it out of the mapping.
840                          */
841                         if (bp) {
842                                 xfs_da_brelse(tp, bp);
843                                 bp = NULL;
844                                 map_blocks -= mp->m_dirblkfsbs;
845                                 /*
846                                  * Loop to get rid of the extents for the
847                                  * directory block.
848                                  */
849                                 for (i = mp->m_dirblkfsbs; i > 0; ) {
850                                         j = MIN((int)map->br_blockcount, i);
851                                         map->br_blockcount -= j;
852                                         map->br_startblock += j;
853                                         map->br_startoff += j;
854                                         /*
855                                          * If mapping is done, pitch it from
856                                          * the table.
857                                          */
858                                         if (!map->br_blockcount && --map_valid)
859                                                 memmove(&map[0], &map[1],
860                                                         sizeof(map[0]) *
861                                                         map_valid);
862                                         i -= j;
863                                 }
864                         }
865                         /*
866                          * Recalculate the readahead blocks wanted.
867                          */
868                         ra_want = howmany(uio->uio_resid + mp->m_dirblksize,
869                                           mp->m_sb.sb_blocksize) - 1;
870                         /*
871                          * If we don't have as many as we want, and we haven't
872                          * run out of data blocks, get some more mappings.
873                          */
874                         if (1 + ra_want > map_blocks &&
875                             map_off <
876                             XFS_DIR2_BYTE_TO_DA(mp, XFS_DIR2_LEAF_OFFSET)) {
877                                 /*
878                                  * Get more bmaps, fill in after the ones
879                                  * we already have in the table.
880                                  */
881                                 nmap = map_size - map_valid;
882                                 error = xfs_bmapi(tp, dp,
883                                         map_off,
884                                         XFS_DIR2_BYTE_TO_DA(mp,
885                                                 XFS_DIR2_LEAF_OFFSET) - map_off,
886                                         XFS_BMAPI_METADATA, NULL, 0,
887                                         &map[map_valid], &nmap, NULL);
888                                 /*
889                                  * Don't know if we should ignore this or
890                                  * try to return an error.
891                                  * The trouble with returning errors
892                                  * is that readdir will just stop without
893                                  * actually passing the error through.
894                                  */
895                                 if (error)
896                                         break;  /* XXX */
897                                 /*
898                                  * If we got all the mappings we asked for,
899                                  * set the final map offset based on the
900                                  * last bmap value received.
901                                  * Otherwise, we've reached the end.
902                                  */
903                                 if (nmap == map_size - map_valid)
904                                         map_off =
905                                         map[map_valid + nmap - 1].br_startoff +
906                                         map[map_valid + nmap - 1].br_blockcount;
907                                 else
908                                         map_off =
909                                                 XFS_DIR2_BYTE_TO_DA(mp,
910                                                         XFS_DIR2_LEAF_OFFSET);
911                                 /*
912                                  * Look for holes in the mapping, and
913                                  * eliminate them.  Count up the valid blocks.
914                                  */
915                                 for (i = map_valid; i < map_valid + nmap; ) {
916                                         if (map[i].br_startblock ==
917                                             HOLESTARTBLOCK) {
918                                                 nmap--;
919                                                 length = map_valid + nmap - i;
920                                                 if (length)
921                                                         memmove(&map[i],
922                                                                 &map[i + 1],
923                                                                 sizeof(map[i]) *
924                                                                 length);
925                                         } else {
926                                                 map_blocks +=
927                                                         map[i].br_blockcount;
928                                                 i++;
929                                         }
930                                 }
931                                 map_valid += nmap;
932                         }
933                         /*
934                          * No valid mappings, so no more data blocks.
935                          */
936                         if (!map_valid) {
937                                 curoff = XFS_DIR2_DA_TO_BYTE(mp, map_off);
938                                 break;
939                         }
940                         /*
941                          * Read the directory block starting at the first
942                          * mapping.
943                          */
944                         curdb = XFS_DIR2_DA_TO_DB(mp, map->br_startoff);
945                         error = xfs_da_read_buf(tp, dp, map->br_startoff,
946                                 map->br_blockcount >= mp->m_dirblkfsbs ?
947                                     XFS_FSB_TO_DADDR(mp, map->br_startblock) :
948                                     -1,
949                                 &bp, XFS_DATA_FORK);
950                         /*
951                          * Should just skip over the data block instead
952                          * of giving up.
953                          */
954                         if (error)
955                                 break;  /* XXX */
956                         /*
957                          * Adjust the current amount of read-ahead: we just
958                          * read a block that was previously ra.
959                          */
960                         if (ra_current)
961                                 ra_current -= mp->m_dirblkfsbs;
962                         /*
963                          * Do we need more readahead?
964                          */
965                         for (ra_index = ra_offset = i = 0;
966                              ra_want > ra_current && i < map_blocks;
967                              i += mp->m_dirblkfsbs) {
968                                 ASSERT(ra_index < map_valid);
969                                 /*
970                                  * Read-ahead a contiguous directory block.
971                                  */
972                                 if (i > ra_current &&
973                                     map[ra_index].br_blockcount >=
974                                     mp->m_dirblkfsbs) {
975                                         xfs_baread(mp->m_ddev_targp,
976                                                 XFS_FSB_TO_DADDR(mp,
977                                                    map[ra_index].br_startblock +
978                                                    ra_offset),
979                                                 (int)BTOBB(mp->m_dirblksize));
980                                         ra_current = i;
981                                 }
982                                 /*
983                                  * Read-ahead a non-contiguous directory block.
984                                  * This doesn't use our mapping, but this
985                                  * is a very rare case.
986                                  */
987                                 else if (i > ra_current) {
988                                         (void)xfs_da_reada_buf(tp, dp,
989                                                 map[ra_index].br_startoff +
990                                                 ra_offset, XFS_DATA_FORK);
991                                         ra_current = i;
992                                 }
993                                 /*
994                                  * Advance offset through the mapping table.
995                                  */
996                                 for (j = 0; j < mp->m_dirblkfsbs; j++) {
997                                         /*
998                                          * The rest of this extent but not
999                                          * more than a dir block.
1000                                          */
1001                                         length = MIN(mp->m_dirblkfsbs,
1002                                                 (int)(map[ra_index].br_blockcount -
1003                                                 ra_offset));
1004                                         j += length;
1005                                         ra_offset += length;
1006                                         /*
1007                                          * Advance to the next mapping if
1008                                          * this one is used up.
1009                                          */
1010                                         if (ra_offset ==
1011                                             map[ra_index].br_blockcount) {
1012                                                 ra_offset = 0;
1013                                                 ra_index++;
1014                                         }
1015                                 }
1016                         }
1017                         /*
1018                          * Having done a read, we need to set a new offset.
1019                          */
1020                         newoff = XFS_DIR2_DB_OFF_TO_BYTE(mp, curdb, 0);
1021                         /*
1022                          * Start of the current block.
1023                          */
1024                         if (curoff < newoff)
1025                                 curoff = newoff;
1026                         /*
1027                          * Make sure we're in the right block.
1028                          */
1029                         else if (curoff > newoff)
1030                                 ASSERT(XFS_DIR2_BYTE_TO_DB(mp, curoff) ==
1031                                        curdb);
1032                         data = bp->data;
1033                         xfs_dir2_data_check(dp, bp);
1034                         /*
1035                          * Find our position in the block.
1036                          */
1037                         ptr = (char *)&data->u;
1038                         byteoff = XFS_DIR2_BYTE_TO_OFF(mp, curoff);
1039                         /*
1040                          * Skip past the header.
1041                          */
1042                         if (byteoff == 0)
1043                                 curoff += (uint)sizeof(data->hdr);
1044                         /*
1045                          * Skip past entries until we reach our offset.
1046                          */
1047                         else {
1048                                 while ((char *)ptr - (char *)data < byteoff) {
1049                                         dup = (xfs_dir2_data_unused_t *)ptr;
1050
1051                                         if (be16_to_cpu(dup->freetag)
1052                                                   == XFS_DIR2_DATA_FREE_TAG) {
1053
1054                                                 length = be16_to_cpu(dup->length);
1055                                                 ptr += length;
1056                                                 continue;
1057                                         }
1058                                         dep = (xfs_dir2_data_entry_t *)ptr;
1059                                         length =
1060                                            XFS_DIR2_DATA_ENTSIZE(dep->namelen);
1061                                         ptr += length;
1062                                 }
1063                                 /*
1064                                  * Now set our real offset.
1065                                  */
1066                                 curoff =
1067                                         XFS_DIR2_DB_OFF_TO_BYTE(mp,
1068                                             XFS_DIR2_BYTE_TO_DB(mp, curoff),
1069                                             (char *)ptr - (char *)data);
1070                                 if (ptr >= (char *)data + mp->m_dirblksize) {
1071                                         continue;
1072                                 }
1073                         }
1074                 }
1075                 /*
1076                  * We have a pointer to an entry.
1077                  * Is it a live one?
1078                  */
1079                 dup = (xfs_dir2_data_unused_t *)ptr;
1080                 /*
1081                  * No, it's unused, skip over it.
1082                  */
1083                 if (be16_to_cpu(dup->freetag) == XFS_DIR2_DATA_FREE_TAG) {
1084                         length = be16_to_cpu(dup->length);
1085                         ptr += length;
1086                         curoff += length;
1087                         continue;
1088                 }
1089
1090                 /*
1091                  * Copy the entry into the putargs, and try formatting it.
1092                  */
1093                 dep = (xfs_dir2_data_entry_t *)ptr;
1094
1095                 p->namelen = dep->namelen;
1096
1097                 length = XFS_DIR2_DATA_ENTSIZE(p->namelen);
1098
1099                 p->cook = XFS_DIR2_BYTE_TO_DATAPTR(mp, curoff + length);
1100
1101                 p->ino = INT_GET(dep->inumber, ARCH_CONVERT);
1102 #if XFS_BIG_INUMS
1103                 p->ino += mp->m_inoadd;
1104 #endif
1105                 p->name = (char *)dep->name;
1106
1107                 error = p->put(p);
1108
1109                 /*
1110                  * Won't fit.  Return to caller.
1111                  */
1112                 if (!p->done) {
1113                         eof = 0;
1114                         break;
1115                 }
1116                 /*
1117                  * Advance to next entry in the block.
1118                  */
1119                 ptr += length;
1120                 curoff += length;
1121         }
1122
1123         /*
1124          * All done.  Set output offset value to current offset.
1125          */
1126         *eofp = eof;
1127         if (curoff > XFS_DIR2_DATAPTR_TO_BYTE(mp, XFS_DIR2_MAX_DATAPTR))
1128                 uio->uio_offset = XFS_DIR2_MAX_DATAPTR;
1129         else
1130                 uio->uio_offset = XFS_DIR2_BYTE_TO_DATAPTR(mp, curoff);
1131         kmem_free(map, map_size * sizeof(*map));
1132         kmem_free(p, sizeof(*p));
1133         if (bp)
1134                 xfs_da_brelse(tp, bp);
1135         return error;
1136 }
1137
1138 /*
1139  * Initialize a new leaf block, leaf1 or leafn magic accepted.
1140  */
1141 int
1142 xfs_dir2_leaf_init(
1143         xfs_da_args_t           *args,          /* operation arguments */
1144         xfs_dir2_db_t           bno,            /* directory block number */
1145         xfs_dabuf_t             **bpp,          /* out: leaf buffer */
1146         int                     magic)          /* magic number for block */
1147 {
1148         xfs_dabuf_t             *bp;            /* leaf buffer */
1149         xfs_inode_t             *dp;            /* incore directory inode */
1150         int                     error;          /* error return code */
1151         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1152         xfs_dir2_leaf_tail_t    *ltp;           /* leaf tail structure */
1153         xfs_mount_t             *mp;            /* filesystem mount point */
1154         xfs_trans_t             *tp;            /* transaction pointer */
1155
1156         dp = args->dp;
1157         ASSERT(dp != NULL);
1158         tp = args->trans;
1159         mp = dp->i_mount;
1160         ASSERT(bno >= XFS_DIR2_LEAF_FIRSTDB(mp) &&
1161                bno < XFS_DIR2_FREE_FIRSTDB(mp));
1162         /*
1163          * Get the buffer for the block.
1164          */
1165         error = xfs_da_get_buf(tp, dp, XFS_DIR2_DB_TO_DA(mp, bno), -1, &bp,
1166                 XFS_DATA_FORK);
1167         if (error) {
1168                 return error;
1169         }
1170         ASSERT(bp != NULL);
1171         leaf = bp->data;
1172         /*
1173          * Initialize the header.
1174          */
1175         leaf->hdr.info.magic = cpu_to_be16(magic);
1176         leaf->hdr.info.forw = 0;
1177         leaf->hdr.info.back = 0;
1178         leaf->hdr.count = 0;
1179         leaf->hdr.stale = 0;
1180         xfs_dir2_leaf_log_header(tp, bp);
1181         /*
1182          * If it's a leaf-format directory initialize the tail.
1183          * In this case our caller has the real bests table to copy into
1184          * the block.
1185          */
1186         if (magic == XFS_DIR2_LEAF1_MAGIC) {
1187                 ltp = XFS_DIR2_LEAF_TAIL_P(mp, leaf);
1188                 ltp->bestcount = 0;
1189                 xfs_dir2_leaf_log_tail(tp, bp);
1190         }
1191         *bpp = bp;
1192         return 0;
1193 }
1194
1195 /*
1196  * Log the bests entries indicated from a leaf1 block.
1197  */
1198 static void
1199 xfs_dir2_leaf_log_bests(
1200         xfs_trans_t             *tp,            /* transaction pointer */
1201         xfs_dabuf_t             *bp,            /* leaf buffer */
1202         int                     first,          /* first entry to log */
1203         int                     last)           /* last entry to log */
1204 {
1205         __be16                  *firstb;        /* pointer to first entry */
1206         __be16                  *lastb;         /* pointer to last entry */
1207         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1208         xfs_dir2_leaf_tail_t    *ltp;           /* leaf tail structure */
1209
1210         leaf = bp->data;
1211         ASSERT(be16_to_cpu(leaf->hdr.info.magic) == XFS_DIR2_LEAF1_MAGIC);
1212         ltp = XFS_DIR2_LEAF_TAIL_P(tp->t_mountp, leaf);
1213         firstb = XFS_DIR2_LEAF_BESTS_P(ltp) + first;
1214         lastb = XFS_DIR2_LEAF_BESTS_P(ltp) + last;
1215         xfs_da_log_buf(tp, bp, (uint)((char *)firstb - (char *)leaf),
1216                 (uint)((char *)lastb - (char *)leaf + sizeof(*lastb) - 1));
1217 }
1218
1219 /*
1220  * Log the leaf entries indicated from a leaf1 or leafn block.
1221  */
1222 void
1223 xfs_dir2_leaf_log_ents(
1224         xfs_trans_t             *tp,            /* transaction pointer */
1225         xfs_dabuf_t             *bp,            /* leaf buffer */
1226         int                     first,          /* first entry to log */
1227         int                     last)           /* last entry to log */
1228 {
1229         xfs_dir2_leaf_entry_t   *firstlep;      /* pointer to first entry */
1230         xfs_dir2_leaf_entry_t   *lastlep;       /* pointer to last entry */
1231         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1232
1233         leaf = bp->data;
1234         ASSERT(be16_to_cpu(leaf->hdr.info.magic) == XFS_DIR2_LEAF1_MAGIC ||
1235                be16_to_cpu(leaf->hdr.info.magic) == XFS_DIR2_LEAFN_MAGIC);
1236         firstlep = &leaf->ents[first];
1237         lastlep = &leaf->ents[last];
1238         xfs_da_log_buf(tp, bp, (uint)((char *)firstlep - (char *)leaf),
1239                 (uint)((char *)lastlep - (char *)leaf + sizeof(*lastlep) - 1));
1240 }
1241
1242 /*
1243  * Log the header of the leaf1 or leafn block.
1244  */
1245 void
1246 xfs_dir2_leaf_log_header(
1247         xfs_trans_t             *tp,            /* transaction pointer */
1248         xfs_dabuf_t             *bp)            /* leaf buffer */
1249 {
1250         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1251
1252         leaf = bp->data;
1253         ASSERT(be16_to_cpu(leaf->hdr.info.magic) == XFS_DIR2_LEAF1_MAGIC ||
1254                be16_to_cpu(leaf->hdr.info.magic) == XFS_DIR2_LEAFN_MAGIC);
1255         xfs_da_log_buf(tp, bp, (uint)((char *)&leaf->hdr - (char *)leaf),
1256                 (uint)(sizeof(leaf->hdr) - 1));
1257 }
1258
1259 /*
1260  * Log the tail of the leaf1 block.
1261  */
1262 STATIC void
1263 xfs_dir2_leaf_log_tail(
1264         xfs_trans_t             *tp,            /* transaction pointer */
1265         xfs_dabuf_t             *bp)            /* leaf buffer */
1266 {
1267         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1268         xfs_dir2_leaf_tail_t    *ltp;           /* leaf tail structure */
1269         xfs_mount_t             *mp;            /* filesystem mount point */
1270
1271         mp = tp->t_mountp;
1272         leaf = bp->data;
1273         ASSERT(be16_to_cpu(leaf->hdr.info.magic) == XFS_DIR2_LEAF1_MAGIC);
1274         ltp = XFS_DIR2_LEAF_TAIL_P(mp, leaf);
1275         xfs_da_log_buf(tp, bp, (uint)((char *)ltp - (char *)leaf),
1276                 (uint)(mp->m_dirblksize - 1));
1277 }
1278
1279 /*
1280  * Look up the entry referred to by args in the leaf format directory.
1281  * Most of the work is done by the xfs_dir2_leaf_lookup_int routine which
1282  * is also used by the node-format code.
1283  */
1284 int
1285 xfs_dir2_leaf_lookup(
1286         xfs_da_args_t           *args)          /* operation arguments */
1287 {
1288         xfs_dabuf_t             *dbp;           /* data block buffer */
1289         xfs_dir2_data_entry_t   *dep;           /* data block entry */
1290         xfs_inode_t             *dp;            /* incore directory inode */
1291         int                     error;          /* error return code */
1292         int                     index;          /* found entry index */
1293         xfs_dabuf_t             *lbp;           /* leaf buffer */
1294         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1295         xfs_dir2_leaf_entry_t   *lep;           /* leaf entry */
1296         xfs_trans_t             *tp;            /* transaction pointer */
1297
1298         xfs_dir2_trace_args("leaf_lookup", args);
1299         /*
1300          * Look up name in the leaf block, returning both buffers and index.
1301          */
1302         if ((error = xfs_dir2_leaf_lookup_int(args, &lbp, &index, &dbp))) {
1303                 return error;
1304         }
1305         tp = args->trans;
1306         dp = args->dp;
1307         xfs_dir2_leaf_check(dp, lbp);
1308         leaf = lbp->data;
1309         /*
1310          * Get to the leaf entry and contained data entry address.
1311          */
1312         lep = &leaf->ents[index];
1313         /*
1314          * Point to the data entry.
1315          */
1316         dep = (xfs_dir2_data_entry_t *)
1317               ((char *)dbp->data +
1318                XFS_DIR2_DATAPTR_TO_OFF(dp->i_mount, be32_to_cpu(lep->address)));
1319         /*
1320          * Return the found inode number.
1321          */
1322         args->inumber = INT_GET(dep->inumber, ARCH_CONVERT);
1323         xfs_da_brelse(tp, dbp);
1324         xfs_da_brelse(tp, lbp);
1325         return XFS_ERROR(EEXIST);
1326 }
1327
1328 /*
1329  * Look up name/hash in the leaf block.
1330  * Fill in indexp with the found index, and dbpp with the data buffer.
1331  * If not found dbpp will be NULL, and ENOENT comes back.
1332  * lbpp will always be filled in with the leaf buffer unless there's an error.
1333  */
1334 static int                                      /* error */
1335 xfs_dir2_leaf_lookup_int(
1336         xfs_da_args_t           *args,          /* operation arguments */
1337         xfs_dabuf_t             **lbpp,         /* out: leaf buffer */
1338         int                     *indexp,        /* out: index in leaf block */
1339         xfs_dabuf_t             **dbpp)         /* out: data buffer */
1340 {
1341         xfs_dir2_db_t           curdb;          /* current data block number */
1342         xfs_dabuf_t             *dbp;           /* data buffer */
1343         xfs_dir2_data_entry_t   *dep;           /* data entry */
1344         xfs_inode_t             *dp;            /* incore directory inode */
1345         int                     error;          /* error return code */
1346         int                     index;          /* index in leaf block */
1347         xfs_dabuf_t             *lbp;           /* leaf buffer */
1348         xfs_dir2_leaf_entry_t   *lep;           /* leaf entry */
1349         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1350         xfs_mount_t             *mp;            /* filesystem mount point */
1351         xfs_dir2_db_t           newdb;          /* new data block number */
1352         xfs_trans_t             *tp;            /* transaction pointer */
1353
1354         dp = args->dp;
1355         tp = args->trans;
1356         mp = dp->i_mount;
1357         /*
1358          * Read the leaf block into the buffer.
1359          */
1360         if ((error =
1361             xfs_da_read_buf(tp, dp, mp->m_dirleafblk, -1, &lbp,
1362                     XFS_DATA_FORK))) {
1363                 return error;
1364         }
1365         *lbpp = lbp;
1366         leaf = lbp->data;
1367         xfs_dir2_leaf_check(dp, lbp);
1368         /*
1369          * Look for the first leaf entry with our hash value.
1370          */
1371         index = xfs_dir2_leaf_search_hash(args, lbp);
1372         /*
1373          * Loop over all the entries with the right hash value
1374          * looking to match the name.
1375          */
1376         for (lep = &leaf->ents[index], dbp = NULL, curdb = -1;
1377              index < be16_to_cpu(leaf->hdr.count) && be32_to_cpu(lep->hashval) == args->hashval;
1378              lep++, index++) {
1379                 /*
1380                  * Skip over stale leaf entries.
1381                  */
1382                 if (be32_to_cpu(lep->address) == XFS_DIR2_NULL_DATAPTR)
1383                         continue;
1384                 /*
1385                  * Get the new data block number.
1386                  */
1387                 newdb = XFS_DIR2_DATAPTR_TO_DB(mp, be32_to_cpu(lep->address));
1388                 /*
1389                  * If it's not the same as the old data block number,
1390                  * need to pitch the old one and read the new one.
1391                  */
1392                 if (newdb != curdb) {
1393                         if (dbp)
1394                                 xfs_da_brelse(tp, dbp);
1395                         if ((error =
1396                             xfs_da_read_buf(tp, dp,
1397                                     XFS_DIR2_DB_TO_DA(mp, newdb), -1, &dbp,
1398                                     XFS_DATA_FORK))) {
1399                                 xfs_da_brelse(tp, lbp);
1400                                 return error;
1401                         }
1402                         xfs_dir2_data_check(dp, dbp);
1403                         curdb = newdb;
1404                 }
1405                 /*
1406                  * Point to the data entry.
1407                  */
1408                 dep = (xfs_dir2_data_entry_t *)
1409                       ((char *)dbp->data +
1410                        XFS_DIR2_DATAPTR_TO_OFF(mp, be32_to_cpu(lep->address)));
1411                 /*
1412                  * If it matches then return it.
1413                  */
1414                 if (dep->namelen == args->namelen &&
1415                     dep->name[0] == args->name[0] &&
1416                     memcmp(dep->name, args->name, args->namelen) == 0) {
1417                         *dbpp = dbp;
1418                         *indexp = index;
1419                         return 0;
1420                 }
1421         }
1422         /*
1423          * No match found, return ENOENT.
1424          */
1425         ASSERT(args->oknoent);
1426         if (dbp)
1427                 xfs_da_brelse(tp, dbp);
1428         xfs_da_brelse(tp, lbp);
1429         return XFS_ERROR(ENOENT);
1430 }
1431
1432 /*
1433  * Remove an entry from a leaf format directory.
1434  */
1435 int                                             /* error */
1436 xfs_dir2_leaf_removename(
1437         xfs_da_args_t           *args)          /* operation arguments */
1438 {
1439         __be16                  *bestsp;        /* leaf block best freespace */
1440         xfs_dir2_data_t         *data;          /* data block structure */
1441         xfs_dir2_db_t           db;             /* data block number */
1442         xfs_dabuf_t             *dbp;           /* data block buffer */
1443         xfs_dir2_data_entry_t   *dep;           /* data entry structure */
1444         xfs_inode_t             *dp;            /* incore directory inode */
1445         int                     error;          /* error return code */
1446         xfs_dir2_db_t           i;              /* temporary data block # */
1447         int                     index;          /* index into leaf entries */
1448         xfs_dabuf_t             *lbp;           /* leaf buffer */
1449         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1450         xfs_dir2_leaf_entry_t   *lep;           /* leaf entry */
1451         xfs_dir2_leaf_tail_t    *ltp;           /* leaf tail structure */
1452         xfs_mount_t             *mp;            /* filesystem mount point */
1453         int                     needlog;        /* need to log data header */
1454         int                     needscan;       /* need to rescan data frees */
1455         xfs_dir2_data_off_t     oldbest;        /* old value of best free */
1456         xfs_trans_t             *tp;            /* transaction pointer */
1457
1458         xfs_dir2_trace_args("leaf_removename", args);
1459         /*
1460          * Lookup the leaf entry, get the leaf and data blocks read in.
1461          */
1462         if ((error = xfs_dir2_leaf_lookup_int(args, &lbp, &index, &dbp))) {
1463                 return error;
1464         }
1465         dp = args->dp;
1466         tp = args->trans;
1467         mp = dp->i_mount;
1468         leaf = lbp->data;
1469         data = dbp->data;
1470         xfs_dir2_data_check(dp, dbp);
1471         /*
1472          * Point to the leaf entry, use that to point to the data entry.
1473          */
1474         lep = &leaf->ents[index];
1475         db = XFS_DIR2_DATAPTR_TO_DB(mp, be32_to_cpu(lep->address));
1476         dep = (xfs_dir2_data_entry_t *)
1477               ((char *)data + XFS_DIR2_DATAPTR_TO_OFF(mp, be32_to_cpu(lep->address)));
1478         needscan = needlog = 0;
1479         oldbest = be16_to_cpu(data->hdr.bestfree[0].length);
1480         ltp = XFS_DIR2_LEAF_TAIL_P(mp, leaf);
1481         bestsp = XFS_DIR2_LEAF_BESTS_P(ltp);
1482         ASSERT(be16_to_cpu(bestsp[db]) == oldbest);
1483         /*
1484          * Mark the former data entry unused.
1485          */
1486         xfs_dir2_data_make_free(tp, dbp,
1487                 (xfs_dir2_data_aoff_t)((char *)dep - (char *)data),
1488                 XFS_DIR2_DATA_ENTSIZE(dep->namelen), &needlog, &needscan);
1489         /*
1490          * We just mark the leaf entry stale by putting a null in it.
1491          */
1492         be16_add(&leaf->hdr.stale, 1);
1493         xfs_dir2_leaf_log_header(tp, lbp);
1494         lep->address = cpu_to_be32(XFS_DIR2_NULL_DATAPTR);
1495         xfs_dir2_leaf_log_ents(tp, lbp, index, index);
1496         /*
1497          * Scan the freespace in the data block again if necessary,
1498          * log the data block header if necessary.
1499          */
1500         if (needscan)
1501                 xfs_dir2_data_freescan(mp, data, &needlog, NULL);
1502         if (needlog)
1503                 xfs_dir2_data_log_header(tp, dbp);
1504         /*
1505          * If the longest freespace in the data block has changed,
1506          * put the new value in the bests table and log that.
1507          */
1508         if (be16_to_cpu(data->hdr.bestfree[0].length) != oldbest) {
1509                 bestsp[db] = data->hdr.bestfree[0].length;
1510                 xfs_dir2_leaf_log_bests(tp, lbp, db, db);
1511         }
1512         xfs_dir2_data_check(dp, dbp);
1513         /*
1514          * If the data block is now empty then get rid of the data block.
1515          */
1516         if (be16_to_cpu(data->hdr.bestfree[0].length) ==
1517             mp->m_dirblksize - (uint)sizeof(data->hdr)) {
1518                 ASSERT(db != mp->m_dirdatablk);
1519                 if ((error = xfs_dir2_shrink_inode(args, db, dbp))) {
1520                         /*
1521                          * Nope, can't get rid of it because it caused
1522                          * allocation of a bmap btree block to do so.
1523                          * Just go on, returning success, leaving the
1524                          * empty block in place.
1525                          */
1526                         if (error == ENOSPC && args->total == 0) {
1527                                 xfs_da_buf_done(dbp);
1528                                 error = 0;
1529                         }
1530                         xfs_dir2_leaf_check(dp, lbp);
1531                         xfs_da_buf_done(lbp);
1532                         return error;
1533                 }
1534                 dbp = NULL;
1535                 /*
1536                  * If this is the last data block then compact the
1537                  * bests table by getting rid of entries.
1538                  */
1539                 if (db == be32_to_cpu(ltp->bestcount) - 1) {
1540                         /*
1541                          * Look for the last active entry (i).
1542                          */
1543                         for (i = db - 1; i > 0; i--) {
1544                                 if (be16_to_cpu(bestsp[i]) != NULLDATAOFF)
1545                                         break;
1546                         }
1547                         /*
1548                          * Copy the table down so inactive entries at the
1549                          * end are removed.
1550                          */
1551                         memmove(&bestsp[db - i], bestsp,
1552                                 (be32_to_cpu(ltp->bestcount) - (db - i)) * sizeof(*bestsp));
1553                         be32_add(&ltp->bestcount, -(db - i));
1554                         xfs_dir2_leaf_log_tail(tp, lbp);
1555                         xfs_dir2_leaf_log_bests(tp, lbp, 0, be32_to_cpu(ltp->bestcount) - 1);
1556                 } else
1557                         bestsp[db] = cpu_to_be16(NULLDATAOFF);
1558         }
1559         /*
1560          * If the data block was not the first one, drop it.
1561          */
1562         else if (db != mp->m_dirdatablk && dbp != NULL) {
1563                 xfs_da_buf_done(dbp);
1564                 dbp = NULL;
1565         }
1566         xfs_dir2_leaf_check(dp, lbp);
1567         /*
1568          * See if we can convert to block form.
1569          */
1570         return xfs_dir2_leaf_to_block(args, lbp, dbp);
1571 }
1572
1573 /*
1574  * Replace the inode number in a leaf format directory entry.
1575  */
1576 int                                             /* error */
1577 xfs_dir2_leaf_replace(
1578         xfs_da_args_t           *args)          /* operation arguments */
1579 {
1580         xfs_dabuf_t             *dbp;           /* data block buffer */
1581         xfs_dir2_data_entry_t   *dep;           /* data block entry */
1582         xfs_inode_t             *dp;            /* incore directory inode */
1583         int                     error;          /* error return code */
1584         int                     index;          /* index of leaf entry */
1585         xfs_dabuf_t             *lbp;           /* leaf buffer */
1586         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1587         xfs_dir2_leaf_entry_t   *lep;           /* leaf entry */
1588         xfs_trans_t             *tp;            /* transaction pointer */
1589
1590         xfs_dir2_trace_args("leaf_replace", args);
1591         /*
1592          * Look up the entry.
1593          */
1594         if ((error = xfs_dir2_leaf_lookup_int(args, &lbp, &index, &dbp))) {
1595                 return error;
1596         }
1597         dp = args->dp;
1598         leaf = lbp->data;
1599         /*
1600          * Point to the leaf entry, get data address from it.
1601          */
1602         lep = &leaf->ents[index];
1603         /*
1604          * Point to the data entry.
1605          */
1606         dep = (xfs_dir2_data_entry_t *)
1607               ((char *)dbp->data +
1608                XFS_DIR2_DATAPTR_TO_OFF(dp->i_mount, be32_to_cpu(lep->address)));
1609         ASSERT(args->inumber != INT_GET(dep->inumber, ARCH_CONVERT));
1610         /*
1611          * Put the new inode number in, log it.
1612          */
1613         INT_SET(dep->inumber, ARCH_CONVERT, args->inumber);
1614         tp = args->trans;
1615         xfs_dir2_data_log_entry(tp, dbp, dep);
1616         xfs_da_buf_done(dbp);
1617         xfs_dir2_leaf_check(dp, lbp);
1618         xfs_da_brelse(tp, lbp);
1619         return 0;
1620 }
1621
1622 /*
1623  * Return index in the leaf block (lbp) which is either the first
1624  * one with this hash value, or if there are none, the insert point
1625  * for that hash value.
1626  */
1627 int                                             /* index value */
1628 xfs_dir2_leaf_search_hash(
1629         xfs_da_args_t           *args,          /* operation arguments */
1630         xfs_dabuf_t             *lbp)           /* leaf buffer */
1631 {
1632         xfs_dahash_t            hash=0;         /* hash from this entry */
1633         xfs_dahash_t            hashwant;       /* hash value looking for */
1634         int                     high;           /* high leaf index */
1635         int                     low;            /* low leaf index */
1636         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1637         xfs_dir2_leaf_entry_t   *lep;           /* leaf entry */
1638         int                     mid=0;          /* current leaf index */
1639
1640         leaf = lbp->data;
1641 #ifndef __KERNEL__
1642         if (!leaf->hdr.count)
1643                 return 0;
1644 #endif
1645         /*
1646          * Note, the table cannot be empty, so we have to go through the loop.
1647          * Binary search the leaf entries looking for our hash value.
1648          */
1649         for (lep = leaf->ents, low = 0, high = be16_to_cpu(leaf->hdr.count) - 1,
1650                 hashwant = args->hashval;
1651              low <= high; ) {
1652                 mid = (low + high) >> 1;
1653                 if ((hash = be32_to_cpu(lep[mid].hashval)) == hashwant)
1654                         break;
1655                 if (hash < hashwant)
1656                         low = mid + 1;
1657                 else
1658                         high = mid - 1;
1659         }
1660         /*
1661          * Found one, back up through all the equal hash values.
1662          */
1663         if (hash == hashwant) {
1664                 while (mid > 0 && be32_to_cpu(lep[mid - 1].hashval) == hashwant) {
1665                         mid--;
1666                 }
1667         }
1668         /*
1669          * Need to point to an entry higher than ours.
1670          */
1671         else if (hash < hashwant)
1672                 mid++;
1673         return mid;
1674 }
1675
1676 /*
1677  * Trim off a trailing data block.  We know it's empty since the leaf
1678  * freespace table says so.
1679  */
1680 int                                             /* error */
1681 xfs_dir2_leaf_trim_data(
1682         xfs_da_args_t           *args,          /* operation arguments */
1683         xfs_dabuf_t             *lbp,           /* leaf buffer */
1684         xfs_dir2_db_t           db)             /* data block number */
1685 {
1686         __be16                  *bestsp;        /* leaf bests table */
1687 #ifdef DEBUG
1688         xfs_dir2_data_t         *data;          /* data block structure */
1689 #endif
1690         xfs_dabuf_t             *dbp;           /* data block buffer */
1691         xfs_inode_t             *dp;            /* incore directory inode */
1692         int                     error;          /* error return value */
1693         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1694         xfs_dir2_leaf_tail_t    *ltp;           /* leaf tail structure */
1695         xfs_mount_t             *mp;            /* filesystem mount point */
1696         xfs_trans_t             *tp;            /* transaction pointer */
1697
1698         dp = args->dp;
1699         mp = dp->i_mount;
1700         tp = args->trans;
1701         /*
1702          * Read the offending data block.  We need its buffer.
1703          */
1704         if ((error = xfs_da_read_buf(tp, dp, XFS_DIR2_DB_TO_DA(mp, db), -1, &dbp,
1705                         XFS_DATA_FORK))) {
1706                 return error;
1707         }
1708 #ifdef DEBUG
1709         data = dbp->data;
1710         ASSERT(be32_to_cpu(data->hdr.magic) == XFS_DIR2_DATA_MAGIC);
1711 #endif
1712         /* this seems to be an error
1713          * data is only valid if DEBUG is defined?
1714          * RMC 09/08/1999
1715          */
1716
1717         leaf = lbp->data;
1718         ltp = XFS_DIR2_LEAF_TAIL_P(mp, leaf);
1719         ASSERT(be16_to_cpu(data->hdr.bestfree[0].length) ==
1720                mp->m_dirblksize - (uint)sizeof(data->hdr));
1721         ASSERT(db == be32_to_cpu(ltp->bestcount) - 1);
1722         /*
1723          * Get rid of the data block.
1724          */
1725         if ((error = xfs_dir2_shrink_inode(args, db, dbp))) {
1726                 ASSERT(error != ENOSPC);
1727                 xfs_da_brelse(tp, dbp);
1728                 return error;
1729         }
1730         /*
1731          * Eliminate the last bests entry from the table.
1732          */
1733         bestsp = XFS_DIR2_LEAF_BESTS_P(ltp);
1734         be32_add(&ltp->bestcount, -1);
1735         memmove(&bestsp[1], &bestsp[0], be32_to_cpu(ltp->bestcount) * sizeof(*bestsp));
1736         xfs_dir2_leaf_log_tail(tp, lbp);
1737         xfs_dir2_leaf_log_bests(tp, lbp, 0, be32_to_cpu(ltp->bestcount) - 1);
1738         return 0;
1739 }
1740
1741 /*
1742  * Convert node form directory to leaf form directory.
1743  * The root of the node form dir needs to already be a LEAFN block.
1744  * Just return if we can't do anything.
1745  */
1746 int                                             /* error */
1747 xfs_dir2_node_to_leaf(
1748         xfs_da_state_t          *state)         /* directory operation state */
1749 {
1750         xfs_da_args_t           *args;          /* operation arguments */
1751         xfs_inode_t             *dp;            /* incore directory inode */
1752         int                     error;          /* error return code */
1753         xfs_dabuf_t             *fbp;           /* buffer for freespace block */
1754         xfs_fileoff_t           fo;             /* freespace file offset */
1755         xfs_dir2_free_t         *free;          /* freespace structure */
1756         xfs_dabuf_t             *lbp;           /* buffer for leaf block */
1757         xfs_dir2_leaf_tail_t    *ltp;           /* tail of leaf structure */
1758         xfs_dir2_leaf_t         *leaf;          /* leaf structure */
1759         xfs_mount_t             *mp;            /* filesystem mount point */
1760         int                     rval;           /* successful free trim? */
1761         xfs_trans_t             *tp;            /* transaction pointer */
1762
1763         /*
1764          * There's more than a leaf level in the btree, so there must
1765          * be multiple leafn blocks.  Give up.
1766          */
1767         if (state->path.active > 1)
1768                 return 0;
1769         args = state->args;
1770         xfs_dir2_trace_args("node_to_leaf", args);
1771         mp = state->mp;
1772         dp = args->dp;
1773         tp = args->trans;
1774         /*
1775          * Get the last offset in the file.
1776          */
1777         if ((error = xfs_bmap_last_offset(tp, dp, &fo, XFS_DATA_FORK))) {
1778                 return error;
1779         }
1780         fo -= mp->m_dirblkfsbs;
1781         /*
1782          * If there are freespace blocks other than the first one,
1783          * take this opportunity to remove trailing empty freespace blocks
1784          * that may have been left behind during no-space-reservation
1785          * operations.
1786          */
1787         while (fo > mp->m_dirfreeblk) {
1788                 if ((error = xfs_dir2_node_trim_free(args, fo, &rval))) {
1789                         return error;
1790                 }
1791                 if (rval)
1792                         fo -= mp->m_dirblkfsbs;
1793                 else
1794                         return 0;
1795         }
1796         /*
1797          * Now find the block just before the freespace block.
1798          */
1799         if ((error = xfs_bmap_last_before(tp, dp, &fo, XFS_DATA_FORK))) {
1800                 return error;
1801         }
1802         /*
1803          * If it's not the single leaf block, give up.
1804          */
1805         if (XFS_FSB_TO_B(mp, fo) > XFS_DIR2_LEAF_OFFSET + mp->m_dirblksize)
1806                 return 0;
1807         lbp = state->path.blk[0].bp;
1808         leaf = lbp->data;
1809         ASSERT(be16_to_cpu(leaf->hdr.info.magic) == XFS_DIR2_LEAFN_MAGIC);
1810         /*
1811          * Read the freespace block.
1812          */
1813         if ((error = xfs_da_read_buf(tp, dp, mp->m_dirfreeblk, -1, &fbp,
1814                         XFS_DATA_FORK))) {
1815                 return error;
1816         }
1817         free = fbp->data;
1818         ASSERT(be32_to_cpu(free->hdr.magic) == XFS_DIR2_FREE_MAGIC);
1819         ASSERT(!free->hdr.firstdb);
1820         /*
1821          * Now see if the leafn and free data will fit in a leaf1.
1822          * If not, release the buffer and give up.
1823          */
1824         if ((uint)sizeof(leaf->hdr) +
1825             (be16_to_cpu(leaf->hdr.count) - be16_to_cpu(leaf->hdr.stale)) * (uint)sizeof(leaf->ents[0]) +
1826             be32_to_cpu(free->hdr.nvalid) * (uint)sizeof(leaf->bests[0]) +
1827             (uint)sizeof(leaf->tail) >
1828             mp->m_dirblksize) {
1829                 xfs_da_brelse(tp, fbp);
1830                 return 0;
1831         }
1832         /*
1833          * If the leaf has any stale entries in it, compress them out.
1834          * The compact routine will log the header.
1835          */
1836         if (be16_to_cpu(leaf->hdr.stale))
1837                 xfs_dir2_leaf_compact(args, lbp);
1838         else
1839                 xfs_dir2_leaf_log_header(tp, lbp);
1840         leaf->hdr.info.magic = cpu_to_be16(XFS_DIR2_LEAF1_MAGIC);
1841         /*
1842          * Set up the leaf tail from the freespace block.
1843          */
1844         ltp = XFS_DIR2_LEAF_TAIL_P(mp, leaf);
1845         ltp->bestcount = free->hdr.nvalid;
1846         /*
1847          * Set up the leaf bests table.
1848          */
1849         memcpy(XFS_DIR2_LEAF_BESTS_P(ltp), free->bests,
1850                 be32_to_cpu(ltp->bestcount) * sizeof(leaf->bests[0]));
1851         xfs_dir2_leaf_log_bests(tp, lbp, 0, be32_to_cpu(ltp->bestcount) - 1);
1852         xfs_dir2_leaf_log_tail(tp, lbp);
1853         xfs_dir2_leaf_check(dp, lbp);
1854         /*
1855          * Get rid of the freespace block.
1856          */
1857         error = xfs_dir2_shrink_inode(args, XFS_DIR2_FREE_FIRSTDB(mp), fbp);
1858         if (error) {
1859                 /*
1860                  * This can't fail here because it can only happen when
1861                  * punching out the middle of an extent, and this is an
1862                  * isolated block.
1863                  */
1864                 ASSERT(error != ENOSPC);
1865                 return error;
1866         }
1867         fbp = NULL;
1868         /*
1869          * Now see if we can convert the single-leaf directory
1870          * down to a block form directory.
1871          * This routine always kills the dabuf for the leaf, so
1872          * eliminate it from the path.
1873          */
1874         error = xfs_dir2_leaf_to_block(args, lbp, NULL);
1875         state->path.blk[0].bp = NULL;
1876         return error;
1877 }