audit.c 26.8 KB
Newer Older
1
/* audit.c -- Auditing support
L
Linus Torvalds 已提交
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40
 * Gateway between the kernel (e.g., selinux) and the user-space audit daemon.
 * System-call specific features have moved to auditsc.c
 *
 * Copyright 2003-2004 Red Hat Inc., Durham, North Carolina.
 * All Rights Reserved.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 * Written by Rickard E. (Rik) Faith <faith@redhat.com>
 *
 * Goals: 1) Integrate fully with SELinux.
 *	  2) Minimal run-time overhead:
 *	     a) Minimal when syscall auditing is disabled (audit_enable=0).
 *	     b) Small when syscall auditing is enabled and no audit record
 *		is generated (defer as much work as possible to record
 *		generation time):
 *		i) context is allocated,
 *		ii) names from getname are stored without a copy, and
 *		iii) inode information stored from path_lookup.
 *	  3) Ability to disable syscall auditing at boot time (audit=0).
 *	  4) Usable by other parts of the kernel (if audit_log* is called,
 *	     then a syscall record will be generated automatically for the
 *	     current syscall).
 *	  5) Netlink interface to user-space.
 *	  6) Support low-overhead kernel-based filtering to minimize the
 *	     information that must be passed to user-space.
 *
41
 * Example user-space utilities: http://people.redhat.com/sgrubb/audit/
L
Linus Torvalds 已提交
42 43 44 45
 */

#include <linux/init.h>
#include <asm/types.h>
A
Alan Cox 已提交
46
#include <asm/atomic.h>
L
Linus Torvalds 已提交
47 48
#include <linux/mm.h>
#include <linux/module.h>
49 50
#include <linux/err.h>
#include <linux/kthread.h>
L
Linus Torvalds 已提交
51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72

#include <linux/audit.h>

#include <net/sock.h>
#include <linux/skbuff.h>
#include <linux/netlink.h>

/* No auditing will take place until audit_initialized != 0.
 * (Initialization happens after skb_init is called.) */
static int	audit_initialized;

/* No syscall auditing will take place unless audit_enabled != 0. */
int		audit_enabled;

/* Default state when kernel boots without any parameters. */
static int	audit_default;

/* If auditing cannot proceed, audit_failure selects what happens. */
static int	audit_failure = AUDIT_FAIL_PRINTK;

/* If audit records are to be written to the netlink socket, audit_pid
 * contains the (non-zero) pid. */
73
int		audit_pid;
L
Linus Torvalds 已提交
74

75
/* If audit_rate_limit is non-zero, limit the rate of sending audit records
L
Linus Torvalds 已提交
76 77 78 79 80 81
 * to that number per second.  This prevents DoS attacks, but results in
 * audit records being dropped. */
static int	audit_rate_limit;

/* Number of outstanding audit_buffers allowed. */
static int	audit_backlog_limit = 64;
82 83
static int	audit_backlog_wait_time = 60 * HZ;
static int	audit_backlog_wait_overflow = 0;
L
Linus Torvalds 已提交
84

85 86 87 88
/* The identity of the user shutting down the audit system. */
uid_t		audit_sig_uid = -1;
pid_t		audit_sig_pid = -1;

L
Linus Torvalds 已提交
89 90 91 92 93 94 95 96 97 98 99 100
/* Records can be lost in several ways:
   0) [suppressed in audit_alloc]
   1) out of memory in audit_log_start [kmalloc of struct audit_buffer]
   2) out of memory in audit_log_move [alloc_skb]
   3) suppressed due to audit_rate_limit
   4) suppressed due to audit_backlog_limit
*/
static atomic_t    audit_lost = ATOMIC_INIT(0);

/* The netlink socket. */
static struct sock *audit_sock;

101
/* The audit_freelist is a list of pre-allocated audit buffers (if more
L
Linus Torvalds 已提交
102 103 104
 * than AUDIT_MAXFREE are in use, the audit buffer is freed instead of
 * being placed on the freelist). */
static DEFINE_SPINLOCK(audit_freelist_lock);
105
static int	   audit_freelist_count;
L
Linus Torvalds 已提交
106 107
static LIST_HEAD(audit_freelist);

108 109 110
static struct sk_buff_head audit_skb_queue;
static struct task_struct *kauditd_task;
static DECLARE_WAIT_QUEUE_HEAD(kauditd_wait);
111
static DECLARE_WAIT_QUEUE_HEAD(audit_backlog_wait);
L
Linus Torvalds 已提交
112 113

/* The netlink socket is only to be read by 1 CPU, which lets us assume
S
Steve Grubb 已提交
114
 * that list additions and deletions never happen simultaneously in
L
Linus Torvalds 已提交
115
 * auditsc.c */
116
DECLARE_MUTEX(audit_netlink_sem);
L
Linus Torvalds 已提交
117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133

/* AUDIT_BUFSIZ is the size of the temporary buffer used for formatting
 * audit records.  Since printk uses a 1024 byte buffer, this buffer
 * should be at least that large. */
#define AUDIT_BUFSIZ 1024

/* AUDIT_MAXFREE is the number of empty audit_buffers we keep on the
 * audit_freelist.  Doing so eliminates many kmalloc/kfree calls. */
#define AUDIT_MAXFREE  (2*NR_CPUS)

/* The audit_buffer is used when formatting an audit record.  The caller
 * locks briefly to get the record off the freelist or to allocate the
 * buffer, and locks briefly to send the buffer to the netlink layer or
 * to place it on a transmit queue.  Multiple audit_buffers can be in
 * use simultaneously. */
struct audit_buffer {
	struct list_head     list;
134
	struct sk_buff       *skb;	/* formatted skb ready to send */
L
Linus Torvalds 已提交
135
	struct audit_context *ctx;	/* NULL or associated context */
A
Al Viro 已提交
136
	gfp_t		     gfp_mask;
L
Linus Torvalds 已提交
137 138
};

139 140 141 142 143 144
static void audit_set_pid(struct audit_buffer *ab, pid_t pid)
{
	struct nlmsghdr *nlh = (struct nlmsghdr *)ab->skb->data;
	nlh->nlmsg_pid = pid;
}

L
Linus Torvalds 已提交
145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188
static void audit_panic(const char *message)
{
	switch (audit_failure)
	{
	case AUDIT_FAIL_SILENT:
		break;
	case AUDIT_FAIL_PRINTK:
		printk(KERN_ERR "audit: %s\n", message);
		break;
	case AUDIT_FAIL_PANIC:
		panic("audit: %s\n", message);
		break;
	}
}

static inline int audit_rate_check(void)
{
	static unsigned long	last_check = 0;
	static int		messages   = 0;
	static DEFINE_SPINLOCK(lock);
	unsigned long		flags;
	unsigned long		now;
	unsigned long		elapsed;
	int			retval	   = 0;

	if (!audit_rate_limit) return 1;

	spin_lock_irqsave(&lock, flags);
	if (++messages < audit_rate_limit) {
		retval = 1;
	} else {
		now     = jiffies;
		elapsed = now - last_check;
		if (elapsed > HZ) {
			last_check = now;
			messages   = 0;
			retval     = 1;
		}
	}
	spin_unlock_irqrestore(&lock, flags);

	return retval;
}

189 190 191 192 193 194 195 196
/**
 * audit_log_lost - conditionally log lost audit message event
 * @message: the message stating reason for lost audit message
 *
 * Emit at least 1 message per second, even if audit_rate_check is
 * throttling.
 * Always increment the lost messages counter.
*/
L
Linus Torvalds 已提交
197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220
void audit_log_lost(const char *message)
{
	static unsigned long	last_msg = 0;
	static DEFINE_SPINLOCK(lock);
	unsigned long		flags;
	unsigned long		now;
	int			print;

	atomic_inc(&audit_lost);

	print = (audit_failure == AUDIT_FAIL_PANIC || !audit_rate_limit);

	if (!print) {
		spin_lock_irqsave(&lock, flags);
		now = jiffies;
		if (now - last_msg > HZ) {
			print = 1;
			last_msg = now;
		}
		spin_unlock_irqrestore(&lock, flags);
	}

	if (print) {
		printk(KERN_WARNING
221
		       "audit: audit_lost=%d audit_rate_limit=%d audit_backlog_limit=%d\n",
L
Linus Torvalds 已提交
222 223 224 225 226 227 228
		       atomic_read(&audit_lost),
		       audit_rate_limit,
		       audit_backlog_limit);
		audit_panic(message);
	}
}

229
static int audit_set_rate_limit(int limit, uid_t loginuid)
L
Linus Torvalds 已提交
230 231 232
{
	int old		 = audit_rate_limit;
	audit_rate_limit = limit;
233
	audit_log(NULL, GFP_KERNEL, AUDIT_CONFIG_CHANGE, 
234
			"audit_rate_limit=%d old=%d by auid=%u",
235
			audit_rate_limit, old, loginuid);
L
Linus Torvalds 已提交
236 237 238
	return old;
}

239
static int audit_set_backlog_limit(int limit, uid_t loginuid)
L
Linus Torvalds 已提交
240 241 242
{
	int old		 = audit_backlog_limit;
	audit_backlog_limit = limit;
243
	audit_log(NULL, GFP_KERNEL, AUDIT_CONFIG_CHANGE,
244
			"audit_backlog_limit=%d old=%d by auid=%u",
245
			audit_backlog_limit, old, loginuid);
L
Linus Torvalds 已提交
246 247 248
	return old;
}

249
static int audit_set_enabled(int state, uid_t loginuid)
L
Linus Torvalds 已提交
250 251 252 253 254
{
	int old		 = audit_enabled;
	if (state != 0 && state != 1)
		return -EINVAL;
	audit_enabled = state;
255
	audit_log(NULL, GFP_KERNEL, AUDIT_CONFIG_CHANGE,
256
			"audit_enabled=%d old=%d by auid=%u",
257
			audit_enabled, old, loginuid);
L
Linus Torvalds 已提交
258 259 260
	return old;
}

261
static int audit_set_failure(int state, uid_t loginuid)
L
Linus Torvalds 已提交
262 263 264 265 266 267 268
{
	int old		 = audit_failure;
	if (state != AUDIT_FAIL_SILENT
	    && state != AUDIT_FAIL_PRINTK
	    && state != AUDIT_FAIL_PANIC)
		return -EINVAL;
	audit_failure = state;
269
	audit_log(NULL, GFP_KERNEL, AUDIT_CONFIG_CHANGE,
270
			"audit_failure=%d old=%d by auid=%u",
271
			audit_failure, old, loginuid);
L
Linus Torvalds 已提交
272 273 274
	return old;
}

A
Adrian Bunk 已提交
275
static int kauditd_thread(void *dummy)
276 277 278 279 280
{
	struct sk_buff *skb;

	while (1) {
		skb = skb_dequeue(&audit_skb_queue);
281
		wake_up(&audit_backlog_wait);
282 283 284 285 286 287 288 289 290
		if (skb) {
			if (audit_pid) {
				int err = netlink_unicast(audit_sock, skb, audit_pid, 0);
				if (err < 0) {
					BUG_ON(err != -ECONNREFUSED); /* Shoudn't happen */
					printk(KERN_ERR "audit: *NO* daemon at audit_pid=%d\n", audit_pid);
					audit_pid = 0;
				}
			} else {
291
				printk(KERN_NOTICE "%s\n", skb->data + NLMSG_SPACE(0));
292 293 294 295 296 297 298
				kfree_skb(skb);
			}
		} else {
			DECLARE_WAITQUEUE(wait, current);
			set_current_state(TASK_INTERRUPTIBLE);
			add_wait_queue(&kauditd_wait, &wait);

299 300
			if (!skb_queue_len(&audit_skb_queue)) {
				try_to_freeze();
301
				schedule();
302
			}
303 304 305 306 307 308 309

			__set_current_state(TASK_RUNNING);
			remove_wait_queue(&kauditd_wait, &wait);
		}
	}
}

310 311 312 313 314 315 316 317 318 319 320 321 322
/**
 * audit_send_reply - send an audit reply message via netlink
 * @pid: process id to send reply to
 * @seq: sequence number
 * @type: audit message type
 * @done: done (last) flag
 * @multi: multi-part message flag
 * @payload: payload data
 * @size: payload size
 *
 * Allocates an skb, builds the netlink message, and sends it to the pid.
 * No failure notifications.
 */
L
Linus Torvalds 已提交
323 324 325 326 327 328 329 330 331 332 333 334
void audit_send_reply(int pid, int seq, int type, int done, int multi,
		      void *payload, int size)
{
	struct sk_buff	*skb;
	struct nlmsghdr	*nlh;
	int		len = NLMSG_SPACE(size);
	void		*data;
	int		flags = multi ? NLM_F_MULTI : 0;
	int		t     = done  ? NLMSG_DONE  : type;

	skb = alloc_skb(len, GFP_KERNEL);
	if (!skb)
335
		return;
L
Linus Torvalds 已提交
336

337
	nlh		 = NLMSG_PUT(skb, pid, seq, t, size);
L
Linus Torvalds 已提交
338 339 340
	nlh->nlmsg_flags = flags;
	data		 = NLMSG_DATA(nlh);
	memcpy(data, payload, size);
341 342 343 344

	/* Ignore failure. It'll only happen if the sender goes away,
	   because our timeout is set to infinite. */
	netlink_unicast(audit_sock, skb, pid, 0);
L
Linus Torvalds 已提交
345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365
	return;

nlmsg_failure:			/* Used by NLMSG_PUT */
	if (skb)
		kfree_skb(skb);
}

/*
 * Check for appropriate CAP_AUDIT_ capabilities on incoming audit
 * control messages.
 */
static int audit_netlink_ok(kernel_cap_t eff_cap, u16 msg_type)
{
	int err = 0;

	switch (msg_type) {
	case AUDIT_GET:
	case AUDIT_LIST:
	case AUDIT_SET:
	case AUDIT_ADD:
	case AUDIT_DEL:
366
	case AUDIT_SIGNAL_INFO:
L
Linus Torvalds 已提交
367 368 369
		if (!cap_raised(eff_cap, CAP_AUDIT_CONTROL))
			err = -EPERM;
		break;
370
	case AUDIT_USER:
371
	case AUDIT_FIRST_USER_MSG...AUDIT_LAST_USER_MSG:
372
	case AUDIT_FIRST_USER_MSG2...AUDIT_LAST_USER_MSG2:
L
Linus Torvalds 已提交
373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388
		if (!cap_raised(eff_cap, CAP_AUDIT_WRITE))
			err = -EPERM;
		break;
	default:  /* bad msg */
		err = -EINVAL;
	}

	return err;
}

static int audit_receive_msg(struct sk_buff *skb, struct nlmsghdr *nlh)
{
	u32			uid, pid, seq;
	void			*data;
	struct audit_status	*status_get, status_set;
	int			err;
389
	struct audit_buffer	*ab;
L
Linus Torvalds 已提交
390
	u16			msg_type = nlh->nlmsg_type;
391
	uid_t			loginuid; /* loginuid of sender */
392
	struct audit_sig_info   sig_data;
L
Linus Torvalds 已提交
393 394 395 396 397

	err = audit_netlink_ok(NETLINK_CB(skb).eff_cap, msg_type);
	if (err)
		return err;

398 399
	/* As soon as there's any sign of userspace auditd,
	 * start kauditd to talk to it */
400 401 402 403 404 405 406 407
	if (!kauditd_task)
		kauditd_task = kthread_run(kauditd_thread, NULL, "kauditd");
	if (IS_ERR(kauditd_task)) {
		err = PTR_ERR(kauditd_task);
		kauditd_task = NULL;
		return err;
	}

L
Linus Torvalds 已提交
408 409
	pid  = NETLINK_CREDS(skb)->pid;
	uid  = NETLINK_CREDS(skb)->uid;
410
	loginuid = NETLINK_CB(skb).loginuid;
L
Linus Torvalds 已提交
411 412 413 414 415 416 417 418 419 420 421
	seq  = nlh->nlmsg_seq;
	data = NLMSG_DATA(nlh);

	switch (msg_type) {
	case AUDIT_GET:
		status_set.enabled	 = audit_enabled;
		status_set.failure	 = audit_failure;
		status_set.pid		 = audit_pid;
		status_set.rate_limit	 = audit_rate_limit;
		status_set.backlog_limit = audit_backlog_limit;
		status_set.lost		 = atomic_read(&audit_lost);
422
		status_set.backlog	 = skb_queue_len(&audit_skb_queue);
L
Linus Torvalds 已提交
423 424 425 426 427 428 429 430
		audit_send_reply(NETLINK_CB(skb).pid, seq, AUDIT_GET, 0, 0,
				 &status_set, sizeof(status_set));
		break;
	case AUDIT_SET:
		if (nlh->nlmsg_len < sizeof(struct audit_status))
			return -EINVAL;
		status_get   = (struct audit_status *)data;
		if (status_get->mask & AUDIT_STATUS_ENABLED) {
431
			err = audit_set_enabled(status_get->enabled, loginuid);
L
Linus Torvalds 已提交
432 433 434
			if (err < 0) return err;
		}
		if (status_get->mask & AUDIT_STATUS_FAILURE) {
435
			err = audit_set_failure(status_get->failure, loginuid);
L
Linus Torvalds 已提交
436 437 438 439 440
			if (err < 0) return err;
		}
		if (status_get->mask & AUDIT_STATUS_PID) {
			int old   = audit_pid;
			audit_pid = status_get->pid;
441
			audit_log(NULL, GFP_KERNEL, AUDIT_CONFIG_CHANGE,
442
				"audit_pid=%d old=%d by auid=%u",
443
				  audit_pid, old, loginuid);
L
Linus Torvalds 已提交
444 445
		}
		if (status_get->mask & AUDIT_STATUS_RATE_LIMIT)
446
			audit_set_rate_limit(status_get->rate_limit, loginuid);
L
Linus Torvalds 已提交
447
		if (status_get->mask & AUDIT_STATUS_BACKLOG_LIMIT)
448 449
			audit_set_backlog_limit(status_get->backlog_limit,
							loginuid);
L
Linus Torvalds 已提交
450
		break;
451
	case AUDIT_USER:
452
	case AUDIT_FIRST_USER_MSG...AUDIT_LAST_USER_MSG:
453
	case AUDIT_FIRST_USER_MSG2...AUDIT_LAST_USER_MSG2:
454 455 456
		if (!audit_enabled && msg_type != AUDIT_USER_AVC)
			return 0;

457
		err = audit_filter_user(&NETLINK_CB(skb), msg_type);
458 459
		if (err == 1) {
			err = 0;
460
			ab = audit_log_start(NULL, GFP_KERNEL, msg_type);
461 462 463 464 465 466 467
			if (ab) {
				audit_log_format(ab,
						 "user pid=%d uid=%u auid=%u msg='%.1024s'",
						 pid, uid, loginuid, (char *)data);
				audit_set_pid(ab, pid);
				audit_log_end(ab);
			}
468
		}
L
Linus Torvalds 已提交
469 470 471 472 473 474 475 476
		break;
	case AUDIT_ADD:
	case AUDIT_DEL:
		if (nlh->nlmsg_len < sizeof(struct audit_rule))
			return -EINVAL;
		/* fallthrough */
	case AUDIT_LIST:
		err = audit_receive_filter(nlh->nlmsg_type, NETLINK_CB(skb).pid,
477
					   uid, seq, data, loginuid);
L
Linus Torvalds 已提交
478
		break;
479 480 481 482 483 484
	case AUDIT_SIGNAL_INFO:
		sig_data.uid = audit_sig_uid;
		sig_data.pid = audit_sig_pid;
		audit_send_reply(NETLINK_CB(skb).pid, seq, AUDIT_SIGNAL_INFO, 
				0, 0, &sig_data, sizeof(sig_data));
		break;
L
Linus Torvalds 已提交
485 486 487 488 489 490 491 492
	default:
		err = -EINVAL;
		break;
	}

	return err < 0 ? err : 0;
}

493 494
/*
 * Get message from skb (based on rtnetlink_rcv_skb).  Each message is
L
Linus Torvalds 已提交
495
 * processed by audit_receive_msg.  Malformed skbs with wrong length are
496 497
 * discarded silently.
 */
498
static void audit_receive_skb(struct sk_buff *skb)
L
Linus Torvalds 已提交
499 500 501 502 503 504 505 506
{
	int		err;
	struct nlmsghdr	*nlh;
	u32		rlen;

	while (skb->len >= NLMSG_SPACE(0)) {
		nlh = (struct nlmsghdr *)skb->data;
		if (nlh->nlmsg_len < sizeof(*nlh) || skb->len < nlh->nlmsg_len)
507
			return;
L
Linus Torvalds 已提交
508 509 510 511 512 513 514 515 516 517 518 519 520 521 522
		rlen = NLMSG_ALIGN(nlh->nlmsg_len);
		if (rlen > skb->len)
			rlen = skb->len;
		if ((err = audit_receive_msg(skb, nlh))) {
			netlink_ack(skb, nlh, err);
		} else if (nlh->nlmsg_flags & NLM_F_ACK)
			netlink_ack(skb, nlh, 0);
		skb_pull(skb, rlen);
	}
}

/* Receive messages from netlink socket. */
static void audit_receive(struct sock *sk, int length)
{
	struct sk_buff  *skb;
523
	unsigned int qlen;
L
Linus Torvalds 已提交
524

525
	down(&audit_netlink_sem);
L
Linus Torvalds 已提交
526

527 528 529 530
	for (qlen = skb_queue_len(&sk->sk_receive_queue); qlen; qlen--) {
		skb = skb_dequeue(&sk->sk_receive_queue);
		audit_receive_skb(skb);
		kfree_skb(skb);
L
Linus Torvalds 已提交
531 532 533 534 535 536 537 538 539 540
	}
	up(&audit_netlink_sem);
}


/* Initialize audit support at boot time. */
static int __init audit_init(void)
{
	printk(KERN_INFO "audit: initializing netlink socket (%s)\n",
	       audit_default ? "enabled" : "disabled");
541
	audit_sock = netlink_kernel_create(NETLINK_AUDIT, 0, audit_receive,
542
					   THIS_MODULE);
L
Linus Torvalds 已提交
543 544 545
	if (!audit_sock)
		audit_panic("cannot initialize netlink socket");

546 547
	audit_sock->sk_sndtimeo = MAX_SCHEDULE_TIMEOUT;
	skb_queue_head_init(&audit_skb_queue);
L
Linus Torvalds 已提交
548 549
	audit_initialized = 1;
	audit_enabled = audit_default;
550
	audit_log(NULL, GFP_KERNEL, AUDIT_KERNEL, "initialized");
L
Linus Torvalds 已提交
551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568
	return 0;
}
__initcall(audit_init);

/* Process kernel command-line parameter at boot time.  audit=0 or audit=1. */
static int __init audit_enable(char *str)
{
	audit_default = !!simple_strtol(str, NULL, 0);
	printk(KERN_INFO "audit: %s%s\n",
	       audit_default ? "enabled" : "disabled",
	       audit_initialized ? "" : " (after initialization)");
	if (audit_initialized)
		audit_enabled = audit_default;
	return 0;
}

__setup("audit=", audit_enable);

569 570 571 572
static void audit_buffer_free(struct audit_buffer *ab)
{
	unsigned long flags;

573 574 575
	if (!ab)
		return;

576 577
	if (ab->skb)
		kfree_skb(ab->skb);
578

579 580 581 582 583 584 585 586
	spin_lock_irqsave(&audit_freelist_lock, flags);
	if (++audit_freelist_count > AUDIT_MAXFREE)
		kfree(ab);
	else
		list_add(&ab->list, &audit_freelist);
	spin_unlock_irqrestore(&audit_freelist_lock, flags);
}

587
static struct audit_buffer * audit_buffer_alloc(struct audit_context *ctx,
A
Al Viro 已提交
588
						gfp_t gfp_mask, int type)
589 590 591
{
	unsigned long flags;
	struct audit_buffer *ab = NULL;
592
	struct nlmsghdr *nlh;
593 594 595 596 597 598 599 600 601 602 603

	spin_lock_irqsave(&audit_freelist_lock, flags);
	if (!list_empty(&audit_freelist)) {
		ab = list_entry(audit_freelist.next,
				struct audit_buffer, list);
		list_del(&ab->list);
		--audit_freelist_count;
	}
	spin_unlock_irqrestore(&audit_freelist_lock, flags);

	if (!ab) {
604
		ab = kmalloc(sizeof(*ab), gfp_mask);
605
		if (!ab)
606
			goto err;
607
	}
608

609
	ab->skb = alloc_skb(AUDIT_BUFSIZ, gfp_mask);
610
	if (!ab->skb)
611 612
		goto err;

613
	ab->ctx = ctx;
614
	ab->gfp_mask = gfp_mask;
615 616 617 618 619
	nlh = (struct nlmsghdr *)skb_put(ab->skb, NLMSG_SPACE(0));
	nlh->nlmsg_type = type;
	nlh->nlmsg_flags = 0;
	nlh->nlmsg_pid = 0;
	nlh->nlmsg_seq = 0;
620
	return ab;
621 622 623
err:
	audit_buffer_free(ab);
	return NULL;
624
}
L
Linus Torvalds 已提交
625

626 627 628 629
/**
 * audit_serial - compute a serial number for the audit record
 *
 * Compute a serial number for the audit record.  Audit records are
630 631 632 633 634 635 636 637 638 639 640
 * written to user-space as soon as they are generated, so a complete
 * audit record may be written in several pieces.  The timestamp of the
 * record and this serial number are used by the user-space tools to
 * determine which pieces belong to the same audit record.  The
 * (timestamp,serial) tuple is unique for each syscall and is live from
 * syscall entry to syscall exit.
 *
 * NOTE: Another possibility is to store the formatted records off the
 * audit context (for those records that have a context), and emit them
 * all at syscall exit.  However, this could delay the reporting of
 * significant errors until syscall exit (or never, if the system
641 642
 * halts).
 */
643 644
unsigned int audit_serial(void)
{
645 646 647 648 649
	static spinlock_t serial_lock = SPIN_LOCK_UNLOCKED;
	static unsigned int serial = 0;

	unsigned long flags;
	unsigned int ret;
650

651
	spin_lock_irqsave(&serial_lock, flags);
652
	do {
653 654
		ret = ++serial;
	} while (unlikely(!ret));
655
	spin_unlock_irqrestore(&serial_lock, flags);
656

657
	return ret;
658 659 660 661 662 663 664 665 666 667 668 669 670
}

static inline void audit_get_stamp(struct audit_context *ctx, 
				   struct timespec *t, unsigned int *serial)
{
	if (ctx)
		auditsc_get_stamp(ctx, t, serial);
	else {
		*t = CURRENT_TIME;
		*serial = audit_serial();
	}
}

L
Linus Torvalds 已提交
671 672 673 674 675 676
/* Obtain an audit buffer.  This routine does locking to obtain the
 * audit buffer, but then no locking is required for calls to
 * audit_log_*format.  If the tsk is a task that is currently in a
 * syscall, then the syscall is marked as auditable and an audit record
 * will be written at syscall exit.  If there is no associated task, tsk
 * should be NULL. */
677

678 679 680 681 682 683 684 685 686 687 688 689 690 691 692
/**
 * audit_log_start - obtain an audit buffer
 * @ctx: audit_context (may be NULL)
 * @gfp_mask: type of allocation
 * @type: audit message type
 *
 * Returns audit_buffer pointer on success or NULL on error.
 *
 * Obtain an audit buffer.  This routine does locking to obtain the
 * audit buffer, but then no locking is required for calls to
 * audit_log_*format.  If the task (ctx) is a task that is currently in a
 * syscall, then the syscall is marked as auditable and an audit record
 * will be written at syscall exit.  If there is no associated task, then
 * task context (ctx) should be NULL.
 */
A
Al Viro 已提交
693
struct audit_buffer *audit_log_start(struct audit_context *ctx, gfp_t gfp_mask,
694
				     int type)
L
Linus Torvalds 已提交
695 696 697
{
	struct audit_buffer	*ab	= NULL;
	struct timespec		t;
698
	unsigned int		serial;
699
	int reserve;
700
	unsigned long timeout_start = jiffies;
L
Linus Torvalds 已提交
701 702 703 704

	if (!audit_initialized)
		return NULL;

705 706 707 708 709 710 711 712
	if (gfp_mask & __GFP_WAIT)
		reserve = 0;
	else
		reserve = 5; /* Allow atomic callers to go up to five 
				entries over the normal backlog limit */

	while (audit_backlog_limit
	       && skb_queue_len(&audit_skb_queue) > audit_backlog_limit + reserve) {
713 714 715
		if (gfp_mask & __GFP_WAIT && audit_backlog_wait_time
		    && time_before(jiffies, timeout_start + audit_backlog_wait_time)) {

716 717 718 719 720 721 722
			/* Wait for auditd to drain the queue a little */
			DECLARE_WAITQUEUE(wait, current);
			set_current_state(TASK_INTERRUPTIBLE);
			add_wait_queue(&audit_backlog_wait, &wait);

			if (audit_backlog_limit &&
			    skb_queue_len(&audit_skb_queue) > audit_backlog_limit)
723
				schedule_timeout(timeout_start + audit_backlog_wait_time - jiffies);
724 725 726

			__set_current_state(TASK_RUNNING);
			remove_wait_queue(&audit_backlog_wait, &wait);
727
			continue;
728
		}
729 730 731 732 733 734 735
		if (audit_rate_check())
			printk(KERN_WARNING
			       "audit: audit_backlog=%d > "
			       "audit_backlog_limit=%d\n",
			       skb_queue_len(&audit_skb_queue),
			       audit_backlog_limit);
		audit_log_lost("backlog limit exceeded");
736 737
		audit_backlog_wait_time = audit_backlog_wait_overflow;
		wake_up(&audit_backlog_wait);
738 739 740
		return NULL;
	}

741
	ab = audit_buffer_alloc(ctx, gfp_mask, type);
L
Linus Torvalds 已提交
742 743 744 745 746
	if (!ab) {
		audit_log_lost("out of memory in audit_log_start");
		return NULL;
	}

747
	audit_get_stamp(ab->ctx, &t, &serial);
748

L
Linus Torvalds 已提交
749 750 751 752 753
	audit_log_format(ab, "audit(%lu.%03lu:%u): ",
			 t.tv_sec, t.tv_nsec/1000000, serial);
	return ab;
}

754
/**
755
 * audit_expand - expand skb in the audit buffer
756
 * @ab: audit_buffer
757
 * @extra: space to add at tail of the skb
758 759 760 761
 *
 * Returns 0 (no space) on failed expansion, or available space if
 * successful.
 */
762
static inline int audit_expand(struct audit_buffer *ab, int extra)
763
{
764
	struct sk_buff *skb = ab->skb;
765
	int ret = pskb_expand_head(skb, skb_headroom(skb), extra,
766
				   ab->gfp_mask);
767 768
	if (ret < 0) {
		audit_log_lost("out of memory in audit_expand");
769
		return 0;
770 771
	}
	return skb_tailroom(skb);
772
}
L
Linus Torvalds 已提交
773

774 775
/*
 * Format an audit message into the audit buffer.  If there isn't enough
L
Linus Torvalds 已提交
776 777
 * room in the audit buffer, more room will be allocated and vsnprint
 * will be called a second time.  Currently, we assume that a printk
778 779
 * can't format message larger than 1024 bytes, so we don't either.
 */
L
Linus Torvalds 已提交
780 781 782 783
static void audit_log_vformat(struct audit_buffer *ab, const char *fmt,
			      va_list args)
{
	int len, avail;
784
	struct sk_buff *skb;
D
David Woodhouse 已提交
785
	va_list args2;
L
Linus Torvalds 已提交
786 787 788 789

	if (!ab)
		return;

790 791 792 793
	BUG_ON(!ab->skb);
	skb = ab->skb;
	avail = skb_tailroom(skb);
	if (avail == 0) {
794
		avail = audit_expand(ab, AUDIT_BUFSIZ);
795 796
		if (!avail)
			goto out;
L
Linus Torvalds 已提交
797
	}
D
David Woodhouse 已提交
798
	va_copy(args2, args);
799
	len = vsnprintf(skb->tail, avail, fmt, args);
L
Linus Torvalds 已提交
800 801 802 803
	if (len >= avail) {
		/* The printk buffer is 1024 bytes long, so if we get
		 * here and AUDIT_BUFSIZ is at least 1024, then we can
		 * log everything that printk could have logged. */
804 805
		avail = audit_expand(ab,
			max_t(unsigned, AUDIT_BUFSIZ, 1+len-avail));
806 807
		if (!avail)
			goto out;
D
David Woodhouse 已提交
808
		len = vsnprintf(skb->tail, avail, fmt, args2);
L
Linus Torvalds 已提交
809
	}
810 811
	if (len > 0)
		skb_put(skb, len);
812 813
out:
	return;
L
Linus Torvalds 已提交
814 815
}

816 817 818 819 820 821 822 823
/**
 * audit_log_format - format a message into the audit buffer.
 * @ab: audit_buffer
 * @fmt: format string
 * @...: optional parameters matching @fmt string
 *
 * All the work is done in audit_log_vformat.
 */
L
Linus Torvalds 已提交
824 825 826 827 828 829 830 831 832 833 834
void audit_log_format(struct audit_buffer *ab, const char *fmt, ...)
{
	va_list args;

	if (!ab)
		return;
	va_start(args, fmt);
	audit_log_vformat(ab, fmt, args);
	va_end(args);
}

835 836 837 838 839 840 841 842 843 844 845 846
/**
 * audit_log_hex - convert a buffer to hex and append it to the audit skb
 * @ab: the audit_buffer
 * @buf: buffer to convert to hex
 * @len: length of @buf to be converted
 *
 * No return value; failure to expand is silently ignored.
 *
 * This function will take the passed buf and convert it into a string of
 * ascii hex digits. The new string is placed onto the skb.
 */
void audit_log_hex(struct audit_buffer *ab, const unsigned char *buf,
847
		size_t len)
848
{
849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864
	int i, avail, new_len;
	unsigned char *ptr;
	struct sk_buff *skb;
	static const unsigned char *hex = "0123456789ABCDEF";

	BUG_ON(!ab->skb);
	skb = ab->skb;
	avail = skb_tailroom(skb);
	new_len = len<<1;
	if (new_len >= avail) {
		/* Round the buffer request up to the next multiple */
		new_len = AUDIT_BUFSIZ*(((new_len-avail)/AUDIT_BUFSIZ) + 1);
		avail = audit_expand(ab, new_len);
		if (!avail)
			return;
	}
865

866 867 868 869 870 871 872
	ptr = skb->tail;
	for (i=0; i<len; i++) {
		*ptr++ = hex[(buf[i] & 0xF0)>>4]; /* Upper nibble */
		*ptr++ = hex[buf[i] & 0x0F];	  /* Lower nibble */
	}
	*ptr = 0;
	skb_put(skb, len << 1); /* new string is twice the old string */
873 874
}

875 876 877 878 879 880 881
/**
 * audit_log_unstrustedstring - log a string that may contain random characters
 * @ab: audit_buffer
 * @string: string to be logged
 *
 * This code will escape a string that is passed to it if the string
 * contains a control character, unprintable character, double quote mark,
882
 * or a space. Unescaped strings will start and end with a double quote mark.
883 884
 * Strings that are escaped are printed in hex (2 digits per char).
 */
885 886
void audit_log_untrustedstring(struct audit_buffer *ab, const char *string)
{
887
	const unsigned char *p = string;
888 889

	while (*p) {
890
		if (*p == '"' || *p < 0x21 || *p > 0x7f) {
891 892 893 894 895 896 897 898
			audit_log_hex(ab, string, strlen(string));
			return;
		}
		p++;
	}
	audit_log_format(ab, "\"%s\"", string);
}

899
/* This is a helper-function to print the escaped d_path */
L
Linus Torvalds 已提交
900 901 902
void audit_log_d_path(struct audit_buffer *ab, const char *prefix,
		      struct dentry *dentry, struct vfsmount *vfsmnt)
{
903
	char *p, *path;
L
Linus Torvalds 已提交
904

905 906
	if (prefix)
		audit_log_format(ab, " %s", prefix);
L
Linus Torvalds 已提交
907

908
	/* We will allow 11 spaces for ' (deleted)' to be appended */
909
	path = kmalloc(PATH_MAX+11, ab->gfp_mask);
910 911 912
	if (!path) {
		audit_log_format(ab, "<no memory>");
		return;
L
Linus Torvalds 已提交
913
	}
914 915 916 917 918 919 920
	p = d_path(dentry, vfsmnt, path, PATH_MAX+11);
	if (IS_ERR(p)) { /* Should never happen since we send PATH_MAX */
		/* FIXME: can we save some information here? */
		audit_log_format(ab, "<too long>");
	} else 
		audit_log_untrustedstring(ab, p);
	kfree(path);
L
Linus Torvalds 已提交
921 922
}

923 924 925 926 927 928
/**
 * audit_log_end - end one audit record
 * @ab: the audit_buffer
 *
 * The netlink_* functions cannot be called inside an irq context, so
 * the audit buffer is placed on a queue and a tasklet is scheduled to
L
Linus Torvalds 已提交
929
 * remove them from the queue outside the irq context.  May be called in
930 931
 * any context.
 */
932
void audit_log_end(struct audit_buffer *ab)
L
Linus Torvalds 已提交
933 934 935 936 937 938
{
	if (!ab)
		return;
	if (!audit_rate_check()) {
		audit_log_lost("rate limit exceeded");
	} else {
939 940 941 942 943 944 945
		if (audit_pid) {
			struct nlmsghdr *nlh = (struct nlmsghdr *)ab->skb->data;
			nlh->nlmsg_len = ab->skb->len - NLMSG_SPACE(0);
			skb_queue_tail(&audit_skb_queue, ab->skb);
			ab->skb = NULL;
			wake_up_interruptible(&kauditd_wait);
		} else {
946
			printk(KERN_NOTICE "%s\n", ab->skb->data + NLMSG_SPACE(0));
947
		}
L
Linus Torvalds 已提交
948
	}
949
	audit_buffer_free(ab);
L
Linus Torvalds 已提交
950 951
}

952 953 954 955 956 957 958 959 960 961 962 963
/**
 * audit_log - Log an audit record
 * @ctx: audit context
 * @gfp_mask: type of allocation
 * @type: audit message type
 * @fmt: format string to use
 * @...: variable parameters matching the format string
 *
 * This is a convenience function that calls audit_log_start,
 * audit_log_vformat, and audit_log_end.  It may be called
 * in any context.
 */
A
Al Viro 已提交
964
void audit_log(struct audit_context *ctx, gfp_t gfp_mask, int type, 
965
	       const char *fmt, ...)
L
Linus Torvalds 已提交
966 967 968 969
{
	struct audit_buffer *ab;
	va_list args;

970
	ab = audit_log_start(ctx, gfp_mask, type);
L
Linus Torvalds 已提交
971 972 973 974 975 976 977
	if (ab) {
		va_start(args, fmt);
		audit_log_vformat(ab, fmt, args);
		va_end(args);
		audit_log_end(ab);
	}
}