/*
* linux/fs/sysv/inode.c
*
* minix/inode.c
* Copyright (C) 1991, 1992 Linus Torvalds
*
* xenix/inode.c
* Copyright (C) 1992 Doug Evans
*
* coh/inode.c
* Copyright (C) 1993 Pascal Haible, Bruno Haible
*
* sysv/inode.c
* Copyright (C) 1993 Paul B. Monday
*
* sysv/inode.c
* Copyright (C) 1993 Bruno Haible
*
* This file contains code for allocating/freeing inodes and for read/writing
* the superblock.
*/
#include <linux/module.h>
#include <linux/sched.h>
#include <linux/kernel.h>
#include <linux/fs.h>
#include <linux/sysv_fs.h>
#include <linux/stat.h>
#include <linux/string.h>
#include <linux/locks.h>
#include <asm/segment.h>
void sysv_put_inode(struct inode *inode)
{
if (inode->i_nlink)
return;
inode->i_size = 0;
sysv_truncate(inode);
sysv_free_inode(inode);
}
static struct super_operations sysv_sops = {
sysv_read_inode,
sysv_notify_change,
sysv_write_inode,
sysv_put_inode,
sysv_put_super,
sysv_write_super,
sysv_statfs,
NULL
};
/* The following functions try to recognize specific filesystems.
* We recognize:
* - Xenix FS by its magic number.
* - SystemV FS by its magic number.
* - Coherent FS by its funny fname/fpack field.
* We discriminate among SystemV4 and SystemV2 FS by the assumption that
* the time stamp is not < 01-01-1980.
*/
static void detected_bs512 (struct super_block *sb)
{
sb->sv_block_size = 512;
sb->sv_block_size_1 = 512-1;
sb->sv_block_size_bits = 9;
sb->sv_block_size_ratio = 2;
sb->sv_block_size_ratio_bits = 1;
sb->sv_inodes_per_block = 512/64;
sb->sv_inodes_per_block_1 = 512/64-1;
sb->sv_inodes_per_block_bits = 9-6;
sb->sv_toobig_block = 10 +
(sb->sv_ind_per_block = 512/4) +
(sb->sv_ind_per_block_2 = (512/4)*(512/4)) +
(sb->sv_ind_per_block_3 = (512/4)*(512/4)*(512/4));
sb->sv_ind_per_block_1 = 512/4-1;
sb->sv_ind_per_block_2_1 = (512/4)*(512/4)-1;
sb->sv_ind_per_block_2_bits = 2 *
(sb->sv_ind_per_block_bits = 9-2);
sb->sv_ind_per_block_block_size_1 = (512/4)*512-1;
sb->sv_ind_per_block_block_size_bits = (9-2)+9;
sb->sv_ind_per_block_2_block_size_1 = (512/4)*(512/4)*512-1;
sb->sv_ind_per_block_2_block_size_bits = (9-2)+(9-2)+9;
sb->sv_ind0_size = 10 * 512;
sb->sv_ind1_size = (10 + (512/4))* 512;
sb->sv_ind2_size = (10 + (512/4) + (512/4)*(512/4)) * 512;
}
static void detected_bs1024 (struct super_block *sb)
{
sb->sv_block_size = 1024;
sb->sv_block_size_1 = 1024-1;
sb->sv_block_size_bits = 10;
sb->sv_block_size_ratio = 1;
sb->sv_block_size_ratio_bits = 0;
sb->sv_inodes_per_block = 1024/64;
sb->sv_inodes_per_block_1 = 1024/64-1;
sb->sv_inodes_per_block_bits = 10-6;
sb->sv_toobig_block = 10 +
(sb->sv_ind_per_block = 1024/4) +
(sb->sv_ind_per_block_2 = (1024/4)*(1024/4)) +
(sb->sv_ind_per_block_3 = (1024/4)*(1024/4)*(1024/4));
sb->sv_ind_per_block_1 = 1024/4-1;
sb->sv_ind_per_block_2_1 = (1024/4)*(1024/4)-1;
sb->sv_ind_per_block_2_bits = 2 *
(sb->sv_ind_per_block_bits = 10-2);
sb->sv_ind_per_block_block_size_1 = (1024/4)*1024-1;
sb->sv_ind_per_block_block_size_bits = (10-2)+10;
sb->sv_ind_per_block_2_block_size_1 = (1024/4)*(1024/4)*1024-1;
sb->sv_ind_per_block_2_block_size_bits = (10-2)+(10-2)+10;
sb->sv_ind0_size = 10 * 1024;
sb->sv_ind1_size = (10 + (1024/4))* 1024;
sb->sv_ind2_size = (10 + (1024/4) + (1024/4)*(1024/4)) * 1024;
}
static const char* detect_xenix (struct super_block *sb, struct buffer_head *bh)
{
struct xenix_super_block * sbd;
sbd = (struct xenix_super_block *) bh->b_data;
if (sbd->s_magic != 0x2b5544)
return NULL;
switch (sbd->s_type) {
case 1: detected_bs512(sb); break;
case 2: detected_bs1024(sb); break;
default: return NULL;
}
sb->sv_type = FSTYPE_XENIX;
return "Xenix";
}
static struct super_block * detected_xenix (struct super_block *sb, struct buffer_head *bh1, struct buffer_head *bh2)
{
struct xenix_super_block * sbd1;
struct xenix_super_block * sbd2;
if (sb->sv_block_size == BLOCK_SIZE)
/* block size = 1024, so bh1 = bh2 */
sbd1 = sbd2 = (struct xenix_super_block *) bh1->b_data;
else {
/* block size = 512, so bh1 != bh2 */
sbd1 = (struct xenix_super_block *) bh1->b_data;
sbd2 = (struct xenix_super_block *) (bh2->b_data - BLOCK_SIZE/2);
/* sanity check */
if (sbd2->s_magic != 0x2b5544)
return NULL;
}
sb->sv_convert = 0;
sb->sv_kludge_symlinks = 1;
sb->sv_truncate = 1;
sb->sv_link_max = XENIX_LINK_MAX;
sb->sv_fic_size = XENIX_NICINOD;
sb->sv_flc_size = XENIX_NICFREE;
sb->sv_bh1 = bh1;
sb->sv_bh2 = bh2;
sb->sv_sbd1 = (char *) sbd1;
sb->sv_sbd2 = (char *) sbd2;
sb->sv_sb_fic_count = &sbd1->s_ninode;
sb->sv_sb_fic_inodes = &sbd1->s_inode[0];
sb->sv_sb_total_free_inodes = &sbd2->s_tinode;
sb->sv_sb_flc_count = &sbd1->s_nfree;
sb->sv_sb_flc_blocks = &sbd1->s_free[0];
sb->sv_sb_total_free_blocks = &sbd2->s_tfree;
sb->sv_sb_time = &sbd2->s_time;
sb->sv_block_base = 0;
sb->sv_firstinodezone = 2;
sb->sv_firstdatazone = sbd1->s_isize;
sb->sv_nzones = sbd1->s_fsize;
sb->sv_ndatazones = sb->sv_nzones - sb->sv_firstdatazone;
return sb;
}
static const char* detect_sysv4 (struct super_block *sb, struct buffer_head *bh)
{
struct sysv4_super_block * sbd;
sbd = (struct sysv4_super_block *) (bh->b_data + BLOCK_SIZE/2);
if (sbd->s_magic != 0xfd187e20)
return NULL;
if (sbd->s_time < 315532800) /* this is likely to happen on SystemV2 FS */
return NULL;
switch (sbd->s_type) {
case 1: detected_bs512(sb); break;
case 2: detected_bs1024(sb); break;
default: return NULL;
}
sb->sv_type = FSTYPE_SYSV4;
return "SystemV";
}
static struct super_block * detected_sysv4 (struct super_block *sb, struct buffer_head *bh)
{
struct sysv4_super_block * sbd;
if (sb->sv_block_size == BLOCK_SIZE)
sbd = (struct sysv4_super_block *) (bh->b_data + BLOCK_SIZE/2);
else {
sbd = (struct sysv4_super_block *) bh->b_data;
/* sanity check */
if (sbd->s_magic != 0xfd187e20)
return NULL;
if (sbd->s_time < 315532800)
return NULL;
}
sb->sv_convert = 0;
sb->sv_kludge_symlinks = 0; /* ?? */
sb->sv_truncate = 1;
sb->sv_link_max = SYSV_LINK_MAX;
sb->sv_fic_size = SYSV_NICINOD;
sb->sv_flc_size = SYSV_NICFREE;
sb->sv_bh1 = bh;
sb->sv_bh2 = bh;
sb->sv_sbd1 = (char *) sbd;
sb->sv_sbd2 = (char *) sbd;
sb->sv_sb_fic_count = &sbd->s_ninode;
sb->sv_sb_fic_inodes = &sbd->s_inode[0];
sb->sv_sb_total_free_inodes = &sbd->s_tinode;
sb->sv_sb_flc_count = &sbd->s_nfree;
sb->sv_sb_flc_blocks = &sbd->s_free[0];
sb->sv_sb_total_free_blocks = &sbd->s_tfree;
sb->sv_sb_time = &sbd->s_time;
sb->sv_sb_state = &sbd->s_state;
sb->sv_block_base = 0;
sb->sv_firstinodezone = 2;
sb->sv_firstdatazone = sbd->s_isize;
sb->sv_nzones = sbd->s_fsize;
sb->sv_ndatazones = sb->sv_nzones - sb->sv_firstdatazone;
return sb;
}
static const char* detect_sysv2 (struct super_block *sb, struct buffer_head *bh)
{
struct sysv2_super_block * sbd;
sbd = (struct sysv2_super_block *) (bh->b_data + BLOCK_SIZE/2);
if (sbd->s_magic != 0xfd187e20)
return NULL;
if (sbd->s_time < 315532800) /* this is likely to happen on SystemV4 FS */
return NULL;
switch (sbd->s_type) {
case 1: detected_bs512(sb); break;
case 2: detected_bs1024(sb); break;
default: return NULL;
}
sb->sv_type = FSTYPE_SYSV2;
return "SystemV Release 2";
}
static struct super_block * detected_sysv2 (struct super_block *sb, struct buffer_head *bh)
{
struct sysv2_super_block * sbd;
if (sb->sv_block_size == BLOCK_SIZE)
sbd = (struct sysv2_super_block *) (bh->b_data + BLOCK_SIZE/2);
else {
sbd = (struct sysv2_super_block *) bh->b_data;
/* sanity check */
if (sbd->s_magic != 0xfd187e20)
return NULL;
if (sbd->s_time < 315532800)
return NULL;
}
sb->sv_convert = 0;
sb->sv_kludge_symlinks = 0; /* ?? */
sb->sv_truncate = 1;
sb->sv_link_max = SYSV_LINK_MAX;
sb->sv_fic_size = SYSV_NICINOD;
sb->sv_flc_size = SYSV_NICFREE;
sb->sv_bh1 = bh;
sb->sv_bh2 = bh;
sb->sv_sbd1 = (char *) sbd;
sb->sv_sbd2 = (char *) sbd;
sb->sv_sb_fic_count = &sbd->s_ninode;
sb->sv_sb_fic_inodes = &sbd->s_inode[0];
sb->sv_sb_total_free_inodes = &sbd->s_tinode;
sb->sv_sb_flc_count = &sbd->s_nfree;
sb->sv_sb_flc_blocks = &sbd->s_free[0];
sb->sv_sb_total_free_blocks = &sbd->s_tfree;
sb->sv_sb_time = &sbd->s_time;
sb->sv_sb_state = &sbd->s_state;
sb->sv_block_base = 0;
sb->sv_firstinodezone = 2;
sb->sv_firstdatazone = sbd->s_isize;
sb->sv_nzones = sbd->s_fsize;
sb->sv_ndatazones = sb->sv_nzones - sb->sv_firstdatazone;
return sb;
}
static const char* detect_coherent (struct super_block *sb, struct buffer_head *bh)
{
struct coh_super_block * sbd;
sbd = (struct coh_super_block *) (bh->b_data + BLOCK_SIZE/2);
if ((memcmp(sbd->s_fname,"noname",6) && memcmp(sbd->s_fname,"xxxxx ",6))
|| (memcmp(sbd->s_fpack,"nopack",6) && memcmp(sbd->s_fpack,"xxxxx\n",6)))
return NULL;
detected_bs512(sb);
sb->sv_type = FSTYPE_COH;
return "Coherent";
}
static struct super_block * detected_coherent (struct super_block *sb, struct buffer_head *bh)
{
struct coh_super_block * sbd;
sbd = (struct coh_super_block *) bh->b_data;
/* sanity check */
if ((memcmp(sbd->s_fname,"noname",6) && memcmp(sbd->s_fname,"xxxxx ",6))
|| (memcmp(sbd->s_fpack,"nopack",6) && memcmp(sbd->s_fpack,"xxxxx\n",6)))
return NULL;
sb->sv_convert = 1;
sb->sv_kludge_symlinks = 1;
sb->sv_truncate = 1;
sb->sv_link_max = COH_LINK_MAX;
sb->sv_fic_size = COH_NICINOD;
sb->sv_flc_size = COH_NICFREE;
sb->sv_bh1 = bh;
sb->sv_bh2 = bh;
sb->sv_sbd1 = (char *) sbd;
sb->sv_sbd2 = (char *) sbd;
sb->sv_sb_fic_count = &sbd->s_ninode;
sb->sv_sb_fic_inodes = &sbd->s_inode[0];
sb->sv_sb_total_free_inodes = &sbd->s_tinode;
sb->sv_sb_flc_count = &sbd->s_nfree;
sb->sv_sb_flc_blocks = &sbd->s_free[0];
sb->sv_sb_total_free_blocks = &sbd->s_tfree;
sb->sv_sb_time = &sbd->s_time;
sb->sv_block_base = 0;
sb->sv_firstinodezone = 2;
sb->sv_firstdatazone = sbd->s_isize;
sb->sv_nzones = from_coh_ulong(sbd->s_fsize);
sb->sv_ndatazones = sb->sv_nzones - sb->sv_firstdatazone;
return sb;
}
struct super_block *sysv_read_super(struct super_block *sb,void *data,
int silent)
{
struct buffer_head *bh;
const char *found;
kdev_t dev = sb->s_dev;
if (1024 != sizeof (struct xenix_super_block))
panic("Xenix FS: bad super-block size");
if ((512 != sizeof (struct sysv4_super_block))
|| (512 != sizeof (struct sysv2_super_block)))
panic("SystemV FS: bad super-block size");
if (500 != sizeof (struct coh_super_block))
panic("Coherent FS: bad super-block size");
if (64 != sizeof (struct sysv_inode))
panic("sysv fs: bad i-node size");
MOD_INC_USE_COUNT;
lock_super(sb);
set_blocksize(dev,BLOCK_SIZE);
/* Try to read Xenix superblock */
if ((bh = bread(dev, 1, BLOCK_SIZE)) != NULL) {
if ((found = detect_xenix(sb,bh)) != NULL)
goto ok;
brelse(bh);
}
if ((bh = bread(dev, 0, BLOCK_SIZE)) != NULL) {
/* Try to recognize SystemV superblock */
if ((found = detect_sysv4(sb,bh)) != NULL)
goto ok;
if ((found = detect_sysv2(sb,bh)) != NULL)
goto ok;
/* Try to recognize Coherent superblock */
if ((found = detect_coherent(sb,bh)) != NULL)
goto ok;
brelse(bh);
}
/* Try to recognize SystemV superblock */
/* Offset by 1 track, i.e. most probably 9, 15, or 18 kilobytes. */
{ static int offsets[] = { 9, 15, 18, };
int i;
for (i = 0; i < sizeof(offsets)/sizeof(offsets[0]); i++)
if ((bh = bread(dev, offsets[i], BLOCK_SIZE)) != NULL) {
/* Try to recognize SystemV superblock */
if ((found = detect_sysv4(sb,bh)) != NULL) {
sb->sv_block_base = offsets[i] << sb->sv_block_size_ratio_bits;
goto ok;
}
if ((found = detect_sysv2(sb,bh)) != NULL) {
sb->sv_block_base = offsets[i] << sb->sv_block_size_ratio_bits;
goto ok;
}
brelse(bh);
}
}
sb->s_dev = 0;
unlock_super(sb);
if (!silent)
printk("VFS: unable to read Xenix/SystemV/Coherent superblock on device "
"%s\n", kdevname(dev));
failed:
MOD_DEC_USE_COUNT;
return NULL;
ok:
if (sb->sv_block_size == BLOCK_SIZE) {
switch (sb->sv_type) {
case FSTYPE_XENIX:
if (!detected_xenix(sb,bh,bh))
goto bad_superblock;
break;
case FSTYPE_SYSV4:
if (!detected_sysv4(sb,bh))
goto bad_superblock;
break;
case FSTYPE_SYSV2:
if (!detected_sysv2(sb,bh))
goto bad_superblock;
break;
default:
bad_superblock:
brelse(bh);
sb->s_dev = 0;
unlock_super(sb);
printk("SysV FS: cannot read superblock in 1024 byte mode\n");
goto failed;
}
} else {
/* Switch to another block size. Unfortunately, we have to
release the 1 KB block bh and read it in two parts again. */
struct buffer_head *bh1, *bh2;
unsigned long blocknr = bh->b_blocknr << sb->sv_block_size_ratio_bits;
brelse(bh);
set_blocksize(dev,sb->sv_block_size);
bh1 = NULL; bh2 = NULL;
switch (sb->sv_type) {
case FSTYPE_XENIX:
if ((bh1 = bread(dev, blocknr, sb->sv_block_size)) == NULL)
goto bad_superblock2;
if ((bh2 = bread(dev, blocknr+1, sb->sv_block_size)) == NULL)
goto bad_superblock2;
if (!detected_xenix(sb,bh1,bh2))
goto bad_superblock2;
break;
case FSTYPE_SYSV4:
if ((bh2 = bread(dev, blocknr+1, sb->sv_block_size)) == NULL)
goto bad_superblock2;
if (!detected_sysv4(sb,bh2))
goto bad_superblock2;
break;
case FSTYPE_SYSV2:
if ((bh2 = bread(dev, blocknr+1, sb->sv_block_size)) == NULL)
goto bad_superblock2;
if (!detected_sysv2(sb,bh2))
goto bad_superblock2;
break;
case FSTYPE_COH:
if ((bh2 = bread(dev, blocknr+1, sb->sv_block_size)) == NULL)
goto bad_superblock2;
if (!detected_coherent(sb,bh2))
goto bad_superblock2;
break;
default:
bad_superblock2:
brelse(bh1);
brelse(bh2);
set_blocksize(sb->s_dev,BLOCK_SIZE);
sb->s_dev = 0;
unlock_super(sb);
printk("SysV FS: cannot read superblock in 512 byte mode\n");
goto failed;
}
}
sb->sv_ninodes = (sb->sv_firstdatazone - sb->sv_firstinodezone) << sb->sv_inodes_per_block_bits;
if (!silent)
printk("VFS: Found a %s FS (block size = %d) on device %s\n",
found, sb->sv_block_size, kdevname(dev));
sb->s_magic = SYSV_MAGIC_BASE + sb->sv_type;
/* The buffer code now supports block size 512 as well as 1024. */
sb->s_blocksize = sb->sv_block_size;
sb->s_blocksize_bits = sb->sv_block_size_bits;
/* set up enough so that it can read an inode */
sb->s_dev = dev;
sb->s_op = &sysv_sops;
sb->s_mounted = iget(sb,SYSV_ROOT_INO);
unlock_super(sb);
if (!sb->s_mounted) {
printk("SysV FS: get root inode failed\n");
sysv_put_super(sb);
return NULL;
}
sb->s_dirt = 1;
/* brelse(bh); resp. brelse(bh1); brelse(bh2);
occurs when the disk is unmounted. */
return sb;
}
/* This is only called on sync() and umount(), when s_dirt=1. */
void sysv_write_super (struct super_block *sb)
{
lock_super(sb);
if (buffer_dirty(sb->sv_bh1) || buffer_dirty(sb->sv_bh2)) {
/* If we are going to write out the super block,
then attach current time stamp.
But if the filesystem was marked clean, keep it clean. */
unsigned long time = CURRENT_TIME;
unsigned long old_time = *sb->sv_sb_time;
if (sb->sv_convert)
old_time = from_coh_ulong(old_time);
if (sb->sv_type == FSTYPE_SYSV4)
if (*sb->sv_sb_state == 0x7c269d38 - old_time)
*sb->sv_sb_state = 0x7c269d38 - time;
if (sb->sv_convert)
time = to_coh_ulong(time);
*sb->sv_sb_time = time;
mark_buffer_dirty(sb->sv_bh2, 1);
}
sb->s_dirt = 0;
unlock_super(sb);
}
void sysv_put_super(struct super_block *sb)
{
/* we can assume sysv_write_super() has already been called */
lock_super(sb);
brelse(sb->sv_bh1);
if (sb->sv_bh1 != sb->sv_bh2) brelse(sb->sv_bh2);
/* switch back to default block size */
if (sb->s_blocksize != BLOCK_SIZE)
set_blocksize(sb->s_dev,BLOCK_SIZE);
sb->s_dev = 0;
unlock_super(sb);
MOD_DEC_USE_COUNT;
}
void sysv_statfs(struct super_block *sb, struct statfs *buf, int bufsiz)
{
struct statfs tmp;
tmp.f_type = sb->s_magic; /* type of filesystem */
tmp.f_bsize = sb->sv_block_size; /* block size */
tmp.f_blocks = sb->sv_ndatazones; /* total data blocks in file system */
tmp.f_bfree = sysv_count_free_blocks(sb); /* free blocks in fs */
tmp.f_bavail = tmp.f_bfree; /* free blocks available to non-superuser */
tmp.f_files = sb->sv_ninodes; /* total file nodes in file system */
tmp.f_ffree = sysv_count_free_inodes(sb); /* free file nodes in fs */
tmp.f_namelen = SYSV_NAMELEN;
/* Don't know what value to put in tmp.f_fsid */ /* file system id */
memcpy_tofs(buf, &tmp, bufsiz);
}
/* bmap support for running executables and shared libraries. */
static inline int inode_bmap(struct super_block * sb, struct inode * inode, int nr)
{
int tmp = inode->u.sysv_i.i_data[nr];
if (!tmp)
return 0;
return tmp + sb->sv_block_base;
}
static int block_bmap(struct super_block * sb, struct buffer_head * bh, int nr, int convert)
{
int tmp;
if (!bh)
return 0;
tmp = ((sysv_zone_t *) bh->b_data) [nr];
if (convert)
tmp = from_coh_ulong(tmp);
brelse(bh);
if (!tmp)
return 0;
return tmp + sb->sv_block_base;
}
int sysv_bmap(struct inode * inode,int block_nr)
{
unsigned int block = block_nr;
struct super_block * sb = inode->i_sb;
int convert;
int i;
struct buffer_head * bh;
if (block < 10)
return inode_bmap(sb,inode,block);
block -= 10;
convert = sb->sv_convert;
if (block < sb->sv_ind_per_block) {
i = inode_bmap(sb,inode,10);
if (!i)
return 0;
bh = bread(inode->i_dev,i,sb->sv_block_size);
return block_bmap(sb, bh, block, convert);
}
block -= sb->sv_ind_per_block;
if (block < sb->sv_ind_per_block_2) {
i = inode_bmap(sb,inode,11);
if (!i)
return 0;
bh = bread(inode->i_dev,i,sb->sv_block_size);
i = block_bmap(sb, bh, block >> sb->sv_ind_per_block_bits, convert);
if (!i)
return 0;
bh = bread(inode->i_dev,i,sb->sv_block_size);
return block_bmap(sb, bh, block & sb->sv_ind_per_block_1, convert);
}
block -= sb->sv_ind_per_block_2;
if (block < sb->sv_ind_per_block_3) {
i = inode_bmap(sb,inode,12);
if (!i)
return 0;
bh = bread(inode->i_dev,i,sb->sv_block_size);
i = block_bmap(sb, bh, block >> sb->sv_ind_per_block_2_bits, convert);
if (!i)
return 0;
bh = bread(inode->i_dev,i,sb->sv_block_size);
i = block_bmap(sb, bh, (block >> sb->sv_ind_per_block_bits) & sb->sv_ind_per_block_1,convert);
if (!i)
return 0;
bh = bread(inode->i_dev,i,sb->sv_block_size);
return block_bmap(sb, bh, block & sb->sv_ind_per_block_1, convert);
}
if ((int)block<0) {
printk("sysv_bmap: block<0");
return 0;
}
printk("sysv_bmap: block>big");
return 0;
}
/* End of bmap support. */
/* Access selected blocks of regular files (or directories) */
static struct buffer_head * inode_getblk(struct inode * inode, int nr, int create)
{
struct super_block *sb;
unsigned long tmp;
unsigned long *p;
struct buffer_head * result;
sb = inode->i_sb;
p = inode->u.sysv_i.i_data + nr;
repeat:
tmp = *p;
if (tmp) {
result = sv_getblk(sb, inode->i_dev, tmp);
if (tmp == *p)
return result;
brelse(result);
goto repeat;
}
if (!create)
return NULL;
tmp = sysv_new_block(sb);
if (!tmp)
return NULL;
result = sv_getblk(sb, inode->i_dev, tmp);
if (*p) {
sysv_free_block(sb,tmp);
brelse(result);
goto repeat;
}
*p = tmp;
inode->i_ctime = CURRENT_TIME;
inode->i_dirt = 1;
return result;
}
static struct buffer_head * block_getblk(struct inode * inode,
struct buffer_head * bh, int nr, int create)
{
struct super_block *sb;
unsigned long tmp, block;
sysv_zone_t *p;
struct buffer_head * result;
if (!bh)
return NULL;
if (!buffer_uptodate(bh)) {
ll_rw_block(READ, 1, &bh);
wait_on_buffer(bh);
if (!buffer_uptodate(bh)) {
brelse(bh);
return NULL;
}
}
sb = inode->i_sb;
p = nr + (sysv_zone_t *) bh->b_data;
repeat:
block = tmp = *p;
if (sb->sv_convert)
block = from_coh_ulong(block);
if (tmp) {
result = sv_getblk(sb, bh->b_dev, block);
if (tmp == *p) {
brelse(bh);
return result;
}
brelse(result);
goto repeat;
}
if (!create) {
brelse(bh);
return NULL;
}
block = sysv_new_block(sb);
if (!block) {
brelse(bh);
return NULL;
}
result = sv_getblk(sb, bh->b_dev, block);
if (*p) {
sysv_free_block(sb,block);
brelse(result);
goto repeat;
}
*p = (sb->sv_convert ? to_coh_ulong(block) : block);
mark_buffer_dirty(bh, 1);
brelse(bh);
return result;
}
struct buffer_head * sysv_getblk(struct inode * inode, unsigned int block, int create)
{
struct super_block * sb = inode->i_sb;
struct buffer_head * bh;
if (block < 10)
return inode_getblk(inode,block,create);
block -= 10;
if (block < sb->sv_ind_per_block) {
bh = inode_getblk(inode,10,create);
return block_getblk(inode, bh, block, create);
}
block -= sb->sv_ind_per_block;
if (block < sb->sv_ind_per_block_2) {
bh = inode_getblk(inode,11,create);
bh = block_getblk(inode, bh, block >> sb->sv_ind_per_block_bits, create);
return block_getblk(inode, bh, block & sb->sv_ind_per_block_1, create);
}
block -= sb->sv_ind_per_block_2;
if (block < sb->sv_ind_per_block_3) {
bh = inode_getblk(inode,12,create);
bh = block_getblk(inode, bh, block >> sb->sv_ind_per_block_2_bits, create);
bh = block_getblk(inode, bh, (block >> sb->sv_ind_per_block_bits) & sb->sv_ind_per_block_1, create);
return block_getblk(inode, bh, block & sb->sv_ind_per_block_1, create);
}
if ((int)block<0) {
printk("sysv_getblk: block<0");
return NULL;
}
printk("sysv_getblk: block>big");
return NULL;
}
struct buffer_head * sysv_file_bread(struct inode * inode, int block, int create)
{
struct buffer_head * bh;
bh = sysv_getblk(inode,block,create);
if (!bh || buffer_uptodate(bh))
return bh;
ll_rw_block(READ, 1, &bh);
wait_on_buffer(bh);
if (buffer_uptodate(bh))
return bh;
brelse(bh);
return NULL;
}
static inline unsigned long read3byte (char * p)
{
return (unsigned long)(*(unsigned short *)p)
| (unsigned long)(*(unsigned char *)(p+2)) << 16;
}
static inline void write3byte (char * p, unsigned long val)
{
*(unsigned short *)p = (unsigned short) val;
*(unsigned char *)(p+2) = val >> 16;
}
static inline unsigned long coh_read3byte (char * p)
{
return (unsigned long)(*(unsigned char *)p) << 16
| (unsigned long)(*(unsigned short *)(p+1));
}
static inline void coh_write3byte (char * p, unsigned long val)
{
*(unsigned char *)p = val >> 16;
*(unsigned short *)(p+1) = (unsigned short) val;
}
void sysv_read_inode(struct inode * inode)
{
struct super_block * sb = inode->i_sb;
struct buffer_head * bh;
struct sysv_inode * raw_inode;
unsigned int block, ino;
umode_t mode;
ino = inode->i_ino;
inode->i_op = NULL;
inode->i_mode = 0;
if (!ino || ino > sb->sv_ninodes) {
printk("Bad inode number on dev %s"
": %d is out of range\n",
kdevname(inode->i_dev), ino);
return;
}
block = sb->sv_firstinodezone + ((ino-1) >> sb->sv_inodes_per_block_bits);
if (!(bh = sv_bread(sb,inode->i_dev,block))) {
printk("Major problem: unable to read inode from dev "
"%s\n",
kdevname(inode->i_dev));
return;
}
raw_inode = (struct sysv_inode *) bh->b_data + ((ino-1) & sb->sv_inodes_per_block_1);
mode = raw_inode->i_mode;
if (sb->sv_kludge_symlinks)
mode = from_coh_imode(mode);
/* SystemV FS: kludge permissions if ino==SYSV_ROOT_INO ?? */
inode->i_mode = mode;
inode->i_uid = raw_inode->i_uid;
inode->i_gid = raw_inode->i_gid;
inode->i_nlink = raw_inode->i_nlink;
if (sb->sv_convert) {
inode->i_size = from_coh_ulong(raw_inode->i_size);
inode->i_atime = from_coh_ulong(raw_inode->i_atime);
inode->i_mtime = from_coh_ulong(raw_inode->i_mtime);
inode->i_ctime = from_coh_ulong(raw_inode->i_ctime);
} else {
inode->i_size = raw_inode->i_size;
inode->i_atime = raw_inode->i_atime;
inode->i_mtime = raw_inode->i_mtime;
inode->i_ctime = raw_inode->i_ctime;
}
inode->i_blocks = inode->i_blksize = 0;
if (S_ISCHR(inode->i_mode) || S_ISBLK(inode->i_mode))
inode->i_rdev = to_kdev_t(raw_inode->i_a.i_rdev);
else
if (sb->sv_convert)
for (block = 0; block < 10+1+1+1; block++)
inode->u.sysv_i.i_data[block] =
coh_read3byte(&raw_inode->i_a.i_addb[3*block]);
else
for (block = 0; block < 10+1+1+1; block++)
inode->u.sysv_i.i_data[block] =
read3byte(&raw_inode->i_a.i_addb[3*block]);
brelse(bh);
if (S_ISREG(inode->i_mode))
inode->i_op = &sysv_file_inode_operations;
else if (S_ISDIR(inode->i_mode))
inode->i_op = &sysv_dir_inode_operations;
else if (S_ISLNK(inode->i_mode))
inode->i_op = &sysv_symlink_inode_operations;
else if (S_ISCHR(inode->i_mode))
inode->i_op = &chrdev_inode_operations;
else if (S_ISBLK(inode->i_mode))
inode->i_op = &blkdev_inode_operations;
else if (S_ISFIFO(inode->i_mode))
init_fifo(inode);
}
/* To avoid inconsistencies between inodes in memory and inodes on disk. */
extern int sysv_notify_change(struct inode *inode, struct iattr *attr)
{
int error;
if ((error = inode_change_ok(inode, attr)) != 0)
return error;
if (attr->ia_valid & ATTR_MODE)
if (inode->i_sb->sv_kludge_symlinks)
if (attr->ia_mode == COH_KLUDGE_SYMLINK_MODE)
attr->ia_mode = COH_KLUDGE_NOT_SYMLINK;
inode_setattr(inode, attr);
return 0;
}
static struct buffer_head * sysv_update_inode(struct inode * inode)
{
struct super_block * sb = inode->i_sb;
struct buffer_head * bh;
struct sysv_inode * raw_inode;
unsigned int ino, block;
umode_t mode;
ino = inode->i_ino;
if (!ino || ino > sb->sv_ninodes) {
printk("Bad inode number on dev %s"
": %d is out of range\n",
kdevname(inode->i_dev), ino);
inode->i_dirt = 0;
return 0;
}
block = sb->sv_firstinodezone + ((ino-1) >> sb->sv_inodes_per_block_bits);
if (!(bh = sv_bread(sb,inode->i_dev,block))) {
printk("unable to read i-node block\n");
inode->i_dirt = 0;
return 0;
}
raw_inode = (struct sysv_inode *) bh->b_data + ((ino-1) & sb->sv_inodes_per_block_1);
mode = inode->i_mode;
if (sb->sv_kludge_symlinks)
mode = to_coh_imode(mode);
raw_inode->i_mode = mode;
raw_inode->i_uid = inode->i_uid;
raw_inode->i_gid = inode->i_gid;
raw_inode->i_nlink = inode->i_nlink;
if (sb->sv_convert) {
raw_inode->i_size = to_coh_ulong(inode->i_size);
raw_inode->i_atime = to_coh_ulong(inode->i_atime);
raw_inode->i_mtime = to_coh_ulong(inode->i_mtime);
raw_inode->i_ctime = to_coh_ulong(inode->i_ctime);
} else {
raw_inode->i_size = inode->i_size;
raw_inode->i_atime = inode->i_atime;
raw_inode->i_mtime = inode->i_mtime;
raw_inode->i_ctime = inode->i_ctime;
}
if (S_ISCHR(inode->i_mode) || S_ISBLK(inode->i_mode))
raw_inode->i_a.i_rdev = kdev_t_to_nr(inode->i_rdev); /* write 2 or 3 bytes ?? */
else
if (sb->sv_convert)
for (block = 0; block < 10+1+1+1; block++)
coh_write3byte(&raw_inode->i_a.i_addb[3*block],inode->u.sysv_i.i_data[block]);
else
for (block = 0; block < 10+1+1+1; block++)
write3byte(&raw_inode->i_a.i_addb[3*block],inode->u.sysv_i.i_data[block]);
inode->i_dirt=0;
mark_buffer_dirty(bh, 1);
return bh;
}
void sysv_write_inode(struct inode * inode)
{
struct buffer_head *bh;
bh = sysv_update_inode(inode);
brelse(bh);
}
int sysv_sync_inode(struct inode * inode)
{
int err = 0;
struct buffer_head *bh;
bh = sysv_update_inode(inode);
if (bh && buffer_dirty(bh)) {
ll_rw_block(WRITE, 1, &bh);
wait_on_buffer(bh);
if (buffer_req(bh) && !buffer_uptodate(bh))
{
printk ("IO error syncing sysv inode ["
"%s:%08lx]\n",
kdevname(inode->i_dev), inode->i_ino);
err = -1;
}
}
else if (!bh)
err = -1;
brelse (bh);
return err;
}
/* Every kernel module contains stuff like this. */
static struct file_system_type sysv_fs_type[3] = {
{sysv_read_super, "xenix", 1, NULL},
{sysv_read_super, "sysv", 1, NULL},
{sysv_read_super, "coherent", 1, NULL}
};
int init_sysv_fs(void)
{
int i;
int ouch;
for (i = 0; i < 3; i++) {
if ((ouch = register_filesystem(&sysv_fs_type[i])) != 0)
return ouch;
}
return ouch;
}
#ifdef MODULE
int init_module(void)
{
int status;
if ((status = init_sysv_fs()) == 0)
register_symtab(0);
return status;
}
void cleanup_module(void)
{
int i;
for (i = 0; i < 3; i++)
/* No error message if this breaks... that's OK... */
unregister_filesystem(&sysv_fs_type[i]);
}
#endif
