source: branches/3.2/mindi-busybox/libbb/xconnect.c @ 3232

Last change on this file since 3232 was 3232, checked in by bruno, 5 years ago
  • Update mindi-busybox to 1.21.1
File size: 12.4 KB
Line 
1/* vi: set sw=4 ts=4: */
2/*
3 * Utility routines.
4 *
5 * Connect to host at port using address resolution from getaddrinfo
6 *
7 * Licensed under GPLv2, see file LICENSE in this source tree.
8 */
9
10#include <sys/types.h>
11#include <sys/socket.h> /* netinet/in.h needs it */
12#include <netinet/in.h>
13#include <net/if.h>
14#include <sys/un.h>
15#include "libbb.h"
16
17void FAST_FUNC setsockopt_reuseaddr(int fd)
18{
19    setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &const_int_1, sizeof(const_int_1));
20}
21int FAST_FUNC setsockopt_broadcast(int fd)
22{
23    return setsockopt(fd, SOL_SOCKET, SO_BROADCAST, &const_int_1, sizeof(const_int_1));
24}
25
26#ifdef SO_BINDTODEVICE
27int FAST_FUNC setsockopt_bindtodevice(int fd, const char *iface)
28{
29    int r;
30    struct ifreq ifr;
31    strncpy_IFNAMSIZ(ifr.ifr_name, iface);
32    /* NB: passing (iface, strlen(iface) + 1) does not work!
33     * (maybe it works on _some_ kernels, but not on 2.6.26)
34     * Actually, ifr_name is at offset 0, and in practice
35     * just giving char[IFNAMSIZ] instead of struct ifreq works too.
36     * But just in case it's not true on some obscure arch... */
37    r = setsockopt(fd, SOL_SOCKET, SO_BINDTODEVICE, &ifr, sizeof(ifr));
38    if (r)
39        bb_perror_msg("can't bind to interface %s", iface);
40    return r;
41}
42#else
43int FAST_FUNC setsockopt_bindtodevice(int fd UNUSED_PARAM,
44        const char *iface UNUSED_PARAM)
45{
46    bb_error_msg("SO_BINDTODEVICE is not supported on this system");
47    return -1;
48}
49#endif
50
51static len_and_sockaddr* get_lsa(int fd, int (*get_name)(int fd, struct sockaddr *addr, socklen_t *addrlen))
52{
53    len_and_sockaddr lsa;
54    len_and_sockaddr *lsa_ptr;
55
56    lsa.len = LSA_SIZEOF_SA;
57    if (get_name(fd, &lsa.u.sa, &lsa.len) != 0)
58        return NULL;
59
60    lsa_ptr = xzalloc(LSA_LEN_SIZE + lsa.len);
61    if (lsa.len > LSA_SIZEOF_SA) { /* rarely (if ever) happens */
62        lsa_ptr->len = lsa.len;
63        get_name(fd, &lsa_ptr->u.sa, &lsa_ptr->len);
64    } else {
65        memcpy(lsa_ptr, &lsa, LSA_LEN_SIZE + lsa.len);
66    }
67    return lsa_ptr;
68}
69
70len_and_sockaddr* FAST_FUNC get_sock_lsa(int fd)
71{
72    return get_lsa(fd, getsockname);
73}
74
75len_and_sockaddr* FAST_FUNC get_peer_lsa(int fd)
76{
77    return get_lsa(fd, getpeername);
78}
79
80void FAST_FUNC xconnect(int s, const struct sockaddr *s_addr, socklen_t addrlen)
81{
82    if (connect(s, s_addr, addrlen) < 0) {
83        if (ENABLE_FEATURE_CLEAN_UP)
84            close(s);
85        if (s_addr->sa_family == AF_INET)
86            bb_perror_msg_and_die("%s (%s)",
87                "can't connect to remote host",
88                inet_ntoa(((struct sockaddr_in *)s_addr)->sin_addr));
89        bb_perror_msg_and_die("can't connect to remote host");
90    }
91}
92
93/* Return port number for a service.
94 * If "port" is a number use it as the port.
95 * If "port" is a name it is looked up in /etc/services,
96 * if it isnt found return default_port
97 */
98unsigned FAST_FUNC bb_lookup_port(const char *port, const char *protocol, unsigned default_port)
99{
100    unsigned port_nr = default_port;
101    if (port) {
102        int old_errno;
103
104        /* Since this is a lib function, we're not allowed to reset errno to 0.
105         * Doing so could break an app that is deferring checking of errno. */
106        old_errno = errno;
107        port_nr = bb_strtou(port, NULL, 10);
108        if (errno || port_nr > 65535) {
109            struct servent *tserv = getservbyname(port, protocol);
110            port_nr = default_port;
111            if (tserv)
112                port_nr = ntohs(tserv->s_port);
113        }
114        errno = old_errno;
115    }
116    return (uint16_t)port_nr;
117}
118
119
120/* "New" networking API */
121
122
123int FAST_FUNC get_nport(const struct sockaddr *sa)
124{
125#if ENABLE_FEATURE_IPV6
126    if (sa->sa_family == AF_INET6) {
127        return ((struct sockaddr_in6*)sa)->sin6_port;
128    }
129#endif
130    if (sa->sa_family == AF_INET) {
131        return ((struct sockaddr_in*)sa)->sin_port;
132    }
133    /* What? UNIX socket? IPX?? :) */
134    return -1;
135}
136
137void FAST_FUNC set_nport(struct sockaddr *sa, unsigned port)
138{
139#if ENABLE_FEATURE_IPV6
140    if (sa->sa_family == AF_INET6) {
141        struct sockaddr_in6 *sin6 = (void*) sa;
142        sin6->sin6_port = port;
143        return;
144    }
145#endif
146    if (sa->sa_family == AF_INET) {
147        struct sockaddr_in *sin = (void*) sa;
148        sin->sin_port = port;
149        return;
150    }
151    /* What? UNIX socket? IPX?? :) */
152}
153
154/* We hijack this constant to mean something else */
155/* It doesn't hurt because we will remove this bit anyway */
156#define DIE_ON_ERROR AI_CANONNAME
157
158/* host: "1.2.3.4[:port]", "www.google.com[:port]"
159 * port: if neither of above specifies port # */
160static len_and_sockaddr* str2sockaddr(
161        const char *host, int port,
162IF_FEATURE_IPV6(sa_family_t af,)
163        int ai_flags)
164{
165IF_NOT_FEATURE_IPV6(sa_family_t af = AF_INET;)
166    int rc;
167    len_and_sockaddr *r;
168    struct addrinfo *result = NULL;
169    struct addrinfo *used_res;
170    const char *org_host = host; /* only for error msg */
171    const char *cp;
172    struct addrinfo hint;
173
174    if (ENABLE_FEATURE_UNIX_LOCAL && strncmp(host, "local:", 6) == 0) {
175        struct sockaddr_un *sun;
176
177        r = xzalloc(LSA_LEN_SIZE + sizeof(struct sockaddr_un));
178        r->len = sizeof(struct sockaddr_un);
179        r->u.sa.sa_family = AF_UNIX;
180        sun = (struct sockaddr_un *)&r->u.sa;
181        safe_strncpy(sun->sun_path, host + 6, sizeof(sun->sun_path));
182        return r;
183    }
184
185    r = NULL;
186
187    /* Ugly parsing of host:addr */
188    if (ENABLE_FEATURE_IPV6 && host[0] == '[') {
189        /* Even uglier parsing of [xx]:nn */
190        host++;
191        cp = strchr(host, ']');
192        if (!cp || (cp[1] != ':' && cp[1] != '\0')) {
193            /* Malformed: must be [xx]:nn or [xx] */
194            bb_error_msg("bad address '%s'", org_host);
195            if (ai_flags & DIE_ON_ERROR)
196                xfunc_die();
197            return NULL;
198        }
199    } else {
200        cp = strrchr(host, ':');
201        if (ENABLE_FEATURE_IPV6 && cp && strchr(host, ':') != cp) {
202            /* There is more than one ':' (e.g. "::1") */
203            cp = NULL; /* it's not a port spec */
204        }
205    }
206    if (cp) { /* points to ":" or "]:" */
207        int sz = cp - host + 1;
208
209        host = safe_strncpy(alloca(sz), host, sz);
210        if (ENABLE_FEATURE_IPV6 && *cp != ':') {
211            cp++; /* skip ']' */
212            if (*cp == '\0') /* [xx] without port */
213                goto skip;
214        }
215        cp++; /* skip ':' */
216        port = bb_strtou(cp, NULL, 10);
217        if (errno || (unsigned)port > 0xffff) {
218            bb_error_msg("bad port spec '%s'", org_host);
219            if (ai_flags & DIE_ON_ERROR)
220                xfunc_die();
221            return NULL;
222        }
223 skip: ;
224    }
225
226    /* Next two if blocks allow to skip getaddrinfo()
227     * in case host name is a numeric IP(v6) address.
228     * getaddrinfo() initializes DNS resolution machinery,
229     * scans network config and such - tens of syscalls.
230     */
231    /* If we were not asked specifically for IPv6,
232     * check whether this is a numeric IPv4 */
233    IF_FEATURE_IPV6(if(af != AF_INET6)) {
234        struct in_addr in4;
235        if (inet_aton(host, &in4) != 0) {
236            r = xzalloc(LSA_LEN_SIZE + sizeof(struct sockaddr_in));
237            r->len = sizeof(struct sockaddr_in);
238            r->u.sa.sa_family = AF_INET;
239            r->u.sin.sin_addr = in4;
240            goto set_port;
241        }
242    }
243#if ENABLE_FEATURE_IPV6
244    /* If we were not asked specifically for IPv4,
245     * check whether this is a numeric IPv6 */
246    if (af != AF_INET) {
247        struct in6_addr in6;
248        if (inet_pton(AF_INET6, host, &in6) > 0) {
249            r = xzalloc(LSA_LEN_SIZE + sizeof(struct sockaddr_in6));
250            r->len = sizeof(struct sockaddr_in6);
251            r->u.sa.sa_family = AF_INET6;
252            r->u.sin6.sin6_addr = in6;
253            goto set_port;
254        }
255    }
256#endif
257
258    memset(&hint, 0 , sizeof(hint));
259    hint.ai_family = af;
260    /* Need SOCK_STREAM, or else we get each address thrice (or more)
261     * for each possible socket type (tcp,udp,raw...): */
262    hint.ai_socktype = SOCK_STREAM;
263    hint.ai_flags = ai_flags & ~DIE_ON_ERROR;
264    rc = getaddrinfo(host, NULL, &hint, &result);
265    if (rc || !result) {
266        bb_error_msg("bad address '%s'", org_host);
267        if (ai_flags & DIE_ON_ERROR)
268            xfunc_die();
269        goto ret;
270    }
271    used_res = result;
272#if ENABLE_FEATURE_PREFER_IPV4_ADDRESS
273    while (1) {
274        if (used_res->ai_family == AF_INET)
275            break;
276        used_res = used_res->ai_next;
277        if (!used_res) {
278            used_res = result;
279            break;
280        }
281    }
282#endif
283    r = xmalloc(LSA_LEN_SIZE + used_res->ai_addrlen);
284    r->len = used_res->ai_addrlen;
285    memcpy(&r->u.sa, used_res->ai_addr, used_res->ai_addrlen);
286
287 set_port:
288    set_nport(&r->u.sa, htons(port));
289 ret:
290    if (result)
291        freeaddrinfo(result);
292    return r;
293}
294#if !ENABLE_FEATURE_IPV6
295#define str2sockaddr(host, port, af, ai_flags) str2sockaddr(host, port, ai_flags)
296#endif
297
298#if ENABLE_FEATURE_IPV6
299len_and_sockaddr* FAST_FUNC host_and_af2sockaddr(const char *host, int port, sa_family_t af)
300{
301    return str2sockaddr(host, port, af, 0);
302}
303
304len_and_sockaddr* FAST_FUNC xhost_and_af2sockaddr(const char *host, int port, sa_family_t af)
305{
306    return str2sockaddr(host, port, af, DIE_ON_ERROR);
307}
308#endif
309
310len_and_sockaddr* FAST_FUNC host2sockaddr(const char *host, int port)
311{
312    return str2sockaddr(host, port, AF_UNSPEC, 0);
313}
314
315len_and_sockaddr* FAST_FUNC xhost2sockaddr(const char *host, int port)
316{
317    return str2sockaddr(host, port, AF_UNSPEC, DIE_ON_ERROR);
318}
319
320len_and_sockaddr* FAST_FUNC xdotted2sockaddr(const char *host, int port)
321{
322    return str2sockaddr(host, port, AF_UNSPEC, AI_NUMERICHOST | DIE_ON_ERROR);
323}
324
325int FAST_FUNC xsocket_type(len_and_sockaddr **lsap, int family, int sock_type)
326{
327    len_and_sockaddr *lsa;
328    int fd;
329    int len;
330
331    if (family == AF_UNSPEC) {
332#if ENABLE_FEATURE_IPV6
333        fd = socket(AF_INET6, sock_type, 0);
334        if (fd >= 0) {
335            family = AF_INET6;
336            goto done;
337        }
338#endif
339        family = AF_INET;
340    }
341
342    fd = xsocket(family, sock_type, 0);
343
344    len = sizeof(struct sockaddr_in);
345    if (family == AF_UNIX)
346        len = sizeof(struct sockaddr_un);
347#if ENABLE_FEATURE_IPV6
348    if (family == AF_INET6) {
349 done:
350        len = sizeof(struct sockaddr_in6);
351    }
352#endif
353    lsa = xzalloc(LSA_LEN_SIZE + len);
354    lsa->len = len;
355    lsa->u.sa.sa_family = family;
356    *lsap = lsa;
357    return fd;
358}
359
360int FAST_FUNC xsocket_stream(len_and_sockaddr **lsap)
361{
362    return xsocket_type(lsap, AF_UNSPEC, SOCK_STREAM);
363}
364
365static int create_and_bind_or_die(const char *bindaddr, int port, int sock_type)
366{
367    int fd;
368    len_and_sockaddr *lsa;
369
370    if (bindaddr && bindaddr[0]) {
371        lsa = xdotted2sockaddr(bindaddr, port);
372        /* user specified bind addr dictates family */
373        fd = xsocket(lsa->u.sa.sa_family, sock_type, 0);
374    } else {
375        fd = xsocket_type(&lsa, AF_UNSPEC, sock_type);
376        set_nport(&lsa->u.sa, htons(port));
377    }
378    setsockopt_reuseaddr(fd);
379    xbind(fd, &lsa->u.sa, lsa->len);
380    free(lsa);
381    return fd;
382}
383
384int FAST_FUNC create_and_bind_stream_or_die(const char *bindaddr, int port)
385{
386    return create_and_bind_or_die(bindaddr, port, SOCK_STREAM);
387}
388
389int FAST_FUNC create_and_bind_dgram_or_die(const char *bindaddr, int port)
390{
391    return create_and_bind_or_die(bindaddr, port, SOCK_DGRAM);
392}
393
394
395int FAST_FUNC create_and_connect_stream_or_die(const char *peer, int port)
396{
397    int fd;
398    len_and_sockaddr *lsa;
399
400    lsa = xhost2sockaddr(peer, port);
401    fd = xsocket(lsa->u.sa.sa_family, SOCK_STREAM, 0);
402    setsockopt_reuseaddr(fd);
403    xconnect(fd, &lsa->u.sa, lsa->len);
404    free(lsa);
405    return fd;
406}
407
408int FAST_FUNC xconnect_stream(const len_and_sockaddr *lsa)
409{
410    int fd = xsocket(lsa->u.sa.sa_family, SOCK_STREAM, 0);
411    xconnect(fd, &lsa->u.sa, lsa->len);
412    return fd;
413}
414
415/* We hijack this constant to mean something else */
416/* It doesn't hurt because we will add this bit anyway */
417#define IGNORE_PORT NI_NUMERICSERV
418static char* FAST_FUNC sockaddr2str(const struct sockaddr *sa, int flags)
419{
420    char host[128];
421    char serv[16];
422    int rc;
423    socklen_t salen;
424
425    if (ENABLE_FEATURE_UNIX_LOCAL && sa->sa_family == AF_UNIX) {
426        struct sockaddr_un *sun = (struct sockaddr_un *)sa;
427        return xasprintf("local:%.*s",
428                (int) sizeof(sun->sun_path),
429                sun->sun_path);
430    }
431
432    salen = LSA_SIZEOF_SA;
433#if ENABLE_FEATURE_IPV6
434    if (sa->sa_family == AF_INET)
435        salen = sizeof(struct sockaddr_in);
436    if (sa->sa_family == AF_INET6)
437        salen = sizeof(struct sockaddr_in6);
438#endif
439    rc = getnameinfo(sa, salen,
440            host, sizeof(host),
441    /* can do ((flags & IGNORE_PORT) ? NULL : serv) but why bother? */
442            serv, sizeof(serv),
443            /* do not resolve port# into service _name_ */
444            flags | NI_NUMERICSERV
445    );
446    if (rc)
447        return NULL;
448    if (flags & IGNORE_PORT)
449        return xstrdup(host);
450#if ENABLE_FEATURE_IPV6
451    if (sa->sa_family == AF_INET6) {
452        if (strchr(host, ':')) /* heh, it's not a resolved hostname */
453            return xasprintf("[%s]:%s", host, serv);
454        /*return xasprintf("%s:%s", host, serv);*/
455        /* - fall through instead */
456    }
457#endif
458    /* For now we don't support anything else, so it has to be INET */
459    /*if (sa->sa_family == AF_INET)*/
460        return xasprintf("%s:%s", host, serv);
461    /*return xstrdup(host);*/
462}
463
464char* FAST_FUNC xmalloc_sockaddr2host(const struct sockaddr *sa)
465{
466    return sockaddr2str(sa, 0);
467}
468
469char* FAST_FUNC xmalloc_sockaddr2host_noport(const struct sockaddr *sa)
470{
471    return sockaddr2str(sa, IGNORE_PORT);
472}
473
474char* FAST_FUNC xmalloc_sockaddr2hostonly_noport(const struct sockaddr *sa)
475{
476    return sockaddr2str(sa, NI_NAMEREQD | IGNORE_PORT);
477}
478char* FAST_FUNC xmalloc_sockaddr2dotted(const struct sockaddr *sa)
479{
480    return sockaddr2str(sa, NI_NUMERICHOST);
481}
482
483char* FAST_FUNC xmalloc_sockaddr2dotted_noport(const struct sockaddr *sa)
484{
485    return sockaddr2str(sa, NI_NUMERICHOST | IGNORE_PORT);
486}
Note: See TracBrowser for help on using the repository browser.