Fix some type-punned warnings
[samba.git] / source3 / winbindd / winbindd_wins.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    Winbind daemon - WINS related functions
5
6    Copyright (C) Andrew Tridgell 1999
7    Copyright (C) Herb Lewis 2002
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 */
22
23 #include "includes.h"
24 #include "winbindd.h"
25
26 #undef DBGC_CLASS
27 #define DBGC_CLASS DBGC_WINBIND
28
29 /* Use our own create socket code so we don't recurse.... */
30
31 static int wins_lookup_open_socket_in(void)
32 {
33         struct sockaddr_in sock;
34         int val=1;
35         int res;
36
37         memset((char *)&sock,'\0',sizeof(sock));
38
39 #ifdef HAVE_SOCK_SIN_LEN
40         sock.sin_len = sizeof(sock);
41 #endif
42         sock.sin_port = 0;
43         sock.sin_family = AF_INET;
44         sock.sin_addr.s_addr = interpret_addr("0.0.0.0");
45         res = socket(AF_INET, SOCK_DGRAM, 0);
46         if (res == -1)
47                 return -1;
48
49         if (setsockopt(res,SOL_SOCKET,SO_REUSEADDR,(char *)&val,sizeof(val))) {
50                 close(res);
51                 return -1;
52         }
53 #ifdef SO_REUSEPORT
54         if (setsockopt(res,SOL_SOCKET,SO_REUSEPORT,(char *)&val,sizeof(val))) {
55                 close(res);
56                 return -1;
57         }
58 #endif /* SO_REUSEPORT */
59
60         /* now we've got a socket - we need to bind it */
61
62         if (bind(res, (struct sockaddr *)(void *)&sock, sizeof(sock)) < 0) {
63                 close(res);
64                 return(-1);
65         }
66
67         set_socket_options(res,"SO_BROADCAST");
68
69         return res;
70 }
71
72
73 static NODE_STATUS_STRUCT *lookup_byaddr_backend(const char *addr, int *count)
74 {
75         int fd;
76         struct sockaddr_storage ss;
77         struct nmb_name nname;
78         NODE_STATUS_STRUCT *status;
79
80         fd = wins_lookup_open_socket_in();
81         if (fd == -1)
82                 return NULL;
83
84         make_nmb_name(&nname, "*", 0);
85         if (!interpret_string_addr(&ss, addr, AI_NUMERICHOST)) {
86                 return NULL;
87         }
88         status = node_status_query(fd, &nname, &ss, count, NULL);
89
90         close(fd);
91         return status;
92 }
93
94 static struct sockaddr_storage *lookup_byname_backend(const char *name,
95                                         int *count)
96 {
97         int fd;
98         struct ip_service *ret = NULL;
99         struct sockaddr_storage *return_ss = NULL;
100         int j, i, flags = 0;
101
102         *count = 0;
103
104         /* always try with wins first */
105         if (NT_STATUS_IS_OK(resolve_wins(name,0x20,&ret,count))) {
106                 if ( *count == 0 )
107                         return NULL;
108                 if ( (return_ss = SMB_MALLOC_ARRAY(struct sockaddr_storage, *count)) == NULL ) {
109                         free( ret );
110                         return NULL;
111                 }
112
113                 /* copy the IP addresses */
114                 for ( i=0; i<(*count); i++ )
115                         return_ss[i] = ret[i].ss;
116
117                 free( ret );
118                 return return_ss;
119         }
120
121         fd = wins_lookup_open_socket_in();
122         if (fd == -1) {
123                 return NULL;
124         }
125
126         /* uggh, we have to broadcast to each interface in turn */
127         for (j=iface_count() - 1;
128              j >= 0;
129              j--) {
130                 const struct sockaddr_storage *bcast_ss = iface_n_bcast(j);
131                 if (!bcast_ss) {
132                         continue;
133                 }
134                 return_ss = name_query(fd,name,0x20,True,True,bcast_ss,count, &flags, NULL);
135                 if (return_ss) {
136                         break;
137                 }
138         }
139
140         close(fd);
141         return return_ss;
142 }
143
144 /* Get hostname from IP  */
145
146 void winbindd_wins_byip(struct winbindd_cli_state *state)
147 {
148         fstring response;
149         int i, count, maxlen, size;
150         NODE_STATUS_STRUCT *status;
151
152         /* Ensure null termination */
153         state->request.data.winsreq[sizeof(state->request.data.winsreq)-1]='\0';
154
155         DEBUG(3, ("[%5lu]: wins_byip %s\n", (unsigned long)state->pid,
156                 state->request.data.winsreq));
157
158         *response = '\0';
159         maxlen = sizeof(response) - 1;
160
161         if ((status = lookup_byaddr_backend(state->request.data.winsreq, &count))){
162             size = strlen(state->request.data.winsreq);
163             if (size > maxlen) {
164                 SAFE_FREE(status);
165                 request_error(state);
166                 return;
167             }
168             fstrcat(response,state->request.data.winsreq);
169             fstrcat(response,"\t");
170             for (i = 0; i < count; i++) {
171                 /* ignore group names */
172                 if (status[i].flags & 0x80) continue;
173                 if (status[i].type == 0x20) {
174                         size = sizeof(status[i].name) + strlen(response);
175                         if (size > maxlen) {
176                             SAFE_FREE(status);
177                             request_error(state);
178                             return;
179                         }
180                         fstrcat(response, status[i].name);
181                         fstrcat(response, " ");
182                 }
183             }
184             /* make last character a newline */
185             response[strlen(response)-1] = '\n';
186             SAFE_FREE(status);
187         }
188         fstrcpy(state->response.data.winsresp,response);
189         request_ok(state);
190 }
191
192 /* Get IP from hostname */
193
194 void winbindd_wins_byname(struct winbindd_cli_state *state)
195 {
196         struct sockaddr_storage *ip_list = NULL;
197         int i, count, maxlen, size;
198         fstring response;
199         char addr[INET6_ADDRSTRLEN];
200
201         /* Ensure null termination */
202         state->request.data.winsreq[sizeof(state->request.data.winsreq)-1]='\0';
203
204         DEBUG(3, ("[%5lu]: wins_byname %s\n", (unsigned long)state->pid,
205                 state->request.data.winsreq));
206
207         *response = '\0';
208         maxlen = sizeof(response) - 1;
209
210         if ((ip_list = lookup_byname_backend(state->request.data.winsreq,&count))){
211                 for (i = count; i ; i--) {
212                         print_sockaddr(addr, sizeof(addr), &ip_list[i-1]);
213                         size = strlen(addr);
214                         if (size > maxlen) {
215                                 SAFE_FREE(ip_list);
216                                 request_error(state);
217                                 return;
218                         }
219                         if (i != 0) {
220                                 /* Clear out the newline character */
221                                 /* But only if there is something in there,
222                                 otherwise we clobber something in the stack */
223                                 if (strlen(response)) {
224                                         response[strlen(response)-1] = ' ';
225                                 }
226                         }
227                         fstrcat(response,addr);
228                         fstrcat(response,"\t");
229                 }
230                 size = strlen(state->request.data.winsreq) + strlen(response);
231                 if (size > maxlen) {
232                     SAFE_FREE(ip_list);
233                     request_error(state);
234                     return;
235                 }
236                 fstrcat(response,state->request.data.winsreq);
237                 fstrcat(response,"\n");
238                 SAFE_FREE(ip_list);
239         } else {
240                 request_error(state);
241                 return;
242         }
243
244         fstrcpy(state->response.data.winsresp,response);
245
246         request_ok(state);
247 }