#include "cups-private.h"
#ifdef HAVE_DNSSD
# include <dns_sd.h>
# ifdef WIN32
# include <io.h>
# elif defined(HAVE_POLL)
# include <poll.h>
# else
# include <sys/select.h>
# endif
#elif defined(HAVE_AVAHI)
# include <avahi-client/client.h>
# include <avahi-client/lookup.h>
# include <avahi-common/simple-watch.h>
#endif
typedef struct _http_uribuf_s
{
#ifdef HAVE_AVAHI
AvahiSimplePoll *poll;
#endif
char *buffer;
size_t bufsize;
int options;
const char *resource;
} _http_uribuf_t;
static const char * const http_days[7] =
{
"Sun",
"Mon",
"Tue",
"Wed",
"Thu",
"Fri",
"Sat"
};
static const char * const http_months[12] =
{
"Jan",
"Feb",
"Mar",
"Apr",
"May",
"Jun",
"Jul",
"Aug",
"Sep",
"Oct",
"Nov",
"Dec"
};
static const char *http_copy_decode(char *dst, const char *src,
int dstsize, const char *term,
int decode);
static char *http_copy_encode(char *dst, const char *src,
char *dstend, const char *reserved,
const char *term, int encode);
#ifdef HAVE_DNSSD
static void DNSSD_API http_resolve_cb(DNSServiceRef sdRef,
DNSServiceFlags flags,
uint32_t interfaceIndex,
DNSServiceErrorType errorCode,
const char *fullName,
const char *hostTarget,
uint16_t port, uint16_t txtLen,
const unsigned char *txtRecord,
void *context);
#endif
#ifdef HAVE_AVAHI
static void http_client_cb(AvahiClient *client,
AvahiClientState state, void *simple_poll);
static int http_poll_cb(struct pollfd *pollfds, unsigned int num_pollfds,
int timeout, void *context);
static void http_resolve_cb(AvahiServiceResolver *resolver,
AvahiIfIndex interface,
AvahiProtocol protocol,
AvahiResolverEvent event,
const char *name, const char *type,
const char *domain, const char *host_name,
const AvahiAddress *address, uint16_t port,
AvahiStringList *txt,
AvahiLookupResultFlags flags, void *context);
#endif
http_uri_status_t
httpAssembleURI(
http_uri_coding_t encoding,
char *uri,
int urilen,
const char *scheme,
const char *username,
const char *host,
int port,
const char *resource)
{
char *ptr,
*end;
if (!uri || urilen < 1 || !scheme || port < 0)
{
if (uri)
*uri = '\0';
return (HTTP_URI_STATUS_BAD_ARGUMENTS);
}
end = uri + urilen - 1;
ptr = http_copy_encode(uri, scheme, end, NULL, NULL, 0);
if (!ptr)
goto assemble_overflow;
if (!strcmp(scheme, "mailto"))
{
if (ptr < end)
*ptr++ = ':';
else
goto assemble_overflow;
}
else
{
if ((ptr + 2) < end)
{
*ptr++ = ':';
*ptr++ = '/';
*ptr++ = '/';
}
else
goto assemble_overflow;
}
if (host)
{
const char *hostptr;
int have_ipv6;
if (username && *username)
{
ptr = http_copy_encode(ptr, username, end, "/?#[]@", NULL,
encoding & HTTP_URI_CODING_USERNAME);
if (!ptr)
goto assemble_overflow;
if (ptr < end)
*ptr++ = '@';
else
goto assemble_overflow;
}
for (hostptr = host,
have_ipv6 = strchr(host, ':') && !strstr(host, "._tcp");
*hostptr && have_ipv6;
hostptr ++)
if (*hostptr != ':' && !isxdigit(*hostptr & 255))
{
have_ipv6 = *hostptr == '%';
break;
}
if (have_ipv6)
{
if (strchr(host, '%') && !(encoding & HTTP_URI_CODING_RFC6874))
{
if ((ptr + 4) < end)
{
*ptr++ = '[';
*ptr++ = 'v';
*ptr++ = '1';
*ptr++ = '.';
}
else
goto assemble_overflow;
}
else
{
if (ptr < end)
*ptr++ = '[';
else
goto assemble_overflow;
}
while (ptr < end && *host)
{
if (*host == '%')
{
if (encoding & HTTP_URI_CODING_RFC6874)
{
if (ptr >= (end - 2))
goto assemble_overflow;
*ptr++ = '%';
*ptr++ = '2';
*ptr++ = '5';
}
else
*ptr++ = '+';
host ++;
}
else
*ptr++ = *host++;
}
if (*host)
goto assemble_overflow;
if (ptr < end)
*ptr++ = ']';
else
goto assemble_overflow;
}
else
{
ptr = http_copy_encode(ptr, host, end, "\"#/:<>?@[\\]^`{|}", NULL,
encoding & HTTP_URI_CODING_HOSTNAME);
if (!ptr)
goto assemble_overflow;
}
if (port > 0)
{
snprintf(ptr, end - ptr + 1, ":%d", port);
ptr += strlen(ptr);
if (ptr >= end)
goto assemble_overflow;
}
}
if (resource)
{
char *query;
query = strchr(resource, '?');
ptr = http_copy_encode(ptr, resource, end, NULL, "?",
encoding & HTTP_URI_CODING_RESOURCE);
if (!ptr)
goto assemble_overflow;
if (query)
{
ptr = http_copy_encode(ptr, query, end, NULL, NULL,
encoding & HTTP_URI_CODING_QUERY);
if (!ptr)
goto assemble_overflow;
}
}
else if (ptr < end)
*ptr++ = '/';
else
goto assemble_overflow;
*ptr = '\0';
return (HTTP_URI_STATUS_OK);
assemble_overflow:
*uri = '\0';
return (HTTP_URI_STATUS_OVERFLOW);
}
http_uri_status_t
httpAssembleURIf(
http_uri_coding_t encoding,
char *uri,
int urilen,
const char *scheme,
const char *username,
const char *host,
int port,
const char *resourcef,
...)
{
va_list ap;
char resource[1024];
int bytes;
if (!uri || urilen < 1 || !scheme || port < 0 || !resourcef)
{
if (uri)
*uri = '\0';
return (HTTP_URI_STATUS_BAD_ARGUMENTS);
}
va_start(ap, resourcef);
bytes = vsnprintf(resource, sizeof(resource), resourcef, ap);
va_end(ap);
if (bytes >= sizeof(resource))
{
*uri = '\0';
return (HTTP_URI_STATUS_OVERFLOW);
}
else
return (httpAssembleURI(encoding, uri, urilen, scheme, username, host,
port, resource));
}
char *
httpAssembleUUID(const char *server,
int port,
const char *name,
int number,
char *buffer,
size_t bufsize)
{
char data[1024];
_cups_md5_state_t md5state;
unsigned char md5sum[16];
snprintf(data, sizeof(data), "%s:%d:%s:%d:%04x:%04x", server,
port, name ? name : server, number,
(unsigned)CUPS_RAND() & 0xffff, (unsigned)CUPS_RAND() & 0xffff);
_cupsMD5Init(&md5state);
_cupsMD5Append(&md5state, (unsigned char *)data, strlen(data));
_cupsMD5Finish(&md5state, md5sum);
snprintf(buffer, bufsize,
"urn:uuid:%02x%02x%02x%02x-%02x%02x-%02x%02x-%02x%02x-"
"%02x%02x%02x%02x%02x%02x",
md5sum[0], md5sum[1], md5sum[2], md5sum[3], md5sum[4], md5sum[5],
(md5sum[6] & 15) | 0x30, md5sum[7], (md5sum[8] & 0x3f) | 0x40,
md5sum[9], md5sum[10], md5sum[11], md5sum[12], md5sum[13],
md5sum[14], md5sum[15]);
return (buffer);
}
char *_httpAssembleUUID(const char *server, int port, const char *name,
int number, char *buffer, size_t bufsize)
{
return (httpAssembleUUID(server, port, name, number, buffer, bufsize));
}
char *
httpDecode64(char *out,
const char *in)
{
int outlen;
outlen = 512;
return (httpDecode64_2(out, &outlen, in));
}
char *
httpDecode64_2(char *out,
int *outlen,
const char *in)
{
int pos,
base64;
char *outptr,
*outend;
if (!out || !outlen || *outlen < 1 || !in)
return (NULL);
if (!*in)
{
*out = '\0';
*outlen = 0;
return (out);
}
for (outptr = out, outend = out + *outlen - 1, pos = 0; *in != '\0'; in ++)
{
if (*in >= 'A' && *in <= 'Z')
base64 = *in - 'A';
else if (*in >= 'a' && *in <= 'z')
base64 = *in - 'a' + 26;
else if (*in >= '0' && *in <= '9')
base64 = *in - '0' + 52;
else if (*in == '+')
base64 = 62;
else if (*in == '/')
base64 = 63;
else if (*in == '=')
break;
else
continue;
switch (pos)
{
case 0 :
if (outptr < outend)
*outptr = base64 << 2;
pos ++;
break;
case 1 :
if (outptr < outend)
*outptr++ |= (base64 >> 4) & 3;
if (outptr < outend)
*outptr = (base64 << 4) & 255;
pos ++;
break;
case 2 :
if (outptr < outend)
*outptr++ |= (base64 >> 2) & 15;
if (outptr < outend)
*outptr = (base64 << 6) & 255;
pos ++;
break;
case 3 :
if (outptr < outend)
*outptr++ |= base64;
pos = 0;
break;
}
}
*outptr = '\0';
*outlen = (int)(outptr - out);
return (out);
}
char *
httpEncode64(char *out,
const char *in)
{
return (httpEncode64_2(out, 512, in, (int)strlen(in)));
}
char *
httpEncode64_2(char *out,
int outlen,
const char *in,
int inlen)
{
char *outptr,
*outend;
static const char base64[] =
{
"ABCDEFGHIJKLMNOPQRSTUVWXYZ"
"abcdefghijklmnopqrstuvwxyz"
"0123456789"
"+/"
};
if (!out || outlen < 1 || !in)
return (NULL);
for (outptr = out, outend = out + outlen - 1; inlen > 0; in ++, inlen --)
{
if (outptr < outend)
*outptr ++ = base64[(in[0] & 255) >> 2];
if (outptr < outend)
{
if (inlen > 1)
*outptr ++ = base64[(((in[0] & 255) << 4) | ((in[1] & 255) >> 4)) & 63];
else
*outptr ++ = base64[((in[0] & 255) << 4) & 63];
}
in ++;
inlen --;
if (inlen <= 0)
{
if (outptr < outend)
*outptr ++ = '=';
if (outptr < outend)
*outptr ++ = '=';
break;
}
if (outptr < outend)
{
if (inlen > 1)
*outptr ++ = base64[(((in[0] & 255) << 2) | ((in[1] & 255) >> 6)) & 63];
else
*outptr ++ = base64[((in[0] & 255) << 2) & 63];
}
in ++;
inlen --;
if (inlen <= 0)
{
if (outptr < outend)
*outptr ++ = '=';
break;
}
if (outptr < outend)
*outptr ++ = base64[in[0] & 63];
}
*outptr = '\0';
return (out);
}
const char *
httpGetDateString(time_t t)
{
_cups_globals_t *cg = _cupsGlobals();
return (httpGetDateString2(t, cg->http_date, sizeof(cg->http_date)));
}
const char *
httpGetDateString2(time_t t,
char *s,
int slen)
{
struct tm *tdate;
tdate = gmtime(&t);
if (tdate)
snprintf(s, slen, "%s, %02d %s %d %02d:%02d:%02d GMT",
http_days[tdate->tm_wday], tdate->tm_mday,
http_months[tdate->tm_mon], tdate->tm_year + 1900,
tdate->tm_hour, tdate->tm_min, tdate->tm_sec);
else
s[0] = '\0';
return (s);
}
time_t
httpGetDateTime(const char *s)
{
int i;
char mon[16];
int day, year;
int hour, min, sec;
int days;
static const int normal_days[] =
{ 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334, 365 };
static const int leap_days[] =
{ 0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335, 366 };
DEBUG_printf(("2httpGetDateTime(s=\"%s\")", s));
if (sscanf(s, "%*s%d%15s%d%d:%d:%d", &day, mon, &year, &hour, &min, &sec) < 6)
return (0);
DEBUG_printf(("4httpGetDateTime: day=%d, mon=\"%s\", year=%d, hour=%d, "
"min=%d, sec=%d", day, mon, year, hour, min, sec));
for (i = 0; i < 12; i ++)
if (!_cups_strcasecmp(mon, http_months[i]))
break;
if (i >= 12)
return (0);
DEBUG_printf(("4httpGetDateTime: i=%d", i));
if ((year & 3) == 0 && ((year % 100) != 0 || (year % 400) == 0))
days = leap_days[i] + day - 1;
else
days = normal_days[i] + day - 1;
DEBUG_printf(("4httpGetDateTime: days=%d", days));
days += (year - 1970) * 365 +
((year - 1) / 4 - 492) -
((year - 1) / 100 - 19) +
((year - 1) / 400 - 4);
DEBUG_printf(("4httpGetDateTime: days=%d\n", days));
return (days * 86400 + hour * 3600 + min * 60 + sec);
}
void
httpSeparate(const char *uri,
char *scheme,
char *username,
char *host,
int *port,
char *resource)
{
httpSeparateURI(HTTP_URI_CODING_ALL, uri, scheme, 32, username,
HTTP_MAX_URI, host, HTTP_MAX_URI, port, resource,
HTTP_MAX_URI);
}
void
httpSeparate2(const char *uri,
char *scheme,
int schemelen,
char *username,
int usernamelen,
char *host,
int hostlen,
int *port,
char *resource,
int resourcelen)
{
httpSeparateURI(HTTP_URI_CODING_ALL, uri, scheme, schemelen, username,
usernamelen, host, hostlen, port, resource, resourcelen);
}
http_uri_status_t
httpSeparateURI(
http_uri_coding_t decoding,
const char *uri,
char *scheme,
int schemelen,
char *username,
int usernamelen,
char *host,
int hostlen,
int *port,
char *resource,
int resourcelen)
{
char *ptr,
*end;
const char *sep;
http_uri_status_t status;
if (scheme && schemelen > 0)
*scheme = '\0';
if (username && usernamelen > 0)
*username = '\0';
if (host && hostlen > 0)
*host = '\0';
if (port)
*port = 0;
if (resource && resourcelen > 0)
*resource = '\0';
if (!uri || !port || !scheme || schemelen <= 0 || !username ||
usernamelen <= 0 || !host || hostlen <= 0 || !resource ||
resourcelen <= 0)
return (HTTP_URI_STATUS_BAD_ARGUMENTS);
if (!*uri)
return (HTTP_URI_STATUS_BAD_URI);
status = HTTP_URI_STATUS_OK;
if (!strncmp(uri, "//", 2))
{
strlcpy(scheme, "ipp", schemelen);
status = HTTP_URI_STATUS_MISSING_SCHEME;
}
else if (*uri == '/')
{
strlcpy(scheme, "file", schemelen);
status = HTTP_URI_STATUS_MISSING_SCHEME;
}
else
{
for (ptr = scheme, end = scheme + schemelen - 1;
*uri && *uri != ':' && ptr < end;)
if (strchr("ABCDEFGHIJKLMNOPQRSTUVWXYZ"
"abcdefghijklmnopqrstuvwxyz"
"0123456789-+.", *uri) != NULL)
*ptr++ = *uri++;
else
break;
*ptr = '\0';
if (*uri != ':')
{
*scheme = '\0';
return (HTTP_URI_STATUS_BAD_SCHEME);
}
uri ++;
}
if (!strcmp(scheme, "http"))
*port = 80;
else if (!strcmp(scheme, "https"))
*port = 443;
else if (!strcmp(scheme, "ipp") || !strcmp(scheme, "ipps"))
*port = 631;
else if (!_cups_strcasecmp(scheme, "lpd"))
*port = 515;
else if (!strcmp(scheme, "socket"))
*port = 9100;
else if (strcmp(scheme, "file") && strcmp(scheme, "mailto"))
status = HTTP_URI_STATUS_UNKNOWN_SCHEME;
if (!strncmp(uri, "//", 2))
{
uri += 2;
if ((sep = strpbrk(uri, "@/")) != NULL && *sep == '@')
{
uri = http_copy_decode(username, uri, usernamelen, "@",
decoding & HTTP_URI_CODING_USERNAME);
if (!uri)
{
*username = '\0';
return (HTTP_URI_STATUS_BAD_USERNAME);
}
uri ++;
}
if (*uri == '[')
{
uri ++;
if (*uri == 'v')
{
uri ++;
while (isxdigit(*uri & 255))
uri ++;
if (*uri != '.')
{
*host = '\0';
return (HTTP_URI_STATUS_BAD_HOSTNAME);
}
uri ++;
}
uri = http_copy_decode(host, uri, hostlen, "]",
decoding & HTTP_URI_CODING_HOSTNAME);
if (!uri)
{
*host = '\0';
return (HTTP_URI_STATUS_BAD_HOSTNAME);
}
if (*uri != ']')
{
*host = '\0';
return (HTTP_URI_STATUS_BAD_HOSTNAME);
}
uri ++;
for (ptr = host; *ptr; ptr ++)
if (*ptr == '+')
{
*ptr = '%';
break;
}
else if (*ptr == '%')
{
break;
}
else if (*ptr != ':' && *ptr != '.' && !isxdigit(*ptr & 255))
{
*host = '\0';
return (HTTP_URI_STATUS_BAD_HOSTNAME);
}
}
else
{
for (ptr = (char *)uri; *ptr; ptr ++)
if (strchr(":?/", *ptr))
break;
else if (!strchr("abcdefghijklmnopqrstuvwxyz"
"ABCDEFGHIJKLMNOPQRSTUVWXYZ"
"0123456789"
"-._~"
"%"
"!$&'()*+,;="
"\\", *ptr))
{
*host = '\0';
return (HTTP_URI_STATUS_BAD_HOSTNAME);
}
uri = http_copy_decode(host, uri, hostlen, ":?/",
decoding & HTTP_URI_CODING_HOSTNAME);
if (!uri)
{
*host = '\0';
return (HTTP_URI_STATUS_BAD_HOSTNAME);
}
}
if (!strcmp(scheme, "file") && strcmp(host, "localhost") && host[0])
{
*host = '\0';
return (HTTP_URI_STATUS_BAD_HOSTNAME);
}
if (*uri == ':')
{
if (!isdigit(uri[1] & 255))
{
*port = 0;
return (HTTP_URI_STATUS_BAD_PORT);
}
*port = strtol(uri + 1, (char **)&uri, 10);
if (*uri != '/' && *uri)
{
*port = 0;
return (HTTP_URI_STATUS_BAD_PORT);
}
}
}
if (*uri == '?' || !*uri)
{
status = HTTP_URI_STATUS_MISSING_RESOURCE;
*resource = '/';
if (*uri == '?')
uri = http_copy_decode(resource + 1, uri, resourcelen - 1, NULL,
decoding & HTTP_URI_CODING_QUERY);
else
resource[1] = '\0';
}
else
{
uri = http_copy_decode(resource, uri, resourcelen, "?",
decoding & HTTP_URI_CODING_RESOURCE);
if (uri && *uri == '?')
{
char *resptr = resource + strlen(resource);
uri = http_copy_decode(resptr, uri,
resourcelen - (int)(resptr - resource), NULL,
decoding & HTTP_URI_CODING_QUERY);
}
}
if (!uri)
{
*resource = '\0';
return (HTTP_URI_STATUS_BAD_RESOURCE);
}
return (status);
}
const char *
httpStatus(http_status_t status)
{
const char *s;
_cups_globals_t *cg = _cupsGlobals();
if (!cg->lang_default)
cg->lang_default = cupsLangDefault();
switch (status)
{
case HTTP_STATUS_ERROR :
s = strerror(errno);
break;
case HTTP_STATUS_CONTINUE :
s = _("Continue");
break;
case HTTP_STATUS_SWITCHING_PROTOCOLS :
s = _("Switching Protocols");
break;
case HTTP_STATUS_OK :
s = _("OK");
break;
case HTTP_STATUS_CREATED :
s = _("Created");
break;
case HTTP_STATUS_ACCEPTED :
s = _("Accepted");
break;
case HTTP_STATUS_NO_CONTENT :
s = _("No Content");
break;
case HTTP_STATUS_MOVED_PERMANENTLY :
s = _("Moved Permanently");
break;
case HTTP_STATUS_SEE_OTHER :
s = _("See Other");
break;
case HTTP_STATUS_NOT_MODIFIED :
s = _("Not Modified");
break;
case HTTP_STATUS_BAD_REQUEST :
s = _("Bad Request");
break;
case HTTP_STATUS_UNAUTHORIZED :
case HTTP_STATUS_CUPS_AUTHORIZATION_CANCELED :
s = _("Unauthorized");
break;
case HTTP_STATUS_FORBIDDEN :
s = _("Forbidden");
break;
case HTTP_STATUS_NOT_FOUND :
s = _("Not Found");
break;
case HTTP_STATUS_REQUEST_TOO_LARGE :
s = _("Request Entity Too Large");
break;
case HTTP_STATUS_URI_TOO_LONG :
s = _("URI Too Long");
break;
case HTTP_STATUS_UPGRADE_REQUIRED :
s = _("Upgrade Required");
break;
case HTTP_STATUS_NOT_IMPLEMENTED :
s = _("Not Implemented");
break;
case HTTP_STATUS_NOT_SUPPORTED :
s = _("Not Supported");
break;
case HTTP_STATUS_EXPECTATION_FAILED :
s = _("Expectation Failed");
break;
case HTTP_STATUS_SERVICE_UNAVAILABLE :
s = _("Service Unavailable");
break;
case HTTP_STATUS_SERVER_ERROR :
s = _("Internal Server Error");
break;
case HTTP_STATUS_CUPS_PKI_ERROR :
s = _("SSL/TLS Negotiation Error");
break;
case HTTP_STATUS_CUPS_WEBIF_DISABLED :
s = _("Web Interface is Disabled");
break;
default :
s = _("Unknown");
break;
}
return (_cupsLangString(cg->lang_default, s));
}
#ifndef HAVE_HSTRERROR
const char *
_cups_hstrerror(int error)
{
static const char * const errors[] =
{
"OK",
"Host not found.",
"Try again.",
"Unrecoverable lookup error.",
"No data associated with name."
};
if (error < 0 || error > 4)
return ("Unknown hostname lookup error.");
else
return (errors[error]);
}
#endif
char *
_httpDecodeURI(char *dst,
const char *src,
size_t dstsize)
{
if (http_copy_decode(dst, src, (int)dstsize, NULL, 1))
return (dst);
else
return (NULL);
}
char *
_httpEncodeURI(char *dst,
const char *src,
size_t dstsize)
{
http_copy_encode(dst, src, dst + dstsize - 1, NULL, NULL, 1);
return (dst);
}
const char *
_httpResolveURI(
const char *uri,
char *resolved_uri,
size_t resolved_size,
int options,
int (*cb)(void *context),
void *context)
{
char scheme[32],
userpass[256],
hostname[1024],
resource[1024];
int port;
#ifdef DEBUG
http_uri_status_t status;
#endif
DEBUG_printf(("4_httpResolveURI(uri=\"%s\", resolved_uri=%p, "
"resolved_size=" CUPS_LLFMT ")", uri, resolved_uri,
CUPS_LLCAST resolved_size));
#ifdef DEBUG
if ((status = httpSeparateURI(HTTP_URI_CODING_ALL, uri, scheme,
sizeof(scheme), userpass, sizeof(userpass),
hostname, sizeof(hostname), &port, resource,
sizeof(resource))) < HTTP_URI_STATUS_OK)
#else
if (httpSeparateURI(HTTP_URI_CODING_ALL, uri, scheme,
sizeof(scheme), userpass, sizeof(userpass),
hostname, sizeof(hostname), &port, resource,
sizeof(resource)) < HTTP_URI_STATUS_OK)
#endif
{
if (options & _HTTP_RESOLVE_STDERR)
_cupsLangPrintFilter(stderr, "ERROR", _("Bad device-uri \"%s\"."), uri);
DEBUG_printf(("6_httpResolveURI: httpSeparateURI returned %d!", status));
DEBUG_puts("5_httpResolveURI: Returning NULL");
return (NULL);
}
if (strstr(hostname, "._tcp"))
{
#if defined(HAVE_DNSSD) || defined(HAVE_AVAHI)
char *regtype,
*domain;
_http_uribuf_t uribuf;
int offline = 0;
# ifdef HAVE_DNSSD
# ifdef WIN32
# pragma comment(lib, "dnssd.lib")
# endif
DNSServiceRef ref,
domainref,
localref;
int domainsent = 0;
# ifdef HAVE_POLL
struct pollfd polldata;
# else
fd_set input_set;
struct timeval stimeout;
# endif
# elif defined(HAVE_AVAHI)
AvahiClient *client;
int error;
# endif
if (options & _HTTP_RESOLVE_STDERR)
fprintf(stderr, "DEBUG: Resolving \"%s\"...\n", hostname);
for (regtype = strstr(hostname, "._tcp") - 2;
regtype > hostname;
regtype --)
if (regtype[0] == '.' && regtype[1] == '_')
{
*regtype++ = '\0';
break;
}
if (regtype <= hostname)
{
DEBUG_puts("5_httpResolveURI: Bad hostname, returning NULL");
return (NULL);
}
for (domain = strchr(regtype, '.');
domain;
domain = strchr(domain + 1, '.'))
if (domain[1] != '_')
break;
if (domain)
*domain++ = '\0';
uribuf.buffer = resolved_uri;
uribuf.bufsize = resolved_size;
uribuf.options = options;
uribuf.resource = resource;
resolved_uri[0] = '\0';
DEBUG_printf(("6_httpResolveURI: Resolving hostname=\"%s\", regtype=\"%s\", "
"domain=\"%s\"\n", hostname, regtype, domain));
if (options & _HTTP_RESOLVE_STDERR)
{
fputs("STATE: +connecting-to-device\n", stderr);
fprintf(stderr, "DEBUG: Resolving \"%s\", regtype=\"%s\", "
"domain=\"local.\"...\n", hostname, regtype);
}
uri = NULL;
# ifdef HAVE_DNSSD
if (DNSServiceCreateConnection(&ref) == kDNSServiceErr_NoError)
{
int myinterface = kDNSServiceInterfaceIndexAny;
if (!strcmp(scheme, "ippusb"))
myinterface = kDNSServiceInterfaceIndexLocalOnly;
localref = ref;
if (DNSServiceResolve(&localref,
kDNSServiceFlagsShareConnection, myinterface,
hostname, regtype, "local.", http_resolve_cb,
&uribuf) == kDNSServiceErr_NoError)
{
int fds;
time_t timeout,
start_time = time(NULL),
end_time = start_time + 90;
while (time(NULL) < end_time)
{
if (options & _HTTP_RESOLVE_STDERR)
_cupsLangPrintFilter(stderr, "INFO", _("Looking for printer."));
if (cb && !(*cb)(context))
{
DEBUG_puts("5_httpResolveURI: callback returned 0 (stop)");
break;
}
if ((timeout = end_time - time(NULL)) > 2)
timeout = 2;
# ifdef HAVE_POLL
polldata.fd = DNSServiceRefSockFD(ref);
polldata.events = POLLIN;
fds = poll(&polldata, 1, 1000 * timeout);
# else
FD_ZERO(&input_set);
FD_SET(DNSServiceRefSockFD(ref), &input_set);
# ifdef WIN32
stimeout.tv_sec = (long)timeout;
# else
stimeout.tv_sec = timeout;
# endif
stimeout.tv_usec = 0;
fds = select(DNSServiceRefSockFD(ref)+1, &input_set, NULL, NULL,
&stimeout);
# endif
if (fds < 0)
{
if (errno != EINTR && errno != EAGAIN)
{
DEBUG_printf(("5_httpResolveURI: poll error: %s", strerror(errno)));
break;
}
}
else if (fds == 0)
{
if (domainsent == 0 && domain && _cups_strcasecmp(domain, "local."))
{
if (options & _HTTP_RESOLVE_STDERR)
fprintf(stderr,
"DEBUG: Resolving \"%s\", regtype=\"%s\", "
"domain=\"%s\"...\n", hostname, regtype,
domain ? domain : "");
domainref = ref;
if (DNSServiceResolve(&domainref,
kDNSServiceFlagsShareConnection,
myinterface, hostname, regtype, domain,
http_resolve_cb,
&uribuf) == kDNSServiceErr_NoError)
domainsent = 1;
}
if ((options & _HTTP_RESOLVE_STDERR) && offline == 0 &&
time(NULL) > (start_time + 5))
{
fputs("STATE: +offline-report\n", stderr);
offline = 1;
}
}
else
{
if (DNSServiceProcessResult(ref) == kDNSServiceErr_NoError)
{
uri = resolved_uri;
break;
}
}
}
if (domainsent)
DNSServiceRefDeallocate(domainref);
DNSServiceRefDeallocate(localref);
}
DNSServiceRefDeallocate(ref);
}
# else
if ((uribuf.poll = avahi_simple_poll_new()) != NULL)
{
avahi_simple_poll_set_func(uribuf.poll, http_poll_cb, NULL);
if ((client = avahi_client_new(avahi_simple_poll_get(uribuf.poll),
0, http_client_cb,
&uribuf, &error)) != NULL)
{
if (avahi_service_resolver_new(client, AVAHI_IF_UNSPEC,
AVAHI_PROTO_UNSPEC, hostname,
regtype, "local.", AVAHI_PROTO_UNSPEC, 0,
http_resolve_cb, &uribuf) != NULL)
{
time_t start_time = time(NULL),
end_time = start_time + 90;
int pstatus;
pstatus = avahi_simple_poll_iterate(uribuf.poll, 2000);
if (pstatus == 0 && !resolved_uri[0] && domain &&
_cups_strcasecmp(domain, "local."))
{
avahi_service_resolver_new(client, AVAHI_IF_UNSPEC,
AVAHI_PROTO_UNSPEC, hostname,
regtype, domain, AVAHI_PROTO_UNSPEC, 0,
http_resolve_cb, &uribuf);
}
while (!pstatus && !resolved_uri[0] && time(NULL) < end_time)
{
if ((pstatus = avahi_simple_poll_iterate(uribuf.poll, 2000)) != 0)
break;
if ((options & _HTTP_RESOLVE_STDERR) && offline == 0 &&
time(NULL) > (start_time + 5))
{
fputs("STATE: +offline-report\n", stderr);
offline = 1;
}
}
if (resolved_uri[0])
uri = resolved_uri;
}
avahi_client_free(client);
}
avahi_simple_poll_free(uribuf.poll);
}
# endif
if (options & _HTTP_RESOLVE_STDERR)
{
if (uri)
{
fprintf(stderr, "DEBUG: Resolved as \"%s\"...\n", uri);
fputs("STATE: -connecting-to-device,offline-report\n", stderr);
}
else
{
fputs("DEBUG: Unable to resolve URI\n", stderr);
fputs("STATE: -connecting-to-device\n", stderr);
}
}
#else
uri = NULL;
#endif
if ((options & _HTTP_RESOLVE_STDERR) && !uri)
_cupsLangPrintFilter(stderr, "INFO", _("Unable to find printer."));
}
else
{
strlcpy(resolved_uri, uri, resolved_size);
uri = resolved_uri;
}
DEBUG_printf(("5_httpResolveURI: Returning \"%s\"", uri));
return (uri);
}
#ifdef HAVE_AVAHI
static void
http_client_cb(
AvahiClient *client,
AvahiClientState state,
void *context)
{
DEBUG_printf(("7http_client_cb(client=%p, state=%d, context=%p)", client,
state, context));
if (state == AVAHI_CLIENT_FAILURE)
{
_http_uribuf_t *uribuf = (_http_uribuf_t *)context;
avahi_simple_poll_quit(uribuf->poll);
}
}
#endif
static const char *
http_copy_decode(char *dst,
const char *src,
int dstsize,
const char *term,
int decode)
{
char *ptr,
*end;
int quoted;
for (ptr = dst, end = dst + dstsize - 1;
*src && (!term || !strchr(term, *src));
src ++)
if (ptr < end)
{
if (*src == '%' && decode)
{
if (isxdigit(src[1] & 255) && isxdigit(src[2] & 255))
{
src ++;
if (isalpha(*src))
quoted = (tolower(*src) - 'a' + 10) << 4;
else
quoted = (*src - '0') << 4;
src ++;
if (isalpha(*src))
quoted |= tolower(*src) - 'a' + 10;
else
quoted |= *src - '0';
*ptr++ = quoted;
}
else
{
*ptr = '\0';
return (NULL);
}
}
else if ((*src & 255) <= 0x20 || (*src & 255) >= 0x7f)
{
*ptr = '\0';
return (NULL);
}
else
*ptr++ = *src;
}
*ptr = '\0';
return (src);
}
static char *
http_copy_encode(char *dst,
const char *src,
char *dstend,
const char *reserved,
const char *term,
int encode)
{
static const char hex[] = "0123456789ABCDEF";
while (*src && dst < dstend)
{
if (term && *src == *term)
return (dst);
if (encode && (*src == '%' || *src <= ' ' || *src & 128 ||
(reserved && strchr(reserved, *src))))
{
if ((dst + 2) >= dstend)
break;
*dst++ = '%';
*dst++ = hex[(*src >> 4) & 15];
*dst++ = hex[*src & 15];
src ++;
}
else
*dst++ = *src++;
}
*dst = '\0';
if (*src)
return (NULL);
else
return (dst);
}
#ifdef HAVE_DNSSD
static void DNSSD_API
http_resolve_cb(
DNSServiceRef sdRef,
DNSServiceFlags flags,
uint32_t interfaceIndex,
DNSServiceErrorType errorCode,
const char *fullName,
const char *hostTarget,
uint16_t port,
uint16_t txtLen,
const unsigned char *txtRecord,
void *context)
{
_http_uribuf_t *uribuf = (_http_uribuf_t *)context;
const char *scheme,
*hostptr,
*reskey,
*resdefault;
char resource[257],
fqdn[256];
const void *value;
uint8_t valueLen;
DEBUG_printf(("7http_resolve_cb(sdRef=%p, flags=%x, interfaceIndex=%u, "
"errorCode=%d, fullName=\"%s\", hostTarget=\"%s\", port=%u, "
"txtLen=%u, txtRecord=%p, context=%p)", sdRef, flags,
interfaceIndex, errorCode, fullName, hostTarget, port, txtLen,
txtRecord, context));
if (strstr(fullName, "._ipps") || strstr(fullName, "._ipp-tls"))
scheme = "ipps";
else if (strstr(fullName, "._ipp") || strstr(fullName, "._fax-ipp"))
scheme = "ipp";
else if (strstr(fullName, "._http."))
scheme = "http";
else if (strstr(fullName, "._https."))
scheme = "https";
else if (strstr(fullName, "._printer."))
scheme = "lpd";
else if (strstr(fullName, "._pdl-datastream."))
scheme = "socket";
else
scheme = "riousbprint";
if ((uribuf->options & _HTTP_RESOLVE_FAXOUT) &&
(!strcmp(scheme, "ipp") || !strcmp(scheme, "ipps")) &&
!TXTRecordGetValuePtr(txtLen, txtRecord, "printer-type", &valueLen))
{
reskey = "rfo";
resdefault = "/ipp/faxout";
}
else
{
reskey = "rp";
resdefault = "/";
}
if ((value = TXTRecordGetValuePtr(txtLen, txtRecord, reskey,
&valueLen)) != NULL)
{
if (((char *)value)[0] == '/')
{
memcpy(resource, value, valueLen);
resource[valueLen] = '\0';
}
else
{
resource[0] = '/';
memcpy(resource + 1, value, valueLen);
resource[valueLen + 1] = '\0';
}
}
else
{
strlcpy(resource, resdefault, sizeof(resource));
}
if ((uribuf->options & _HTTP_RESOLVE_FQDN) &&
(hostptr = hostTarget + strlen(hostTarget) - 7) > hostTarget &&
!_cups_strcasecmp(hostptr, ".local."))
{
http_addrlist_t *addrlist,
*addr;
DEBUG_printf(("8http_resolve_cb: Looking up \"%s\".", hostTarget));
snprintf(fqdn, sizeof(fqdn), "%d", ntohs(port));
if ((addrlist = httpAddrGetList(hostTarget, AF_UNSPEC, fqdn)) != NULL)
{
for (addr = addrlist; addr; addr = addr->next)
{
int error = getnameinfo(&(addr->addr.addr),
httpAddrLength(&(addr->addr)),
fqdn, sizeof(fqdn), NULL, 0, NI_NAMEREQD);
if (!error)
{
DEBUG_printf(("8http_resolve_cb: Found \"%s\".", fqdn));
if ((hostptr = fqdn + strlen(fqdn) - 6) <= fqdn ||
_cups_strcasecmp(hostptr, ".local"))
{
hostTarget = fqdn;
break;
}
}
#ifdef DEBUG
else
DEBUG_printf(("8http_resolve_cb: \"%s\" did not resolve: %d",
httpAddrString(&(addr->addr), fqdn, sizeof(fqdn)),
error));
#endif
}
httpAddrFreeList(addrlist);
}
}
if ((!strcmp(scheme, "ipp") || !strcmp(scheme, "ipps")) &&
!strcmp(uribuf->resource, "/cups"))
httpAssembleURIf(HTTP_URI_CODING_ALL, uribuf->buffer, uribuf->bufsize,
scheme, NULL, hostTarget, ntohs(port), "%s?snmp=false",
resource);
else
httpAssembleURI(HTTP_URI_CODING_ALL, uribuf->buffer, uribuf->bufsize,
scheme, NULL, hostTarget, ntohs(port), resource);
DEBUG_printf(("8http_resolve_cb: Resolved URI is \"%s\"...", uribuf->buffer));
}
#elif defined(HAVE_AVAHI)
static int
http_poll_cb(
struct pollfd *pollfds,
unsigned int num_pollfds,
int timeout,
void *context)
{
(void)timeout;
(void)context;
return (poll(pollfds, num_pollfds, 2000));
}
static void
http_resolve_cb(
AvahiServiceResolver *resolver,
AvahiIfIndex interface,
AvahiProtocol protocol,
AvahiResolverEvent event,
const char *name,
const char *type,
const char *domain,
const char *hostTarget,
const AvahiAddress *address,
uint16_t port,
AvahiStringList *txt,
AvahiLookupResultFlags flags,
void *context)
{
_http_uribuf_t *uribuf = (_http_uribuf_t *)context;
const char *scheme,
*hostptr,
*reskey,
*resdefault;
char resource[257],
fqdn[256];
AvahiStringList *pair;
char *value;
size_t valueLen = 0;
DEBUG_printf(("7http_resolve_cb(resolver=%p, "
"interface=%d, protocol=%d, event=%d, name=\"%s\", "
"type=\"%s\", domain=\"%s\", hostTarget=\"%s\", address=%p, "
"port=%d, txt=%p, flags=%d, context=%p)",
resolver, interface, protocol, event, name, type, domain,
hostTarget, address, port, txt, flags, context));
if (event != AVAHI_RESOLVER_FOUND)
{
avahi_service_resolver_free(resolver);
avahi_simple_poll_quit(uribuf->poll);
return;
}
if (strstr(type, "_ipp."))
scheme = "ipp";
else if (strstr(type, "_printer."))
scheme = "lpd";
else if (strstr(type, "_pdl-datastream."))
scheme = "socket";
else
scheme = "riousbprint";
if (!strncmp(type, "_ipps.", 6) || !strncmp(type, "_ipp-tls.", 9))
scheme = "ipps";
else if (!strncmp(type, "_ipp.", 5) || !strncmp(type, "_fax-ipp.", 9))
scheme = "ipp";
else if (!strncmp(type, "_http.", 6))
scheme = "http";
else if (!strncmp(type, "_https.", 7))
scheme = "https";
else if (!strncmp(type, "_printer.", 9))
scheme = "lpd";
else if (!strncmp(type, "_pdl-datastream.", 16))
scheme = "socket";
else
{
avahi_service_resolver_free(resolver);
avahi_simple_poll_quit(uribuf->poll);
return;
}
if ((uribuf->options & _HTTP_RESOLVE_FAXOUT) &&
(!strcmp(scheme, "ipp") || !strcmp(scheme, "ipps")))
{
reskey = "rfo";
resdefault = "/ipp/faxout";
}
else
{
reskey = "rp";
resdefault = "/";
}
if ((pair = avahi_string_list_find(txt, reskey)) != NULL)
{
avahi_string_list_get_pair(pair, NULL, &value, &valueLen);
if (value[0] == '/')
{
memcpy(resource, value, valueLen);
resource[valueLen] = '\0';
}
else
{
resource[0] = '/';
memcpy(resource + 1, value, valueLen);
resource[valueLen + 1] = '\0';
}
}
else
{
strlcpy(resource, resdefault, sizeof(resource));
}
if ((uribuf->options & _HTTP_RESOLVE_FQDN) &&
(hostptr = hostTarget + strlen(hostTarget) - 6) > hostTarget &&
!_cups_strcasecmp(hostptr, ".local"))
{
http_addrlist_t *addrlist,
*addr;
DEBUG_printf(("8http_resolve_cb: Looking up \"%s\".", hostTarget));
snprintf(fqdn, sizeof(fqdn), "%d", ntohs(port));
if ((addrlist = httpAddrGetList(hostTarget, AF_UNSPEC, fqdn)) != NULL)
{
for (addr = addrlist; addr; addr = addr->next)
{
int error = getnameinfo(&(addr->addr.addr),
httpAddrLength(&(addr->addr)),
fqdn, sizeof(fqdn), NULL, 0, NI_NAMEREQD);
if (!error)
{
DEBUG_printf(("8http_resolve_cb: Found \"%s\".", fqdn));
if ((hostptr = fqdn + strlen(fqdn) - 6) <= fqdn ||
_cups_strcasecmp(hostptr, ".local"))
{
hostTarget = fqdn;
break;
}
}
#ifdef DEBUG
else
DEBUG_printf(("8http_resolve_cb: \"%s\" did not resolve: %d",
httpAddrString(&(addr->addr), fqdn, sizeof(fqdn)),
error));
#endif
}
httpAddrFreeList(addrlist);
}
}
httpAssembleURI(HTTP_URI_CODING_ALL, uribuf->buffer, uribuf->bufsize, scheme,
NULL, hostTarget, port, resource);
DEBUG_printf(("8http_resolve_cb: Resolved URI is \"%s\".", uribuf->buffer));
avahi_simple_poll_quit(uribuf->poll);
}
#endif