procprotect.c

   1 #include <linux/module.h>
   2 #include <linux/moduleparam.h>
   3 #include <linux/types.h>
   4 #include <linux/kernel.h>
   5 #include <linux/fs_struct.h>
   6 #include <linux/fs.h>
   7 #include <linux/mm.h>
   8 #include <linux/reboot.h>
   9 #include <linux/delay.h>
  10 #include <linux/proc_fs.h>
  11 #include <asm/uaccess.h>
  12 #include <linux/sysrq.h>
  13 #include <linux/timer.h>
  14 #include <linux/time.h>
  15 #include <linux/lglock.h>
  16 #include <linux/init.h>
  17 #include <linux/idr.h>
  18 #include <linux/namei.h>
  19 #include <linux/bitops.h>
  20 #include <linux/mount.h>
  21 #include <linux/dcache.h>
  22 #include <linux/spinlock.h>
  23 #include <linux/completion.h>
  24 #include <linux/sched.h>
  25 #include <linux/seq_file.h>
  26 #include <linux/kprobes.h>
  27 #include <linux/kallsyms.h>
  28 #include <linux/nsproxy.h>
  29
  30 #define VERSION_STR "0.0.1"
  31
  32 #ifndef CONFIG_X86_64
  33 #error "This code does not support your architecture"
  34 #endif
  35
  36 static char *aclpath = "procprotect";
  37 static struct qstr aclqpath;
  38
  39 module_param(aclpath, charp, 0);
  40 MODULE_PARM_DESC(aclpath, "Root of directory that stores acl tags for /proc files.");
  41
  42 MODULE_AUTHOR("Sapan Bhatia <sapanb@cs.princeton.edu>");
  43 MODULE_DESCRIPTION("Lightweight ACLs for /proc.");
  44 MODULE_LICENSE("GPL");
  45 MODULE_VERSION(VERSION_STR);
  46
  47 struct procprotect_ctx {
  48     struct inode **inode;
  49     struct qstr *q;
  50     struct path *path;
  51     int flags;
  52 };
  53
  54 struct acl_entry {
  55     unsigned int ino;
  56     struct hlist_node hlist;
  57 };
  58
  59 #define HASH_SIZE (1<<16)
  60
  61 struct hlist_head procprotect_hash[HASH_SIZE];
  62
  63 struct proc_dir_entry *proc_entry;
  64
  65 static int run_acl(unsigned long ino) {
  66     struct hlist_node *n;
  67     struct acl_entry *entry;
  68     hlist_for_each_entry_rcu(entry,
  69             n, &procprotect_hash[ino & (HASH_SIZE-1)],
  70             hlist) {
  71         if (entry->ino==ino) {
  72             return 0;
  73         }
  74     }
  75     return 1;
  76 }
  77
  78 /*
  79    Entry point of intercepted call. We need to do two things here:
  80    - Decide if we need the heavier return hook to be called
  81    - Save the first argument, which is in a register, for consideration in the return hook
  82    */
  83 static int lookup_fast_entry(struct kretprobe_instance *ri, struct pt_regs *regs) {
  84     int ret = -1;
  85     struct procprotect_ctx *ctx;
  86     struct nameidata *nd = (struct nameidata *) regs->di;
  87     struct qstr *q = (struct qstr *) regs->si;
  88     struct dentry *parent = nd->path.dentry;
  89     struct inode *pinode = parent->d_inode;
  90
  91     if (pinode->i_sb->s_magic == PROC_SUPER_MAGIC
  92             && current->nsproxy->mnt_ns!=init_task.nsproxy->mnt_ns) {
  93         ctx = (struct procprotect_ctx *) ri->data;
  94         ctx->inode = regs->cx;
  95         ctx->flags = nd->flags;
  96         ret = 0;
  97     }
  98
  99     return ret;
 100 }
 101
 102 /* The entry hook ensures that the return hook is only called for
 103    accesses to /proc */
 104
 105 int printed=0;
 106
 107 static int lookup_fast_ret(struct kretprobe_instance *ri, struct pt_regs *regs)
 108 {
 109     struct procprotect_ctx *ctx = (struct procprotect_ctx *) ri->data;
 110     int ret = regs->ax;
 111
 112     if (ret==0) {
 113         /* The kernel is going to honor the request. Here's where we step in */
 114         struct inode *inode = *(ctx->inode);
 115         if (!run_acl(inode->i_ino)) {
 116             regs->ax = -EPERM;
 117         }
 118     }
 119
 120
 121     return 0;
 122 }
 123
 124 static int lookup_slow_entry(struct kretprobe_instance *ri, struct pt_regs *regs) {
 125     int ret = -1;
 126     struct procprotect_ctx *ctx;
 127     struct nameidata *nd = (struct nameidata *) regs->di;
 128     struct qstr *q = (struct qstr *) regs->si;
 129     struct path *p = (struct path *) regs->dx;
 130
 131     struct dentry *parent = nd->path.dentry;
 132     struct inode *pinode = parent->d_inode;
 133
 134
 135
 136     if (pinode->i_sb->s_magic == PROC_SUPER_MAGIC
 137             && current->nsproxy->mnt_ns!=init_task.nsproxy->mnt_ns) {
 138
 139         ctx = (struct procprotect_ctx *) ri->data;
 140         ctx->q = q;
 141         ctx->flags = nd->flags;
 142         ctx->path = p;
 143         ret = 0;
 144     }
 145
 146     return ret;
 147 }
 148
 149 /* The entry hook ensures that the return hook is only called for
 150    accesses to /proc */
 151
 152 static int lookup_slow_ret(struct kretprobe_instance *ri, struct pt_regs *regs)
 153 {
 154     struct procprotect_ctx *ctx = (struct procprotect_ctx *) ri->data;
 155     int ret = regs->ax;
 156
 157     if (ret==0) {
 158         /* The kernel is going to honor the request. Here's where we step in */
 159         /*struct qstr *q = ctx->q;
 160         if (!strncmp(q->name,"sysrq-trigger",13)) {
 161             printk(KERN_CRIT "lookup_slow sysrqtrigger");
 162         }*/
 163         struct path *p = ctx->path;
 164         struct inode *inode = p->dentry->d_inode;
 165         if (!run_acl(inode->i_ino)) {
 166             regs->ax = -EPERM;
 167         }
 168     }
 169
 170     return 0;
 171 }
 172
 173 struct open_flags {
 174   int open_flag;
 175   umode_t mode;
 176   int acc_mode;
 177   int intent;
 178 };
 179
 180 static struct file *do_last_probe(struct nameidata *nd, struct path *path, struct file *file,
 181                          struct open_flags *op, const char *pathname) {
 182     struct dentry *parent = nd->path.dentry;
 183     struct inode *pinode = parent->d_inode;
 184     struct qstr *q = &nd->last;
 185
 186
 187     if (pinode->i_sb->s_magic == PROC_SUPER_MAGIC && current->nsproxy->mnt_ns!=init_task.nsproxy->mnt_ns) {
 188         /*if (!strncmp(q->name,"sysrq-trigger",13)) {
 189             printk(KERN_CRIT "do_last sysrqtrigger: %d",op->open_flag);
 190         }*/
 191         op->open_flag &= ~O_CREAT;
 192     }
 193     jprobe_return();
 194 }
 195
 196 static struct jprobe dolast_probe = {
 197         .entry = (kprobe_opcode_t *) do_last_probe
 198 };
 199
 200 static struct kretprobe fast_probe = {
 201     .entry_handler = (kprobe_opcode_t *) lookup_fast_entry,
 202     .handler = (kprobe_opcode_t *) lookup_fast_ret,
 203     .maxactive = 20,
 204     .data_size = sizeof(struct procprotect_ctx)
 205 };
 206
 207 static struct kretprobe slow_probe = {
 208     .entry_handler = (kprobe_opcode_t *) lookup_slow_entry,
 209     .handler = (kprobe_opcode_t *) lookup_slow_ret,
 210     .maxactive = 20,
 211     .data_size = sizeof(struct procprotect_ctx)
 212 };
 213
 214 static void add_entry(char *pathname) {
 215     struct path path;
 216     if (kern_path(pathname, 0, &path)) {
 217         printk(KERN_CRIT "Path lookup failed for %s",pathname);
 218     }
 219     else {
 220         unsigned int ino = path.dentry->d_inode->i_ino;
 221         struct acl_entry *entry;
 222         entry = kmalloc(GFP_KERNEL, sizeof(struct acl_entry));
 223         entry->ino = ino;
 224
 225         if (!entry) {
 226             printk(KERN_CRIT "Could not allocate memory for %s",pathname);
 227         }
 228         else {
 229             if (run_acl(ino)) {
 230                 hlist_add_head_rcu(&entry->hlist,&procprotect_hash[ino&(HASH_SIZE-1)]);
 231                 printk(KERN_CRIT "Added inode %u",ino);
 232             }
 233             else {
 234                 printk(KERN_CRIT "Did not add inode %u, already in list", ino);
 235             }
 236         }
 237     }
 238 }
 239
 240
 241 static void __exit procprotect_exit(void)
 242 {
 243     unregister_kretprobe(&fast_probe);
 244     unregister_kretprobe(&slow_probe);
 245         unregister_jprobe(&dolast_probe);
 246     struct hlist_node *n;
 247     struct acl_entry *entry;
 248     int i;
 249
 250     for (i=0;i<HASH_SIZE;i++) {
 251         hlist_for_each_entry_rcu(entry,
 252                 n, &procprotect_hash[i],
 253                 hlist) {
 254             kfree(entry);
 255         }
 256     }
 257
 258     remove_proc_entry("procprotect",NULL);
 259     printk("Procprotect: Stopped procprotect.\n");
 260 }
 261
 262
 263
 264 int procfile_write(struct file *file, const char *buffer, unsigned long count, void *data) {
 265     char pathname[PATH_MAX];
 266
 267     if (current->nsproxy->mnt_ns!=init_task.nsproxy->mnt_ns)
 268         return -EPERM;
 269
 270     if (copy_from_user(pathname, buffer, count)) {
 271         return -EFAULT;
 272     }
 273     if (count && (pathname[count-1]==10 || pathname[count-1]==13)) {
 274         pathname[count-1]='\0';
 275     }
 276     else
 277         pathname[count]='\0';
 278
 279     add_entry(pathname);
 280     printk(KERN_CRIT "Length of buffer=%d",strlen(pathname));
 281     return count;
 282 }
 283
 284 static int __init procprotect_init(void)
 285 {
 286     printk("Procprotect: starting procprotect version %s with ACLs at path %s.\n",
 287             VERSION_STR, aclpath);
 288     int ret;
 289     int i;
 290
 291     for(i=0;i<HASH_SIZE;i++) {
 292         INIT_HLIST_HEAD(&procprotect_hash[i]);
 293     }
 294
 295     aclqpath.name = aclpath;
 296     aclqpath.len = strnlen(aclpath, PATH_MAX);
 297
 298     dolast_probe.kp.addr =
 299         (kprobe_opcode_t *) kallsyms_lookup_name("do_last");
 300
 301     if (!dolast_probe.kp.addr) {
 302         printk("Couldn't find %s to plant kretprobe\n", "do_last");
 303         return -1;
 304     }
 305
 306     if ((ret = register_jprobe(&dolast_probe)) <0) {
 307                   printk("register_jprobe failed, returned %u\n", ret);
 308                   return -1;
 309     }
 310     fast_probe.kp.addr =
 311         (kprobe_opcode_t *) kallsyms_lookup_name("lookup_fast");
 312     if (!fast_probe.kp.addr) {
 313         printk("Couldn't find %s to plant kretprobe\n", "lookup_fast");
 314         return -1;
 315     }
 316
 317     slow_probe.kp.addr =
 318         (kprobe_opcode_t *) kallsyms_lookup_name("lookup_slow");
 319     if (!slow_probe.kp.addr) {
 320         printk("Couldn't find %s to plant kretprobe\n", "lookup_slow");
 321         return -1;
 322     }
 323
 324
 325
 326     if ((ret = register_kretprobe(&fast_probe)) <0) {
 327         printk("register_kretprobe failed, returned %d\n", ret);
 328         return -1;
 329     }
 330
 331     printk("Planted kretprobe at %p, handler addr %p\n",
 332             fast_probe.kp.addr, fast_probe.handler);
 333
 334     if ((ret = register_kretprobe(&slow_probe)) <0) {
 335         printk("register_kretprobe failed, returned %d\n", ret);
 336         return -1;
 337     }
 338     printk("Planted kretprobe at %p, handler addr %p\n",
 339             slow_probe.kp.addr, slow_probe.handler);
 340
 341     proc_entry = create_proc_entry("procprotect", 0644, NULL);
 342     proc_entry->write_proc = procfile_write;
 343
 344     return ret;
 345 }
 346
 347
 348
 349 module_init(procprotect_init);
 350 module_exit(procprotect_exit);