/* * linux/fs/ext/freelists.c * * (C) 1992 Remy Card (card@masi.ibp.fr) * */ /* freelists.c contains the code that handles the inode and block free lists */ /* The free blocks are managed by a linked list. The super block contains the number of the first free block. This block contains 254 numbers of other free blocks and the number of the next block in the list. When an ext fs is mounted, the number of the first free block is stored in s->s_zmap[0] and the block header is stored in s->s_zmap[1]. s_zmap[2] contains the count of free blocks. Currently, it is a hack to allow this kind of management with the super_block structure. Perhaps, in the future, we may have to change the super_block structure to include dedicated fields. The free inodes are also managed by a linked list in a similar way. The super block contains the number of the first free inode. This inode contains 14 numbers of other free inodes and the number of the next inode in the list. The number of the first free inode is stored in s->s_imap[0] and the header of the block containing the inode is stored in s->s_imap[1]. s_imap[2] contains the count of free inodes. */ #include <linux/string.h> #include <linux/sched.h> #include <linux/ext_fs.h> #include <linux/kernel.h> #ifdef EXTFS_FREELIST #define clear_block(addr) \ __asm__("cld\n\t" \ "rep\n\t" \ "stosl" \ ::"a" (0),"c" (BLOCK_SIZE/4),"D" ((long) (addr)):"cx","di") int ext_free_block(int dev, int block) { struct super_block * sb; struct buffer_head * bh; struct ext_free_block * efb; if (!(sb = get_super(dev))) panic("trying to free block on nonexistent device"); lock_super (sb); if (block < sb->s_firstdatazone || block >= sb->s_nzones) panic("trying to free block not in datazone"); bh = get_hash_table(dev,block); if (bh) { if (bh->b_count > 1) { brelse(bh); free_super (sb); return 0; } bh->b_dirt=0; bh->b_uptodate=0; if (bh->b_count) brelse(bh); } efb = (struct ext_free_block *) sb->s_zmap[1]->b_data; if (efb->count == 254) { #ifdef EXTFS_DEBUG printk("ext_free_block: block full, skipping to %d\n", block); #endif brelse (sb->s_zmap[1]); if (!(sb->s_zmap[1] = bread (dev, block))) panic ("ext_free_block: unable to read block to free\n"); efb = (struct ext_free_block *) sb->s_zmap[1]->b_data; efb->next = (unsigned long) sb->s_zmap[0]; efb->count = 0; sb->s_zmap[0] = (struct buffer_head *) block; } else { efb->free[efb->count++] = block; } sb->s_zmap[2] = (struct buffer_head *) (((unsigned long) sb->s_zmap[2]) + 1); sb->s_dirt = 1; sb->s_zmap[1]->b_dirt = 1; free_super (sb); return 1; } int ext_new_block(int dev) { struct buffer_head * bh; struct super_block * sb; struct ext_free_block * efb; int /* i, */ j; if (!(sb = get_super(dev))) panic("trying to get new block from nonexistant device"); if (!sb->s_zmap[1]) return 0; lock_super (sb); efb = (struct ext_free_block *) sb->s_zmap[1]->b_data; if (efb->count) { j = efb->free[--efb->count]; sb->s_zmap[1]->b_dirt = 1; } else { #ifdef EXTFS_DEBUG printk("ext_new_block: block empty, skipping to %d\n", efb->next); #endif j = (unsigned long) sb->s_zmap[0]; sb->s_zmap[0] = (struct buffer_head *) efb->next; brelse (sb->s_zmap[1]); if (!sb->s_zmap[0]) { sb->s_zmap[1] = NULL; } else { if (!(sb->s_zmap[1] = bread (dev, (unsigned long) sb->s_zmap[0]))) panic ("ext_new_block: unable to read next free block\n"); } } if (j < sb->s_firstdatazone || j > sb->s_nzones) { printk ("ext_new_block: blk = %d\n", j); panic ("allocating block not in data zone\n"); } sb->s_zmap[2] = (struct buffer_head *) (((unsigned long) sb->s_zmap[2]) - 1); sb->s_dirt = 1; if (!(bh=getblk(dev,j))) panic("new_block: cannot get block"); if (bh->b_count != 1) panic("new block: count is != 1"); clear_block(bh->b_data); bh->b_uptodate = 1; bh->b_dirt = 1; brelse(bh); #ifdef EXTFS_DEBUG printk("ext_new_block: allocating block %d\n", j); #endif free_super (sb); return j; } unsigned long ext_count_free_blocks(struct super_block *sb) { #ifdef EXTFS_DEBUG struct buffer_head * bh; struct ext_free_block * efb; unsigned long count, block; lock_super (sb); if (!sb->s_zmap[1]) count = 0; else { efb = (struct ext_free_block *) sb->s_zmap[1]->b_data; count = efb->count + 1; block = efb->next; while (block) { if (!(bh = bread (sb->s_dev, block))) { printk ("ext_count_free: error while reading free blocks list\n"); block = 0; } else { efb = (struct ext_free_block *) bh->b_data; count += efb->count + 1; block = efb->next; brelse (bh); } } } printk("ext_count_free_blocks: stored = %d, computed = %d\n", (unsigned long) sb->s_zmap[2], count); free_super (sb); return count; #else return (unsigned long) sb->s_zmap[2]; #endif } void ext_free_inode(struct inode * inode) { struct buffer_head * bh; struct ext_free_inode * efi; unsigned long block; if (!inode) return; if (!inode->i_dev) { memset(inode,0,sizeof(*inode)); return; } if (inode->i_count>1) { printk("free_inode: inode has count=%d\n",inode->i_count); return; } if (inode->i_nlink) { printk("free_inode: inode has nlink=%d\n",inode->i_nlink); return; } if (!inode->i_sb) { printk("free_inode: inode on nonexistent device\n"); return; } lock_super (inode->i_sb); if (inode->i_ino < 1 || inode->i_ino > inode->i_sb->s_ninodes) { printk("free_inode: inode 0 or nonexistent inode\n"); free_super (inode->i_sb); return; } efi = ((struct ext_free_inode *) inode->i_sb->s_imap[1]->b_data) + (((unsigned long) inode->i_sb->s_imap[0])-1)%EXT_INODES_PER_BLOCK; if (efi->count == 14) { #ifdef EXTFS_DEBUG printk("ext_free_inode: inode full, skipping to %d\n", inode->i_ino); #endif brelse (inode->i_sb->s_imap[1]); block = 2 + (inode->i_ino - 1) / EXT_INODES_PER_BLOCK; if (!(bh = bread(inode->i_dev, block))) panic("ext_free_inode: unable to read inode block\n"); efi = ((struct ext_free_inode *) bh->b_data) + (inode->i_ino - 1) % EXT_INODES_PER_BLOCK; efi->next = (unsigned long) inode->i_sb->s_imap[0]; efi->count = 0; inode->i_sb->s_imap[0] = (struct buffer_head *) inode->i_ino; inode->i_sb->s_imap[1] = bh; } else { efi->free[efi->count++] = inode->i_ino; } inode->i_sb->s_imap[2] = (struct buffer_head *) (((unsigned long) inode->i_sb->s_imap[2]) + 1); inode->i_sb->s_dirt = 1; inode->i_sb->s_imap[1]->b_dirt = 1; free_super (inode->i_sb); memset(inode,0,sizeof(*inode)); } struct inode * ext_new_inode(int dev) { struct inode * inode; struct ext_free_inode * efi; unsigned long block; int /* i, */ j; if (!(inode=get_empty_inode())) return NULL; if (!(inode->i_sb = get_super(dev))) { printk("new_inode: unknown device\n"); iput(inode); return NULL; } if (!inode->i_sb->s_imap[1]) return 0; lock_super (inode->i_sb); efi = ((struct ext_free_inode *) inode->i_sb->s_imap[1]->b_data) + (((unsigned long) inode->i_sb->s_imap[0])-1)%EXT_INODES_PER_BLOCK; if (efi->count) { j = efi->free[--efi->count]; inode->i_sb->s_imap[1]->b_dirt = 1; } else { #ifdef EXTFS_DEBUG printk("ext_free_inode: inode empty, skipping to %d\n", efi->next); #endif j = (unsigned long) inode->i_sb->s_imap[0]; if (efi->next < 1 || efi->next > inode->i_sb->s_ninodes) { printk ("efi->next = %d\n", efi->next); panic ("ext_new_inode: bad inode number in free list\n"); } inode->i_sb->s_imap[0] = (struct buffer_head *) efi->next; block = 2 + (((unsigned long) efi->next) - 1) / EXT_INODES_PER_BLOCK; brelse (inode->i_sb->s_imap[1]); if (!inode->i_sb->s_imap[0]) { inode->i_sb->s_imap[1] = NULL; } else { if (!(inode->i_sb->s_imap[1] = bread (dev, block))) panic ("ext_new_inode: unable to read next free inode block\n"); } } inode->i_sb->s_imap[2] = (struct buffer_head *) (((unsigned long) inode->i_sb->s_imap[2]) - 1); inode->i_sb->s_dirt = 1; inode->i_count = 1; inode->i_nlink = 1; inode->i_dev = dev; inode->i_uid = current->euid; inode->i_gid = current->egid; inode->i_dirt = 1; inode->i_ino = j; inode->i_mtime = inode->i_atime = inode->i_ctime = CURRENT_TIME; inode->i_op = NULL; #ifdef EXTFS_DEBUG printk("ext_new_inode : allocating inode %d\n", inode->i_ino); #endif free_super (inode->i_sb); return inode; } unsigned long ext_count_free_inodes(struct super_block *sb) { #ifdef EXTFS_DEBUG struct buffer_head * bh; struct ext_free_inode * efi; unsigned long count, block, ino; lock_super (sb); if (!sb->s_imap[1]) count = 0; else { efi = ((struct ext_free_inode *) sb->s_imap[1]->b_data) + ((((unsigned long) sb->s_imap[0])-1)%EXT_INODES_PER_BLOCK); count = efi->count + 1; ino = efi->next; while (ino) { if (ino < 1 || ino > sb->s_ninodes) { printk ("s_imap[0] = %d, ino = %d\n", (int) sb->s_imap[0],ino); panic ("ext_count_fre_inodes: bad inode number in free list\n"); } block = 2 + ((ino - 1) / EXT_INODES_PER_BLOCK); if (!(bh = bread (sb->s_dev, block))) { printk ("ext_count_free_inodes: error while reading free inodes list\n"); block = 0; } else { efi = ((struct ext_free_inode *) bh->b_data) + ((ino - 1) % EXT_INODES_PER_BLOCK); count += efi->count + 1; ino = efi->next; brelse (bh); } } } printk("ext_count_free_inodes: stored = %d, computed = %d\n", (unsigned long) sb->s_imap[2], count); free_super (sb); return count; #else return (unsigned long) sb->s_imap[2]; #endif } #endif