#include <sys/types.h>
#include <sys/vnode.h>
#include <sys/ipc.h>
#include <sys/sem.h>
#include <sys/socketvar.h>
#include <sys/socket.h>
#include <sys/queue.h>
#include <sys/fcntl.h>
#include <sys/audit.h>
#include <sys/kern_audit.h>
#include <sys/bsm_token.h>
#include <sys/bsm_kevents.h>
#include <sys/bsm_klib.h>
#include <sys/user.h>
#include <netinet/in_systm.h>
#include <netinet/in.h>
#include <netinet/ip.h>
#include <kern/lock.h>
static int bsm_rec_count = 0;
LIST_HEAD(, au_record) bsm_free_q;
static mutex_t *bsm_audit_mutex;
void
kau_init(void)
{
printf("BSM auditing present\n");
LIST_INIT(&bsm_free_q);
bsm_audit_mutex = mutex_alloc(ETAP_NO_TRACE);
}
struct au_record *
kau_open(void)
{
struct au_record *rec = NULL;
mutex_lock(bsm_audit_mutex);
if (!LIST_EMPTY(&bsm_free_q)) {
rec = LIST_FIRST(&bsm_free_q);
LIST_REMOVE(rec, au_rec_q);
}
mutex_unlock(bsm_audit_mutex);
if (rec == NULL) {
mutex_lock(bsm_audit_mutex);
if (bsm_rec_count >= MAX_AUDIT_RECORDS) {
mutex_unlock(bsm_audit_mutex);
return NULL;
}
mutex_unlock(bsm_audit_mutex);
kmem_alloc(kernel_map, &rec, sizeof(*rec));
if(rec == NULL) {
return NULL;
}
kmem_alloc(kernel_map, &rec->data,
MAX_AUDIT_RECORD_SIZE * sizeof(u_char));
if((rec->data) == NULL) {
kmem_free(kernel_map, rec, sizeof(*rec));
return NULL;
}
mutex_lock(bsm_audit_mutex);
bsm_rec_count++;
mutex_unlock(bsm_audit_mutex);
}
memset(rec->data, 0, MAX_AUDIT_RECORD_SIZE);
TAILQ_INIT(&rec->token_q);
rec->len = 0;
rec->used = 1;
return rec;
}
int kau_write(struct au_record *rec, struct au_token *tok)
{
if(tok == NULL) {
return -1;
}
TAILQ_INSERT_TAIL(&rec->token_q, tok, tokens);
rec->len += tok->len;
return 0;
}
int kau_close(struct au_record *rec, struct timespec *ctime, short event)
{
u_char *dptr;
size_t tot_rec_size;
token_t *cur, *hdr, *trail;
int retval = 0;
tot_rec_size = rec->len + HEADER_SIZE + TRAILER_SIZE;
if(tot_rec_size <= MAX_AUDIT_RECORD_SIZE) {
hdr = kau_to_header32(ctime, tot_rec_size, event, 0);
if(hdr != NULL) {
TAILQ_INSERT_HEAD(&rec->token_q, hdr, tokens);
trail = au_to_trailer(tot_rec_size);
if(trail != NULL) {
TAILQ_INSERT_TAIL(&rec->token_q, trail, tokens);
}
}
rec->len = tot_rec_size;
dptr = rec->data;
TAILQ_FOREACH(cur, &rec->token_q, tokens) {
memcpy(dptr, cur->t_data, cur->len);
dptr += cur->len;
}
}
}
void kau_free(struct au_record *rec)
{
struct au_token *tok;
while ((tok = TAILQ_FIRST(&rec->token_q))) {
TAILQ_REMOVE(&rec->token_q, tok, tokens);
kmem_free(kernel_map, tok->t_data, tok->len);
kmem_free(kernel_map, tok, sizeof(struct au_token));
}
rec->used = 0;
rec->len = 0;
mutex_lock(bsm_audit_mutex);
LIST_INSERT_HEAD(&bsm_free_q, rec, au_rec_q);
mutex_unlock(bsm_audit_mutex);
}
#define UPATH1_TOKENS \
do { \
if (ar->ar_valid_arg & ARG_UPATH1) { \
tok = au_to_path(ar->ar_arg_upath1); \
kau_write(rec, tok); \
} \
} while (0)
#define UPATH2_TOKENS \
do { \
if (ar->ar_valid_arg & ARG_UPATH2) { \
tok = au_to_path(ar->ar_arg_upath2); \
kau_write(rec, tok); \
} \
} while (0)
#define KPATH1_VNODE1_TOKENS \
do { \
if (ar->ar_valid_arg & ARG_KPATH1) { \
tok = au_to_path(ar->ar_arg_kpath1); \
kau_write(rec, tok); \
} \
if (ar->ar_valid_arg & ARG_VNODE1) { \
fill_vattr(&vattr, &ar->ar_arg_vnode1); \
tok = au_to_attr32(&vattr); \
kau_write(rec, tok); \
} \
} while (0)
#define KPATH1_VNODE1_OR_UPATH1_TOKENS \
do { \
if (ar->ar_valid_arg & ARG_KPATH1) { \
tok = au_to_path(ar->ar_arg_kpath1); \
kau_write(rec, tok); \
} else { \
UPATH1_TOKENS; \
} \
if (ar->ar_valid_arg & ARG_VNODE1) { \
fill_vattr(&vattr, &ar->ar_arg_vnode1); \
tok = au_to_attr32(&vattr); \
kau_write(rec, tok); \
} \
} while (0)
#define KPATH2_VNODE2_TOKENS \
do { \
if (ar->ar_valid_arg & ARG_KPATH2) { \
tok = au_to_path(ar->ar_arg_kpath2); \
kau_write(rec, tok); \
} \
if (ar->ar_valid_arg & ARG_VNODE2) { \
fill_vattr(&vattr, &ar->ar_arg_vnode2); \
tok = au_to_attr32(&vattr); \
kau_write(rec, tok); \
} \
} while (0)
#define FD_KPATH1_VNODE1_TOKENS \
do { \
if (ar->ar_valid_arg & ARG_KPATH1) { \
tok = au_to_path(ar->ar_arg_kpath1); \
kau_write(rec, tok); \
if (ar->ar_valid_arg & ARG_VNODE1) { \
fill_vattr(&vattr, &ar->ar_arg_vnode1); \
tok = au_to_attr32(&vattr); \
kau_write(rec, tok); \
} \
} else { \
tok = au_to_arg32(1, "no path: fd", ar->ar_arg_fd); \
kau_write(rec, tok); \
} \
} while (0)
int
kaudit_to_bsm(struct kaudit_record *kar, struct au_record **pau)
{
struct au_token *tok, *subj_tok;
struct au_record *rec;
au_tid_t tid;
struct audit_record *ar;
struct vattr vattr;
int sorf;
int ctr;
*pau = NULL;
if (kar == NULL)
return (BSM_FAILURE);
ar = &kar->k_ar;
if (ar->ar_errno)
sorf = AU_PRS_FAILURE;
else
sorf = AU_PRS_SUCCESS;
if (au_preselect(ar->ar_event, &ar->ar_subj_amask, sorf) == 0)
return (BSM_NOAUDIT);
rec = kau_open();
if (rec == NULL)
return (BSM_FAILURE);
tid.port = ar->ar_subj_term.port;
tid.machine = ar->ar_subj_term.machine;
subj_tok = au_to_subject32(ar->ar_subj_auid,
ar->ar_subj_cred.cr_uid,
ar->ar_subj_egid,
ar->ar_subj_ruid,
ar->ar_subj_rgid,
ar->ar_subj_pid,
ar->ar_subj_asid,
&tid);
switch(ar->ar_event) {
case AUE_ACCEPT:
case AUE_BIND:
case AUE_CONNECT:
case AUE_RECVFROM:
case AUE_RECVMSG:
case AUE_SENDMSG:
case AUE_SENDTO:
tok = au_to_arg32(1, "fd", ar->ar_arg_fd);
kau_write(rec, tok);
if (ar->ar_valid_arg & ARG_SADDRINET) {
tok = au_to_sock_inet(
(struct sockaddr_in *)&ar->ar_arg_sockaddr);
kau_write(rec, tok);
}
if (ar->ar_valid_arg & ARG_SADDRUNIX) {
tok = au_to_sock_unix(
(struct sockaddr_un *)&ar->ar_arg_sockaddr);
kau_write(rec, tok);
UPATH1_TOKENS;
}
break;
case AUE_SOCKET:
case AUE_SOCKETPAIR:
tok = au_to_arg32(1,"domain", ar->ar_arg_sockinfo.sodomain);
kau_write(rec, tok);
tok = au_to_arg32(2,"type", ar->ar_arg_sockinfo.sotype);
kau_write(rec, tok);
tok = au_to_arg32(3,"protocol", ar->ar_arg_sockinfo.soprotocol);
kau_write(rec, tok);
break;
case AUE_SETSOCKOPT:
case AUE_SHUTDOWN:
tok = au_to_arg32(1, "fd", ar->ar_arg_fd);
kau_write(rec, tok);
break;
case AUE_SETAUID:
tok = au_to_arg32(2, "setauid", ar->ar_arg_auid);
kau_write(rec, tok);
case AUE_ADJTIME:
case AUE_AUDIT:
case AUE_EXIT:
case AUE_GETAUID:
case AUE_GETFSSTAT:
case AUE_PIPE:
case AUE_SETPGRP:
case AUE_SETRLIMIT:
break;
case AUE_ACCESS:
case AUE_CHDIR:
case AUE_CHROOT:
case AUE_EXECVE:
case AUE_GETATTRLIST:
case AUE_GETFH:
case AUE_LSTAT:
case AUE_MKFIFO:
case AUE_PATHCONF:
case AUE_READLINK:
case AUE_REVOKE:
case AUE_RMDIR:
case AUE_SEARCHFS:
case AUE_SETATTRLIST:
case AUE_STAT:
case AUE_STATFS:
case AUE_TRUNCATE:
case AUE_UNDELETE:
case AUE_UNLINK:
case AUE_UTIMES:
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_CHFLAGS:
tok = au_to_arg32(2, "flags", ar->ar_arg_fflags);
kau_write(rec, tok);
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_CHMOD:
tok = au_to_arg32(2, "new file mode", ar->ar_arg_mode);
kau_write(rec, tok);
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_CHOWN:
tok = au_to_arg32(2, "new file uid", ar->ar_arg_uid);
kau_write(rec, tok);
tok = au_to_arg32(3, "new file gid", ar->ar_arg_gid);
kau_write(rec, tok);
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_EXCHANGEDATA:
KPATH1_VNODE1_OR_UPATH1_TOKENS;
KPATH2_VNODE2_TOKENS;
break;
case AUE_FCHMOD:
tok = au_to_arg32(2, "new file mode", ar->ar_arg_mode);
kau_write(rec, tok);
FD_KPATH1_VNODE1_TOKENS;
break;
case AUE_FCHDIR:
case AUE_FPATHCONF:
case AUE_FSTAT:
case AUE_FSTATFS:
case AUE_FTRUNCATE:
case AUE_FUTIMES:
case AUE_GETDIRENTRIES:
case AUE_GETDIRENTRIESATTR:
FD_KPATH1_VNODE1_TOKENS;
break;
case AUE_FCHOWN:
tok = au_to_arg32(2, "new file uid", ar->ar_arg_uid);
kau_write(rec, tok);
tok = au_to_arg32(3, "new file gid", ar->ar_arg_gid);
kau_write(rec, tok);
FD_KPATH1_VNODE1_TOKENS;
break;
case AUE_FCNTL:
if (ar->ar_arg_cmd == F_GETLK || ar->ar_arg_cmd == F_SETLK ||
ar->ar_arg_cmd == F_SETLKW) {
tok = au_to_arg32(2, "cmd", ar->ar_arg_cmd);
kau_write(rec, tok);
FD_KPATH1_VNODE1_TOKENS;
}
break;
case AUE_FCHFLAGS:
tok = au_to_arg32(2, "flags", ar->ar_arg_fflags);
kau_write(rec, tok);
FD_KPATH1_VNODE1_TOKENS;
break;
case AUE_FLOCK:
tok = au_to_arg32(2, "operation", ar->ar_arg_cmd);
kau_write(rec, tok);
FD_KPATH1_VNODE1_TOKENS;
break;
case AUE_LINK:
case AUE_RENAME:
KPATH1_VNODE1_OR_UPATH1_TOKENS;
UPATH2_TOKENS;
break;
case AUE_MKDIR:
tok = au_to_arg32(2, "mode", ar->ar_arg_mode);
kau_write(rec, tok);
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_MKNOD:
tok = au_to_arg32(2, "mode", ar->ar_arg_mode);
kau_write(rec, tok);
tok = au_to_arg32(3, "dev", ar->ar_arg_dev);
kau_write(rec, tok);
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_MOUNT:
tok = au_to_arg32(3, "flags", ar->ar_arg_fflags);
kau_write(rec, tok);
if (ar->ar_arg_text != NULL) {
tok = au_to_text(ar->ar_arg_text);
kau_write(rec, tok);
}
case AUE_UMOUNT:
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_MSGCTL:
ar->ar_event = msgctl_to_event(ar->ar_arg_svipc_cmd);
case AUE_MSGRCV:
case AUE_MSGSND:
tok = au_to_arg32(1, "msg ID", ar->ar_arg_svipc_id);
kau_write(rec, tok);
if (ar->ar_errno != EINVAL) {
tok = au_to_ipc(AT_IPC_MSG, ar->ar_arg_svipc_id);
kau_write(rec, tok);
}
break;
case AUE_MSGGET:
if (ar->ar_errno == 0) {
tok = au_to_ipc(AT_IPC_MSG, ar->ar_arg_svipc_id);
kau_write(rec, tok);
}
break;
case AUE_OPEN_R:
case AUE_OPEN_RC:
case AUE_OPEN_RTC:
case AUE_OPEN_RT:
case AUE_OPEN_RW:
case AUE_OPEN_RWC:
case AUE_OPEN_RWTC:
case AUE_OPEN_RWT:
case AUE_OPEN_W:
case AUE_OPEN_WC:
case AUE_OPEN_WTC:
case AUE_OPEN_WT:
ar->ar_event = flags_to_openevent(ar->ar_arg_fflags);
UPATH1_TOKENS;
KPATH1_VNODE1_TOKENS;
break;
case AUE_QUOTACTL:
tok = au_to_arg32(2, "command", ar->ar_arg_cmd);
kau_write(rec, tok);
tok = au_to_arg32(3, "uid", ar->ar_arg_uid);
kau_write(rec, tok);
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_SEMCTL:
ar->ar_event = semctl_to_event(ar->ar_arg_svipc_cmd);
case AUE_SEMOP:
tok = au_to_arg32(1, "sem ID", ar->ar_arg_svipc_id);
kau_write(rec, tok);
if (ar->ar_errno != EINVAL) {
tok = au_to_ipc(AT_IPC_SEM, ar->ar_arg_svipc_id);
kau_write(rec, tok);
}
break;
case AUE_SEMGET:
if (ar->ar_errno == 0) {
tok = au_to_ipc(AT_IPC_SEM, ar->ar_arg_svipc_id);
kau_write(rec, tok);
}
break;
case AUE_SETEGID:
tok = au_to_arg32(1, "gid", ar->ar_arg_egid);
kau_write(rec, tok);
break;
case AUE_SETEUID:
tok = au_to_arg32(1, "uid", ar->ar_arg_euid);
kau_write(rec, tok);
break;
case AUE_SETGID:
tok = au_to_arg32(1, "gid", ar->ar_arg_gid);
kau_write(rec, tok);
break;
case AUE_SETUID:
tok = au_to_arg32(1, "uid", ar->ar_arg_uid);
kau_write(rec, tok);
break;
case AUE_SETGROUPS:
if (ar->ar_valid_arg & ARG_GROUPSET) {
for(ctr = 0; ctr < ar->ar_arg_groups.gidset_size; ctr++)
{
tok = au_to_arg32(1, "setgroups", ar->ar_arg_groups.gidset[ctr]);
kau_write(rec, tok);
}
}
break;
case AUE_SHMAT:
tok = au_to_arg32(1, "shmid", ar->ar_arg_svipc_id);
kau_write(rec, tok);
tok = au_to_arg32(2, "shmaddr", (int)ar->ar_arg_svipc_addr);
kau_write(rec, tok);
if (ar->ar_valid_arg & ARG_SVIPC_PERM) {
tok = au_to_ipc(AT_IPC_SHM, ar->ar_arg_svipc_id);
kau_write(rec, tok);
tok = au_to_ipc_perm(&ar->ar_arg_svipc_perm);
kau_write(rec, tok);
}
break;
case AUE_SHMCTL:
tok = au_to_arg32(1, "shmid", ar->ar_arg_svipc_id);
kau_write(rec, tok);
switch (ar->ar_arg_svipc_cmd) {
case IPC_STAT:
ar->ar_event = AUE_SHMCTL_STAT;
if (ar->ar_valid_arg & ARG_SVIPC_PERM) {
tok = au_to_ipc(AT_IPC_SHM,
ar->ar_arg_svipc_id);
kau_write(rec, tok);
}
break;
case IPC_RMID:
ar->ar_event = AUE_SHMCTL_RMID;
if (ar->ar_valid_arg & ARG_SVIPC_PERM) {
tok = au_to_ipc(AT_IPC_SHM,
ar->ar_arg_svipc_id);
kau_write(rec, tok);
}
break;
case IPC_SET:
ar->ar_event = AUE_SHMCTL_SET;
if (ar->ar_valid_arg & ARG_SVIPC_PERM) {
tok = au_to_ipc(AT_IPC_SHM,
ar->ar_arg_svipc_id);
kau_write(rec, tok);
tok = au_to_ipc_perm(&ar->ar_arg_svipc_perm);
kau_write(rec, tok);
}
break;
default:
break;
}
break;
case AUE_SHMDT:
tok = au_to_arg32(1, "shmaddr", (int)ar->ar_arg_svipc_addr);
kau_write(rec, tok);
break;
case AUE_SHMGET:
tok = au_to_arg32(0, "shmid", ar->ar_arg_svipc_id);
kau_write(rec, tok);
if (ar->ar_valid_arg & ARG_SVIPC_PERM) {
tok = au_to_ipc(AT_IPC_SHM, ar->ar_arg_svipc_id);
kau_write(rec, tok);
tok = au_to_ipc_perm(&ar->ar_arg_svipc_perm);
kau_write(rec, tok);
}
break;
case AUE_SYMLINK:
if (ar->ar_valid_arg & ARG_TEXT) {
tok = au_to_text(ar->ar_arg_text);
kau_write(rec, tok);
}
KPATH1_VNODE1_OR_UPATH1_TOKENS;
break;
case AUE_UMASK:
tok = au_to_arg32(1, "new mask", ar->ar_arg_mask);
kau_write(rec, tok);
tok = au_to_arg32(0, "prev mask", ar->ar_retval);
kau_write(rec, tok);
break;
default:
printf("BSM conversion requested for unknown event %d\n",
ar->ar_event);
kau_free(rec);
return BSM_NOAUDIT;
}
kau_write(rec, subj_tok);
tok = au_to_return32((char)ar->ar_errno, ar->ar_retval);
kau_write(rec, tok);
kau_close(rec, &ar->ar_endtime, ar->ar_event);
*pau = rec;
return BSM_SUCCESS;
}
int
bsm_rec_verify(caddr_t rec)
{
if ( ((char)*rec != AU_HEADER_32_TOKEN) &&
((char)*rec != AU_HEADER_EX_32_TOKEN) &&
((char)*rec != AU_HEADER_64_TOKEN) &&
((char)*rec != AU_HEADER_EX_64_TOKEN) ) {
return (0);
}
return (1);
}