2 * linux/fs/affs/amigaffs.c
4 * (c) 1996 Hans-Joachim Widmaier - Rewritten
6 * (C) 1993 Ray Burr - Amiga FFS filesystem.
8 * Please send bug reports to: hjw@zvw.de
12 #include <linux/stat.h>
13 #include <linux/time.h>
14 #include <linux/affs_fs.h>
15 #include <linux/string.h>
17 #include <linux/amigaffs.h>
18 #include <linux/buffer_head.h>
20 extern struct timezone sys_tz;
22 static char ErrorBuffer[256];
25 * Functions for accessing Amiga-FFS structures.
29 /* Insert a header block bh into the directory dir
30 * caller must hold AFFS_DIR->i_hash_lock!
34 affs_insert_hash(struct inode *dir, struct buffer_head *bh)
36 struct super_block *sb = dir->i_sb;
37 struct buffer_head *dir_bh;
42 offset = affs_hash_name(sb, AFFS_TAIL(sb, bh)->name + 1, AFFS_TAIL(sb, bh)->name[0]);
44 pr_debug("AFFS: insert_hash(dir=%u, ino=%d)\n", (u32)dir->i_ino, ino);
46 dir_bh = affs_bread(sb, dir->i_ino);
50 hash_ino = be32_to_cpu(AFFS_HEAD(dir_bh)->table[offset]);
53 dir_bh = affs_bread(sb, hash_ino);
56 hash_ino = be32_to_cpu(AFFS_TAIL(sb, dir_bh)->hash_chain);
58 AFFS_TAIL(sb, bh)->parent = cpu_to_be32(dir->i_ino);
59 AFFS_TAIL(sb, bh)->hash_chain = 0;
60 affs_fix_checksum(sb, bh);
62 if (dir->i_ino == dir_bh->b_blocknr)
63 AFFS_HEAD(dir_bh)->table[offset] = cpu_to_be32(ino);
65 AFFS_TAIL(sb, dir_bh)->hash_chain = cpu_to_be32(ino);
67 affs_adjust_checksum(dir_bh, ino);
68 mark_buffer_dirty_inode(dir_bh, dir);
71 dir->i_mtime = dir->i_ctime = CURRENT_TIME;
73 mark_inode_dirty(dir);
78 /* Remove a header block from its directory.
79 * caller must hold AFFS_DIR->i_hash_lock!
83 affs_remove_hash(struct inode *dir, struct buffer_head *rem_bh)
85 struct super_block *sb;
86 struct buffer_head *bh;
87 u32 rem_ino, hash_ino, ino;
91 rem_ino = rem_bh->b_blocknr;
92 offset = affs_hash_name(sb, AFFS_TAIL(sb, rem_bh)->name+1, AFFS_TAIL(sb, rem_bh)->name[0]);
93 pr_debug("AFFS: remove_hash(dir=%d, ino=%d, hashval=%d)\n", (u32)dir->i_ino, rem_ino, offset);
95 bh = affs_bread(sb, dir->i_ino);
100 hash_ino = be32_to_cpu(AFFS_HEAD(bh)->table[offset]);
102 if (hash_ino == rem_ino) {
103 ino = AFFS_TAIL(sb, rem_bh)->hash_chain;
104 if (dir->i_ino == bh->b_blocknr)
105 AFFS_HEAD(bh)->table[offset] = ino;
107 AFFS_TAIL(sb, bh)->hash_chain = ino;
108 affs_adjust_checksum(bh, be32_to_cpu(ino) - hash_ino);
109 mark_buffer_dirty_inode(bh, dir);
110 AFFS_TAIL(sb, rem_bh)->parent = 0;
115 bh = affs_bread(sb, hash_ino);
118 hash_ino = be32_to_cpu(AFFS_TAIL(sb, bh)->hash_chain);
123 dir->i_mtime = dir->i_ctime = CURRENT_TIME;
125 mark_inode_dirty(dir);
131 affs_fix_dcache(struct dentry *dentry, u32 entry_ino)
133 struct inode *inode = dentry->d_inode;
134 void *data = dentry->d_fsdata;
135 struct list_head *head, *next;
137 spin_lock(&dcache_lock);
138 head = &inode->i_dentry;
140 while (next != head) {
141 dentry = list_entry(next, struct dentry, d_alias);
142 if (entry_ino == (u32)(long)dentry->d_fsdata) {
143 dentry->d_fsdata = data;
148 spin_unlock(&dcache_lock);
152 /* Remove header from link chain */
155 affs_remove_link(struct dentry *dentry)
157 struct inode *dir, *inode = dentry->d_inode;
158 struct super_block *sb = inode->i_sb;
159 struct buffer_head *bh = NULL, *link_bh = NULL;
163 pr_debug("AFFS: remove_link(key=%ld)\n", inode->i_ino);
165 bh = affs_bread(sb, inode->i_ino);
169 link_ino = (u32)(long)dentry->d_fsdata;
170 if (inode->i_ino == link_ino) {
171 /* we can't remove the head of the link, as its blocknr is still used as ino,
172 * so we remove the block of the first link instead.
174 link_ino = be32_to_cpu(AFFS_TAIL(sb, bh)->link_chain);
175 link_bh = affs_bread(sb, link_ino);
179 dir = iget(sb, be32_to_cpu(AFFS_TAIL(sb, link_bh)->parent));
184 affs_fix_dcache(dentry, link_ino);
185 retval = affs_remove_hash(dir, link_bh);
188 mark_buffer_dirty_inode(link_bh, inode);
190 memcpy(AFFS_TAIL(sb, bh)->name, AFFS_TAIL(sb, link_bh)->name, 32);
191 retval = affs_insert_hash(dir, bh);
194 mark_buffer_dirty_inode(bh, inode);
196 affs_unlock_dir(dir);
199 link_bh = affs_bread(sb, link_ino);
204 while ((ino = be32_to_cpu(AFFS_TAIL(sb, bh)->link_chain))) {
205 if (ino == link_ino) {
206 ino = AFFS_TAIL(sb, link_bh)->link_chain;
207 AFFS_TAIL(sb, bh)->link_chain = ino;
208 affs_adjust_checksum(bh, be32_to_cpu(ino) - link_ino);
209 mark_buffer_dirty_inode(bh, inode);
211 /* Fix the link count, if bh is a normal header block without links */
212 switch (be32_to_cpu(AFFS_TAIL(sb, bh)->stype)) {
217 if (!AFFS_TAIL(sb, bh)->link_chain)
220 affs_free_block(sb, link_ino);
224 bh = affs_bread(sb, ino);
230 affs_brelse(link_bh);
237 affs_empty_dir(struct inode *inode)
239 struct super_block *sb = inode->i_sb;
240 struct buffer_head *bh;
244 bh = affs_bread(sb, inode->i_ino);
249 for (size = AFFS_SB(sb)->s_hashsize - 1; size >= 0; size--)
250 if (AFFS_HEAD(bh)->table[size])
260 /* Remove a filesystem object. If the object to be removed has
261 * links to it, one of the links must be changed to inherit
262 * the file or directory. As above, any inode will do.
263 * The buffer will not be freed. If the header is a link, the
264 * block will be marked as free.
265 * This function returns a negative error number in case of
266 * an error, else 0 if the inode is to be deleted or 1 if not.
270 affs_remove_header(struct dentry *dentry)
272 struct super_block *sb;
273 struct inode *inode, *dir;
274 struct buffer_head *bh = NULL;
277 dir = dentry->d_parent->d_inode;
281 inode = dentry->d_inode;
285 pr_debug("AFFS: remove_header(key=%ld)\n", inode->i_ino);
287 bh = affs_bread(sb, (u32)(long)dentry->d_fsdata);
291 affs_lock_link(inode);
293 switch (be32_to_cpu(AFFS_TAIL(sb, bh)->stype)) {
295 /* if we ever want to support links to dirs
296 * i_hash_lock of the inode must only be
297 * taken after some checks
299 affs_lock_dir(inode);
300 retval = affs_empty_dir(inode);
301 affs_unlock_dir(inode);
309 retval = affs_remove_hash(dir, bh);
312 mark_buffer_dirty_inode(bh, inode);
314 affs_unlock_dir(dir);
316 if (inode->i_nlink > 1)
317 retval = affs_remove_link(dentry);
320 affs_unlock_link(inode);
321 inode->i_ctime = CURRENT_TIME;
322 mark_inode_dirty(inode);
329 affs_unlock_dir(dir);
330 affs_unlock_link(inode);
334 /* Checksum a block, do various consistency checks and optionally return
335 the blocks type number. DATA points to the block. If their pointers
336 are non-null, *PTYPE and *STYPE are set to the primary and secondary
337 block types respectively, *HASHSIZE is set to the size of the hashtable
338 (which lets us calculate the block size).
339 Returns non-zero if the block is not consistent. */
342 affs_checksum_block(struct super_block *sb, struct buffer_head *bh)
344 u32 *ptr = (u32 *)bh->b_data;
349 for (bsize = sb->s_blocksize / sizeof(u32); bsize > 0; bsize--)
350 sum += be32_to_cpu(*ptr++);
355 * Calculate the checksum of a disk block and store it
356 * at the indicated position.
360 affs_fix_checksum(struct super_block *sb, struct buffer_head *bh)
362 int cnt = sb->s_blocksize / sizeof(u32);
363 u32 *ptr = (u32 *)bh->b_data;
364 u32 checksum, *checksumptr;
366 checksumptr = ptr + 5;
368 for (checksum = 0; cnt > 0; ptr++, cnt--)
369 checksum += be32_to_cpu(*ptr);
370 *checksumptr = cpu_to_be32(-checksum);
374 secs_to_datestamp(time_t secs, struct affs_date *ds)
379 secs -= sys_tz.tz_minuteswest * 60 + ((8 * 365 + 2) * 24 * 60 * 60);
383 secs -= days * 86400;
387 ds->days = be32_to_cpu(days);
388 ds->mins = be32_to_cpu(minute);
389 ds->ticks = be32_to_cpu(secs * 50);
393 prot_to_mode(u32 prot)
397 if (!(prot & FIBF_NOWRITE))
399 if (!(prot & FIBF_NOREAD))
401 if (!(prot & FIBF_NOEXECUTE))
403 if (prot & FIBF_GRP_WRITE)
405 if (prot & FIBF_GRP_READ)
407 if (prot & FIBF_GRP_EXECUTE)
409 if (prot & FIBF_OTR_WRITE)
411 if (prot & FIBF_OTR_READ)
413 if (prot & FIBF_OTR_EXECUTE)
420 mode_to_prot(struct inode *inode)
422 u32 prot = AFFS_I(inode)->i_protect;
423 mode_t mode = inode->i_mode;
425 if (!(mode & S_IXUSR))
426 prot |= FIBF_NOEXECUTE;
427 if (!(mode & S_IRUSR))
429 if (!(mode & S_IWUSR))
430 prot |= FIBF_NOWRITE;
432 prot |= FIBF_GRP_EXECUTE;
434 prot |= FIBF_GRP_READ;
436 prot |= FIBF_GRP_WRITE;
438 prot |= FIBF_OTR_EXECUTE;
440 prot |= FIBF_OTR_READ;
442 prot |= FIBF_OTR_WRITE;
444 AFFS_I(inode)->i_protect = prot;
448 affs_error(struct super_block *sb, const char *function, const char *fmt, ...)
453 vsprintf(ErrorBuffer,fmt,args);
456 printk(KERN_CRIT "AFFS error (device %s): %s(): %s\n", sb->s_id,
457 function,ErrorBuffer);
458 if (!(sb->s_flags & MS_RDONLY))
459 printk(KERN_WARNING "AFFS: Remounting filesystem read-only\n");
460 sb->s_flags |= MS_RDONLY;
461 AFFS_SB(sb)->s_flags |= SF_READONLY; /* Don't allow to remount rw */
465 affs_warning(struct super_block *sb, const char *function, const char *fmt, ...)
470 vsprintf(ErrorBuffer,fmt,args);
473 printk(KERN_WARNING "AFFS warning (device %s): %s(): %s\n", sb->s_id,
474 function,ErrorBuffer);
477 /* Check if the name is valid for a affs object. */
480 affs_check_name(const unsigned char *name, int len)
485 #ifdef AFFS_NO_TRUNCATE
486 return -ENAMETOOLONG;
491 for (i = 0; i < len; i++) {
492 if (name[i] < ' ' || name[i] == ':'
493 || (name[i] > 0x7e && name[i] < 0xa0))
500 /* This function copies name to bstr, with at most 30
501 * characters length. The bstr will be prepended by
503 * NOTE: The name will must be already checked by
508 affs_copy_name(unsigned char *bstr, struct dentry *dentry)
510 int len = min(dentry->d_name.len, 30u);
513 memcpy(bstr, dentry->d_name.name, len);