/*
 * 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 (c) 2017, Joyent, Inc.
 */

/*
 * Print and tests SFF length values.
 */

#include <stdio.h>
#include <errno.h>
#include <strings.h>
#include <err.h>
#include <libsff.h>

/*
 * Pick up private sff header file with offsets from lib/libsff.
 */
#include "sff.h"

int
main(void)
{
	int ret;
	uint8_t buf[256];
	nvlist_t *nvl;
	char *val;
	uint_t i;
	const char *lengths_8472[] = { LIBSFF_KEY_LENGTH_SMF_KM,
	    LIBSFF_KEY_LENGTH_SMF, LIBSFF_KEY_LENGTH_OM2, LIBSFF_KEY_LENGTH_OM1,
	    LIBSFF_KEY_LENGTH_COPPER, LIBSFF_KEY_LENGTH_OM3, NULL };
	const char *lengths_8636[] = { LIBSFF_KEY_LENGTH_SMF_KM,
	    LIBSFF_KEY_LENGTH_OM2, LIBSFF_KEY_LENGTH_OM1,
	    LIBSFF_KEY_LENGTH_COPPER, LIBSFF_KEY_LENGTH_OM3, NULL };

	/*
	 * Make sure if lengths are zero that they don't show up.
	 */
	bzero(buf, sizeof (buf));
	if ((ret = libsff_parse(buf, sizeof (buf), 0xa0, &nvl)) != 0) {
		errx(1, "TEST FAILED: failed to parse SFP length "
		    "values: %s\n", strerror(ret));
	}

	for (i = 0; lengths_8472[i] != NULL; i++) {
		if ((ret = nvlist_lookup_string(nvl, lengths_8472[i], &val)) !=
		    ENOENT) {
			errx(1, "TEST FALIED: found unexpected return value "
			    "for key %s: %d\n", lengths_8472[i], ret);
		}
	}

	nvlist_free(nvl);

	buf[SFF_8472_LENGTH_SMF_KM] = 0x23;
	buf[SFF_8472_LENGTH_SMF] = 0x24;
	buf[SFF_8472_LENGTH_50UM] = 0x25;
	buf[SFF_8472_LENGTH_62UM] = 0x26;
	buf[SFF_8472_LENGTH_COPPER] = 0x27;
	buf[SFF_8472_LENGTH_OM3] = 0x28;

	if ((ret = libsff_parse(buf, sizeof (buf), 0xa0, &nvl)) != 0) {
		errx(1, "TEST FAILED: failed to parse SFP length "
		    "values: %s\n", strerror(ret));
	}

	for (i = 0; lengths_8472[i] != NULL; i++) {
		if ((ret = nvlist_lookup_string(nvl, lengths_8472[i], &val)) !=
		    0) {
			errx(1, "TEST FALIED: failed to find length for key "
			    "%s: %d\n", lengths_8472[i], ret);
		}
		(void) printf("%s: %s\n", lengths_8472[i], val);
	}

	nvlist_free(nvl);

	/*
	 * Now for QSFP+
	 */
	(void) puts("\n\nQSFP\n");
	bzero(buf, sizeof (buf));
	buf[SFF_8472_IDENTIFIER] = SFF_8024_ID_QSFP;

	if ((ret = libsff_parse(buf, sizeof (buf), 0xa0, &nvl)) != 0) {
		errx(1, "TEST FAILED: failed to parse QSFP length "
		    "values: %s\n", strerror(ret));
	}

	for (i = 0; lengths_8472[i] != NULL; i++) {
		if ((ret = nvlist_lookup_string(nvl, lengths_8472[i], &val)) !=
		    ENOENT) {
			errx(1, "TEST FALIED: found unexpected return value "
			    "for key %s: %d\n", lengths_8472[i], ret);
		}
	}

	nvlist_free(nvl);

	buf[SFF_8636_LENGTH_SMF] = 0x23;
	buf[SFF_8636_LENGTH_OM3] = 0x24;
	buf[SFF_8636_LENGTH_OM2] = 0x25;
	buf[SFF_8636_LENGTH_OM1] = 0x26;
	buf[SFF_8636_LENGTH_COPPER] = 0x27;

	if ((ret = libsff_parse(buf, sizeof (buf), 0xa0, &nvl)) != 0) {
		errx(1, "TEST FAILED: failed to parse QSFP length "
		    "values: %s\n", strerror(ret));
	}

	for (i = 0; lengths_8636[i] != NULL; i++) {
		if ((ret = nvlist_lookup_string(nvl, lengths_8636[i], &val)) !=
		    0) {
			errx(1, "TEST FALIED: failed to find length for key "
			    "%s: %d\n", lengths_8472[i], ret);
		}
		(void) printf("%s: %s\n", lengths_8636[i], val);
	}

	nvlist_free(nvl);

	return (0);
}