OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [tags/] [before_ORP/] [uclinux/] [uClinux-2.0.x/] [fs/] [minix/] [bitmap.c] - Diff between revs 901 and 1765

Only display areas with differences | Details | Blame | View Log

Rev 901 Rev 1765
/*
/*
 *  linux/fs/minix/bitmap.c
 *  linux/fs/minix/bitmap.c
 *
 *
 *  Copyright (C) 1991, 1992  Linus Torvalds
 *  Copyright (C) 1991, 1992  Linus Torvalds
 */
 */
 
 
/* bitmap.c contains the code that handles the inode and block bitmaps */
/* bitmap.c contains the code that handles the inode and block bitmaps */
 
 
#include <linux/sched.h>
#include <linux/sched.h>
#include <linux/minix_fs.h>
#include <linux/minix_fs.h>
#include <linux/stat.h>
#include <linux/stat.h>
#include <linux/kernel.h>
#include <linux/kernel.h>
#include <linux/string.h>
#include <linux/string.h>
 
 
#include <asm/bitops.h>
#include <asm/bitops.h>
 
 
static int nibblemap[] = { 4,3,3,2,3,2,2,1,3,2,2,1,2,1,1,0 };
static int nibblemap[] = { 4,3,3,2,3,2,2,1,3,2,2,1,2,1,1,0 };
 
 
static unsigned long count_free(struct buffer_head *map[], unsigned numblocks)
static unsigned long count_free(struct buffer_head *map[], unsigned numblocks)
{
{
        unsigned i, j, sum = 0;
        unsigned i, j, sum = 0;
        struct buffer_head *bh;
        struct buffer_head *bh;
 
 
        for (i=0; i<numblocks; i++) {
        for (i=0; i<numblocks; i++) {
                if (!(bh=map[i]))
                if (!(bh=map[i]))
                        return(0);
                        return(0);
                for (j=0; j<BLOCK_SIZE; j++)
                for (j=0; j<BLOCK_SIZE; j++)
                        sum += nibblemap[bh->b_data[j] & 0xf]
                        sum += nibblemap[bh->b_data[j] & 0xf]
                                + nibblemap[(bh->b_data[j]>>4)&0xf];
                                + nibblemap[(bh->b_data[j]>>4)&0xf];
        }
        }
        return(sum);
        return(sum);
}
}
 
 
void minix_free_block(struct super_block * sb, int block)
void minix_free_block(struct super_block * sb, int block)
{
{
        struct buffer_head * bh;
        struct buffer_head * bh;
        unsigned int bit,zone;
        unsigned int bit,zone;
 
 
        if (!sb) {
        if (!sb) {
                printk("trying to free block on nonexistent device\n");
                printk("trying to free block on nonexistent device\n");
                return;
                return;
        }
        }
        if (block < sb->u.minix_sb.s_firstdatazone ||
        if (block < sb->u.minix_sb.s_firstdatazone ||
            block >= sb->u.minix_sb.s_nzones) {
            block >= sb->u.minix_sb.s_nzones) {
                printk("trying to free block not in datazone\n");
                printk("trying to free block not in datazone\n");
                return;
                return;
        }
        }
        bh = get_hash_table(sb->s_dev,block,BLOCK_SIZE);
        bh = get_hash_table(sb->s_dev,block,BLOCK_SIZE);
        if (bh)
        if (bh)
                clear_bit(BH_Dirty, &bh->b_state);
                clear_bit(BH_Dirty, &bh->b_state);
        brelse(bh);
        brelse(bh);
        zone = block - sb->u.minix_sb.s_firstdatazone + 1;
        zone = block - sb->u.minix_sb.s_firstdatazone + 1;
        bit = zone & 8191;
        bit = zone & 8191;
        zone >>= 13;
        zone >>= 13;
        bh = sb->u.minix_sb.s_zmap[zone];
        bh = sb->u.minix_sb.s_zmap[zone];
        if (!bh) {
        if (!bh) {
                printk("minix_free_block: nonexistent bitmap buffer\n");
                printk("minix_free_block: nonexistent bitmap buffer\n");
                return;
                return;
        }
        }
        if (!clear_bit(bit,bh->b_data))
        if (!clear_bit(bit,bh->b_data))
                printk("free_block (%s:%d): bit already cleared\n",
                printk("free_block (%s:%d): bit already cleared\n",
                       kdevname(sb->s_dev), block);
                       kdevname(sb->s_dev), block);
        mark_buffer_dirty(bh, 1);
        mark_buffer_dirty(bh, 1);
        return;
        return;
}
}
 
 
int minix_new_block(struct super_block * sb)
int minix_new_block(struct super_block * sb)
{
{
        struct buffer_head * bh;
        struct buffer_head * bh;
        int i,j;
        int i,j;
 
 
        if (!sb) {
        if (!sb) {
                printk("trying to get new block from nonexistent device\n");
                printk("trying to get new block from nonexistent device\n");
                return 0;
                return 0;
        }
        }
repeat:
repeat:
        j = 8192;
        j = 8192;
        for (i=0 ; i<64 ; i++)
        for (i=0 ; i<64 ; i++)
                if ((bh=sb->u.minix_sb.s_zmap[i]) != NULL)
                if ((bh=sb->u.minix_sb.s_zmap[i]) != NULL)
                        if ((j=find_first_zero_bit(bh->b_data, 8192)) < 8192)
                        if ((j=find_first_zero_bit(bh->b_data, 8192)) < 8192)
                                break;
                                break;
        if (i>=64 || !bh || j>=8192)
        if (i>=64 || !bh || j>=8192)
                return 0;
                return 0;
        if (set_bit(j,bh->b_data)) {
        if (set_bit(j,bh->b_data)) {
                printk("new_block: bit already set");
                printk("new_block: bit already set");
                goto repeat;
                goto repeat;
        }
        }
        mark_buffer_dirty(bh, 1);
        mark_buffer_dirty(bh, 1);
        j += i*8192 + sb->u.minix_sb.s_firstdatazone-1;
        j += i*8192 + sb->u.minix_sb.s_firstdatazone-1;
        if (j < sb->u.minix_sb.s_firstdatazone ||
        if (j < sb->u.minix_sb.s_firstdatazone ||
            j >= sb->u.minix_sb.s_nzones)
            j >= sb->u.minix_sb.s_nzones)
                return 0;
                return 0;
        if (!(bh = getblk(sb->s_dev,j,BLOCK_SIZE))) {
        if (!(bh = getblk(sb->s_dev,j,BLOCK_SIZE))) {
                printk("new_block: cannot get block");
                printk("new_block: cannot get block");
                return 0;
                return 0;
        }
        }
        memset(bh->b_data, 0, BLOCK_SIZE);
        memset(bh->b_data, 0, BLOCK_SIZE);
        mark_buffer_uptodate(bh, 1);
        mark_buffer_uptodate(bh, 1);
        mark_buffer_dirty(bh, 1);
        mark_buffer_dirty(bh, 1);
        brelse(bh);
        brelse(bh);
        return j;
        return j;
}
}
 
 
unsigned long minix_count_free_blocks(struct super_block *sb)
unsigned long minix_count_free_blocks(struct super_block *sb)
{
{
        return (count_free(sb->u.minix_sb.s_zmap,sb->u.minix_sb.s_zmap_blocks)
        return (count_free(sb->u.minix_sb.s_zmap,sb->u.minix_sb.s_zmap_blocks)
                 << sb->u.minix_sb.s_log_zone_size);
                 << sb->u.minix_sb.s_log_zone_size);
}
}
 
 
static struct buffer_head *V1_minix_clear_inode(struct inode *inode)
static struct buffer_head *V1_minix_clear_inode(struct inode *inode)
{
{
        struct buffer_head *bh;
        struct buffer_head *bh;
        struct minix_inode *raw_inode;
        struct minix_inode *raw_inode;
        int ino, block;
        int ino, block;
 
 
        ino = inode->i_ino;
        ino = inode->i_ino;
        if (!ino || ino >= inode->i_sb->u.minix_sb.s_ninodes) {
        if (!ino || ino >= inode->i_sb->u.minix_sb.s_ninodes) {
                printk("Bad inode number on dev %s: %d is out of range\n",
                printk("Bad inode number on dev %s: %d is out of range\n",
                       kdevname(inode->i_dev), ino);
                       kdevname(inode->i_dev), ino);
                return 0;
                return 0;
        }
        }
        block = (2 + inode->i_sb->u.minix_sb.s_imap_blocks +
        block = (2 + inode->i_sb->u.minix_sb.s_imap_blocks +
                 inode->i_sb->u.minix_sb.s_zmap_blocks +
                 inode->i_sb->u.minix_sb.s_zmap_blocks +
                 (ino - 1) / MINIX_INODES_PER_BLOCK);
                 (ino - 1) / MINIX_INODES_PER_BLOCK);
        bh = bread(inode->i_dev, block, BLOCK_SIZE);
        bh = bread(inode->i_dev, block, BLOCK_SIZE);
        if (!bh) {
        if (!bh) {
                printk("unable to read i-node block\n");
                printk("unable to read i-node block\n");
                return 0;
                return 0;
        }
        }
        raw_inode = ((struct minix_inode *)bh->b_data +
        raw_inode = ((struct minix_inode *)bh->b_data +
                     (ino - 1) % MINIX_INODES_PER_BLOCK);
                     (ino - 1) % MINIX_INODES_PER_BLOCK);
        raw_inode->i_nlinks = 0;
        raw_inode->i_nlinks = 0;
        raw_inode->i_mode = 0;
        raw_inode->i_mode = 0;
        mark_buffer_dirty(bh, 1);
        mark_buffer_dirty(bh, 1);
        return bh;
        return bh;
}
}
 
 
static struct buffer_head *V2_minix_clear_inode(struct inode *inode)
static struct buffer_head *V2_minix_clear_inode(struct inode *inode)
{
{
        struct buffer_head *bh;
        struct buffer_head *bh;
        struct minix2_inode *raw_inode;
        struct minix2_inode *raw_inode;
        int ino, block;
        int ino, block;
 
 
        ino = inode->i_ino;
        ino = inode->i_ino;
        if (!ino || ino >= inode->i_sb->u.minix_sb.s_ninodes) {
        if (!ino || ino >= inode->i_sb->u.minix_sb.s_ninodes) {
                printk("Bad inode number on dev %s: %d is out of range\n",
                printk("Bad inode number on dev %s: %d is out of range\n",
                       kdevname(inode->i_dev), ino);
                       kdevname(inode->i_dev), ino);
                return 0;
                return 0;
        }
        }
        block = (2 + inode->i_sb->u.minix_sb.s_imap_blocks +
        block = (2 + inode->i_sb->u.minix_sb.s_imap_blocks +
                 inode->i_sb->u.minix_sb.s_zmap_blocks +
                 inode->i_sb->u.minix_sb.s_zmap_blocks +
                 (ino - 1) / MINIX2_INODES_PER_BLOCK);
                 (ino - 1) / MINIX2_INODES_PER_BLOCK);
        bh = bread(inode->i_dev, block, BLOCK_SIZE);
        bh = bread(inode->i_dev, block, BLOCK_SIZE);
        if (!bh) {
        if (!bh) {
                printk("unable to read i-node block\n");
                printk("unable to read i-node block\n");
                return 0;
                return 0;
        }
        }
        raw_inode = ((struct minix2_inode *) bh->b_data +
        raw_inode = ((struct minix2_inode *) bh->b_data +
                     (ino - 1) % MINIX2_INODES_PER_BLOCK);
                     (ino - 1) % MINIX2_INODES_PER_BLOCK);
        raw_inode->i_nlinks = 0;
        raw_inode->i_nlinks = 0;
        raw_inode->i_mode = 0;
        raw_inode->i_mode = 0;
        mark_buffer_dirty(bh, 1);
        mark_buffer_dirty(bh, 1);
        return bh;
        return bh;
}
}
 
 
/* Clear the link count and mode of a deleted inode on disk. */
/* Clear the link count and mode of a deleted inode on disk. */
 
 
static void minix_clear_inode(struct inode *inode)
static void minix_clear_inode(struct inode *inode)
{
{
        struct buffer_head *bh;
        struct buffer_head *bh;
        if (INODE_VERSION(inode) == MINIX_V1)
        if (INODE_VERSION(inode) == MINIX_V1)
                bh = V1_minix_clear_inode(inode);
                bh = V1_minix_clear_inode(inode);
        else
        else
                bh = V2_minix_clear_inode(inode);
                bh = V2_minix_clear_inode(inode);
        brelse (bh);
        brelse (bh);
}
}
 
 
void minix_free_inode(struct inode * inode)
void minix_free_inode(struct inode * inode)
{
{
        struct buffer_head * bh;
        struct buffer_head * bh;
        unsigned long ino;
        unsigned long ino;
 
 
        if (!inode)
        if (!inode)
                return;
                return;
        if (!inode->i_dev) {
        if (!inode->i_dev) {
                printk("free_inode: inode has no device\n");
                printk("free_inode: inode has no device\n");
                return;
                return;
        }
        }
        if (inode->i_count != 1) {
        if (inode->i_count != 1) {
                printk("free_inode: inode has count=%ld\n",inode->i_count);
                printk("free_inode: inode has count=%ld\n",inode->i_count);
                return;
                return;
        }
        }
        if (inode->i_nlink) {
        if (inode->i_nlink) {
                printk("free_inode: inode has nlink=%d\n",inode->i_nlink);
                printk("free_inode: inode has nlink=%d\n",inode->i_nlink);
                return;
                return;
        }
        }
        if (!inode->i_sb) {
        if (!inode->i_sb) {
                printk("free_inode: inode on nonexistent device\n");
                printk("free_inode: inode on nonexistent device\n");
                return;
                return;
        }
        }
        if (inode->i_ino < 1 || inode->i_ino >= inode->i_sb->u.minix_sb.s_ninodes) {
        if (inode->i_ino < 1 || inode->i_ino >= inode->i_sb->u.minix_sb.s_ninodes) {
                printk("free_inode: inode 0 or nonexistent inode\n");
                printk("free_inode: inode 0 or nonexistent inode\n");
                return;
                return;
        }
        }
        ino = inode->i_ino;
        ino = inode->i_ino;
        if (!(bh=inode->i_sb->u.minix_sb.s_imap[ino >> 13])) {
        if (!(bh=inode->i_sb->u.minix_sb.s_imap[ino >> 13])) {
                printk("free_inode: nonexistent imap in superblock\n");
                printk("free_inode: nonexistent imap in superblock\n");
                return;
                return;
        }
        }
        minix_clear_inode(inode);
        minix_clear_inode(inode);
        clear_inode(inode);
        clear_inode(inode);
        if (!clear_bit(ino & 8191, bh->b_data))
        if (!clear_bit(ino & 8191, bh->b_data))
                printk("free_inode: bit %lu already cleared.\n",ino);
                printk("free_inode: bit %lu already cleared.\n",ino);
        mark_buffer_dirty(bh, 1);
        mark_buffer_dirty(bh, 1);
}
}
 
 
struct inode * minix_new_inode(const struct inode * dir)
struct inode * minix_new_inode(const struct inode * dir)
{
{
        struct super_block * sb;
        struct super_block * sb;
        struct inode * inode;
        struct inode * inode;
        struct buffer_head * bh;
        struct buffer_head * bh;
        int i,j;
        int i,j;
 
 
        if (!dir || !(inode = get_empty_inode()))
        if (!dir || !(inode = get_empty_inode()))
                return NULL;
                return NULL;
        sb = dir->i_sb;
        sb = dir->i_sb;
        inode->i_sb = sb;
        inode->i_sb = sb;
        inode->i_flags = inode->i_sb->s_flags;
        inode->i_flags = inode->i_sb->s_flags;
        j = 8192;
        j = 8192;
        for (i=0 ; i<8 ; i++)
        for (i=0 ; i<8 ; i++)
                if ((bh = inode->i_sb->u.minix_sb.s_imap[i]) != NULL)
                if ((bh = inode->i_sb->u.minix_sb.s_imap[i]) != NULL)
                        if ((j=find_first_zero_bit(bh->b_data, 8192)) < 8192)
                        if ((j=find_first_zero_bit(bh->b_data, 8192)) < 8192)
                                break;
                                break;
        if (!bh || j >= 8192) {
        if (!bh || j >= 8192) {
                iput(inode);
                iput(inode);
                return NULL;
                return NULL;
        }
        }
        if (set_bit(j,bh->b_data)) {    /* shouldn't happen */
        if (set_bit(j,bh->b_data)) {    /* shouldn't happen */
                printk("new_inode: bit already set");
                printk("new_inode: bit already set");
                iput(inode);
                iput(inode);
                return NULL;
                return NULL;
        }
        }
        mark_buffer_dirty(bh, 1);
        mark_buffer_dirty(bh, 1);
        j += i*8192;
        j += i*8192;
        if (!j || j >= inode->i_sb->u.minix_sb.s_ninodes) {
        if (!j || j >= inode->i_sb->u.minix_sb.s_ninodes) {
                iput(inode);
                iput(inode);
                return NULL;
                return NULL;
        }
        }
        inode->i_count = 1;
        inode->i_count = 1;
        inode->i_nlink = 1;
        inode->i_nlink = 1;
        inode->i_dev = sb->s_dev;
        inode->i_dev = sb->s_dev;
        inode->i_uid = current->fsuid;
        inode->i_uid = current->fsuid;
        inode->i_gid = (dir->i_mode & S_ISGID) ? dir->i_gid : current->fsgid;
        inode->i_gid = (dir->i_mode & S_ISGID) ? dir->i_gid : current->fsgid;
        inode->i_dirt = 1;
        inode->i_dirt = 1;
        inode->i_ino = j;
        inode->i_ino = j;
        inode->i_mtime = inode->i_atime = inode->i_ctime = CURRENT_TIME;
        inode->i_mtime = inode->i_atime = inode->i_ctime = CURRENT_TIME;
        inode->i_op = NULL;
        inode->i_op = NULL;
        inode->i_blocks = inode->i_blksize = 0;
        inode->i_blocks = inode->i_blksize = 0;
        insert_inode_hash(inode);
        insert_inode_hash(inode);
        return inode;
        return inode;
}
}
 
 
unsigned long minix_count_free_inodes(struct super_block *sb)
unsigned long minix_count_free_inodes(struct super_block *sb)
{
{
        return count_free(sb->u.minix_sb.s_imap,sb->u.minix_sb.s_imap_blocks);
        return count_free(sb->u.minix_sb.s_imap,sb->u.minix_sb.s_imap_blocks);
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.