/*
 * 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 2009 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include <stdio.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <sys/ethernet.h>
#include <sys/vlan.h>
#include <net/trill.h>

#include <snoop.h>

int
interpret_trill(int flags, struct ether_header **e, char *data, int *alen)
{
	trill_header_t *trillhdr;
	struct ether_header *inner_ethhdr;
	struct ether_vlan_header *inner_ethvlanhdr;
	uint16_t ethertype;
	int dlen = *alen;
	size_t optslen;
	size_t trillhdrlen;

	if (dlen < sizeof (trill_header_t)) {
		(void) snprintf(get_sum_line(), MAXLINE,
		    "TRILL (short packet)");
		return (0);
	}

	trillhdr = (trill_header_t *)data;
	optslen = GET_TRILL_OPTS_LEN(trillhdr) * sizeof (uint32_t);

	if (flags & F_DTAIL) {
		show_header("TRILL: ", "TRILL Data Frame", dlen);
		show_space();

		(void) snprintf(get_line(0, 0), get_line_remain(),
		    "Egress nickname = %d",
		    ntohs(trillhdr->th_egressnick));
		(void) snprintf(get_line(0, 0), get_line_remain(),
		    "Ingress nickname = %d",
		    ntohs(trillhdr->th_ingressnick));
		(void) snprintf(get_line(0, 0), get_line_remain(),
		    "Hop count = %d", trillhdr->th_hopcount);
		(void) snprintf(get_line(0, 0), get_line_remain(),
		    "Multi-destination = %d", trillhdr->th_multidest);
		(void) snprintf(get_line(0, 0), get_line_remain(),
		    "Options Len = %d bytes", optslen);
		show_trailer();
	}

	trillhdrlen = sizeof (trill_header_t) + optslen;

	if (dlen < trillhdrlen) {
		(void) snprintf(get_sum_line(), MAXLINE,
		    "TRILL (options truncated)");
		return (0);
	}

	dlen -= trillhdrlen;

	if (dlen < sizeof (struct ether_header)) {
		(void) snprintf(get_sum_line(), MAXLINE,
		    "TRILL (missing required inner MAC)");
		return (0);
	}

	inner_ethhdr = (struct ether_header *)(data + trillhdrlen);
	if (inner_ethhdr->ether_type != htons(ETHERTYPE_VLAN)) {
		(void) snprintf(get_sum_line(), MAXLINE,
		    "TRILL (inner VLAN missing; ethertype %X)",
		    ntohs(inner_ethhdr->ether_type));
		return (0);
	}

	inner_ethvlanhdr = (struct ether_vlan_header *)inner_ethhdr;
	ethertype = ntohs(inner_ethvlanhdr->ether_type);

	if (flags & F_SUM) {
		(void) snprintf(get_sum_line(), MAXLINE,
		    "TRILL D:%d S:%d HC:%d M:%d O:%d L:%d VLAN:%d %s",
		    ntohs(trillhdr->th_egressnick),
		    ntohs(trillhdr->th_ingressnick),
		    trillhdr->th_hopcount,
		    trillhdr->th_multidest,
		    optslen,
		    dlen, VLAN_ID(inner_ethvlanhdr->ether_tci),
		    print_ethertype(ethertype));
	}

	*alen = dlen;
	*e = inner_ethhdr;
	return (ethertype);
}