s4-loadparm: 2nd half of lp_ to lpcfg_ conversion
[sfrench/samba-autobuild/.git] / source4 / torture / rpc / scanner.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    scanner for rpc calls
5
6    Copyright (C) Andrew Tridgell 2003
7    
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 3 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
20 */
21
22 #include "includes.h"
23 #include "librpc/gen_ndr/ndr_mgmt_c.h"
24 #include "librpc/ndr/ndr_table.h"
25 #include "torture/rpc/torture_rpc.h"
26 #include "param/param.h"
27
28 /*
29   work out how many calls there are for an interface
30  */
31 static bool test_num_calls(struct torture_context *tctx, 
32                            const struct ndr_interface_table *iface,
33                            TALLOC_CTX *mem_ctx,
34                            struct ndr_syntax_id *id)
35 {
36         struct dcerpc_pipe *p;
37         NTSTATUS status;
38         int i;
39         DATA_BLOB stub_in, stub_out;
40         int idl_calls;
41         struct ndr_interface_table tbl;
42
43         /* FIXME: This should be fixed when torture_rpc_connection 
44          * takes a ndr_syntax_id */
45         tbl.name = iface->name;
46         tbl.syntax_id = *id;
47
48         status = torture_rpc_connection(tctx, &p, iface);
49         if (!NT_STATUS_IS_OK(status)) {
50                 char *uuid_str = GUID_string(mem_ctx, &id->uuid);
51                 printf("Failed to connect to '%s' on '%s' - %s\n", 
52                        uuid_str, iface->name, nt_errstr(status));
53                 talloc_free(uuid_str);
54                 return true;
55         }
56
57         /* make null calls */
58         stub_in = data_blob(NULL, 1000);
59         memset(stub_in.data, 0xFF, stub_in.length);
60
61         for (i=0;i<200;i++) {
62                 status = dcerpc_request(p, NULL, i, mem_ctx, &stub_in, &stub_out);
63                 if (NT_STATUS_EQUAL(status, NT_STATUS_RPC_PROCNUM_OUT_OF_RANGE)) {
64                         break;
65                 }
66
67                 if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED)) {
68                         printf("\tpipe disconnected at %d\n", i);
69                         goto done;
70                 }
71
72                 if (NT_STATUS_EQUAL(status, NT_STATUS_RPC_PROTOCOL_ERROR)) {
73                         printf("\tprotocol error at %d\n", i);
74                 }
75         }
76
77         printf("\t%d calls available\n", i);
78         idl_calls = ndr_interface_num_calls(&id->uuid, id->if_version);
79         if (idl_calls == -1) {
80                 printf("\tinterface not known in local IDL\n");
81         } else if (i != idl_calls) {
82                 printf("\tWARNING: local IDL defines %u calls\n", idl_calls);
83         } else {
84                 printf("\tOK: matches num_calls in local IDL\n");
85         }
86
87 done:
88         talloc_free(p);
89         return true;
90 }
91
92
93
94 bool torture_rpc_scanner(struct torture_context *torture)
95 {
96         NTSTATUS status;
97         struct dcerpc_pipe *p;
98         TALLOC_CTX *loop_ctx;
99         bool ret = true;
100         const struct ndr_interface_list *l;
101         struct dcerpc_binding *b;
102
103         status = torture_rpc_binding(torture, &b);
104         if (!NT_STATUS_IS_OK(status)) {
105                 return false;
106         }
107
108         for (l=ndr_table_list();l;l=l->next) {          
109                 loop_ctx = talloc_named(torture, 0, "torture_rpc_scanner loop context");
110                 /* some interfaces are not mappable */
111                 if (l->table->num_calls == 0 ||
112                     strcmp(l->table->name, "mgmt") == 0) {
113                         talloc_free(loop_ctx);
114                         continue;
115                 }
116
117                 printf("\nTesting pipe '%s'\n", l->table->name);
118
119                 if (b->transport == NCACN_IP_TCP) {
120                         status = dcerpc_epm_map_binding(torture, b, l->table, NULL, torture->lp_ctx);
121                         if (!NT_STATUS_IS_OK(status)) {
122                                 printf("Failed to map port for uuid %s\n", 
123                                            GUID_string(loop_ctx, &l->table->syntax_id.uuid));
124                                 talloc_free(loop_ctx);
125                                 continue;
126                         }
127                 } else {
128                         b->endpoint = talloc_strdup(b, l->table->name);
129                 }
130
131                 lpcfg_set_cmdline(torture->lp_ctx, "torture:binding", dcerpc_binding_string(torture, b));
132
133                 status = torture_rpc_connection(torture, &p, &ndr_table_mgmt);
134                 if (!NT_STATUS_IS_OK(status)) {
135                         talloc_free(loop_ctx);
136                         ret = false;
137                         continue;
138                 }
139         
140                 if (!test_inq_if_ids(torture, p->binding_handle, torture, test_num_calls, l->table)) {
141                         ret = false;
142                 }
143         }
144
145         return ret;
146 }
147