/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (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 (c) 2001 by Sun Microsystems, Inc.
 * All rights reserved.
 */

#include <stdio.h>
#include <sys/types.h>

#include <at.h>
#include <snoop.h>

static void show_rtmp_tuples(uint8_t *, int);

static char *
rtmp_func_long(uint8_t fun)
{
	switch (fun) {
	case RTMP_REQ:
		return ("Request");
	case RTMP_RDR_SH:
		return ("Route Data Request, split horizon");
	case RTMP_RDR_NSH:
		return ("Route Data Request, no split horizon");
	default:
		return ("unknown");
	}
}

static char *
rtmp_func_short(uint8_t fun)
{
	switch (fun) {
	case RTMP_REQ:
		return ("Req");
	case RTMP_RDR_SH:
		return ("RDR, sh");
	case RTMP_RDR_NSH:
		return ("RDR, no sh");
	default:
		return ("unknown");
	}
}

void
interpret_rtmp(int flags, struct ddp_hdr *ddp, int len)
{
	uint8_t *data;
	uint16_t snet;
	uint8_t node;
	int tuples;
	int runt;
	char extended;

	len -= DDPHDR_SIZE;
	if (len < 0)
		goto out;

	data = (uint8_t *)ddp + DDPHDR_SIZE;

	switch (ddp->ddp_type) {
	case DDP_TYPE_RTMPRQ:		/* simple rtmp */
		if (len < 1)
			goto out;

		if (flags & F_SUM) {
			(void) snprintf(get_sum_line(), MAXLINE,
			    "RTMP F=%s",
			    rtmp_func_short(data[0]));
		}

		if (flags & F_DTAIL) {
			show_header("RTMP: ", "RTMP Header", len);
			show_space();

			(void) snprintf(get_line(0, 0), get_line_remain(),
			    "Func = %d (%s)",
			    data[0], rtmp_func_long(data[0]));
		}
		break;
	case DDP_TYPE_RTMPRESP:		/* RTMP data */
		if (len < 3)
			goto out;

		snet = get_short(data);
		if (data[2] != 8)	/* ID length is always 8 */
			return;
		node = data[3];		/* assume id_len == 8 */
		extended = (data[6] != RTMP_FILLER) &&
		    (get_short(&data[4]) != 0);

		tuples = (len - 4) / 3;
		runt = (len - 4) % 3; /* integral length? */

		if (flags & F_SUM) {
			(void) snprintf(get_sum_line(), MAXLINE,
			    "RTMP Data Snet=%d, Snode=%d%s",
			    snet, node, runt != 0 ? " (short)" : "");
		}

		if (flags & F_DTAIL) {
			show_header("RTMP: ", "RTMP Header", len);
			show_space();

			(void) snprintf(get_line(0, 0), get_line_remain(),
			    "RTMP Data, Length = %d%s",
			    len, runt != 0 ? " (short packet)" : "");
			(void) snprintf(get_line(0, 0), get_line_remain(),
			    "Senders Net = %d, Sender Node %d",
			    snet, node);
			if (extended)
				show_rtmp_tuples(&data[4], tuples);
			else
				show_rtmp_tuples(&data[7], tuples-1);
		}

		break;
	}
	return;
out:
	if (flags & F_SUM) {
		(void) snprintf(get_sum_line(), MAXLINE,
		    "RTMP (short packet)");
	}

	if (flags & F_DTAIL) {
		show_header("RTMP: ", "RTMP Header", len);
		show_space();

		(void) snprintf(get_line(0, 0), get_line_remain(),
		    "(short packet)");
	}
}

static void
show_rtmp_tuples(uint8_t *p, int tuples)
{
	while (tuples > 0) {

		if (p[2] & RTMP_EXTEND) { /* extended tuple? */

			(void) snprintf(get_line(0, 0),
			    get_line_remain(),
			    "Network = %d-%d, Distance = %d",
			    get_short(p), get_short(&p[3]),
			    p[2] & RTMP_DIST_MASK);
			p += 6;
			tuples -= 2;
		} else {

			(void) snprintf(get_line(0, 0),
			    get_line_remain(),
			    "Network = %d, Distance = %d",
			    get_short(p), p[2]);
			p += 3;
			tuples--;
		}
	}
}