Home | History | Annotate | Line # | Download | only in lfs
lfs_alloc.c revision 1.119.6.1
      1  1.119.6.1     skrll /*	$NetBSD: lfs_alloc.c,v 1.119.6.1 2015/06/06 14:40:30 skrll Exp $	*/
      2        1.2       cgd 
      3       1.17  perseant /*-
      4      1.100        ad  * Copyright (c) 1999, 2000, 2001, 2002, 2003, 2007 The NetBSD Foundation, Inc.
      5       1.17  perseant  * All rights reserved.
      6       1.17  perseant  *
      7       1.17  perseant  * This code is derived from software contributed to The NetBSD Foundation
      8       1.17  perseant  * by Konrad E. Schroder <perseant (at) hhhh.org>.
      9       1.17  perseant  *
     10       1.17  perseant  * Redistribution and use in source and binary forms, with or without
     11       1.17  perseant  * modification, are permitted provided that the following conditions
     12       1.17  perseant  * are met:
     13       1.17  perseant  * 1. Redistributions of source code must retain the above copyright
     14       1.17  perseant  *    notice, this list of conditions and the following disclaimer.
     15       1.17  perseant  * 2. Redistributions in binary form must reproduce the above copyright
     16       1.17  perseant  *    notice, this list of conditions and the following disclaimer in the
     17       1.17  perseant  *    documentation and/or other materials provided with the distribution.
     18       1.17  perseant  *
     19       1.17  perseant  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20       1.17  perseant  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21       1.17  perseant  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22       1.17  perseant  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23       1.17  perseant  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24       1.17  perseant  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25       1.17  perseant  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26       1.17  perseant  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27       1.17  perseant  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28       1.17  perseant  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29       1.17  perseant  * POSSIBILITY OF SUCH DAMAGE.
     30       1.17  perseant  */
     31        1.1   mycroft /*
     32        1.1   mycroft  * Copyright (c) 1991, 1993
     33        1.1   mycroft  *	The Regents of the University of California.  All rights reserved.
     34        1.1   mycroft  *
     35        1.1   mycroft  * Redistribution and use in source and binary forms, with or without
     36        1.1   mycroft  * modification, are permitted provided that the following conditions
     37        1.1   mycroft  * are met:
     38        1.1   mycroft  * 1. Redistributions of source code must retain the above copyright
     39        1.1   mycroft  *    notice, this list of conditions and the following disclaimer.
     40        1.1   mycroft  * 2. Redistributions in binary form must reproduce the above copyright
     41        1.1   mycroft  *    notice, this list of conditions and the following disclaimer in the
     42        1.1   mycroft  *    documentation and/or other materials provided with the distribution.
     43       1.71       agc  * 3. Neither the name of the University nor the names of its contributors
     44        1.1   mycroft  *    may be used to endorse or promote products derived from this software
     45        1.1   mycroft  *    without specific prior written permission.
     46        1.1   mycroft  *
     47        1.1   mycroft  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     48        1.1   mycroft  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     49        1.1   mycroft  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     50        1.1   mycroft  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     51        1.1   mycroft  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     52        1.1   mycroft  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     53        1.1   mycroft  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     54        1.1   mycroft  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     55        1.1   mycroft  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     56        1.1   mycroft  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     57        1.1   mycroft  * SUCH DAMAGE.
     58        1.1   mycroft  *
     59        1.2       cgd  *	@(#)lfs_alloc.c	8.4 (Berkeley) 1/4/94
     60        1.1   mycroft  */
     61       1.52     lukem 
     62       1.52     lukem #include <sys/cdefs.h>
     63  1.119.6.1     skrll __KERNEL_RCSID(0, "$NetBSD: lfs_alloc.c,v 1.119.6.1 2015/06/06 14:40:30 skrll Exp $");
     64       1.12    scottr 
     65       1.47       mrg #if defined(_KERNEL_OPT)
     66       1.12    scottr #include "opt_quota.h"
     67       1.13    scottr #endif
     68        1.1   mycroft 
     69        1.1   mycroft #include <sys/param.h>
     70        1.3  christos #include <sys/systm.h>
     71        1.1   mycroft #include <sys/kernel.h>
     72        1.1   mycroft #include <sys/buf.h>
     73       1.56  perseant #include <sys/lock.h>
     74        1.1   mycroft #include <sys/vnode.h>
     75        1.1   mycroft #include <sys/syslog.h>
     76        1.1   mycroft #include <sys/mount.h>
     77       1.87  perseant #include <sys/malloc.h>
     78       1.15   thorpej #include <sys/pool.h>
     79       1.50       chs #include <sys/proc.h>
     80       1.81  perseant #include <sys/tree.h>
     81       1.94      elad #include <sys/kauth.h>
     82        1.1   mycroft 
     83      1.114  dholland #include <ufs/lfs/ulfs_quotacommon.h>
     84      1.114  dholland #include <ufs/lfs/ulfs_inode.h>
     85      1.114  dholland #include <ufs/lfs/ulfsmount.h>
     86      1.114  dholland #include <ufs/lfs/ulfs_extern.h>
     87        1.1   mycroft 
     88        1.1   mycroft #include <ufs/lfs/lfs.h>
     89        1.1   mycroft #include <ufs/lfs/lfs_extern.h>
     90      1.118  dholland #include <ufs/lfs/lfs_kernel.h>
     91        1.1   mycroft 
     92       1.87  perseant /* Constants for inode free bitmap */
     93       1.88  perseant #define BMSHIFT 5	/* 2 ** 5 = 32 */
     94       1.88  perseant #define BMMASK  ((1 << BMSHIFT) - 1)
     95       1.88  perseant #define SET_BITMAP_FREE(F, I) do { \
     96       1.88  perseant 	DLOG((DLOG_ALLOC, "lfs: ino %d wrd %d bit %d set\n", (int)(I), 	\
     97       1.88  perseant 	     (int)((I) >> BMSHIFT), (int)((I) & BMMASK)));		\
     98       1.88  perseant 	(F)->lfs_ino_bitmap[(I) >> BMSHIFT] |= (1 << ((I) & BMMASK));	\
     99       1.88  perseant } while (0)
    100       1.88  perseant #define CLR_BITMAP_FREE(F, I) do { \
    101       1.88  perseant 	DLOG((DLOG_ALLOC, "lfs: ino %d wrd %d bit %d clr\n", (int)(I), 	\
    102       1.88  perseant 	     (int)((I) >> BMSHIFT), (int)((I) & BMMASK)));		\
    103       1.88  perseant 	(F)->lfs_ino_bitmap[(I) >> BMSHIFT] &= ~(1 << ((I) & BMMASK));	\
    104       1.88  perseant } while(0)
    105       1.88  perseant 
    106       1.87  perseant #define ISSET_BITMAP_FREE(F, I) \
    107       1.88  perseant 	((F)->lfs_ino_bitmap[(I) >> BMSHIFT] & (1 << ((I) & BMMASK)))
    108       1.87  perseant 
    109       1.44  perseant /*
    110       1.65  perseant  * Add a new block to the Ifile, to accommodate future file creations.
    111       1.65  perseant  * Called with the segment lock held.
    112       1.56  perseant  */
    113       1.96  perseant int
    114       1.96  perseant lfs_extend_ifile(struct lfs *fs, kauth_cred_t cred)
    115       1.44  perseant {
    116       1.44  perseant 	struct vnode *vp;
    117       1.44  perseant 	struct inode *ip;
    118       1.44  perseant 	IFILE *ifp;
    119       1.48  perseant 	IFILE_V1 *ifp_v1;
    120       1.48  perseant 	struct buf *bp, *cbp;
    121       1.44  perseant 	int error;
    122       1.83  christos 	daddr_t i, blkno, xmax;
    123       1.87  perseant 	ino_t oldlast, maxino;
    124       1.48  perseant 	CLEANERINFO *cip;
    125       1.44  perseant 
    126       1.78  perseant 	ASSERT_SEGLOCK(fs);
    127       1.78  perseant 
    128       1.44  perseant 	vp = fs->lfs_ivnode;
    129       1.44  perseant 	ip = VTOI(vp);
    130      1.117  christos 	blkno = lfs_lblkno(fs, ip->i_size);
    131       1.85      yamt 	if ((error = lfs_balloc(vp, ip->i_size, fs->lfs_bsize, cred, 0,
    132       1.44  perseant 				&bp)) != 0) {
    133       1.44  perseant 		return (error);
    134       1.44  perseant 	}
    135       1.66      fvdl 	ip->i_size += fs->lfs_bsize;
    136       1.66      fvdl 	ip->i_ffs1_size = ip->i_size;
    137       1.66      fvdl 	uvm_vnp_setsize(vp, ip->i_size);
    138       1.75     perry 
    139       1.88  perseant 	maxino = ((ip->i_size >> fs->lfs_bshift) - fs->lfs_cleansz -
    140       1.88  perseant 		  fs->lfs_segtabsz) * fs->lfs_ifpb;
    141       1.88  perseant 	fs->lfs_ino_bitmap = (lfs_bm_t *)
    142       1.88  perseant 		realloc(fs->lfs_ino_bitmap, ((maxino + BMMASK) >> BMSHIFT) *
    143       1.88  perseant 			sizeof(lfs_bm_t), M_SEGMENT, M_WAITOK);
    144       1.88  perseant 	KASSERT(fs->lfs_ino_bitmap != NULL);
    145       1.87  perseant 
    146       1.44  perseant 	i = (blkno - fs->lfs_segtabsz - fs->lfs_cleansz) *
    147       1.44  perseant 		fs->lfs_ifpb;
    148       1.87  perseant 
    149       1.87  perseant 	/*
    150       1.87  perseant 	 * We insert the new inodes at the head of the free list.
    151       1.87  perseant 	 * Under normal circumstances, the free list is empty here,
    152       1.87  perseant 	 * so we are also incidentally placing them at the end (which
    153       1.87  perseant 	 * we must do if we are to keep them in order).
    154       1.87  perseant 	 */
    155       1.48  perseant 	LFS_GET_HEADFREE(fs, cip, cbp, &oldlast);
    156       1.48  perseant 	LFS_PUT_HEADFREE(fs, cip, cbp, i);
    157       1.44  perseant #ifdef DIAGNOSTIC
    158       1.63  perseant 	if (fs->lfs_freehd == LFS_UNUSED_INUM)
    159       1.44  perseant 		panic("inode 0 allocated [2]");
    160       1.44  perseant #endif /* DIAGNOSTIC */
    161       1.83  christos 	xmax = i + fs->lfs_ifpb;
    162       1.48  perseant 
    163       1.53       chs 	if (fs->lfs_version == 1) {
    164       1.83  christos 		for (ifp_v1 = (IFILE_V1 *)bp->b_data; i < xmax; ++ifp_v1) {
    165       1.89  perseant 			SET_BITMAP_FREE(fs, i);
    166       1.48  perseant 			ifp_v1->if_version = 1;
    167       1.48  perseant 			ifp_v1->if_daddr = LFS_UNUSED_DADDR;
    168       1.48  perseant 			ifp_v1->if_nextfree = ++i;
    169       1.48  perseant 		}
    170       1.48  perseant 		ifp_v1--;
    171       1.48  perseant 		ifp_v1->if_nextfree = oldlast;
    172       1.48  perseant 	} else {
    173       1.83  christos 		for (ifp = (IFILE *)bp->b_data; i < xmax; ++ifp) {
    174       1.89  perseant 			SET_BITMAP_FREE(fs, i);
    175       1.48  perseant 			ifp->if_version = 1;
    176       1.48  perseant 			ifp->if_daddr = LFS_UNUSED_DADDR;
    177       1.48  perseant 			ifp->if_nextfree = ++i;
    178       1.48  perseant 		}
    179       1.48  perseant 		ifp--;
    180       1.48  perseant 		ifp->if_nextfree = oldlast;
    181       1.44  perseant 	}
    182       1.83  christos 	LFS_PUT_TAILFREE(fs, cip, cbp, xmax - 1);
    183       1.48  perseant 
    184       1.56  perseant 	(void) LFS_BWRITE_LOG(bp); /* Ifile */
    185       1.44  perseant 
    186       1.44  perseant 	return 0;
    187       1.44  perseant }
    188       1.44  perseant 
    189        1.1   mycroft /* Allocate a new inode. */
    190        1.1   mycroft /* ARGSUSED */
    191       1.43  perseant /* VOP_BWRITE 2i times */
    192        1.1   mycroft int
    193       1.99  christos lfs_valloc(struct vnode *pvp, int mode, kauth_cred_t cred,
    194  1.119.6.1     skrll     ino_t *ino, int *gen)
    195        1.3  christos {
    196        1.1   mycroft 	struct lfs *fs;
    197       1.48  perseant 	struct buf *bp, *cbp;
    198        1.1   mycroft 	struct ifile *ifp;
    199        1.1   mycroft 	int error;
    200       1.48  perseant 	CLEANERINFO *cip;
    201        1.1   mycroft 
    202       1.85      yamt 	fs = VTOI(pvp)->i_lfs;
    203       1.38  perseant 	if (fs->lfs_ronly)
    204       1.38  perseant 		return EROFS;
    205       1.75     perry 
    206       1.78  perseant 	ASSERT_NO_SEGLOCK(fs);
    207       1.78  perseant 
    208       1.56  perseant 	lfs_seglock(fs, SEGM_PROT);
    209       1.17  perseant 
    210        1.1   mycroft 	/* Get the head of the freelist. */
    211  1.119.6.1     skrll 	LFS_GET_HEADFREE(fs, cip, cbp, ino);
    212  1.119.6.1     skrll 	KASSERT(*ino != LFS_UNUSED_INUM && *ino != LFS_IFILE_INUM);
    213       1.48  perseant 
    214  1.119.6.1     skrll 	DLOG((DLOG_ALLOC, "lfs_valloc: allocate inode %" PRId64 "\n",
    215  1.119.6.1     skrll 	     *ino));
    216       1.75     perry 
    217        1.1   mycroft 	/*
    218        1.1   mycroft 	 * Remove the inode from the free list and write the new start
    219        1.1   mycroft 	 * of the free list into the superblock.
    220        1.1   mycroft 	 */
    221  1.119.6.1     skrll 	CLR_BITMAP_FREE(fs, *ino);
    222  1.119.6.1     skrll 	LFS_IENTRY(ifp, fs, *ino, bp);
    223        1.1   mycroft 	if (ifp->if_daddr != LFS_UNUSED_DADDR)
    224  1.119.6.1     skrll 		panic("lfs_valloc: inuse inode %" PRId64 " on the free list",
    225  1.119.6.1     skrll 		    *ino);
    226       1.48  perseant 	LFS_PUT_HEADFREE(fs, cip, cbp, ifp->if_nextfree);
    227  1.119.6.1     skrll 	DLOG((DLOG_ALLOC, "lfs_valloc: headfree %" PRId64 " -> %u\n",
    228  1.119.6.1     skrll 	     *ino, ifp->if_nextfree));
    229       1.48  perseant 
    230  1.119.6.1     skrll 	*gen = ifp->if_version; /* version was updated by vfree */
    231      1.102        ad 	brelse(bp, 0);
    232       1.30  perseant 
    233        1.1   mycroft 	/* Extend IFILE so that the next lfs_valloc will succeed. */
    234       1.63  perseant 	if (fs->lfs_freehd == LFS_UNUSED_INUM) {
    235       1.96  perseant 		if ((error = lfs_extend_ifile(fs, cred)) != 0) {
    236  1.119.6.1     skrll 			LFS_PUT_HEADFREE(fs, cip, cbp, *ino);
    237       1.56  perseant 			lfs_segunlock(fs);
    238       1.44  perseant 			return error;
    239        1.1   mycroft 		}
    240        1.1   mycroft 	}
    241       1.17  perseant #ifdef DIAGNOSTIC
    242       1.63  perseant 	if (fs->lfs_freehd == LFS_UNUSED_INUM)
    243       1.17  perseant 		panic("inode 0 allocated [3]");
    244       1.17  perseant #endif /* DIAGNOSTIC */
    245       1.48  perseant 
    246       1.78  perseant 	/* Set superblock modified bit and increment file count. */
    247      1.105        ad 	mutex_enter(&lfs_lock);
    248       1.78  perseant 	fs->lfs_fmod = 1;
    249      1.105        ad 	mutex_exit(&lfs_lock);
    250       1.78  perseant 	++fs->lfs_nfiles;
    251       1.78  perseant 
    252       1.56  perseant 	lfs_segunlock(fs);
    253       1.63  perseant 
    254  1.119.6.1     skrll 	return 0;
    255       1.44  perseant }
    256       1.44  perseant 
    257       1.65  perseant /*
    258  1.119.6.1     skrll  * Allocate a new inode with given inode number and version.
    259       1.65  perseant  */
    260       1.96  perseant int
    261  1.119.6.1     skrll lfs_valloc_fixed(struct lfs *fs, ino_t ino, int vers)
    262       1.44  perseant {
    263  1.119.6.1     skrll 	IFILE *ifp;
    264  1.119.6.1     skrll 	struct buf *bp, *cbp;
    265  1.119.6.1     skrll 	ino_t tino, oldnext;
    266  1.119.6.1     skrll 	CLEANERINFO *cip;
    267       1.79  perseant 
    268  1.119.6.1     skrll 	/* If the Ifile is too short to contain this inum, extend it */
    269  1.119.6.1     skrll 	while (VTOI(fs->lfs_ivnode)->i_size <= (ino /
    270  1.119.6.1     skrll 		fs->lfs_ifpb + fs->lfs_cleansz + fs->lfs_segtabsz)
    271  1.119.6.1     skrll 		<< fs->lfs_bshift) {
    272  1.119.6.1     skrll 		lfs_extend_ifile(fs, NOCRED);
    273       1.66      fvdl 	}
    274       1.51       chs 
    275  1.119.6.1     skrll 	LFS_IENTRY(ifp, fs, ino, bp);
    276  1.119.6.1     skrll 	oldnext = ifp->if_nextfree;
    277  1.119.6.1     skrll 	ifp->if_version = vers;
    278  1.119.6.1     skrll 	brelse(bp, 0);
    279       1.75     perry 
    280  1.119.6.1     skrll 	LFS_GET_HEADFREE(fs, cip, cbp, &ino);
    281  1.119.6.1     skrll 	if (ino) {
    282  1.119.6.1     skrll 		LFS_PUT_HEADFREE(fs, cip, cbp, oldnext);
    283  1.119.6.1     skrll 	} else {
    284  1.119.6.1     skrll 		tino = ino;
    285  1.119.6.1     skrll 		while (1) {
    286  1.119.6.1     skrll 			LFS_IENTRY(ifp, fs, tino, bp);
    287  1.119.6.1     skrll 			if (ifp->if_nextfree == ino ||
    288  1.119.6.1     skrll 			    ifp->if_nextfree == LFS_UNUSED_INUM)
    289  1.119.6.1     skrll 				break;
    290  1.119.6.1     skrll 			tino = ifp->if_nextfree;
    291  1.119.6.1     skrll 			brelse(bp, 0);
    292  1.119.6.1     skrll 		}
    293  1.119.6.1     skrll 		if (ifp->if_nextfree == LFS_UNUSED_INUM) {
    294  1.119.6.1     skrll 			brelse(bp, 0);
    295  1.119.6.1     skrll 			return ENOENT;
    296  1.119.6.1     skrll 		}
    297  1.119.6.1     skrll 		ifp->if_nextfree = oldnext;
    298  1.119.6.1     skrll 		LFS_BWRITE_LOG(bp);
    299  1.119.6.1     skrll 	}
    300       1.78  perseant 
    301  1.119.6.1     skrll 	return 0;
    302        1.1   mycroft }
    303        1.1   mycroft 
    304       1.87  perseant #if 0
    305       1.87  perseant /*
    306       1.87  perseant  * Find the highest-numbered allocated inode.
    307       1.87  perseant  * This will be used to shrink the Ifile.
    308       1.87  perseant  */
    309       1.87  perseant static inline ino_t
    310       1.87  perseant lfs_last_alloc_ino(struct lfs *fs)
    311       1.87  perseant {
    312       1.87  perseant 	ino_t ino, maxino;
    313       1.87  perseant 
    314       1.87  perseant 	maxino = ((fs->lfs_ivnode->v_size >> fs->lfs_bshift) -
    315       1.87  perseant 		  fs->lfs_cleansz - fs->lfs_segtabsz) * fs->lfs_ifpb;
    316       1.87  perseant 	for (ino = maxino - 1; ino > LFS_UNUSED_INUM; --ino) {
    317       1.87  perseant 		if (ISSET_BITMAP_FREE(fs, ino) == 0)
    318       1.87  perseant 			break;
    319       1.87  perseant 	}
    320       1.87  perseant 	return ino;
    321       1.87  perseant }
    322       1.87  perseant #endif
    323       1.87  perseant 
    324       1.87  perseant /*
    325       1.87  perseant  * Find the previous (next lowest numbered) free inode, if any.
    326       1.87  perseant  * If there is none, return LFS_UNUSED_INUM.
    327       1.87  perseant  */
    328       1.87  perseant static inline ino_t
    329       1.87  perseant lfs_freelist_prev(struct lfs *fs, ino_t ino)
    330       1.87  perseant {
    331       1.88  perseant 	ino_t tino, bound, bb, freehdbb;
    332       1.88  perseant 
    333       1.88  perseant 	if (fs->lfs_freehd == LFS_UNUSED_INUM)	 /* No free inodes at all */
    334       1.88  perseant 		return LFS_UNUSED_INUM;
    335       1.88  perseant 
    336       1.88  perseant 	/* Search our own word first */
    337       1.88  perseant 	bound = ino & ~BMMASK;
    338       1.89  perseant 	for (tino = ino - 1; tino >= bound && tino > LFS_UNUSED_INUM; tino--)
    339       1.88  perseant 		if (ISSET_BITMAP_FREE(fs, tino))
    340       1.88  perseant 			return tino;
    341       1.88  perseant 	/* If there are no lower words to search, just return */
    342       1.88  perseant 	if (ino >> BMSHIFT == 0)
    343       1.88  perseant 		return LFS_UNUSED_INUM;
    344       1.88  perseant 
    345       1.88  perseant 	/*
    346       1.88  perseant 	 * Find a word with a free inode in it.  We have to be a bit
    347       1.88  perseant 	 * careful here since ino_t is unsigned.
    348       1.88  perseant 	 */
    349       1.88  perseant 	freehdbb = (fs->lfs_freehd >> BMSHIFT);
    350       1.88  perseant 	for (bb = (ino >> BMSHIFT) - 1; bb >= freehdbb && bb > 0; --bb)
    351       1.88  perseant 		if (fs->lfs_ino_bitmap[bb])
    352       1.88  perseant 			break;
    353       1.88  perseant 	if (fs->lfs_ino_bitmap[bb] == 0)
    354       1.88  perseant 		return LFS_UNUSED_INUM;
    355       1.88  perseant 
    356       1.88  perseant 	/* Search the word we found */
    357       1.89  perseant 	for (tino = (bb << BMSHIFT) | BMMASK; tino >= (bb << BMSHIFT) &&
    358       1.89  perseant 	     tino > LFS_UNUSED_INUM; tino--)
    359       1.88  perseant 		if (ISSET_BITMAP_FREE(fs, tino))
    360       1.88  perseant 			break;
    361       1.87  perseant 
    362       1.87  perseant 	if (tino <= LFS_IFILE_INUM)
    363       1.87  perseant 		tino = LFS_UNUSED_INUM;
    364       1.87  perseant 
    365       1.87  perseant 	return tino;
    366       1.87  perseant }
    367       1.87  perseant 
    368        1.1   mycroft /* Free an inode. */
    369        1.1   mycroft /* ARGUSED */
    370       1.43  perseant /* VOP_BWRITE 2i times */
    371        1.1   mycroft int
    372       1.99  christos lfs_vfree(struct vnode *vp, ino_t ino, int mode)
    373        1.3  christos {
    374        1.1   mycroft 	SEGUSE *sup;
    375       1.48  perseant 	CLEANERINFO *cip;
    376       1.48  perseant 	struct buf *cbp, *bp;
    377        1.1   mycroft 	struct ifile *ifp;
    378        1.1   mycroft 	struct inode *ip;
    379        1.1   mycroft 	struct lfs *fs;
    380       1.59      fvdl 	daddr_t old_iaddr;
    381       1.85      yamt 	ino_t otail;
    382       1.75     perry 
    383        1.1   mycroft 	/* Get the inode number and file system. */
    384       1.30  perseant 	ip = VTOI(vp);
    385        1.1   mycroft 	fs = ip->i_lfs;
    386        1.1   mycroft 	ino = ip->i_number;
    387       1.34  perseant 
    388       1.78  perseant 	ASSERT_NO_SEGLOCK(fs);
    389       1.88  perseant 	DLOG((DLOG_ALLOC, "lfs_vfree: free ino %lld\n", (long long)ino));
    390       1.78  perseant 
    391       1.48  perseant 	/* Drain of pending writes */
    392      1.111     rmind 	mutex_enter(vp->v_interlock);
    393      1.105        ad 	while (fs->lfs_version > 1 && WRITEINPROG(vp)) {
    394      1.111     rmind 		cv_wait(&vp->v_cv, vp->v_interlock);
    395      1.105        ad 	}
    396      1.111     rmind 	mutex_exit(vp->v_interlock);
    397       1.48  perseant 
    398       1.63  perseant 	lfs_seglock(fs, SEGM_PROT);
    399       1.75     perry 
    400       1.72      yamt 	lfs_unmark_vnode(vp);
    401      1.105        ad 	mutex_enter(&lfs_lock);
    402      1.103        ad 	if (vp->v_uflag & VU_DIROP) {
    403      1.103        ad 		vp->v_uflag &= ~VU_DIROP;
    404       1.30  perseant 		--lfs_dirvcount;
    405       1.92  perseant 		--fs->lfs_dirvcount;
    406       1.63  perseant 		TAILQ_REMOVE(&fs->lfs_dchainhd, ip, i_lfs_dchain);
    407       1.92  perseant 		wakeup(&fs->lfs_dirvcount);
    408       1.30  perseant 		wakeup(&lfs_dirvcount);
    409      1.105        ad 		mutex_exit(&lfs_lock);
    410  1.119.6.1     skrll 		vrele(vp);
    411       1.90  perseant 
    412       1.90  perseant 		/*
    413       1.90  perseant 		 * If this inode is not going to be written any more, any
    414       1.90  perseant 		 * segment accounting left over from its truncation needs
    415       1.90  perseant 		 * to occur at the end of the next dirops flush.  Attach
    416       1.90  perseant 		 * them to the fs-wide list for that purpose.
    417       1.90  perseant 		 */
    418       1.90  perseant 		if (LIST_FIRST(&ip->i_lfs_segdhd) != NULL) {
    419       1.90  perseant 			struct segdelta *sd;
    420       1.90  perseant 
    421       1.90  perseant 			while((sd = LIST_FIRST(&ip->i_lfs_segdhd)) != NULL) {
    422       1.90  perseant 				LIST_REMOVE(sd, list);
    423       1.90  perseant 				LIST_INSERT_HEAD(&fs->lfs_segdhd, sd, list);
    424       1.90  perseant 			}
    425       1.90  perseant 		}
    426       1.90  perseant 	} else {
    427       1.90  perseant 		/*
    428       1.90  perseant 		 * If it's not a dirop, we can finalize right away.
    429       1.90  perseant 		 */
    430      1.105        ad 		mutex_exit(&lfs_lock);
    431       1.90  perseant 		lfs_finalize_ino_seguse(fs, ip);
    432       1.38  perseant 	}
    433       1.30  perseant 
    434      1.105        ad 	mutex_enter(&lfs_lock);
    435       1.42  perseant 	LFS_CLR_UINO(ip, IN_ACCESSED|IN_CLEANING|IN_MODIFIED);
    436      1.105        ad 	mutex_exit(&lfs_lock);
    437       1.33  perseant 	ip->i_flag &= ~IN_ALLMOD;
    438       1.93  perseant 	ip->i_lfs_iflags |= LFSI_DELETED;
    439       1.93  perseant 
    440        1.1   mycroft 	/*
    441        1.1   mycroft 	 * Set the ifile's inode entry to unused, increment its version number
    442       1.48  perseant 	 * and link it onto the free chain.
    443        1.1   mycroft 	 */
    444       1.87  perseant 	SET_BITMAP_FREE(fs, ino);
    445        1.1   mycroft 	LFS_IENTRY(ifp, fs, ino, bp);
    446        1.1   mycroft 	old_iaddr = ifp->if_daddr;
    447        1.1   mycroft 	ifp->if_daddr = LFS_UNUSED_DADDR;
    448        1.1   mycroft 	++ifp->if_version;
    449       1.48  perseant 	if (fs->lfs_version == 1) {
    450       1.48  perseant 		LFS_GET_HEADFREE(fs, cip, cbp, &(ifp->if_nextfree));
    451       1.48  perseant 		LFS_PUT_HEADFREE(fs, cip, cbp, ino);
    452       1.56  perseant 		(void) LFS_BWRITE_LOG(bp); /* Ifile */
    453       1.48  perseant 	} else {
    454       1.87  perseant 		ino_t tino, onf;
    455       1.87  perseant 
    456       1.48  perseant 		ifp->if_nextfree = LFS_UNUSED_INUM;
    457       1.56  perseant 		(void) LFS_BWRITE_LOG(bp); /* Ifile */
    458       1.87  perseant 
    459       1.87  perseant 		tino = lfs_freelist_prev(fs, ino);
    460       1.87  perseant 		if (tino == LFS_UNUSED_INUM) {
    461       1.87  perseant 			/* Nothing free below us, put us on the head */
    462       1.87  perseant 			LFS_IENTRY(ifp, fs, ino, bp);
    463       1.87  perseant 			LFS_GET_HEADFREE(fs, cip, cbp, &(ifp->if_nextfree));
    464       1.87  perseant 			LFS_PUT_HEADFREE(fs, cip, cbp, ino);
    465       1.88  perseant 			DLOG((DLOG_ALLOC, "lfs_vfree: headfree %lld -> %lld\n",
    466       1.87  perseant 			     (long long)ifp->if_nextfree, (long long)ino));
    467       1.87  perseant 			LFS_BWRITE_LOG(bp); /* Ifile */
    468       1.87  perseant 
    469       1.87  perseant 			/* If the list was empty, set tail too */
    470       1.87  perseant 			LFS_GET_TAILFREE(fs, cip, cbp, &otail);
    471       1.87  perseant 			if (otail == LFS_UNUSED_INUM) {
    472       1.87  perseant 				LFS_PUT_TAILFREE(fs, cip, cbp, ino);
    473       1.87  perseant 				DLOG((DLOG_ALLOC, "lfs_vfree: tailfree %lld "
    474       1.87  perseant 				      "-> %lld\n", (long long)otail,
    475       1.87  perseant 				      (long long)ino));
    476       1.87  perseant 			}
    477       1.87  perseant 		} else {
    478       1.87  perseant 			/*
    479       1.87  perseant 			 * Insert this inode into the list after tino.
    480       1.87  perseant 			 * We hold the segment lock so we don't have to
    481       1.87  perseant 			 * worry about blocks being written out of order.
    482       1.87  perseant 			 */
    483       1.87  perseant 			DLOG((DLOG_ALLOC, "lfs_vfree: insert ino %lld "
    484       1.87  perseant 			      " after %lld\n", ino, tino));
    485       1.87  perseant 
    486       1.87  perseant 			LFS_IENTRY(ifp, fs, tino, bp);
    487       1.87  perseant 			onf = ifp->if_nextfree;
    488       1.87  perseant 			ifp->if_nextfree = ino;
    489       1.87  perseant 			LFS_BWRITE_LOG(bp);	/* Ifile */
    490       1.87  perseant 
    491       1.87  perseant 			LFS_IENTRY(ifp, fs, ino, bp);
    492       1.87  perseant 			ifp->if_nextfree = onf;
    493       1.87  perseant 			LFS_BWRITE_LOG(bp);	/* Ifile */
    494       1.87  perseant 
    495       1.87  perseant 			/* If we're last, put us on the tail */
    496       1.87  perseant 			if (onf == LFS_UNUSED_INUM) {
    497       1.87  perseant 				LFS_GET_TAILFREE(fs, cip, cbp, &otail);
    498       1.87  perseant 				LFS_PUT_TAILFREE(fs, cip, cbp, ino);
    499       1.87  perseant 				DLOG((DLOG_ALLOC, "lfs_vfree: tailfree %lld "
    500       1.87  perseant 				      "-> %lld\n", (long long)otail,
    501       1.87  perseant 				      (long long)ino));
    502       1.87  perseant 			}
    503       1.87  perseant 		}
    504       1.48  perseant 	}
    505       1.17  perseant #ifdef DIAGNOSTIC
    506       1.53       chs 	if (ino == LFS_UNUSED_INUM) {
    507       1.17  perseant 		panic("inode 0 freed");
    508       1.17  perseant 	}
    509       1.17  perseant #endif /* DIAGNOSTIC */
    510        1.1   mycroft 	if (old_iaddr != LFS_UNUSED_DADDR) {
    511      1.117  christos 		LFS_SEGENTRY(sup, fs, lfs_dtosn(fs, old_iaddr), bp);
    512       1.22  perseant #ifdef DIAGNOSTIC
    513      1.116  dholland 		if (sup->su_nbytes < sizeof (struct ulfs1_dinode)) {
    514       1.43  perseant 			printf("lfs_vfree: negative byte count"
    515       1.62      yamt 			       " (segment %" PRIu32 " short by %d)\n",
    516      1.117  christos 			       lfs_dtosn(fs, old_iaddr),
    517      1.116  dholland 			       (int)sizeof (struct ulfs1_dinode) -
    518       1.66      fvdl 				    sup->su_nbytes);
    519       1.22  perseant 			panic("lfs_vfree: negative byte count");
    520      1.116  dholland 			sup->su_nbytes = sizeof (struct ulfs1_dinode);
    521       1.17  perseant 		}
    522       1.22  perseant #endif
    523      1.116  dholland 		sup->su_nbytes -= sizeof (struct ulfs1_dinode);
    524      1.117  christos 		LFS_WRITESEGENTRY(sup, fs, lfs_dtosn(fs, old_iaddr), bp); /* Ifile */
    525        1.1   mycroft 	}
    526       1.75     perry 
    527        1.1   mycroft 	/* Set superblock modified bit and decrement file count. */
    528      1.105        ad 	mutex_enter(&lfs_lock);
    529        1.1   mycroft 	fs->lfs_fmod = 1;
    530      1.105        ad 	mutex_exit(&lfs_lock);
    531        1.1   mycroft 	--fs->lfs_nfiles;
    532       1.75     perry 
    533       1.56  perseant 	lfs_segunlock(fs);
    534       1.63  perseant 
    535        1.1   mycroft 	return (0);
    536        1.1   mycroft }
    537       1.87  perseant 
    538       1.87  perseant /*
    539       1.87  perseant  * Sort the freelist and set up the free-inode bitmap.
    540       1.87  perseant  * To be called by lfs_mountfs().
    541       1.87  perseant  */
    542       1.87  perseant void
    543       1.87  perseant lfs_order_freelist(struct lfs *fs)
    544       1.87  perseant {
    545       1.87  perseant 	CLEANERINFO *cip;
    546       1.87  perseant 	IFILE *ifp = NULL;
    547       1.87  perseant 	struct buf *bp;
    548       1.87  perseant 	ino_t ino, firstino, lastino, maxino;
    549       1.97  perseant #ifdef notyet
    550       1.97  perseant 	struct vnode *vp;
    551       1.97  perseant #endif
    552       1.87  perseant 
    553       1.95  perseant 	ASSERT_NO_SEGLOCK(fs);
    554       1.95  perseant 	lfs_seglock(fs, SEGM_PROT);
    555       1.95  perseant 
    556       1.87  perseant 	maxino = ((fs->lfs_ivnode->v_size >> fs->lfs_bshift) -
    557       1.87  perseant 		  fs->lfs_cleansz - fs->lfs_segtabsz) * fs->lfs_ifpb;
    558       1.88  perseant 	fs->lfs_ino_bitmap = (lfs_bm_t *)
    559       1.88  perseant 		malloc(((maxino + BMMASK) >> BMSHIFT) * sizeof(lfs_bm_t),
    560       1.88  perseant 		       M_SEGMENT, M_WAITOK | M_ZERO);
    561       1.88  perseant 	KASSERT(fs->lfs_ino_bitmap != NULL);
    562       1.87  perseant 
    563       1.87  perseant 	firstino = lastino = LFS_UNUSED_INUM;
    564       1.87  perseant 	for (ino = 0; ino < maxino; ino++) {
    565       1.87  perseant 		if (ino % fs->lfs_ifpb == 0)
    566       1.87  perseant 			LFS_IENTRY(ifp, fs, ino, bp);
    567       1.87  perseant 		else
    568       1.87  perseant 			++ifp;
    569       1.87  perseant 
    570       1.87  perseant 		/* Don't put zero or ifile on the free list */
    571       1.87  perseant 		if (ino == LFS_UNUSED_INUM || ino == LFS_IFILE_INUM)
    572       1.87  perseant 			continue;
    573       1.87  perseant 
    574       1.97  perseant #ifdef notyet
    575       1.97  perseant 		/* Address orphaned files */
    576       1.97  perseant 		if (ifp->if_nextfree == LFS_ORPHAN_NEXTFREE &&
    577       1.97  perseant 		    VFS_VGET(fs->lfs_ivnode->v_mount, ino, &vp) == 0) {
    578      1.104        he 			lfs_truncate(vp, 0, 0, NOCRED);
    579       1.97  perseant 			vput(vp);
    580      1.117  christos 			LFS_SEGENTRY(sup, fs, lfs_dtosn(fs, ifp->if_daddr), bp);
    581       1.97  perseant 			KASSERT(sup->su_nbytes >= DINODE1_SIZE);
    582       1.97  perseant 			sup->su_nbytes -= DINODE1_SIZE;
    583      1.117  christos 			LFS_WRITESEGENTRY(sup, fs, lfs_dtosn(fs, ifp->if_daddr), bp);
    584       1.97  perseant 
    585       1.97  perseant 			/* Set up to fall through to next section */
    586       1.97  perseant 			ifp->if_daddr = LFS_UNUSED_DADDR;
    587       1.97  perseant 			LFS_BWRITE_LOG(bp);
    588       1.97  perseant 			LFS_IENTRY(ifp, fs, ino, bp);
    589       1.97  perseant 		}
    590       1.97  perseant #endif
    591       1.97  perseant 
    592       1.87  perseant 		if (ifp->if_daddr == LFS_UNUSED_DADDR) {
    593       1.87  perseant 			if (firstino == LFS_UNUSED_INUM)
    594       1.87  perseant 				firstino = ino;
    595       1.87  perseant 			else {
    596      1.102        ad 				brelse(bp, 0);
    597       1.87  perseant 
    598       1.87  perseant 				LFS_IENTRY(ifp, fs, lastino, bp);
    599       1.87  perseant 				ifp->if_nextfree = ino;
    600       1.87  perseant 				LFS_BWRITE_LOG(bp);
    601       1.87  perseant 
    602       1.87  perseant 				LFS_IENTRY(ifp, fs, ino, bp);
    603       1.87  perseant 			}
    604       1.87  perseant 			lastino = ino;
    605       1.87  perseant 
    606       1.87  perseant 			SET_BITMAP_FREE(fs, ino);
    607       1.87  perseant 		}
    608       1.87  perseant 
    609       1.87  perseant 		if ((ino + 1) % fs->lfs_ifpb == 0)
    610      1.102        ad 			brelse(bp, 0);
    611       1.87  perseant 	}
    612       1.87  perseant 
    613       1.87  perseant 	LFS_PUT_HEADFREE(fs, cip, bp, firstino);
    614       1.87  perseant 	LFS_PUT_TAILFREE(fs, cip, bp, lastino);
    615       1.95  perseant 
    616       1.95  perseant 	lfs_segunlock(fs);
    617       1.87  perseant }
    618       1.97  perseant 
    619       1.97  perseant void
    620       1.97  perseant lfs_orphan(struct lfs *fs, ino_t ino)
    621       1.97  perseant {
    622       1.97  perseant 	IFILE *ifp;
    623       1.97  perseant 	struct buf *bp;
    624       1.97  perseant 
    625       1.97  perseant 	LFS_IENTRY(ifp, fs, ino, bp);
    626       1.97  perseant 	ifp->if_nextfree = LFS_ORPHAN_NEXTFREE;
    627       1.97  perseant 	LFS_BWRITE_LOG(bp);
    628       1.97  perseant }
    629