diff --git a/lib/libcasper/services/cap_dns/cap_dns.c b/lib/libcasper/services/cap_dns/cap_dns.c index 1e552d2dc252..a5223a0ea4a5 100644 --- a/lib/libcasper/services/cap_dns/cap_dns.c +++ b/lib/libcasper/services/cap_dns/cap_dns.c @@ -1,767 +1,767 @@ /*- * SPDX-License-Identifier: BSD-2-Clause * * Copyright (c) 2012-2013 The FreeBSD Foundation * * This software was developed by Pawel Jakub Dawidek under sponsorship from * the FreeBSD Foundation. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #include #include #include #include #include #include #include #include #include #include #include #include #include "cap_dns.h" static struct hostent hent; static void hostent_free(struct hostent *hp) { unsigned int ii; free(hp->h_name); hp->h_name = NULL; if (hp->h_aliases != NULL) { for (ii = 0; hp->h_aliases[ii] != NULL; ii++) free(hp->h_aliases[ii]); free(hp->h_aliases); hp->h_aliases = NULL; } if (hp->h_addr_list != NULL) { for (ii = 0; hp->h_addr_list[ii] != NULL; ii++) free(hp->h_addr_list[ii]); free(hp->h_addr_list); hp->h_addr_list = NULL; } } static struct hostent * hostent_unpack(const nvlist_t *nvl, struct hostent *hp) { unsigned int ii, nitems; char nvlname[64]; int n; hostent_free(hp); hp->h_name = strdup(nvlist_get_string(nvl, "name")); if (hp->h_name == NULL) goto fail; hp->h_addrtype = (int)nvlist_get_number(nvl, "addrtype"); hp->h_length = (int)nvlist_get_number(nvl, "length"); nitems = (unsigned int)nvlist_get_number(nvl, "naliases"); - hp->h_aliases = calloc(sizeof(hp->h_aliases[0]), nitems + 1); + hp->h_aliases = calloc(nitems + 1, sizeof(hp->h_aliases[0])); if (hp->h_aliases == NULL) goto fail; for (ii = 0; ii < nitems; ii++) { n = snprintf(nvlname, sizeof(nvlname), "alias%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); hp->h_aliases[ii] = strdup(nvlist_get_string(nvl, nvlname)); if (hp->h_aliases[ii] == NULL) goto fail; } hp->h_aliases[ii] = NULL; nitems = (unsigned int)nvlist_get_number(nvl, "naddrs"); - hp->h_addr_list = calloc(sizeof(hp->h_addr_list[0]), nitems + 1); + hp->h_addr_list = calloc(nitems + 1, sizeof(hp->h_addr_list[0])); if (hp->h_addr_list == NULL) goto fail; for (ii = 0; ii < nitems; ii++) { hp->h_addr_list[ii] = malloc(hp->h_length); if (hp->h_addr_list[ii] == NULL) goto fail; n = snprintf(nvlname, sizeof(nvlname), "addr%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); bcopy(nvlist_get_binary(nvl, nvlname, NULL), hp->h_addr_list[ii], hp->h_length); } hp->h_addr_list[ii] = NULL; return (hp); fail: hostent_free(hp); h_errno = NO_RECOVERY; return (NULL); } struct hostent * cap_gethostbyname(cap_channel_t *chan, const char *name) { return (cap_gethostbyname2(chan, name, AF_INET)); } struct hostent * cap_gethostbyname2(cap_channel_t *chan, const char *name, int type) { struct hostent *hp; nvlist_t *nvl; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", "gethostbyname"); nvlist_add_number(nvl, "family", (uint64_t)type); nvlist_add_string(nvl, "name", name); nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) { h_errno = NO_RECOVERY; return (NULL); } if (nvlist_get_number(nvl, "error") != 0) { h_errno = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); return (NULL); } hp = hostent_unpack(nvl, &hent); nvlist_destroy(nvl); return (hp); } struct hostent * cap_gethostbyaddr(cap_channel_t *chan, const void *addr, socklen_t len, int type) { struct hostent *hp; nvlist_t *nvl; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", "gethostbyaddr"); nvlist_add_binary(nvl, "addr", addr, (size_t)len); nvlist_add_number(nvl, "family", (uint64_t)type); nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) { h_errno = NO_RECOVERY; return (NULL); } if (nvlist_get_number(nvl, "error") != 0) { h_errno = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); return (NULL); } hp = hostent_unpack(nvl, &hent); nvlist_destroy(nvl); return (hp); } static struct addrinfo * addrinfo_unpack(const nvlist_t *nvl) { struct addrinfo *ai; const void *addr; size_t addrlen; const char *canonname; addr = nvlist_get_binary(nvl, "ai_addr", &addrlen); ai = malloc(sizeof(*ai) + addrlen); if (ai == NULL) return (NULL); ai->ai_flags = (int)nvlist_get_number(nvl, "ai_flags"); ai->ai_family = (int)nvlist_get_number(nvl, "ai_family"); ai->ai_socktype = (int)nvlist_get_number(nvl, "ai_socktype"); ai->ai_protocol = (int)nvlist_get_number(nvl, "ai_protocol"); ai->ai_addrlen = (socklen_t)addrlen; canonname = dnvlist_get_string(nvl, "ai_canonname", NULL); if (canonname != NULL) { ai->ai_canonname = strdup(canonname); if (ai->ai_canonname == NULL) { free(ai); return (NULL); } } else { ai->ai_canonname = NULL; } ai->ai_addr = (void *)(ai + 1); bcopy(addr, ai->ai_addr, addrlen); ai->ai_next = NULL; return (ai); } int cap_getaddrinfo(cap_channel_t *chan, const char *hostname, const char *servname, const struct addrinfo *hints, struct addrinfo **res) { struct addrinfo *firstai, *prevai, *curai; unsigned int ii; const nvlist_t *nvlai; char nvlname[64]; nvlist_t *nvl; int error, n; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", "getaddrinfo"); if (hostname != NULL) nvlist_add_string(nvl, "hostname", hostname); if (servname != NULL) nvlist_add_string(nvl, "servname", servname); if (hints != NULL) { nvlist_add_number(nvl, "hints.ai_flags", (uint64_t)hints->ai_flags); nvlist_add_number(nvl, "hints.ai_family", (uint64_t)hints->ai_family); nvlist_add_number(nvl, "hints.ai_socktype", (uint64_t)hints->ai_socktype); nvlist_add_number(nvl, "hints.ai_protocol", (uint64_t)hints->ai_protocol); } nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) return (EAI_MEMORY); if (nvlist_get_number(nvl, "error") != 0) { error = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); return (error); } nvlai = NULL; firstai = prevai = curai = NULL; for (ii = 0; ; ii++) { n = snprintf(nvlname, sizeof(nvlname), "res%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); if (!nvlist_exists_nvlist(nvl, nvlname)) break; nvlai = nvlist_get_nvlist(nvl, nvlname); curai = addrinfo_unpack(nvlai); if (curai == NULL) break; if (prevai != NULL) prevai->ai_next = curai; else if (firstai == NULL) firstai = curai; prevai = curai; } nvlist_destroy(nvl); if (curai == NULL && nvlai != NULL) { if (firstai == NULL) freeaddrinfo(firstai); return (EAI_MEMORY); } *res = firstai; return (0); } int cap_getnameinfo(cap_channel_t *chan, const struct sockaddr *sa, socklen_t salen, char *host, size_t hostlen, char *serv, size_t servlen, int flags) { nvlist_t *nvl; int error; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", "getnameinfo"); nvlist_add_number(nvl, "hostlen", (uint64_t)hostlen); nvlist_add_number(nvl, "servlen", (uint64_t)servlen); nvlist_add_binary(nvl, "sa", sa, (size_t)salen); nvlist_add_number(nvl, "flags", (uint64_t)flags); nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) return (EAI_MEMORY); if (nvlist_get_number(nvl, "error") != 0) { error = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); return (error); } if (host != NULL && nvlist_exists_string(nvl, "host")) strlcpy(host, nvlist_get_string(nvl, "host"), hostlen + 1); if (serv != NULL && nvlist_exists_string(nvl, "serv")) strlcpy(serv, nvlist_get_string(nvl, "serv"), servlen + 1); nvlist_destroy(nvl); return (0); } static void limit_remove(nvlist_t *limits, const char *prefix) { const char *name; size_t prefixlen; void *cookie; prefixlen = strlen(prefix); again: cookie = NULL; while ((name = nvlist_next(limits, NULL, &cookie)) != NULL) { if (strncmp(name, prefix, prefixlen) == 0) { nvlist_free(limits, name); goto again; } } } int cap_dns_type_limit(cap_channel_t *chan, const char * const *types, size_t ntypes) { nvlist_t *limits; unsigned int i; char nvlname[64]; int n; if (cap_limit_get(chan, &limits) < 0) return (-1); if (limits == NULL) limits = nvlist_create(0); else limit_remove(limits, "type"); for (i = 0; i < ntypes; i++) { n = snprintf(nvlname, sizeof(nvlname), "type%u", i); assert(n > 0 && n < (int)sizeof(nvlname)); nvlist_add_string(limits, nvlname, types[i]); } return (cap_limit_set(chan, limits)); } int cap_dns_family_limit(cap_channel_t *chan, const int *families, size_t nfamilies) { nvlist_t *limits; unsigned int i; char nvlname[64]; int n; if (cap_limit_get(chan, &limits) < 0) return (-1); if (limits == NULL) limits = nvlist_create(0); else limit_remove(limits, "family"); for (i = 0; i < nfamilies; i++) { n = snprintf(nvlname, sizeof(nvlname), "family%u", i); assert(n > 0 && n < (int)sizeof(nvlname)); nvlist_add_number(limits, nvlname, (uint64_t)families[i]); } return (cap_limit_set(chan, limits)); } /* * Service functions. */ static bool dns_allowed_type(const nvlist_t *limits, const char *type) { const char *name; bool notypes; void *cookie; if (limits == NULL) return (true); notypes = true; cookie = NULL; while ((name = nvlist_next(limits, NULL, &cookie)) != NULL) { if (strncmp(name, "type", sizeof("type") - 1) != 0) continue; notypes = false; if (strcmp(nvlist_get_string(limits, name), type) == 0) return (true); } /* If there are no types at all, allow any type. */ if (notypes) return (true); return (false); } static bool dns_allowed_family(const nvlist_t *limits, int family) { const char *name; bool nofamilies; void *cookie; if (limits == NULL) return (true); nofamilies = true; cookie = NULL; while ((name = nvlist_next(limits, NULL, &cookie)) != NULL) { if (strncmp(name, "family", sizeof("family") - 1) != 0) continue; nofamilies = false; if (family == AF_UNSPEC) continue; if (nvlist_get_number(limits, name) == (uint64_t)family) return (true); } /* If there are no families at all, allow any family. */ if (nofamilies) return (true); return (false); } static void hostent_pack(const struct hostent *hp, nvlist_t *nvl) { unsigned int ii; char nvlname[64]; int n; nvlist_add_string(nvl, "name", hp->h_name); nvlist_add_number(nvl, "addrtype", (uint64_t)hp->h_addrtype); nvlist_add_number(nvl, "length", (uint64_t)hp->h_length); if (hp->h_aliases == NULL) { nvlist_add_number(nvl, "naliases", 0); } else { for (ii = 0; hp->h_aliases[ii] != NULL; ii++) { n = snprintf(nvlname, sizeof(nvlname), "alias%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); nvlist_add_string(nvl, nvlname, hp->h_aliases[ii]); } nvlist_add_number(nvl, "naliases", (uint64_t)ii); } if (hp->h_addr_list == NULL) { nvlist_add_number(nvl, "naddrs", 0); } else { for (ii = 0; hp->h_addr_list[ii] != NULL; ii++) { n = snprintf(nvlname, sizeof(nvlname), "addr%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); nvlist_add_binary(nvl, nvlname, hp->h_addr_list[ii], (size_t)hp->h_length); } nvlist_add_number(nvl, "naddrs", (uint64_t)ii); } } static int dns_gethostbyname(const nvlist_t *limits, const nvlist_t *nvlin, nvlist_t *nvlout) { struct hostent *hp; int family; if (!dns_allowed_type(limits, "NAME2ADDR") && !dns_allowed_type(limits, "NAME")) return (NO_RECOVERY); family = (int)nvlist_get_number(nvlin, "family"); if (!dns_allowed_family(limits, family)) return (NO_RECOVERY); hp = gethostbyname2(nvlist_get_string(nvlin, "name"), family); if (hp == NULL) return (h_errno); hostent_pack(hp, nvlout); return (0); } static int dns_gethostbyaddr(const nvlist_t *limits, const nvlist_t *nvlin, nvlist_t *nvlout) { struct hostent *hp; const void *addr; size_t addrsize; int family; if (!dns_allowed_type(limits, "ADDR2NAME") && !dns_allowed_type(limits, "ADDR")) return (NO_RECOVERY); family = (int)nvlist_get_number(nvlin, "family"); if (!dns_allowed_family(limits, family)) return (NO_RECOVERY); addr = nvlist_get_binary(nvlin, "addr", &addrsize); hp = gethostbyaddr(addr, (socklen_t)addrsize, family); if (hp == NULL) return (h_errno); hostent_pack(hp, nvlout); return (0); } static int dns_getnameinfo(const nvlist_t *limits, const nvlist_t *nvlin, nvlist_t *nvlout) { struct sockaddr_storage sast; const void *sabin; char *host, *serv; size_t sabinsize, hostlen, servlen; socklen_t salen; int error, flags; if (!dns_allowed_type(limits, "ADDR2NAME") && !dns_allowed_type(limits, "ADDR")) return (NO_RECOVERY); error = 0; host = serv = NULL; memset(&sast, 0, sizeof(sast)); hostlen = (size_t)nvlist_get_number(nvlin, "hostlen"); servlen = (size_t)nvlist_get_number(nvlin, "servlen"); if (hostlen > 0) { host = calloc(1, hostlen + 1); if (host == NULL) { error = EAI_MEMORY; goto out; } } if (servlen > 0) { serv = calloc(1, servlen + 1); if (serv == NULL) { error = EAI_MEMORY; goto out; } } sabin = nvlist_get_binary(nvlin, "sa", &sabinsize); if (sabinsize > sizeof(sast)) { error = EAI_FAIL; goto out; } memcpy(&sast, sabin, sabinsize); salen = (socklen_t)sabinsize; if ((sast.ss_family != AF_INET || salen != sizeof(struct sockaddr_in)) && (sast.ss_family != AF_INET6 || salen != sizeof(struct sockaddr_in6))) { error = EAI_FAIL; goto out; } if (!dns_allowed_family(limits, (int)sast.ss_family)) { error = NO_RECOVERY; goto out; } flags = (int)nvlist_get_number(nvlin, "flags"); error = getnameinfo((struct sockaddr *)&sast, salen, host, hostlen, serv, servlen, flags); if (error != 0) goto out; if (host != NULL) nvlist_move_string(nvlout, "host", host); if (serv != NULL) nvlist_move_string(nvlout, "serv", serv); out: if (error != 0) { free(host); free(serv); } return (error); } static nvlist_t * addrinfo_pack(const struct addrinfo *ai) { nvlist_t *nvl; nvl = nvlist_create(0); nvlist_add_number(nvl, "ai_flags", (uint64_t)ai->ai_flags); nvlist_add_number(nvl, "ai_family", (uint64_t)ai->ai_family); nvlist_add_number(nvl, "ai_socktype", (uint64_t)ai->ai_socktype); nvlist_add_number(nvl, "ai_protocol", (uint64_t)ai->ai_protocol); nvlist_add_binary(nvl, "ai_addr", ai->ai_addr, (size_t)ai->ai_addrlen); if (ai->ai_canonname != NULL) nvlist_add_string(nvl, "ai_canonname", ai->ai_canonname); return (nvl); } static int dns_getaddrinfo(const nvlist_t *limits, const nvlist_t *nvlin, nvlist_t *nvlout) { struct addrinfo hints, *hintsp, *res, *cur; const char *hostname, *servname; char nvlname[64]; nvlist_t *elem; unsigned int ii; int error, family, n; if (!dns_allowed_type(limits, "NAME2ADDR") && !dns_allowed_type(limits, "NAME")) return (NO_RECOVERY); hostname = dnvlist_get_string(nvlin, "hostname", NULL); servname = dnvlist_get_string(nvlin, "servname", NULL); if (nvlist_exists_number(nvlin, "hints.ai_flags")) { hints.ai_flags = (int)nvlist_get_number(nvlin, "hints.ai_flags"); hints.ai_family = (int)nvlist_get_number(nvlin, "hints.ai_family"); hints.ai_socktype = (int)nvlist_get_number(nvlin, "hints.ai_socktype"); hints.ai_protocol = (int)nvlist_get_number(nvlin, "hints.ai_protocol"); hints.ai_addrlen = 0; hints.ai_addr = NULL; hints.ai_canonname = NULL; hints.ai_next = NULL; hintsp = &hints; family = hints.ai_family; } else { hintsp = NULL; family = AF_UNSPEC; } if (!dns_allowed_family(limits, family)) return (NO_RECOVERY); error = getaddrinfo(hostname, servname, hintsp, &res); if (error != 0) goto out; for (cur = res, ii = 0; cur != NULL; cur = cur->ai_next, ii++) { elem = addrinfo_pack(cur); n = snprintf(nvlname, sizeof(nvlname), "res%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); nvlist_move_nvlist(nvlout, nvlname, elem); } freeaddrinfo(res); error = 0; out: return (error); } static bool limit_has_entry(const nvlist_t *limits, const char *prefix) { const char *name; size_t prefixlen; void *cookie; if (limits == NULL) return (false); prefixlen = strlen(prefix); cookie = NULL; while ((name = nvlist_next(limits, NULL, &cookie)) != NULL) { if (strncmp(name, prefix, prefixlen) == 0) return (true); } return (false); } static int dns_limit(const nvlist_t *oldlimits, const nvlist_t *newlimits) { const char *name; void *cookie; int nvtype; bool hastype, hasfamily; hastype = false; hasfamily = false; cookie = NULL; while ((name = nvlist_next(newlimits, &nvtype, &cookie)) != NULL) { if (nvtype == NV_TYPE_STRING) { const char *type; if (strncmp(name, "type", sizeof("type") - 1) != 0) return (EINVAL); type = nvlist_get_string(newlimits, name); if (strcmp(type, "ADDR2NAME") != 0 && strcmp(type, "NAME2ADDR") != 0 && strcmp(type, "ADDR") != 0 && strcmp(type, "NAME") != 0) { return (EINVAL); } if (!dns_allowed_type(oldlimits, type)) return (ENOTCAPABLE); hastype = true; } else if (nvtype == NV_TYPE_NUMBER) { int family; if (strncmp(name, "family", sizeof("family") - 1) != 0) return (EINVAL); family = (int)nvlist_get_number(newlimits, name); if (!dns_allowed_family(oldlimits, family)) return (ENOTCAPABLE); hasfamily = true; } else { return (EINVAL); } } /* * If the new limit doesn't mention type or family we have to * check if the current limit does have those. Missing type or * family in the limit means that all types or families are * allowed. */ if (!hastype) { if (limit_has_entry(oldlimits, "type")) return (ENOTCAPABLE); } if (!hasfamily) { if (limit_has_entry(oldlimits, "family")) return (ENOTCAPABLE); } return (0); } static int dns_command(const char *cmd, const nvlist_t *limits, nvlist_t *nvlin, nvlist_t *nvlout) { int error; if (strcmp(cmd, "gethostbyname") == 0) error = dns_gethostbyname(limits, nvlin, nvlout); else if (strcmp(cmd, "gethostbyaddr") == 0) error = dns_gethostbyaddr(limits, nvlin, nvlout); else if (strcmp(cmd, "getnameinfo") == 0) error = dns_getnameinfo(limits, nvlin, nvlout); else if (strcmp(cmd, "getaddrinfo") == 0) error = dns_getaddrinfo(limits, nvlin, nvlout); else error = NO_RECOVERY; return (error); } CREATE_SERVICE("system.dns", dns_limit, dns_command, 0); diff --git a/lib/libcasper/services/cap_net/cap_net.c b/lib/libcasper/services/cap_net/cap_net.c index c29bc36bf64c..62eddd0a80a8 100644 --- a/lib/libcasper/services/cap_net/cap_net.c +++ b/lib/libcasper/services/cap_net/cap_net.c @@ -1,1415 +1,1415 @@ /*- * SPDX-License-Identifier: BSD-2-Clause * * Copyright (c) 2020 Mariusz Zaborski * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "cap_net.h" #define CAPNET_MASK (CAPNET_ADDR2NAME | CAPNET_NAME2ADDR \ CAPNET_DEPRECATED_ADDR2NAME | CAPNET_DEPRECATED_NAME2ADDR | \ CAPNET_CONNECT | CAPNET_BIND | CAPNET_CONNECTDNS) /* * Defines for the names of the limits. * XXX: we should convert all string constats to this to avoid typos. */ #define LIMIT_NV_BIND "bind" #define LIMIT_NV_CONNECT "connect" #define LIMIT_NV_ADDR2NAME "addr2name" #define LIMIT_NV_NAME2ADDR "name2addr" struct cap_net_limit { cap_channel_t *cnl_chan; uint64_t cnl_mode; nvlist_t *cnl_addr2name; nvlist_t *cnl_name2addr; nvlist_t *cnl_connect; nvlist_t *cnl_bind; }; static struct hostent hent; static void hostent_free(struct hostent *hp) { unsigned int ii; free(hp->h_name); hp->h_name = NULL; if (hp->h_aliases != NULL) { for (ii = 0; hp->h_aliases[ii] != NULL; ii++) free(hp->h_aliases[ii]); free(hp->h_aliases); hp->h_aliases = NULL; } if (hp->h_addr_list != NULL) { for (ii = 0; hp->h_addr_list[ii] != NULL; ii++) free(hp->h_addr_list[ii]); free(hp->h_addr_list); hp->h_addr_list = NULL; } } static struct hostent * hostent_unpack(const nvlist_t *nvl, struct hostent *hp) { unsigned int ii, nitems; char nvlname[64]; int n; hostent_free(hp); hp->h_name = strdup(nvlist_get_string(nvl, "name")); if (hp->h_name == NULL) goto fail; hp->h_addrtype = (int)nvlist_get_number(nvl, "addrtype"); hp->h_length = (int)nvlist_get_number(nvl, "length"); nitems = (unsigned int)nvlist_get_number(nvl, "naliases"); - hp->h_aliases = calloc(sizeof(hp->h_aliases[0]), nitems + 1); + hp->h_aliases = calloc(nitems + 1, sizeof(hp->h_aliases[0])); if (hp->h_aliases == NULL) goto fail; for (ii = 0; ii < nitems; ii++) { n = snprintf(nvlname, sizeof(nvlname), "alias%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); hp->h_aliases[ii] = strdup(nvlist_get_string(nvl, nvlname)); if (hp->h_aliases[ii] == NULL) goto fail; } hp->h_aliases[ii] = NULL; nitems = (unsigned int)nvlist_get_number(nvl, "naddrs"); - hp->h_addr_list = calloc(sizeof(hp->h_addr_list[0]), nitems + 1); + hp->h_addr_list = calloc(nitems + 1, sizeof(hp->h_addr_list[0])); if (hp->h_addr_list == NULL) goto fail; for (ii = 0; ii < nitems; ii++) { hp->h_addr_list[ii] = malloc(hp->h_length); if (hp->h_addr_list[ii] == NULL) goto fail; n = snprintf(nvlname, sizeof(nvlname), "addr%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); bcopy(nvlist_get_binary(nvl, nvlname, NULL), hp->h_addr_list[ii], hp->h_length); } hp->h_addr_list[ii] = NULL; return (hp); fail: hostent_free(hp); h_errno = NO_RECOVERY; return (NULL); } static int request_cb(cap_channel_t *chan, const char *name, int s, const struct sockaddr *saddr, socklen_t len) { nvlist_t *nvl; int serrno; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", name); nvlist_add_descriptor(nvl, "s", s); nvlist_add_binary(nvl, "saddr", saddr, len); nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) return (-1); if (nvlist_get_number(nvl, "error") != 0) { serrno = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); errno = serrno; return (-1); } s = dup2(s, nvlist_get_descriptor(nvl, "s")); nvlist_destroy(nvl); return (s == -1 ? -1 : 0); } int cap_bind(cap_channel_t *chan, int s, const struct sockaddr *addr, socklen_t addrlen) { return (request_cb(chan, LIMIT_NV_BIND, s, addr, addrlen)); } int cap_connect(cap_channel_t *chan, int s, const struct sockaddr *name, socklen_t namelen) { return (request_cb(chan, LIMIT_NV_CONNECT, s, name, namelen)); } struct hostent * cap_gethostbyname(cap_channel_t *chan, const char *name) { return (cap_gethostbyname2(chan, name, AF_INET)); } struct hostent * cap_gethostbyname2(cap_channel_t *chan, const char *name, int af) { struct hostent *hp; nvlist_t *nvl; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", "gethostbyname"); nvlist_add_number(nvl, "family", (uint64_t)af); nvlist_add_string(nvl, "name", name); nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) { h_errno = NO_RECOVERY; return (NULL); } if (nvlist_get_number(nvl, "error") != 0) { h_errno = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); return (NULL); } hp = hostent_unpack(nvl, &hent); nvlist_destroy(nvl); return (hp); } struct hostent * cap_gethostbyaddr(cap_channel_t *chan, const void *addr, socklen_t len, int af) { struct hostent *hp; nvlist_t *nvl; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", "gethostbyaddr"); nvlist_add_binary(nvl, "addr", addr, (size_t)len); nvlist_add_number(nvl, "family", (uint64_t)af); nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) { h_errno = NO_RECOVERY; return (NULL); } if (nvlist_get_number(nvl, "error") != 0) { h_errno = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); return (NULL); } hp = hostent_unpack(nvl, &hent); nvlist_destroy(nvl); return (hp); } static struct addrinfo * addrinfo_unpack(const nvlist_t *nvl) { struct addrinfo *ai; const void *addr; size_t addrlen; const char *canonname; addr = nvlist_get_binary(nvl, "ai_addr", &addrlen); ai = malloc(sizeof(*ai) + addrlen); if (ai == NULL) return (NULL); ai->ai_flags = (int)nvlist_get_number(nvl, "ai_flags"); ai->ai_family = (int)nvlist_get_number(nvl, "ai_family"); ai->ai_socktype = (int)nvlist_get_number(nvl, "ai_socktype"); ai->ai_protocol = (int)nvlist_get_number(nvl, "ai_protocol"); ai->ai_addrlen = (socklen_t)addrlen; canonname = dnvlist_get_string(nvl, "ai_canonname", NULL); if (canonname != NULL) { ai->ai_canonname = strdup(canonname); if (ai->ai_canonname == NULL) { free(ai); return (NULL); } } else { ai->ai_canonname = NULL; } ai->ai_addr = (void *)(ai + 1); bcopy(addr, ai->ai_addr, addrlen); ai->ai_next = NULL; return (ai); } int cap_getaddrinfo(cap_channel_t *chan, const char *hostname, const char *servname, const struct addrinfo *hints, struct addrinfo **res) { struct addrinfo *firstai, *prevai, *curai; unsigned int ii; const nvlist_t *nvlai; char nvlname[64]; nvlist_t *nvl; int error, n; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", "getaddrinfo"); if (hostname != NULL) nvlist_add_string(nvl, "hostname", hostname); if (servname != NULL) nvlist_add_string(nvl, "servname", servname); if (hints != NULL) { nvlist_add_number(nvl, "hints.ai_flags", (uint64_t)hints->ai_flags); nvlist_add_number(nvl, "hints.ai_family", (uint64_t)hints->ai_family); nvlist_add_number(nvl, "hints.ai_socktype", (uint64_t)hints->ai_socktype); nvlist_add_number(nvl, "hints.ai_protocol", (uint64_t)hints->ai_protocol); } nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) return (EAI_MEMORY); if (nvlist_get_number(nvl, "error") != 0) { error = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); return (error); } nvlai = NULL; firstai = prevai = curai = NULL; for (ii = 0; ; ii++) { n = snprintf(nvlname, sizeof(nvlname), "res%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); if (!nvlist_exists_nvlist(nvl, nvlname)) break; nvlai = nvlist_get_nvlist(nvl, nvlname); curai = addrinfo_unpack(nvlai); if (curai == NULL) { nvlist_destroy(nvl); return (EAI_MEMORY); } if (prevai != NULL) prevai->ai_next = curai; else firstai = curai; prevai = curai; } nvlist_destroy(nvl); if (curai == NULL && nvlai != NULL) { if (firstai == NULL) freeaddrinfo(firstai); return (EAI_MEMORY); } *res = firstai; return (0); } int cap_getnameinfo(cap_channel_t *chan, const struct sockaddr *sa, socklen_t salen, char *host, size_t hostlen, char *serv, size_t servlen, int flags) { nvlist_t *nvl; int error; nvl = nvlist_create(0); nvlist_add_string(nvl, "cmd", "getnameinfo"); nvlist_add_number(nvl, "hostlen", (uint64_t)hostlen); nvlist_add_number(nvl, "servlen", (uint64_t)servlen); nvlist_add_binary(nvl, "sa", sa, (size_t)salen); nvlist_add_number(nvl, "flags", (uint64_t)flags); nvl = cap_xfer_nvlist(chan, nvl); if (nvl == NULL) return (EAI_MEMORY); if (nvlist_get_number(nvl, "error") != 0) { error = (int)nvlist_get_number(nvl, "error"); nvlist_destroy(nvl); return (error); } if (host != NULL && nvlist_exists_string(nvl, "host")) strlcpy(host, nvlist_get_string(nvl, "host"), hostlen + 1); if (serv != NULL && nvlist_exists_string(nvl, "serv")) strlcpy(serv, nvlist_get_string(nvl, "serv"), servlen + 1); nvlist_destroy(nvl); return (0); } cap_net_limit_t * cap_net_limit_init(cap_channel_t *chan, uint64_t mode) { cap_net_limit_t *limit; limit = calloc(1, sizeof(*limit)); if (limit != NULL) { limit->cnl_mode = mode; limit->cnl_chan = chan; limit->cnl_addr2name = nvlist_create(0); limit->cnl_name2addr = nvlist_create(0); limit->cnl_connect = nvlist_create(0); limit->cnl_bind = nvlist_create(0); } return (limit); } static void pack_limit(nvlist_t *lnvl, const char *name, nvlist_t *limit) { if (!nvlist_empty(limit)) { nvlist_move_nvlist(lnvl, name, limit); } else { nvlist_destroy(limit); } } int cap_net_limit(cap_net_limit_t *limit) { nvlist_t *lnvl; cap_channel_t *chan; lnvl = nvlist_create(0); nvlist_add_number(lnvl, "mode", limit->cnl_mode); pack_limit(lnvl, LIMIT_NV_ADDR2NAME, limit->cnl_addr2name); pack_limit(lnvl, LIMIT_NV_NAME2ADDR, limit->cnl_name2addr); pack_limit(lnvl, LIMIT_NV_CONNECT, limit->cnl_connect); pack_limit(lnvl, LIMIT_NV_BIND, limit->cnl_bind); chan = limit->cnl_chan; free(limit); return (cap_limit_set(chan, lnvl)); } void cap_net_free(cap_net_limit_t *limit) { if (limit == NULL) return; nvlist_destroy(limit->cnl_addr2name); nvlist_destroy(limit->cnl_name2addr); nvlist_destroy(limit->cnl_connect); nvlist_destroy(limit->cnl_bind); free(limit); } static void pack_family(nvlist_t *nvl, int *family, size_t size) { size_t i; i = 0; if (!nvlist_exists_number_array(nvl, "family")) { uint64_t val; val = family[0]; nvlist_add_number_array(nvl, "family", &val, 1); i += 1; } for (; i < size; i++) { nvlist_append_number_array(nvl, "family", family[i]); } } static void pack_sockaddr(nvlist_t *res, const struct sockaddr *sa, socklen_t salen) { nvlist_t *nvl; if (!nvlist_exists_nvlist(res, "sockaddr")) { nvl = nvlist_create(NV_FLAG_NO_UNIQUE); } else { nvl = nvlist_take_nvlist(res, "sockaddr"); } nvlist_add_binary(nvl, "", sa, salen); nvlist_move_nvlist(res, "sockaddr", nvl); } cap_net_limit_t * cap_net_limit_addr2name_family(cap_net_limit_t *limit, int *family, size_t size) { pack_family(limit->cnl_addr2name, family, size); return (limit); } cap_net_limit_t * cap_net_limit_name2addr_family(cap_net_limit_t *limit, int *family, size_t size) { pack_family(limit->cnl_name2addr, family, size); return (limit); } cap_net_limit_t * cap_net_limit_name2addr(cap_net_limit_t *limit, const char *host, const char *serv) { nvlist_t *nvl; if (!nvlist_exists_nvlist(limit->cnl_name2addr, "hosts")) { nvl = nvlist_create(NV_FLAG_NO_UNIQUE); } else { nvl = nvlist_take_nvlist(limit->cnl_name2addr, "hosts"); } nvlist_add_string(nvl, host != NULL ? host : "", serv != NULL ? serv : ""); nvlist_move_nvlist(limit->cnl_name2addr, "hosts", nvl); return (limit); } cap_net_limit_t * cap_net_limit_addr2name(cap_net_limit_t *limit, const struct sockaddr *sa, socklen_t salen) { pack_sockaddr(limit->cnl_addr2name, sa, salen); return (limit); } cap_net_limit_t * cap_net_limit_connect(cap_net_limit_t *limit, const struct sockaddr *sa, socklen_t salen) { pack_sockaddr(limit->cnl_connect, sa, salen); return (limit); } cap_net_limit_t * cap_net_limit_bind(cap_net_limit_t *limit, const struct sockaddr *sa, socklen_t salen) { pack_sockaddr(limit->cnl_bind, sa, salen); return (limit); } /* * Service functions. */ static nvlist_t *capdnscache; static void net_add_sockaddr_to_cache(struct sockaddr *sa, socklen_t salen, bool deprecated) { void *cookie; if (capdnscache == NULL) { capdnscache = nvlist_create(NV_FLAG_NO_UNIQUE); } else { /* Lets keep it clean. Look for dups. */ cookie = NULL; while (nvlist_next(capdnscache, NULL, &cookie) != NULL) { const void *data; size_t size; assert(cnvlist_type(cookie) == NV_TYPE_BINARY); data = cnvlist_get_binary(cookie, &size); if (salen != size) continue; if (memcmp(data, sa, size) == 0) return; } } nvlist_add_binary(capdnscache, deprecated ? "d" : "", sa, salen); } static void net_add_hostent_to_cache(const char *address, size_t asize, int family) { if (family != AF_INET && family != AF_INET6) return; if (family == AF_INET6) { struct sockaddr_in6 connaddr; memset(&connaddr, 0, sizeof(connaddr)); connaddr.sin6_family = AF_INET6; memcpy((char *)&connaddr.sin6_addr, address, asize); connaddr.sin6_port = 0; net_add_sockaddr_to_cache((struct sockaddr *)&connaddr, sizeof(connaddr), true); } else { struct sockaddr_in connaddr; memset(&connaddr, 0, sizeof(connaddr)); connaddr.sin_family = AF_INET; memcpy((char *)&connaddr.sin_addr.s_addr, address, asize); connaddr.sin_port = 0; net_add_sockaddr_to_cache((struct sockaddr *)&connaddr, sizeof(connaddr), true); } } static bool net_allowed_mode(const nvlist_t *limits, uint64_t mode) { if (limits == NULL) return (true); return ((nvlist_get_number(limits, "mode") & mode) == mode); } static bool net_allowed_family(const nvlist_t *limits, int family) { const uint64_t *allowedfamily; size_t i, allsize; if (limits == NULL) return (true); /* If there are no familes at all, allow any mode. */ if (!nvlist_exists_number_array(limits, "family")) return (true); allowedfamily = nvlist_get_number_array(limits, "family", &allsize); for (i = 0; i < allsize; i++) { /* XXX: what with AF_UNSPEC? */ if (allowedfamily[i] == (uint64_t)family) { return (true); } } return (false); } static bool net_allowed_bsaddr_impl(const nvlist_t *salimits, const void *saddr, size_t saddrsize) { void *cookie; const void *limit; size_t limitsize; cookie = NULL; while (nvlist_next(salimits, NULL, &cookie) != NULL) { limit = cnvlist_get_binary(cookie, &limitsize); if (limitsize != saddrsize) { continue; } if (memcmp(limit, saddr, limitsize) == 0) { return (true); } /* * In case of deprecated version (gethostbyname) we have to * ignore port, because there is no such info in the hostent. * Suporting only AF_INET and AF_INET6. */ if (strcmp(cnvlist_name(cookie), "d") != 0 || (saddrsize != sizeof(struct sockaddr_in) && saddrsize != sizeof(struct sockaddr_in6))) { continue; } if (saddrsize == sizeof(struct sockaddr_in)) { const struct sockaddr_in *saddrptr; struct sockaddr_in sockaddr; saddrptr = (const struct sockaddr_in *)saddr; memcpy(&sockaddr, limit, sizeof(sockaddr)); sockaddr.sin_port = saddrptr->sin_port; if (memcmp(&sockaddr, saddr, saddrsize) == 0) { return (true); } } else if (saddrsize == sizeof(struct sockaddr_in6)) { const struct sockaddr_in6 *saddrptr; struct sockaddr_in6 sockaddr; saddrptr = (const struct sockaddr_in6 *)saddr; memcpy(&sockaddr, limit, sizeof(sockaddr)); sockaddr.sin6_port = saddrptr->sin6_port; if (memcmp(&sockaddr, saddr, saddrsize) == 0) { return (true); } } } return (false); } static bool net_allowed_bsaddr(const nvlist_t *limits, const void *saddr, size_t saddrsize) { if (limits == NULL) return (true); if (!nvlist_exists_nvlist(limits, "sockaddr")) return (true); return (net_allowed_bsaddr_impl(nvlist_get_nvlist(limits, "sockaddr"), saddr, saddrsize)); } static bool net_allowed_hosts(const nvlist_t *limits, const char *name, const char *srvname) { void *cookie; const nvlist_t *hlimits; const char *testname, *testsrvname; if (limits == NULL) { return (true); } /* If there are no hosts at all, allow any. */ if (!nvlist_exists_nvlist(limits, "hosts")) { return (true); } cookie = NULL; testname = (name == NULL ? "" : name); testsrvname = (srvname == NULL ? "" : srvname); hlimits = nvlist_get_nvlist(limits, "hosts"); while (nvlist_next(hlimits, NULL, &cookie) != NULL) { if (strcmp(cnvlist_name(cookie), "") != 0 && strcmp(cnvlist_name(cookie), testname) != 0) { continue; } if (strcmp(cnvlist_get_string(cookie), "") != 0 && strcmp(cnvlist_get_string(cookie), testsrvname) != 0) { continue; } return (true); } return (false); } static void hostent_pack(const struct hostent *hp, nvlist_t *nvl, bool addtocache) { unsigned int ii; char nvlname[64]; int n; nvlist_add_string(nvl, "name", hp->h_name); nvlist_add_number(nvl, "addrtype", (uint64_t)hp->h_addrtype); nvlist_add_number(nvl, "length", (uint64_t)hp->h_length); if (hp->h_aliases == NULL) { nvlist_add_number(nvl, "naliases", 0); } else { for (ii = 0; hp->h_aliases[ii] != NULL; ii++) { n = snprintf(nvlname, sizeof(nvlname), "alias%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); nvlist_add_string(nvl, nvlname, hp->h_aliases[ii]); } nvlist_add_number(nvl, "naliases", (uint64_t)ii); } if (hp->h_addr_list == NULL) { nvlist_add_number(nvl, "naddrs", 0); } else { for (ii = 0; hp->h_addr_list[ii] != NULL; ii++) { n = snprintf(nvlname, sizeof(nvlname), "addr%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); nvlist_add_binary(nvl, nvlname, hp->h_addr_list[ii], (size_t)hp->h_length); if (addtocache) { net_add_hostent_to_cache(hp->h_addr_list[ii], hp->h_length, hp->h_addrtype); } } nvlist_add_number(nvl, "naddrs", (uint64_t)ii); } } static int net_gethostbyname(const nvlist_t *limits, const nvlist_t *nvlin, nvlist_t *nvlout) { struct hostent *hp; int family; const nvlist_t *funclimit; const char *name; bool dnscache; if (!net_allowed_mode(limits, CAPNET_DEPRECATED_NAME2ADDR)) return (ENOTCAPABLE); dnscache = net_allowed_mode(limits, CAPNET_CONNECTDNS); funclimit = NULL; if (limits != NULL) { funclimit = dnvlist_get_nvlist(limits, LIMIT_NV_NAME2ADDR, NULL); } family = (int)nvlist_get_number(nvlin, "family"); if (!net_allowed_family(funclimit, family)) return (ENOTCAPABLE); name = nvlist_get_string(nvlin, "name"); if (!net_allowed_hosts(funclimit, name, "")) return (ENOTCAPABLE); hp = gethostbyname2(name, family); if (hp == NULL) return (h_errno); hostent_pack(hp, nvlout, dnscache); return (0); } static int net_gethostbyaddr(const nvlist_t *limits, const nvlist_t *nvlin, nvlist_t *nvlout) { struct hostent *hp; const void *addr; size_t addrsize; int family; const nvlist_t *funclimit; if (!net_allowed_mode(limits, CAPNET_DEPRECATED_ADDR2NAME)) return (ENOTCAPABLE); funclimit = NULL; if (limits != NULL) { funclimit = dnvlist_get_nvlist(limits, LIMIT_NV_ADDR2NAME, NULL); } family = (int)nvlist_get_number(nvlin, "family"); if (!net_allowed_family(funclimit, family)) return (ENOTCAPABLE); addr = nvlist_get_binary(nvlin, "addr", &addrsize); if (!net_allowed_bsaddr(funclimit, addr, addrsize)) return (ENOTCAPABLE); hp = gethostbyaddr(addr, (socklen_t)addrsize, family); if (hp == NULL) return (h_errno); hostent_pack(hp, nvlout, false); return (0); } static int net_getnameinfo(const nvlist_t *limits, const nvlist_t *nvlin, nvlist_t *nvlout) { struct sockaddr_storage sast; const void *sabin; char *host, *serv; size_t sabinsize, hostlen, servlen; socklen_t salen; int error, flags; const nvlist_t *funclimit; if (!net_allowed_mode(limits, CAPNET_ADDR2NAME)) return (ENOTCAPABLE); funclimit = NULL; if (limits != NULL) { funclimit = dnvlist_get_nvlist(limits, LIMIT_NV_ADDR2NAME, NULL); } error = 0; host = serv = NULL; memset(&sast, 0, sizeof(sast)); hostlen = (size_t)nvlist_get_number(nvlin, "hostlen"); servlen = (size_t)nvlist_get_number(nvlin, "servlen"); if (hostlen > 0) { host = calloc(1, hostlen + 1); if (host == NULL) { error = EAI_MEMORY; goto out; } } if (servlen > 0) { serv = calloc(1, servlen + 1); if (serv == NULL) { error = EAI_MEMORY; goto out; } } sabin = nvlist_get_binary(nvlin, "sa", &sabinsize); if (sabinsize > sizeof(sast)) { error = EAI_FAIL; goto out; } if (!net_allowed_bsaddr(funclimit, sabin, sabinsize)) { error = ENOTCAPABLE; goto out; } memcpy(&sast, sabin, sabinsize); salen = (socklen_t)sabinsize; if ((sast.ss_family != AF_INET || salen != sizeof(struct sockaddr_in)) && (sast.ss_family != AF_INET6 || salen != sizeof(struct sockaddr_in6))) { error = EAI_FAIL; goto out; } if (!net_allowed_family(funclimit, (int)sast.ss_family)) { error = ENOTCAPABLE; goto out; } flags = (int)nvlist_get_number(nvlin, "flags"); error = getnameinfo((struct sockaddr *)&sast, salen, host, hostlen, serv, servlen, flags); if (error != 0) goto out; if (host != NULL) nvlist_move_string(nvlout, "host", host); if (serv != NULL) nvlist_move_string(nvlout, "serv", serv); out: if (error != 0) { free(host); free(serv); } return (error); } static nvlist_t * addrinfo_pack(const struct addrinfo *ai) { nvlist_t *nvl; nvl = nvlist_create(0); nvlist_add_number(nvl, "ai_flags", (uint64_t)ai->ai_flags); nvlist_add_number(nvl, "ai_family", (uint64_t)ai->ai_family); nvlist_add_number(nvl, "ai_socktype", (uint64_t)ai->ai_socktype); nvlist_add_number(nvl, "ai_protocol", (uint64_t)ai->ai_protocol); nvlist_add_binary(nvl, "ai_addr", ai->ai_addr, (size_t)ai->ai_addrlen); if (ai->ai_canonname != NULL) nvlist_add_string(nvl, "ai_canonname", ai->ai_canonname); return (nvl); } static int net_getaddrinfo(const nvlist_t *limits, const nvlist_t *nvlin, nvlist_t *nvlout) { struct addrinfo hints, *hintsp, *res, *cur; const char *hostname, *servname; char nvlname[64]; nvlist_t *elem; unsigned int ii; int error, family, n; const nvlist_t *funclimit; bool dnscache; if (!net_allowed_mode(limits, CAPNET_NAME2ADDR)) return (ENOTCAPABLE); dnscache = net_allowed_mode(limits, CAPNET_CONNECTDNS); funclimit = NULL; if (limits != NULL) { funclimit = dnvlist_get_nvlist(limits, LIMIT_NV_NAME2ADDR, NULL); } hostname = dnvlist_get_string(nvlin, "hostname", NULL); servname = dnvlist_get_string(nvlin, "servname", NULL); if (nvlist_exists_number(nvlin, "hints.ai_flags")) { hints.ai_flags = (int)nvlist_get_number(nvlin, "hints.ai_flags"); hints.ai_family = (int)nvlist_get_number(nvlin, "hints.ai_family"); hints.ai_socktype = (int)nvlist_get_number(nvlin, "hints.ai_socktype"); hints.ai_protocol = (int)nvlist_get_number(nvlin, "hints.ai_protocol"); hints.ai_addrlen = 0; hints.ai_addr = NULL; hints.ai_canonname = NULL; hints.ai_next = NULL; hintsp = &hints; family = hints.ai_family; } else { hintsp = NULL; family = AF_UNSPEC; } if (!net_allowed_family(funclimit, family)) return (ENOTCAPABLE); if (!net_allowed_hosts(funclimit, hostname, servname)) return (ENOTCAPABLE); error = getaddrinfo(hostname, servname, hintsp, &res); if (error != 0) { goto out; } for (cur = res, ii = 0; cur != NULL; cur = cur->ai_next, ii++) { elem = addrinfo_pack(cur); n = snprintf(nvlname, sizeof(nvlname), "res%u", ii); assert(n > 0 && n < (int)sizeof(nvlname)); nvlist_move_nvlist(nvlout, nvlname, elem); if (dnscache) { net_add_sockaddr_to_cache(cur->ai_addr, cur->ai_addrlen, false); } } freeaddrinfo(res); error = 0; out: return (error); } static int net_bind(const nvlist_t *limits, nvlist_t *nvlin, nvlist_t *nvlout) { int socket, serrno; const void *saddr; size_t len; const nvlist_t *funclimit; if (!net_allowed_mode(limits, CAPNET_BIND)) return (ENOTCAPABLE); funclimit = NULL; if (limits != NULL) funclimit = dnvlist_get_nvlist(limits, LIMIT_NV_BIND, NULL); saddr = nvlist_get_binary(nvlin, "saddr", &len); if (!net_allowed_bsaddr(funclimit, saddr, len)) return (ENOTCAPABLE); socket = nvlist_take_descriptor(nvlin, "s"); if (bind(socket, saddr, len) < 0) { serrno = errno; close(socket); return (serrno); } nvlist_move_descriptor(nvlout, "s", socket); return (0); } static int net_connect(const nvlist_t *limits, nvlist_t *nvlin, nvlist_t *nvlout) { int socket, serrno; const void *saddr; const nvlist_t *funclimit; size_t len; bool conn, conndns, allowed; conn = net_allowed_mode(limits, CAPNET_CONNECT); conndns = net_allowed_mode(limits, CAPNET_CONNECTDNS); if (!conn && !conndns) return (ENOTCAPABLE); funclimit = NULL; if (limits != NULL) funclimit = dnvlist_get_nvlist(limits, LIMIT_NV_CONNECT, NULL); saddr = nvlist_get_binary(nvlin, "saddr", &len); allowed = false; if (conn && net_allowed_bsaddr(funclimit, saddr, len)) { allowed = true; } if (conndns && capdnscache != NULL && net_allowed_bsaddr_impl(capdnscache, saddr, len)) { allowed = true; } if (allowed == false) { return (ENOTCAPABLE); } socket = dup(nvlist_get_descriptor(nvlin, "s")); if (connect(socket, saddr, len) < 0) { serrno = errno; close(socket); return (serrno); } nvlist_move_descriptor(nvlout, "s", socket); return (0); } static bool verify_only_sa_newlimts(const nvlist_t *oldfunclimits, const nvlist_t *newfunclimit) { void *cookie; cookie = NULL; while (nvlist_next(newfunclimit, NULL, &cookie) != NULL) { void *sacookie; if (strcmp(cnvlist_name(cookie), "sockaddr") != 0) return (false); if (cnvlist_type(cookie) != NV_TYPE_NVLIST) return (false); sacookie = NULL; while (nvlist_next(cnvlist_get_nvlist(cookie), NULL, &sacookie) != NULL) { const void *sa; size_t sasize; if (cnvlist_type(sacookie) != NV_TYPE_BINARY) return (false); sa = cnvlist_get_binary(sacookie, &sasize); if (!net_allowed_bsaddr(oldfunclimits, sa, sasize)) return (false); } } return (true); } static bool verify_bind_newlimts(const nvlist_t *oldlimits, const nvlist_t *newfunclimit) { const nvlist_t *oldfunclimits; oldfunclimits = NULL; if (oldlimits != NULL) { oldfunclimits = dnvlist_get_nvlist(oldlimits, LIMIT_NV_BIND, NULL); } return (verify_only_sa_newlimts(oldfunclimits, newfunclimit)); } static bool verify_connect_newlimits(const nvlist_t *oldlimits, const nvlist_t *newfunclimit) { const nvlist_t *oldfunclimits; oldfunclimits = NULL; if (oldlimits != NULL) { oldfunclimits = dnvlist_get_nvlist(oldlimits, LIMIT_NV_CONNECT, NULL); } return (verify_only_sa_newlimts(oldfunclimits, newfunclimit)); } static bool verify_addr2name_newlimits(const nvlist_t *oldlimits, const nvlist_t *newfunclimit) { void *cookie; const nvlist_t *oldfunclimits; oldfunclimits = NULL; if (oldlimits != NULL) { oldfunclimits = dnvlist_get_nvlist(oldlimits, LIMIT_NV_ADDR2NAME, NULL); } cookie = NULL; while (nvlist_next(newfunclimit, NULL, &cookie) != NULL) { if (strcmp(cnvlist_name(cookie), "sockaddr") == 0) { void *sacookie; if (cnvlist_type(cookie) != NV_TYPE_NVLIST) return (false); sacookie = NULL; while (nvlist_next(cnvlist_get_nvlist(cookie), NULL, &sacookie) != NULL) { const void *sa; size_t sasize; if (cnvlist_type(sacookie) != NV_TYPE_BINARY) return (false); sa = cnvlist_get_binary(sacookie, &sasize); if (!net_allowed_bsaddr(oldfunclimits, sa, sasize)) { return (false); } } } else if (strcmp(cnvlist_name(cookie), "family") == 0) { size_t i, sfamilies; const uint64_t *families; if (cnvlist_type(cookie) != NV_TYPE_NUMBER_ARRAY) return (false); families = cnvlist_get_number_array(cookie, &sfamilies); for (i = 0; i < sfamilies; i++) { if (!net_allowed_family(oldfunclimits, families[i])) { return (false); } } } else { return (false); } } return (true); } static bool verify_name2addr_newlimits(const nvlist_t *oldlimits, const nvlist_t *newfunclimit) { void *cookie; const nvlist_t *oldfunclimits; oldfunclimits = NULL; if (oldlimits != NULL) { oldfunclimits = dnvlist_get_nvlist(oldlimits, LIMIT_NV_NAME2ADDR, NULL); } cookie = NULL; while (nvlist_next(newfunclimit, NULL, &cookie) != NULL) { if (strcmp(cnvlist_name(cookie), "hosts") == 0) { void *hostcookie; if (cnvlist_type(cookie) != NV_TYPE_NVLIST) return (false); hostcookie = NULL; while (nvlist_next(cnvlist_get_nvlist(cookie), NULL, &hostcookie) != NULL) { if (cnvlist_type(hostcookie) != NV_TYPE_STRING) return (false); if (!net_allowed_hosts(oldfunclimits, cnvlist_name(hostcookie), cnvlist_get_string(hostcookie))) { return (false); } } } else if (strcmp(cnvlist_name(cookie), "family") == 0) { size_t i, sfamilies; const uint64_t *families; if (cnvlist_type(cookie) != NV_TYPE_NUMBER_ARRAY) return (false); families = cnvlist_get_number_array(cookie, &sfamilies); for (i = 0; i < sfamilies; i++) { if (!net_allowed_family(oldfunclimits, families[i])) { return (false); } } } else { return (false); } } return (true); } static int net_limit(const nvlist_t *oldlimits, const nvlist_t *newlimits) { const char *name; void *cookie; bool hasmode, hasconnect, hasbind, hasaddr2name, hasname2addr; /* * Modes: * ADDR2NAME: * getnameinfo * DEPRECATED_ADDR2NAME: * gethostbyaddr * * NAME2ADDR: * getaddrinfo * DEPRECATED_NAME2ADDR: * gethostbyname * * Limit scheme: * mode : NV_TYPE_NUMBER * connect : NV_TYPE_NVLIST * sockaddr : NV_TYPE_NVLIST * "" : NV_TYPE_BINARY * ... : NV_TYPE_BINARY * bind : NV_TYPE_NVLIST * sockaddr : NV_TYPE_NVLIST * "" : NV_TYPE_BINARY * ... : NV_TYPE_BINARY * addr2name : NV_TYPE_NVLIST * family : NV_TYPE_NUMBER_ARRAY * sockaddr : NV_TYPE_NVLIST * "" : NV_TYPE_BINARY * ... : NV_TYPE_BINARY * name2addr : NV_TYPE_NVLIST * family : NV_TYPE_NUMBER * hosts : NV_TYPE_NVLIST * host : servname : NV_TYPE_STRING */ hasmode = false; hasconnect = false; hasbind = false; hasaddr2name = false; hasname2addr = false; cookie = NULL; while ((name = nvlist_next(newlimits, NULL, &cookie)) != NULL) { if (strcmp(name, "mode") == 0) { if (cnvlist_type(cookie) != NV_TYPE_NUMBER) { return (NO_RECOVERY); } if (!net_allowed_mode(oldlimits, cnvlist_get_number(cookie))) { return (ENOTCAPABLE); } hasmode = true; continue; } if (cnvlist_type(cookie) != NV_TYPE_NVLIST) { return (NO_RECOVERY); } if (strcmp(name, LIMIT_NV_BIND) == 0) { hasbind = true; if (!verify_bind_newlimts(oldlimits, cnvlist_get_nvlist(cookie))) { return (ENOTCAPABLE); } } else if (strcmp(name, LIMIT_NV_CONNECT) == 0) { hasconnect = true; if (!verify_connect_newlimits(oldlimits, cnvlist_get_nvlist(cookie))) { return (ENOTCAPABLE); } } else if (strcmp(name, LIMIT_NV_ADDR2NAME) == 0) { hasaddr2name = true; if (!verify_addr2name_newlimits(oldlimits, cnvlist_get_nvlist(cookie))) { return (ENOTCAPABLE); } } else if (strcmp(name, LIMIT_NV_NAME2ADDR) == 0) { hasname2addr = true; if (!verify_name2addr_newlimits(oldlimits, cnvlist_get_nvlist(cookie))) { return (ENOTCAPABLE); } } } /* Mode is required. */ if (!hasmode) return (ENOTCAPABLE); /* * If the new limit doesn't mention mode or family we have to * check if the current limit does have those. Missing mode or * family in the limit means that all modes or families are * allowed. */ if (oldlimits == NULL) return (0); if (!hasbind && nvlist_exists(oldlimits, LIMIT_NV_BIND)) return (ENOTCAPABLE); if (!hasconnect && nvlist_exists(oldlimits, LIMIT_NV_CONNECT)) return (ENOTCAPABLE); if (!hasaddr2name && nvlist_exists(oldlimits, LIMIT_NV_ADDR2NAME)) return (ENOTCAPABLE); if (!hasname2addr && nvlist_exists(oldlimits, LIMIT_NV_NAME2ADDR)) return (ENOTCAPABLE); return (0); } static int net_command(const char *cmd, const nvlist_t *limits, nvlist_t *nvlin, nvlist_t *nvlout) { if (strcmp(cmd, "bind") == 0) return (net_bind(limits, nvlin, nvlout)); else if (strcmp(cmd, "connect") == 0) return (net_connect(limits, nvlin, nvlout)); else if (strcmp(cmd, "gethostbyname") == 0) return (net_gethostbyname(limits, nvlin, nvlout)); else if (strcmp(cmd, "gethostbyaddr") == 0) return (net_gethostbyaddr(limits, nvlin, nvlout)); else if (strcmp(cmd, "getnameinfo") == 0) return (net_getnameinfo(limits, nvlin, nvlout)); else if (strcmp(cmd, "getaddrinfo") == 0) return (net_getaddrinfo(limits, nvlin, nvlout)); return (EINVAL); } CREATE_SERVICE("system.net", net_limit, net_command, 0);