Blame tc/p_ip.c

Packit Service 3880ab
/*
Packit Service 3880ab
 * p_ip.c		packet editor: IPV4 header
Packit Service 3880ab
 *
Packit Service 3880ab
 *		This program is free software; you can distribute it and/or
Packit Service 3880ab
 *		modify it under the terms of the GNU General Public License
Packit Service 3880ab
 *		as published by the Free Software Foundation; either version
Packit Service 3880ab
 *		2 of the License, or (at your option) any later version.
Packit Service 3880ab
 *
Packit Service 3880ab
 * Authors:  J Hadi Salim (hadi@cyberus.ca)
Packit Service 3880ab
 *
Packit Service 3880ab
 */
Packit Service 3880ab
Packit Service 3880ab
#include <stdio.h>
Packit Service 3880ab
#include <stdlib.h>
Packit Service 3880ab
#include <unistd.h>
Packit Service 3880ab
#include <fcntl.h>
Packit Service 3880ab
#include <sys/socket.h>
Packit Service 3880ab
#include <netinet/in.h>
Packit Service 3880ab
#include <arpa/inet.h>
Packit Service 3880ab
#include <string.h>
Packit Service 3880ab
#include "utils.h"
Packit Service 3880ab
#include "tc_util.h"
Packit Service 3880ab
#include "m_pedit.h"
Packit Service 3880ab
Packit Service 3880ab
static int
Packit Service 3880ab
parse_ip(int *argc_p, char ***argv_p,
Packit Service 3880ab
	 struct m_pedit_sel *sel, struct m_pedit_key *tkey)
Packit Service 3880ab
{
Packit Service 3880ab
	int res = -1;
Packit Service 3880ab
	int argc = *argc_p;
Packit Service 3880ab
	char **argv = *argv_p;
Packit Service 3880ab
Packit Service 3880ab
	if (argc < 2)
Packit Service 3880ab
		return -1;
Packit Service 3880ab
Packit Service 3880ab
	tkey->htype = sel->extended ?
Packit Service 3880ab
		TCA_PEDIT_KEY_EX_HDR_TYPE_IP4 :
Packit Service 3880ab
		TCA_PEDIT_KEY_EX_HDR_TYPE_NETWORK;
Packit Service 3880ab
Packit Service 3880ab
	if (strcmp(*argv, "src") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 12;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 4, TIPV4, RU32, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "dst") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 16;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 4, TIPV4, RU32, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	/* jamal - look at these and make them either old or new
Packit Service 3880ab
	** scheme given diffserv
Packit Service 3880ab
	** don't forget the CE bit
Packit Service 3880ab
	*/
Packit Service 3880ab
	if (strcmp(*argv, "tos") == 0 || matches(*argv, "dsfield") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 1;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, RU8, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "ihl") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 0;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, 0x0f, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "ttl") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 8;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, RU8, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "protocol") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 9;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, RU8, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	/* jamal - fix this */
Packit Service 3880ab
	if (matches(*argv, "precedence") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 1;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, RU8, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	/* jamal - validate this at some point */
Packit Service 3880ab
	if (strcmp(*argv, "nofrag") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 6;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, 0x3F, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	/* jamal - validate this at some point */
Packit Service 3880ab
	if (strcmp(*argv, "firstfrag") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 6;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, 0x1F, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "ce") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 6;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, 0x80, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "df") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 6;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, 0x40, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "mf") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 6;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, 0x20, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	if (sel->extended)
Packit Service 3880ab
		return -1; /* fields located outside IP header should be
Packit Service 3880ab
			    * addressed using the relevant header type in
Packit Service 3880ab
			    * extended pedit kABI
Packit Service 3880ab
			    */
Packit Service 3880ab
Packit Service 3880ab
	if (strcmp(*argv, "dport") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 22;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 2, TU32, RU16, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "sport") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 20;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 2, TU32, RU16, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "icmp_type") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 20;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, RU8, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	if (strcmp(*argv, "icmp_code") == 0) {
Packit Service 3880ab
		NEXT_ARG();
Packit Service 3880ab
		tkey->off = 20;
Packit Service 3880ab
		res = parse_cmd(&argc, &argv, 1, TU32, RU8, sel, tkey);
Packit Service 3880ab
		goto done;
Packit Service 3880ab
	}
Packit Service 3880ab
	return -1;
Packit Service 3880ab
Packit Service 3880ab
done:
Packit Service 3880ab
	*argc_p = argc;
Packit Service 3880ab
	*argv_p = argv;
Packit Service 3880ab
	return res;
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
struct m_pedit_util p_pedit_ip = {
Packit Service 3880ab
	.id = "ip",
Packit Service 3880ab
	.parse_peopt = parse_ip,
Packit Service 3880ab
};