[linux.git] / fs / affs / amigaffs.c

// SPDX-License-Identifier: GPL-2.0
/*
 *  linux/fs/affs/amigaffs.c
 *
 *  (c) 1996  Hans-Joachim Widmaier - Rewritten
 *
 *  (C) 1993  Ray Burr - Amiga FFS filesystem.
 *
 *  Please send bug reports to: [email protected]
 */

#include <linux/math64.h>
#include <linux/iversion.h>
#include "affs.h"

/*
 * Functions for accessing Amiga-FFS structures.
 */


/* Insert a header block bh into the directory dir
 * caller must hold AFFS_DIR->i_hash_lock!
 */

int
affs_insert_hash(struct inode *dir, struct buffer_head *bh)
{
	struct super_block *sb = dir->i_sb;
	struct buffer_head *dir_bh;
	u32 ino, hash_ino;
	int offset;

	ino = bh->b_blocknr;
	offset = affs_hash_name(sb, AFFS_TAIL(sb, bh)->name + 1, AFFS_TAIL(sb, bh)->name[0]);

	pr_debug("%s(dir=%lu, ino=%d)\n", __func__, dir->i_ino, ino);

	dir_bh = affs_bread(sb, dir->i_ino);
	if (!dir_bh)
		return -EIO;

	hash_ino = be32_to_cpu(AFFS_HEAD(dir_bh)->table[offset]);
	while (hash_ino) {
		affs_brelse(dir_bh);
		dir_bh = affs_bread(sb, hash_ino);
		if (!dir_bh)
			return -EIO;
		hash_ino = be32_to_cpu(AFFS_TAIL(sb, dir_bh)->hash_chain);
	}
	AFFS_TAIL(sb, bh)->parent = cpu_to_be32(dir->i_ino);
	AFFS_TAIL(sb, bh)->hash_chain = 0;
	affs_fix_checksum(sb, bh);

	if (dir->i_ino == dir_bh->b_blocknr)
		AFFS_HEAD(dir_bh)->table[offset] = cpu_to_be32(ino);
	else
		AFFS_TAIL(sb, dir_bh)->hash_chain = cpu_to_be32(ino);

	affs_adjust_checksum(dir_bh, ino);
	mark_buffer_dirty_inode(dir_bh, dir);
	affs_brelse(dir_bh);

	dir->i_mtime = dir->i_ctime = current_time(dir);
	inode_inc_iversion(dir);
	mark_inode_dirty(dir);

	return 0;
}

/* Remove a header block from its directory.
 * caller must hold AFFS_DIR->i_hash_lock!
 */

int
affs_remove_hash(struct inode *dir, struct buffer_head *rem_bh)
{
	struct super_block *sb;
	struct buffer_head *bh;
	u32 rem_ino, hash_ino;
	__be32 ino;
	int offset, retval;

	sb = dir->i_sb;
	rem_ino = rem_bh->b_blocknr;
	offset = affs_hash_name(sb, AFFS_TAIL(sb, rem_bh)->name+1, AFFS_TAIL(sb, rem_bh)->name[0]);
	pr_debug("%s(dir=%lu, ino=%d, hashval=%d)\n", __func__, dir->i_ino,
		 rem_ino, offset);

	bh = affs_bread(sb, dir->i_ino);
	if (!bh)
		return -EIO;

	retval = -ENOENT;
	hash_ino = be32_to_cpu(AFFS_HEAD(bh)->table[offset]);
	while (hash_ino) {
		if (hash_ino == rem_ino) {
			ino = AFFS_TAIL(sb, rem_bh)->hash_chain;
			if (dir->i_ino == bh->b_blocknr)
				AFFS_HEAD(bh)->table[offset] = ino;
			else
				AFFS_TAIL(sb, bh)->hash_chain = ino;
			affs_adjust_checksum(bh, be32_to_cpu(ino) - hash_ino);
			mark_buffer_dirty_inode(bh, dir);
			AFFS_TAIL(sb, rem_bh)->parent = 0;
			retval = 0;
			break;
		}
		affs_brelse(bh);
		bh = affs_bread(sb, hash_ino);
		if (!bh)
			return -EIO;
		hash_ino = be32_to_cpu(AFFS_TAIL(sb, bh)->hash_chain);
	}

	affs_brelse(bh);

	dir->i_mtime = dir->i_ctime = current_time(dir);
	inode_inc_iversion(dir);
	mark_inode_dirty(dir);

	return retval;
}

static void
affs_fix_dcache(struct inode *inode, u32 entry_ino)
{
	struct dentry *dentry;
	spin_lock(&inode->i_lock);
	hlist_for_each_entry(dentry, &inode->i_dentry, d_u.d_alias) {
		if (entry_ino == (u32)(long)dentry->d_fsdata) {
			dentry->d_fsdata = (void *)inode->i_ino;
			break;
		}
	}
	spin_unlock(&inode->i_lock);
}


/* Remove header from link chain */

static int
affs_remove_link(struct dentry *dentry)
{
	struct inode *dir, *inode = d_inode(dentry);
	struct super_block *sb = inode->i_sb;
	struct buffer_head *bh, *link_bh = NULL;
	u32 link_ino, ino;
	int retval;

	pr_debug("%s(key=%ld)\n", __func__, inode->i_ino);
	retval = -EIO;
	bh = affs_bread(sb, inode->i_ino);
	if (!bh)
		goto done;

	link_ino = (u32)(long)dentry->d_fsdata;
	if (inode->i_ino == link_ino) {
		/* we can't remove the head of the link, as its blocknr is still used as ino,
		 * so we remove the block of the first link instead.
		 */ 
		link_ino = be32_to_cpu(AFFS_TAIL(sb, bh)->link_chain);
		link_bh = affs_bread(sb, link_ino);
		if (!link_bh)
			goto done;

		dir = affs_iget(sb, be32_to_cpu(AFFS_TAIL(sb, link_bh)->parent));
		if (IS_ERR(dir)) {
			retval = PTR_ERR(dir);
			goto done;
		}

		affs_lock_dir(dir);
		/*
		 * if there's a dentry for that block, make it
		 * refer to inode itself.
		 */
		affs_fix_dcache(inode, link_ino);
		retval = affs_remove_hash(dir, link_bh);
		if (retval) {
			affs_unlock_dir(dir);
			goto done;
		}
		mark_buffer_dirty_inode(link_bh, inode);

		memcpy(AFFS_TAIL(sb, bh)->name, AFFS_TAIL(sb, link_bh)->name, 32);
		retval = affs_insert_hash(dir, bh);
		if (retval) {
			affs_unlock_dir(dir);
			goto done;
		}
		mark_buffer_dirty_inode(bh, inode);

		affs_unlock_dir(dir);
		iput(dir);
	} else {
		link_bh = affs_bread(sb, link_ino);
		if (!link_bh)
			goto done;
	}

	while ((ino = be32_to_cpu(AFFS_TAIL(sb, bh)->link_chain)) != 0) {
		if (ino == link_ino) {
			__be32 ino2 = AFFS_TAIL(sb, link_bh)->link_chain;
			AFFS_TAIL(sb, bh)->link_chain = ino2;
			affs_adjust_checksum(bh, be32_to_cpu(ino2) - link_ino);
			mark_buffer_dirty_inode(bh, inode);
			retval = 0;
			/* Fix the link count, if bh is a normal header block without links */
			switch (be32_to_cpu(AFFS_TAIL(sb, bh)->stype)) {
			case ST_LINKDIR:
			case ST_LINKFILE:
				break;
			default:
				if (!AFFS_TAIL(sb, bh)->link_chain)
					set_nlink(inode, 1);
			}
			affs_free_block(sb, link_ino);
			goto done;
		}
		affs_brelse(bh);
		bh = affs_bread(sb, ino);
		if (!bh)
			goto done;
	}
	retval = -ENOENT;
done:
	affs_brelse(link_bh);
	affs_brelse(bh);
	return retval;
}


static int
affs_empty_dir(struct inode *inode)
{
	struct super_block *sb = inode->i_sb;
	struct buffer_head *bh;
	int retval, size;

	retval = -EIO;
	bh = affs_bread(sb, inode->i_ino);
	if (!bh)
		goto done;

	retval = -ENOTEMPTY;
	for (size = AFFS_SB(sb)->s_hashsize - 1; size >= 0; size--)
		if (AFFS_HEAD(bh)->table[size])
			goto not_empty;
	retval = 0;
not_empty:
	affs_brelse(bh);
done:
	return retval;
}


/* Remove a filesystem object. If the object to be removed has
 * links to it, one of the links must be changed to inherit
 * the file or directory. As above, any inode will do.
 * The buffer will not be freed. If the header is a link, the
 * block will be marked as free.
 * This function returns a negative error number in case of
 * an error, else 0 if the inode is to be deleted or 1 if not.
 */

int
affs_remove_header(struct dentry *dentry)
{
	struct super_block *sb;
	struct inode *inode, *dir;
	struct buffer_head *bh = NULL;
	int retval;

	dir = d_inode(dentry->d_parent);
	sb = dir->i_sb;

	retval = -ENOENT;
	inode = d_inode(dentry);
	if (!inode)
		goto done;

	pr_debug("%s(key=%ld)\n", __func__, inode->i_ino);
	retval = -EIO;
	bh = affs_bread(sb, (u32)(long)dentry->d_fsdata);
	if (!bh)
		goto done;

	affs_lock_link(inode);
	affs_lock_dir(dir);
	switch (be32_to_cpu(AFFS_TAIL(sb, bh)->stype)) {
	case ST_USERDIR:
		/* if we ever want to support links to dirs
		 * i_hash_lock of the inode must only be
		 * taken after some checks
		 */
		affs_lock_dir(inode);
		retval = affs_empty_dir(inode);
		affs_unlock_dir(inode);
		if (retval)
			goto done_unlock;
		break;
	default:
		break;
	}

	retval = affs_remove_hash(dir, bh);
	if (retval)
		goto done_unlock;
	mark_buffer_dirty_inode(bh, inode);

	affs_unlock_dir(dir);

	if (inode->i_nlink > 1)
		retval = affs_remove_link(dentry);
	else
		clear_nlink(inode);
	affs_unlock_link(inode);
	inode->i_ctime = current_time(inode);
	mark_inode_dirty(inode);

done:
	affs_brelse(bh);
	return retval;

done_unlock:
	affs_unlock_dir(dir);
	affs_unlock_link(inode);
	goto done;
}

/* Checksum a block, do various consistency checks and optionally return
   the blocks type number.  DATA points to the block.  If their pointers
   are non-null, *PTYPE and *STYPE are set to the primary and secondary
   block types respectively, *HASHSIZE is set to the size of the hashtable
   (which lets us calculate the block size).
   Returns non-zero if the block is not consistent. */

u32
affs_checksum_block(struct super_block *sb, struct buffer_head *bh)
{
	__be32 *ptr = (__be32 *)bh->b_data;
	u32 sum;
	int bsize;

	sum = 0;
	for (bsize = sb->s_blocksize / sizeof(__be32); bsize > 0; bsize--)
		sum += be32_to_cpu(*ptr++);
	return sum;
}

/*
 * Calculate the checksum of a disk block and store it
 * at the indicated position.
 */

void
affs_fix_checksum(struct super_block *sb, struct buffer_head *bh)
{
	int cnt = sb->s_blocksize / sizeof(__be32);
	__be32 *ptr = (__be32 *)bh->b_data;
	u32 checksum;
	__be32 *checksumptr;

	checksumptr = ptr + 5;
	*checksumptr = 0;
	for (checksum = 0; cnt > 0; ptr++, cnt--)
		checksum += be32_to_cpu(*ptr);
	*checksumptr = cpu_to_be32(-checksum);
}

void
affs_secs_to_datestamp(time64_t secs, struct affs_date *ds)
{
	u32	 days;
	u32	 minute;
	s32	 rem;

	secs -= sys_tz.tz_minuteswest * 60 + AFFS_EPOCH_DELTA;
	if (secs < 0)
		secs = 0;
	days    = div_s64_rem(secs, 86400, &rem);
	minute  = rem / 60;
	rem    -= minute * 60;

	ds->days = cpu_to_be32(days);
	ds->mins = cpu_to_be32(minute);
	ds->ticks = cpu_to_be32(rem * 50);
}

umode_t
affs_prot_to_mode(u32 prot)
{
	umode_t mode = 0;

	if (!(prot & FIBF_NOWRITE))
		mode |= 0200;
	if (!(prot & FIBF_NOREAD))
		mode |= 0400;
	if (!(prot & FIBF_NOEXECUTE))
		mode |= 0100;
	if (prot & FIBF_GRP_WRITE)
		mode |= 0020;
	if (prot & FIBF_GRP_READ)
		mode |= 0040;
	if (prot & FIBF_GRP_EXECUTE)
		mode |= 0010;
	if (prot & FIBF_OTR_WRITE)
		mode |= 0002;
	if (prot & FIBF_OTR_READ)
		mode |= 0004;
	if (prot & FIBF_OTR_EXECUTE)
		mode |= 0001;

	return mode;
}

void
affs_mode_to_prot(struct inode *inode)
{
	u32 prot = AFFS_I(inode)->i_protect;
	umode_t mode = inode->i_mode;

	/*
	 * First, clear all RWED bits for owner, group, other.
	 * Then, recalculate them afresh.
	 *
	 * We'll always clear the delete-inhibit bit for the owner, as that is
	 * the classic single-user mode AmigaOS protection bit and we need to
	 * stay compatible with all scenarios.
	 *
	 * Since multi-user AmigaOS is an extension, we'll only set the
	 * delete-allow bit if any of the other bits in the same user class
	 * (group/other) are used.
	 */
	prot &= ~(FIBF_NOEXECUTE | FIBF_NOREAD
		  | FIBF_NOWRITE | FIBF_NODELETE
		  | FIBF_GRP_EXECUTE | FIBF_GRP_READ
		  | FIBF_GRP_WRITE   | FIBF_GRP_DELETE
		  | FIBF_OTR_EXECUTE | FIBF_OTR_READ
		  | FIBF_OTR_WRITE   | FIBF_OTR_DELETE);

	/* Classic single-user AmigaOS flags. These are inverted. */
	if (!(mode & 0100))
		prot |= FIBF_NOEXECUTE;
	if (!(mode & 0400))
		prot |= FIBF_NOREAD;
	if (!(mode & 0200))
		prot |= FIBF_NOWRITE;

	/* Multi-user extended flags. Not inverted. */
	if (mode & 0010)
		prot |= FIBF_GRP_EXECUTE;
	if (mode & 0040)
		prot |= FIBF_GRP_READ;
	if (mode & 0020)
		prot |= FIBF_GRP_WRITE;
	if (mode & 0070)
		prot |= FIBF_GRP_DELETE;

	if (mode & 0001)
		prot |= FIBF_OTR_EXECUTE;
	if (mode & 0004)
		prot |= FIBF_OTR_READ;
	if (mode & 0002)
		prot |= FIBF_OTR_WRITE;
	if (mode & 0007)
		prot |= FIBF_OTR_DELETE;

	AFFS_I(inode)->i_protect = prot;
}

void
affs_error(struct super_block *sb, const char *function, const char *fmt, ...)
{
	struct va_format vaf;
	va_list args;

	va_start(args, fmt);
	vaf.fmt = fmt;
	vaf.va = &args;
	pr_crit("error (device %s): %s(): %pV\n", sb->s_id, function, &vaf);
	if (!sb_rdonly(sb))
		pr_warn("Remounting filesystem read-only\n");
	sb->s_flags |= SB_RDONLY;
	va_end(args);
}

void
affs_warning(struct super_block *sb, const char *function, const char *fmt, ...)
{
	struct va_format vaf;
	va_list args;

	va_start(args, fmt);
	vaf.fmt = fmt;
	vaf.va = &args;
	pr_warn("(device %s): %s(): %pV\n", sb->s_id, function, &vaf);
	va_end(args);
}

bool
affs_nofilenametruncate(const struct dentry *dentry)
{
	return affs_test_opt(AFFS_SB(dentry->d_sb)->s_flags, SF_NO_TRUNCATE);
}

/* Check if the name is valid for a affs object. */

int
affs_check_name(const unsigned char *name, int len, bool notruncate)
{
	int	 i;

	if (len > AFFSNAMEMAX) {
		if (notruncate)
			return -ENAMETOOLONG;
		len = AFFSNAMEMAX;
	}
	for (i = 0; i < len; i++) {
		if (name[i] < ' ' || name[i] == ':'
		    || (name[i] > 0x7e && name[i] < 0xa0))
			return -EINVAL;
	}

	return 0;
}

/* This function copies name to bstr, with at most 30
 * characters length. The bstr will be prepended by
 * a length byte.
 * NOTE: The name will must be already checked by
 *       affs_check_name()!
 */

int
affs_copy_name(unsigned char *bstr, struct dentry *dentry)
{
	u32 len = min(dentry->d_name.len, AFFSNAMEMAX);

	*bstr++ = len;
	memcpy(bstr, dentry->d_name.name, len);
	return len;
}
Commit	Line	Data
b2441318	1	// SPDX-License-Identifier: GPL-2.0
1da177e4 LT	2	/*
	3	* linux/fs/affs/amigaffs.c
	4	*
	5	* (c) 1996 Hans-Joachim Widmaier - Rewritten
	6	*
	7	* (C) 1993 Ray Burr - Amiga FFS filesystem.
	8	*
	9	* Please send bug reports to: [email protected]
	10	*/
	11
db39c167	12	#include <linux/math64.h>
9dffe569	13	#include <linux/iversion.h>
1da177e4 LT	14	#include "affs.h"
1da177e4 LT	15
1da177e4 LT	16	/*
	17	* Functions for accessing Amiga-FFS structures.
	18	*/
	19
	20
	21	/* Insert a header block bh into the directory dir
	22	* caller must hold AFFS_DIR->i_hash_lock!
	23	*/
	24
	25	int
	26	affs_insert_hash(struct inode dir, struct buffer_head bh)
	27	{
	28	struct super_block *sb = dir->i_sb;
	29	struct buffer_head *dir_bh;
	30	u32 ino, hash_ino;
	31	int offset;
	32
	33	ino = bh->b_blocknr;
	34	offset = affs_hash_name(sb, AFFS_TAIL(sb, bh)->name + 1, AFFS_TAIL(sb, bh)->name[0]);
	35
08fe100d	36	pr_debug("%s(dir=%lu, ino=%d)\n", __func__, dir->i_ino, ino);
1da177e4 LT	37
	38	dir_bh = affs_bread(sb, dir->i_ino);
	39	if (!dir_bh)
	40	return -EIO;
	41
	42	hash_ino = be32_to_cpu(AFFS_HEAD(dir_bh)->table[offset]);
	43	while (hash_ino) {
	44	affs_brelse(dir_bh);
	45	dir_bh = affs_bread(sb, hash_ino);
	46	if (!dir_bh)
	47	return -EIO;
	48	hash_ino = be32_to_cpu(AFFS_TAIL(sb, dir_bh)->hash_chain);
	49	}
	50	AFFS_TAIL(sb, bh)->parent = cpu_to_be32(dir->i_ino);
	51	AFFS_TAIL(sb, bh)->hash_chain = 0;
	52	affs_fix_checksum(sb, bh);
	53
	54	if (dir->i_ino == dir_bh->b_blocknr)
	55	AFFS_HEAD(dir_bh)->table[offset] = cpu_to_be32(ino);
	56	else
	57	AFFS_TAIL(sb, dir_bh)->hash_chain = cpu_to_be32(ino);
	58
	59	affs_adjust_checksum(dir_bh, ino);
	60	mark_buffer_dirty_inode(dir_bh, dir);
	61	affs_brelse(dir_bh);
	62
02027d42	63	dir->i_mtime = dir->i_ctime = current_time(dir);
9dffe569	64	inode_inc_iversion(dir);
1da177e4 LT	65	mark_inode_dirty(dir);
	66
	67	return 0;
	68	}
	69
	70	/* Remove a header block from its directory.
	71	* caller must hold AFFS_DIR->i_hash_lock!
	72	*/
	73
	74	int
	75	affs_remove_hash(struct inode dir, struct buffer_head rem_bh)
	76	{
	77	struct super_block *sb;
	78	struct buffer_head *bh;
	79	u32 rem_ino, hash_ino;
	80	__be32 ino;
	81	int offset, retval;
	82
	83	sb = dir->i_sb;
	84	rem_ino = rem_bh->b_blocknr;
	85	offset = affs_hash_name(sb, AFFS_TAIL(sb, rem_bh)->name+1, AFFS_TAIL(sb, rem_bh)->name[0]);
08fe100d GU	86	pr_debug("%s(dir=%lu, ino=%d, hashval=%d)\n", __func__, dir->i_ino,
08fe100d GU	87	rem_ino, offset);
1da177e4 LT	88
	89	bh = affs_bread(sb, dir->i_ino);
	90	if (!bh)
	91	return -EIO;
	92
	93	retval = -ENOENT;
	94	hash_ino = be32_to_cpu(AFFS_HEAD(bh)->table[offset]);
	95	while (hash_ino) {
	96	if (hash_ino == rem_ino) {
	97	ino = AFFS_TAIL(sb, rem_bh)->hash_chain;
	98	if (dir->i_ino == bh->b_blocknr)
	99	AFFS_HEAD(bh)->table[offset] = ino;
	100	else
	101	AFFS_TAIL(sb, bh)->hash_chain = ino;
	102	affs_adjust_checksum(bh, be32_to_cpu(ino) - hash_ino);
	103	mark_buffer_dirty_inode(bh, dir);
	104	AFFS_TAIL(sb, rem_bh)->parent = 0;
	105	retval = 0;
	106	break;
	107	}
	108	affs_brelse(bh);
	109	bh = affs_bread(sb, hash_ino);
	110	if (!bh)
	111	return -EIO;
	112	hash_ino = be32_to_cpu(AFFS_TAIL(sb, bh)->hash_chain);
	113	}
	114
	115	affs_brelse(bh);
	116
02027d42	117	dir->i_mtime = dir->i_ctime = current_time(dir);
9dffe569	118	inode_inc_iversion(dir);
1da177e4 LT	119	mark_inode_dirty(dir);
	120
	121	return retval;
	122	}
	123
	124	static void
12447c40	125	affs_fix_dcache(struct inode *inode, u32 entry_ino)
1da177e4	126	{
12447c40	127	struct dentry *dentry;
873feea0	128	spin_lock(&inode->i_lock);
946e51f2	129	hlist_for_each_entry(dentry, &inode->i_dentry, d_u.d_alias) {
1da177e4	130	if (entry_ino == (u32)(long)dentry->d_fsdata) {
12447c40	131	dentry->d_fsdata = (void *)inode->i_ino;
1da177e4 LT	132	break;
1da177e4 LT	133	}
1da177e4	134	}
873feea0	135	spin_unlock(&inode->i_lock);
1da177e4 LT	136	}
	137
	138
	139	/* Remove header from link chain */
	140
	141	static int
	142	affs_remove_link(struct dentry *dentry)
	143	{
2b0143b5	144	struct inode dir, inode = d_inode(dentry);
1da177e4	145	struct super_block *sb = inode->i_sb;
4709187e	146	struct buffer_head bh, link_bh = NULL;
1da177e4 LT	147	u32 link_ino, ino;
	148	int retval;
	149
9606d9aa	150	pr_debug("%s(key=%ld)\n", __func__, inode->i_ino);
1da177e4 LT	151	retval = -EIO;
	152	bh = affs_bread(sb, inode->i_ino);
	153	if (!bh)
	154	goto done;
	155
	156	link_ino = (u32)(long)dentry->d_fsdata;
	157	if (inode->i_ino == link_ino) {
	158	/* we can't remove the head of the link, as its blocknr is still used as ino,
	159	* so we remove the block of the first link instead.
	160	*/
	161	link_ino = be32_to_cpu(AFFS_TAIL(sb, bh)->link_chain);
	162	link_bh = affs_bread(sb, link_ino);
	163	if (!link_bh)
	164	goto done;
	165
210f8559 DH	166	dir = affs_iget(sb, be32_to_cpu(AFFS_TAIL(sb, link_bh)->parent));
	167	if (IS_ERR(dir)) {
	168	retval = PTR_ERR(dir);
1da177e4	169	goto done;
210f8559	170	}
1da177e4 LT	171
1da177e4 LT	172	affs_lock_dir(dir);
12447c40 AV	173	/*
	174	* if there's a dentry for that block, make it
	175	* refer to inode itself.
	176	*/
	177	affs_fix_dcache(inode, link_ino);
1da177e4	178	retval = affs_remove_hash(dir, link_bh);
ec1ab0ab CH	179	if (retval) {
ec1ab0ab CH	180	affs_unlock_dir(dir);
1da177e4	181	goto done;
ec1ab0ab	182	}
1da177e4 LT	183	mark_buffer_dirty_inode(link_bh, inode);
	184
	185	memcpy(AFFS_TAIL(sb, bh)->name, AFFS_TAIL(sb, link_bh)->name, 32);
	186	retval = affs_insert_hash(dir, bh);
ec1ab0ab CH	187	if (retval) {
ec1ab0ab CH	188	affs_unlock_dir(dir);
1da177e4	189	goto done;
ec1ab0ab	190	}
1da177e4 LT	191	mark_buffer_dirty_inode(bh, inode);
	192
	193	affs_unlock_dir(dir);
	194	iput(dir);
	195	} else {
	196	link_bh = affs_bread(sb, link_ino);
	197	if (!link_bh)
	198	goto done;
	199	}
	200
	201	while ((ino = be32_to_cpu(AFFS_TAIL(sb, bh)->link_chain)) != 0) {
	202	if (ino == link_ino) {
	203	__be32 ino2 = AFFS_TAIL(sb, link_bh)->link_chain;
	204	AFFS_TAIL(sb, bh)->link_chain = ino2;
	205	affs_adjust_checksum(bh, be32_to_cpu(ino2) - link_ino);
	206	mark_buffer_dirty_inode(bh, inode);
	207	retval = 0;
	208	/* Fix the link count, if bh is a normal header block without links */
	209	switch (be32_to_cpu(AFFS_TAIL(sb, bh)->stype)) {
	210	case ST_LINKDIR:
	211	case ST_LINKFILE:
	212	break;
	213	default:
	214	if (!AFFS_TAIL(sb, bh)->link_chain)
bfe86848	215	set_nlink(inode, 1);
1da177e4 LT	216	}
	217	affs_free_block(sb, link_ino);
	218	goto done;
	219	}
	220	affs_brelse(bh);
	221	bh = affs_bread(sb, ino);
	222	if (!bh)
	223	goto done;
	224	}
	225	retval = -ENOENT;
	226	done:
	227	affs_brelse(link_bh);
	228	affs_brelse(bh);
	229	return retval;
	230	}
	231
	232
	233	static int
	234	affs_empty_dir(struct inode *inode)
	235	{
	236	struct super_block *sb = inode->i_sb;
	237	struct buffer_head *bh;
	238	int retval, size;
	239
	240	retval = -EIO;
	241	bh = affs_bread(sb, inode->i_ino);
	242	if (!bh)
	243	goto done;
	244
	245	retval = -ENOTEMPTY;
	246	for (size = AFFS_SB(sb)->s_hashsize - 1; size >= 0; size--)
	247	if (AFFS_HEAD(bh)->table[size])
	248	goto not_empty;
	249	retval = 0;
	250	not_empty:
	251	affs_brelse(bh);
	252	done:
	253	return retval;
	254	}
	255
	256
	257	/* Remove a filesystem object. If the object to be removed has
	258	* links to it, one of the links must be changed to inherit
	259	* the file or directory. As above, any inode will do.
	260	* The buffer will not be freed. If the header is a link, the
	261	* block will be marked as free.
	262	* This function returns a negative error number in case of
	263	* an error, else 0 if the inode is to be deleted or 1 if not.
	264	*/
	265
	266	int
	267	affs_remove_header(struct dentry *dentry)
	268	{
	269	struct super_block *sb;
	270	struct inode inode, dir;
	271	struct buffer_head *bh = NULL;
	272	int retval;
	273
2b0143b5	274	dir = d_inode(dentry->d_parent);
1da177e4 LT	275	sb = dir->i_sb;
	276
	277	retval = -ENOENT;
2b0143b5	278	inode = d_inode(dentry);
1da177e4 LT	279	if (!inode)
	280	goto done;
	281
9606d9aa	282	pr_debug("%s(key=%ld)\n", __func__, inode->i_ino);
1da177e4 LT	283	retval = -EIO;
	284	bh = affs_bread(sb, (u32)(long)dentry->d_fsdata);
	285	if (!bh)
	286	goto done;
	287
	288	affs_lock_link(inode);
	289	affs_lock_dir(dir);
	290	switch (be32_to_cpu(AFFS_TAIL(sb, bh)->stype)) {
	291	case ST_USERDIR:
	292	/* if we ever want to support links to dirs
	293	* i_hash_lock of the inode must only be
	294	* taken after some checks
	295	*/
	296	affs_lock_dir(inode);
	297	retval = affs_empty_dir(inode);
	298	affs_unlock_dir(inode);
	299	if (retval)
	300	goto done_unlock;
	301	break;
	302	default:
	303	break;
	304	}
	305
	306	retval = affs_remove_hash(dir, bh);
	307	if (retval)
	308	goto done_unlock;
	309	mark_buffer_dirty_inode(bh, inode);
	310
	311	affs_unlock_dir(dir);
	312
	313	if (inode->i_nlink > 1)
	314	retval = affs_remove_link(dentry);
	315	else
6d6b77f1	316	clear_nlink(inode);
1da177e4	317	affs_unlock_link(inode);
02027d42	318	inode->i_ctime = current_time(inode);
1da177e4 LT	319	mark_inode_dirty(inode);
	320
	321	done:
	322	affs_brelse(bh);
	323	return retval;
	324
	325	done_unlock:
	326	affs_unlock_dir(dir);
	327	affs_unlock_link(inode);
	328	goto done;
	329	}
	330
	331	/* Checksum a block, do various consistency checks and optionally return
	332	the blocks type number. DATA points to the block. If their pointers
	333	are non-null, PTYPE and STYPE are set to the primary and secondary
	334	block types respectively, *HASHSIZE is set to the size of the hashtable
	335	(which lets us calculate the block size).
	336	Returns non-zero if the block is not consistent. */
	337
	338	u32
	339	affs_checksum_block(struct super_block sb, struct buffer_head bh)
	340	{
	341	__be32 ptr = (__be32 )bh->b_data;
	342	u32 sum;
	343	int bsize;
	344
	345	sum = 0;
	346	for (bsize = sb->s_blocksize / sizeof(__be32); bsize > 0; bsize--)
	347	sum += be32_to_cpu(*ptr++);
	348	return sum;
	349	}
	350
	351	/*
	352	* Calculate the checksum of a disk block and store it
	353	* at the indicated position.
	354	*/
	355
	356	void
	357	affs_fix_checksum(struct super_block sb, struct buffer_head bh)
	358	{
	359	int cnt = sb->s_blocksize / sizeof(__be32);
	360	__be32 ptr = (__be32 )bh->b_data;
	361	u32 checksum;
	362	__be32 *checksumptr;
	363
	364	checksumptr = ptr + 5;
	365	*checksumptr = 0;
	366	for (checksum = 0; cnt > 0; ptr++, cnt--)
	367	checksum += be32_to_cpu(*ptr);
	368	*checksumptr = cpu_to_be32(-checksum);
	369	}
	370
	371	void
c1618208	372	affs_secs_to_datestamp(time64_t secs, struct affs_date *ds)
1da177e4 LT	373	{
	374	u32 days;
	375	u32 minute;
db39c167	376	s32 rem;
1da177e4	377
487b25bc	378	secs -= sys_tz.tz_minuteswest * 60 + AFFS_EPOCH_DELTA;
1da177e4 LT	379	if (secs < 0)
1da177e4 LT	380	secs = 0;
db39c167 D	381	days = div_s64_rem(secs, 86400, &rem);
	382	minute = rem / 60;
	383	rem -= minute * 60;
1da177e4 LT	384
	385	ds->days = cpu_to_be32(days);
	386	ds->mins = cpu_to_be32(minute);
db39c167	387	ds->ticks = cpu_to_be32(rem * 50);
1da177e4 LT	388	}
1da177e4 LT	389
a760b03d	390	umode_t
c1618208	391	affs_prot_to_mode(u32 prot)
1da177e4	392	{
a760b03d	393	umode_t mode = 0;
1da177e4 LT	394
1da177e4 LT	395	if (!(prot & FIBF_NOWRITE))
1bafd6f1	396	mode \|= 0200;
1da177e4	397	if (!(prot & FIBF_NOREAD))
1bafd6f1	398	mode \|= 0400;
1da177e4	399	if (!(prot & FIBF_NOEXECUTE))
1bafd6f1	400	mode \|= 0100;
1da177e4	401	if (prot & FIBF_GRP_WRITE)
1bafd6f1	402	mode \|= 0020;
1da177e4	403	if (prot & FIBF_GRP_READ)
1bafd6f1	404	mode \|= 0040;
1da177e4	405	if (prot & FIBF_GRP_EXECUTE)
1bafd6f1	406	mode \|= 0010;
1da177e4	407	if (prot & FIBF_OTR_WRITE)
1bafd6f1	408	mode \|= 0002;
1da177e4	409	if (prot & FIBF_OTR_READ)
1bafd6f1	410	mode \|= 0004;
1da177e4	411	if (prot & FIBF_OTR_EXECUTE)
1bafd6f1	412	mode \|= 0001;
1da177e4 LT	413
	414	return mode;
	415	}
	416
	417	void
c1618208	418	affs_mode_to_prot(struct inode *inode)
1da177e4 LT	419	{
1da177e4 LT	420	u32 prot = AFFS_I(inode)->i_protect;
a760b03d	421	umode_t mode = inode->i_mode;
1da177e4	422
d3a84a8d MS	423	/*
	424	* First, clear all RWED bits for owner, group, other.
	425	* Then, recalculate them afresh.
	426	*
	427	* We'll always clear the delete-inhibit bit for the owner, as that is
	428	* the classic single-user mode AmigaOS protection bit and we need to
	429	* stay compatible with all scenarios.
	430	*
	431	* Since multi-user AmigaOS is an extension, we'll only set the
	432	* delete-allow bit if any of the other bits in the same user class
	433	* (group/other) are used.
	434	*/
	435	prot &= ~(FIBF_NOEXECUTE \| FIBF_NOREAD
	436	\| FIBF_NOWRITE \| FIBF_NODELETE
	437	\| FIBF_GRP_EXECUTE \| FIBF_GRP_READ
	438	\| FIBF_GRP_WRITE \| FIBF_GRP_DELETE
	439	\| FIBF_OTR_EXECUTE \| FIBF_OTR_READ
	440	\| FIBF_OTR_WRITE \| FIBF_OTR_DELETE);
	441
	442	/* Classic single-user AmigaOS flags. These are inverted. */
1bafd6f1	443	if (!(mode & 0100))
1da177e4	444	prot \|= FIBF_NOEXECUTE;
1bafd6f1	445	if (!(mode & 0400))
1da177e4	446	prot \|= FIBF_NOREAD;
1bafd6f1	447	if (!(mode & 0200))
1da177e4	448	prot \|= FIBF_NOWRITE;
d3a84a8d MS	449
d3a84a8d MS	450	/* Multi-user extended flags. Not inverted. */
1bafd6f1	451	if (mode & 0010)
1da177e4	452	prot \|= FIBF_GRP_EXECUTE;
1bafd6f1	453	if (mode & 0040)
1da177e4	454	prot \|= FIBF_GRP_READ;
1bafd6f1	455	if (mode & 0020)
1da177e4	456	prot \|= FIBF_GRP_WRITE;
d3a84a8d MS	457	if (mode & 0070)
	458	prot \|= FIBF_GRP_DELETE;
	459
1bafd6f1	460	if (mode & 0001)
1da177e4	461	prot \|= FIBF_OTR_EXECUTE;
1bafd6f1	462	if (mode & 0004)
1da177e4	463	prot \|= FIBF_OTR_READ;
1bafd6f1	464	if (mode & 0002)
1da177e4	465	prot \|= FIBF_OTR_WRITE;
d3a84a8d MS	466	if (mode & 0007)
d3a84a8d MS	467	prot \|= FIBF_OTR_DELETE;
1da177e4 LT	468
	469	AFFS_I(inode)->i_protect = prot;
	470	}
	471
	472	void
	473	affs_error(struct super_block sb, const char function, const char *fmt, ...)
	474	{
1ee54b09 FF	475	struct va_format vaf;
1ee54b09 FF	476	va_list args;
1da177e4	477
1ee54b09 FF	478	va_start(args, fmt);
	479	vaf.fmt = fmt;
	480	vaf.va = &args;
	481	pr_crit("error (device %s): %s(): %pV\n", sb->s_id, function, &vaf);
bc98a42c	482	if (!sb_rdonly(sb))
0158de12	483	pr_warn("Remounting filesystem read-only\n");
1751e8a6	484	sb->s_flags \|= SB_RDONLY;
1ee54b09	485	va_end(args);
1da177e4 LT	486	}
	487
	488	void
	489	affs_warning(struct super_block sb, const char function, const char *fmt, ...)
	490	{
1ee54b09 FF	491	struct va_format vaf;
1ee54b09 FF	492	va_list args;
1da177e4	493
1ee54b09 FF	494	va_start(args, fmt);
	495	vaf.fmt = fmt;
	496	vaf.va = &args;
	497	pr_warn("(device %s): %s(): %pV\n", sb->s_id, function, &vaf);
1da177e4	498	va_end(args);
1da177e4 LT	499	}
1da177e4 LT	500
8ca57722 FF	501	bool
	502	affs_nofilenametruncate(const struct dentry *dentry)
	503	{
e0b3f595	504	return affs_test_opt(AFFS_SB(dentry->d_sb)->s_flags, SF_NO_TRUNCATE);
8ca57722 FF	505	}
8ca57722 FF	506
1da177e4 LT	507	/* Check if the name is valid for a affs object. */
	508
	509	int
8ca57722	510	affs_check_name(const unsigned char *name, int len, bool notruncate)
1da177e4 LT	511	{
	512	int i;
	513
f157853e	514	if (len > AFFSNAMEMAX) {
8ca57722 FF	515	if (notruncate)
8ca57722 FF	516	return -ENAMETOOLONG;
b4478e35	517	len = AFFSNAMEMAX;
8ca57722	518	}
1da177e4 LT	519	for (i = 0; i < len; i++) {
	520	if (name[i] < ' ' \|\| name[i] == ':'
	521	\|\| (name[i] > 0x7e && name[i] < 0xa0))
	522	return -EINVAL;
	523	}
	524
	525	return 0;
	526	}
	527
	528	/* This function copies name to bstr, with at most 30
	529	* characters length. The bstr will be prepended by
	530	* a length byte.
	531	* NOTE: The name will must be already checked by
	532	* affs_check_name()!
	533	*/
	534
	535	int
	536	affs_copy_name(unsigned char bstr, struct dentry dentry)
	537	{
f157853e	538	u32 len = min(dentry->d_name.len, AFFSNAMEMAX);
1da177e4 LT	539
	540	*bstr++ = len;
	541	memcpy(bstr, dentry->d_name.name, len);
	542	return len;
	543	}