git.oblomov.eu Git - linux-2.6/blob - kernel/auditsc.c

   1 /* auditsc.c -- System-call auditing support
   2  * Handles all system-call specific auditing features.
   3  *
   4  * Copyright 2003-2004 Red Hat Inc., Durham, North Carolina.
   5  * All Rights Reserved.
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  *
  21  * Written by Rickard E. (Rik) Faith <faith@redhat.com>
  22  *
  23  * Many of the ideas implemented here are from Stephen C. Tweedie,
  24  * especially the idea of avoiding a copy by using getname.
  25  *
  26  * The method for actual interception of syscall entry and exit (not in
  27  * this file -- see entry.S) is based on a GPL'd patch written by
  28  * okir@suse.de and Copyright 2003 SuSE Linux AG.
  29  *
  30  */
  31
  32 #include <linux/init.h>
  33 #include <asm/types.h>
  34 #include <asm/atomic.h>
  35 #include <linux/mm.h>
  36 #include <linux/module.h>
  37 #include <linux/mount.h>
  38 #include <linux/socket.h>
  39 #include <linux/audit.h>
  40 #include <linux/personality.h>
  41 #include <linux/time.h>
  42 #include <linux/kthread.h>
  43 #include <linux/netlink.h>
  44 #include <linux/compiler.h>
  45 #include <asm/unistd.h>
  46
  47 /* 0 = no checking
  48    1 = put_count checking
  49    2 = verbose put_count checking
  50 */
  51 #define AUDIT_DEBUG 0
  52
  53 /* No syscall auditing will take place unless audit_enabled != 0. */
  54 extern int audit_enabled;
  55
  56 /* AUDIT_NAMES is the number of slots we reserve in the audit_context
  57  * for saving names from getname(). */
  58 #define AUDIT_NAMES    20
  59
  60 /* AUDIT_NAMES_RESERVED is the number of slots we reserve in the
  61  * audit_context from being used for nameless inodes from
  62  * path_lookup. */
  63 #define AUDIT_NAMES_RESERVED 7
  64
  65 /* At task start time, the audit_state is set in the audit_context using
  66    a per-task filter.  At syscall entry, the audit_state is augmented by
  67    the syscall filter. */
  68 enum audit_state {
  69         AUDIT_DISABLED,         /* Do not create per-task audit_context.
  70                                  * No syscall-specific audit records can
  71                                  * be generated. */
  72         AUDIT_SETUP_CONTEXT,    /* Create the per-task audit_context,
  73                                  * but don't necessarily fill it in at
  74                                  * syscall entry time (i.e., filter
  75                                  * instead). */
  76         AUDIT_BUILD_CONTEXT,    /* Create the per-task audit_context,
  77                                  * and always fill it in at syscall
  78                                  * entry time.  This makes a full
  79                                  * syscall record available if some
  80                                  * other part of the kernel decides it
  81                                  * should be recorded. */
  82         AUDIT_RECORD_CONTEXT    /* Create the per-task audit_context,
  83                                  * always fill it in at syscall entry
  84                                  * time, and always write out the audit
  85                                  * record at syscall exit time.  */
  86 };
  87
  88 /* When fs/namei.c:getname() is called, we store the pointer in name and
  89  * we don't let putname() free it (instead we free all of the saved
  90  * pointers at syscall exit time).
  91  *
  92  * Further, in fs/namei.c:path_lookup() we store the inode and device. */
  93 struct audit_names {
  94         const char      *name;
  95         unsigned long   ino;
  96         dev_t           dev;
  97         umode_t         mode;
  98         uid_t           uid;
  99         gid_t           gid;
 100         dev_t           rdev;
 101         unsigned        flags;
 102 };
 103
 104 struct audit_aux_data {
 105         struct audit_aux_data   *next;
 106         int                     type;
 107 };
 108
 109 #define AUDIT_AUX_IPCPERM       0
 110
 111 struct audit_aux_data_ipcctl {
 112         struct audit_aux_data   d;
 113         struct ipc_perm         p;
 114         unsigned long           qbytes;
 115         uid_t                   uid;
 116         gid_t                   gid;
 117         mode_t                  mode;
 118 };
 119
 120 struct audit_aux_data_socketcall {
 121         struct audit_aux_data   d;
 122         int                     nargs;
 123         unsigned long           args[0];
 124 };
 125
 126 struct audit_aux_data_sockaddr {
 127         struct audit_aux_data   d;
 128         int                     len;
 129         char                    a[0];
 130 };
 131
 132 struct audit_aux_data_path {
 133         struct audit_aux_data   d;
 134         struct dentry           *dentry;
 135         struct vfsmount         *mnt;
 136 };
 137
 138 /* The per-task audit context. */
 139 struct audit_context {
 140         int                 in_syscall; /* 1 if task is in a syscall */
 141         enum audit_state    state;
 142         unsigned int        serial;     /* serial number for record */
 143         struct timespec     ctime;      /* time of syscall entry */
 144         uid_t               loginuid;   /* login uid (identity) */
 145         int                 major;      /* syscall number */
 146         unsigned long       argv[4];    /* syscall arguments */
 147         int                 return_valid; /* return code is valid */
 148         long                return_code;/* syscall return code */
 149         int                 auditable;  /* 1 if record should be written */
 150         int                 name_count;
 151         struct audit_names  names[AUDIT_NAMES];
 152         struct dentry *     pwd;
 153         struct vfsmount *   pwdmnt;
 154         struct audit_context *previous; /* For nested syscalls */
 155         struct audit_aux_data *aux;
 156
 157                                 /* Save things to print about task_struct */
 158         pid_t               pid;
 159         uid_t               uid, euid, suid, fsuid;
 160         gid_t               gid, egid, sgid, fsgid;
 161         unsigned long       personality;
 162         int                 arch;
 163
 164 #if AUDIT_DEBUG
 165         int                 put_count;
 166         int                 ino_count;
 167 #endif
 168 };
 169
 170                                 /* Public API */
 171 /* There are three lists of rules -- one to search at task creation
 172  * time, one to search at syscall entry time, and another to search at
 173  * syscall exit time. */
 174 static struct list_head audit_filter_list[AUDIT_NR_FILTERS] = {
 175         LIST_HEAD_INIT(audit_filter_list[0]),
 176         LIST_HEAD_INIT(audit_filter_list[1]),
 177         LIST_HEAD_INIT(audit_filter_list[2]),
 178         LIST_HEAD_INIT(audit_filter_list[3]),
 179         LIST_HEAD_INIT(audit_filter_list[4]),
 180 #if AUDIT_NR_FILTERS != 5
 181 #error Fix audit_filter_list initialiser
 182 #endif
 183 };
 184
 185 struct audit_entry {
 186         struct list_head  list;
 187         struct rcu_head   rcu;
 188         struct audit_rule rule;
 189 };
 190
 191 extern int audit_pid;
 192
 193 /* Copy rule from user-space to kernel-space.  Called from
 194  * audit_add_rule during AUDIT_ADD. */
 195 static inline int audit_copy_rule(struct audit_rule *d, struct audit_rule *s)
 196 {
 197         int i;
 198
 199         if (s->action != AUDIT_NEVER
 200             && s->action != AUDIT_POSSIBLE
 201             && s->action != AUDIT_ALWAYS)
 202                 return -1;
 203         if (s->field_count < 0 || s->field_count > AUDIT_MAX_FIELDS)
 204                 return -1;
 205         if ((s->flags & ~AUDIT_FILTER_PREPEND) >= AUDIT_NR_FILTERS)
 206                 return -1;
 207
 208         d->flags        = s->flags;
 209         d->action       = s->action;
 210         d->field_count  = s->field_count;
 211         for (i = 0; i < d->field_count; i++) {
 212                 d->fields[i] = s->fields[i];
 213                 d->values[i] = s->values[i];
 214         }
 215         for (i = 0; i < AUDIT_BITMASK_SIZE; i++) d->mask[i] = s->mask[i];
 216         return 0;
 217 }
 218
 219 /* Check to see if two rules are identical.  It is called from
 220  * audit_add_rule during AUDIT_ADD and
 221  * audit_del_rule during AUDIT_DEL. */
 222 static inline int audit_compare_rule(struct audit_rule *a, struct audit_rule *b)
 223 {
 224         int i;
 225
 226         if (a->flags != b->flags)
 227                 return 1;
 228
 229         if (a->action != b->action)
 230                 return 1;
 231
 232         if (a->field_count != b->field_count)
 233                 return 1;
 234
 235         for (i = 0; i < a->field_count; i++) {
 236                 if (a->fields[i] != b->fields[i]
 237                     || a->values[i] != b->values[i])
 238                         return 1;
 239         }
 240
 241         for (i = 0; i < AUDIT_BITMASK_SIZE; i++)
 242                 if (a->mask[i] != b->mask[i])
 243                         return 1;
 244
 245         return 0;
 246 }
 247
 248 /* Note that audit_add_rule and audit_del_rule are called via
 249  * audit_receive() in audit.c, and are protected by
 250  * audit_netlink_sem. */
 251 static inline int audit_add_rule(struct audit_rule *rule,
 252                                   struct list_head *list)
 253 {
 254         struct audit_entry  *entry;
 255
 256         /* Do not use the _rcu iterator here, since this is the only
 257          * addition routine. */
 258         list_for_each_entry(entry, list, list) {
 259                 if (!audit_compare_rule(rule, &entry->rule)) {
 260                         return -EEXIST;
 261                 }
 262         }
 263
 264         if (!(entry = kmalloc(sizeof(*entry), GFP_KERNEL)))
 265                 return -ENOMEM;
 266         if (audit_copy_rule(&entry->rule, rule)) {
 267                 kfree(entry);
 268                 return -EINVAL;
 269         }
 270
 271         if (entry->rule.flags & AUDIT_FILTER_PREPEND) {
 272                 entry->rule.flags &= ~AUDIT_FILTER_PREPEND;
 273                 list_add_rcu(&entry->list, list);
 274         } else {
 275                 list_add_tail_rcu(&entry->list, list);
 276         }
 277
 278         return 0;
 279 }
 280
 281 static inline void audit_free_rule(struct rcu_head *head)
 282 {
 283         struct audit_entry *e = container_of(head, struct audit_entry, rcu);
 284         kfree(e);
 285 }
 286
 287 /* Note that audit_add_rule and audit_del_rule are called via
 288  * audit_receive() in audit.c, and are protected by
 289  * audit_netlink_sem. */
 290 static inline int audit_del_rule(struct audit_rule *rule,
 291                                  struct list_head *list)
 292 {
 293         struct audit_entry  *e;
 294
 295         /* Do not use the _rcu iterator here, since this is the only
 296          * deletion routine. */
 297         list_for_each_entry(e, list, list) {
 298                 if (!audit_compare_rule(rule, &e->rule)) {
 299                         list_del_rcu(&e->list);
 300                         call_rcu(&e->rcu, audit_free_rule);
 301                         return 0;
 302                 }
 303         }
 304         return -ENOENT;         /* No matching rule */
 305 }
 306
 307 static int audit_list_rules(void *_dest)
 308 {
 309         int pid, seq;
 310         int *dest = _dest;
 311         struct audit_entry *entry;
 312         int i;
 313
 314         pid = dest[0];
 315         seq = dest[1];
 316         kfree(dest);
 317
 318         down(&audit_netlink_sem);
 319
 320         /* The *_rcu iterators not needed here because we are
 321            always called with audit_netlink_sem held. */
 322         for (i=0; i<AUDIT_NR_FILTERS; i++) {
 323                 list_for_each_entry(entry, &audit_filter_list[i], list)
 324                         audit_send_reply(pid, seq, AUDIT_LIST, 0, 1,
 325                                          &entry->rule, sizeof(entry->rule));
 326         }
 327         audit_send_reply(pid, seq, AUDIT_LIST, 1, 1, NULL, 0);
 328
 329         up(&audit_netlink_sem);
 330         return 0;
 331 }
 332
 333 int audit_receive_filter(int type, int pid, int uid, int seq, void *data,
 334                                                         uid_t loginuid)
 335 {
 336         struct task_struct *tsk;
 337         int *dest;
 338         int                err = 0;
 339         unsigned listnr;
 340
 341         switch (type) {
 342         case AUDIT_LIST:
 343                 /* We can't just spew out the rules here because we might fill
 344                  * the available socket buffer space and deadlock waiting for
 345                  * auditctl to read from it... which isn't ever going to
 346                  * happen if we're actually running in the context of auditctl
 347                  * trying to _send_ the stuff */
 348
 349                 dest = kmalloc(2 * sizeof(int), GFP_KERNEL);
 350                 if (!dest)
 351                         return -ENOMEM;
 352                 dest[0] = pid;
 353                 dest[1] = seq;
 354
 355                 tsk = kthread_run(audit_list_rules, dest, "audit_list_rules");
 356                 if (IS_ERR(tsk)) {
 357                         kfree(dest);
 358                         err = PTR_ERR(tsk);
 359                 }
 360                 break;
 361         case AUDIT_ADD:
 362                 listnr =((struct audit_rule *)data)->flags & ~AUDIT_FILTER_PREPEND;
 363                 if (listnr >= AUDIT_NR_FILTERS)
 364                         return -EINVAL;
 365
 366                 err = audit_add_rule(data, &audit_filter_list[listnr]);
 367                 if (!err)
 368                         audit_log(NULL, GFP_KERNEL, AUDIT_CONFIG_CHANGE,
 369                                   "auid=%u added an audit rule\n", loginuid);
 370                 break;
 371         case AUDIT_DEL:
 372                 listnr =((struct audit_rule *)data)->flags & ~AUDIT_FILTER_PREPEND;
 373                 if (listnr >= AUDIT_NR_FILTERS)
 374                         return -EINVAL;
 375
 376                 err = audit_del_rule(data, &audit_filter_list[listnr]);
 377                 if (!err)
 378                         audit_log(NULL, GFP_KERNEL, AUDIT_CONFIG_CHANGE,
 379                                   "auid=%u removed an audit rule\n", loginuid);
 380                 break;
 381         default:
 382                 return -EINVAL;
 383         }
 384
 385         return err;
 386 }
 387
 388 /* Compare a task_struct with an audit_rule.  Return 1 on match, 0
 389  * otherwise. */
 390 static int audit_filter_rules(struct task_struct *tsk,
 391                               struct audit_rule *rule,
 392                               struct audit_context *ctx,
 393                               enum audit_state *state)
 394 {
 395         int i, j;
 396
 397         for (i = 0; i < rule->field_count; i++) {
 398                 u32 field  = rule->fields[i] & ~AUDIT_NEGATE;
 399                 u32 value  = rule->values[i];
 400                 int result = 0;
 401
 402                 switch (field) {
 403                 case AUDIT_PID:
 404                         result = (tsk->pid == value);
 405                         break;
 406                 case AUDIT_UID:
 407                         result = (tsk->uid == value);
 408                         break;
 409                 case AUDIT_EUID:
 410                         result = (tsk->euid == value);
 411                         break;
 412                 case AUDIT_SUID:
 413                         result = (tsk->suid == value);
 414                         break;
 415                 case AUDIT_FSUID:
 416                         result = (tsk->fsuid == value);
 417                         break;
 418                 case AUDIT_GID:
 419                         result = (tsk->gid == value);
 420                         break;
 421                 case AUDIT_EGID:
 422                         result = (tsk->egid == value);
 423                         break;
 424                 case AUDIT_SGID:
 425                         result = (tsk->sgid == value);
 426                         break;
 427                 case AUDIT_FSGID:
 428                         result = (tsk->fsgid == value);
 429                         break;
 430                 case AUDIT_PERS:
 431                         result = (tsk->personality == value);
 432                         break;
 433                 case AUDIT_ARCH:
 434                         if (ctx)
 435                                 result = (ctx->arch == value);
 436                         break;
 437
 438                 case AUDIT_EXIT:
 439                         if (ctx && ctx->return_valid)
 440                                 result = (ctx->return_code == value);
 441                         break;
 442                 case AUDIT_SUCCESS:
 443                         if (ctx && ctx->return_valid) {
 444                                 if (value)
 445                                         result = (ctx->return_valid == AUDITSC_SUCCESS);
 446                                 else
 447                                         result = (ctx->return_valid == AUDITSC_FAILURE);
 448                         }
 449                         break;
 450                 case AUDIT_DEVMAJOR:
 451                         if (ctx) {
 452                                 for (j = 0; j < ctx->name_count; j++) {
 453                                         if (MAJOR(ctx->names[j].dev)==value) {
 454                                                 ++result;
 455                                                 break;
 456                                         }
 457                                 }
 458                         }
 459                         break;
 460                 case AUDIT_DEVMINOR:
 461                         if (ctx) {
 462                                 for (j = 0; j < ctx->name_count; j++) {
 463                                         if (MINOR(ctx->names[j].dev)==value) {
 464                                                 ++result;
 465                                                 break;
 466                                         }
 467                                 }
 468                         }
 469                         break;
 470                 case AUDIT_INODE:
 471                         if (ctx) {
 472                                 for (j = 0; j < ctx->name_count; j++) {
 473                                         if (ctx->names[j].ino == value) {
 474                                                 ++result;
 475                                                 break;
 476                                         }
 477                                 }
 478                         }
 479                         break;
 480                 case AUDIT_LOGINUID:
 481                         result = 0;
 482                         if (ctx)
 483                                 result = (ctx->loginuid == value);
 484                         break;
 485                 case AUDIT_ARG0:
 486                 case AUDIT_ARG1:
 487                 case AUDIT_ARG2:
 488                 case AUDIT_ARG3:
 489                         if (ctx)
 490                                 result = (ctx->argv[field-AUDIT_ARG0]==value);
 491                         break;
 492                 }
 493
 494                 if (rule->fields[i] & AUDIT_NEGATE)
 495                         result = !result;
 496                 if (!result)
 497                         return 0;
 498         }
 499         switch (rule->action) {
 500         case AUDIT_NEVER:    *state = AUDIT_DISABLED;       break;
 501         case AUDIT_POSSIBLE: *state = AUDIT_BUILD_CONTEXT;  break;
 502         case AUDIT_ALWAYS:   *state = AUDIT_RECORD_CONTEXT; break;
 503         }
 504         return 1;
 505 }
 506
 507 /* At process creation time, we can determine if system-call auditing is
 508  * completely disabled for this task.  Since we only have the task
 509  * structure at this point, we can only check uid and gid.
 510  */
 511 static enum audit_state audit_filter_task(struct task_struct *tsk)
 512 {
 513         struct audit_entry *e;
 514         enum audit_state   state;
 515
 516         rcu_read_lock();
 517         list_for_each_entry_rcu(e, &audit_filter_list[AUDIT_FILTER_TASK], list) {
 518                 if (audit_filter_rules(tsk, &e->rule, NULL, &state)) {
 519                         rcu_read_unlock();
 520                         return state;
 521                 }
 522         }
 523         rcu_read_unlock();
 524         return AUDIT_BUILD_CONTEXT;
 525 }
 526
 527 /* At syscall entry and exit time, this filter is called if the
 528  * audit_state is not low enough that auditing cannot take place, but is
 529  * also not high enough that we already know we have to write an audit
 530  * record (i.e., the state is AUDIT_SETUP_CONTEXT or  AUDIT_BUILD_CONTEXT).
 531  */
 532 static enum audit_state audit_filter_syscall(struct task_struct *tsk,
 533                                              struct audit_context *ctx,
 534                                              struct list_head *list)
 535 {
 536         struct audit_entry *e;
 537         enum audit_state state;
 538
 539         if (audit_pid && tsk->tgid == audit_pid)
 540                 return AUDIT_DISABLED;
 541
 542         rcu_read_lock();
 543         if (!list_empty(list)) {
 544                     int word = AUDIT_WORD(ctx->major);
 545                     int bit  = AUDIT_BIT(ctx->major);
 546
 547                     list_for_each_entry_rcu(e, list, list) {
 548                             if ((e->rule.mask[word] & bit) == bit
 549                                 && audit_filter_rules(tsk, &e->rule, ctx, &state)) {
 550                                     rcu_read_unlock();
 551                                     return state;
 552                             }
 553                     }
 554         }
 555         rcu_read_unlock();
 556         return AUDIT_BUILD_CONTEXT;
 557 }
 558
 559 static int audit_filter_user_rules(struct netlink_skb_parms *cb,
 560                               struct audit_rule *rule,
 561                               enum audit_state *state)
 562 {
 563         int i;
 564
 565         for (i = 0; i < rule->field_count; i++) {
 566                 u32 field  = rule->fields[i] & ~AUDIT_NEGATE;
 567                 u32 value  = rule->values[i];
 568                 int result = 0;
 569
 570                 switch (field) {
 571                 case AUDIT_PID:
 572                         result = (cb->creds.pid == value);
 573                         break;
 574                 case AUDIT_UID:
 575                         result = (cb->creds.uid == value);
 576                         break;
 577                 case AUDIT_GID:
 578                         result = (cb->creds.gid == value);
 579                         break;
 580                 case AUDIT_LOGINUID:
 581                         result = (cb->loginuid == value);
 582                         break;
 583                 }
 584
 585                 if (rule->fields[i] & AUDIT_NEGATE)
 586                         result = !result;
 587                 if (!result)
 588                         return 0;
 589         }
 590         switch (rule->action) {
 591         case AUDIT_NEVER:    *state = AUDIT_DISABLED;       break;
 592         case AUDIT_POSSIBLE: *state = AUDIT_BUILD_CONTEXT;  break;
 593         case AUDIT_ALWAYS:   *state = AUDIT_RECORD_CONTEXT; break;
 594         }
 595         return 1;
 596 }
 597
 598 int audit_filter_user(struct netlink_skb_parms *cb, int type)
 599 {
 600         struct audit_entry *e;
 601         enum audit_state   state;
 602         int ret = 1;
 603
 604         rcu_read_lock();
 605         list_for_each_entry_rcu(e, &audit_filter_list[AUDIT_FILTER_USER], list) {
 606                 if (audit_filter_user_rules(cb, &e->rule, &state)) {
 607                         if (state == AUDIT_DISABLED)
 608                                 ret = 0;
 609                         break;
 610                 }
 611         }
 612         rcu_read_unlock();
 613
 614         return ret; /* Audit by default */
 615 }
 616
 617 /* This should be called with task_lock() held. */
 618 static inline struct audit_context *audit_get_context(struct task_struct *tsk,
 619                                                       int return_valid,
 620                                                       int return_code)
 621 {
 622         struct audit_context *context = tsk->audit_context;
 623
 624         if (likely(!context))
 625                 return NULL;
 626         context->return_valid = return_valid;
 627         context->return_code  = return_code;
 628
 629         if (context->in_syscall && !context->auditable) {
 630                 enum audit_state state;
 631                 state = audit_filter_syscall(tsk, context, &audit_filter_list[AUDIT_FILTER_EXIT]);
 632                 if (state == AUDIT_RECORD_CONTEXT)
 633                         context->auditable = 1;
 634         }
 635
 636         context->pid = tsk->pid;
 637         context->uid = tsk->uid;
 638         context->gid = tsk->gid;
 639         context->euid = tsk->euid;
 640         context->suid = tsk->suid;
 641         context->fsuid = tsk->fsuid;
 642         context->egid = tsk->egid;
 643         context->sgid = tsk->sgid;
 644         context->fsgid = tsk->fsgid;
 645         context->personality = tsk->personality;
 646         tsk->audit_context = NULL;
 647         return context;
 648 }
 649
 650 static inline void audit_free_names(struct audit_context *context)
 651 {
 652         int i;
 653
 654 #if AUDIT_DEBUG == 2
 655         if (context->auditable
 656             ||context->put_count + context->ino_count != context->name_count) {
 657                 printk(KERN_ERR "audit.c:%d(:%d): major=%d in_syscall=%d"
 658                        " name_count=%d put_count=%d"
 659                        " ino_count=%d [NOT freeing]\n",
 660                        __LINE__,
 661                        context->serial, context->major, context->in_syscall,
 662                        context->name_count, context->put_count,
 663                        context->ino_count);
 664                 for (i = 0; i < context->name_count; i++)
 665                         printk(KERN_ERR "names[%d] = %p = %s\n", i,
 666                                context->names[i].name,
 667                                context->names[i].name);
 668                 dump_stack();
 669                 return;
 670         }
 671 #endif
 672 #if AUDIT_DEBUG
 673         context->put_count  = 0;
 674         context->ino_count  = 0;
 675 #endif
 676
 677         for (i = 0; i < context->name_count; i++)
 678                 if (context->names[i].name)
 679                         __putname(context->names[i].name);
 680         context->name_count = 0;
 681         if (context->pwd)
 682                 dput(context->pwd);
 683         if (context->pwdmnt)
 684                 mntput(context->pwdmnt);
 685         context->pwd = NULL;
 686         context->pwdmnt = NULL;
 687 }
 688
 689 static inline void audit_free_aux(struct audit_context *context)
 690 {
 691         struct audit_aux_data *aux;
 692
 693         while ((aux = context->aux)) {
 694                 if (aux->type == AUDIT_AVC_PATH) {
 695                         struct audit_aux_data_path *axi = (void *)aux;
 696                         dput(axi->dentry);
 697                         mntput(axi->mnt);
 698                 }
 699                 context->aux = aux->next;
 700                 kfree(aux);
 701         }
 702 }
 703
 704 static inline void audit_zero_context(struct audit_context *context,
 705                                       enum audit_state state)
 706 {
 707         uid_t loginuid = context->loginuid;
 708
 709         memset(context, 0, sizeof(*context));
 710         context->state      = state;
 711         context->loginuid   = loginuid;
 712 }
 713
 714 static inline struct audit_context *audit_alloc_context(enum audit_state state)
 715 {
 716         struct audit_context *context;
 717
 718         if (!(context = kmalloc(sizeof(*context), GFP_KERNEL)))
 719                 return NULL;
 720         audit_zero_context(context, state);
 721         return context;
 722 }
 723
 724 /* Filter on the task information and allocate a per-task audit context
 725  * if necessary.  Doing so turns on system call auditing for the
 726  * specified task.  This is called from copy_process, so no lock is
 727  * needed. */
 728 int audit_alloc(struct task_struct *tsk)
 729 {
 730         struct audit_context *context;
 731         enum audit_state     state;
 732
 733         if (likely(!audit_enabled))
 734                 return 0; /* Return if not auditing. */
 735
 736         state = audit_filter_task(tsk);
 737         if (likely(state == AUDIT_DISABLED))
 738                 return 0;
 739
 740         if (!(context = audit_alloc_context(state))) {
 741                 audit_log_lost("out of memory in audit_alloc");
 742                 return -ENOMEM;
 743         }
 744
 745                                 /* Preserve login uid */
 746         context->loginuid = -1;
 747         if (current->audit_context)
 748                 context->loginuid = current->audit_context->loginuid;
 749
 750         tsk->audit_context  = context;
 751         set_tsk_thread_flag(tsk, TIF_SYSCALL_AUDIT);
 752         return 0;
 753 }
 754
 755 static inline void audit_free_context(struct audit_context *context)
 756 {
 757         struct audit_context *previous;
 758         int                  count = 0;
 759
 760         do {
 761                 previous = context->previous;
 762                 if (previous || (count &&  count < 10)) {
 763                         ++count;
 764                         printk(KERN_ERR "audit(:%d): major=%d name_count=%d:"
 765                                " freeing multiple contexts (%d)\n",
 766                                context->serial, context->major,
 767                                context->name_count, count);
 768                 }
 769                 audit_free_names(context);
 770                 audit_free_aux(context);
 771                 kfree(context);
 772                 context  = previous;
 773         } while (context);
 774         if (count >= 10)
 775                 printk(KERN_ERR "audit: freed %d contexts\n", count);
 776 }
 777
 778 static void audit_log_task_info(struct audit_buffer *ab)
 779 {
 780         char name[sizeof(current->comm)];
 781         struct mm_struct *mm = current->mm;
 782         struct vm_area_struct *vma;
 783
 784         get_task_comm(name, current);
 785         audit_log_format(ab, " comm=");
 786         audit_log_untrustedstring(ab, name);
 787
 788         if (!mm)
 789                 return;
 790
 791         down_read(&mm->mmap_sem);
 792         vma = mm->mmap;
 793         while (vma) {
 794                 if ((vma->vm_flags & VM_EXECUTABLE) &&
 795                     vma->vm_file) {
 796                         audit_log_d_path(ab, "exe=",
 797                                          vma->vm_file->f_dentry,
 798                                          vma->vm_file->f_vfsmnt);
 799                         break;
 800                 }
 801                 vma = vma->vm_next;
 802         }
 803         up_read(&mm->mmap_sem);
 804 }
 805
 806 static void audit_log_exit(struct audit_context *context, gfp_t gfp_mask)
 807 {
 808         int i;
 809         struct audit_buffer *ab;
 810         struct audit_aux_data *aux;
 811
 812         ab = audit_log_start(context, gfp_mask, AUDIT_SYSCALL);
 813         if (!ab)
 814                 return;         /* audit_panic has been called */
 815         audit_log_format(ab, "arch=%x syscall=%d",
 816                          context->arch, context->major);
 817         if (context->personality != PER_LINUX)
 818                 audit_log_format(ab, " per=%lx", context->personality);
 819         if (context->return_valid)
 820                 audit_log_format(ab, " success=%s exit=%ld",
 821                                  (context->return_valid==AUDITSC_SUCCESS)?"yes":"no",
 822                                  context->return_code);
 823         audit_log_format(ab,
 824                   " a0=%lx a1=%lx a2=%lx a3=%lx items=%d"
 825                   " pid=%d auid=%u uid=%u gid=%u"
 826                   " euid=%u suid=%u fsuid=%u"
 827                   " egid=%u sgid=%u fsgid=%u",
 828                   context->argv[0],
 829                   context->argv[1],
 830                   context->argv[2],
 831                   context->argv[3],
 832                   context->name_count,
 833                   context->pid,
 834                   context->loginuid,
 835                   context->uid,
 836                   context->gid,
 837                   context->euid, context->suid, context->fsuid,
 838                   context->egid, context->sgid, context->fsgid);
 839         audit_log_task_info(ab);
 840         audit_log_end(ab);
 841
 842         for (aux = context->aux; aux; aux = aux->next) {
 843
 844                 ab = audit_log_start(context, gfp_mask, aux->type);
 845                 if (!ab)
 846                         continue; /* audit_panic has been called */
 847
 848                 switch (aux->type) {
 849                 case AUDIT_IPC: {
 850                         struct audit_aux_data_ipcctl *axi = (void *)aux;
 851                         audit_log_format(ab,
 852                                          " qbytes=%lx iuid=%u igid=%u mode=%x",
 853                                          axi->qbytes, axi->uid, axi->gid, axi->mode);
 854                         break; }
 855
 856                 case AUDIT_SOCKETCALL: {
 857                         int i;
 858                         struct audit_aux_data_socketcall *axs = (void *)aux;
 859                         audit_log_format(ab, "nargs=%d", axs->nargs);
 860                         for (i=0; i<axs->nargs; i++)
 861                                 audit_log_format(ab, " a%d=%lx", i, axs->args[i]);
 862                         break; }
 863
 864                 case AUDIT_SOCKADDR: {
 865                         struct audit_aux_data_sockaddr *axs = (void *)aux;
 866
 867                         audit_log_format(ab, "saddr=");
 868                         audit_log_hex(ab, axs->a, axs->len);
 869                         break; }
 870
 871                 case AUDIT_AVC_PATH: {
 872                         struct audit_aux_data_path *axi = (void *)aux;
 873                         audit_log_d_path(ab, "path=", axi->dentry, axi->mnt);
 874                         break; }
 875
 876                 }
 877                 audit_log_end(ab);
 878         }
 879
 880         if (context->pwd && context->pwdmnt) {
 881                 ab = audit_log_start(context, gfp_mask, AUDIT_CWD);
 882                 if (ab) {
 883                         audit_log_d_path(ab, "cwd=", context->pwd, context->pwdmnt);
 884                         audit_log_end(ab);
 885                 }
 886         }
 887         for (i = 0; i < context->name_count; i++) {
 888                 ab = audit_log_start(context, gfp_mask, AUDIT_PATH);
 889                 if (!ab)
 890                         continue; /* audit_panic has been called */
 891
 892                 audit_log_format(ab, "item=%d", i);
 893                 if (context->names[i].name) {
 894                         audit_log_format(ab, " name=");
 895                         audit_log_untrustedstring(ab, context->names[i].name);
 896                 }
 897                 audit_log_format(ab, " flags=%x\n", context->names[i].flags);
 898
 899                 if (context->names[i].ino != (unsigned long)-1)
 900                         audit_log_format(ab, " inode=%lu dev=%02x:%02x mode=%#o"
 901                                              " ouid=%u ogid=%u rdev=%02x:%02x",
 902                                          context->names[i].ino,
 903                                          MAJOR(context->names[i].dev),
 904                                          MINOR(context->names[i].dev),
 905                                          context->names[i].mode,
 906                                          context->names[i].uid,
 907                                          context->names[i].gid,
 908                                          MAJOR(context->names[i].rdev),
 909                                          MINOR(context->names[i].rdev));
 910                 audit_log_end(ab);
 911         }
 912 }
 913
 914 /* Free a per-task audit context.  Called from copy_process and
 915  * __put_task_struct. */
 916 void audit_free(struct task_struct *tsk)
 917 {
 918         struct audit_context *context;
 919
 920         task_lock(tsk);
 921         context = audit_get_context(tsk, 0, 0);
 922         task_unlock(tsk);
 923
 924         if (likely(!context))
 925                 return;
 926
 927         /* Check for system calls that do not go through the exit
 928          * function (e.g., exit_group), then free context block.
 929          * We use GFP_ATOMIC here because we might be doing this
 930          * in the context of the idle thread */
 931         if (context->in_syscall && context->auditable)
 932                 audit_log_exit(context, GFP_ATOMIC);
 933
 934         audit_free_context(context);
 935 }
 936
 937 /* Fill in audit context at syscall entry.  This only happens if the
 938  * audit context was created when the task was created and the state or
 939  * filters demand the audit context be built.  If the state from the
 940  * per-task filter or from the per-syscall filter is AUDIT_RECORD_CONTEXT,
 941  * then the record will be written at syscall exit time (otherwise, it
 942  * will only be written if another part of the kernel requests that it
 943  * be written). */
 944 void audit_syscall_entry(struct task_struct *tsk, int arch, int major,
 945                          unsigned long a1, unsigned long a2,
 946                          unsigned long a3, unsigned long a4)
 947 {
 948         struct audit_context *context = tsk->audit_context;
 949         enum audit_state     state;
 950
 951         BUG_ON(!context);
 952
 953         /* This happens only on certain architectures that make system
 954          * calls in kernel_thread via the entry.S interface, instead of
 955          * with direct calls.  (If you are porting to a new
 956          * architecture, hitting this condition can indicate that you
 957          * got the _exit/_leave calls backward in entry.S.)
 958          *
 959          * i386     no
 960          * x86_64   no
 961          * ppc64    yes (see arch/powerpc/platforms/iseries/misc.S)
 962          *
 963          * This also happens with vm86 emulation in a non-nested manner
 964          * (entries without exits), so this case must be caught.
 965          */
 966         if (context->in_syscall) {
 967                 struct audit_context *newctx;
 968
 969 #if defined(__NR_vm86) && defined(__NR_vm86old)
 970                 /* vm86 mode should only be entered once */
 971                 if (major == __NR_vm86 || major == __NR_vm86old)
 972                         return;
 973 #endif
 974 #if AUDIT_DEBUG
 975                 printk(KERN_ERR
 976                        "audit(:%d) pid=%d in syscall=%d;"
 977                        " entering syscall=%d\n",
 978                        context->serial, tsk->pid, context->major, major);
 979 #endif
 980                 newctx = audit_alloc_context(context->state);
 981                 if (newctx) {
 982                         newctx->previous   = context;
 983                         context            = newctx;
 984                         tsk->audit_context = newctx;
 985                 } else  {
 986                         /* If we can't alloc a new context, the best we
 987                          * can do is to leak memory (any pending putname
 988                          * will be lost).  The only other alternative is
 989                          * to abandon auditing. */
 990                         audit_zero_context(context, context->state);
 991                 }
 992         }
 993         BUG_ON(context->in_syscall || context->name_count);
 994
 995         if (!audit_enabled)
 996                 return;
 997
 998         context->arch       = arch;
 999         context->major      = major;
1000         context->argv[0]    = a1;
1001         context->argv[1]    = a2;
1002         context->argv[2]    = a3;
1003         context->argv[3]    = a4;
1004
1005         state = context->state;
1006         if (state == AUDIT_SETUP_CONTEXT || state == AUDIT_BUILD_CONTEXT)
1007                 state = audit_filter_syscall(tsk, context, &audit_filter_list[AUDIT_FILTER_ENTRY]);
1008         if (likely(state == AUDIT_DISABLED))
1009                 return;
1010
1011         context->serial     = 0;
1012         context->ctime      = CURRENT_TIME;
1013         context->in_syscall = 1;
1014         context->auditable  = !!(state == AUDIT_RECORD_CONTEXT);
1015 }
1016
1017 /* Tear down after system call.  If the audit context has been marked as
1018  * auditable (either because of the AUDIT_RECORD_CONTEXT state from
1019  * filtering, or because some other part of the kernel write an audit
1020  * message), then write out the syscall information.  In call cases,
1021  * free the names stored from getname(). */
1022 void audit_syscall_exit(struct task_struct *tsk, int valid, long return_code)
1023 {
1024         struct audit_context *context;
1025
1026         get_task_struct(tsk);
1027         task_lock(tsk);
1028         context = audit_get_context(tsk, valid, return_code);
1029         task_unlock(tsk);
1030
1031         /* Not having a context here is ok, since the parent may have
1032          * called __put_task_struct. */
1033         if (likely(!context))
1034                 goto out;
1035
1036         if (context->in_syscall && context->auditable)
1037                 audit_log_exit(context, GFP_KERNEL);
1038
1039         context->in_syscall = 0;
1040         context->auditable  = 0;
1041
1042         if (context->previous) {
1043                 struct audit_context *new_context = context->previous;
1044                 context->previous  = NULL;
1045                 audit_free_context(context);
1046                 tsk->audit_context = new_context;
1047         } else {
1048                 audit_free_names(context);
1049                 audit_free_aux(context);
1050                 tsk->audit_context = context;
1051         }
1052  out:
1053         put_task_struct(tsk);
1054 }
1055
1056 /* Add a name to the list.  Called from fs/namei.c:getname(). */
1057 void audit_getname(const char *name)
1058 {
1059         struct audit_context *context = current->audit_context;
1060
1061         if (!context || IS_ERR(name) || !name)
1062                 return;
1063
1064         if (!context->in_syscall) {
1065 #if AUDIT_DEBUG == 2
1066                 printk(KERN_ERR "%s:%d(:%d): ignoring getname(%p)\n",
1067                        __FILE__, __LINE__, context->serial, name);
1068                 dump_stack();
1069 #endif
1070                 return;
1071         }
1072         BUG_ON(context->name_count >= AUDIT_NAMES);
1073         context->names[context->name_count].name = name;
1074         context->names[context->name_count].ino  = (unsigned long)-1;
1075         ++context->name_count;
1076         if (!context->pwd) {
1077                 read_lock(&current->fs->lock);
1078                 context->pwd = dget(current->fs->pwd);
1079                 context->pwdmnt = mntget(current->fs->pwdmnt);
1080                 read_unlock(&current->fs->lock);
1081         }
1082
1083 }
1084
1085 /* Intercept a putname request.  Called from
1086  * include/linux/fs.h:putname().  If we have stored the name from
1087  * getname in the audit context, then we delay the putname until syscall
1088  * exit. */
1089 void audit_putname(const char *name)
1090 {
1091         struct audit_context *context = current->audit_context;
1092
1093         BUG_ON(!context);
1094         if (!context->in_syscall) {
1095 #if AUDIT_DEBUG == 2
1096                 printk(KERN_ERR "%s:%d(:%d): __putname(%p)\n",
1097                        __FILE__, __LINE__, context->serial, name);
1098                 if (context->name_count) {
1099                         int i;
1100                         for (i = 0; i < context->name_count; i++)
1101                                 printk(KERN_ERR "name[%d] = %p = %s\n", i,
1102                                        context->names[i].name,
1103                                        context->names[i].name);
1104                 }
1105 #endif
1106                 __putname(name);
1107         }
1108 #if AUDIT_DEBUG
1109         else {
1110                 ++context->put_count;
1111                 if (context->put_count > context->name_count) {
1112                         printk(KERN_ERR "%s:%d(:%d): major=%d"
1113                                " in_syscall=%d putname(%p) name_count=%d"
1114                                " put_count=%d\n",
1115                                __FILE__, __LINE__,
1116                                context->serial, context->major,
1117                                context->in_syscall, name, context->name_count,
1118                                context->put_count);
1119                         dump_stack();
1120                 }
1121         }
1122 #endif
1123 }
1124
1125 /* Store the inode and device from a lookup.  Called from
1126  * fs/namei.c:path_lookup(). */
1127 void audit_inode(const char *name, const struct inode *inode, unsigned flags)
1128 {
1129         int idx;
1130         struct audit_context *context = current->audit_context;
1131
1132         if (!context->in_syscall)
1133                 return;
1134         if (context->name_count
1135             && context->names[context->name_count-1].name
1136             && context->names[context->name_count-1].name == name)
1137                 idx = context->name_count - 1;
1138         else if (context->name_count > 1
1139                  && context->names[context->name_count-2].name
1140                  && context->names[context->name_count-2].name == name)
1141                 idx = context->name_count - 2;
1142         else {
1143                 /* FIXME: how much do we care about inodes that have no
1144                  * associated name? */
1145                 if (context->name_count >= AUDIT_NAMES - AUDIT_NAMES_RESERVED)
1146                         return;
1147                 idx = context->name_count++;
1148                 context->names[idx].name = NULL;
1149 #if AUDIT_DEBUG
1150                 ++context->ino_count;
1151 #endif
1152         }
1153         context->names[idx].flags = flags;
1154         context->names[idx].ino   = inode->i_ino;
1155         context->names[idx].dev   = inode->i_sb->s_dev;
1156         context->names[idx].mode  = inode->i_mode;
1157         context->names[idx].uid   = inode->i_uid;
1158         context->names[idx].gid   = inode->i_gid;
1159         context->names[idx].rdev  = inode->i_rdev;
1160 }
1161
1162 void auditsc_get_stamp(struct audit_context *ctx,
1163                        struct timespec *t, unsigned int *serial)
1164 {
1165         if (!ctx->serial)
1166                 ctx->serial = audit_serial();
1167         t->tv_sec  = ctx->ctime.tv_sec;
1168         t->tv_nsec = ctx->ctime.tv_nsec;
1169         *serial    = ctx->serial;
1170         ctx->auditable = 1;
1171 }
1172
1173 int audit_set_loginuid(struct task_struct *task, uid_t loginuid)
1174 {
1175         if (task->audit_context) {
1176                 struct audit_buffer *ab;
1177
1178                 ab = audit_log_start(NULL, GFP_KERNEL, AUDIT_LOGIN);
1179                 if (ab) {
1180                         audit_log_format(ab, "login pid=%d uid=%u "
1181                                 "old auid=%u new auid=%u",
1182                                 task->pid, task->uid,
1183                                 task->audit_context->loginuid, loginuid);
1184                         audit_log_end(ab);
1185                 }
1186                 task->audit_context->loginuid = loginuid;
1187         }
1188         return 0;
1189 }
1190
1191 uid_t audit_get_loginuid(struct audit_context *ctx)
1192 {
1193         return ctx ? ctx->loginuid : -1;
1194 }
1195
1196 int audit_ipc_perms(unsigned long qbytes, uid_t uid, gid_t gid, mode_t mode)
1197 {
1198         struct audit_aux_data_ipcctl *ax;
1199         struct audit_context *context = current->audit_context;
1200
1201         if (likely(!context))
1202                 return 0;
1203
1204         ax = kmalloc(sizeof(*ax), GFP_KERNEL);
1205         if (!ax)
1206                 return -ENOMEM;
1207
1208         ax->qbytes = qbytes;
1209         ax->uid = uid;
1210         ax->gid = gid;
1211         ax->mode = mode;
1212
1213         ax->d.type = AUDIT_IPC;
1214         ax->d.next = context->aux;
1215         context->aux = (void *)ax;
1216         return 0;
1217 }
1218
1219 int audit_socketcall(int nargs, unsigned long *args)
1220 {
1221         struct audit_aux_data_socketcall *ax;
1222         struct audit_context *context = current->audit_context;
1223
1224         if (likely(!context))
1225                 return 0;
1226
1227         ax = kmalloc(sizeof(*ax) + nargs * sizeof(unsigned long), GFP_KERNEL);
1228         if (!ax)
1229                 return -ENOMEM;
1230
1231         ax->nargs = nargs;
1232         memcpy(ax->args, args, nargs * sizeof(unsigned long));
1233
1234         ax->d.type = AUDIT_SOCKETCALL;
1235         ax->d.next = context->aux;
1236         context->aux = (void *)ax;
1237         return 0;
1238 }
1239
1240 int audit_sockaddr(int len, void *a)
1241 {
1242         struct audit_aux_data_sockaddr *ax;
1243         struct audit_context *context = current->audit_context;
1244
1245         if (likely(!context))
1246                 return 0;
1247
1248         ax = kmalloc(sizeof(*ax) + len, GFP_KERNEL);
1249         if (!ax)
1250                 return -ENOMEM;
1251
1252         ax->len = len;
1253         memcpy(ax->a, a, len);
1254
1255         ax->d.type = AUDIT_SOCKADDR;
1256         ax->d.next = context->aux;
1257         context->aux = (void *)ax;
1258         return 0;
1259 }
1260
1261 int audit_avc_path(struct dentry *dentry, struct vfsmount *mnt)
1262 {
1263         struct audit_aux_data_path *ax;
1264         struct audit_context *context = current->audit_context;
1265
1266         if (likely(!context))
1267                 return 0;
1268
1269         ax = kmalloc(sizeof(*ax), GFP_ATOMIC);
1270         if (!ax)
1271                 return -ENOMEM;
1272
1273         ax->dentry = dget(dentry);
1274         ax->mnt = mntget(mnt);
1275
1276         ax->d.type = AUDIT_AVC_PATH;
1277         ax->d.next = context->aux;
1278         context->aux = (void *)ax;
1279         return 0;
1280 }
1281
1282 void audit_signal_info(int sig, struct task_struct *t)
1283 {
1284         extern pid_t audit_sig_pid;
1285         extern uid_t audit_sig_uid;
1286
1287         if (unlikely(audit_pid && t->tgid == audit_pid)) {
1288                 if (sig == SIGTERM || sig == SIGHUP) {
1289                         struct audit_context *ctx = current->audit_context;
1290                         audit_sig_pid = current->pid;
1291                         if (ctx)
1292                                 audit_sig_uid = ctx->loginuid;
1293                         else
1294                                 audit_sig_uid = current->uid;
1295                 }
1296         }
1297 }
1298