/* $OpenBSD: tls_content.c,v 1.2 2022/11/11 17:15:27 jsing Exp $ */
/*
 * Copyright (c) 2020 Joel Sing <jsing@openbsd.org>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <stdlib.h>
#include <string.h>

#include "tls_content.h"

/* Content from a TLS record. */
struct tls_content {
	uint8_t type;
	uint16_t epoch;

	const uint8_t *data;
	size_t data_len;
	CBS cbs;
};

struct tls_content *
tls_content_new(void)
{
	return calloc(1, sizeof(struct tls_content));
}

void
tls_content_clear(struct tls_content *content)
{
	freezero((void *)content->data, content->data_len);
	memset(content, 0, sizeof(*content));
}

void
tls_content_free(struct tls_content *content)
{
	if (content == NULL)
		return;

	tls_content_clear(content);

	freezero(content, sizeof(struct tls_content));
}

CBS *
tls_content_cbs(struct tls_content *content)
{
	return &content->cbs;
}

int
tls_content_equal(struct tls_content *content, const uint8_t *buf, size_t n)
{
	return CBS_mem_equal(&content->cbs, buf, n);
}

size_t
tls_content_remaining(struct tls_content *content)
{
	return CBS_len(&content->cbs);
}

uint8_t
tls_content_type(struct tls_content *content)
{
	return content->type;
}

int
tls_content_dup_data(struct tls_content *content, uint8_t type,
    const uint8_t *data, size_t data_len)
{
	uint8_t *dup;

	if ((dup = calloc(1, data_len)) == NULL)
		return 0;
	memcpy(dup, data, data_len);

	tls_content_set_data(content, type, dup, data_len);

	return 1;
}

uint16_t
tls_content_epoch(struct tls_content *content)
{
	return content->epoch;
}

void
tls_content_set_epoch(struct tls_content *content, uint16_t epoch)
{
	content->epoch = epoch;
}

void
tls_content_set_data(struct tls_content *content, uint8_t type,
    const uint8_t *data, size_t data_len)
{
	tls_content_clear(content);

	content->type = type;
	content->data = data;
	content->data_len = data_len;

	CBS_init(&content->cbs, content->data, content->data_len);
}

int
tls_content_set_bounds(struct tls_content *content, size_t offset, size_t len)
{
	size_t content_len;

	content_len = offset + len;
	if (content_len < len)
		return 0;
	if (content_len > content->data_len)
		return 0;

	CBS_init(&content->cbs, content->data, content_len);
	return CBS_skip(&content->cbs, offset);
}

static ssize_t
tls_content_read_internal(struct tls_content *content, uint8_t *buf, size_t n,
    int peek)
{
	if (n > CBS_len(&content->cbs))
		n = CBS_len(&content->cbs);

	/* XXX - CBS_memcpy? CBS_copy_bytes? */
	memcpy(buf, CBS_data(&content->cbs), n);

	if (!peek) {
		if (!CBS_skip(&content->cbs, n))
			return -1;
	}

	return n;
}

ssize_t
tls_content_peek(struct tls_content *content, uint8_t *buf, size_t n)
{
	return tls_content_read_internal(content, buf, n, 1);
}

ssize_t
tls_content_read(struct tls_content *content, uint8_t *buf, size_t n)
{
	return tls_content_read_internal(content, buf, n, 0);
}