fs/proc/proc_sysctl.c

   1 /*
   2  * /proc/sys support
   3  */
   4 #include <linux/init.h>
   5 #include <linux/sysctl.h>
   6 #include <linux/proc_fs.h>
   7 #include <linux/security.h>
   8 #include <linux/namei.h>
   9 #include "internal.h"
  10
  11 static const struct dentry_operations proc_sys_dentry_operations;
  12 static const struct file_operations proc_sys_file_operations;
  13 static const struct inode_operations proc_sys_inode_operations;
  14 static const struct file_operations proc_sys_dir_file_operations;
  15 static const struct inode_operations proc_sys_dir_operations;
  16
  17 static struct inode *proc_sys_make_inode(struct super_block *sb,
  18                 struct ctl_table_header *head, struct ctl_table *table)
  19 {
  20         struct inode *inode;
  21         struct proc_inode *ei;
  22
  23         inode = new_inode(sb);
  24         if (!inode)
  25                 goto out;
  26
  27         inode->i_ino = get_next_ino();
  28
  29         sysctl_head_get(head);
  30         ei = PROC_I(inode);
  31         ei->sysctl = head;
  32         ei->sysctl_entry = table;
  33
  34         inode->i_mtime = inode->i_atime = inode->i_ctime = CURRENT_TIME;
  35         inode->i_flags |= S_PRIVATE; /* tell selinux to ignore this inode */
  36         inode->i_mode = table->mode;
  37         if (!table->child) {
  38                 inode->i_mode |= S_IFREG;
  39                 inode->i_op = &proc_sys_inode_operations;
  40                 inode->i_fop = &proc_sys_file_operations;
  41         } else {
  42                 inode->i_mode |= S_IFDIR;
  43                 inode->i_nlink = 0;
  44                 inode->i_op = &proc_sys_dir_operations;
  45                 inode->i_fop = &proc_sys_dir_file_operations;
  46         }
  47 out:
  48         return inode;
  49 }
  50
  51 static struct ctl_table *find_in_table(struct ctl_table *p, struct qstr *name)
  52 {
  53         int len;
  54         for ( ; p->procname; p++) {
  55
  56                 if (!p->procname)
  57                         continue;
  58
  59                 len = strlen(p->procname);
  60                 if (len != name->len)
  61                         continue;
  62
  63                 if (memcmp(p->procname, name->name, len) != 0)
  64                         continue;
  65
  66                 /* I have a match */
  67                 return p;
  68         }
  69         return NULL;
  70 }
  71
  72 static struct ctl_table_header *grab_header(struct inode *inode)
  73 {
  74         if (PROC_I(inode)->sysctl)
  75                 return sysctl_head_grab(PROC_I(inode)->sysctl);
  76         else
  77                 return sysctl_head_next(NULL);
  78 }
  79
  80 static struct dentry *proc_sys_lookup(struct inode *dir, struct dentry *dentry,
  81                                         struct nameidata *nd)
  82 {
  83         struct ctl_table_header *head = grab_header(dir);
  84         struct ctl_table *table = PROC_I(dir)->sysctl_entry;
  85         struct ctl_table_header *h = NULL;
  86         struct qstr *name = &dentry->d_name;
  87         struct ctl_table *p;
  88         struct inode *inode;
  89         struct dentry *err = ERR_PTR(-ENOENT);
  90
  91         if (IS_ERR(head))
  92                 return ERR_CAST(head);
  93
  94         if (table && !table->child) {
  95                 WARN_ON(1);
  96                 goto out;
  97         }
  98
  99         table = table ? table->child : head->ctl_table;
 100
 101         p = find_in_table(table, name);
 102         if (!p) {
 103                 for (h = sysctl_head_next(NULL); h; h = sysctl_head_next(h)) {
 104                         if (h->attached_to != table)
 105                                 continue;
 106                         p = find_in_table(h->attached_by, name);
 107                         if (p)
 108                                 break;
 109                 }
 110         }
 111
 112         if (!p)
 113                 goto out;
 114
 115         err = ERR_PTR(-ENOMEM);
 116         inode = proc_sys_make_inode(dir->i_sb, h ? h : head, p);
 117         if (h)
 118                 sysctl_head_finish(h);
 119
 120         if (!inode)
 121                 goto out;
 122
 123         err = NULL;
 124         d_set_d_op(dentry, &proc_sys_dentry_operations);
 125         d_add(dentry, inode);
 126
 127 out:
 128         sysctl_head_finish(head);
 129         return err;
 130 }
 131
 132 static ssize_t proc_sys_call_handler(struct file *filp, void __user *buf,
 133                 size_t count, loff_t *ppos, int write)
 134 {
 135         struct inode *inode = filp->f_path.dentry->d_inode;
 136         struct ctl_table_header *head = grab_header(inode);
 137         struct ctl_table *table = PROC_I(inode)->sysctl_entry;
 138         ssize_t error;
 139         size_t res;
 140
 141         if (IS_ERR(head))
 142                 return PTR_ERR(head);
 143
 144         /*
 145          * At this point we know that the sysctl was not unregistered
 146          * and won't be until we finish.
 147          */
 148         error = -EPERM;
 149         if (sysctl_perm(head->root, table, write ? MAY_WRITE : MAY_READ))
 150                 goto out;
 151
 152         /* if that can happen at all, it should be -EINVAL, not -EISDIR */
 153         error = -EINVAL;
 154         if (!table->proc_handler)
 155                 goto out;
 156
 157         /* careful: calling conventions are nasty here */
 158         res = count;
 159         error = table->proc_handler(table, write, buf, &res, ppos);
 160         if (!error)
 161                 error = res;
 162 out:
 163         sysctl_head_finish(head);
 164
 165         return error;
 166 }
 167
 168 static ssize_t proc_sys_read(struct file *filp, char __user *buf,
 169                                 size_t count, loff_t *ppos)
 170 {
 171         return proc_sys_call_handler(filp, (void __user *)buf, count, ppos, 0);
 172 }
 173
 174 static ssize_t proc_sys_write(struct file *filp, const char __user *buf,
 175                                 size_t count, loff_t *ppos)
 176 {
 177         return proc_sys_call_handler(filp, (void __user *)buf, count, ppos, 1);
 178 }
 179
 180
 181 static int proc_sys_fill_cache(struct file *filp, void *dirent,
 182                                 filldir_t filldir,
 183                                 struct ctl_table_header *head,
 184                                 struct ctl_table *table)
 185 {
 186         struct dentry *child, *dir = filp->f_path.dentry;
 187         struct inode *inode;
 188         struct qstr qname;
 189         ino_t ino = 0;
 190         unsigned type = DT_UNKNOWN;
 191
 192         qname.name = table->procname;
 193         qname.len  = strlen(table->procname);
 194         qname.hash = full_name_hash(qname.name, qname.len);
 195
 196         child = d_lookup(dir, &qname);
 197         if (!child) {
 198                 child = d_alloc(dir, &qname);
 199                 if (child) {
 200                         inode = proc_sys_make_inode(dir->d_sb, head, table);
 201                         if (!inode) {
 202                                 dput(child);
 203                                 return -ENOMEM;
 204                         } else {
 205                                 d_set_d_op(child, &proc_sys_dentry_operations);
 206                                 d_add(child, inode);
 207                         }
 208                 } else {
 209                         return -ENOMEM;
 210                 }
 211         }
 212         inode = child->d_inode;
 213         ino  = inode->i_ino;
 214         type = inode->i_mode >> 12;
 215         dput(child);
 216         return !!filldir(dirent, qname.name, qname.len, filp->f_pos, ino, type);
 217 }
 218
 219 static int scan(struct ctl_table_header *head, ctl_table *table,
 220                 unsigned long *pos, struct file *file,
 221                 void *dirent, filldir_t filldir)
 222 {
 223
 224         for (; table->procname; table++, (*pos)++) {
 225                 int res;
 226
 227                 /* Can't do anything without a proc name */
 228                 if (!table->procname)
 229                         continue;
 230
 231                 if (*pos < file->f_pos)
 232                         continue;
 233
 234                 res = proc_sys_fill_cache(file, dirent, filldir, head, table);
 235                 if (res)
 236                         return res;
 237
 238                 file->f_pos = *pos + 1;
 239         }
 240         return 0;
 241 }
 242
 243 static int proc_sys_readdir(struct file *filp, void *dirent, filldir_t filldir)
 244 {
 245         struct dentry *dentry = filp->f_path.dentry;
 246         struct inode *inode = dentry->d_inode;
 247         struct ctl_table_header *head = grab_header(inode);
 248         struct ctl_table *table = PROC_I(inode)->sysctl_entry;
 249         struct ctl_table_header *h = NULL;
 250         unsigned long pos;
 251         int ret = -EINVAL;
 252
 253         if (IS_ERR(head))
 254                 return PTR_ERR(head);
 255
 256         if (table && !table->child) {
 257                 WARN_ON(1);
 258                 goto out;
 259         }
 260
 261         table = table ? table->child : head->ctl_table;
 262
 263         ret = 0;
 264         /* Avoid a switch here: arm builds fail with missing __cmpdi2 */
 265         if (filp->f_pos == 0) {
 266                 if (filldir(dirent, ".", 1, filp->f_pos,
 267                                 inode->i_ino, DT_DIR) < 0)
 268                         goto out;
 269                 filp->f_pos++;
 270         }
 271         if (filp->f_pos == 1) {
 272                 if (filldir(dirent, "..", 2, filp->f_pos,
 273                                 parent_ino(dentry), DT_DIR) < 0)
 274                         goto out;
 275                 filp->f_pos++;
 276         }
 277         pos = 2;
 278
 279         ret = scan(head, table, &pos, filp, dirent, filldir);
 280         if (ret)
 281                 goto out;
 282
 283         for (h = sysctl_head_next(NULL); h; h = sysctl_head_next(h)) {
 284                 if (h->attached_to != table)
 285                         continue;
 286                 ret = scan(h, h->attached_by, &pos, filp, dirent, filldir);
 287                 if (ret) {
 288                         sysctl_head_finish(h);
 289                         break;
 290                 }
 291         }
 292         ret = 1;
 293 out:
 294         sysctl_head_finish(head);
 295         return ret;
 296 }
 297
 298 static int proc_sys_permission(struct inode *inode, int mask,unsigned int flags)
 299 {
 300         /*
 301          * sysctl entries that are not writeable,
 302          * are _NOT_ writeable, capabilities or not.
 303          */
 304         struct ctl_table_header *head;
 305         struct ctl_table *table;
 306         int error;
 307
 308         if (flags & IPERM_FLAG_RCU)
 309                 return -ECHILD;
 310
 311         /* Executable files are not allowed under /proc/sys/ */
 312         if ((mask & MAY_EXEC) && S_ISREG(inode->i_mode))
 313                 return -EACCES;
 314
 315         head = grab_header(inode);
 316         if (IS_ERR(head))
 317                 return PTR_ERR(head);
 318
 319         table = PROC_I(inode)->sysctl_entry;
 320         if (!table) /* global root - r-xr-xr-x */
 321                 error = mask & MAY_WRITE ? -EACCES : 0;
 322         else /* Use the permissions on the sysctl table entry */
 323                 error = sysctl_perm(head->root, table, mask);
 324
 325         sysctl_head_finish(head);
 326         return error;
 327 }
 328
 329 static int proc_sys_setattr(struct dentry *dentry, struct iattr *attr)
 330 {
 331         struct inode *inode = dentry->d_inode;
 332         int error;
 333
 334         if (attr->ia_valid & (ATTR_MODE | ATTR_UID | ATTR_GID))
 335                 return -EPERM;
 336
 337         error = inode_change_ok(inode, attr);
 338         if (error)
 339                 return error;
 340
 341         if ((attr->ia_valid & ATTR_SIZE) &&
 342             attr->ia_size != i_size_read(inode)) {
 343                 error = vmtruncate(inode, attr->ia_size);
 344                 if (error)
 345                         return error;
 346         }
 347
 348         setattr_copy(inode, attr);
 349         mark_inode_dirty(inode);
 350         return 0;
 351 }
 352
 353 static int proc_sys_getattr(struct vfsmount *mnt, struct dentry *dentry, struct kstat *stat)
 354 {
 355         struct inode *inode = dentry->d_inode;
 356         struct ctl_table_header *head = grab_header(inode);
 357         struct ctl_table *table = PROC_I(inode)->sysctl_entry;
 358
 359         if (IS_ERR(head))
 360                 return PTR_ERR(head);
 361
 362         generic_fillattr(inode, stat);
 363         if (table)
 364                 stat->mode = (stat->mode & S_IFMT) | table->mode;
 365
 366         sysctl_head_finish(head);
 367         return 0;
 368 }
 369
 370 static const struct file_operations proc_sys_file_operations = {
 371         .read           = proc_sys_read,
 372         .write          = proc_sys_write,
 373         .llseek         = default_llseek,
 374 };
 375
 376 static const struct file_operations proc_sys_dir_file_operations = {
 377         .readdir        = proc_sys_readdir,
 378         .llseek         = generic_file_llseek,
 379 };
 380
 381 static const struct inode_operations proc_sys_inode_operations = {
 382         .permission     = proc_sys_permission,
 383         .setattr        = proc_sys_setattr,
 384         .getattr        = proc_sys_getattr,
 385 };
 386
 387 static const struct inode_operations proc_sys_dir_operations = {
 388         .lookup         = proc_sys_lookup,
 389         .permission     = proc_sys_permission,
 390         .setattr        = proc_sys_setattr,
 391         .getattr        = proc_sys_getattr,
 392 };
 393
 394 static int proc_sys_revalidate(struct dentry *dentry, struct nameidata *nd)
 395 {
 396         if (nd->flags & LOOKUP_RCU)
 397                 return -ECHILD;
 398         return !PROC_I(dentry->d_inode)->sysctl->unregistering;
 399 }
 400
 401 static int proc_sys_delete(const struct dentry *dentry)
 402 {
 403         return !!PROC_I(dentry->d_inode)->sysctl->unregistering;
 404 }
 405
 406 static int proc_sys_compare(const struct dentry *parent,
 407                 const struct inode *pinode,
 408                 const struct dentry *dentry, const struct inode *inode,
 409                 unsigned int len, const char *str, const struct qstr *name)
 410 {
 411         struct ctl_table_header *head;
 412         /* Although proc doesn't have negative dentries, rcu-walk means
 413          * that inode here can be NULL */
 414         /* AV: can it, indeed? */
 415         if (!inode)
 416                 return 1;
 417         if (name->len != len)
 418                 return 1;
 419         if (memcmp(name->name, str, len))
 420                 return 1;
 421         head = rcu_dereference(PROC_I(inode)->sysctl);
 422         return !head || !sysctl_is_seen(head);
 423 }
 424
 425 static const struct dentry_operations proc_sys_dentry_operations = {
 426         .d_revalidate   = proc_sys_revalidate,
 427         .d_delete       = proc_sys_delete,
 428         .d_compare      = proc_sys_compare,
 429 };
 430
 431 int __init proc_sys_init(void)
 432 {
 433         struct proc_dir_entry *proc_sys_root;
 434
 435         proc_sys_root = proc_mkdir("sys", NULL);
 436         proc_sys_root->proc_iops = &proc_sys_dir_operations;
 437         proc_sys_root->proc_fops = &proc_sys_dir_file_operations;
 438         proc_sys_root->nlink = 0;
 439         return 0;
 440 }