Add (un)marshalling code for endpoint mapper map operation

(This used to be commit bdd5158d9a45f4b935ea0fa495c0d83bc5ca96f8)

1 files changed, 406 insertions, 0 deletions

diff --git a/source3/rpc_parse/parse_epmapper.c b/source3/rpc_parse/parse_epmapper.c
new file mode 100644
index 0000000000..9e21da04dd
--- /dev/null
+++ b/source3/rpc_parse/parse_epmapper.c
@@ -0,0 +1,406 @@
+/* 
+   Unix SMB/CIFS implementation.
+   Samba end point mapper functions
+   Copyright (C) Jim McDonough (jmcd@us.ibm.com)     2003.
+   
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+   
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+   
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+*/
+
+#include "includes.h"
+
+#undef DBGC_CLASS
+#define DBGC_CLASS DBGC_RPC_PARSE
+
+/*******************************************************************
+ Reads or writes a handle.
+********************************************************************/
+BOOL epm_io_handle(const char *desc, EPM_HANDLE *handle, prs_struct *ps,
+		   int depth)
+{
+
+	if (!prs_uint8s(False, "data", ps, depth, handle->data, 
+			sizeof(handle->data)))
+		return False;
+
+	return True;
+}
+
+/*******************************************************************
+ inits an EPM_FLOOR structure.
+********************************************************************/
+NTSTATUS init_epm_floor(EPM_FLOOR *floor, uint8 protocol)
+{
+	/* handle lhs */
+	floor->lhs.protocol = protocol;
+	floor->lhs.length = sizeof(floor->lhs.protocol);
+
+	switch(floor->lhs.protocol) {
+	case EPM_FLOOR_UUID:
+		floor->lhs.length += sizeof(floor->lhs.uuid.uuid);
+		floor->lhs.length += sizeof(floor->lhs.uuid.version);
+		break;
+	default:
+		break;
+	}
+
+	/* handle rhs */
+	switch(floor->lhs.protocol) {
+	case EPM_FLOOR_RPC:
+	case EPM_FLOOR_UUID:
+		floor->rhs.length = sizeof(floor->rhs.unknown);
+		break;
+	case EPM_FLOOR_TCP:
+		floor->rhs.length = sizeof(floor->rhs.tcp.port);
+		break;
+	case EPM_FLOOR_IP:
+		floor->rhs.length = sizeof(floor->rhs.ip.addr);
+		break;
+	default:
+		break;
+	}
+
+	return NT_STATUS_OK;
+}
+	
+/*******************************************************************
+ inits an EPM_FLOOR structure with a UUID
+********************************************************************/
+NTSTATUS init_epm_floor_uuid(EPM_FLOOR *floor,
+			     const RPC_UUID *uuid, uint16 version)
+{
+	memcpy(&floor->lhs.uuid.uuid, uuid, sizeof(*uuid));
+	floor->lhs.uuid.version = version;
+	floor->rhs.unknown = 0;
+	return init_epm_floor(floor, EPM_FLOOR_UUID);
+}
+
+/*******************************************************************
+ inits an EPM_FLOOR structure for RPC
+********************************************************************/
+NTSTATUS init_epm_floor_rpc(EPM_FLOOR *floor)
+{
+	floor->rhs.unknown = 0;
+	return init_epm_floor(floor, EPM_FLOOR_RPC);
+}
+
+/*******************************************************************
+ inits an EPM_FLOOR structure for TCP
+********************************************************************/
+NTSTATUS init_epm_floor_tcp(EPM_FLOOR *floor, uint16 port)
+{
+	floor->rhs.tcp.port = htons(port);
+	return init_epm_floor(floor, EPM_FLOOR_TCP);
+}
+
+/*******************************************************************
+ inits an EPM_FLOOR structure for IP
+********************************************************************/
+NTSTATUS init_epm_floor_ip(EPM_FLOOR *floor, uint8 addr[4])
+{
+	memcpy(&floor->rhs.ip.addr, addr, sizeof(addr));
+	return init_epm_floor(floor, EPM_FLOOR_IP);
+}
+
+/*******************************************************************
+ reads and writes EPM_FLOOR.
+********************************************************************/
+BOOL epm_io_floor(const char *desc, EPM_FLOOR *floor,
+		  prs_struct *ps, int depth)
+{
+	prs_debug(ps, depth, desc, "epm_io_floor");
+	depth++;
+
+	if (!prs_uint16("lhs_length", ps, depth, &floor->lhs.length))
+		return False;
+	if (!prs_uint8("protocol", ps, depth, &floor->lhs.protocol))
+		return False;
+
+	switch (floor->lhs.protocol) {
+	case EPM_FLOOR_UUID:
+		if (!smb_io_rpc_uuid("uuid", &floor->lhs.uuid.uuid, ps, depth))
+			return False;
+		if (!prs_uint16("version", ps, depth, 
+				&floor->lhs.uuid.version))
+			return False;
+		break;
+	}
+
+	if (!prs_uint16("rhs_length", ps, depth, &floor->rhs.length))
+		return False;
+
+	switch (floor->lhs.protocol) {
+	case EPM_FLOOR_UUID:
+	case EPM_FLOOR_RPC:
+		if (!prs_uint16("unknown", ps, depth, &floor->rhs.unknown))
+			return False;
+		break;
+	case EPM_FLOOR_TCP:
+		if (!prs_uint16("tcp_port", ps, depth, &floor->rhs.tcp.port))
+			return False;
+		break;
+	case EPM_FLOOR_IP:
+		if (!prs_uint8s(False, "ip_addr", ps, depth, 
+				floor->rhs.ip.addr,
+				sizeof(floor->rhs.ip.addr)))
+			return False;
+		break;
+	default:
+		break;
+	}
+
+	return True;
+}
+
+/*******************************************************************
+ Inits a EPM_TOWER structure.
+********************************************************************/
+NTSTATUS init_epm_tower(TALLOC_CTX *ctx, EPM_TOWER *tower, 
+			const EPM_FLOOR *floors, int num_floors)
+{
+	static uint32 internal_referent_id = 0;
+	int size = 0;
+	int i;
+
+	DEBUG(5, ("init_epm_tower\n"));
+
+	for (i = 0; i < num_floors; i++) {
+		size += (sizeof(uint32) * 2);
+		size += floors[i].lhs.length;
+		size += floors[i].rhs.length;
+	}
+	size += sizeof(uint8); /* this could be aligning... */
+
+	tower->referent_id = ++internal_referent_id;
+	tower->max_length = tower->length = size;
+	tower->num_floors = num_floors;
+	tower->floors = talloc(ctx, sizeof(EPM_FLOOR) * num_floors);
+	if (!tower->floors) {
+		return NT_STATUS_NO_MEMORY;
+	}
+	memcpy(tower->floors, floors, sizeof(EPM_FLOOR) * num_floors);
+	tower->unknown = 0x7e;
+
+	return NT_STATUS_OK;
+}
+
+/*******************************************************************
+ Reads or writes an EPM_TOWER structure.
+********************************************************************/
+BOOL epm_io_tower(const char *desc, EPM_TOWER *tower,
+		  prs_struct *ps, int depth)
+{
+	int i;
+
+	prs_debug(ps, depth, desc, "epm_io_tower");
+	depth++;
+
+	if (!prs_uint32("referent_id", ps, depth, &tower->referent_id))
+		return False;
+	if (!prs_uint32("max_length", ps, depth, &tower->max_length))
+		return False;
+	if (!prs_uint32("length", ps, depth, &tower->length))
+		return False;
+	if (!prs_uint16("num_floors", ps, depth, &tower->num_floors))
+		return False;
+
+	if (UNMARSHALLING(ps)) {
+		tower->floors = talloc(ps->mem_ctx,
+				       sizeof(EPM_FLOOR) * tower->num_floors);
+		if (!tower->floors)
+			return False;
+	}
+
+	for (i = 0; i < tower->num_floors; i++) {
+		if (!epm_io_floor("floor", tower->floors + i, ps, depth))
+			return False;
+	}
+
+	if (!prs_uint8("unknown", ps, depth, &tower->unknown))
+		return False;
+
+	return True;
+}
+
+/*******************************************************************
+ Initialize an EPM_TOWER_ARRAY structure
+********************************************************************/
+NTSTATUS init_epm_tower_array(TALLOC_CTX *ctx, EPM_TOWER_ARRAY *array,
+			      const EPM_TOWER *towers, int num_towers)
+{
+	array->max_count = num_towers;
+	array->offset = 0;
+	array->count = num_towers;
+	array->towers = talloc(ctx, sizeof(EPM_TOWER) * num_towers);
+	if (!array->towers) {
+		return NT_STATUS_NO_MEMORY;
+	}
+	memcpy(array->towers, towers, sizeof(EPM_TOWER) * num_towers);
+
+	return NT_STATUS_OK;
+}
+
+/*******************************************************************
+ Reads or writes an EPM_TOWER_ARRAY structure.
+********************************************************************/
+BOOL epm_io_tower_array(const char *desc, EPM_TOWER_ARRAY *array,
+			prs_struct *ps, int depth)
+{
+	int i;
+
+	prs_debug(ps, depth, desc, "epm_io_tower_array");
+	depth++;
+
+	if (!prs_uint32("max_count", ps, depth, &array->max_count))
+		return False;
+	if (!prs_uint32("offset", ps, depth, &array->offset))
+		return False;
+	if (!prs_uint32("count", ps, depth, &array->count))
+		return False;
+
+	if (!prs_set_offset(ps, prs_offset(ps) + array->offset))
+		return False;
+
+	if (UNMARSHALLING(ps)) {
+		array->towers = talloc(ps->mem_ctx,
+				       sizeof(EPM_TOWER) * array->count);
+		if (!array->towers) {
+			return False;
+		}
+	}
+
+	for (i = 0; i < array->count; i++) {
+		if (!epm_io_tower("tower", array->towers + 1, ps, depth))
+			return False;
+	}
+
+	return True;
+}
+
+/*******************************************************************
+  Initialize EPM_R_MAP structure
+******************************************************************/
+NTSTATUS init_epm_r_map(TALLOC_CTX *ctx, EPM_R_MAP *r_map, 
+			const EPM_HANDLE *handle, const EPM_TOWER_ARRAY *array,
+			int num_elements, uint32 status)
+{
+	memcpy(&r_map->handle, handle, sizeof(*handle));
+	r_map->num_results = num_elements;
+	r_map->results = talloc(ctx, sizeof(EPM_TOWER_ARRAY) * num_elements);
+	if (!r_map->results) {
+		return NT_STATUS_NO_MEMORY;
+	}
+	memcpy(r_map->results, array, sizeof(EPM_TOWER_ARRAY) * num_elements);
+	r_map->status = status;
+	return NT_STATUS_OK;
+}
+
+/*************************************************************************
+ Inits a EPM_Q_MAP structure.
+**************************************************************************
+* We attempt to hide the ugliness of the wire format by taking a EPM_TOWER
+* array with a defined size 
+**************************************************************************/
+NTSTATUS init_epm_q_map(TALLOC_CTX *ctx, EPM_Q_MAP *q_map,
+			const EPM_TOWER *towers, int num_towers)
+{
+	static uint32 handle = 1;
+
+	ZERO_STRUCTP(q_map);
+
+	DEBUG(5, ("init_epm_q_map\n"));
+	q_map->handle.data[0] = (handle >>  0) & 0xFF;
+	q_map->handle.data[1] = (handle >>  8) & 0xFF;
+	q_map->handle.data[2] = (handle >> 16) & 0xFF;
+	q_map->handle.data[3] = (handle >> 24) & 0xFF;
+
+	q_map->tower = talloc(ctx, sizeof(EPM_TOWER) * (num_towers + 1));
+	if (!q_map->tower) {
+		return NT_STATUS_NO_MEMORY;
+	}
+
+	memcpy(q_map->tower, towers, sizeof(EPM_TOWER) * num_towers);
+
+	ZERO_STRUCT(q_map->tower[num_towers]);
+
+	/* For now let's not take more than 4 towers per result */
+	q_map->max_towers = num_towers * 4;
+
+	handle++;
+
+	return NT_STATUS_OK;
+}
+
+/*****************************************************************
+  epm_io_q_map - read or write EPM_Q_MAP structure
+******************************************************************/
+BOOL epm_io_q_map(char *desc, EPM_Q_MAP *io_map, prs_struct *ps, int depth)
+{
+	prs_debug(ps, depth, desc, "epm_io_q_map");
+	depth++;
+	
+	if (!epm_io_handle("handle", &io_map->handle, ps, depth))
+		return False;
+
+	/* HACK: We need a more elegant way of doing this */
+	if (UNMARSHALLING(ps)) {
+		io_map->tower = talloc(ps->mem_ctx, sizeof(EPM_TOWER));
+		if (!io_map->tower)
+			return False;
+	}		
+	if (!epm_io_tower("tower", io_map->tower, ps, depth))
+		return False;
+	if (!epm_io_handle("term_handle", &io_map->term_handle, ps, depth))
+		return False;
+
+	if (!prs_uint32("max_towers", ps, 0, &io_map->max_towers))
+		return False;
+
+	return True;
+}
+
+/*******************************************************************
+  epm_io_r_map - Read/Write EPM_R_MAP structure
+******************************************************************/
+BOOL epm_io_r_map(char *desc, EPM_R_MAP *io_map,
+		  prs_struct *ps, int depth)
+{
+	int i;
+
+	prs_debug(ps, depth, desc, "epm_io_r_map");
+	depth++;
+
+	if (!epm_io_handle("handle", &io_map->handle, ps, depth))
+		return False;
+	if (!prs_uint32("num_results", ps, depth, &io_map->num_results))
+		return False;
+
+	if (UNMARSHALLING(ps)) {
+		io_map->results = talloc(ps->mem_ctx,
+					 sizeof(EPM_TOWER_ARRAY) * 
+					 io_map->num_results);
+		if (!io_map->results)
+			return False;
+	}
+	for (i = 0; i < io_map->num_results; i++) {
+		if (!epm_io_tower_array("results", io_map->results + i,
+					ps, depth))
+			return False;
+	}
+
+	if (!prs_uint32("status", ps, depth, &io_map->status))
+		return False;
+
+	return True;
+}