r6245: receive and parse the GETDC response in the NBT-DGRAM test. The test
[ira/wip.git] / source4 / torture / nbt / dgram.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    NBT dgram testing
5
6    Copyright (C) Andrew Tridgell 2005
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 2 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, write to the Free Software
20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 */
22
23 #include "includes.h"
24 #include "libcli/nbt/libnbt.h"
25 #include "libcli/dgram/libdgram.h"
26 #include "librpc/gen_ndr/ndr_nbt.h"
27 #include "lib/socket/socket.h"
28 #include "lib/events/events.h"
29
30 #define TEST_NAME "TORTURE_TEST"
31
32 /*
33   reply handler for netlogon request
34 */
35 static void netlogon_handler(struct dgram_mailslot_handler *dgmslot, 
36                              struct nbt_dgram_packet *packet, 
37                              const char *src_address, int src_port)
38 {
39         NTSTATUS status;
40         struct nbt_netlogon_packet netlogon;
41
42         printf("netlogon reply from %s:%d\n", src_address, src_port);
43
44         status = dgram_mailslot_netlogon_parse(dgmslot, dgmslot, packet, &netlogon);
45         if (!NT_STATUS_IS_OK(status)) {
46                 printf("Failed to parse netlogon packet from %s:%d\n",
47                        src_address, src_port);
48                 return;
49         }
50
51         NDR_PRINT_DEBUG(nbt_netlogon_packet, &netlogon);
52 }
53
54
55 /* test UDP/138 netlogon requests */
56 static BOOL nbt_test_netlogon(TALLOC_CTX *mem_ctx, 
57                               struct nbt_name name, const char *address)
58 {
59         struct dgram_mailslot_handler *dgmslot;
60         struct nbt_dgram_socket *dgmsock = nbt_dgram_socket_init(mem_ctx, NULL);
61         const char *myaddress = talloc_strdup(mem_ctx, iface_best_ip(address));
62         struct nbt_netlogon_packet logon;
63         struct nbt_name myname;
64         NTSTATUS status;
65         int timelimit = lp_parm_int(-1, "torture", "timelimit", 10);
66         struct timeval tv = timeval_current();
67
68         /* try receiving replies on port 138 first, which will only
69            work if we are root and smbd/nmbd are not running - fall
70            back to listening on any port, which means replies from
71            some windows versions won't be seen */
72         status = socket_listen(dgmsock->sock, myaddress, lp_dgram_port(), 0, 0);
73         if (!NT_STATUS_IS_OK(status)) {
74                 socket_listen(dgmsock->sock, myaddress, 0, 0, 0);
75         }
76
77         /* setup a temporary mailslot listener for replies */
78         dgmslot = dgram_mailslot_temp(dgmsock, "\\MAILSLOT\\NET\\GETDC", 
79                                       netlogon_handler, NULL);
80         
81
82         ZERO_STRUCT(logon);
83         logon.command = NETLOGON_QUERY_FOR_PDC;
84         logon.req.pdc.computer_name = TEST_NAME;
85         logon.req.pdc.mailslot_name = dgmslot->mailslot_name;
86         logon.req.pdc.unicode_name  = TEST_NAME;
87         logon.req.pdc.nt_version    = 1;
88         logon.req.pdc.lmnt_token    = 0xFFFF;
89         logon.req.pdc.lm20_token    = 0xFFFF;
90
91         myname.name = TEST_NAME;
92         myname.type = NBT_NAME_CLIENT;
93         myname.scope = NULL;
94
95         status = dgram_mailslot_netlogon_send(dgmsock, &name, address, &myname, &logon);
96         if (!NT_STATUS_IS_OK(status)) {
97                 printf("Failed to send netlogon request - %s\n", nt_errstr(status));
98                 goto failed;
99         }
100
101
102         while (timeval_elapsed(&tv) < timelimit) {
103                 event_loop_once(dgmsock->event_ctx);
104         }
105
106         talloc_free(dgmsock);
107         return True;
108
109 failed:
110         talloc_free(dgmsock);
111         return False;
112 }
113
114
115 /*
116   test nbt dgram operations
117 */
118 BOOL torture_nbt_dgram(void)
119 {
120         const char *address;
121         struct nbt_name name;
122         TALLOC_CTX *mem_ctx = talloc_new(NULL);
123         NTSTATUS status;
124         BOOL ret = True;
125         
126         name.name = lp_parm_string(-1, "torture", "host");
127         name.type = NBT_NAME_PDC;
128         name.scope = NULL;
129
130         /* do an initial name resolution to find its IP */
131         status = resolve_name(&name, mem_ctx, &address);
132         if (!NT_STATUS_IS_OK(status)) {
133                 printf("Failed to resolve %s - %s\n",
134                        name.name, nt_errstr(status));
135                 talloc_free(mem_ctx);
136                 return False;
137         }
138
139         ret &= nbt_test_netlogon(mem_ctx, name, address);
140
141         talloc_free(mem_ctx);
142
143         return ret;
144 }