/*
 * This file and its contents are supplied under the terms of the
 * Common Development and Distribution License ("CDDL"), version 1.0.
 * You may only use this file in accordance with the terms of version
 * 1.0 of the CDDL.
 *
 * A full copy of the text of the CDDL should have accompanied this
 * source.  A copy of the CDDL is also available via the Internet at
 * http://www.illumos.org/license/CDDL.
 */

/*
 * Copyright 2021 Oxide Computer Company
 */

/*
 * Tests for SMBIOS type 46 - SMB_TYPE_STRPROP.
 */

#include "smbios_test.h"

static const char *smbios_strprop_path = "/not/really/uefi";
static uint16_t smbios_strprop_hdl = 0xcafe;

boolean_t
smbios_test_strprop_mktable_basic(smbios_test_table_t *table)
{
	smb_strprop_t str;

	str.smbstrp_hdr.smbh_type = SMB_TYPE_STRPROP;
	str.smbstrp_hdr.smbh_len = sizeof (str);
	str.smbstrp_prop_id = htole16(SMB_STRP_UEFI_DEVPATH);
	str.smbstrp_prop_val = 1;
	str.smbstrp_phdl = htole16(smbios_strprop_hdl);

	(void) smbios_test_table_append(table, &str, sizeof (str));
	smbios_test_table_append_string(table, smbios_strprop_path);
	smbios_test_table_str_fini(table);
	smbios_test_table_append_eot(table);

	return (B_TRUE);
}

boolean_t
smbios_test_strprop_mktable_badstr(smbios_test_table_t *table)
{
	smb_strprop_t str;

	str.smbstrp_hdr.smbh_type = SMB_TYPE_STRPROP;
	str.smbstrp_hdr.smbh_len = sizeof (str);
	str.smbstrp_prop_id = htole16(SMB_STRP_UEFI_DEVPATH);
	str.smbstrp_prop_val = 0x23;
	str.smbstrp_phdl = htole16(smbios_strprop_hdl);

	(void) smbios_test_table_append(table, &str, sizeof (str));
	smbios_test_table_append_string(table, smbios_strprop_path);
	smbios_test_table_str_fini(table);
	smbios_test_table_append_eot(table);

	return (B_TRUE);
}

boolean_t
smbios_test_strprop_mktable_invlen1(smbios_test_table_t *table)
{
	smb_header_t hdr;

	hdr.smbh_type = SMB_TYPE_STRPROP;
	hdr.smbh_len = sizeof (hdr);

	(void) smbios_test_table_append(table, &hdr, sizeof (hdr));
	smbios_test_table_append_eot(table);

	return (B_TRUE);
}

boolean_t
smbios_test_strprop_mktable_invlen2(smbios_test_table_t *table)
{
	smb_strprop_t str;
	const uint8_t endstring = 0;

	str.smbstrp_hdr.smbh_type = SMB_TYPE_STRPROP;
	str.smbstrp_hdr.smbh_len = sizeof (str) + 1;
	str.smbstrp_prop_id = htole16(0);
	str.smbstrp_prop_val = 0;
	str.smbstrp_phdl = htole16(0);

	/*
	 * Append the end string again as to get us to our additional byte of
	 * actual table length.
	 */
	(void) smbios_test_table_append(table, &str, sizeof (str));
	(void) smbios_test_table_append_raw(table, &endstring,
	    sizeof (endstring));
	(void) smbios_test_table_append_string(table, smbios_strprop_path);
	(void) smbios_test_table_append_raw(table, &endstring,
	    sizeof (endstring));
	smbios_test_table_append_eot(table);

	return (B_TRUE);
}

static boolean_t
smbios_test_strprop_verify_badtable(smbios_hdl_t *hdl, int smberr)
{
	smbios_struct_t sp;
	smbios_strprop_t prop;

	if (smbios_lookup_type(hdl, SMB_TYPE_STRPROP, &sp) == -1) {
		warnx("failed to lookup SMBIOS strprop: %s",
		    smbios_errmsg(smbios_errno(hdl)));
		return (B_FALSE);
	}

	if (smbios_info_strprop(hdl, sp.smbstr_id, &prop) != -1) {
		warnx("accidentally parsed invalid strprop information as "
		    "valid");
		return (B_FALSE);
	}

	if (smbios_errno(hdl) != smberr) {
		warnx("encountered wrong error for strprop, expected: "
		    "0x%x, found: 0x%x", smberr, smbios_errno(hdl));
		return (B_FALSE);
	}

	return (B_TRUE);
}

boolean_t
smbios_test_strprop_verify_invlen1(smbios_hdl_t *hdl)
{
	return (smbios_test_strprop_verify_badtable(hdl, ESMB_SHORT));
}

boolean_t
smbios_test_strprop_verify_invlen2(smbios_hdl_t *hdl)
{
	return (smbios_test_strprop_verify_badtable(hdl, ESMB_CORRUPT));
}

boolean_t
smbios_test_strprop_verify_badtype(smbios_hdl_t *hdl)
{
	smbios_struct_t sp;
	smbios_strprop_t prop;

	/*
	 * Here we've explicitly created a table with a memory device that we're
	 * going to try and look up as well, not that.
	 */
	if (smbios_lookup_type(hdl, SMB_TYPE_MEMDEVICE, &sp) == -1) {
		warnx("failed to lookup SMBIOS memory device: %s",
		    smbios_errmsg(smbios_errno(hdl)));
		return (B_FALSE);
	}

	if (smbios_info_strprop(hdl, sp.smbstr_id, &prop) != -1) {
		warnx("accidentally parsed invalid strprop information as "
		    "valid");
		return (B_FALSE);
	}

	if (smbios_errno(hdl) != ESMB_TYPE) {
		warnx("encountered wrong error for strprop, expected: "
		    "0x%x, found: 0x%x", ESMB_TYPE, smbios_errno(hdl));
		return (B_FALSE);
	}

	return (B_TRUE);

}

boolean_t
smbios_test_strprop_verify_basic(smbios_hdl_t *hdl)
{
	smbios_struct_t sp;
	smbios_strprop_t prop;
	boolean_t ret = B_TRUE;

	if (smbios_lookup_type(hdl, SMB_TYPE_STRPROP, &sp) == -1) {
		warnx("failed to lookup SMBIOS strprop: %s",
		    smbios_errmsg(smbios_errno(hdl)));
		return (B_FALSE);
	}

	if (smbios_info_strprop(hdl, sp.smbstr_id, &prop) != 0) {
		warnx("failed to get SMBIOS strprop: %s",
		    smbios_errmsg(smbios_errno(hdl)));
		return (B_FALSE);
	}

	if (prop.smbsp_prop_id != SMB_STRP_UEFI_DEVPATH) {
		warnx("property id incorrect, expected 0x%x, found 0x %x",
		    SMB_STRP_UEFI_DEVPATH, prop.smbsp_prop_id);
		ret = B_FALSE;
	}

	if (strcmp(smbios_strprop_id_desc(prop.smbsp_prop_id),
	    "UEFI device path") != 0) {
		warnx("property id string incorrect, found %s",
		    smbios_strprop_id_desc(prop.smbsp_prop_id));
		ret = B_FALSE;
	}

	if (strcmp(prop.smbsp_prop_val, smbios_strprop_path) != 0) {
		warnx("property value incorrect, found %s",
		    prop.smbsp_prop_val);
		ret = B_FALSE;
	}

	return (ret);
}

boolean_t
smbios_test_strprop_verify_badstr(smbios_hdl_t *hdl)
{
	smbios_struct_t sp;
	smbios_strprop_t prop;
	boolean_t ret = B_TRUE;

	if (smbios_lookup_type(hdl, SMB_TYPE_STRPROP, &sp) == -1) {
		warnx("failed to lookup SMBIOS strprop: %s",
		    smbios_errmsg(smbios_errno(hdl)));
		return (B_FALSE);
	}

	if (smbios_info_strprop(hdl, sp.smbstr_id, &prop) != 0) {
		warnx("failed to get SMBIOS strprop: %s",
		    smbios_errmsg(smbios_errno(hdl)));
		return (B_FALSE);
	}

	if (prop.smbsp_prop_id != SMB_STRP_UEFI_DEVPATH) {
		warnx("property id incorrect, expected 0x%x, found 0x %x",
		    SMB_STRP_UEFI_DEVPATH, prop.smbsp_prop_id);
		ret = B_FALSE;
	}

	if (strcmp(smbios_strprop_id_desc(prop.smbsp_prop_id),
	    "UEFI device path") != 0) {
		warnx("property id string incorrect, found %s",
		    smbios_strprop_id_desc(prop.smbsp_prop_id));
		ret = B_FALSE;
	}

	if (strcmp(prop.smbsp_prop_val, "") != 0) {
		warnx("property value incorrect, found %s",
		    prop.smbsp_prop_val);
		ret = B_FALSE;
	}

	return (ret);
}