Adding upstream version 4.2.2.upstream/4.2.2

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 206 insertions, 0 deletions

diff --git a/epan/dissectors/packet-dcerpc-krb5rpc.c b/epan/dissectors/packet-dcerpc-krb5rpc.c
new file mode 100644
index 00000000..1c2f65a6
--- /dev/null
+++ b/epan/dissectors/packet-dcerpc-krb5rpc.c
@@ -0,0 +1,206 @@
+/* packet-dcerpc-krb5rpc.c
+ *
+ * Routines for dcerpc DCE/KRB5 interface
+ * 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/security.tar.gz security/idl/krb5rpc.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 <epan/asn1.h>
+#include "packet-dcerpc.h"
+#include "packet-kerberos.h"
+
+void proto_register_krb5rpc (void);
+void proto_reg_handoff_krb5rpc (void);
+
+static int proto_krb5rpc = -1;
+
+static gint ett_krb5rpc = -1;
+
+
+static e_guid_t uuid_krb5rpc =
+  { 0x8f73de50, 0x768c, 0x11ca, {0xbf, 0xfc, 0x08, 0x00, 0x1e, 0x03, 0x94,
+                                 0x31}
+};
+static guint16 ver_krb5rpc = 1;
+static int hf_krb5rpc_opnum = -1;
+static int hf_krb5rpc_sendto_kdc_rqst_keysize = -1;
+static int hf_krb5rpc_sendto_kdc_rqst_spare1 = -1;
+static int hf_krb5rpc_sendto_kdc_resp_len = -1;
+static int hf_krb5rpc_sendto_kdc_resp_max = -1;
+static int hf_krb5rpc_sendto_kdc_resp_spare1 = -1;
+static int hf_krb5rpc_sendto_kdc_resp_keysize = -1;
+/* static int hf_krb5rpc_sendto_kdc_resp_st = -1; */
+static int hf_krb5rpc_krb5 = -1;
+static gint ett_krb5rpc_krb5 = -1;
+
+static int
+krb5rpc_dissect_sendto_kdc_rqst (tvbuff_t * tvb, int offset,
+                                 packet_info * pinfo, proto_tree * tree,
+                                 dcerpc_info *di, guint8 *drep)
+{
+  guint32 keysize, spare1, remain;
+  proto_item *item;
+  tvbuff_t *krb5_tvb;
+  proto_tree *subtree;
+
+
+  /*
+   *        [in]        handle_t        h,
+   *        [in]        unsigned32      len,
+   *        [in, size_is(len)]
+   *        byte            message[],
+   *        [in]        unsigned32      out_buf_len,
+   */
+
+  offset =
+    dissect_ndr_uint32(tvb, offset, pinfo, tree, di, drep,
+                       hf_krb5rpc_sendto_kdc_rqst_keysize, &keysize);
+  offset =
+    dissect_ndr_uint32(tvb, offset, pinfo, tree, di, drep,
+                       hf_krb5rpc_sendto_kdc_rqst_spare1, &spare1);
+  item = proto_tree_add_item (tree, hf_krb5rpc_krb5, tvb, offset, -1, ENC_NA);
+  subtree = proto_item_add_subtree (item, ett_krb5rpc_krb5);
+
+  remain = tvb_captured_length_remaining(tvb, offset);
+  krb5_tvb = tvb_new_subset_length(tvb, offset, remain);
+  offset = dissect_kerberos_main (krb5_tvb, pinfo, subtree, TRUE, NULL);
+
+
+  return offset;
+}
+
+
+static int
+krb5rpc_dissect_sendto_kdc_resp (tvbuff_t * tvb, int offset,
+                                 packet_info * pinfo, proto_tree * tree,
+                                 dcerpc_info *di, guint8 *drep)
+{
+  guint32 resp_len, maxsize, spare1, keysize, remain;
+  proto_item *item;
+  tvbuff_t *krb5_tvb;
+  proto_tree *subtree;
+
+
+  /*
+   *
+   *        [out]       unsigned32      *resp_len,
+   *        [out, length_is(*resp_len), size_is(out_buf_len)]
+   *        byte            out_buf[],
+   *        [out]       error_status_t  *st unsigned long
+   *
+   */
+
+  offset =
+    dissect_ndr_uint32(tvb, offset, pinfo, tree, di, drep,
+                       hf_krb5rpc_sendto_kdc_resp_len, &resp_len);
+  offset =
+    dissect_ndr_uint32(tvb, offset, pinfo, tree, di, drep,
+                       hf_krb5rpc_sendto_kdc_resp_max, &maxsize);
+  offset =
+    dissect_ndr_uint32(tvb, offset, pinfo, tree, di, drep,
+                       hf_krb5rpc_sendto_kdc_resp_spare1, &spare1);
+  offset =
+    dissect_ndr_uint32(tvb, offset, pinfo, tree, di, drep,
+                       hf_krb5rpc_sendto_kdc_resp_keysize, &keysize);
+
+
+  item = proto_tree_add_item (tree, hf_krb5rpc_krb5, tvb, offset, -1, ENC_NA);
+  subtree = proto_item_add_subtree (item, ett_krb5rpc_krb5);
+  remain = tvb_captured_length_remaining(tvb, offset);
+  krb5_tvb = tvb_new_subset_length(tvb, offset, remain);
+
+  offset = dissect_kerberos_main (krb5_tvb, pinfo, subtree, TRUE, NULL);
+  offset += 16; /* no idea what this is, probably just extended encrypted text. */
+
+  return offset;
+}
+
+
+static dcerpc_sub_dissector krb5rpc_dissectors[] = {
+  {0, "rsec_krb5rpc_sendto_kdc", krb5rpc_dissect_sendto_kdc_rqst,
+   krb5rpc_dissect_sendto_kdc_resp},
+  {0, NULL, NULL, NULL},
+};
+
+
+void
+proto_register_krb5rpc (void)
+{
+  static hf_register_info hf[] = {
+    {&hf_krb5rpc_opnum,
+     {"Opnum", "krb5rpc.opnum", FT_UINT16, BASE_DEC, NULL, 0x0,
+      NULL, HFILL }},
+    {&hf_krb5rpc_sendto_kdc_rqst_keysize,
+     {"Request keysize",
+      "krb5rpc.sendto_kdc_rqst_keysize", FT_UINT32, BASE_DEC, NULL, 0x0,
+      NULL, HFILL}},
+    {&hf_krb5rpc_sendto_kdc_rqst_spare1,
+     {"Request spare1",
+      "krb5rpc.sendto_kdc_rqst_spare1", FT_UINT32, BASE_DEC, NULL, 0x0, NULL,
+      HFILL}},
+    {&hf_krb5rpc_sendto_kdc_resp_len,
+     {"Response length", "krb5rpc.sendto_kdc_resp_len",
+      FT_UINT32, BASE_DEC, NULL, 0x0, NULL, HFILL}},
+    {&hf_krb5rpc_sendto_kdc_resp_max,
+     {"Response max", "krb5rpc.sendto_kdc_resp_max",
+      FT_UINT32, BASE_DEC, NULL, 0x0, NULL, HFILL}},
+    {&hf_krb5rpc_sendto_kdc_resp_spare1,
+     {"Response spare1",
+      "krb5rpc.sendto_kdc_resp_spare1", FT_UINT32, BASE_DEC, NULL, 0x0, NULL,
+      HFILL}},
+    {&hf_krb5rpc_sendto_kdc_resp_keysize,
+     {"Response key size",
+      "krb5rpc.sendto_kdc_resp_keysize", FT_UINT32, BASE_DEC, NULL, 0x0,
+      NULL, HFILL}},
+#if 0
+    {&hf_krb5rpc_sendto_kdc_resp_st,
+     {"Response st", "krb5rpc.sendto_kdc_resp_st",
+      FT_UINT32, BASE_DEC, NULL, 0x0, NULL, HFILL}},
+#endif
+    {&hf_krb5rpc_krb5,
+     {"krb5", "krb5rpc.krb5", FT_BYTES, BASE_NONE, NULL, 0x0,
+      "krb5 blob", HFILL}},
+
+  };
+
+  static gint *ett[] = {
+    &ett_krb5rpc,
+    &ett_krb5rpc_krb5,
+  };
+  proto_krb5rpc =
+    proto_register_protocol ("DCE/RPC Kerberos V", "KRB5RPC", "krb5rpc");
+  proto_register_field_array (proto_krb5rpc, hf, array_length (hf));
+  proto_register_subtree_array (ett, array_length (ett));
+}
+
+void
+proto_reg_handoff_krb5rpc (void)
+{
+  /* Register the protocol as dcerpc */
+  dcerpc_init_uuid (proto_krb5rpc, ett_krb5rpc, &uuid_krb5rpc, ver_krb5rpc,
+                    krb5rpc_dissectors, hf_krb5rpc_opnum);
+}
+
+/*
+ * Editor modelines  -  https://www.wireshark.org/tools/modelines.html
+ *
+ * Local Variables:
+ * c-basic-offset: 2
+ * tab-width: 8
+ * indent-tabs-mode: nil
+ * End:
+ *
+ * ex: set shiftwidth=2 tabstop=8 expandtab:
+ * :indentSize=2:tabSize=8:noTabs=true:
+ */