r26401: Don't cache interfaces context in libnetif.
[samba.git] / source4 / libcli / resolve / nbtlist.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    nbt list of addresses name resolution module
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 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 /*
23   TODO: we should lower the timeout, and add retries for each name
24 */
25
26 #include "includes.h"
27 #include "libcli/composite/composite.h"
28 #include "system/network.h"
29 #include "lib/socket/netif.h"
30 #include "librpc/gen_ndr/ndr_nbt.h"
31 #include "libcli/nbt/libnbt.h"
32 #include "param/param.h"
33
34 struct nbtlist_state {
35         struct nbt_name name;
36         struct nbt_name_socket *nbtsock;
37         int num_queries;
38         struct nbt_name_request **queries;
39         struct nbt_name_query *io_queries;
40         const char *reply_addr;
41 };
42
43 /*
44   handle events during nbtlist name resolution
45 */
46 static void nbtlist_handler(struct nbt_name_request *req)
47 {
48         struct composite_context *c = talloc_get_type(req->async.private, 
49                                                       struct composite_context);
50         struct nbtlist_state *state = talloc_get_type(c->private_data, struct nbtlist_state);
51         struct nbt_name_query *q;
52         struct interface *ifaces;
53         int i;
54
55         for (i=0;i<state->num_queries;i++) {
56                 if (req == state->queries[i]) break;
57         }
58
59         if (i == state->num_queries) {
60                 /* not for us?! */
61                 composite_error(c, NT_STATUS_INTERNAL_ERROR);
62                 return;
63         }
64
65         q = &state->io_queries[i];
66
67         c->status = nbt_name_query_recv(req, state, q);
68
69         /* free the network resource directly */
70         talloc_free(state->nbtsock);
71         if (!composite_is_ok(c)) return;
72
73         if (state->io_queries[i].out.num_addrs < 1) {
74                 composite_error(c, NT_STATUS_UNEXPECTED_NETWORK_ERROR);
75                 return;
76         }
77
78         /* favor a local address if possible */
79         load_interfaces(lp_interfaces(global_loadparm), &ifaces);
80         state->reply_addr = NULL;
81         for (i=0;i<q->out.num_addrs;i++) {
82                 if (iface_is_local(ifaces, q->out.reply_addrs[i])) {
83                         state->reply_addr = talloc_steal(state, 
84                                                          q->out.reply_addrs[i]);
85                         break;
86                 }
87         }
88
89         if (state->reply_addr == NULL) {
90                 state->reply_addr = talloc_steal(state, 
91                                                  q->out.reply_addrs[0]);
92         }
93
94         composite_done(c);
95 }
96
97 /*
98   nbtlist name resolution method - async send
99  */
100 struct composite_context *resolve_name_nbtlist_send(TALLOC_CTX *mem_ctx,
101                                                     struct event_context *event_ctx,
102                                                     struct nbt_name *name, 
103                                                     const char **address_list,
104                                                     bool broadcast,
105                                                     bool wins_lookup)
106 {
107         struct composite_context *c;
108         struct nbtlist_state *state;
109         int i;
110
111         c = composite_create(event_ctx, event_ctx);
112         if (c == NULL) return NULL;
113
114         c->event_ctx = talloc_reference(c, event_ctx);
115         if (composite_nomem(c->event_ctx, c)) return c;
116
117         state = talloc(c, struct nbtlist_state);
118         if (composite_nomem(state, c)) return c;
119         c->private_data = state;
120
121         c->status = nbt_name_dup(state, name, &state->name);
122         if (!composite_is_ok(c)) return c;
123
124         state->name.name = strupper_talloc(state, state->name.name);
125         if (composite_nomem(state->name.name, c)) return c;
126         if (state->name.scope) {
127                 state->name.scope = strupper_talloc(state, state->name.scope);
128                 if (composite_nomem(state->name.scope, c)) return c;
129         }
130
131         /*
132          * we can't push long names on the wire,
133          * so bail out here to give a useful error message
134          */
135         if (strlen(state->name.name) > 15) {
136                 composite_error(c, NT_STATUS_OBJECT_NAME_NOT_FOUND);
137                 return c;
138         }
139
140         state->nbtsock = nbt_name_socket_init(state, event_ctx);
141         if (composite_nomem(state->nbtsock, c)) return c;
142
143         /* count the address_list size */
144         for (i=0;address_list[i];i++) /* noop */ ;
145
146         state->num_queries = i;
147         state->io_queries = talloc_array(state, struct nbt_name_query, state->num_queries);
148         if (composite_nomem(state->io_queries, c)) return c;
149
150         state->queries = talloc_array(state, struct nbt_name_request *, state->num_queries);
151         if (composite_nomem(state->queries, c)) return c;
152
153         for (i=0;i<state->num_queries;i++) {
154                 state->io_queries[i].in.name        = state->name;
155                 state->io_queries[i].in.dest_addr   = talloc_strdup(state->io_queries, address_list[i]);
156                 state->io_queries[i].in.dest_port   = lp_nbt_port(global_loadparm);
157                 if (composite_nomem(state->io_queries[i].in.dest_addr, c)) return c;
158
159                 state->io_queries[i].in.broadcast   = broadcast;
160                 state->io_queries[i].in.wins_lookup = wins_lookup;
161                 state->io_queries[i].in.timeout     = lp_parm_int(global_loadparm, NULL, "nbt", "timeout", 1);
162                 state->io_queries[i].in.retries     = 2;
163
164                 state->queries[i] = nbt_name_query_send(state->nbtsock, &state->io_queries[i]);
165                 if (composite_nomem(state->queries[i], c)) return c;
166
167                 state->queries[i]->async.fn      = nbtlist_handler;
168                 state->queries[i]->async.private = c;
169         }
170
171         return c;
172 }
173
174 /*
175   nbt list of addresses name resolution method - recv side
176  */
177 NTSTATUS resolve_name_nbtlist_recv(struct composite_context *c, 
178                                    TALLOC_CTX *mem_ctx, const char **reply_addr)
179 {
180         NTSTATUS status;
181
182         status = composite_wait(c);
183
184         if (NT_STATUS_IS_OK(status)) {
185                 struct nbtlist_state *state = talloc_get_type(c->private_data, struct nbtlist_state);
186                 *reply_addr = talloc_steal(mem_ctx, state->reply_addr);
187         }
188
189         talloc_free(c);
190         return status;
191 }
192
193 /*
194   nbt list of addresses name resolution method - sync call
195  */
196 NTSTATUS resolve_name_nbtlist(struct nbt_name *name, 
197                               TALLOC_CTX *mem_ctx,
198                               const char **address_list,
199                               bool broadcast, bool wins_lookup,
200                               const char **reply_addr)
201 {
202         struct composite_context *c = resolve_name_nbtlist_send(mem_ctx, NULL, name, address_list, 
203                                                                 broadcast, wins_lookup);
204         return resolve_name_nbtlist_recv(c, mem_ctx, reply_addr);
205 }
206