1 files changed, 84 insertions, 0 deletions
diff --git a/epan/dissectors/packet-dcerpc-tkn4int.c b/epan/dissectors/packet-dcerpc-tkn4int.c
new file mode 100644
index 00000000..1b511403
--- /dev/null
+++ b/epan/dissectors/packet-dcerpc-tkn4int.c
@@ -0,0 +1,84 @@
+/* packet-dcerpc-tkn4int.c
+ *
+ * Routines for DCE DFS Token Server Calls
+ * Copyright 2002, Jaime Fournier <Jaime.Fournier@hush.com>
+ * This information is based off the released idl files from opengroup.
+ * ftp://ftp.opengroup.org/pub/dce122/dce/src/file.tar.gz file/fsint/tkn4int.idl
+ *
+ * Wireshark - Network traffic analyzer
+ * By Gerald Combs <gerald@wireshark.org>
+ * Copyright 1998 Gerald Combs
+ *
+ * SPDX-License-Identifier: GPL-2.0-or-later
+ */
+
+#include "config.h"
+
+
+#include <epan/packet.h>
+#include "packet-dcerpc.h"
+
+void proto_register_tkn4int (void);
+void proto_reg_handoff_tkn4int (void);
+
+static int proto_tkn4int = -1;
+static int hf_tkn4int_opnum = -1;
+
+
+static gint ett_tkn4int = -1;
+
+
+static e_guid_t uuid_tkn4int = { 0x4d37f2dd, 0xed96, 0x0000, { 0x02, 0xc0, 0x37, 0xcf, 0x1e, 0x00, 0x00, 0x00 } };
+static guint16  ver_tkn4int = 4;
+
+
+static dcerpc_sub_dissector tkn4int_dissectors[] = {
+	{ 0, "Probe",               NULL, NULL},
+	{ 1, "InitTokenState",      NULL, NULL},
+	{ 2, "TokenRevoke",         NULL, NULL},
+	{ 3, "GetCellName",         NULL, NULL},
+	{ 4, "GetLock",             NULL, NULL},
+	{ 5, "GetCE",               NULL, NULL},
+	{ 6, "GetServerInterfaces", NULL, NULL},
+	{ 7, "SetParams",           NULL, NULL},
+	{ 8, "AsyncGrant",          NULL, NULL},
+	{ 0, NULL, NULL, NULL }
+
+};
+
+void
+proto_register_tkn4int (void)
+{
+	static hf_register_info hf[] = {
+	  { &hf_tkn4int_opnum,
+	    { "Operation", "tkn4int.opnum", FT_UINT16, BASE_DEC,
+	      NULL, 0x0, NULL, HFILL }}
+	};
+
+	static gint *ett[] = {
+		&ett_tkn4int,
+	};
+	proto_tkn4int = proto_register_protocol ("DCE DFS Token Server", "TKN4Int", "tkn4int");
+	proto_register_field_array (proto_tkn4int, hf, array_length (hf));
+	proto_register_subtree_array (ett, array_length (ett));
+}
+
+void
+proto_reg_handoff_tkn4int (void)
+{
+	/* Register the protocol as dcerpc */
+	dcerpc_init_uuid (proto_tkn4int, ett_tkn4int, &uuid_tkn4int, ver_tkn4int, tkn4int_dissectors, hf_tkn4int_opnum);
+}
+
+/*
+ * Editor modelines  -  https://www.wireshark.org/tools/modelines.html
+ *
+ * Local variables:
+ * c-basic-offset: 8
+ * tab-width: 8
+ * indent-tabs-mode: t
+ * End:
+ *
+ * vi: set shiftwidth=8 tabstop=8 noexpandtab:
+ * :indentSize=8:tabSize=8:noTabs=false:
+ */