/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (the "License").
* You may not use this file except in compliance with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2010 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#include <sys/types.h>
#include <unistd.h>
#include <bsm/audit.h>
#include <bsm/audit_record.h>
#include <bsm/libbsm.h>
#include <priv.h>
#include <sys/ipc.h>
#include <sys/param.h>
#include <sys/socket.h>
#include <sys/time.h>
#include <sys/vnode.h>
#include <malloc.h>
#include <net/route.h>
#include <netinet/in.h>
#include <netinet/in_pcb.h>
#include <string.h>
#include <ucred.h>
#include <zone.h>
#include <sys/tsol/label.h>
#define NGROUPS 16 /* XXX - temporary */
token_t *au_to_arg(char n, char *text, uint32_t v);
#pragma weak au_to_arg = au_to_arg32
token_t *au_to_return(char number, uint32_t value);
#pragma weak au_to_return = au_to_return32
static token_t *au_to_exec(char **, char);
static token_t *
get_token(int s)
{
token_t *token; /* Resultant token */
if ((token = (token_t *)malloc(sizeof (token_t))) == NULL)
return (NULL);
if ((token->tt_data = malloc(s)) == NULL) {
free(token);
return (NULL);
}
token->tt_size = s;
token->tt_next = NULL;
return (token);
}
/*
* au_to_header
* return s:
* pointer to header token.
*/
token_t *
au_to_header(au_event_t e_type, au_emod_t e_mod)
{
adr_t adr; /* adr memory stream header */
token_t *token; /* token pointer */
char version = TOKEN_VERSION; /* version of token family */
int32_t byte_count;
struct timeval tv;
#ifdef _LP64
char data_header = AUT_HEADER64; /* header for this token */
token = get_token(2 * sizeof (char) + sizeof (int32_t) +
2 * sizeof (int64_t) + 2 * sizeof (short));
#else
char data_header = AUT_HEADER32;
token = get_token(2 * sizeof (char) + 3 * sizeof (int32_t) +
2 * sizeof (short));
#endif
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1); /* token ID */
adr_int32(&adr, &byte_count, 1); /* length of audit record */
adr_char(&adr, &version, 1); /* version of audit tokens */
adr_ushort(&adr, &e_type, 1); /* event ID */
adr_ushort(&adr, &e_mod, 1); /* event ID modifier */
#ifdef _LP64
adr_int64(&adr, (int64_t *)&tv, 2); /* time & date */
#else
adr_int32(&adr, (int32_t *)&tv, 2); /* time & date */
#endif
return (token);
}
/*
* au_to_header_ex
* return s:
* pointer to header token.
*/
token_t *
au_to_header_ex(au_event_t e_type, au_emod_t e_mod)
{
adr_t adr; /* adr memory stream header */
token_t *token; /* token pointer */
char version = TOKEN_VERSION; /* version of token family */
int32_t byte_count;
struct timeval tv;
auditinfo_addr_t audit_info;
au_tid_addr_t *host_info = &audit_info.ai_termid;
#ifdef _LP64
char data_header = AUT_HEADER64_EX; /* header for this token */
#else
char data_header = AUT_HEADER32_EX;
#endif
/* If our host address can't be determined, revert to un-extended hdr */
if (auditon(A_GETKAUDIT, (caddr_t)&audit_info,
sizeof (audit_info)) < 0)
return (au_to_header(e_type, e_mod));
if (host_info->at_type == AU_IPv6)
if (IN6_IS_ADDR_UNSPECIFIED((in6_addr_t *)host_info->at_addr))
return (au_to_header(e_type, e_mod));
else
if (host_info->at_addr[0] == htonl(INADDR_ANY))
return (au_to_header(e_type, e_mod));
#ifdef _LP64
token = get_token(2 * sizeof (char) + sizeof (int32_t) +
2 * sizeof (int64_t) + 2 * sizeof (short) +
sizeof (int32_t) + host_info->at_type);
#else
token = get_token(2 * sizeof (char) + 3 * sizeof (int32_t) +
2 * sizeof (short) + sizeof (int32_t) + host_info->at_type);
#endif
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1); /* token ID */
adr_int32(&adr, &byte_count, 1); /* length of audit record */
adr_char(&adr, &version, 1); /* version of audit tokens */
adr_ushort(&adr, &e_type, 1); /* event ID */
adr_ushort(&adr, &e_mod, 1); /* event ID modifier */
adr_int32(&adr, (int32_t *)&host_info->at_type, 1);
adr_char(&adr, (char *)host_info->at_addr,
(int)host_info->at_type);
#ifdef _LP64
adr_int64(&adr, (int64_t *)&tv, 2); /* time & date */
#else
adr_int32(&adr, (int32_t *)&tv, 2); /* time & date */
#endif
return (token);
}
/*
* au_to_trailer
* return s:
* pointer to a trailer token.
*/
token_t *
au_to_trailer(void)
{
adr_t adr; /* adr memory stream header */
token_t *token; /* token pointer */
char data_header = AUT_TRAILER; /* header for this token */
short magic = (short)AUT_TRAILER_MAGIC; /* trailer magic number */
int32_t byte_count;
token = get_token(sizeof (char) + sizeof (int32_t) + sizeof (short));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1); /* token ID */
adr_short(&adr, &magic, 1); /* magic number */
adr_int32(&adr, &byte_count, 1); /* length of audit record */
return (token);
}
/*
* au_to_arg32
* return s:
* pointer to an argument token.
*/
token_t *
au_to_arg32(char n, char *text, uint32_t v)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_ARG32; /* header for this token */
short bytes; /* length of string */
bytes = strlen(text) + 1;
token = get_token((int)(2 * sizeof (char) + sizeof (int32_t) +
sizeof (short) + bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1); /* token type */
adr_char(&adr, &n, 1); /* argument id */
adr_int32(&adr, (int32_t *)&v, 1); /* argument value */
adr_short(&adr, &bytes, 1);
adr_char(&adr, text, bytes);
return (token);
}
/*
* au_to_arg64
* return s:
* pointer to an argument token.
*/
token_t *
au_to_arg64(char n, char *text, uint64_t v)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_ARG64; /* header for this token */
short bytes; /* length of string */
bytes = strlen(text) + 1;
token = get_token((int)(2 * sizeof (char) + sizeof (int64_t) +
sizeof (short) + bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1); /* token type */
adr_char(&adr, &n, 1); /* argument id */
adr_int64(&adr, (int64_t *)&v, 1); /* argument value */
adr_short(&adr, &bytes, 1);
adr_char(&adr, text, bytes);
return (token);
}
/*
* au_to_attr
* return s:
* pointer to an attribute token.
*/
token_t *
au_to_attr(struct vattr *attr)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
int32_t value;
#ifdef _LP64
char data_header = AUT_ATTR64; /* header for this token */
token = get_token(sizeof (char) +
sizeof (int32_t) * 4 +
sizeof (int64_t) * 2);
#else
char data_header = AUT_ATTR32;
token = get_token(sizeof (char) + sizeof (int32_t) * 5 +
sizeof (int64_t));
#endif
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
value = (int32_t)attr->va_mode;
adr_int32(&adr, &value, 1);
value = (int32_t)attr->va_uid;
adr_int32(&adr, &value, 1);
value = (int32_t)attr->va_gid;
adr_int32(&adr, &value, 1);
adr_int32(&adr, (int32_t *)&(attr->va_fsid), 1);
adr_int64(&adr, (int64_t *)&(attr->va_nodeid), 1);
#ifdef _LP64
adr_int64(&adr, (int64_t *)&(attr->va_rdev), 1);
#else
adr_int32(&adr, (int32_t *)&(attr->va_rdev), 1);
#endif
return (token);
}
/*
* au_to_data
* return s:
* pointer to a data token.
*/
token_t *
au_to_data(char unit_print, char unit_type, char unit_count, char *p)
{
adr_t adr; /* adr memory stream header */
token_t *token; /* token pointer */
char data_header = AUT_DATA; /* header for this token */
int byte_count; /* number of bytes */
if (p == NULL || unit_count < 1)
return (NULL);
/*
* Check validity of print type
*/
if (unit_print < AUP_BINARY || unit_print > AUP_STRING)
return (NULL);
switch (unit_type) {
case AUR_SHORT:
byte_count = unit_count * sizeof (short);
break;
case AUR_INT32:
byte_count = unit_count * sizeof (int32_t);
break;
case AUR_INT64:
byte_count = unit_count * sizeof (int64_t);
break;
/* case AUR_CHAR: */
case AUR_BYTE:
byte_count = unit_count * sizeof (char);
break;
default:
return (NULL);
}
token = get_token((int)(4 * sizeof (char) + byte_count));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_char(&adr, &unit_print, 1);
adr_char(&adr, &unit_type, 1);
adr_char(&adr, &unit_count, 1);
switch (unit_type) {
case AUR_SHORT:
/* LINTED */
adr_short(&adr, (short *)p, unit_count);
break;
case AUR_INT32:
/* LINTED */
adr_int32(&adr, (int32_t *)p, unit_count);
break;
case AUR_INT64:
/* LINTED */
adr_int64(&adr, (int64_t *)p, unit_count);
break;
/* case AUR_CHAR: */
case AUR_BYTE:
adr_char(&adr, p, unit_count);
break;
}
return (token);
}
/*
* au_to_privset
*
* priv_type (LIMIT, INHERIT...) is the first string and privilege
* in translated into the second string. The format is as follows:
*
* token id adr_char
* priv type adr_string (short, string)
* priv set adr_string (short, string)
*
* return s:
* pointer to a AUT_PRIV token.
*/
token_t *
au_to_privset(const char *priv_type, const priv_set_t *privilege)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_PRIV; /* header for this token */
short t_bytes; /* length of type string */
short p_bytes; /* length of privilege string */
char *priv_string; /* privilege string */
t_bytes = strlen(priv_type) + 1;
if ((privilege == NULL) || (priv_string =
priv_set_to_str(privilege, ',',
PRIV_STR_LIT)) == NULL)
return (NULL);
p_bytes = strlen(priv_string) + 1;
token = get_token((int)(sizeof (char) + (2 * sizeof (short)) + t_bytes
+ p_bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &t_bytes, 1);
adr_char(&adr, (char *)priv_type, t_bytes);
adr_short(&adr, &p_bytes, 1);
adr_char(&adr, priv_string, p_bytes);
free(priv_string);
return (token);
}
/*
* au_to_process
* return s:
* pointer to a process token.
*/
token_t *
au_to_process(au_id_t auid, uid_t euid, gid_t egid, uid_t ruid, gid_t rgid,
pid_t pid, au_asid_t sid, au_tid_t *tid)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
#ifdef _LP64
char data_header = AUT_PROCESS64; /* header for this token */
token = get_token(sizeof (char) + 8 * sizeof (int32_t) +
sizeof (int64_t));
#else
char data_header = AUT_PROCESS32;
token = get_token(sizeof (char) + 9 * sizeof (int32_t));
#endif
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, (int32_t *)&auid, 1);
adr_int32(&adr, (int32_t *)&euid, 1);
adr_int32(&adr, (int32_t *)&egid, 1);
adr_int32(&adr, (int32_t *)&ruid, 1);
adr_int32(&adr, (int32_t *)&rgid, 1);
adr_int32(&adr, (int32_t *)&pid, 1);
adr_int32(&adr, (int32_t *)&sid, 1);
#ifdef _LP64
adr_int64(&adr, (int64_t *)&tid->port, 1);
#else
adr_int32(&adr, (int32_t *)&tid->port, 1);
#endif
adr_int32(&adr, (int32_t *)&tid->machine, 1);
return (token);
}
/*
* au_to_process_ex
* return s:
* pointer to a process_ex token.
*/
token_t *
au_to_process_ex(au_id_t auid, uid_t euid, gid_t egid, uid_t ruid, gid_t rgid,
pid_t pid, au_asid_t sid, au_tid_addr_t *tid)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header; /* header for this token */
#ifdef _LP64
if (tid->at_type == AU_IPv6) {
data_header = AUT_PROCESS64_EX;
token = get_token(sizeof (char) + sizeof (int64_t) +
12 * sizeof (int32_t));
} else {
data_header = AUT_PROCESS64;
token = get_token(sizeof (char) + sizeof (int64_t) +
8 * sizeof (int32_t));
}
#else
if (tid->at_type == AU_IPv6) {
data_header = AUT_PROCESS32_EX;
token = get_token(sizeof (char) + 13 * sizeof (int32_t));
} else {
data_header = AUT_PROCESS32;
token = get_token(sizeof (char) + 9 * sizeof (int32_t));
}
#endif
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, (int32_t *)&auid, 1);
adr_int32(&adr, (int32_t *)&euid, 1);
adr_int32(&adr, (int32_t *)&egid, 1);
adr_int32(&adr, (int32_t *)&ruid, 1);
adr_int32(&adr, (int32_t *)&rgid, 1);
adr_int32(&adr, (int32_t *)&pid, 1);
adr_int32(&adr, (int32_t *)&sid, 1);
#ifdef _LP64
adr_int64(&adr, (int64_t *)&tid->at_port, 1);
#else
adr_int32(&adr, (int32_t *)&tid->at_port, 1);
#endif
if (tid->at_type == AU_IPv6) {
adr_int32(&adr, (int32_t *)&tid->at_type, 1);
adr_char(&adr, (char *)tid->at_addr, 16);
} else {
adr_char(&adr, (char *)tid->at_addr, 4);
}
return (token);
}
/*
* au_to_seq
* return s:
* pointer to token chain containing a sequence token
*/
token_t *
au_to_seq(int audit_count)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_SEQ; /* header for this token */
token = get_token(sizeof (char) + sizeof (int32_t));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, (int32_t *)&audit_count, 1);
return (token);
}
/*
* au_to_socket
* return s:
* pointer to mbuf chain containing a socket token.
*/
token_t *
au_to_socket(struct oldsocket *so)
{
adr_t adr;
token_t *token;
char data_header = AUT_SOCKET;
struct inpcb *inp = so->so_pcb;
token = get_token(sizeof (char) + sizeof (short) * 3 +
sizeof (int32_t) * 2);
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, (short *)&so->so_type, 1);
adr_short(&adr, (short *)&inp->inp_lport, 1);
adr_int32(&adr, (int32_t *)&inp->inp_laddr, 1);
adr_short(&adr, (short *)&inp->inp_fport, 1);
adr_int32(&adr, (int32_t *)&inp->inp_faddr, 1);
return (token);
}
/*
* au_to_subject
* return s:
* pointer to a process token.
*/
token_t *
au_to_subject(au_id_t auid, uid_t euid, gid_t egid, uid_t ruid, gid_t rgid,
pid_t pid, au_asid_t sid, au_tid_t *tid)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
#ifdef _LP64
char data_header = AUT_SUBJECT64; /* header for this token */
token = get_token(sizeof (char) + sizeof (int64_t) +
8 * sizeof (int32_t));
#else
char data_header = AUT_SUBJECT32;
token = get_token(sizeof (char) + 9 * sizeof (int32_t));
#endif
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, (int32_t *)&auid, 1);
adr_int32(&adr, (int32_t *)&euid, 1);
adr_int32(&adr, (int32_t *)&egid, 1);
adr_int32(&adr, (int32_t *)&ruid, 1);
adr_int32(&adr, (int32_t *)&rgid, 1);
adr_int32(&adr, (int32_t *)&pid, 1);
adr_int32(&adr, (int32_t *)&sid, 1);
#ifdef _LP64
adr_int64(&adr, (int64_t *)&tid->port, 1);
#else
adr_int32(&adr, (int32_t *)&tid->port, 1);
#endif
adr_int32(&adr, (int32_t *)&tid->machine, 1);
return (token);
}
/*
* au_to_subject_ex
* return s:
* pointer to a process token.
*/
token_t *
au_to_subject_ex(au_id_t auid, uid_t euid, gid_t egid, uid_t ruid, gid_t rgid,
pid_t pid, au_asid_t sid, au_tid_addr_t *tid)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
#ifdef _LP64
char data_header; /* header for this token */
if (tid->at_type == AU_IPv6) {
data_header = AUT_SUBJECT64_EX;
token = get_token(sizeof (char) + sizeof (int64_t) +
12 * sizeof (int32_t));
} else {
data_header = AUT_SUBJECT64;
token = get_token(sizeof (char) + sizeof (int64_t) +
8 * sizeof (int32_t));
}
#else
char data_header; /* header for this token */
if (tid->at_type == AU_IPv6) {
data_header = AUT_SUBJECT32_EX;
token = get_token(sizeof (char) + 13 * sizeof (int32_t));
} else {
data_header = AUT_SUBJECT32;
token = get_token(sizeof (char) + 9 * sizeof (int32_t));
}
#endif
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, (int32_t *)&auid, 1);
adr_int32(&adr, (int32_t *)&euid, 1);
adr_int32(&adr, (int32_t *)&egid, 1);
adr_int32(&adr, (int32_t *)&ruid, 1);
adr_int32(&adr, (int32_t *)&rgid, 1);
adr_int32(&adr, (int32_t *)&pid, 1);
adr_int32(&adr, (int32_t *)&sid, 1);
#ifdef _LP64
adr_int64(&adr, (int64_t *)&tid->at_port, 1);
#else
adr_int32(&adr, (int32_t *)&tid->at_port, 1);
#endif
if (tid->at_type == AU_IPv6) {
adr_int32(&adr, (int32_t *)&tid->at_type, 1);
adr_char(&adr, (char *)tid->at_addr, 16);
} else {
adr_char(&adr, (char *)tid->at_addr, 4);
}
return (token);
}
/*
* au_to_me
* return s:
* pointer to a process token.
*/
token_t *
au_to_me(void)
{
auditinfo_addr_t info;
if (getaudit_addr(&info, sizeof (info)))
return (NULL);
return (au_to_subject_ex(info.ai_auid, geteuid(), getegid(), getuid(),
getgid(), getpid(), info.ai_asid, &info.ai_termid));
}
/*
* au_to_text
* return s:
* pointer to a text token.
*/
token_t *
au_to_text(char *text)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_TEXT; /* header for this token */
short bytes; /* length of string */
bytes = strlen(text) + 1;
token = get_token((int)(sizeof (char) + sizeof (short) + bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &bytes, 1);
adr_char(&adr, text, bytes);
return (token);
}
/*
* au_to_path
* return s:
* pointer to a path token.
*/
token_t *
au_to_path(char *path)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_PATH; /* header for this token */
short bytes; /* length of string */
bytes = (short)strlen(path) + 1;
token = get_token((int)(sizeof (char) + sizeof (short) + bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &bytes, 1);
adr_char(&adr, path, bytes);
return (token);
}
/*
* au_to_cmd
* return s:
* pointer to an command line argument token
*/
token_t *
au_to_cmd(uint_t argc, char **argv, char **envp)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_CMD; /* header for this token */
short len = 0;
short cnt = 0;
short envc = 0;
short largc = (short)argc;
/*
* one char for the header, one short for argc,
* one short for # envp strings.
*/
len = sizeof (char) + sizeof (short) + sizeof (short);
/* get sizes of strings */
for (cnt = 0; cnt < argc; cnt++) {
len += (short)sizeof (short) + (short)(strlen(argv[cnt]) + 1);
}
if (envp != NULL) {
for (envc = 0; envp[envc] != NULL; envc++) {
len += (short)sizeof (short) +
(short)(strlen(envp[envc]) + 1);
}
}
token = get_token(len);
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &largc, 1);
for (cnt = 0; cnt < argc; cnt++) {
len = (short)(strlen(argv[cnt]) + 1);
adr_short(&adr, &len, 1);
adr_char(&adr, argv[cnt], len);
}
adr_short(&adr, &envc, 1);
for (cnt = 0; cnt < envc; cnt++) {
len = (short)(strlen(envp[cnt]) + 1);
adr_short(&adr, &len, 1);
adr_char(&adr, envp[cnt], len);
}
return (token);
}
/*
* au_to_exit
* return s:
* pointer to a exit value token.
*/
token_t *
au_to_exit(int retval, int err)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_EXIT; /* header for this token */
token = get_token(sizeof (char) + (2 * sizeof (int32_t)));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, (int32_t *)&retval, 1);
adr_int32(&adr, (int32_t *)&err, 1);
return (token);
}
/*
* au_to_return
* return s:
* pointer to a return value token.
*/
token_t *
au_to_return32(char number, uint32_t value)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_RETURN32; /* header for this token */
token = get_token(2 * sizeof (char) + sizeof (int32_t));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_char(&adr, &number, 1);
adr_int32(&adr, (int32_t *)&value, 1);
return (token);
}
/*
* au_to_return
* return s:
* pointer to a return value token.
*/
token_t *
au_to_return64(char number, uint64_t value)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_RETURN64; /* header for this token */
token = get_token(2 * sizeof (char) + sizeof (int64_t));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_char(&adr, &number, 1);
adr_int64(&adr, (int64_t *)&value, 1);
return (token);
}
/*
* au_to_opaque
* return s:
* pointer to a opaque token.
*/
token_t *
au_to_opaque(char *opaque, short bytes)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_OPAQUE; /* header for this token */
if (bytes < 1)
return (NULL);
token = get_token((int)(sizeof (char) + sizeof (short) + bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &bytes, 1);
adr_char(&adr, opaque, bytes);
return (token);
}
/*
* au_to_in_addr
* return s:
* pointer to an internet address token
*/
token_t *
au_to_in_addr(struct in_addr *internet_addr)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_IN_ADDR; /* header for this token */
token = get_token(sizeof (char) + sizeof (struct in_addr));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_char(&adr, (char *)internet_addr, sizeof (struct in_addr));
return (token);
}
/*
* au_to_in_addr_ex
* return s:
* pointer to an internet extended token
*/
token_t *
au_to_in_addr_ex(struct in6_addr *addr)
{
token_t *token;
adr_t adr;
if (IN6_IS_ADDR_V4MAPPED(addr)) {
ipaddr_t in4;
/*
* An IPv4-mapped IPv6 address is really an IPv4 address
* in IPv6 format.
*/
IN6_V4MAPPED_TO_IPADDR(addr, in4);
return (au_to_in_addr((struct in_addr *)&in4));
} else {
char data_header = AUT_IN_ADDR_EX;
int32_t type = AU_IPv6;
if ((token = get_token(sizeof (char) + sizeof (int32_t) +
sizeof (struct in6_addr))) == NULL) {
return (NULL);
}
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, &type, 1);
adr_char(&adr, (char *)addr, sizeof (struct in6_addr));
}
return (token);
}
/*
* au_to_iport
* return s:
* pointer to token chain containing a ip port address token
*/
token_t *
au_to_iport(ushort_t iport)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_IPORT; /* header for this token */
token = get_token(sizeof (char) + sizeof (short));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, (short *)&iport, 1);
return (token);
}
token_t *
au_to_ipc(char type, int id)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_IPC; /* header for this token */
token = get_token((2 * sizeof (char)) + sizeof (int32_t));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_char(&adr, &type, 1);
adr_int32(&adr, (int32_t *)&id, 1);
return (token);
}
/*
* au_to_tid
*
* output format depends on type; at present only IP v4 and v6 addresses
* are defined.
*
* IPv4 -- tid type, 16 bit remote port, 16 bit local port, ip type,
* 32 bit IP address.
* IPv6 -- tid type, 16 bit remote port, 16 bit local port, ip type,
* 4 x 32 bit IP address.
*
*/
token_t *
au_to_tid(au_generic_tid_t *tid)
{
char data_header = AUT_TID; /* header for this token */
adr_t adr; /* adr memory stream header */
token_t *token; /* local token */
au_ip_t *ip;
switch (tid->gt_type) {
case AU_IPADR:
ip = &(tid->gt_adr.at_ip);
token = get_token((int)(2 * sizeof (char) + 2 * sizeof (short) +
sizeof (uint32_t) + ip->at_type));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_char(&adr, (char *)&(tid->gt_type), 1);
adr_short(&adr, (short *)&(ip->at_r_port), 1);
adr_short(&adr, (short *)&(ip->at_l_port), 1);
adr_int32(&adr, (int32_t *)&(ip->at_type), 1);
adr_char(&adr, (char *)ip->at_addr, ip->at_type);
break;
default:
return (NULL);
}
return (token);
}
/*
* The Modifier tokens
*/
/*
* au_to_groups
* return s:
* pointer to a group list token.
*
* This function is obsolete. Please use au_to_newgroups.
*/
token_t *
au_to_groups(int *groups)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_GROUPS; /* header for this token */
token = get_token(sizeof (char) + NGROUPS * sizeof (int32_t));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, (int32_t *)groups, NGROUPS);
return (token);
}
/*
* au_to_newgroups
* return s:
* pointer to a group list token.
*/
token_t *
au_to_newgroups(int n, gid_t *groups)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_NEWGROUPS; /* header for this token */
short n_groups;
if (n < 0 || n > SHRT_MAX || groups == NULL)
return (NULL);
token = get_token(sizeof (char) + sizeof (short) + n * sizeof (gid_t));
if (token == NULL)
return (NULL);
n_groups = (short)n;
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &n_groups, 1);
adr_int32(&adr, (int32_t *)groups, n_groups);
return (token);
}
/*
* au_to_exec_args
* returns:
* pointer to an exec args token.
*/
token_t *
au_to_exec_args(char **argv)
{
return (au_to_exec(argv, AUT_EXEC_ARGS));
}
/*
* au_to_exec_env
* returns:
* pointer to an exec args token.
*/
token_t *
au_to_exec_env(char **envp)
{
return (au_to_exec(envp, AUT_EXEC_ENV));
}
/*
* au_to_exec
* returns:
* pointer to an exec args token.
*/
static token_t *
au_to_exec(char **v, char data_header)
{
token_t *token;
adr_t adr;
char **p;
int32_t n = 0;
int len = 0;
for (p = v; *p != NULL; p++) {
len += strlen(*p) + 1;
n++;
}
token = get_token(sizeof (char) + sizeof (int32_t) + len);
if (token == (token_t *)NULL)
return ((token_t *)NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, &n, 1);
for (p = v; *p != NULL; p++) {
adr_char(&adr, *p, strlen(*p) + 1);
}
return (token);
}
/*
* au_to_uauth
* return s:
* pointer to a uauth token.
*/
token_t *
au_to_uauth(char *text)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_UAUTH; /* header for this token */
short bytes; /* length of string */
bytes = strlen(text) + 1;
token = get_token((int)(sizeof (char) + sizeof (short) + bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &bytes, 1);
adr_char(&adr, text, bytes);
return (token);
}
/*
* au_to_upriv
* return s:
* pointer to a use of privilege token.
*/
token_t *
au_to_upriv(char sorf, char *priv)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_UAUTH; /* header for this token */
short bytes; /* length of string */
bytes = strlen(priv) + 1;
token = get_token(sizeof (char) + sizeof (char) + sizeof (short) +
bytes);
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_char(&adr, &sorf, 1); /* success/failure */
adr_short(&adr, &bytes, 1);
adr_char(&adr, priv, bytes);
return (token);
}
/*
* au_to_user
* return s:
* pointer to a user token.
*/
token_t *
au_to_user(uid_t uid, char *username)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_USER; /* header for this token */
short bytes; /* length of string */
bytes = (short)strlen(username) + 1;
token = get_token(sizeof (char) + sizeof (uid_t) + sizeof (short) +
bytes);
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_uid(&adr, &uid, 1);
adr_short(&adr, &bytes, 1);
adr_char(&adr, username, bytes);
return (token);
}
/*
* au_to_xatom
* return s:
* pointer to a xatom token.
*/
token_t *
au_to_xatom(char *atom)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_XATOM; /* header for this token */
short len;
len = strlen(atom) + 1;
token = get_token(sizeof (char) + sizeof (short) + len);
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, (short *)&len, 1);
adr_char(&adr, atom, len);
return (token);
}
/*
* au_to_xselect
* return s:
* pointer to a X select token.
*/
token_t *
au_to_xselect(char *propname, char *proptype, char *windata)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_XSELECT; /* header for this token */
short proplen;
short typelen;
short datalen;
proplen = strlen(propname) + 1;
typelen = strlen(proptype) + 1;
datalen = strlen(windata) + 1;
token = get_token(sizeof (char) + (sizeof (short) * 3) +
proplen + typelen + datalen);
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &proplen, 1);
adr_char(&adr, propname, proplen);
adr_short(&adr, &typelen, 1);
adr_char(&adr, proptype, typelen);
adr_short(&adr, &datalen, 1);
adr_char(&adr, windata, datalen);
return (token);
}
/*
* x_common
* return s:
* pointer to a common X token.
*/
static token_t *
x_common(char data_header, int32_t xid, uid_t cuid)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
token = get_token(sizeof (char) + sizeof (int32_t) + sizeof (uid_t));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, &xid, 1);
adr_uid(&adr, &cuid, 1);
return (token);
}
/*
* au_to_xcolormap
* return s:
* pointer to a X Colormap token.
*/
token_t *
au_to_xcolormap(int32_t xid, uid_t cuid)
{
return (x_common(AUT_XCOLORMAP, xid, cuid));
}
/*
* au_to_xcursor
* return s:
* pointer to a X Cursor token.
*/
token_t *
au_to_xcursor(int32_t xid, uid_t cuid)
{
return (x_common(AUT_XCURSOR, xid, cuid));
}
/*
* au_to_xfont
* return s:
* pointer to a X Font token.
*/
token_t *
au_to_xfont(int32_t xid, uid_t cuid)
{
return (x_common(AUT_XFONT, xid, cuid));
}
/*
* au_to_xgc
* return s:
* pointer to a X Graphic Context token.
*/
token_t *
au_to_xgc(int32_t xid, uid_t cuid)
{
return (x_common(AUT_XGC, xid, cuid));
}
/*
* au_to_xpixmap
* return s:
* pointer to a X Pixal Map token.
*/
token_t *
au_to_xpixmap(int32_t xid, uid_t cuid)
{
return (x_common(AUT_XPIXMAP, xid, cuid));
}
/*
* au_to_xwindow
* return s:
* pointer to a X Window token.
*/
token_t *
au_to_xwindow(int32_t xid, uid_t cuid)
{
return (x_common(AUT_XWINDOW, xid, cuid));
}
/*
* au_to_xproperty
* return s:
* pointer to a X Property token.
*/
token_t *
au_to_xproperty(int32_t xid, uid_t cuid, char *propname)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_XPROPERTY; /* header for this token */
short proplen;
proplen = strlen(propname) + 1;
token = get_token(sizeof (char) + sizeof (int32_t) + sizeof (uid_t) +
sizeof (short) + proplen);
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, &xid, 1);
adr_uid(&adr, &cuid, 1);
adr_short(&adr, &proplen, 1);
adr_char(&adr, propname, proplen);
return (token);
}
/*
* au_to_xclient
* return s:
* pointer to a X Client token
*/
token_t *
au_to_xclient(uint32_t client)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_XCLIENT; /* header for this token */
token = get_token(sizeof (char) + sizeof (uint32_t));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_int32(&adr, (int32_t *)&client, 1);
return (token);
}
/*
* au_to_label
* return s:
* pointer to a label token.
*/
token_t *
au_to_label(m_label_t *label)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_LABEL; /* header for this token */
size32_t llen = blabel_size();
token = get_token(sizeof (char) + llen);
if (token == NULL) {
return (NULL);
} else if (label == NULL) {
free(token);
return (NULL);
}
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_char(&adr, (char *)label, llen);
return (token);
}
/*
* au_to_mylabel
* return s:
* pointer to a label token.
*/
token_t *
au_to_mylabel(void)
{
ucred_t *uc;
token_t *token;
if ((uc = ucred_get(P_MYID)) == NULL) {
return (NULL);
}
token = au_to_label(ucred_getlabel(uc));
ucred_free(uc);
return (token);
}
/*
* au_to_zonename
* return s:
* pointer to a zonename token.
*/
token_t *
au_to_zonename(char *name)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_ZONENAME; /* header for this token */
short bytes; /* length of string */
if (name == NULL)
return (NULL);
bytes = strlen(name) + 1;
token = get_token((int)(sizeof (char) + sizeof (short) + bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &bytes, 1);
adr_char(&adr, name, bytes);
return (token);
}
/*
* au_to_fmri
* return s:
* pointer to a fmri token.
*/
token_t *
au_to_fmri(char *fmri)
{
token_t *token; /* local token */
adr_t adr; /* adr memory stream header */
char data_header = AUT_FMRI; /* header for this token */
short bytes; /* length of string */
if (fmri == NULL)
return (NULL);
bytes = strlen(fmri) + 1;
token = get_token((int)(sizeof (char) + sizeof (short) + bytes));
if (token == NULL)
return (NULL);
adr_start(&adr, token->tt_data);
adr_char(&adr, &data_header, 1);
adr_short(&adr, &bytes, 1);
adr_char(&adr, fmri, bytes);
return (token);
}