#include "cupsd.h"
#include <grp.h>
void
ProcessBrowseData(const char *uri,
cups_ptype_t type,
ipp_pstate_t state,
const char *location,
const char *info,
const char *make_model)
{
int i;
int update;
char method[HTTP_MAX_URI],
username[HTTP_MAX_URI],
host[HTTP_MAX_URI],
resource[HTTP_MAX_URI];
int port;
char name[IPP_MAX_NAME],
*hptr,
*sptr;
char local_make_model[IPP_MAX_NAME];
printer_t *p,
*pclass,
*first,
*next;
int offset,
len;
httpSeparate(uri, method, username, host, &port, resource);
if (strncmp(uri, "ipp://", 6) != 0 ||
!host[0] ||
(strncmp(resource, "/printers/", 10) != 0 &&
strncmp(resource, "/classes/", 9) != 0))
{
LogMessage(L_ERROR, "ProcessBrowseData: Bad printer URI in browse data: %s",
uri);
return;
}
if (strchr(resource, '?') != NULL ||
(strncmp(resource, "/printers/", 10) == 0 &&
strchr(resource + 10, '/') != NULL) ||
(strncmp(resource, "/classes/", 9) == 0 &&
strchr(resource + 9, '/') != NULL))
{
LogMessage(L_ERROR, "ProcessBrowseData: Bad resource in browse data: %s",
resource);
return;
}
type |= CUPS_PRINTER_REMOTE;
update = 0;
hptr = strchr(host, '.');
sptr = strchr(ServerName, '.');
if (sptr != NULL && hptr != NULL)
{
while (hptr != NULL)
{
if (strcasecmp(hptr, sptr) == 0)
{
*hptr = '\0';
break;
}
else
hptr = strchr(hptr + 1, '.');
}
}
if (type & CUPS_PRINTER_CLASS)
{
if (strncmp(resource, "/classes/", 9) == 0)
snprintf(name, sizeof(name), "%s@%s", resource + 9, host);
else
return;
if ((p = FindClass(name)) == NULL && BrowseShortNames)
{
if ((p = FindClass(resource + 9)) != NULL)
{
if (p->hostname && strcasecmp(p->hostname, host) != 0)
{
if (p->type & CUPS_PRINTER_REMOTE)
{
SetStringf(&p->name, "%s@%s", p->name, p->hostname);
SetPrinterAttrs(p);
SortPrinters();
}
p = NULL;
}
else if (!p->hostname)
{
SetString(&p->hostname, host);
SetString(&p->uri, uri);
SetString(&p->device_uri, uri);
update = 1;
}
}
else
strlcpy(name, resource + 9, sizeof(name));
}
else if (p != NULL && !p->hostname)
{
SetString(&p->hostname, host);
SetString(&p->uri, uri);
SetString(&p->device_uri, uri);
update = 1;
}
if (p == NULL)
{
p = AddClass(name);
LogMessage(L_INFO, "Added remote class \"%s\"...", name);
p->type = type;
p->accepting = 1;
SetString(&p->uri, uri);
SetString(&p->device_uri, uri);
SetString(&p->hostname, host);
update = 1;
}
}
else
{
if (strncmp(resource, "/printers/", 10) == 0)
snprintf(name, sizeof(name), "%s@%s", resource + 10, host);
else
return;
if ((p = FindPrinter(name)) == NULL && BrowseShortNames)
{
if ((p = FindPrinter(resource + 10)) != NULL)
{
if (p->hostname && strcasecmp(p->hostname, host) != 0)
{
if (p->type & CUPS_PRINTER_REMOTE)
{
SetStringf(&p->name, "%s@%s", p->name, p->hostname);
SetPrinterAttrs(p);
SortPrinters();
}
p = NULL;
}
else if (!p->hostname)
{
SetString(&p->hostname, host);
SetString(&p->uri, uri);
SetString(&p->device_uri, uri);
update = 1;
}
}
else
strlcpy(name, resource + 10, sizeof(name));
}
else if (p != NULL && !p->hostname)
{
SetString(&p->hostname, host);
SetString(&p->uri, uri);
SetString(&p->device_uri, uri);
update = 1;
}
if (p == NULL)
{
p = AddPrinter(name);
LogMessage(L_INFO, "Added remote printer \"%s\"...", name);
p->type = type;
p->accepting = 1;
SetString(&p->hostname, host);
SetString(&p->uri, uri);
SetString(&p->device_uri, uri);
update = 1;
}
}
p->state = state;
p->browse_time = time(NULL);
if (p->type != type)
{
p->type = type;
update = 1;
}
if (!p->location || strcmp(p->location, location))
{
SetString(&p->location, location);
update = 1;
}
if (!p->info || strcmp(p->info, info))
{
SetString(&p->info, info);
update = 1;
}
if (!make_model[0])
{
if (type & CUPS_PRINTER_CLASS)
snprintf(local_make_model, sizeof(local_make_model),
"Remote Class on %s", host);
else
snprintf(local_make_model, sizeof(local_make_model),
"Remote Printer on %s", host);
}
else
#ifdef __APPLE__
strlcpy(local_make_model, make_model, sizeof(local_make_model));
#else
snprintf(local_make_model, sizeof(local_make_model),
"%s on %s", make_model, host);
#endif
if (!p->make_model || strcmp(p->make_model, local_make_model))
{
SetString(&p->make_model, local_make_model);
update = 1;
}
if (update)
SetPrinterAttrs(p);
if (DefaultPrinter == NULL && Printers != NULL)
{
DefaultPrinter = Printers;
WritePrintcap();
}
if (ImplicitClasses)
{
for (p = Printers, len = 0, offset = 0, first = NULL;
p != NULL;
p = next)
{
next = p->next;
if (p->type & CUPS_PRINTER_IMPLICIT)
{
len = 0;
continue;
}
if (len > 0 &&
strncasecmp(p->name, name + offset, len) == 0 &&
(p->name[len] == '\0' || p->name[len] == '@'))
{
if ((pclass = FindDest(name)) == NULL)
{
pclass = AddPrinter(name);
pclass->type |= CUPS_PRINTER_IMPLICIT;
pclass->accepting = 1;
pclass->state = IPP_PRINTER_IDLE;
SetString(&pclass->location, p->location);
SetString(&pclass->info, p->info);
SetPrinterAttrs(pclass);
LogMessage(L_INFO, "Added implicit class \"%s\"...", name);
}
if (first != NULL)
{
for (i = 0; i < pclass->num_printers; i ++)
if (pclass->printers[i] == first)
break;
if (i >= pclass->num_printers)
AddPrinterToClass(pclass, first);
first = NULL;
}
for (i = 0; i < pclass->num_printers; i ++)
if (pclass->printers[i] == p)
break;
if (i >= pclass->num_printers)
AddPrinterToClass(pclass, p);
}
else
{
if ((hptr = strchr(p->name, '@')) != NULL)
len = hptr - p->name;
else
len = strlen(p->name);
strncpy(name, p->name, len);
name[len] = '\0';
offset = 0;
if ((pclass = FindDest(name)) != NULL &&
!(pclass->type & CUPS_PRINTER_IMPLICIT))
{
if (ImplicitAnyClasses && len < (sizeof(name) - 4))
{
strcpy(name, "Any");
strncpy(name + 3, p->name, len);
name[len + 3] = '\0';
offset = 3;
}
else
{
len = 0;
continue;
}
}
first = p;
}
}
}
}
void
SendBrowseList(void)
{
int count;
printer_t *p,
*np;
time_t ut,
to;
if (!Browsing || !BrowseProtocols)
return;
ut = time(NULL) - BrowseInterval;
to = time(NULL) - BrowseTimeout;
if (BrowseInterval > 0)
{
for (count = 0, p = Printers; p != NULL; p = p->next)
if (!(p->type & (CUPS_PRINTER_REMOTE | CUPS_PRINTER_IMPLICIT)) &&
p->browse_time < ut)
count ++;
count = 2 * count / BrowseInterval + 1;
}
else
count = 0;
for (p = Printers; p != NULL; p = np)
{
np = p->next;
if (p->type & CUPS_PRINTER_REMOTE)
{
if (p->browse_time < to)
{
LogMessage(L_INFO, "Remote destination \"%s\" has timed out; deleting it...",
p->name);
DeletePrinter(p, 1);
}
}
else if (p->browse_time < ut && count > 0 &&
!(p->type & CUPS_PRINTER_IMPLICIT))
{
count --;
p->browse_time = time(NULL);
if (BrowseProtocols & BROWSE_CUPS)
SendCUPSBrowse(p);
#ifdef HAVE_LIBSLP
if (BrowseProtocols & BROWSE_SLP)
SendSLPBrowse(p);
#endif
}
}
}
void
SendCUPSBrowse(printer_t *p)
{
int i;
dirsvc_addr_t *b;
int bytes;
char packet[1453];
cups_netif_t *iface;
for (i = NumBrowsers, b = Browsers; i > 0; i --, b ++)
if (b->iface[0])
{
if (strcmp(b->iface, "*") == 0)
{
NetIFUpdate();
for (iface = NetIFList; iface != NULL; iface = iface->next)
{
if (!iface->is_local)
continue;
snprintf(packet, sizeof(packet), "%x %x ipp://%s/%s/%s \"%s\" \"%s\" \"%s\"\n",
p->type | CUPS_PRINTER_REMOTE, p->state, iface->hostname,
(p->type & CUPS_PRINTER_CLASS) ? "classes" : "printers",
p->name, p->location ? p->location : "",
p->info ? p->info : "",
p->make_model ? p->make_model : "Unknown");
bytes = strlen(packet);
LogMessage(L_DEBUG2, "SendBrowseList: (%d bytes to \"%s\") %s", bytes,
iface->name, packet);
iface->broadcast.sin_port = htons(BrowsePort);
sendto(BrowseSocket, packet, bytes, 0,
(struct sockaddr *)&(iface->broadcast),
sizeof(struct sockaddr_in));
}
}
else if ((iface = NetIFFind(b->iface)) != NULL)
{
snprintf(packet, sizeof(packet), "%x %x ipp://%s/%s/%s \"%s\" \"%s\" \"%s\"\n",
p->type | CUPS_PRINTER_REMOTE, p->state, iface->hostname,
(p->type & CUPS_PRINTER_CLASS) ? "classes" : "printers",
p->name, p->location ? p->location : "",
p->info ? p->info : "",
p->make_model ? p->make_model : "Unknown");
bytes = strlen(packet);
LogMessage(L_DEBUG2, "SendBrowseList: (%d bytes to \"%s\") %s", bytes,
iface->name, packet);
iface->broadcast.sin_port = htons(BrowsePort);
sendto(BrowseSocket, packet, bytes, 0,
(struct sockaddr *)&(iface->broadcast),
sizeof(struct sockaddr_in));
}
}
else
{
snprintf(packet, sizeof(packet), "%x %x %s \"%s\" \"%s\" \"%s\"\n",
p->type | CUPS_PRINTER_REMOTE, p->state, p->uri,
p->location ? p->location : "",
p->info ? p->info : "",
p->make_model ? p->make_model : "Unknown");
bytes = strlen(packet);
LogMessage(L_DEBUG2, "SendBrowseList: (%d bytes to %x) %s", bytes,
(unsigned)ntohl(b->to.sin_addr.s_addr), packet);
if (sendto(BrowseSocket, packet, bytes, 0,
(struct sockaddr *)&(b->to), sizeof(struct sockaddr_in)) <= 0)
{
LogMessage(L_ERROR, "SendBrowseList: sendto failed for browser %d - %s.",
b - Browsers + 1, strerror(errno));
if (i > 1)
memcpy(b, b + 1, (i - 1) * sizeof(dirsvc_addr_t));
b --;
NumBrowsers --;
}
}
}
void
StartBrowsing(void)
{
int val;
struct sockaddr_in addr;
if (!Browsing || !BrowseProtocols)
return;
if (BrowseProtocols & BROWSE_CUPS)
{
if ((BrowseSocket = socket(AF_INET, SOCK_DGRAM, 0)) < 0)
{
LogMessage(L_ERROR, "StartBrowsing: Unable to create broadcast socket - %s.",
strerror(errno));
BrowseProtocols &= ~BROWSE_CUPS;
return;
}
val = 1;
if (setsockopt(BrowseSocket, SOL_SOCKET, SO_BROADCAST, &val, sizeof(val)))
{
LogMessage(L_ERROR, "StartBrowsing: Unable to set broadcast mode - %s.",
strerror(errno));
#ifdef WIN32
closesocket(BrowseSocket);
#else
close(BrowseSocket);
#endif
BrowseSocket = -1;
BrowseProtocols &= ~BROWSE_CUPS;
return;
}
memset(&addr, 0, sizeof(addr));
addr.sin_addr.s_addr = htonl(INADDR_ANY);
addr.sin_family = AF_INET;
addr.sin_port = htons(BrowsePort);
if (bind(BrowseSocket, (struct sockaddr *)&addr, sizeof(addr)))
{
LogMessage(L_ERROR, "StartBrowsing: Unable to bind broadcast socket - %s.",
strerror(errno));
#ifdef WIN32
closesocket(BrowseSocket);
#else
close(BrowseSocket);
#endif
BrowseSocket = -1;
BrowseProtocols &= ~BROWSE_CUPS;
return;
}
LogMessage(L_DEBUG2, "StartBrowsing: Adding fd %d to InputSet...",
BrowseSocket);
FD_SET(BrowseSocket, InputSet);
}
#ifdef HAVE_LIBSLP
if (BrowseProtocols & BROWSE_SLP)
{
if (SLPOpen("en", SLP_FALSE, &BrowseSLPHandle) != SLP_OK)
{
LogMessage(L_ERROR, "Unable to open an SLP handle; disabling SLP browsing!");
BrowseProtocols &= ~BROWSE_SLP;
}
BrowseSLPRefresh = 0;
}
#endif
}
void
StartPolling(void)
{
int i;
dirsvc_poll_t *poll;
int pid;
char sport[10];
char bport[10];
char interval[10];
int statusfds[2];
int fd;
#if defined(HAVE_SIGACTION) && !defined(HAVE_SIGSET)
struct sigaction action;
#endif
if (NumPolled == 0)
{
PollPipe = -1;
return;
}
sprintf(bport, "%d", BrowsePort);
if (BrowseInterval)
sprintf(interval, "%d", BrowseInterval);
else
strcpy(interval, "30");
if (pipe(statusfds))
{
LogMessage(L_ERROR, "Unable to create polling status pipes - %s.",
strerror(errno));
PollPipe = -1;
return;
}
PollPipe = statusfds[0];
for (i = 0, poll = Polled; i < NumPolled; i ++, poll ++)
{
sprintf(sport, "%d", poll->port);
HoldSignals();
if ((pid = fork()) == 0)
{
if (getuid() == 0)
{
if (setgid(Group))
exit(errno);
if (setgroups(1, &Group))
exit(errno);
if (setuid(User))
exit(errno);
}
else
{
setgroups(1, &Group);
}
close(0);
open("/dev/null", O_RDONLY);
close(1);
open("/dev/null", O_WRONLY);
close(2);
dup(statusfds[1]);
for (fd = 3; fd < MaxFDs; fd ++)
close(fd);
#ifdef HAVE_SIGSET
sigset(SIGTERM, SIG_DFL);
sigset(SIGCHLD, SIG_DFL);
#elif defined(HAVE_SIGACTION)
memset(&action, 0, sizeof(action));
sigemptyset(&action.sa_mask);
action.sa_handler = SIG_DFL;
sigaction(SIGTERM, &action, NULL);
sigaction(SIGCHLD, &action, NULL);
#else
signal(SIGTERM, SIG_DFL);
signal(SIGCHLD, SIG_DFL);
#endif
ReleaseSignals();
execl(CUPS_SERVERBIN "/daemon/cups-polld", "cups-polld", poll->hostname,
sport, interval, bport, NULL);
exit(errno);
}
else if (pid < 0)
{
LogMessage(L_ERROR, "StartPolling: Unable to fork polling daemon - %s",
strerror(errno));
poll->pid = 0;
break;
}
else
{
poll->pid = pid;
LogMessage(L_DEBUG, "StartPolling: Started polling daemon for %s:%d, pid = %d",
poll->hostname, poll->port, pid);
}
ReleaseSignals();
}
close(statusfds[1]);
LogMessage(L_DEBUG2, "StartPolling: Adding fd %d to InputSet...",
PollPipe);
FD_SET(PollPipe, InputSet);
}
void
StopBrowsing(void)
{
if (!Browsing || !BrowseProtocols)
return;
if (BrowseProtocols & BROWSE_CUPS)
{
if (BrowseSocket >= 0)
{
#ifdef WIN32
closesocket(BrowseSocket);
#else
close(BrowseSocket);
#endif
LogMessage(L_DEBUG2, "StopBrowsing: Removing fd %d from InputSet...",
BrowseSocket);
FD_CLR(BrowseSocket, InputSet);
BrowseSocket = 0;
}
}
#ifdef HAVE_LIBSLP
if (BrowseProtocols & BROWSE_SLP)
{
SLPClose(BrowseSLPHandle);
}
#endif
}
void
StopPolling(void)
{
int i;
dirsvc_poll_t *poll;
if (PollPipe >= 0)
{
close(PollPipe);
LogMessage(L_DEBUG2, "StopPolling: removing fd %d from InputSet.",
PollPipe);
FD_CLR(PollPipe, InputSet);
PollPipe = -1;
}
for (i = 0, poll = Polled; i < NumPolled; i ++, poll ++)
if (poll->pid)
kill(poll->pid, SIGTERM);
}
void
UpdateCUPSBrowse(void)
{
int i;
int auth;
int len;
int bytes;
char packet[1540],
*pptr;
struct sockaddr_in srcaddr;
char srcname[1024];
unsigned address;
struct hostent *srchost;
cups_ptype_t type;
ipp_pstate_t state;
char uri[HTTP_MAX_URI],
method[HTTP_MAX_URI],
username[HTTP_MAX_URI],
host[HTTP_MAX_URI],
resource[HTTP_MAX_URI],
info[IPP_MAX_NAME],
location[IPP_MAX_NAME],
make_model[IPP_MAX_NAME];
int port;
cups_netif_t *iface;
len = sizeof(srcaddr);
if ((bytes = recvfrom(BrowseSocket, packet, sizeof(packet), 0,
(struct sockaddr *)&srcaddr, &len)) <= 0)
{
if (errno != ECONNREFUSED)
{
LogMessage(L_ERROR, "Browse recv failed - %s.", strerror(errno));
LogMessage(L_ERROR, "Browsing turned off.");
StopBrowsing();
Browsing = 0;
}
return;
}
packet[bytes] = '\0';
address = ntohl(srcaddr.sin_addr.s_addr);
if (HostNameLookups)
#ifndef __sgi
srchost = gethostbyaddr((char *)&(srcaddr.sin_addr), sizeof(struct in_addr),
AF_INET);
#else
srchost = gethostbyaddr(&(srcaddr.sin_addr), sizeof(struct in_addr),
AF_INET);
#endif
else
srchost = NULL;
if (srchost == NULL)
sprintf(srcname, "%d.%d.%d.%d", address >> 24, (address >> 16) & 255,
(address >> 8) & 255, address & 255);
else
strlcpy(srcname, srchost->h_name, sizeof(srcname));
len = strlen(srcname);
if (BrowseACL && (BrowseACL->num_allow || BrowseACL->num_deny))
{
if (address == 0x7f000001 || strcasecmp(srcname, "localhost") == 0)
{
auth = AUTH_ALLOW;
}
else
{
switch (BrowseACL->order_type)
{
default :
auth = AUTH_DENY;
break;
case AUTH_ALLOW :
auth = AUTH_ALLOW;
if (CheckAuth(address, srcname, len,
BrowseACL->num_deny, BrowseACL->deny))
auth = AUTH_DENY;
if (CheckAuth(address, srcname, len,
BrowseACL->num_allow, BrowseACL->allow))
auth = AUTH_ALLOW;
break;
case AUTH_DENY :
auth = AUTH_DENY;
if (CheckAuth(address, srcname, len,
BrowseACL->num_allow, BrowseACL->allow))
auth = AUTH_ALLOW;
if (CheckAuth(address, srcname, len,
BrowseACL->num_deny, BrowseACL->deny))
auth = AUTH_DENY;
break;
}
}
}
else
auth = AUTH_ALLOW;
if (auth == AUTH_DENY)
{
LogMessage(L_DEBUG, "UpdateCUPSBrowse: Refused %d bytes from %s", bytes,
srcname);
return;
}
LogMessage(L_DEBUG2, "UpdateCUPSBrowse: (%d bytes from %s) %s", bytes, srcname,
packet);
if (sscanf(packet, "%x%x%1023s", (unsigned *)&type, (unsigned *)&state,
uri) < 3)
{
LogMessage(L_WARN, "UpdateCUPSBrowse: Garbled browse packet - %s",
packet);
return;
}
strcpy(location, "Location Unknown");
strcpy(info, "No Information Available");
make_model[0] = '\0';
if ((pptr = strchr(packet, '\"')) != NULL)
{
for (i = 0, pptr ++;
i < (sizeof(location) - 1) && *pptr && *pptr != '\"';
i ++, pptr ++)
location[i] = *pptr;
if (i)
location[i] = '\0';
if (*pptr == '\"')
pptr ++;
while (*pptr && isspace(*pptr))
pptr ++;
if (*pptr == '\"')
{
for (i = 0, pptr ++;
i < (sizeof(info) - 1) && *pptr && *pptr != '\"';
i ++, pptr ++)
info[i] = *pptr;
if (i)
info[i] = '\0';
if (*pptr == '\"')
pptr ++;
while (*pptr && isspace(*pptr))
pptr ++;
if (*pptr == '\"')
{
for (i = 0, pptr ++;
i < (sizeof(make_model) - 1) && *pptr && *pptr != '\"';
i ++, pptr ++)
make_model[i] = *pptr;
if (i)
make_model[i] = '\0';
}
}
}
DEBUG_puts(packet);
DEBUG_printf(("type=%x, state=%x, uri=\"%s\"\n"
"location=\"%s\", info=\"%s\", make_model=\"%s\"\n",
type, state, uri, location, info, make_model));
httpSeparate(uri, method, username, host, &port, resource);
DEBUG_printf(("host=\"%s\", ServerName=\"%s\"\n", host, ServerName));
if (strcasecmp(host, ServerName) == 0)
return;
NetIFUpdate();
for (iface = NetIFList; iface != NULL; iface = iface->next)
if (strcasecmp(host, iface->hostname) == 0)
return;
for (i = 0; i < NumRelays; i ++)
if (CheckAuth(address, srcname, len, 1, &(Relays[i].from)))
if (sendto(BrowseSocket, packet, bytes, 0,
(struct sockaddr *)&(Relays[i].to),
sizeof(struct sockaddr_in)) <= 0)
{
LogMessage(L_ERROR, "UpdateCUPSBrowse: sendto failed for relay %d - %s.",
i + 1, strerror(errno));
return;
}
ProcessBrowseData(uri, type, state, location, info, make_model);
}
void
UpdatePolling(void)
{
int bytes;
char *lineptr;
static int bufused = 0;
static char buffer[1024];
if ((bytes = read(PollPipe, buffer + bufused,
sizeof(buffer) - bufused - 1)) > 0)
{
bufused += bytes;
buffer[bufused] = '\0';
lineptr = strchr(buffer, '\n');
}
else if (bytes < 0 && errno == EINTR)
return;
else
{
lineptr = buffer + bufused;
lineptr[1] = 0;
}
if (bytes == 0 && bufused == 0)
lineptr = NULL;
while (lineptr != NULL)
{
*lineptr++ = '\0';
if (!strncmp(buffer, "ERROR: ", 7))
LogMessage(L_ERROR, "%s", buffer + 7);
else if (!strncmp(buffer, "DEBUG: ", 7))
LogMessage(L_DEBUG, "%s", buffer + 7);
else if (!strncmp(buffer, "DEBUG2: ", 8))
LogMessage(L_DEBUG2, "%s", buffer + 8);
else
LogMessage(L_DEBUG, "%s", buffer);
cups_strcpy(buffer, lineptr);
bufused -= lineptr - buffer;
if (bufused < 0)
bufused = 0;
lineptr = strchr(buffer, '\n');
}
if (bytes <= 0)
{
LogMessage(L_ERROR, "UpdatePolling: all polling processes have exited!");
StopPolling();
}
}
#ifdef HAVE_LIBSLP
# define SLP_CUPS_SRVTYPE "service:printer"
# define SLP_CUPS_SRVLEN 15
typedef struct _slpsrvurl
{
struct _slpsrvurl *next;
char url[HTTP_MAX_URI];
} slpsrvurl_t;
void
RegReportCallback(SLPHandle hslp,
SLPError errcode,
void *cookie)
{
(void)hslp;
(void)errcode;
(void)cookie;
return;
}
void
SendSLPBrowse(printer_t *p)
{
char srvurl[HTTP_MAX_URI],
attrs[8192],
finishings[1024],
make_model[IPP_MAX_NAME * 2],
location[IPP_MAX_NAME * 2],
info[IPP_MAX_NAME * 2],
*src,
*dst;
ipp_attribute_t *authentication;
SLPError error;
LogMessage(L_DEBUG, "SendSLPBrowse(%p = \"%s\")", p, p->name);
snprintf(srvurl, sizeof(srvurl), SLP_CUPS_SRVTYPE ":%s", p->uri);
LogMessage(L_DEBUG2, "Service URL = \"%s\"", srvurl);
if (p->type & CUPS_PRINTER_STAPLE)
strcpy(finishings, "staple");
else
finishings[0] = '\0';
if (p->type & CUPS_PRINTER_BIND)
{
if (finishings[0])
strlcat(finishings, ",bind", sizeof(finishings));
else
strcpy(finishings, "bind");
}
if (p->type & CUPS_PRINTER_PUNCH)
{
if (finishings[0])
strlcat(finishings, ",punch", sizeof(finishings));
else
strcpy(finishings, "punch");
}
if (p->type & CUPS_PRINTER_COVER)
{
if (finishings[0])
strlcat(finishings, ",cover", sizeof(finishings));
else
strcpy(finishings, "cover");
}
if (p->type & CUPS_PRINTER_SORT)
{
if (finishings[0])
strlcat(finishings, ",sort", sizeof(finishings));
else
strcpy(finishings, "sort");
}
if (!finishings[0])
strcpy(finishings, "none");
for (src = p->make_model, dst = make_model; *src;)
{
if (*src == ',' || *src == '\\' || *src == ')')
*dst++ = '\\';
*dst++ = *src++;
}
*dst = '\0';
if (!make_model[0])
strcpy(make_model, "Unknown");
for (src = p->location, dst = location; *src;)
{
if (*src == ',' || *src == '\\' || *src == ')')
*dst++ = '\\';
*dst++ = *src++;
}
*dst = '\0';
if (!location[0])
strcpy(location, "Unknown");
for (src = p->info, dst = info; *src;)
{
if (*src == ',' || *src == '\\' || *src == ')')
*dst++ = '\\';
*dst++ = *src++;
}
*dst = '\0';
if (!info[0])
strcpy(info, "Unknown");
authentication = ippFindAttribute(p->attrs, "uri-authentication-supported",
IPP_TAG_KEYWORD);
snprintf(attrs, sizeof(attrs),
"(printer-uri-supported=%s),"
"(uri-authentication-supported=%s>),"
#ifdef HAVE_SSL
"(uri-security-supported=tls>),"
#else
"(uri-security-supported=none>),"
#endif
"(printer-name=%s),"
"(printer-location=%s),"
"(printer-info=%s),"
"(printer-more-info=%s),"
"(printer-make-and-model=%s),"
"(charset-supported=utf-8),"
"(natural-language-configured=%s),"
"(natural-language-supported=de,en,es,fr,it),"
"(color-supported=%s),"
"(finishings-supported=%s),"
"(sides-supported=one-sided%s),"
"(multiple-document-jobs-supported=true)"
"(ipp-versions-supported=1.0,1.1)",
p->uri, authentication->values[0].string.text, p->name, location,
info, p->uri, make_model, DefaultLanguage,
p->type & CUPS_PRINTER_COLOR ? "true" : "false",
finishings,
p->type & CUPS_PRINTER_DUPLEX ?
",two-sided-long-edge,two-sided-short-edge" : "");
LogMessage(L_DEBUG2, "Attributes = \"%s\"", attrs);
error = SLPReg(BrowseSLPHandle, srvurl, BrowseTimeout,
SLP_CUPS_SRVTYPE, attrs, SLP_TRUE, RegReportCallback, 0);
if (error != SLP_OK)
LogMessage(L_ERROR, "SLPReg of \"%s\" failed with status %d!", p->name,
error);
}
void
SLPDeregPrinter(printer_t *p)
{
char srvurl[HTTP_MAX_URI];
if((p->type & CUPS_PRINTER_REMOTE) == 0)
{
snprintf(srvurl, sizeof(srvurl), SLP_CUPS_SRVTYPE ":%s", p->uri);
SLPDereg(BrowseSLPHandle, srvurl, RegReportCallback, 0);
}
}
int
GetSlpAttrVal(const char *attrlist,
const char *tag,
char *valbuf,
int valbuflen)
{
char *ptr1,
*ptr2;
valbuf[0] = '\0';
if ((ptr1 = strstr(attrlist, tag)) != NULL)
{
ptr1 += strlen(tag);
if ((ptr2 = strchr(ptr1,')')) != NULL)
{
if (valbuflen > (ptr2 - ptr1))
{
strncpy(valbuf, ptr1, ptr2 - ptr1);
valbuf[ptr2 - ptr1] = '\0';
for (ptr1 = valbuf; *ptr1; ptr1 ++)
if (*ptr1 == '\\' && ptr1[1])
cups_strcpy(ptr1, ptr1 + 1);
return (0);
}
}
}
return (-1);
}
SLPBoolean
AttrCallback(SLPHandle hslp,
const char *attrlist,
SLPError errcode,
void *cookie)
{
char tmp[IPP_MAX_NAME];
printer_t *p = (printer_t*)cookie;
(void)hslp;
if (errcode != SLP_OK)
return (SLP_TRUE);
memset(p, 0, sizeof(printer_t));
p->type = CUPS_PRINTER_REMOTE;
if (GetSlpAttrVal(attrlist, "(printer-location=", p->location,
sizeof(p->location)))
return (SLP_FALSE);
if (GetSlpAttrVal(attrlist, "(printer-make-and-model=", p->make_model,
sizeof(p->make_model)))
return (SLP_FALSE);
if (GetSlpAttrVal(attrlist, "(color-supported=", tmp, sizeof(tmp)))
return (SLP_FALSE);
if (strcasecmp(tmp, "true") == 0)
p->type |= CUPS_PRINTER_COLOR;
if (GetSlpAttrVal(attrlist, "(finishings-supported=", tmp, sizeof(tmp)))
return (SLP_FALSE);
if (strstr(tmp, "staple"))
p->type |= CUPS_PRINTER_STAPLE;
if (strstr(tmp, "bind"))
p->type |= CUPS_PRINTER_BIND;
if (strstr(tmp, "punch"))
p->type |= CUPS_PRINTER_PUNCH;
if (GetSlpAttrVal(attrlist, "(sides-supported=", tmp, sizeof(tmp)))
return (SLP_FALSE);
if (strstr(tmp,"two-sided"))
p->type |= CUPS_PRINTER_DUPLEX;
return (SLP_TRUE);
}
SLPBoolean
SrvUrlCallback(SLPHandle hslp,
const char *srvurl,
unsigned short lifetime,
SLPError errcode,
void *cookie)
{
slpsrvurl_t *s,
**head;
(void)hslp;
(void)lifetime;
if (errcode != SLP_OK)
return (SLP_TRUE);
head = (slpsrvurl_t**)cookie;
if ((s = (slpsrvurl_t *)calloc(1, sizeof(slpsrvurl_t))) == NULL)
return (SLP_FALSE);
strlcpy(s->url, srvurl, sizeof(s->url));
if (*head)
s->next = *head;
*head = s;
return (SLP_TRUE);
}
void
UpdateSLPBrowse(void)
{
slpsrvurl_t *s,
*next;
printer_t p;
const char *uri;
char method[HTTP_MAX_URI],
username[HTTP_MAX_URI],
host[HTTP_MAX_URI],
resource[HTTP_MAX_URI];
int port;
LogMessage(L_DEBUG, "UpdateSLPBrowse() Start...");
BrowseSLPRefresh = time(NULL) + BrowseInterval;
s = NULL;
SLPFindSrvs(BrowseSLPHandle, SLP_CUPS_SRVTYPE, "", "",
SrvUrlCallback, &s);
for (; s; s = next)
{
next = s->next;
SLPFindAttrs(BrowseSLPHandle, s->url, "", "", AttrCallback, &p);
uri = s->url + SLP_CUPS_SRVLEN + 1;
if (strncmp(uri, "http://", 7) == 0 ||
strncmp(uri, "ipp://", 6) == 0)
{
httpSeparate(uri, method, username, host, &port, resource);
if (strcasecmp(host, ServerName) == 0)
continue;
if (strstr(uri, "/printers/") != NULL)
ProcessBrowseData(uri, p.type, IPP_PRINTER_IDLE, p.location,
p.info, p.make_model);
else if (strstr(uri, "/classes/") != NULL)
ProcessBrowseData(uri, p.type | CUPS_PRINTER_CLASS, IPP_PRINTER_IDLE,
p.location, p.info, p.make_model);
}
free(s);
}
LogMessage(L_DEBUG, "UpdateSLPBrowse() End...");
}
#endif