/*
 * Copyright (c) 2015 Apple Inc. All rights reserved.
 *
 * @APPLE_LICENSE_HEADER_START@
 *
 * This file contains Original Code and/or Modifications of Original Code
 * as defined in and that are subject to the Apple Public Source License
 * Version 2.0 (the 'License'). You may not use this file except in
 * compliance with the License. Please obtain a copy of the License at
 * http://www.opensource.apple.com/apsl/ and read it before using this
 * file.
 *
 * The Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
 * Please see the License for the specific language governing rights and
 * limitations under the License.
 *
 * @APPLE_LICENSE_HEADER_END@
 */
#include <sys/cdefs.h>
#include <sys/types.h>
#include <stdarg.h>
#include <stdint.h>
#include <sys/persona.h>

#include "strings.h"

/* syscall entry point */
int __persona(uint32_t operation, uint32_t flags, struct kpersona_info *info, uid_t *id, size_t *idlen);

int kpersona_alloc(struct kpersona_info *info, uid_t *id)
{
	size_t idlen = 1;
	return __persona(PERSONA_OP_ALLOC, 0, info, id, &idlen);
}

int kpersona_dealloc(uid_t id)
{
	size_t idlen = 1;
	return __persona(PERSONA_OP_DEALLOC, 0, NULL, &id, &idlen);
}

int kpersona_get(uid_t *id)
{
	/* persona is a process-static identifier: cache it in a global */
	static uid_t p_id = PERSONA_ID_NONE;
	if (p_id == PERSONA_ID_NONE) {
		int ret = 0;
		size_t idlen = 1;
		ret = __persona(PERSONA_OP_GET, 0, NULL, &p_id, &idlen);
		if (ret != 0)
			return ret;
	}
	*id = p_id;
	return 0;
}

int kpersona_info(uid_t id, struct kpersona_info *info)
{
	size_t idlen = 1;
	return __persona(PERSONA_OP_INFO, 0, info, &id, &idlen);
}

int kpersona_pidinfo(pid_t pid, struct kpersona_info *info)
{
	size_t idlen = 1;
	uid_t id = (uid_t)pid;
	return __persona(PERSONA_OP_PIDINFO, 0, info, &id, &idlen);
}

int kpersona_find(const char *name, uid_t uid, uid_t *id, size_t *idlen)
{
	int ret;
	struct kpersona_info kinfo;
	kinfo.persona_info_version = PERSONA_INFO_V1;
	kinfo.persona_id = uid;
	kinfo.persona_type = 0;
	kinfo.persona_gid = 0;
	kinfo.persona_ngroups = 0;
	kinfo.persona_groups[0] = 0;
	kinfo.persona_name[0] = 0;
	if (name)
		strlcpy(kinfo.persona_name, name, sizeof(kinfo.persona_name));
	ret = __persona(PERSONA_OP_FIND, 0, &kinfo, id, idlen);
	if (ret < 0)
		return ret;
	return (int)(*idlen);
}