r4559: prevent the RPC-EPMAPPER test from looping forever against w2k3
[samba.git] / source4 / torture / rpc / epmapper.c
index 24395e064cb405b456cdf0f0959a3abb27be667f..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_towers *twr)
+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;
-               struct epm_rhs *rhs = &twr->floors[i].rhs;
-               switch (lhs->protocol) {
+               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) {
@@ -43,54 +46,76 @@ static void display_tower(TALLOC_CTX *mem_ctx, struct epm_towers *twr)
                        }
                        break;
 
-               case EPM_PROTOCOL_RPC_C:
+               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:");
-                       if (rhs->rhs_data.length == 4) {
-                               struct in_addr in;
-                               in.s_addr = IVAL(rhs->rhs_data.data, 0);
-                               printf("%s", inet_ntoa(in));
+                       {
+                               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->rhs_data.length, rhs->rhs_data.data);
+                       printf(" PIPE:%s", rhs->pipe.path);
                        break;
 
                case EPM_PROTOCOL_SMB:
-                       printf(" SMB:%.*s", rhs->rhs_data.length, rhs->rhs_data.data);
+                       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->rhs_data.length, rhs->rhs_data.data);
+                       printf(" NetBIOS:%s", rhs->netbios.name);
+                       break;
+
+               case EPM_PROTOCOL_NETBEUI:
+                       printf(" NETBeui");
+                       break;
+
+               case EPM_PROTOCOL_SPX:
+                       printf(" SPX");
                        break;
 
-               case 0x01:
-                       printf(" UNK(1):%.*s", rhs->rhs_data.length, rhs->rhs_data.data);
+               case EPM_PROTOCOL_NB_IPX:
+                       printf(" NB_IPX");
                        break;
 
                case EPM_PROTOCOL_HTTP:
-                       printf(" HTTP:");
-                       if (rhs->rhs_data.length == 2) {
-                               printf("%d", RSVAL(rhs->rhs_data.data, 0));
-                       }
+                       printf(" HTTP:%d", rhs->http.port);
                        break;
 
                case EPM_PROTOCOL_TCP:
                        /* what is the difference between this and 0x1f? */
-                       printf(" TCP:");
-                       if (rhs->rhs_data.length == 2) {
-                               printf("%d", RSVAL(rhs->rhs_data.data, 0));
-                       }
+                       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->rhs_data.length == 2) {
-                               printf("%d", RSVAL(rhs->rhs_data.data, 0));
+                       if (rhs->unknown.length == 2) {
+                               printf("%d", RSVAL(rhs->unknown.data, 0));
                        }
                        break;
                }
@@ -118,66 +143,76 @@ static BOOL test_Map(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx,
        r.out.entry_handle = &handle;
        r.in.max_towers = 100;
 
-       if (twr->towers.num_floors != 5) {
-               printf(" tower has %d floors - skipping test_Map\n", twr->towers.num_floors);
-               return True;
-       }
-
-       uuid_str = GUID_string(mem_ctx, &twr->towers.floors[0].lhs.info.uuid.uuid);
+       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->towers.floors[0].lhs.info.uuid.version));
+              idl_pipe_name(uuid_str, twr->tower.floors[0].lhs.info.uuid.version));
 
-       twr->towers.floors[2].lhs.protocol = EPM_PROTOCOL_RPC_C;
-       twr->towers.floors[2].lhs.info.lhs_data = data_blob(NULL, 0);
-       twr->towers.floors[2].rhs.rhs_data = data_blob_talloc_zero(p->mem_ctx, 2);
+       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->towers.floors[3].lhs.protocol = EPM_PROTOCOL_TCP;
-       twr->towers.floors[3].lhs.info.lhs_data = data_blob(NULL, 0);
-       twr->towers.floors[3].rhs.rhs_data = data_blob_talloc_zero(p->mem_ctx, 2);
+       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->towers.floors[4].lhs.protocol = EPM_PROTOCOL_IP;
-       twr->towers.floors[4].lhs.info.lhs_data = data_blob(NULL, 0);
-       twr->towers.floors[4].rhs.rhs_data = data_blob_talloc_zero(p->mem_ctx, 4);
+       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.status == 0) {
+       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->towers);
+                               display_tower(mem_ctx, &r.out.towers[i].twr->tower);
                        }
                }
        }
 
-       twr->towers.floors[3].lhs.protocol = EPM_PROTOCOL_HTTP;
-       twr->towers.floors[3].lhs.info.lhs_data = data_blob(NULL, 0);
-       twr->towers.floors[3].rhs.rhs_data = data_blob_talloc_zero(p->mem_ctx, 2);
+       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.status == 0) {
+       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->towers);
+                               display_tower(mem_ctx, &r.out.towers[i].twr->tower);
                        }
                }
        }
 
-       twr->towers.floors[3].lhs.protocol = EPM_PROTOCOL_SMB;
-       twr->towers.floors[3].lhs.info.lhs_data = data_blob(NULL, 0);
-       twr->towers.floors[3].rhs.rhs_data = data_blob_talloc_zero(p->mem_ctx, 2);
+       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;
 
-       twr->towers.floors[4].lhs.protocol = EPM_PROTOCOL_NETBIOS;
-       twr->towers.floors[4].lhs.info.lhs_data = data_blob(NULL, 0);
-       twr->towers.floors[4].rhs.rhs_data = data_blob_talloc_zero(p->mem_ctx, 2);
+       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.status == 0) {
+       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->towers);
+                               display_tower(mem_ctx, &r.out.towers[i].twr->tower);
                        }
                }
        }
+
+       /* FIXME: Extend to do other protocols as well (ncacn_unix_stream, ncalrpc) */
        
        return True;
 }
@@ -190,8 +225,6 @@ static BOOL test_Lookup(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx)
        struct rpc_if_id_t iface;
        struct policy_handle handle;
 
-       ZERO_STRUCT(uuid);
-       ZERO_STRUCT(iface);
        ZERO_STRUCT(handle);
 
        r.in.inquiry_type = 0;
@@ -204,18 +237,29 @@ static BOOL test_Lookup(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx)
 
        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) {
+               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->towers);
-                       test_Map(p, mem_ctx, r.out.entries[i].tower);
+                       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 && 
-                r.out.num_ents == r.in.max_ents);
+                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));
@@ -226,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;
@@ -247,9 +308,13 @@ BOOL torture_rpc_epmapper(int dummy)
                ret = False;
        }
 
+       if (!test_InqObject(p, mem_ctx)) {
+               ret = False;
+       }
+
        talloc_destroy(mem_ctx);
 
-        torture_rpc_close(p);
+       torture_rpc_close(p);
 
        return ret;
 }