fs/adfs/inode.c

   1 /*
   2  *  linux/fs/adfs/inode.c
   3  *
   4  *  Copyright (C) 1997-1999 Russell King
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 as
   8  * published by the Free Software Foundation.
   9  */
  10 #include <linux/buffer_head.h>
  11 #include <linux/writeback.h>
  12 #include "adfs.h"
  13
  14 /*
  15  * Lookup/Create a block at offset 'block' into 'inode'.  We currently do
  16  * not support creation of new blocks, so we return -EIO for this case.
  17  */
  18 static int
  19 adfs_get_block(struct inode *inode, sector_t block, struct buffer_head *bh,
  20                int create)
  21 {
  22         if (!create) {
  23                 if (block >= inode->i_blocks)
  24                         goto abort_toobig;
  25
  26                 block = __adfs_block_map(inode->i_sb, inode->i_ino, block);
  27                 if (block)
  28                         map_bh(bh, inode->i_sb, block);
  29                 return 0;
  30         }
  31         /* don't support allocation of blocks yet */
  32         return -EIO;
  33
  34 abort_toobig:
  35         return 0;
  36 }
  37
  38 static int adfs_writepage(struct page *page, struct writeback_control *wbc)
  39 {
  40         return block_write_full_page(page, adfs_get_block, wbc);
  41 }
  42
  43 static int adfs_readpage(struct file *file, struct page *page)
  44 {
  45         return block_read_full_page(page, adfs_get_block);
  46 }
  47
  48 static int adfs_write_begin(struct file *file, struct address_space *mapping,
  49                         loff_t pos, unsigned len, unsigned flags,
  50                         struct page **pagep, void **fsdata)
  51 {
  52         int ret;
  53
  54         *pagep = NULL;
  55         ret = cont_write_begin(file, mapping, pos, len, flags, pagep, fsdata,
  56                                 adfs_get_block,
  57                                 &ADFS_I(mapping->host)->mmu_private);
  58         if (unlikely(ret)) {
  59                 loff_t isize = mapping->host->i_size;
  60                 if (pos + len > isize)
  61                         vmtruncate(mapping->host, isize);
  62         }
  63
  64         return ret;
  65 }
  66
  67 static sector_t _adfs_bmap(struct address_space *mapping, sector_t block)
  68 {
  69         return generic_block_bmap(mapping, block, adfs_get_block);
  70 }
  71
  72 static const struct address_space_operations adfs_aops = {
  73         .readpage       = adfs_readpage,
  74         .writepage      = adfs_writepage,
  75         .sync_page      = block_sync_page,
  76         .write_begin    = adfs_write_begin,
  77         .write_end      = generic_write_end,
  78         .bmap           = _adfs_bmap
  79 };
  80
  81 static inline unsigned int
  82 adfs_filetype(struct inode *inode)
  83 {
  84         unsigned int type;
  85
  86         if (ADFS_I(inode)->stamped)
  87                 type = (ADFS_I(inode)->loadaddr >> 8) & 0xfff;
  88         else
  89                 type = (unsigned int) -1;
  90
  91         return type;
  92 }
  93
  94 /*
  95  * Convert ADFS attributes and filetype to Linux permission.
  96  */
  97 static umode_t
  98 adfs_atts2mode(struct super_block *sb, struct inode *inode)
  99 {
 100         unsigned int filetype, attr = ADFS_I(inode)->attr;
 101         umode_t mode, rmask;
 102         struct adfs_sb_info *asb = ADFS_SB(sb);
 103
 104         if (attr & ADFS_NDA_DIRECTORY) {
 105                 mode = S_IRUGO & asb->s_owner_mask;
 106                 return S_IFDIR | S_IXUGO | mode;
 107         }
 108
 109         filetype = adfs_filetype(inode);
 110
 111         switch (filetype) {
 112         case 0xfc0:     /* LinkFS */
 113                 return S_IFLNK|S_IRWXUGO;
 114
 115         case 0xfe6:     /* UnixExec */
 116                 rmask = S_IRUGO | S_IXUGO;
 117                 break;
 118
 119         default:
 120                 rmask = S_IRUGO;
 121         }
 122
 123         mode = S_IFREG;
 124
 125         if (attr & ADFS_NDA_OWNER_READ)
 126                 mode |= rmask & asb->s_owner_mask;
 127
 128         if (attr & ADFS_NDA_OWNER_WRITE)
 129                 mode |= S_IWUGO & asb->s_owner_mask;
 130
 131         if (attr & ADFS_NDA_PUBLIC_READ)
 132                 mode |= rmask & asb->s_other_mask;
 133
 134         if (attr & ADFS_NDA_PUBLIC_WRITE)
 135                 mode |= S_IWUGO & asb->s_other_mask;
 136         return mode;
 137 }
 138
 139 /*
 140  * Convert Linux permission to ADFS attribute.  We try to do the reverse
 141  * of atts2mode, but there is not a 1:1 translation.
 142  */
 143 static int
 144 adfs_mode2atts(struct super_block *sb, struct inode *inode)
 145 {
 146         umode_t mode;
 147         int attr;
 148         struct adfs_sb_info *asb = ADFS_SB(sb);
 149
 150         /* FIXME: should we be able to alter a link? */
 151         if (S_ISLNK(inode->i_mode))
 152                 return ADFS_I(inode)->attr;
 153
 154         if (S_ISDIR(inode->i_mode))
 155                 attr = ADFS_NDA_DIRECTORY;
 156         else
 157                 attr = 0;
 158
 159         mode = inode->i_mode & asb->s_owner_mask;
 160         if (mode & S_IRUGO)
 161                 attr |= ADFS_NDA_OWNER_READ;
 162         if (mode & S_IWUGO)
 163                 attr |= ADFS_NDA_OWNER_WRITE;
 164
 165         mode = inode->i_mode & asb->s_other_mask;
 166         mode &= ~asb->s_owner_mask;
 167         if (mode & S_IRUGO)
 168                 attr |= ADFS_NDA_PUBLIC_READ;
 169         if (mode & S_IWUGO)
 170                 attr |= ADFS_NDA_PUBLIC_WRITE;
 171
 172         return attr;
 173 }
 174
 175 /*
 176  * Convert an ADFS time to Unix time.  ADFS has a 40-bit centi-second time
 177  * referenced to 1 Jan 1900 (til 2248) so we need to discard 2208988800 seconds
 178  * of time to convert from RISC OS epoch to Unix epoch.
 179  */
 180 static void
 181 adfs_adfs2unix_time(struct timespec *tv, struct inode *inode)
 182 {
 183         unsigned int high, low;
 184         /* 01 Jan 1970 00:00:00 (Unix epoch) as nanoseconds since
 185          * 01 Jan 1900 00:00:00 (RISC OS epoch)
 186          */
 187         static const s64 nsec_unix_epoch_diff_risc_os_epoch =
 188                                                         2208988800000000000LL;
 189         s64 nsec;
 190
 191         if (ADFS_I(inode)->stamped == 0)
 192                 goto cur_time;
 193
 194         high = ADFS_I(inode)->loadaddr & 0xFF; /* top 8 bits of timestamp */
 195         low  = ADFS_I(inode)->execaddr;    /* bottom 32 bits of timestamp */
 196
 197         /* convert 40-bit centi-seconds to 32-bit seconds
 198          * going via nanoseconds to retain precision
 199          */
 200         nsec = (((s64) high << 32) | (s64) low) * 10000000; /* cs to ns */
 201
 202         /* Files dated pre  01 Jan 1970 00:00:00. */
 203         if (nsec < nsec_unix_epoch_diff_risc_os_epoch)
 204                 goto too_early;
 205
 206         /* convert from RISC OS to Unix epoch */
 207         nsec -= nsec_unix_epoch_diff_risc_os_epoch;
 208
 209         *tv = ns_to_timespec(nsec);
 210         return;
 211
 212  cur_time:
 213         *tv = CURRENT_TIME;
 214         return;
 215
 216  too_early:
 217         tv->tv_sec = tv->tv_nsec = 0;
 218         return;
 219 }
 220
 221 /*
 222  * Convert an Unix time to ADFS time.  We only do this if the entry has a
 223  * time/date stamp already.
 224  */
 225 static void
 226 adfs_unix2adfs_time(struct inode *inode, unsigned int secs)
 227 {
 228         unsigned int high, low;
 229
 230         if (ADFS_I(inode)->stamped) {
 231                 /* convert 32-bit seconds to 40-bit centi-seconds */
 232                 low  = (secs & 255) * 100;
 233                 high = (secs / 256) * 100 + (low >> 8) + 0x336e996a;
 234
 235                 ADFS_I(inode)->loadaddr = (high >> 24) |
 236                                 (ADFS_I(inode)->loadaddr & ~0xff);
 237                 ADFS_I(inode)->execaddr = (low & 255) | (high << 8);
 238         }
 239 }
 240
 241 /*
 242  * Fill in the inode information from the object information.
 243  *
 244  * Note that this is an inode-less filesystem, so we can't use the inode
 245  * number to reference the metadata on the media.  Instead, we use the
 246  * inode number to hold the object ID, which in turn will tell us where
 247  * the data is held.  We also save the parent object ID, and with these
 248  * two, we can locate the metadata.
 249  *
 250  * This does mean that we rely on an objects parent remaining the same at
 251  * all times - we cannot cope with a cross-directory rename (yet).
 252  */
 253 struct inode *
 254 adfs_iget(struct super_block *sb, struct object_info *obj)
 255 {
 256         struct inode *inode;
 257
 258         inode = new_inode(sb);
 259         if (!inode)
 260                 goto out;
 261
 262         inode->i_uid     = ADFS_SB(sb)->s_uid;
 263         inode->i_gid     = ADFS_SB(sb)->s_gid;
 264         inode->i_ino     = obj->file_id;
 265         inode->i_size    = obj->size;
 266         inode->i_nlink   = 2;
 267         inode->i_blocks  = (inode->i_size + sb->s_blocksize - 1) >>
 268                             sb->s_blocksize_bits;
 269
 270         /*
 271          * we need to save the parent directory ID so that
 272          * write_inode can update the directory information
 273          * for this file.  This will need special handling
 274          * for cross-directory renames.
 275          */
 276         ADFS_I(inode)->parent_id = obj->parent_id;
 277         ADFS_I(inode)->loadaddr  = obj->loadaddr;
 278         ADFS_I(inode)->execaddr  = obj->execaddr;
 279         ADFS_I(inode)->attr      = obj->attr;
 280         ADFS_I(inode)->stamped    = ((obj->loadaddr & 0xfff00000) == 0xfff00000);
 281
 282         inode->i_mode    = adfs_atts2mode(sb, inode);
 283         adfs_adfs2unix_time(&inode->i_mtime, inode);
 284         inode->i_atime = inode->i_mtime;
 285         inode->i_ctime = inode->i_mtime;
 286
 287         if (S_ISDIR(inode->i_mode)) {
 288                 inode->i_op     = &adfs_dir_inode_operations;
 289                 inode->i_fop    = &adfs_dir_operations;
 290         } else if (S_ISREG(inode->i_mode)) {
 291                 inode->i_op     = &adfs_file_inode_operations;
 292                 inode->i_fop    = &adfs_file_operations;
 293                 inode->i_mapping->a_ops = &adfs_aops;
 294                 ADFS_I(inode)->mmu_private = inode->i_size;
 295         }
 296
 297         insert_inode_hash(inode);
 298
 299 out:
 300         return inode;
 301 }
 302
 303 /*
 304  * Validate and convert a changed access mode/time to their ADFS equivalents.
 305  * adfs_write_inode will actually write the information back to the directory
 306  * later.
 307  */
 308 int
 309 adfs_notify_change(struct dentry *dentry, struct iattr *attr)
 310 {
 311         struct inode *inode = dentry->d_inode;
 312         struct super_block *sb = inode->i_sb;
 313         unsigned int ia_valid = attr->ia_valid;
 314         int error;
 315
 316         error = inode_change_ok(inode, attr);
 317
 318         /*
 319          * we can't change the UID or GID of any file -
 320          * we have a global UID/GID in the superblock
 321          */
 322         if ((ia_valid & ATTR_UID && attr->ia_uid != ADFS_SB(sb)->s_uid) ||
 323             (ia_valid & ATTR_GID && attr->ia_gid != ADFS_SB(sb)->s_gid))
 324                 error = -EPERM;
 325
 326         if (error)
 327                 goto out;
 328
 329         /* XXX: this is missing some actual on-disk truncation.. */
 330         if (ia_valid & ATTR_SIZE)
 331                 truncate_setsize(inode, attr->ia_size);
 332
 333         if (ia_valid & ATTR_MTIME) {
 334                 inode->i_mtime = attr->ia_mtime;
 335                 adfs_unix2adfs_time(inode, attr->ia_mtime.tv_sec);
 336         }
 337         /*
 338          * FIXME: should we make these == to i_mtime since we don't
 339          * have the ability to represent them in our filesystem?
 340          */
 341         if (ia_valid & ATTR_ATIME)
 342                 inode->i_atime = attr->ia_atime;
 343         if (ia_valid & ATTR_CTIME)
 344                 inode->i_ctime = attr->ia_ctime;
 345         if (ia_valid & ATTR_MODE) {
 346                 ADFS_I(inode)->attr = adfs_mode2atts(sb, inode);
 347                 inode->i_mode = adfs_atts2mode(sb, inode);
 348         }
 349
 350         /*
 351          * FIXME: should we be marking this inode dirty even if
 352          * we don't have any metadata to write back?
 353          */
 354         if (ia_valid & (ATTR_SIZE | ATTR_MTIME | ATTR_MODE))
 355                 mark_inode_dirty(inode);
 356 out:
 357         return error;
 358 }
 359
 360 /*
 361  * write an existing inode back to the directory, and therefore the disk.
 362  * The adfs-specific inode data has already been updated by
 363  * adfs_notify_change()
 364  */
 365 int adfs_write_inode(struct inode *inode, struct writeback_control *wbc)
 366 {
 367         struct super_block *sb = inode->i_sb;
 368         struct object_info obj;
 369         int ret;
 370
 371         obj.file_id     = inode->i_ino;
 372         obj.name_len    = 0;
 373         obj.parent_id   = ADFS_I(inode)->parent_id;
 374         obj.loadaddr    = ADFS_I(inode)->loadaddr;
 375         obj.execaddr    = ADFS_I(inode)->execaddr;
 376         obj.attr        = ADFS_I(inode)->attr;
 377         obj.size        = inode->i_size;
 378
 379         ret = adfs_dir_update(sb, &obj, wbc->sync_mode == WB_SYNC_ALL);
 380         return ret;
 381 }