#include "cups-private.h"
#ifdef HAVE_RESOLV_H
# include <resolv.h>
#endif
#ifdef __APPLE__
# include <CoreFoundation/CoreFoundation.h>
# include <SystemConfiguration/SystemConfiguration.h>
#endif
int
httpAddrAny(const http_addr_t *addr)
{
if (!addr)
return (0);
#ifdef AF_INET6
if (addr->addr.sa_family == AF_INET6 &&
IN6_IS_ADDR_UNSPECIFIED(&(addr->ipv6.sin6_addr)))
return (1);
#endif
if (addr->addr.sa_family == AF_INET &&
ntohl(addr->ipv4.sin_addr.s_addr) == 0x00000000)
return (1);
return (0);
}
int
httpAddrEqual(const http_addr_t *addr1,
const http_addr_t *addr2)
{
if (!addr1 && !addr2)
return (1);
if (!addr1 || !addr2)
return (0);
if (addr1->addr.sa_family != addr2->addr.sa_family)
return (0);
#ifdef AF_LOCAL
if (addr1->addr.sa_family == AF_LOCAL)
return (!strcmp(addr1->un.sun_path, addr2->un.sun_path));
#endif
#ifdef AF_INET6
if (addr1->addr.sa_family == AF_INET6)
return (!memcmp(&(addr1->ipv6.sin6_addr), &(addr2->ipv6.sin6_addr), 16));
#endif
return (addr1->ipv4.sin_addr.s_addr == addr2->ipv4.sin_addr.s_addr);
}
int
httpAddrLength(const http_addr_t *addr)
{
if (!addr)
return (0);
#ifdef AF_INET6
if (addr->addr.sa_family == AF_INET6)
return (sizeof(addr->ipv6));
else
#endif
#ifdef AF_LOCAL
if (addr->addr.sa_family == AF_LOCAL)
return (offsetof(struct sockaddr_un, sun_path) +
strlen(addr->un.sun_path) + 1);
else
#endif
if (addr->addr.sa_family == AF_INET)
return (sizeof(addr->ipv4));
else
return (0);
}
int
httpAddrListen(http_addr_t *addr,
int port)
{
int fd = -1,
val;
if (!addr || port <= 0)
return (-1);
if ((fd = socket(addr->addr.sa_family, SOCK_STREAM, 0)) < 0)
{
_cupsSetHTTPError(HTTP_STATUS_ERROR);
return (-1);
}
val = 1;
setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, CUPS_SOCAST &val, sizeof(val));
#ifdef IPV6_V6ONLY
if (addr->addr.sa_family == AF_INET6)
setsockopt(fd, IPPROTO_IPV6, IPV6_V6ONLY, CUPS_SOCAST &val, sizeof(val));
#endif
_httpAddrSetPort(addr, port);
if (bind(fd, (struct sockaddr *)addr, httpAddrLength(addr)))
{
_cupsSetHTTPError(HTTP_STATUS_ERROR);
close(fd);
return (-1);
}
if (listen(fd, 5))
{
_cupsSetHTTPError(HTTP_STATUS_ERROR);
close(fd);
return (-1);
}
#ifdef SO_NOSIGPIPE
val = 1;
setsockopt(fd, SOL_SOCKET, SO_NOSIGPIPE, CUPS_SOCAST &val, sizeof(val));
#endif
return (fd);
}
int
httpAddrLocalhost(
const http_addr_t *addr)
{
if (!addr)
return (1);
#ifdef AF_INET6
if (addr->addr.sa_family == AF_INET6 &&
IN6_IS_ADDR_LOOPBACK(&(addr->ipv6.sin6_addr)))
return (1);
#endif
#ifdef AF_LOCAL
if (addr->addr.sa_family == AF_LOCAL)
return (1);
#endif
if (addr->addr.sa_family == AF_INET &&
(ntohl(addr->ipv4.sin_addr.s_addr) & 0xff000000) == 0x7f000000)
return (1);
return (0);
}
char *
httpAddrLookup(
const http_addr_t *addr,
char *name,
int namelen)
{
_cups_globals_t *cg = _cupsGlobals();
DEBUG_printf(("httpAddrLookup(addr=%p, name=%p, namelen=%d)", addr, name,
namelen));
if (!addr || !name || namelen <= 2)
{
if (name && namelen >= 1)
*name = '\0';
return (NULL);
}
#ifdef AF_LOCAL
if (addr->addr.sa_family == AF_LOCAL)
{
strlcpy(name, addr->un.sun_path, namelen);
return (name);
}
#endif
if (httpAddrLocalhost(addr))
{
strlcpy(name, "localhost", namelen);
return (name);
}
#ifdef HAVE_RES_INIT
if (cg->need_res_init)
{
res_init();
cg->need_res_init = 0;
}
#endif
#ifdef HAVE_GETNAMEINFO
{
int error = getnameinfo(&addr->addr, httpAddrLength(addr), name, namelen,
NULL, 0, 0);
if (error)
{
if (error == EAI_FAIL)
cg->need_res_init = 1;
return (httpAddrString(addr, name, namelen));
}
}
#else
{
struct hostent *host;
# ifdef AF_INET6
if (addr->addr.sa_family == AF_INET6)
host = gethostbyaddr((char *)&(addr->ipv6.sin6_addr),
sizeof(struct in_addr), AF_INET6);
else
# endif
host = gethostbyaddr((char *)&(addr->ipv4.sin_addr),
sizeof(struct in_addr), AF_INET);
if (host == NULL)
{
if (h_errno == NO_RECOVERY)
cg->need_res_init = 1;
return (httpAddrString(addr, name, namelen));
}
strlcpy(name, host->h_name, namelen);
}
#endif
DEBUG_printf(("1httpAddrLookup: returning \"%s\"...", name));
return (name);
}
int
httpAddrPort(http_addr_t *addr)
{
if (!addr)
return (ippPort());
#ifdef AF_INET6
else if (addr->addr.sa_family == AF_INET6)
return (ntohs(addr->ipv6.sin6_port));
#endif
else if (addr->addr.sa_family == AF_INET)
return (ntohs(addr->ipv4.sin_port));
else
return (ippPort());
}
int _httpAddrPort(http_addr_t *addr) { return (httpAddrPort(addr)); }
void
_httpAddrSetPort(http_addr_t *addr,
int port)
{
if (!addr || port <= 0)
return;
#ifdef AF_INET6
if (addr->addr.sa_family == AF_INET6)
addr->ipv6.sin6_port = htons(port);
else
#endif
if (addr->addr.sa_family == AF_INET)
addr->ipv4.sin_port = htons(port);
}
char *
httpAddrString(const http_addr_t *addr,
char *s,
int slen)
{
DEBUG_printf(("httpAddrString(addr=%p, s=%p, slen=%d)", addr, s, slen));
if (!addr || !s || slen <= 2)
{
if (s && slen >= 1)
*s = '\0';
return (NULL);
}
#ifdef AF_LOCAL
if (addr->addr.sa_family == AF_LOCAL)
{
if (addr->un.sun_path[0] == '/')
strlcpy(s, addr->un.sun_path, slen);
else
strlcpy(s, "localhost", slen);
}
else
#endif
if (addr->addr.sa_family == AF_INET)
{
unsigned temp;
temp = ntohl(addr->ipv4.sin_addr.s_addr);
snprintf(s, slen, "%d.%d.%d.%d", (temp >> 24) & 255,
(temp >> 16) & 255, (temp >> 8) & 255, temp & 255);
}
#ifdef AF_INET6
else if (addr->addr.sa_family == AF_INET6)
{
char *sptr,
temps[64];
# ifdef HAVE_GETNAMEINFO
if (getnameinfo(&addr->addr, httpAddrLength(addr), temps, sizeof(temps),
NULL, 0, NI_NUMERICHOST))
{
s[0] = '\0';
return (NULL);
}
else if ((sptr = strchr(temps, '%')) != NULL)
{
*sptr = '+';
}
# else
int i;
unsigned temp;
const char *prefix;
prefix = "";
for (sptr = temps, i = 0; i < 4 && addr->ipv6.sin6_addr.s6_addr32[i]; i ++)
{
temp = ntohl(addr->ipv6.sin6_addr.s6_addr32[i]);
snprintf(sptr, sizeof(temps) - (sptr - temps), "%s%x", prefix,
(temp >> 16) & 0xffff);
prefix = ":";
sptr += strlen(sptr);
temp &= 0xffff;
if (temp || i == 3 || addr->ipv6.sin6_addr.s6_addr32[i + 1])
{
snprintf(sptr, sizeof(temps) - (sptr - temps), "%s%x", prefix, temp);
sptr += strlen(sptr);
}
}
if (i < 4)
{
while (i < 4 && !addr->ipv6.sin6_addr.s6_addr32[i])
i ++;
if (i < 4)
{
snprintf(sptr, sizeof(temps) - (sptr - temps), "%s:", prefix);
prefix = ":";
sptr += strlen(sptr);
for (; i < 4; i ++)
{
temp = ntohl(addr->ipv6.sin6_addr.s6_addr32[i]);
if ((temp & 0xffff0000) ||
(i > 0 && addr->ipv6.sin6_addr.s6_addr32[i - 1]))
{
snprintf(sptr, sizeof(temps) - (sptr - temps), "%s%x", prefix,
(temp >> 16) & 0xffff);
sptr += strlen(sptr);
}
snprintf(sptr, sizeof(temps) - (sptr - temps), "%s%x", prefix,
temp & 0xffff);
sptr += strlen(sptr);
}
}
else if (sptr == s)
{
strlcpy(temps, "::", sizeof(temps));
}
else
{
strlcpy(sptr, "::", sizeof(temps) - (sptr - temps));
}
}
# endif
snprintf(s, slen, "[v1.%s]", temps);
}
#endif
else
strlcpy(s, "UNKNOWN", slen);
DEBUG_printf(("1httpAddrString: returning \"%s\"...", s));
return (s);
}
struct hostent *
httpGetHostByName(const char *name)
{
const char *nameptr;
unsigned ip[4];
_cups_globals_t *cg = _cupsGlobals();
DEBUG_printf(("httpGetHostByName(name=\"%s\")", name));
if (!strcmp(name, "localhost"))
name = "127.0.0.1";
#ifdef AF_LOCAL
if (name[0] == '/')
{
cg->hostent.h_name = (char *)name;
cg->hostent.h_aliases = NULL;
cg->hostent.h_addrtype = AF_LOCAL;
cg->hostent.h_length = strlen(name) + 1;
cg->hostent.h_addr_list = cg->ip_ptrs;
cg->ip_ptrs[0] = (char *)name;
cg->ip_ptrs[1] = NULL;
DEBUG_puts("1httpGetHostByName: returning domain socket address...");
return (&cg->hostent);
}
#endif
for (nameptr = name; isdigit(*nameptr & 255) || *nameptr == '.'; nameptr ++);
if (!*nameptr)
{
if (sscanf(name, "%u.%u.%u.%u", ip, ip + 1, ip + 2, ip + 3) != 4)
return (NULL);
if (ip[0] > 255 || ip[1] > 255 || ip[2] > 255 || ip[3] > 255)
return (NULL);
cg->ip_addr = htonl(((((((ip[0] << 8) | ip[1]) << 8) | ip[2]) << 8) |
ip[3]));
cg->hostent.h_name = (char *)name;
cg->hostent.h_aliases = NULL;
cg->hostent.h_addrtype = AF_INET;
cg->hostent.h_length = 4;
cg->hostent.h_addr_list = cg->ip_ptrs;
cg->ip_ptrs[0] = (char *)&(cg->ip_addr);
cg->ip_ptrs[1] = NULL;
DEBUG_puts("1httpGetHostByName: returning IPv4 address...");
return (&cg->hostent);
}
else
{
DEBUG_puts("1httpGetHostByName: returning domain lookup address(es)...");
return (gethostbyname(name));
}
}
const char *
httpGetHostname(http_t *http,
char *s,
int slen)
{
if (!s || slen <= 1)
return (NULL);
if (http)
{
if (http->hostname[0] == '/')
strlcpy(s, "localhost", slen);
else
strlcpy(s, http->hostname, slen);
}
else
{
if (gethostname(s, slen) < 0)
strlcpy(s, "localhost", slen);
if (!strchr(s, '.'))
{
#ifdef HAVE_SCDYNAMICSTORECOPYCOMPUTERNAME
SCDynamicStoreRef sc = SCDynamicStoreCreate(kCFAllocatorDefault,
CFSTR("libcups"), NULL, NULL);
CFStringRef local = sc ? SCDynamicStoreCopyLocalHostName(sc) : NULL;
char localStr[1024];
if (local && CFStringGetCString(local, localStr, sizeof(localStr),
kCFStringEncodingUTF8))
{
snprintf(s, slen, "%s.local.", localStr);
}
if (local)
CFRelease(local);
if (sc)
CFRelease(sc);
#else
struct hostent *host;
if ((host = gethostbyname(s)) != NULL && host->h_name)
{
strlcpy(s, host->h_name, slen);
}
#endif
}
}
return (s);
}