r4559: prevent the RPC-EPMAPPER test from looping forever against w2k3
[samba.git] / source4 / torture / rpc / epmapper.c
index f00d52f1a592604e1c1451df56403d78f919b9c5..b649c6d377a95c2796abb04663c55bdda92c8e34 100644 (file)
 */
 
 #include "includes.h"
+#include "system/network.h"
+#include "librpc/gen_ndr/ndr_epmapper.h"
 
 
+/*
+  display any protocol tower
+ */
+static void display_tower(TALLOC_CTX *mem_ctx, struct epm_tower *twr)
+{
+       int i;
+       const char *uuid;
+
+       for (i=0;i<twr->num_floors;i++) {
+               struct epm_lhs *lhs = &twr->floors[i].lhs;
+               union epm_rhs *rhs = &twr->floors[i].rhs;
+
+               switch(lhs->protocol) {
+               case EPM_PROTOCOL_UUID:
+                       uuid = GUID_string(mem_ctx, &lhs->info.uuid.uuid);
+                       if (strcasecmp(uuid, NDR_GUID) == 0) {
+                               printf(" NDR");
+                       } else {
+                               printf(" uuid %s/0x%02x", uuid, lhs->info.uuid.version);
+                       }
+                       break;
+
+               case EPM_PROTOCOL_NCACN:
+                       printf(" RPC-C");
+                       break;
+
+               case EPM_PROTOCOL_NCADG:
+                       printf(" RPC");
+                       break;
+
+               case EPM_PROTOCOL_NCALRPC:
+                       printf(" NCALRPC");
+                       break;
+
+               case EPM_PROTOCOL_DNET_NSP:
+                       printf(" DNET/NSP");
+                       break;
+
+               case EPM_PROTOCOL_IP:
+                       printf(" IP:");
+                       {
+                               struct ipv4_addr in;
+                               in.addr = htonl(rhs->ip.address);
+                               printf("%s", sys_inet_ntoa(in));
+                       }
+                       break;
+
+               case EPM_PROTOCOL_PIPE:
+                       printf(" PIPE:%s", rhs->pipe.path);
+                       break;
+
+               case EPM_PROTOCOL_SMB:
+                       printf(" SMB:%s", rhs->smb.unc);
+                       break;
+
+               case EPM_PROTOCOL_UNIX_DS:
+                       printf(" Unix:%s", rhs->unix_ds.path);
+                       break;
+
+               case EPM_PROTOCOL_NETBIOS:
+                       printf(" NetBIOS:%s", rhs->netbios.name);
+                       break;
+
+               case EPM_PROTOCOL_NETBEUI:
+                       printf(" NETBeui");
+                       break;
+
+               case EPM_PROTOCOL_SPX:
+                       printf(" SPX");
+                       break;
+
+               case EPM_PROTOCOL_NB_IPX:
+                       printf(" NB_IPX");
+                       break;
+
+               case EPM_PROTOCOL_HTTP:
+                       printf(" HTTP:%d", rhs->http.port);
+                       break;
+
+               case EPM_PROTOCOL_TCP:
+                       /* what is the difference between this and 0x1f? */
+                       printf(" TCP:%d", rhs->tcp.port);
+                       break;
+
+               case EPM_PROTOCOL_UDP:
+                       printf(" UDP:%d", rhs->udp.port);
+                       break;
+
+               default:
+                       printf(" UNK(%02x):", lhs->protocol);
+                       if (rhs->unknown.length == 2) {
+                               printf("%d", RSVAL(rhs->unknown.data, 0));
+                       }
+                       break;
+               }
+       }
+       printf("\n");
+}
+
+
+static BOOL test_Map(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx,
+                    struct epm_twr_t *twr)
+{
+       NTSTATUS status;
+       struct epm_Map r;
+       struct GUID uuid;
+       const char *uuid_str;
+       struct policy_handle handle;
+       int i;
+
+       ZERO_STRUCT(uuid);
+       ZERO_STRUCT(handle);
+
+       r.in.object = &uuid;
+       r.in.map_tower = twr;
+       r.in.entry_handle = &handle;    
+       r.out.entry_handle = &handle;
+       r.in.max_towers = 100;
+
+       uuid_str = GUID_string(mem_ctx, &twr->tower.floors[0].lhs.info.uuid.uuid);
+
+       printf("epm_Map results for '%s':\n", 
+              idl_pipe_name(uuid_str, twr->tower.floors[0].lhs.info.uuid.version));
+
+       twr->tower.floors[2].lhs.protocol = EPM_PROTOCOL_NCACN;
+       twr->tower.floors[2].lhs.info.lhs_data = data_blob(NULL, 0);
+       twr->tower.floors[2].rhs.ncacn.minor_version = 0;
+
+       twr->tower.floors[3].lhs.protocol = EPM_PROTOCOL_TCP;
+       twr->tower.floors[3].lhs.info.lhs_data = data_blob(NULL, 0);
+       twr->tower.floors[3].rhs.tcp.port = 0;
+
+       twr->tower.floors[4].lhs.protocol = EPM_PROTOCOL_IP;
+       twr->tower.floors[4].lhs.info.lhs_data = data_blob(NULL, 0);
+       twr->tower.floors[4].rhs.ip.address = 0;
+
+       status = dcerpc_epm_Map(p, mem_ctx, &r);
+       if (NT_STATUS_IS_OK(status) && r.out.result == 0) {
+               for (i=0;i<r.out.num_towers;i++) {
+                       if (r.out.towers[i].twr) {
+                               display_tower(mem_ctx, &r.out.towers[i].twr->tower);
+                       }
+               }
+       }
+
+       twr->tower.floors[3].lhs.protocol = EPM_PROTOCOL_HTTP;
+       twr->tower.floors[3].lhs.info.lhs_data = data_blob(NULL, 0);
+       twr->tower.floors[3].rhs.http.port = 0;
+
+       status = dcerpc_epm_Map(p, mem_ctx, &r);
+       if (NT_STATUS_IS_OK(status) && r.out.result == 0) {
+               for (i=0;i<r.out.num_towers;i++) {
+                       if (r.out.towers[i].twr) {
+                               display_tower(mem_ctx, &r.out.towers[i].twr->tower);
+                       }
+               }
+       }
+
+       twr->tower.floors[3].lhs.protocol = EPM_PROTOCOL_UDP;
+       twr->tower.floors[3].lhs.info.lhs_data = data_blob(NULL, 0);
+       twr->tower.floors[3].rhs.http.port = 0;
+
+       status = dcerpc_epm_Map(p, mem_ctx, &r);
+       if (NT_STATUS_IS_OK(status) && r.out.result == 0) {
+               for (i=0;i<r.out.num_towers;i++) {
+                       if (r.out.towers[i].twr) {
+                               display_tower(mem_ctx, &r.out.towers[i].twr->tower);
+                       }
+               }
+       }
+
+       twr->tower.floors[3].lhs.protocol = EPM_PROTOCOL_SMB;
+       twr->tower.floors[3].lhs.info.lhs_data = data_blob(NULL, 0);
+       twr->tower.floors[3].rhs.smb.unc = "";
+
+       twr->tower.floors[4].lhs.protocol = EPM_PROTOCOL_NETBIOS;
+       twr->tower.floors[4].lhs.info.lhs_data = data_blob(NULL, 0);
+       twr->tower.floors[4].rhs.netbios.name = "";
+
+       status = dcerpc_epm_Map(p, mem_ctx, &r);
+       if (NT_STATUS_IS_OK(status) && r.out.result == 0) {
+               for (i=0;i<r.out.num_towers;i++) {
+                       if (r.out.towers[i].twr) {
+                               display_tower(mem_ctx, &r.out.towers[i].twr->tower);
+                       }
+               }
+       }
+
+       /* FIXME: Extend to do other protocols as well (ncacn_unix_stream, ncalrpc) */
+       
+       return True;
+}
+
 static BOOL test_Lookup(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx)
 {
        NTSTATUS status;
@@ -29,10 +224,7 @@ static BOOL test_Lookup(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx)
        struct GUID uuid;
        struct rpc_if_id_t iface;
        struct policy_handle handle;
-       int i;
 
-       ZERO_STRUCT(uuid);
-       ZERO_STRUCT(iface);
        ZERO_STRUCT(handle);
 
        r.in.inquiry_type = 0;
@@ -41,20 +233,33 @@ static BOOL test_Lookup(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx)
        r.in.vers_option = 0;
        r.in.entry_handle = &handle;
        r.out.entry_handle = &handle;
-       r.in.max_ents = 1;
+       r.in.max_ents = 10;
 
        do {
+               int i;
+
+               ZERO_STRUCT(uuid);
+               ZERO_STRUCT(iface);
+
                status = dcerpc_epm_Lookup(p, mem_ctx, &r);
-               if (NT_STATUS_IS_OK(status) && r.out.status == 0) {
-                       printf("Found '%s'\n", r.out.entries[0].annotation);
-                       for (i=0;i<r.out.entries[0].tower->towers.num_floors;i++) {
-                               struct epm_lhs *lhs = &r.out.entries[0].tower->towers.floors[i].lhs;
-                               if (lhs->protocol == 13) {
-                                       NDR_PRINT_DEBUG(epm_prot_uuid, &lhs->info.uuid);
-                               }
+               if (!NT_STATUS_IS_OK(status) || r.out.result != 0) {
+                       break;
+               }
+
+               printf("epm_Lookup returned %d events GUID %s\n", 
+                      r.out.num_ents, GUID_string(mem_ctx, &handle.uuid));
+
+               for (i=0;i<r.out.num_ents;i++) {
+                       printf("\nFound '%s'\n", r.out.entries[i].annotation);
+                       display_tower(mem_ctx, &r.out.entries[i].tower->tower);
+                       if (r.out.entries[i].tower->tower.num_floors == 5) {
+                               test_Map(p, mem_ctx, r.out.entries[i].tower);
                        }
                }
-       } while (NT_STATUS_IS_OK(status) && r.out.status == 0);
+       } while (NT_STATUS_IS_OK(status) && 
+                r.out.result == 0 && 
+                r.out.num_ents == r.in.max_ents &&
+                !policy_handle_empty(&handle));
 
        if (!NT_STATUS_IS_OK(status)) {
                printf("Lookup failed - %s\n", nt_errstr(status));
@@ -65,7 +270,24 @@ static BOOL test_Lookup(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx)
        return True;
 }
 
-BOOL torture_rpc_epmapper(int dummy)
+static BOOL test_InqObject(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx)
+{
+       NTSTATUS status;
+       struct epm_InqObject r;
+
+       r.in.epm_object = talloc_p(mem_ctx, struct GUID);
+       GUID_from_string(DCERPC_EPMAPPER_UUID, r.in.epm_object);
+
+       status = dcerpc_epm_InqObject(p, mem_ctx, &r);
+       if (NT_STATUS_IS_ERR(status)) {
+               printf("InqObject failed - %s\n", nt_errstr(status));
+               return False;
+       }
+
+       return True;
+}
+
+BOOL torture_rpc_epmapper(void)
 {
         NTSTATUS status;
         struct dcerpc_pipe *p;
@@ -81,14 +303,18 @@ BOOL torture_rpc_epmapper(int dummy)
        if (!NT_STATUS_IS_OK(status)) {
                return False;
        }
-       
-       p->flags |= DCERPC_DEBUG_PRINT_BOTH;
 
        if (!test_Lookup(p, mem_ctx)) {
                ret = False;
        }
 
-        torture_rpc_close(p);
+       if (!test_InqObject(p, mem_ctx)) {
+               ret = False;
+       }
+
+       talloc_destroy(mem_ctx);
+
+       torture_rpc_close(p);
 
        return ret;
 }