fs/libfs.c

   1 /*
   2  *      fs/libfs.c
   3  *      Library for filesystems writers.
   4  */
   5
   6 #include <linux/module.h>
   7 #include <linux/pagemap.h>
   8 #include <linux/mount.h>
   9 #include <linux/vfs.h>
  10 #include <asm/uaccess.h>
  11
  12 int simple_getattr(struct vfsmount *mnt, struct dentry *dentry,
  13                    struct kstat *stat)
  14 {
  15         struct inode *inode = dentry->d_inode;
  16         generic_fillattr(inode, stat);
  17         stat->blocks = inode->i_mapping->nrpages << (PAGE_CACHE_SHIFT - 9);
  18         return 0;
  19 }
  20
  21 int simple_statfs(struct super_block *sb, struct kstatfs *buf)
  22 {
  23         buf->f_type = sb->s_magic;
  24         buf->f_bsize = PAGE_CACHE_SIZE;
  25         buf->f_namelen = NAME_MAX;
  26         return 0;
  27 }
  28
  29 /*
  30  * Retaining negative dentries for an in-memory filesystem just wastes
  31  * memory and lookup time: arrange for them to be deleted immediately.
  32  */
  33 static int simple_delete_dentry(struct dentry *dentry)
  34 {
  35         return 1;
  36 }
  37
  38 /*
  39  * Lookup the data. This is trivial - if the dentry didn't already
  40  * exist, we know it is negative.  Set d_op to delete negative dentries.
  41  */
  42 struct dentry *simple_lookup(struct inode *dir, struct dentry *dentry, struct nameidata *nd)
  43 {
  44         static struct dentry_operations simple_dentry_operations = {
  45                 .d_delete = simple_delete_dentry,
  46         };
  47
  48         if (dentry->d_name.len > NAME_MAX)
  49                 return ERR_PTR(-ENAMETOOLONG);
  50         dentry->d_op = &simple_dentry_operations;
  51         d_add(dentry, NULL);
  52         return NULL;
  53 }
  54
  55 int simple_sync_file(struct file * file, struct dentry *dentry, int datasync)
  56 {
  57         return 0;
  58 }
  59
  60 int dcache_dir_open(struct inode *inode, struct file *file)
  61 {
  62         static struct qstr cursor_name = {.len = 1, .name = "."};
  63
  64         file->private_data = d_alloc(file->f_dentry, &cursor_name);
  65
  66         return file->private_data ? 0 : -ENOMEM;
  67 }
  68
  69 int dcache_dir_close(struct inode *inode, struct file *file)
  70 {
  71         dput(file->private_data);
  72         return 0;
  73 }
  74
  75 loff_t dcache_dir_lseek(struct file *file, loff_t offset, int origin)
  76 {
  77         down(&file->f_dentry->d_inode->i_sem);
  78         switch (origin) {
  79                 case 1:
  80                         offset += file->f_pos;
  81                 case 0:
  82                         if (offset >= 0)
  83                                 break;
  84                 default:
  85                         up(&file->f_dentry->d_inode->i_sem);
  86                         return -EINVAL;
  87         }
  88         if (offset != file->f_pos) {
  89                 file->f_pos = offset;
  90                 if (file->f_pos >= 2) {
  91                         struct list_head *p;
  92                         struct dentry *cursor = file->private_data;
  93                         loff_t n = file->f_pos - 2;
  94
  95                         spin_lock(&dcache_lock);
  96                         list_del(&cursor->d_child);
  97                         p = file->f_dentry->d_subdirs.next;
  98                         while (n && p != &file->f_dentry->d_subdirs) {
  99                                 struct dentry *next;
 100                                 next = list_entry(p, struct dentry, d_child);
 101                                 if (!d_unhashed(next) && next->d_inode)
 102                                         n--;
 103                                 p = p->next;
 104                         }
 105                         list_add_tail(&cursor->d_child, p);
 106                         spin_unlock(&dcache_lock);
 107                 }
 108         }
 109         up(&file->f_dentry->d_inode->i_sem);
 110         return offset;
 111 }
 112
 113 /* Relationship between i_mode and the DT_xxx types */
 114 static inline unsigned char dt_type(struct inode *inode)
 115 {
 116         return (inode->i_mode >> 12) & 15;
 117 }
 118
 119 /*
 120  * Directory is locked and all positive dentries in it are safe, since
 121  * for ramfs-type trees they can't go away without unlink() or rmdir(),
 122  * both impossible due to the lock on directory.
 123  */
 124
 125 int dcache_readdir(struct file * filp, void * dirent, filldir_t filldir)
 126 {
 127         struct dentry *dentry = filp->f_dentry;
 128         struct dentry *cursor = filp->private_data;
 129         struct list_head *p, *q = &cursor->d_child;
 130         ino_t ino;
 131         int i = filp->f_pos;
 132
 133         switch (i) {
 134                 case 0:
 135                         ino = dentry->d_inode->i_ino;
 136                         if (filldir(dirent, ".", 1, i, ino, DT_DIR) < 0)
 137                                 break;
 138                         filp->f_pos++;
 139                         i++;
 140                         /* fallthrough */
 141                 case 1:
 142                         ino = parent_ino(dentry);
 143                         if (filldir(dirent, "..", 2, i, ino, DT_DIR) < 0)
 144                                 break;
 145                         filp->f_pos++;
 146                         i++;
 147                         /* fallthrough */
 148                 default:
 149                         spin_lock(&dcache_lock);
 150                         if (filp->f_pos == 2) {
 151                                 list_del(q);
 152                                 list_add(q, &dentry->d_subdirs);
 153                         }
 154                         for (p=q->next; p != &dentry->d_subdirs; p=p->next) {
 155                                 struct dentry *next;
 156                                 next = list_entry(p, struct dentry, d_child);
 157                                 if (d_unhashed(next) || !next->d_inode)
 158                                         continue;
 159
 160                                 spin_unlock(&dcache_lock);
 161                                 if (filldir(dirent, next->d_name.name, next->d_name.len, filp->f_pos, next->d_inode->i_ino, dt_type(next->d_inode)) < 0)
 162                                         return 0;
 163                                 spin_lock(&dcache_lock);
 164                                 /* next is still alive */
 165                                 list_del(q);
 166                                 list_add(q, p);
 167                                 p = q;
 168                                 filp->f_pos++;
 169                         }
 170                         spin_unlock(&dcache_lock);
 171         }
 172         return 0;
 173 }
 174
 175 ssize_t generic_read_dir(struct file *filp, char __user *buf, size_t siz, loff_t *ppos)
 176 {
 177         return -EISDIR;
 178 }
 179
 180 struct file_operations simple_dir_operations = {
 181         .open           = dcache_dir_open,
 182         .release        = dcache_dir_close,
 183         .llseek         = dcache_dir_lseek,
 184         .read           = generic_read_dir,
 185         .readdir        = dcache_readdir,
 186 };
 187
 188 struct inode_operations simple_dir_inode_operations = {
 189         .lookup         = simple_lookup,
 190 };
 191
 192 /*
 193  * Common helper for pseudo-filesystems (sockfs, pipefs, bdev - stuff that
 194  * will never be mountable)
 195  */
 196 struct super_block *
 197 get_sb_pseudo(struct file_system_type *fs_type, char *name,
 198         struct super_operations *ops, unsigned long magic)
 199 {
 200         struct super_block *s = sget(fs_type, NULL, set_anon_super, NULL);
 201         static struct super_operations default_ops = {.statfs = simple_statfs};
 202         struct dentry *dentry;
 203         struct inode *root;
 204         struct qstr d_name = {.name = name, .len = strlen(name)};
 205
 206         if (IS_ERR(s))
 207                 return s;
 208
 209         s->s_flags = MS_NOUSER;
 210         s->s_maxbytes = ~0ULL;
 211         s->s_blocksize = 1024;
 212         s->s_blocksize_bits = 10;
 213         s->s_magic = magic;
 214         s->s_op = ops ? ops : &default_ops;
 215         root = new_inode(s);
 216         if (!root)
 217                 goto Enomem;
 218         root->i_mode = S_IFDIR | S_IRUSR | S_IWUSR;
 219         root->i_uid = root->i_gid = 0;
 220         root->i_atime = root->i_mtime = root->i_ctime = CURRENT_TIME;
 221         dentry = d_alloc(NULL, &d_name);
 222         if (!dentry) {
 223                 iput(root);
 224                 goto Enomem;
 225         }
 226         dentry->d_sb = s;
 227         dentry->d_parent = dentry;
 228         d_instantiate(dentry, root);
 229         s->s_root = dentry;
 230         s->s_flags |= MS_ACTIVE;
 231         return s;
 232
 233 Enomem:
 234         up_write(&s->s_umount);
 235         deactivate_super(s);
 236         return ERR_PTR(-ENOMEM);
 237 }
 238
 239 int simple_link(struct dentry *old_dentry, struct inode *dir, struct dentry *dentry)
 240 {
 241         struct inode *inode = old_dentry->d_inode;
 242
 243         inode->i_ctime = dir->i_ctime = dir->i_mtime = CURRENT_TIME;
 244         inode->i_nlink++;
 245         atomic_inc(&inode->i_count);
 246         dget(dentry);
 247         d_instantiate(dentry, inode);
 248         return 0;
 249 }
 250
 251 static inline int simple_positive(struct dentry *dentry)
 252 {
 253         return dentry->d_inode && !d_unhashed(dentry);
 254 }
 255
 256 int simple_empty(struct dentry *dentry)
 257 {
 258         struct dentry *child;
 259         int ret = 0;
 260
 261         spin_lock(&dcache_lock);
 262         list_for_each_entry(child, &dentry->d_subdirs, d_child)
 263                 if (simple_positive(child))
 264                         goto out;
 265         ret = 1;
 266 out:
 267         spin_unlock(&dcache_lock);
 268         return ret;
 269 }
 270
 271 int simple_unlink(struct inode *dir, struct dentry *dentry)
 272 {
 273         struct inode *inode = dentry->d_inode;
 274
 275         inode->i_ctime = dir->i_ctime = dir->i_mtime = CURRENT_TIME;
 276         inode->i_nlink--;
 277         dput(dentry);
 278         return 0;
 279 }
 280
 281 int simple_rmdir(struct inode *dir, struct dentry *dentry)
 282 {
 283         if (!simple_empty(dentry))
 284                 return -ENOTEMPTY;
 285
 286         dentry->d_inode->i_nlink--;
 287         simple_unlink(dir, dentry);
 288         dir->i_nlink--;
 289         return 0;
 290 }
 291
 292 int simple_rename(struct inode *old_dir, struct dentry *old_dentry,
 293                 struct inode *new_dir, struct dentry *new_dentry)
 294 {
 295         struct inode *inode = old_dentry->d_inode;
 296         int they_are_dirs = S_ISDIR(old_dentry->d_inode->i_mode);
 297
 298         if (!simple_empty(new_dentry))
 299                 return -ENOTEMPTY;
 300
 301         if (new_dentry->d_inode) {
 302                 simple_unlink(new_dir, new_dentry);
 303                 if (they_are_dirs)
 304                         old_dir->i_nlink--;
 305         } else if (they_are_dirs) {
 306                 old_dir->i_nlink--;
 307                 new_dir->i_nlink++;
 308         }
 309
 310         old_dir->i_ctime = old_dir->i_mtime = new_dir->i_ctime =
 311                 new_dir->i_mtime = inode->i_ctime = CURRENT_TIME;
 312
 313         return 0;
 314 }
 315
 316 int simple_readpage(struct file *file, struct page *page)
 317 {
 318         void *kaddr;
 319
 320         if (PageUptodate(page))
 321                 goto out;
 322
 323         kaddr = kmap_atomic(page, KM_USER0);
 324         memset(kaddr, 0, PAGE_CACHE_SIZE);
 325         kunmap_atomic(kaddr, KM_USER0);
 326         flush_dcache_page(page);
 327         SetPageUptodate(page);
 328 out:
 329         unlock_page(page);
 330         return 0;
 331 }
 332
 333 int simple_prepare_write(struct file *file, struct page *page,
 334                         unsigned from, unsigned to)
 335 {
 336         if (!PageUptodate(page)) {
 337                 if (to - from != PAGE_CACHE_SIZE) {
 338                         void *kaddr = kmap_atomic(page, KM_USER0);
 339                         memset(kaddr, 0, from);
 340                         memset(kaddr + to, 0, PAGE_CACHE_SIZE - to);
 341                         flush_dcache_page(page);
 342                         kunmap_atomic(kaddr, KM_USER0);
 343                 }
 344                 SetPageUptodate(page);
 345         }
 346         return 0;
 347 }
 348
 349 int simple_commit_write(struct file *file, struct page *page,
 350                         unsigned offset, unsigned to)
 351 {
 352         struct inode *inode = page->mapping->host;
 353         loff_t pos = ((loff_t)page->index << PAGE_CACHE_SHIFT) + to;
 354
 355         /*
 356          * No need to use i_size_read() here, the i_size
 357          * cannot change under us because we hold the i_sem.
 358          */
 359         if (pos > inode->i_size)
 360                 i_size_write(inode, pos);
 361         set_page_dirty(page);
 362         return 0;
 363 }
 364
 365 int simple_fill_super(struct super_block *s, int magic, struct tree_descr *files)
 366 {
 367         static struct super_operations s_ops = {.statfs = simple_statfs};
 368         struct inode *inode;
 369         struct dentry *root;
 370         struct dentry *dentry;
 371         int i;
 372
 373         s->s_blocksize = PAGE_CACHE_SIZE;
 374         s->s_blocksize_bits = PAGE_CACHE_SHIFT;
 375         s->s_magic = magic;
 376         s->s_op = &s_ops;
 377
 378         inode = new_inode(s);
 379         if (!inode)
 380                 return -ENOMEM;
 381         inode->i_mode = S_IFDIR | 0755;
 382         inode->i_uid = inode->i_gid = 0;
 383         inode->i_blksize = PAGE_CACHE_SIZE;
 384         inode->i_blocks = 0;
 385         inode->i_atime = inode->i_mtime = inode->i_ctime = CURRENT_TIME;
 386         inode->i_op = &simple_dir_inode_operations;
 387         inode->i_fop = &simple_dir_operations;
 388         root = d_alloc_root(inode);
 389         if (!root) {
 390                 iput(inode);
 391                 return -ENOMEM;
 392         }
 393         for (i = 0; !files->name || files->name[0]; i++, files++) {
 394                 struct qstr name;
 395                 if (!files->name)
 396                         continue;
 397                 name.name = files->name;
 398                 name.len = strlen(name.name);
 399                 name.hash = full_name_hash(name.name, name.len);
 400                 dentry = d_alloc(root, &name);
 401                 if (!dentry)
 402                         goto out;
 403                 inode = new_inode(s);
 404                 if (!inode)
 405                         goto out;
 406                 inode->i_mode = S_IFREG | files->mode;
 407                 inode->i_uid = inode->i_gid = 0;
 408                 inode->i_blksize = PAGE_CACHE_SIZE;
 409                 inode->i_blocks = 0;
 410                 inode->i_atime = inode->i_mtime = inode->i_ctime = CURRENT_TIME;
 411                 inode->i_fop = files->ops;
 412                 inode->i_ino = i;
 413                 d_add(dentry, inode);
 414         }
 415         s->s_root = root;
 416         return 0;
 417 out:
 418         d_genocide(root);
 419         dput(root);
 420         return -ENOMEM;
 421 }
 422
 423 static spinlock_t pin_fs_lock = SPIN_LOCK_UNLOCKED;
 424
 425 int simple_pin_fs(char *name, struct vfsmount **mount, int *count)
 426 {
 427         struct vfsmount *mnt = NULL;
 428         spin_lock(&pin_fs_lock);
 429         if (unlikely(!*mount)) {
 430                 spin_unlock(&pin_fs_lock);
 431                 mnt = do_kern_mount(name, 0, name, NULL);
 432                 if (IS_ERR(mnt))
 433                         return PTR_ERR(mnt);
 434                 spin_lock(&pin_fs_lock);
 435                 if (!*mount)
 436                         *mount = mnt;
 437         }
 438         mntget(*mount);
 439         ++*count;
 440         spin_unlock(&pin_fs_lock);
 441         mntput(mnt);
 442         return 0;
 443 }
 444
 445 void simple_release_fs(struct vfsmount **mount, int *count)
 446 {
 447         struct vfsmount *mnt;
 448         spin_lock(&pin_fs_lock);
 449         mnt = *mount;
 450         if (!--*count)
 451                 *mount = NULL;
 452         spin_unlock(&pin_fs_lock);
 453         mntput(mnt);
 454 }
 455
 456 ssize_t simple_read_from_buffer(void __user *to, size_t count, loff_t *ppos,
 457                                 const void *from, size_t available)
 458 {
 459         loff_t pos = *ppos;
 460         if (pos < 0)
 461                 return -EINVAL;
 462         if (pos >= available)
 463                 return 0;
 464         if (count > available - pos)
 465                 count = available - pos;
 466         if (copy_to_user(to, from + pos, count))
 467                 return -EFAULT;
 468         *ppos = pos + count;
 469         return count;
 470 }
 471
 472 /*
 473  * Transaction based IO.
 474  * The file expects a single write which triggers the transaction, and then
 475  * possibly a read which collects the result - which is stored in a
 476  * file-local buffer.
 477  */
 478 char *simple_transaction_get(struct file *file, const char __user *buf, size_t size)
 479 {
 480         struct simple_transaction_argresp *ar;
 481         static spinlock_t simple_transaction_lock = SPIN_LOCK_UNLOCKED;
 482
 483         if (size > SIMPLE_TRANSACTION_LIMIT - 1)
 484                 return ERR_PTR(-EFBIG);
 485
 486         ar = (struct simple_transaction_argresp *)get_zeroed_page(GFP_KERNEL);
 487         if (!ar)
 488                 return ERR_PTR(-ENOMEM);
 489
 490         spin_lock(&simple_transaction_lock);
 491
 492         /* only one write allowed per open */
 493         if (file->private_data) {
 494                 spin_unlock(&simple_transaction_lock);
 495                 free_page((unsigned long)ar);
 496                 return ERR_PTR(-EBUSY);
 497         }
 498
 499         file->private_data = ar;
 500
 501         spin_unlock(&simple_transaction_lock);
 502
 503         if (copy_from_user(ar->data, buf, size))
 504                 return ERR_PTR(-EFAULT);
 505
 506         return ar->data;
 507 }
 508
 509 ssize_t simple_transaction_read(struct file *file, char __user *buf, size_t size, loff_t *pos)
 510 {
 511         struct simple_transaction_argresp *ar = file->private_data;
 512
 513         if (!ar)
 514                 return 0;
 515         return simple_read_from_buffer(buf, size, pos, ar->data, ar->size);
 516 }
 517
 518 int simple_transaction_release(struct inode *inode, struct file *file)
 519 {
 520         free_page((unsigned long)file->private_data);
 521         return 0;
 522 }
 523
 524 EXPORT_SYMBOL(dcache_dir_close);
 525 EXPORT_SYMBOL(dcache_dir_lseek);
 526 EXPORT_SYMBOL(dcache_dir_open);
 527 EXPORT_SYMBOL(dcache_readdir);
 528 EXPORT_SYMBOL(generic_read_dir);
 529 EXPORT_SYMBOL(simple_commit_write);
 530 EXPORT_SYMBOL(simple_dir_inode_operations);
 531 EXPORT_SYMBOL(simple_dir_operations);
 532 EXPORT_SYMBOL(simple_empty);
 533 EXPORT_SYMBOL(simple_fill_super);
 534 EXPORT_SYMBOL(simple_getattr);
 535 EXPORT_SYMBOL(simple_link);
 536 EXPORT_SYMBOL(simple_lookup);
 537 EXPORT_SYMBOL(simple_pin_fs);
 538 EXPORT_SYMBOL(simple_prepare_write);
 539 EXPORT_SYMBOL(simple_readpage);
 540 EXPORT_SYMBOL(simple_release_fs);
 541 EXPORT_SYMBOL(simple_rename);
 542 EXPORT_SYMBOL(simple_rmdir);
 543 EXPORT_SYMBOL(simple_statfs);
 544 EXPORT_SYMBOL(simple_sync_file);
 545 EXPORT_SYMBOL(simple_unlink);
 546 EXPORT_SYMBOL(simple_read_from_buffer);
 547 EXPORT_SYMBOL(simple_transaction_get);
 548 EXPORT_SYMBOL(simple_transaction_read);
 549 EXPORT_SYMBOL(simple_transaction_release);