LXR linux/fs/autofs/root.c

   1/* -*- linux-c -*- --------------------------------------------------------- *
   2 *
   3 * linux/fs/autofs/root.c
   4 *
   5 *  Copyright 1997-1998 Transmeta Corporation -- All Rights Reserved
   6 *
   7 * This file is part of the Linux kernel and is made available under
   8 * the terms of the GNU General Public License, version 2, or at your
   9 * option, any later version, incorporated herein by reference.
  10 *
  11 * ------------------------------------------------------------------------- */
  12
  13#include <linux/capability.h>
  14#include <linux/errno.h>
  15#include <linux/stat.h>
  16#include <linux/param.h>
  17#include <linux/time.h>
  18#include <linux/smp_lock.h>
  19#include "autofs_i.h"
  20
  21static int autofs_root_readdir(struct file *,void *,filldir_t);
  22static struct dentry *autofs_root_lookup(struct inode *,struct dentry *, struct nameidata *);
  23static int autofs_root_symlink(struct inode *,struct dentry *,const char *);
  24static int autofs_root_unlink(struct inode *,struct dentry *);
  25static int autofs_root_rmdir(struct inode *,struct dentry *);
  26static int autofs_root_mkdir(struct inode *,struct dentry *,int);
  27static int autofs_root_ioctl(struct inode *, struct file *,unsigned int,unsigned long);
  28
  29const struct file_operations autofs_root_operations = {
  30        .read           = generic_read_dir,
  31        .readdir        = autofs_root_readdir,
  32        .ioctl          = autofs_root_ioctl,
  33};
  34
  35const struct inode_operations autofs_root_inode_operations = {
  36        .lookup         = autofs_root_lookup,
  37        .unlink         = autofs_root_unlink,
  38        .symlink        = autofs_root_symlink,
  39        .mkdir          = autofs_root_mkdir,
  40        .rmdir          = autofs_root_rmdir,
  41};
  42
  43static int autofs_root_readdir(struct file *filp, void *dirent, filldir_t filldir)
  44{
  45        struct autofs_dir_ent *ent = NULL;
  46        struct autofs_dirhash *dirhash;
  47        struct autofs_sb_info *sbi;
  48        struct inode * inode = filp->f_path.dentry->d_inode;
  49        off_t onr, nr;
  50
  51        lock_kernel();
  52
  53        sbi = autofs_sbi(inode->i_sb);
  54        dirhash = &sbi->dirhash;
  55        nr = filp->f_pos;
  56
  57        switch(nr)
  58        {
  59        case 0:
  60                if (filldir(dirent, ".", 1, nr, inode->i_ino, DT_DIR) < 0)
  61                        goto out;
  62                filp->f_pos = ++nr;
  63                /* fall through */
  64        case 1:
  65                if (filldir(dirent, "..", 2, nr, inode->i_ino, DT_DIR) < 0)
  66                        goto out;
  67                filp->f_pos = ++nr;
  68                /* fall through */
  69        default:
  70                while (onr = nr, ent = autofs_hash_enum(dirhash,&nr,ent)) {
  71                        if (!ent->dentry || d_mountpoint(ent->dentry)) {
  72                                if (filldir(dirent,ent->name,ent->len,onr,ent->ino,DT_UNKNOWN) < 0)
  73                                        goto out;
  74                                filp->f_pos = nr;
  75                        }
  76                }
  77                break;
  78        }
  79
  80out:
  81        unlock_kernel();
  82        return 0;
  83}
  84
  85static int try_to_fill_dentry(struct dentry *dentry, struct super_block *sb, struct autofs_sb_info *sbi)
  86{
  87        struct inode * inode;
  88        struct autofs_dir_ent *ent;
  89        int status = 0;
  90
  91        if (!(ent = autofs_hash_lookup(&sbi->dirhash, &dentry->d_name))) {
  92                do {
  93                        if (status && dentry->d_inode) {
  94                                if (status != -ENOENT)
  95                                        printk("autofs warning: lookup failure on positive dentry, status = %d, name = %s\n", status, dentry->d_name.name);
  96                                return 0; /* Try to get the kernel to invalidate this dentry */
  97                        }
  98
  99                        /* Turn this into a real negative dentry? */
 100                        if (status == -ENOENT) {
 101                                dentry->d_time = jiffies + AUTOFS_NEGATIVE_TIMEOUT;
 102                                dentry->d_flags &= ~DCACHE_AUTOFS_PENDING;
 103                                return 1;
 104                        } else if (status) {
 105                                /* Return a negative dentry, but leave it "pending" */
 106                                return 1;
 107                        }
 108                        status = autofs_wait(sbi, &dentry->d_name);
 109                } while (!(ent = autofs_hash_lookup(&sbi->dirhash, &dentry->d_name)));
 110        }
 111
 112        /* Abuse this field as a pointer to the directory entry, used to
 113           find the expire list pointers */
 114        dentry->d_time = (unsigned long) ent;
 115        
 116        if (!dentry->d_inode) {
 117                inode = autofs_iget(sb, ent->ino);
 118                if (IS_ERR(inode)) {
 119                        /* Failed, but leave pending for next time */
 120                        return 1;
 121                }
 122                dentry->d_inode = inode;
 123        }
 124
 125        /* If this is a directory that isn't a mount point, bitch at the
 126           daemon and fix it in user space */
 127        if (S_ISDIR(dentry->d_inode->i_mode) && !d_mountpoint(dentry)) {
 128                return !autofs_wait(sbi, &dentry->d_name);
 129        }
 130
 131        /* We don't update the usages for the autofs daemon itself, this
 132           is necessary for recursive autofs mounts */
 133        if (!autofs_oz_mode(sbi)) {
 134                autofs_update_usage(&sbi->dirhash,ent);
 135        }
 136
 137        dentry->d_flags &= ~DCACHE_AUTOFS_PENDING;
 138        return 1;
 139}
 140
 141
 142/*
 143 * Revalidate is called on every cache lookup.  Some of those
 144 * cache lookups may actually happen while the dentry is not
 145 * yet completely filled in, and revalidate has to delay such
 146 * lookups..
 147 */
 148static int autofs_revalidate(struct dentry * dentry, struct nameidata *nd)
 149{
 150        struct inode * dir;
 151        struct autofs_sb_info *sbi;
 152        struct autofs_dir_ent *ent;
 153        int res;
 154
 155        lock_kernel();
 156        dir = dentry->d_parent->d_inode;
 157        sbi = autofs_sbi(dir->i_sb);
 158
 159        /* Pending dentry */
 160        if (dentry->d_flags & DCACHE_AUTOFS_PENDING) {
 161                if (autofs_oz_mode(sbi))
 162                        res = 1;
 163                else
 164                        res = try_to_fill_dentry(dentry, dir->i_sb, sbi);
 165                unlock_kernel();
 166                return res;
 167        }
 168
 169        /* Negative dentry.. invalidate if "old" */
 170        if (!dentry->d_inode) {
 171                unlock_kernel();
 172                return (dentry->d_time - jiffies <= AUTOFS_NEGATIVE_TIMEOUT);
 173        }
 174                
 175        /* Check for a non-mountpoint directory */
 176        if (S_ISDIR(dentry->d_inode->i_mode) && !d_mountpoint(dentry)) {
 177                if (autofs_oz_mode(sbi))
 178                        res = 1;
 179                else
 180                        res = try_to_fill_dentry(dentry, dir->i_sb, sbi);
 181                unlock_kernel();
 182                return res;
 183        }
 184
 185        /* Update the usage list */
 186        if (!autofs_oz_mode(sbi)) {
 187                ent = (struct autofs_dir_ent *) dentry->d_time;
 188                if (ent)
 189                        autofs_update_usage(&sbi->dirhash,ent);
 190        }
 191        unlock_kernel();
 192        return 1;
 193}
 194
 195static const struct dentry_operations autofs_dentry_operations = {
 196        .d_revalidate   = autofs_revalidate,
 197};
 198
 199static struct dentry *autofs_root_lookup(struct inode *dir, struct dentry *dentry, struct nameidata *nd)
 200{
 201        struct autofs_sb_info *sbi;
 202        int oz_mode;
 203
 204        DPRINTK(("autofs_root_lookup: name = "));
 205        lock_kernel();
 206        autofs_say(dentry->d_name.name,dentry->d_name.len);
 207
 208        if (dentry->d_name.len > NAME_MAX) {
 209                unlock_kernel();
 210                return ERR_PTR(-ENAMETOOLONG);/* File name too long to exist */
 211        }
 212
 213        sbi = autofs_sbi(dir->i_sb);
 214
 215        oz_mode = autofs_oz_mode(sbi);
 216        DPRINTK(("autofs_lookup: pid = %u, pgrp = %u, catatonic = %d, "
 217                                "oz_mode = %d\n", task_pid_nr(current),
 218                                task_pgrp_nr(current), sbi->catatonic,
 219                                oz_mode));
 220
 221        /*
 222         * Mark the dentry incomplete, but add it. This is needed so
 223         * that the VFS layer knows about the dentry, and we can count
 224         * on catching any lookups through the revalidate.
 225         *
 226         * Let all the hard work be done by the revalidate function that
 227         * needs to be able to do this anyway..
 228         *
 229         * We need to do this before we release the directory semaphore.
 230         */
 231        dentry->d_op = &autofs_dentry_operations;
 232        dentry->d_flags |= DCACHE_AUTOFS_PENDING;
 233        d_add(dentry, NULL);
 234
 235        mutex_unlock(&dir->i_mutex);
 236        autofs_revalidate(dentry, nd);
 237        mutex_lock(&dir->i_mutex);
 238
 239        /*
 240         * If we are still pending, check if we had to handle
 241         * a signal. If so we can force a restart..
 242         */
 243        if (dentry->d_flags & DCACHE_AUTOFS_PENDING) {
 244                /* See if we were interrupted */
 245                if (signal_pending(current)) {
 246                        sigset_t *sigset = &current->pending.signal;
 247                        if (sigismember (sigset, SIGKILL) ||
 248                            sigismember (sigset, SIGQUIT) ||
 249                            sigismember (sigset, SIGINT)) {
 250                                unlock_kernel();
 251                                return ERR_PTR(-ERESTARTNOINTR);
 252                        }
 253                }
 254        }
 255        unlock_kernel();
 256
 257        /*
 258         * If this dentry is unhashed, then we shouldn't honour this
 259         * lookup even if the dentry is positive.  Returning ENOENT here
 260         * doesn't do the right thing for all system calls, but it should
 261         * be OK for the operations we permit from an autofs.
 262         */
 263        if (dentry->d_inode && d_unhashed(dentry))
 264                return ERR_PTR(-ENOENT);
 265
 266        return NULL;
 267}
 268
 269static int autofs_root_symlink(struct inode *dir, struct dentry *dentry, const char *symname)
 270{
 271        struct autofs_sb_info *sbi = autofs_sbi(dir->i_sb);
 272        struct autofs_dirhash *dh = &sbi->dirhash;
 273        struct autofs_dir_ent *ent;
 274        unsigned int n;
 275        int slsize;
 276        struct autofs_symlink *sl;
 277        struct inode *inode;
 278
 279        DPRINTK(("autofs_root_symlink: %s <- ", symname));
 280        autofs_say(dentry->d_name.name,dentry->d_name.len);
 281
 282        lock_kernel();
 283        if (!autofs_oz_mode(sbi)) {
 284                unlock_kernel();
 285                return -EACCES;
 286        }
 287
 288        if (autofs_hash_lookup(dh, &dentry->d_name)) {
 289                unlock_kernel();
 290                return -EEXIST;
 291        }
 292
 293        n = find_first_zero_bit(sbi->symlink_bitmap,AUTOFS_MAX_SYMLINKS);
 294        if (n >= AUTOFS_MAX_SYMLINKS) {
 295                unlock_kernel();
 296                return -ENOSPC;
 297        }
 298
 299        set_bit(n,sbi->symlink_bitmap);
 300        sl = &sbi->symlink[n];
 301        sl->len = strlen(symname);
 302        sl->data = kmalloc(slsize = sl->len+1, GFP_KERNEL);
 303        if (!sl->data) {
 304                clear_bit(n,sbi->symlink_bitmap);
 305                unlock_kernel();
 306                return -ENOSPC;
 307        }
 308
 309        ent = kmalloc(sizeof(struct autofs_dir_ent), GFP_KERNEL);
 310        if (!ent) {
 311                kfree(sl->data);
 312                clear_bit(n,sbi->symlink_bitmap);
 313                unlock_kernel();
 314                return -ENOSPC;
 315        }
 316
 317        ent->name = kmalloc(dentry->d_name.len+1, GFP_KERNEL);
 318        if (!ent->name) {
 319                kfree(sl->data);
 320                kfree(ent);
 321                clear_bit(n,sbi->symlink_bitmap);
 322                unlock_kernel();
 323                return -ENOSPC;
 324        }
 325
 326        memcpy(sl->data,symname,slsize);
 327        sl->mtime = get_seconds();
 328
 329        ent->ino = AUTOFS_FIRST_SYMLINK + n;
 330        ent->hash = dentry->d_name.hash;
 331        memcpy(ent->name, dentry->d_name.name, 1+(ent->len = dentry->d_name.len));
 332        ent->dentry = NULL;     /* We don't keep the dentry for symlinks */
 333
 334        autofs_hash_insert(dh,ent);
 335
 336        inode = autofs_iget(dir->i_sb, ent->ino);
 337        if (IS_ERR(inode))
 338                return PTR_ERR(inode);
 339
 340        d_instantiate(dentry, inode);
 341        unlock_kernel();
 342        return 0;
 343}
 344
 345/*
 346 * NOTE!
 347 *
 348 * Normal filesystems would do a "d_delete()" to tell the VFS dcache
 349 * that the file no longer exists. However, doing that means that the
 350 * VFS layer can turn the dentry into a negative dentry, which we
 351 * obviously do not want (we're dropping the entry not because it
 352 * doesn't exist, but because it has timed out).
 353 *
 354 * Also see autofs_root_rmdir()..
 355 */
 356static int autofs_root_unlink(struct inode *dir, struct dentry *dentry)
 357{
 358        struct autofs_sb_info *sbi = autofs_sbi(dir->i_sb);
 359        struct autofs_dirhash *dh = &sbi->dirhash;
 360        struct autofs_dir_ent *ent;
 361        unsigned int n;
 362
 363        /* This allows root to remove symlinks */
 364        lock_kernel();
 365        if (!autofs_oz_mode(sbi) && !capable(CAP_SYS_ADMIN)) {
 366                unlock_kernel();
 367                return -EACCES;
 368        }
 369
 370        ent = autofs_hash_lookup(dh, &dentry->d_name);
 371        if (!ent) {
 372                unlock_kernel();
 373                return -ENOENT;
 374        }
 375
 376        n = ent->ino - AUTOFS_FIRST_SYMLINK;
 377        if (n >= AUTOFS_MAX_SYMLINKS) {
 378                unlock_kernel();
 379                return -EISDIR; /* It's a directory, dummy */
 380        }
 381        if (!test_bit(n,sbi->symlink_bitmap)) {
 382                unlock_kernel();
 383                return -EINVAL; /* Nonexistent symlink?  Shouldn't happen */
 384        }
 385        
 386        dentry->d_time = (unsigned long)(struct autofs_dirhash *)NULL;
 387        autofs_hash_delete(ent);
 388        clear_bit(n,sbi->symlink_bitmap);
 389        kfree(sbi->symlink[n].data);
 390        d_drop(dentry);
 391        
 392        unlock_kernel();
 393        return 0;
 394}
 395
 396static int autofs_root_rmdir(struct inode *dir, struct dentry *dentry)
 397{
 398        struct autofs_sb_info *sbi = autofs_sbi(dir->i_sb);
 399        struct autofs_dirhash *dh = &sbi->dirhash;
 400        struct autofs_dir_ent *ent;
 401
 402        lock_kernel();
 403        if (!autofs_oz_mode(sbi)) {
 404                unlock_kernel();
 405                return -EACCES;
 406        }
 407
 408        ent = autofs_hash_lookup(dh, &dentry->d_name);
 409        if (!ent) {
 410                unlock_kernel();
 411                return -ENOENT;
 412        }
 413
 414        if ((unsigned int)ent->ino < AUTOFS_FIRST_DIR_INO) {
 415                unlock_kernel();
 416                return -ENOTDIR; /* Not a directory */
 417        }
 418
 419        if (ent->dentry != dentry) {
 420                printk("autofs_rmdir: odentry != dentry for entry %s\n", dentry->d_name.name);
 421        }
 422
 423        dentry->d_time = (unsigned long)(struct autofs_dir_ent *)NULL;
 424        autofs_hash_delete(ent);
 425        drop_nlink(dir);
 426        d_drop(dentry);
 427        unlock_kernel();
 428
 429        return 0;
 430}
 431
 432static int autofs_root_mkdir(struct inode *dir, struct dentry *dentry, int mode)
 433{
 434        struct autofs_sb_info *sbi = autofs_sbi(dir->i_sb);
 435        struct autofs_dirhash *dh = &sbi->dirhash;
 436        struct autofs_dir_ent *ent;
 437        struct inode *inode;
 438        ino_t ino;
 439
 440        lock_kernel();
 441        if (!autofs_oz_mode(sbi)) {
 442                unlock_kernel();
 443                return -EACCES;
 444        }
 445
 446        ent = autofs_hash_lookup(dh, &dentry->d_name);
 447        if (ent) {
 448                unlock_kernel();
 449                return -EEXIST;
 450        }
 451
 452        if (sbi->next_dir_ino < AUTOFS_FIRST_DIR_INO) {
 453                printk("autofs: Out of inode numbers -- what the heck did you do??\n");
 454                unlock_kernel();
 455                return -ENOSPC;
 456        }
 457        ino = sbi->next_dir_ino++;
 458
 459        ent = kmalloc(sizeof(struct autofs_dir_ent), GFP_KERNEL);
 460        if (!ent) {
 461                unlock_kernel();
 462                return -ENOSPC;
 463        }
 464
 465        ent->name = kmalloc(dentry->d_name.len+1, GFP_KERNEL);
 466        if (!ent->name) {
 467                kfree(ent);
 468                unlock_kernel();
 469                return -ENOSPC;
 470        }
 471
 472        ent->hash = dentry->d_name.hash;
 473        memcpy(ent->name, dentry->d_name.name, 1+(ent->len = dentry->d_name.len));
 474        ent->ino = ino;
 475        ent->dentry = dentry;
 476        autofs_hash_insert(dh,ent);
 477
 478        inc_nlink(dir);
 479
 480        inode = autofs_iget(dir->i_sb, ino);
 481        if (IS_ERR(inode)) {
 482                drop_nlink(dir);
 483                return PTR_ERR(inode);
 484        }
 485
 486        d_instantiate(dentry, inode);
 487        unlock_kernel();
 488
 489        return 0;
 490}
 491
 492/* Get/set timeout ioctl() operation */
 493static inline int autofs_get_set_timeout(struct autofs_sb_info *sbi,
 494                                         unsigned long __user *p)
 495{
 496        unsigned long ntimeout;
 497
 498        if (get_user(ntimeout, p) ||
 499            put_user(sbi->exp_timeout / HZ, p))
 500                return -EFAULT;
 501
 502        if (ntimeout > ULONG_MAX/HZ)
 503                sbi->exp_timeout = 0;
 504        else
 505                sbi->exp_timeout = ntimeout * HZ;
 506
 507        return 0;
 508}
 509
 510/* Return protocol version */
 511static inline int autofs_get_protover(int __user *p)
 512{
 513        return put_user(AUTOFS_PROTO_VERSION, p);
 514}
 515
 516/* Perform an expiry operation */
 517static inline int autofs_expire_run(struct super_block *sb,
 518                                    struct autofs_sb_info *sbi,
 519                                    struct vfsmount *mnt,
 520                                    struct autofs_packet_expire __user *pkt_p)
 521{
 522        struct autofs_dir_ent *ent;
 523        struct autofs_packet_expire pkt;
 524
 525        memset(&pkt,0,sizeof pkt);
 526
 527        pkt.hdr.proto_version = AUTOFS_PROTO_VERSION;
 528        pkt.hdr.type = autofs_ptype_expire;
 529
 530        if (!sbi->exp_timeout || !(ent = autofs_expire(sb,sbi,mnt)))
 531                return -EAGAIN;
 532
 533        pkt.len = ent->len;
 534        memcpy(pkt.name, ent->name, pkt.len);
 535        pkt.name[pkt.len] = '\0';
 536
 537        if (copy_to_user(pkt_p, &pkt, sizeof(struct autofs_packet_expire)))
 538                return -EFAULT;
 539
 540        return 0;
 541}
 542
 543/*
 544 * ioctl()'s on the root directory is the chief method for the daemon to
 545 * generate kernel reactions
 546 */
 547static int autofs_root_ioctl(struct inode *inode, struct file *filp,
 548                             unsigned int cmd, unsigned long arg)
 549{
 550        struct autofs_sb_info *sbi = autofs_sbi(inode->i_sb);
 551        void __user *argp = (void __user *)arg;
 552
 553        DPRINTK(("autofs_ioctl: cmd = 0x%08x, arg = 0x%08lx, sbi = %p, pgrp = %u\n",cmd,arg,sbi,task_pgrp_nr(current)));
 554
 555        if (_IOC_TYPE(cmd) != _IOC_TYPE(AUTOFS_IOC_FIRST) ||
 556             _IOC_NR(cmd) - _IOC_NR(AUTOFS_IOC_FIRST) >= AUTOFS_IOC_COUNT)
 557                return -ENOTTY;
 558        
 559        if (!autofs_oz_mode(sbi) && !capable(CAP_SYS_ADMIN))
 560                return -EPERM;
 561        
 562        switch(cmd) {
 563        case AUTOFS_IOC_READY:  /* Wait queue: go ahead and retry */
 564                return autofs_wait_release(sbi,(autofs_wqt_t)arg,0);
 565        case AUTOFS_IOC_FAIL:   /* Wait queue: fail with ENOENT */
 566                return autofs_wait_release(sbi,(autofs_wqt_t)arg,-ENOENT);
 567        case AUTOFS_IOC_CATATONIC: /* Enter catatonic mode (daemon shutdown) */
 568                autofs_catatonic_mode(sbi);
 569                return 0;
 570        case AUTOFS_IOC_PROTOVER: /* Get protocol version */
 571                return autofs_get_protover(argp);
 572        case AUTOFS_IOC_SETTIMEOUT:
 573                return autofs_get_set_timeout(sbi, argp);
 574        case AUTOFS_IOC_EXPIRE:
 575                return autofs_expire_run(inode->i_sb, sbi, filp->f_path.mnt,
 576                                         argp);
 577        default:
 578                return -ENOSYS;
 579        }
 580}
 581