Google Git
Sign in
android / platform / external / libcups / 2e4ff8af / . / scheduler / dirsvc.c
blob: dd08c4b173fba532ee9acd36659dc56fc16b0028 [file] [log] [blame]
/*
* "$Id: dirsvc.c 7003 2007-10-01 23:10:13Z mike $"
*
* Directory services routines for the Common UNIX Printing System (CUPS).
*
* Copyright 2007 by Apple Inc.
* Copyright 1997-2007 by Easy Software Products, all rights reserved.
*
* These coded instructions, statements, and computer programs are the
* property of Apple Inc. and are protected by Federal copyright
* law. Distribution and use rights are outlined in the file "LICENSE.txt"
* which should have been included with this file. If this file is
* file is missing or damaged, see the license at "http://www.cups.org/".
*
* Contents:
*
* cupsdDeregisterPrinter() - Stop sending broadcast information for a
* local printer and remove any pending
* references to remote printers.
* cupsdLoadRemoteCache() - Load the remote printer cache.
* cupsdRegisterPrinter() - Start sending broadcast information for a
* printer update the broadcast contents.
* cupsdSaveRemoteCache() - Save the remote printer cache.
* cupsdSendBrowseList() - Send new browsing information as necessary.
* cupsdStartBrowsing() - Start sending and receiving broadcast
* information.
* cupsdStartPolling() - Start polling servers as needed.
* cupsdStopBrowsing() - Stop sending and receiving broadcast
* information.
* cupsdStopPolling() - Stop polling servers as needed.
* cupsdUpdateDNSSDBrowse() - Handle DNS-SD queries.
* cupsdUpdateLDAPBrowse() - Scan for new printers via LDAP...
* cupsdUpdateSLPBrowse() - Get browsing information via SLP.
* dnssdBuildTxtRecord() - Build a TXT record from printer info.
* dnssdDeregisterPrinter() - Stop sending broadcast information for a
* printer.
* dnssdPackTxtRecord() - Pack an array of key/value pairs into the
* TXT record format.
* dnssdRegisterCallback() - DNSServiceRegister callback.
* dnssdRegisterPrinter() - Start sending broadcast information for a
* printer or update the broadcast contents.
* dequote() - Remote quotes from a string.
* process_browse_data() - Process new browse data.
* process_implicit_classes() - Create/update implicit classes as needed.
* send_cups_browse() - Send new browsing information using the
* CUPS protocol.
* send_ldap_browse() - Send LDAP printer registrations.
* send_slp_browse() - Register the specified printer with SLP.
* slp_attr_callback() - SLP attribute callback
* slp_dereg_printer() - SLPDereg() the specified printer
* slp_get_attr() - Get an attribute from an SLP registration.
* slp_reg_callback() - Empty SLPRegReport.
* slp_url_callback() - SLP service url callback
* update_cups_browse() - Update the browse lists using the CUPS
* protocol.
* update_lpd() - Update the LPD configuration as needed.
* update_polling() - Read status messages from the poll daemons.
* update_smb() - Update the SMB configuration as needed.
*/
/*
* Include necessary headers...
*/
#include "cupsd.h"
#include <grp.h>
#ifdef HAVE_DNSSD
# include <dns_sd.h>
# ifdef __APPLE__
# include <nameser.h>
# ifdef HAVE_COREFOUNDATION
# include <CoreFoundation/CoreFoundation.h>
# endif /* HAVE_COREFOUNDATION */
# ifdef HAVE_SYSTEMCONFIGURATION
# include <SystemConfiguration/SystemConfiguration.h>
# endif /* HAVE_SYSTEMCONFIGURATION */
# endif /* __APPLE__ */
#endif /* HAVE_DNSSD */
/*
* Local functions...
*/
static char *dequote(char *d, const char *s, int dlen);
static int is_local_queue(const char *uri, char *host, int hostlen,
char *resource, int resourcelen);
static void process_browse_data(const char *uri, const char *host,
const char *resource, cups_ptype_t type,
ipp_pstate_t state, const char *location,
const char *info, const char *make_model,
int num_attrs, cups_option_t *attrs);
static void process_implicit_classes(int *write_printcap);
static void send_cups_browse(cupsd_printer_t *p);
#ifdef HAVE_LDAP
static void send_ldap_browse(cupsd_printer_t *p);
#endif /* HAVE_LDAP */
#ifdef HAVE_LIBSLP
static void send_slp_browse(cupsd_printer_t *p);
#endif /* HAVE_LIBSLP */
static void update_cups_browse(void);
static void update_lpd(int onoff);
static void update_polling(void);
static void update_smb(int onoff);
#ifdef HAVE_OPENLDAP
static const char * const ldap_attrs[] =/* CUPS LDAP attributes */
{
"printerDescription",
"printerLocation",
"printerMakeAndModel",
"printerType",
"printerURI",
NULL
};
#endif /* HAVE_OPENLDAP */
#ifdef HAVE_LIBSLP
/*
* SLP definitions...
*/
/*
* SLP service name for CUPS...
*/
# define SLP_CUPS_SRVTYPE "service:printer"
# define SLP_CUPS_SRVLEN 15
/*
* Printer service URL structure
*/
typedef struct _slpsrvurl_s /**** SLP URL list ****/
{
struct _slpsrvurl_s *next; /* Next URL in list */
char url[HTTP_MAX_URI];
/* URL */
} slpsrvurl_t;
/*
* Local functions...
*/
static SLPBoolean slp_attr_callback(SLPHandle hslp, const char *attrlist,
SLPError errcode, void *cookie);
static void slp_dereg_printer(cupsd_printer_t *p);
static int slp_get_attr(const char *attrlist, const char *tag,
char **valbuf);
static void slp_reg_callback(SLPHandle hslp, SLPError errcode,
void *cookie);
static SLPBoolean slp_url_callback(SLPHandle hslp, const char *srvurl,
unsigned short lifetime,
SLPError errcode, void *cookie);
#endif /* HAVE_LIBSLP */
#ifdef HAVE_DNSSD
/*
* For IPP register using a subtype of 'cups' so that shared printer browsing
* only finds other CUPS servers (not all IPP based printers).
*/
static char dnssdIPPRegType[] = "_ipp._tcp,_cups";
static char dnssdIPPFaxRegType[] = "_fax-ipp._tcp";
static char *dnssdBuildTxtRecord(int *txt_len, cupsd_printer_t *p);
static void dnssdDeregisterPrinter(cupsd_printer_t *p);
static char *dnssdPackTxtRecord(int *txt_len, char *keyvalue[][2],
int count);
static void dnssdRegisterCallback(DNSServiceRef sdRef,
DNSServiceFlags flags,
DNSServiceErrorType errorCode,
const char *name, const char *regtype,
const char *domain, void *context);
static void dnssdRegisterPrinter(cupsd_printer_t *p);
#endif /* HAVE_DNSSD */
/*
* 'cupsdDeregisterPrinter()' - Stop sending broadcast information for a
* local printer and remove any pending
* references to remote printers.
*/
void
cupsdDeregisterPrinter(
cupsd_printer_t *p, /* I - Printer to register */
int removeit) /* I - Printer being permanently removed */
{
/*
* Only deregister if browsing is enabled and it's a local printers...
*/
if (!Browsing || !p->shared ||
(p->type & (CUPS_PRINTER_REMOTE | CUPS_PRINTER_IMPLICIT)))
return;
/*
* Announce the deletion...
*/
if ((BrowseLocalProtocols & BROWSE_CUPS))
{
cups_ptype_t savedtype = p->type; /* Saved printer type */
p->type |= CUPS_PRINTER_DELETE;
send_cups_browse(p);
p->type = savedtype;
}
#ifdef HAVE_LIBSLP
if (BrowseLocalProtocols & BROWSE_SLP)
slp_dereg_printer(p);
#endif /* HAVE_LIBSLP */
#ifdef HAVE_DNSSD
if (removeit && (BrowseLocalProtocols & BROWSE_DNSSD))
dnssdDeregisterPrinter(p);
#endif /* HAVE_DNSSD */
}
/*
* 'cupsdLoadRemoteCache()' - Load the remote printer cache.
*/
void
cupsdLoadRemoteCache(void)
{
cups_file_t *fp; /* remote.cache file */
int linenum; /* Current line number */
char line[1024], /* Line from file */
*value, /* Pointer to value */
*valueptr, /* Pointer into value */
scheme[32], /* Scheme portion of URI */
username[64], /* Username portion of URI */
host[HTTP_MAX_HOST],
/* Hostname portion of URI */
resource[HTTP_MAX_URI];
/* Resource portion of URI */
int port; /* Port number */
cupsd_printer_t *p; /* Current printer */
time_t now; /* Current time */
/*
* Don't load the cache if the CUPS remote protocol is disabled...
*/
if (!Browsing || !(BrowseRemoteProtocols & BROWSE_CUPS))
{
cupsdLogMessage(CUPSD_LOG_DEBUG,
"cupsdLoadRemoteCache: Not loading remote cache.");
return;
}
/*
* Open the remote.cache file...
*/
snprintf(line, sizeof(line), "%s/remote.cache", CacheDir);
if ((fp = cupsFileOpen(line, "r")) == NULL)
return;
/*
* Read printer configurations until we hit EOF...
*/
linenum = 0;
p = NULL;
now = time(NULL);
while (cupsFileGetConf(fp, line, sizeof(line), &value, &linenum))
{
/*
* Decode the directive...
*/
if (!strcasecmp(line, "<Printer") ||
!strcasecmp(line, "<DefaultPrinter"))
{
/*
* <Printer name> or <DefaultPrinter name>
*/
if (p == NULL && value)
{
/*
* Add the printer and a base file type...
*/
cupsdLogMessage(CUPSD_LOG_DEBUG,
"cupsdLoadRemoteCache: Loading printer %s...", value);
if ((p = cupsdFindDest(value)) != NULL)
{
if (p->type & CUPS_PRINTER_CLASS)
{
cupsdLogMessage(CUPSD_LOG_WARN,
"Cached remote printer \"%s\" conflicts with "
"existing class!",
value);
p = NULL;
continue;
}
}
else
p = cupsdAddPrinter(value);
p->accepting = 1;
p->state = IPP_PRINTER_IDLE;
p->type |= CUPS_PRINTER_REMOTE | CUPS_PRINTER_DISCOVERED;
p->browse_time = now;
p->browse_expire = now + BrowseTimeout;
/*
* Set the default printer as needed...
*/
if (!strcasecmp(line, "<DefaultPrinter"))
DefaultPrinter = p;
}
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "<Class") ||
!strcasecmp(line, "<DefaultClass"))
{
/*
* <Class name> or <DefaultClass name>
*/
if (p == NULL && value)
{
/*
* Add the printer and a base file type...
*/
cupsdLogMessage(CUPSD_LOG_DEBUG,
"cupsdLoadRemoteCache: Loading class %s...", value);
if ((p = cupsdFindDest(value)) != NULL)
p->type = CUPS_PRINTER_CLASS;
else
p = cupsdAddClass(value);
p->accepting = 1;
p->state = IPP_PRINTER_IDLE;
p->type |= CUPS_PRINTER_REMOTE | CUPS_PRINTER_DISCOVERED;
p->browse_time = now;
p->browse_expire = now + BrowseTimeout;
/*
* Set the default printer as needed...
*/
if (!strcasecmp(line, "<DefaultClass"))
DefaultPrinter = p;
}
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "</Printer>") ||
!strcasecmp(line, "</Class>"))
{
if (p != NULL)
{
/*
* Close out the current printer...
*/
cupsdSetPrinterAttrs(p);
p = NULL;
}
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!p)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
else if (!strcasecmp(line, "Info"))
{
if (value)
cupsdSetString(&p->info, value);
}
else if (!strcasecmp(line, "MakeModel"))
{
if (value)
cupsdSetString(&p->make_model, value);
}
else if (!strcasecmp(line, "Location"))
{
if (value)
cupsdSetString(&p->location, value);
}
else if (!strcasecmp(line, "DeviceURI"))
{
if (value)
{
httpSeparateURI(HTTP_URI_CODING_ALL, value, scheme, sizeof(scheme),
username, sizeof(username), host, sizeof(host), &port,
resource, sizeof(resource));
cupsdSetString(&p->hostname, host);
cupsdSetString(&p->uri, value);
cupsdSetString(&p->device_uri, value);
}
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "Option") && value)
{
/*
* Option name value
*/
for (valueptr = value; *valueptr && !isspace(*valueptr & 255); valueptr ++);
if (!*valueptr)
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
else
{
for (; *valueptr && isspace(*valueptr & 255); *valueptr++ = '\0');
p->num_options = cupsAddOption(value, valueptr, p->num_options,
&(p->options));
}
}
else if (!strcasecmp(line, "State"))
{
/*
* Set the initial queue state...
*/
if (value && !strcasecmp(value, "idle"))
p->state = IPP_PRINTER_IDLE;
else if (value && !strcasecmp(value, "stopped"))
p->state = IPP_PRINTER_STOPPED;
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "StateMessage"))
{
/*
* Set the initial queue state message...
*/
if (value)
strlcpy(p->state_message, value, sizeof(p->state_message));
}
else if (!strcasecmp(line, "Accepting"))
{
/*
* Set the initial accepting state...
*/
if (value &&
(!strcasecmp(value, "yes") ||
!strcasecmp(value, "on") ||
!strcasecmp(value, "true")))
p->accepting = 1;
else if (value &&
(!strcasecmp(value, "no") ||
!strcasecmp(value, "off") ||
!strcasecmp(value, "false")))
p->accepting = 0;
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "Type"))
{
if (value)
p->type = atoi(value);
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "BrowseTime"))
{
if (value)
{
time_t t = atoi(value);
if (t > p->browse_expire)
p->browse_expire = t;
}
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "JobSheets"))
{
/*
* Set the initial job sheets...
*/
if (value)
{
for (valueptr = value; *valueptr && !isspace(*valueptr & 255); valueptr ++);
if (*valueptr)
*valueptr++ = '\0';
cupsdSetString(&p->job_sheets[0], value);
while (isspace(*valueptr & 255))
valueptr ++;
if (*valueptr)
{
for (value = valueptr; *valueptr && !isspace(*valueptr & 255); valueptr ++);
if (*valueptr)
*valueptr++ = '\0';
cupsdSetString(&p->job_sheets[1], value);
}
}
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "AllowUser"))
{
if (value)
{
p->deny_users = 0;
cupsdAddPrinterUser(p, value);
}
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else if (!strcasecmp(line, "DenyUser"))
{
if (value)
{
p->deny_users = 1;
cupsdAddPrinterUser(p, value);
}
else
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Syntax error on line %d of remote.cache.", linenum);
return;
}
}
else
{
/*
* Something else we don't understand...
*/
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unknown configuration directive %s on line %d of remote.cache.",
line, linenum);
}
}
cupsFileClose(fp);
/*
* Do auto-classing if needed...
*/
process_implicit_classes(NULL);
}
/*
* 'cupsdRegisterPrinter()' - Start sending broadcast information for a
* printer or update the broadcast contents.
*/
void
cupsdRegisterPrinter(cupsd_printer_t *p)/* I - Printer */
{
if (!Browsing || !BrowseLocalProtocols || !BrowseInterval || !NumBrowsers ||
(p->type & (CUPS_PRINTER_REMOTE | CUPS_PRINTER_IMPLICIT)))
return;
#ifdef HAVE_LIBSLP
/* if (BrowseLocalProtocols & BROWSE_SLP)
slpRegisterPrinter(p); */
#endif /* HAVE_LIBSLP */
#ifdef HAVE_DNSSD
if (BrowseLocalProtocols & BROWSE_DNSSD)
dnssdRegisterPrinter(p);
#endif /* HAVE_DNSSD */
}
/*
* 'cupsdRestartPolling()' - Restart polling servers as needed.
*/
void
cupsdRestartPolling(void)
{
int i; /* Looping var */
cupsd_dirsvc_poll_t *pollp; /* Current polling server */
for (i = 0, pollp = Polled; i < NumPolled; i ++, pollp ++)
if (pollp->pid)
kill(pollp->pid, SIGHUP);
}
/*
* 'cupsdSaveRemoteCache()' - Save the remote printer cache.
*/
void
cupsdSaveRemoteCache(void)
{
int i; /* Looping var */
cups_file_t *fp; /* printers.conf file */
char temp[1024]; /* Temporary string */
cupsd_printer_t *printer; /* Current printer class */
time_t curtime; /* Current time */
struct tm *curdate; /* Current date */
cups_option_t *option; /* Current option */
/*
* Create the remote.cache file...
*/
snprintf(temp, sizeof(temp), "%s/remote.cache", CacheDir);
if ((fp = cupsFileOpen(temp, "w")) == NULL)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to save remote.cache - %s", strerror(errno));
return;
}
else
cupsdLogMessage(CUPSD_LOG_DEBUG, "Saving remote.cache...");
/*
* Restrict access to the file...
*/
fchown(cupsFileNumber(fp), getuid(), Group);
fchmod(cupsFileNumber(fp), ConfigFilePerm);
/*
* Write a small header to the file...
*/
curtime = time(NULL);
curdate = localtime(&curtime);
strftime(temp, sizeof(temp) - 1, "%Y-%m-%d %H:%M", curdate);
cupsFilePuts(fp, "# Remote cache file for " CUPS_SVERSION "\n");
cupsFilePrintf(fp, "# Written by cupsd on %s\n", temp);
/*
* Write each local printer known to the system...
*/
for (printer = (cupsd_printer_t *)cupsArrayFirst(Printers);
printer;
printer = (cupsd_printer_t *)cupsArrayNext(Printers))
{
/*
* Skip local destinations...
*/
if (!(printer->type & CUPS_PRINTER_DISCOVERED))
continue;
/*
* Write printers as needed...
*/
if (printer == DefaultPrinter)
cupsFilePuts(fp, "<Default");
else
cupsFilePutChar(fp, '<');
if (printer->type & CUPS_PRINTER_CLASS)
cupsFilePrintf(fp, "Class %s>\n", printer->name);
else
cupsFilePrintf(fp, "Printer %s>\n", printer->name);
cupsFilePrintf(fp, "Type %d\n", printer->type);
cupsFilePrintf(fp, "BrowseTime %d\n", (int)printer->browse_expire);
if (printer->info)
cupsFilePrintf(fp, "Info %s\n", printer->info);
if (printer->make_model)
cupsFilePrintf(fp, "MakeModel %s\n", printer->make_model);
if (printer->location)
cupsFilePrintf(fp, "Location %s\n", printer->location);
if (printer->device_uri)
cupsFilePrintf(fp, "DeviceURI %s\n", printer->device_uri);
if (printer->state == IPP_PRINTER_STOPPED)
{
cupsFilePuts(fp, "State Stopped\n");
cupsFilePrintf(fp, "StateMessage %s\n", printer->state_message);
}
else
cupsFilePuts(fp, "State Idle\n");
if (printer->accepting)
cupsFilePuts(fp, "Accepting Yes\n");
else
cupsFilePuts(fp, "Accepting No\n");
cupsFilePrintf(fp, "JobSheets %s %s\n", printer->job_sheets[0],
printer->job_sheets[1]);
for (i = 0; i < printer->num_users; i ++)
cupsFilePrintf(fp, "%sUser %s\n", printer->deny_users ? "Deny" : "Allow",
printer->users[i]);
for (i = printer->num_options, option = printer->options;
i > 0;
i --, option ++)
cupsFilePrintf(fp, "Option %s %s\n", option->name, option->value);
if (printer->type & CUPS_PRINTER_CLASS)
cupsFilePuts(fp, "</Class>\n");
else
cupsFilePuts(fp, "</Printer>\n");
}
cupsFileClose(fp);
}
/*
* 'cupsdSendBrowseList()' - Send new browsing information as necessary.
*/
void
cupsdSendBrowseList(void)
{
int count; /* Number of dests to update */
cupsd_printer_t *p; /* Current printer */
time_t ut, /* Minimum update time */
to; /* Timeout time */
int write_printcap; /* Write the printcap file? */
if (!Browsing || !BrowseLocalProtocols || !Printers)
return;
/*
* Compute the update and timeout times...
*/
to = time(NULL);
ut = to - BrowseInterval;
/*
* Figure out how many printers need an update...
*/
if (BrowseInterval > 0)
{
int max_count; /* Maximum number to update */
/*
* Throttle the number of printers we'll be updating this time
* around based on the number of queues that need updating and
* the maximum number of queues to update each second...
*/
max_count = 2 * cupsArrayCount(Printers) / BrowseInterval + 1;
for (count = 0, p = (cupsd_printer_t *)cupsArrayFirst(Printers);
count < max_count && p != NULL;
p = (cupsd_printer_t *)cupsArrayNext(Printers))
if (!(p->type & (CUPS_PRINTER_REMOTE | CUPS_PRINTER_IMPLICIT)) &&
p->shared && p->browse_time < ut)
count ++;
/*
* Loop through all of the printers and send local updates as needed...
*/
if (BrowseNext)
p = (cupsd_printer_t *)cupsArrayFind(Printers, BrowseNext);
else
p = (cupsd_printer_t *)cupsArrayFirst(Printers);
for (;
count > 0;
p = (cupsd_printer_t *)cupsArrayNext(Printers))
{
/*
* Check for wraparound...
*/
if (!p)
p = (cupsd_printer_t *)cupsArrayFirst(Printers);
if (!p)
break;
else if ((p->type & (CUPS_PRINTER_REMOTE | CUPS_PRINTER_IMPLICIT)) ||
!p->shared)
continue;
else if (p->browse_time < ut)
{
/*
* Need to send an update...
*/
count --;
p->browse_time = time(NULL);
if (BrowseLocalProtocols & BROWSE_CUPS)
send_cups_browse(p);
#ifdef HAVE_LIBSLP
if (BrowseLocalProtocols & BROWSE_SLP)
send_slp_browse(p);
#endif /* HAVE_LIBSLP */
#ifdef HAVE_LDAP
if (BrowseLocalProtocols & BROWSE_LDAP)
send_ldap_browse(p);
#endif /* HAVE_LDAP */
}
}
/*
* Save where we left off so that all printers get updated...
*/
BrowseNext = p;
}
/*
* Loop through all of the printers and send local updates as needed...
*/
for (p = (cupsd_printer_t *)cupsArrayFirst(Printers), write_printcap = 0;
p;
p = (cupsd_printer_t *)cupsArrayNext(Printers))
{
/*
* If this is a remote queue, see if it needs to be timed out...
*/
if (p->type & CUPS_PRINTER_DISCOVERED)
{
if (p->browse_expire < to)
{
cupsdAddEvent(CUPSD_EVENT_PRINTER_DELETED, p, NULL,
"%s \'%s\' deleted by directory services (timeout).",
(p->type & CUPS_PRINTER_CLASS) ? "Class" : "Printer",
p->name);
cupsdLogMessage(CUPSD_LOG_DEBUG,
"Remote destination \"%s\" has timed out; "
"deleting it...",
p->name);
cupsArraySave(Printers);
cupsdDeletePrinter(p, 1);
cupsArrayRestore(Printers);
write_printcap = 1;
}
}
}
if (write_printcap)
cupsdWritePrintcap();
}
/*
* 'cupsdStartBrowsing()' - Start sending and receiving broadcast information.
*/
void
cupsdStartBrowsing(void)
{
int val; /* Socket option value */
struct sockaddr_in addr; /* Broadcast address */
cupsd_printer_t *p; /* Current printer */
BrowseNext = NULL;
if (!Browsing || !(BrowseLocalProtocols | BrowseRemoteProtocols))
return;
if ((BrowseLocalProtocols | BrowseRemoteProtocols) & BROWSE_CUPS)
{
if (BrowseSocket < 0)
{
/*
* Create the broadcast socket...
*/
if ((BrowseSocket = socket(AF_INET, SOCK_DGRAM, 0)) < 0)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to create broadcast socket - %s.",
strerror(errno));
BrowseLocalProtocols &= ~BROWSE_CUPS;
BrowseRemoteProtocols &= ~BROWSE_CUPS;
return;
}
/*
* Bind the socket to browse port...
*/
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)))
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to bind broadcast socket - %s.",
strerror(errno));
#ifdef WIN32
closesocket(BrowseSocket);
#else
close(BrowseSocket);
#endif /* WIN32 */
BrowseSocket = -1;
BrowseLocalProtocols &= ~BROWSE_CUPS;
BrowseRemoteProtocols &= ~BROWSE_CUPS;
return;
}
}
/*
* Set the "broadcast" flag...
*/
val = 1;
if (setsockopt(BrowseSocket, SOL_SOCKET, SO_BROADCAST, &val, sizeof(val)))
{
cupsdLogMessage(CUPSD_LOG_ERROR, "Unable to set broadcast mode - %s.",
strerror(errno));
#ifdef WIN32
closesocket(BrowseSocket);
#else
close(BrowseSocket);
#endif /* WIN32 */
BrowseSocket = -1;
BrowseLocalProtocols &= ~BROWSE_CUPS;
BrowseRemoteProtocols &= ~BROWSE_CUPS;
return;
}
/*
* Close the socket on exec...
*/
fcntl(BrowseSocket, F_SETFD, fcntl(BrowseSocket, F_GETFD) | FD_CLOEXEC);
/*
* Finally, add the socket to the input selection set as needed...
*/
if (BrowseRemoteProtocols & BROWSE_CUPS)
{
/*
* We only listen if we want remote printers...
*/
cupsdAddSelect(BrowseSocket, (cupsd_selfunc_t)update_cups_browse,
NULL, NULL);
}
}
else
BrowseSocket = -1;
#ifdef HAVE_LIBSLP
if ((BrowseLocalProtocols | BrowseRemoteProtocols) & BROWSE_SLP)
{
/*
* Open SLP handle...
*/
if (SLPOpen("en", SLP_FALSE, &BrowseSLPHandle) != SLP_OK)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to open an SLP handle; disabling SLP browsing!");
BrowseLocalProtocols &= ~BROWSE_SLP;
BrowseRemoteProtocols &= ~BROWSE_SLP;
}
BrowseSLPRefresh = 0;
}
else
BrowseSLPHandle = NULL;
#endif /* HAVE_LIBSLP */
#ifdef HAVE_OPENLDAP
if ((BrowseLocalProtocols | BrowseRemoteProtocols) & BROWSE_LDAP)
{
if (!BrowseLDAPDN)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Need to set BrowseLDAPDN to use LDAP browsing!");
BrowseLocalProtocols &= ~BROWSE_LDAP;
BrowseRemoteProtocols &= ~BROWSE_LDAP;
}
else
{
/*
* Open LDAP handle...
*/
int rc; /* LDAP API status */
int version = 3; /* LDAP version */
struct berval bv = {0, ""}; /* SASL bind value */
/*
* Set the certificate file to use for encrypted LDAP sessions...
*/
if (BrowseLDAPCACertFile)
{
cupsdLogMessage(CUPSD_LOG_DEBUG,
"cupsdStartBrowsing: Setting CA certificate file \"%s\"",
BrowseLDAPCACertFile);
if ((rc = ldap_set_option(NULL, LDAP_OPT_X_TLS_CACERTFILE,
(void *)BrowseLDAPCACertFile))
!= LDAP_SUCCESS)
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to set CA certificate file for LDAP "
"connections: %d - %s", rc, ldap_err2string(rc));
}
/*
* LDAP stuff currently only supports ldapi EXTERNAL SASL binds...
*/
if (!BrowseLDAPServer || !strcasecmp(BrowseLDAPServer, "localhost"))
rc = ldap_initialize(&BrowseLDAPHandle, "ldapi:///");
else
rc = ldap_initialize(&BrowseLDAPHandle, BrowseLDAPServer);
if (rc != LDAP_SUCCESS)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to initialize LDAP; disabling LDAP browsing!");
BrowseLocalProtocols &= ~BROWSE_LDAP;
BrowseRemoteProtocols &= ~BROWSE_LDAP;
}
else if (ldap_set_option(BrowseLDAPHandle, LDAP_OPT_PROTOCOL_VERSION,
(const void *)&version) != LDAP_SUCCESS)
{
ldap_unbind_ext(BrowseLDAPHandle, NULL, NULL);
BrowseLDAPHandle = NULL;
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to set LDAP protocol version; "
"disabling LDAP browsing!");
BrowseLocalProtocols &= ~BROWSE_LDAP;
BrowseRemoteProtocols &= ~BROWSE_LDAP;
}
else
{
if (!BrowseLDAPServer || !strcasecmp(BrowseLDAPServer, "localhost"))
rc = ldap_sasl_bind_s(BrowseLDAPHandle, NULL, "EXTERNAL", &bv, NULL,
NULL, NULL);
else
rc = ldap_bind_s(BrowseLDAPHandle, BrowseLDAPBindDN,
BrowseLDAPPassword, LDAP_AUTH_SIMPLE);
if (rc != LDAP_SUCCESS)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to bind to LDAP server; "
"disabling LDAP browsing!");
ldap_unbind_ext(BrowseLDAPHandle, NULL, NULL);
BrowseLocalProtocols &= ~BROWSE_LDAP;
BrowseRemoteProtocols &= ~BROWSE_LDAP;
}
}
}
BrowseLDAPRefresh = 0;
}
#endif /* HAVE_OPENLDAP */
/*
* Enable LPD and SMB printer sharing as needed through external programs...
*/
if (BrowseLocalProtocols & BROWSE_LPD)
update_lpd(1);
if (BrowseLocalProtocols & BROWSE_SMB)
update_smb(1);
/*
* Register the individual printers
*/
for (p = (cupsd_printer_t *)cupsArrayFirst(Printers);
p;
p = (cupsd_printer_t *)cupsArrayNext(Printers))
if (!(p->type & (CUPS_PRINTER_REMOTE | CUPS_PRINTER_IMPLICIT)))
cupsdRegisterPrinter(p);
}
/*
* 'cupsdStartPolling()' - Start polling servers as needed.
*/
void
cupsdStartPolling(void)
{
int i; /* Looping var */
cupsd_dirsvc_poll_t *pollp; /* Current polling server */
char polld[1024]; /* Poll daemon path */
char sport[255]; /* Server port */
char bport[255]; /* Browser port */
char interval[255]; /* Poll interval */
int statusfds[2]; /* Status pipe */
char *argv[6]; /* Arguments */
char *envp[100]; /* Environment */
/*
* Don't do anything if we aren't polling...
*/
if (NumPolled == 0 || BrowseSocket < 0)
{
PollPipe = -1;
PollStatusBuffer = NULL;
return;
}
/*
* Setup string arguments for polld, port and interval options.
*/
snprintf(polld, sizeof(polld), "%s/daemon/cups-polld", ServerBin);
sprintf(bport, "%d", BrowsePort);
if (BrowseInterval)
sprintf(interval, "%d", BrowseInterval);
else
strcpy(interval, "30");
argv[0] = "cups-polld";
argv[2] = sport;
argv[3] = interval;
argv[4] = bport;
argv[5] = NULL;
cupsdLoadEnv(envp, (int)(sizeof(envp) / sizeof(envp[0])));
/*
* Create a pipe that receives the status messages from each
* polling daemon...
*/
if (cupsdOpenPipe(statusfds))
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"Unable to create polling status pipes - %s.",
strerror(errno));
PollPipe = -1;
PollStatusBuffer = NULL;
return;
}
PollPipe = statusfds[0];
PollStatusBuffer = cupsdStatBufNew(PollPipe, "[Poll]");
/*
* Run each polling daemon, redirecting stderr to the polling pipe...
*/
for (i = 0, pollp = Polled; i < NumPolled; i ++, pollp ++)
{
sprintf(sport, "%d", pollp->port);
argv[1] = pollp->hostname;
if (cupsdStartProcess(polld, argv, envp, -1, -1, statusfds[1], -1, -1,
0, &(pollp->pid)) < 0)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"cupsdStartPolling: Unable to fork polling daemon - %s",
strerror(errno));
pollp->pid = 0;
break;
}
else
cupsdLogMessage(CUPSD_LOG_DEBUG,
"cupsdStartPolling: Started polling daemon for %s:%d, pid = %d",
pollp->hostname, pollp->port, pollp->pid);
}
close(statusfds[1]);
/*
* Finally, add the pipe to the input selection set...
*/
cupsdAddSelect(PollPipe, (cupsd_selfunc_t)update_polling, NULL, NULL);
}
/*
* 'cupsdStopBrowsing()' - Stop sending and receiving broadcast information.
*/
void
cupsdStopBrowsing(void)
{
cupsd_printer_t *p; /* Current printer */
if (!Browsing || !(BrowseLocalProtocols | BrowseRemoteProtocols))
return;
/*
* De-register the individual printers
*/
for (p = (cupsd_printer_t *)cupsArrayFirst(Printers);
p;
p = (cupsd_printer_t *)cupsArrayNext(Printers))
if (!(p->type & (CUPS_PRINTER_REMOTE | CUPS_PRINTER_IMPLICIT)))
cupsdDeregisterPrinter(p, 1);
/*
* Shut down browsing sockets...
*/
if (((BrowseLocalProtocols | BrowseRemoteProtocols) & BROWSE_CUPS) &&
BrowseSocket >= 0)
{
/*
* Close the socket and remove it from the input selection set.
*/
#ifdef WIN32
closesocket(BrowseSocket);
#else
close(BrowseSocket);
#endif /* WIN32 */
cupsdRemoveSelect(BrowseSocket);
BrowseSocket = -1;
}
#ifdef HAVE_LIBSLP
if (((BrowseLocalProtocols | BrowseRemoteProtocols) & BROWSE_SLP) &&
BrowseSLPHandle)
{
/*
* Close SLP handle...
*/
SLPClose(BrowseSLPHandle);
BrowseSLPHandle = NULL;
}
#endif /* HAVE_LIBSLP */
#ifdef HAVE_OPENLDAP
if (((BrowseLocalProtocols | BrowseRemoteProtocols) & BROWSE_LDAP) &&
BrowseLDAPHandle)
{
ldap_unbind(BrowseLDAPHandle);
BrowseLDAPHandle = NULL;
}
#endif /* HAVE_OPENLDAP */
/*
* Disable LPD and SMB printer sharing as needed through external programs...
*/
if (BrowseLocalProtocols & BROWSE_LPD)
update_lpd(0);
if (BrowseLocalProtocols & BROWSE_SMB)
update_smb(0);
}
/*
* 'cupsdStopPolling()' - Stop polling servers as needed.
*/
void
cupsdStopPolling(void)
{
int i; /* Looping var */
cupsd_dirsvc_poll_t *pollp; /* Current polling server */
if (PollPipe >= 0)
{
cupsdStatBufDelete(PollStatusBuffer);
close(PollPipe);
cupsdRemoveSelect(PollPipe);
PollPipe = -1;
PollStatusBuffer = NULL;
}
for (i = 0, pollp = Polled; i < NumPolled; i ++, pollp ++)
if (pollp->pid)
cupsdEndProcess(pollp->pid, 0);
}
#ifdef HAVE_DNSSD
/*
* 'cupsdUpdateDNSSDBrowse()' - Handle DNS-SD queries.
*/
void
cupsdUpdateDNSSDBrowse(
cupsd_printer_t *p) /* I - Printer being queried */
{
DNSServiceErrorType sdErr; /* Service discovery error */
if ((sdErr = DNSServiceProcessResult(p->dnssd_ipp_ref))
!= kDNSServiceErr_NoError)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"DNS Service Discovery registration error %d for \"%s\"!",
sdErr, p->name);
cupsdRemoveSelect(p->dnssd_ipp_fd);
DNSServiceRefDeallocate(p->dnssd_ipp_ref);
p->dnssd_ipp_ref = NULL;
p->dnssd_ipp_fd = -1;
}
}
#endif /* HAVE_DNSSD */
#ifdef HAVE_OPENLDAP
/*
* 'cupsdUpdateLDAPBrowse()' - Scan for new printers via LDAP...
*/
void
cupsdUpdateLDAPBrowse(void)
{
char uri[HTTP_MAX_URI], /* Printer URI */
host[HTTP_MAX_URI], /* Hostname */
resource[HTTP_MAX_URI], /* Resource path */
location[1024], /* Printer location */
info[1024], /* Printer information */
make_model[1024], /* Printer make and model */
**value; /* Holds the returned data from LDAP */
int type; /* Printer type */
int rc; /* LDAP status */
int limit; /* Size limit */
LDAPMessage *res, /* LDAP search results */
*e; /* Current entry from search */
/*
* Search for printers...
*/
cupsdLogMessage(CUPSD_LOG_DEBUG2, "UpdateLDAPBrowse: %s", ServerName);
BrowseLDAPRefresh = time(NULL) + BrowseInterval;
rc = ldap_search_s(BrowseLDAPHandle, BrowseLDAPDN, LDAP_SCOPE_SUBTREE,
"(objectclass=cupsPrinter)", (char **)ldap_attrs, 0, &res);
if (rc != LDAP_SUCCESS)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"LDAP search returned error %d: %s", rc,
ldap_err2string(rc));
return;
}
limit = ldap_count_entries(BrowseLDAPHandle, res);
cupsdLogMessage(CUPSD_LOG_DEBUG2, "LDAP search returned %d entries", limit);
if (limit < 1)
return;
/*
* Loop through the available printers...
*/
for (e = ldap_first_entry(BrowseLDAPHandle, res);
e;
e = ldap_next_entry(BrowseLDAPHandle, e))
{
/*
* Get the required values from this entry...
*/
if ((value = ldap_get_values(BrowseLDAPHandle, e,
"printerDescription")) == NULL)
continue;
strlcpy(info, *value, sizeof(info));
ldap_value_free(value);
if ((value = ldap_get_values(BrowseLDAPHandle, e,
"printerLocation")) == NULL)
continue;
strlcpy(location, *value, sizeof(location));
ldap_value_free(value);
if ((value = ldap_get_values(BrowseLDAPHandle, e,
"printerMakeAndModel")) == NULL)
continue;
strlcpy(make_model, *value, sizeof(make_model));
ldap_value_free(value);
if ((value = ldap_get_values(BrowseLDAPHandle, e,
"printerType")) == NULL)
continue;
type = atoi(*value);
ldap_value_free(value);
if ((value = ldap_get_values(BrowseLDAPHandle, e,
"printerURI")) == NULL)
continue;
strlcpy(uri, *value, sizeof(uri));
ldap_value_free(value);
/*
* Process the entry as browse data...
*/
if (!is_local_queue(uri, host, sizeof(host), resource, sizeof(resource)))
process_browse_data(uri, host, resource, type, IPP_PRINTER_IDLE,
location, info, make_model, 0, NULL);
}
}
#endif /* HAVE_OPENLDAP */
#ifdef HAVE_LIBSLP
/*
* 'cupsdUpdateSLPBrowse()' - Get browsing information via SLP.
*/
void
cupsdUpdateSLPBrowse(void)
{
slpsrvurl_t *s, /* Temporary list of service URLs */
*next; /* Next service in list */
cupsd_printer_t p; /* Printer information */
const char *uri; /* Pointer to printer URI */
char host[HTTP_MAX_URI], /* Host portion of URI */
resource[HTTP_MAX_URI]; /* Resource portion of URI */
/*
* Reset the refresh time...
*/
BrowseSLPRefresh = time(NULL) + BrowseInterval;
/*
* Poll for remote printers using SLP...
*/
s = NULL;
SLPFindSrvs(BrowseSLPHandle, SLP_CUPS_SRVTYPE, "", "",
slp_url_callback, &s);
/*
* Loop through the list of available printers...
*/
for (; s; s = next)
{
/*
* Save the "next" pointer...
*/
next = s->next;
/*
* Load a cupsd_printer_t structure with the SLP service attributes...
*/
SLPFindAttrs(BrowseSLPHandle, s->url, "", "", slp_attr_callback, &p);
/*
* Process this printer entry...
*/
uri = s->url + SLP_CUPS_SRVLEN + 1;
if (!strncmp(uri, "http://", 7) || !strncmp(uri, "ipp://", 6))
{
/*
* Pull the URI apart to see if this is a local or remote printer...
*/
if (!is_local_queue(uri, host, sizeof(host), resource, sizeof(resource)))
process_browse_data(uri, host, resource, p.type, IPP_PRINTER_IDLE,
p.location, p.info, p.make_model, 0, NULL);
}
/*
* Free this listing...
*/
cupsdClearString(&p.info);
cupsdClearString(&p.location);
cupsdClearString(&p.make_model);
free(s);
}
}
#endif /* HAVE_LIBSLP */
/*
* 'dequote()' - Remote quotes from a string.
*/
static char * /* O - Dequoted string */
dequote(char *d, /* I - Destination string */
const char *s, /* I - Source string */
int dlen) /* I - Destination length */
{
char *dptr; /* Pointer into destination */
if (s)
{
for (dptr = d, dlen --; *s && dlen > 0; s ++)
if (*s != '\"')
{
*dptr++ = *s;
dlen --;
}
*dptr = '\0';
}
else
*d = '\0';
return (d);
}
/*
* 'is_local_queue()' - Determine whether the URI points at a local queue.
*/
static int /* O - 1 = local, 0 = remote, -1 = bad URI */
is_local_queue(const char *uri, /* I - Printer URI */
char *host, /* O - Host string */
int hostlen, /* I - Length of host buffer */
char *resource, /* O - Resource string */
int resourcelen) /* I - Length of resource buffer */
{
char scheme[32], /* Scheme portion of URI */
username[HTTP_MAX_URI]; /* Username portion of URI */
int port; /* Port portion of URI */
cupsd_netif_t *iface; /* Network interface */
/*
* Pull the URI apart to see if this is a local or remote printer...
*/
if (httpSeparateURI(HTTP_URI_CODING_ALL, uri, scheme, sizeof(scheme),
username, sizeof(username), host, hostlen, &port,
resource, resourcelen) < HTTP_URI_OK)
return (-1);
DEBUG_printf(("host=\"%s\", ServerName=\"%s\"\n", host, ServerName));
/*
* Check for local server addresses...
*/
if (!strcasecmp(host, ServerName) && port == LocalPort)
return (1);
cupsdNetIFUpdate();
for (iface = (cupsd_netif_t *)cupsArrayFirst(NetIFList);
iface;
iface = (cupsd_netif_t *)cupsArrayNext(NetIFList))
if (!strcasecmp(host, iface->hostname) && port == iface->port)
return (1);
/*
* If we get here, the printer is remote...
*/
return (0);
}
/*
* 'process_browse_data()' - Process new browse data.
*/
static void
process_browse_data(
const char *uri, /* I - URI of printer/class */
const char *host, /* I - Hostname */
const char *resource, /* I - Resource path */
cups_ptype_t type, /* I - Printer type */
ipp_pstate_t state, /* I - Printer state */
const char *location, /* I - Printer location */
const char *info, /* I - Printer information */
const char *make_model, /* I - Printer make and model */
int num_attrs, /* I - Number of attributes */
cups_option_t *attrs) /* I - Attributes */
{
int i; /* Looping var */
int update, /* Update printer attributes? */
write_printcap; /* Write the printcap file? */
char finaluri[HTTP_MAX_URI], /* Final URI for printer */
name[IPP_MAX_NAME], /* Name of printer */
newname[IPP_MAX_NAME], /* New name of printer */
*hptr, /* Pointer into hostname */
*sptr; /* Pointer into ServerName */
char local_make_model[IPP_MAX_NAME];
/* Local make and model */
cupsd_printer_t *p; /* Printer information */
const char *ipp_options, /* ipp-options value */
*lease_duration; /* lease-duration value */
/*
* Determine if the URI contains any illegal characters in it...
*/
if (strncmp(uri, "ipp://", 6) || !host[0] ||
(strncmp(resource, "/printers/", 10) &&
strncmp(resource, "/classes/", 9)))
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"process_browse_data: Bad printer URI in browse data: %s",
uri);
return;
}
if (strchr(resource, '?') ||
(!strncmp(resource, "/printers/", 10) && strchr(resource + 10, '/')) ||
(!strncmp(resource, "/classes/", 9) && strchr(resource + 9, '/')))
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"process_browse_data: Bad resource in browse data: %s",
resource);
return;
}
/*
* OK, this isn't a local printer; add any remote options...
*/
ipp_options = cupsGetOption("ipp-options", num_attrs, attrs);
if (BrowseRemoteOptions)
{
if (BrowseRemoteOptions[0] == '?')
{
/*
* Override server-supplied options...
*/
snprintf(finaluri, sizeof(finaluri), "%s%s", uri, BrowseRemoteOptions);
}
else if (ipp_options)
{
/*
* Combine the server and local options...
*/
snprintf(finaluri, sizeof(finaluri), "%s?%s+%s", uri, ipp_options,
BrowseRemoteOptions);
}
else
{
/*
* Just use the local options...
*/
snprintf(finaluri, sizeof(finaluri), "%s?%s", uri, BrowseRemoteOptions);
}
uri = finaluri;
}
else if (ipp_options)
{
/*
* Just use the server-supplied options...
*/
snprintf(finaluri, sizeof(finaluri), "%s?%s", uri, ipp_options);
uri = finaluri;
}
/*
* See if we already have it listed in the Printers list, and add it if not...
*/
type |= CUPS_PRINTER_REMOTE | CUPS_PRINTER_DISCOVERED;
type &= ~CUPS_PRINTER_IMPLICIT;
update = 0;
write_printcap = 0;
hptr = strchr(host, '.');
sptr = strchr(ServerName, '.');
if (!ServerNameIsIP && sptr != NULL && hptr != NULL)
{
/*
* Strip the common domain name components...
*/
while (hptr != NULL)
{
if (!strcasecmp(hptr, sptr))
{
*hptr = '\0';
break;
}
else
hptr = strchr(hptr + 1, '.');
}
}
if (type & CUPS_PRINTER_CLASS)
{
/*
* Remote destination is a class...
*/
if (!strncmp(resource, "/classes/", 9))
snprintf(name, sizeof(name), "%s@%s", resource + 9, host);
else
return;
if (hptr && !*hptr)
*hptr = '.'; /* Resource FQDN */
if ((p = cupsdFindClass(name)) == NULL && BrowseShortNames)
{
if ((p = cupsdFindClass(resource + 9)) != NULL)
{
if (p->hostname && strcasecmp(p->hostname, host))
{
/*
* Nope, this isn't the same host; if the hostname isn't the local host,
* add it to the other class and then find a class using the full host
* name...
*/
if (p->type & CUPS_PRINTER_REMOTE)
{
cupsdLogMessage(CUPSD_LOG_DEBUG,
"Renamed remote class \"%s\" to \"%s@%s\"...",
p->name, p->name, p->hostname);
cupsdAddEvent(CUPSD_EVENT_PRINTER_DELETED, p, NULL,
"Class \'%s\' deleted by directory services.",
p->name);
snprintf(newname, sizeof(newname), "%s@%s", p->name, p->hostname);
cupsdRenamePrinter(p, newname);
cupsdAddEvent(CUPSD_EVENT_PRINTER_ADDED, p, NULL,
"Class \'%s\' added by directory services.",
p->name);
}
p = NULL;
}
else if (!p->hostname)
{
/*
* Hostname not set, so this must be a cached remote printer
* that was created for a pending print job...
*/
cupsdSetString(&p->hostname, host);
cupsdSetString(&p->uri, uri);
cupsdSetString(&p->device_uri, uri);
update = 1;
}
}
else
{
/*
* Use the short name for this shared class.
*/
strlcpy(name, resource + 9, sizeof(name));
}
}
else if (p && !p->hostname)
{
/*
* Hostname not set, so this must be a cached remote printer
* that was created for a pending print job...
*/
cupsdSetString(&p->hostname, host);
cupsdSetString(&p->uri, uri);
cupsdSetString(&p->device_uri, uri);
update = 1;
}
if (!p)
{
/*
* Class doesn't exist; add it...
*/
p = cupsdAddClass(name);
cupsdLogMessage(CUPSD_LOG_DEBUG, "Added remote class \"%s\"...", name);
cupsdAddEvent(CUPSD_EVENT_PRINTER_ADDED, p, NULL,
"Class \'%s\' added by directory services.", name);
/*
* Force the URI to point to the real server...
*/
p->type = type & ~CUPS_PRINTER_REJECTING;
p->accepting = 1;
cupsdSetString(&p->uri, uri);
cupsdSetString(&p->device_uri, uri);
cupsdSetString(&p->hostname, host);
update = 1;
write_printcap = 1;
}
}
else
{
/*
* Remote destination is a printer...
*/
if (!strncmp(resource, "/printers/", 10))
snprintf(name, sizeof(name), "%s@%s", resource + 10, host);
else
return;
if (hptr && !*hptr)
*hptr = '.'; /* Resource FQDN */
if ((p = cupsdFindPrinter(name)) == NULL && BrowseShortNames)
{
if ((p = cupsdFindPrinter(resource + 10)) != NULL)
{
if (p->hostname && strcasecmp(p->hostname, host))
{
/*
* Nope, this isn't the same host; if the hostname isn't the local host,
* add it to the other printer and then find a printer using the full host
* name...
*/
if (p->type & CUPS_PRINTER_REMOTE)
{
cupsdLogMessage(CUPSD_LOG_DEBUG,
"Renamed remote printer \"%s\" to \"%s@%s\"...",
p->name, p->name, p->hostname);
cupsdAddEvent(CUPSD_EVENT_PRINTER_DELETED, p, NULL,
"Printer \'%s\' deleted by directory services.",
p->name);
snprintf(newname, sizeof(newname), "%s@%s", p->name, p->hostname);
cupsdRenamePrinter(p, newname);
cupsdAddEvent(CUPSD_EVENT_PRINTER_ADDED, p, NULL,
"Printer \'%s\' added by directory services.",
p->name);
}
p = NULL;
}
else if (!p->hostname)
{
/*
* Hostname not set, so this must be a cached remote printer
* that was created for a pending print job...
*/
cupsdSetString(&p->hostname, host);
cupsdSetString(&p->uri, uri);
cupsdSetString(&p->device_uri, uri);
update = 1;
}
}
else
{
/*
* Use the short name for this shared printer.
*/
strlcpy(name, resource + 10, sizeof(name));
}
}
else if (p && !p->hostname)
{
/*
* Hostname not set, so this must be a cached remote printer
* that was created for a pending print job...
*/
cupsdSetString(&p->hostname, host);
cupsdSetString(&p->uri, uri);
cupsdSetString(&p->device_uri, uri);
update = 1;
}
if (!p)
{
/*
* Printer doesn't exist; add it...
*/
p = cupsdAddPrinter(name);
cupsdAddEvent(CUPSD_EVENT_PRINTER_ADDED, p, NULL,
"Printer \'%s\' added by directory services.", name);
cupsdLogMessage(CUPSD_LOG_DEBUG, "Added remote printer \"%s\"...", name);
/*
* Force the URI to point to the real server...
*/
p->type = type & ~CUPS_PRINTER_REJECTING;
p->accepting = 1;
cupsdSetString(&p->hostname, host);
cupsdSetString(&p->uri, uri);
cupsdSetString(&p->device_uri, uri);
write_printcap = 1;
update = 1;
}
}
/*
* Update the state...
*/
p->state = state;
p->browse_time = time(NULL);
if ((lease_duration = cupsGetOption("lease-duration", num_attrs,
attrs)) != NULL)
{
/*
* Grab the lease-duration for the browse data; anything less then 1
* second or more than 1 week gets the default BrowseTimeout...
*/
i = atoi(lease_duration);
if (i < 1 || i > 604800)
i = BrowseTimeout;
p->browse_expire = p->browse_time + i;
}
else
p->browse_expire = p->browse_time + BrowseTimeout;
if (type & CUPS_PRINTER_REJECTING)
{
type &= ~CUPS_PRINTER_REJECTING;
if (p->accepting)
{
update = 1;
p->accepting = 0;
}
}
else if (!p->accepting)
{
update = 1;
p->accepting = 1;
}
if (p->type != type)
{
p->type = type;
update = 1;
}
if (location && (!p->location || strcmp(p->location, location)))
{
cupsdSetString(&p->location, location);
update = 1;
}
if (info && (!p->info || strcmp(p->info, info)))
{
cupsdSetString(&p->info, info);
update = 1;
write_printcap = 1;
}
if (!make_model || !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
snprintf(local_make_model, sizeof(local_make_model),
"%s on %s", make_model, host);
if (!p->make_model || strcmp(p->make_model, local_make_model))
{
cupsdSetString(&p->make_model, local_make_model);
update = 1;
}
if (p->num_options)
{
if (!update && !(type & CUPS_PRINTER_DELETE))
{
/*
* See if we need to update the attributes...
*/
if (p->num_options != num_attrs)
update = 1;
else
{
for (i = 0; i < num_attrs; i ++)
if (strcmp(attrs[i].name, p->options[i].name) ||
(!attrs[i].value != !p->options[i].value) ||
(attrs[i].value && strcmp(attrs[i].value, p->options[i].value)))
{
update = 1;
break;
}
}
}
/*
* Free the old options...
*/
cupsFreeOptions(p->num_options, p->options);
}
p->num_options = num_attrs;
p->options = attrs;
if (type & CUPS_PRINTER_DELETE)
{
cupsdAddEvent(CUPSD_EVENT_PRINTER_DELETED, p, NULL,
"%s \'%s\' deleted by directory services.",
(type & CUPS_PRINTER_CLASS) ? "Class" : "Printer", p->name);
cupsdExpireSubscriptions(p, NULL);
cupsdDeletePrinter(p, 1);
cupsdUpdateImplicitClasses();
write_printcap = 1;
}
else if (update)
{
cupsdSetPrinterAttrs(p);
cupsdUpdateImplicitClasses();
}
/*
* See if we have a default printer... If not, make the first network
* default printer the default.
*/
if (DefaultPrinter == NULL && Printers != NULL && UseNetworkDefault)
{
/*
* Find the first network default printer and use it...
*/
for (p = (cupsd_printer_t *)cupsArrayFirst(Printers);
p;
p = (cupsd_printer_t *)cupsArrayNext(Printers))
if (p->type & CUPS_PRINTER_DEFAULT)
{
DefaultPrinter = p;
write_printcap = 1;
break;
}
}
/*
* Do auto-classing if needed...
*/
process_implicit_classes(&write_printcap);
/*
* Update the printcap file...
*/
if (write_printcap)
cupsdWritePrintcap();
}
#ifdef HAVE_DNSSD
/*
* 'dnssdBuildTxtRecord()' - Build a TXT record from printer info.
*/
static char * /* O - TXT record */
dnssdBuildTxtRecord(
int *txt_len, /* O - TXT record length */
cupsd_printer_t *p) /* I - Printer information */
{
int i, j; /* Looping vars */
char type_str[32], /* Type to string buffer */
state_str[32], /* State to string buffer */
rp_str[1024], /* Queue name string buffer */
air_str[1024], /* auth-info-required string buffer */
*keyvalue[32][2]; /* Table of key/value pairs */
/*
* Load up the key value pairs...
*/
i = 0;
keyvalue[i ][0] = "txtvers";
keyvalue[i++][1] = "1";
keyvalue[i ][0] = "qtotal";
keyvalue[i++][1] = "1";
keyvalue[i ][0] = "rp";
keyvalue[i++][1] = rp_str;
snprintf(rp_str, sizeof(rp_str), "%s/%s",
(p->type & CUPS_PRINTER_CLASS) ? "classes" : "printers", p->name);
keyvalue[i ][0] = "ty";
keyvalue[i++][1] = p->make_model;
if (p->location && *p->location != '\0')
{
keyvalue[i ][0] = "note";
keyvalue[i++][1] = p->location;
}
keyvalue[i ][0] = "product";
keyvalue[i++][1] = p->product ? p->product : "Unknown";
snprintf(type_str, sizeof(type_str), "0x%X", p->type | CUPS_PRINTER_REMOTE);
snprintf(state_str, sizeof(state_str), "%d", p->state);
keyvalue[i ][0] = "printer-state";
keyvalue[i++][1] = state_str;
keyvalue[i ][0] = "printer-type";
keyvalue[i++][1] = type_str;
keyvalue[i ][0] = "Transparent";
keyvalue[i++][1] = "T";
keyvalue[i ][0] = "Binary";
keyvalue[i++][1] = "T";
if ((p->type & CUPS_PRINTER_FAX))
{
keyvalue[i ][0] = "Fax";
keyvalue[i++][1] = "T";
}
if ((p->type & CUPS_PRINTER_COLOR))
{
keyvalue[i ][0] = "Color";
keyvalue[i++][1] = "T";
}
if ((p->type & CUPS_PRINTER_DUPLEX))
{
keyvalue[i ][0] = "Duplex";
keyvalue[i++][1] = "T";
}
if ((p->type & CUPS_PRINTER_STAPLE))
{
keyvalue[i ][0] = "Staple";
keyvalue[i++][1] = "T";
}
if ((p->type & CUPS_PRINTER_COPIES))
{
keyvalue[i ][0] = "Copies";
keyvalue[i++][1] = "T";
}
if ((p->type & CUPS_PRINTER_COLLATE))
{
keyvalue[i ][0] = "Collate";
keyvalue[i++][1] = "T";
}
if ((p->type & CUPS_PRINTER_PUNCH))
{
keyvalue[i ][0] = "Punch";
keyvalue[i++][1] = "T";
}
if ((p->type & CUPS_PRINTER_BIND))
{
keyvalue[i ][0] = "Bind";
keyvalue[i++][1] = "T";
}
if ((p->type & CUPS_PRINTER_SORT))
{
keyvalue[i ][0] = "Sort";
keyvalue[i++][1] = "T";
}
keyvalue[i ][0] = "pdl";
keyvalue[i++][1] = p->pdl ? p->pdl : "application/postscript";
if (p->num_auth_info_required)
{
char *air = air_str; /* Pointer into string */
for (j = 0; j < p->num_auth_info_required; j ++)
{
if (air >= (air_str + sizeof(air_str) - 2))
break;
if (j)
*air++ = ',';
strlcpy(air, p->auth_info_required[j], sizeof(air_str) - (air - air_str));
air += strlen(air);
}
keyvalue[i ][0] = "air";
keyvalue[i++][1] = air;
}
/*
* Then pack them into a proper txt record...
*/
return (dnssdPackTxtRecord(txt_len, keyvalue, i));
}
/*
* 'dnssdDeregisterPrinter()' - Stop sending broadcast information for a
* printer.
*/
static void
dnssdDeregisterPrinter(
cupsd_printer_t *p) /* I - Printer */
{
cupsdLogMessage(CUPSD_LOG_DEBUG2, "dnssdDeregisterPrinter(%s)", p->name);
/*
* Closing the socket deregisters the service
*/
if (p->dnssd_ipp_ref)
{
cupsdRemoveSelect(p->dnssd_ipp_fd);
DNSServiceRefDeallocate(p->dnssd_ipp_ref);
p->dnssd_ipp_ref = NULL;
p->dnssd_ipp_fd = -1;
}
cupsdClearString(&p->reg_name);
if (p->txt_record)
{
/*
* p->txt_record is malloc'd, not _cupsStrAlloc'd...
*/
free(p->txt_record);
p->txt_record = NULL;
}
}
/*
* 'dnssdPackTxtRecord()' - Pack an array of key/value pairs into the
* TXT record format.
*/
static char * /* O - TXT record */
dnssdPackTxtRecord(int *txt_len, /* O - TXT record length */
char *keyvalue[][2], /* I - Table of key value pairs */
int count) /* I - Items in table */
{
int i; /* Looping var */
int length; /* Length of TXT record */
int length2; /* Length of value */
char *txtRecord; /* TXT record buffer */
char *cursor; /* Looping pointer */
/*
* Calculate the buffer size
*/
for (length = i = 0; i < count; i++)
length += 1 + strlen(keyvalue[i][0]) +
(keyvalue[i][1] ? 1 + strlen(keyvalue[i][1]) : 0);
/*
* Allocate and fill it
*/
txtRecord = malloc(length);
if (txtRecord)
{
*txt_len = length;
for (cursor = txtRecord, i = 0; i < count; i++)
{
/*
* Drop in the p-string style length byte followed by the data
*/
length = strlen(keyvalue[i][0]);
length2 = keyvalue[i][1] ? 1 + strlen(keyvalue[i][1]) : 0;
*cursor++ = (unsigned char)(length + length2);
memcpy(cursor, keyvalue[i][0], length);
cursor += length;
if (length2)
{
length2 --;
*cursor++ = '=';
memcpy(cursor, keyvalue[i][1], length2);
cursor += length2;
}
}
}
return (txtRecord);
}
/*
* 'dnssdRegisterCallback()' - DNSServiceRegister callback.
*/
static void
dnssdRegisterCallback(
DNSServiceRef sdRef, /* I - DNS Service reference */
DNSServiceFlags flags, /* I - Reserved for future use */
DNSServiceErrorType errorCode, /* I - Error code */
const char *name, /* I - Service name */
const char *regtype, /* I - Service type */
const char *domain, /* I - Domain. ".local" for now */
void *context) /* I - User-defined context */
{
(void)context;
cupsdLogMessage(CUPSD_LOG_DEBUG2,
"dnssdRegisterCallback(%s, %s)", name, regtype);
if (errorCode)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"DNSServiceRegister failed with error %d", (int)errorCode);
return;
}
}
/*
* 'dnssdRegisterPrinter()' - Start sending broadcast information for a printer
* or update the broadcast contents.
*/
static void
dnssdRegisterPrinter(cupsd_printer_t *p)/* I - Printer */
{
DNSServiceErrorType se; /* dnssd errors */
cupsd_listener_t *lis; /* Current listening socket */
char *txt_record, /* TXT record buffer */
*name; /* Service name */
int txt_len, /* TXT record length */
port; /* IPP port number */
char str_buffer[1024];
/* C-string buffer */
const char *computerName; /* Computer name c-string ptr */
const char *regtype; /* Registration type */
#ifdef HAVE_COREFOUNDATION_H
CFStringRef computerNameRef;/* Computer name CFString */
CFStringEncoding nameEncoding; /* Computer name encoding */
CFMutableStringRef shortNameRef; /* Mutable name string */
CFIndex nameLength; /* Name string length */
#else
int nameLength; /* Name string length */
#endif /* HAVE_COREFOUNDATION_H */
cupsdLogMessage(CUPSD_LOG_DEBUG2, "dnssdRegisterPrinter(%s) %s", p->name,
!p->dnssd_ipp_ref ? "new" : "update");
/*
* If per-printer sharing was just disabled make sure we're not
* registered before returning.
*/
if (!p->shared)
{
dnssdDeregisterPrinter(p);
return;
}
/*
* Get the computer name as a c-string...
*/
#ifdef HAVE_COREFOUNDATION_H
computerName = NULL;
if ((computerNameRef = SCDynamicStoreCopyComputerName(NULL, &nameEncoding)))
if ((computerName = CFStringGetCStringPtr(computerNameRef,
kCFStringEncodingUTF8)) == NULL)
if (CFStringGetCString(computerNameRef, str_buffer, sizeof(str_buffer),
kCFStringEncodingUTF8))
computerName = str_buffer;
#else
computerName = ServerName;
#endif /* HAVE_COREFOUNDATION_H */
/*
* The registered name takes the form of "<printer-info> @ <computer name>"...
*/
name = NULL;
if (computerName)
cupsdSetStringf(&name, "%s @ %s",
(p->info && strlen(p->info)) ? p->info : p->name,
computerName);
else
cupsdSetString(&name, (p->info && strlen(p->info)) ? p->info : p->name);
#ifdef HAVE_COREFOUNDATION_H
if (computerNameRef)
CFRelease(computerNameRef);
#endif /* HAVE_COREFOUNDATION_H */
/*
* If an existing printer was renamed, unregister it and start over...
*/
if (p->reg_name && strcmp(p->reg_name, name))
dnssdDeregisterPrinter(p);
txt_len = 0; /* anti-compiler-warning-code */
txt_record = dnssdBuildTxtRecord(&txt_len, p);
if (!p->dnssd_ipp_ref)
{
/*
* Initial registration...
*/
cupsdSetString(&p->reg_name, name);
port = ippPort();
for (lis = (cupsd_listener_t *)cupsArrayFirst(Listeners);
lis;
lis = (cupsd_listener_t *)cupsArrayNext(Listeners))
{
if (lis->address.addr.sa_family == AF_INET)
{
port = ntohs(lis->address.ipv4.sin_port);
break;
}
else if (lis->address.addr.sa_family == AF_INET6)
{
port = ntohs(lis->address.ipv6.sin6_port);
break;
}
}
/*
* Use the _fax subtype for fax queues...
*/
regtype = (p->type & CUPS_PRINTER_FAX) ? dnssdIPPFaxRegType :
dnssdIPPRegType;
cupsdLogMessage(CUPSD_LOG_DEBUG2, "dnssdRegisterPrinter(%s) type is \"%s\"",
p->name, regtype);
se = DNSServiceRegister(&p->dnssd_ipp_ref, 0, 0, name, regtype,
NULL, NULL, htons(port), txt_len, txt_record,
dnssdRegisterCallback, p);
/*
* In case the name is too long, try shortening the string one character
* at a time...
*/
if (se == kDNSServiceErr_BadParam)
{
#ifdef HAVE_COREFOUNDATION_H
if ((shortNameRef = CFStringCreateMutable(NULL, 0)) != NULL)
{
CFStringAppendCString(shortNameRef, name, kCFStringEncodingUTF8);
nameLength = CFStringGetLength(shortNameRef);
while (se == kDNSServiceErr_BadParam && nameLength > 1)
{
CFStringDelete(shortNameRef, CFRangeMake(--nameLength, 1));
if (CFStringGetCString(shortNameRef, str_buffer, sizeof(str_buffer),
kCFStringEncodingUTF8))
{
se = DNSServiceRegister(&p->dnssd_ipp_ref, 0, 0, str_buffer,
regtype, NULL, NULL, htons(port),
txt_len, txt_record,
dnssdRegisterCallback, p);
}
}
CFRelease(shortNameRef);
}
#else
nameLength = strlen(name);
while (se == kDNSServiceErr_BadParam && nameLength > 1)
{
name[--nameLength] = '\0';
se = DNSServiceRegister(&p->dnssd_ipp_ref, 0, 0, str_buffer, regtype,
NULL, NULL, htons(port), txt_len, txt_record,
dnssdRegisterCallback, p);
}
#endif /* HAVE_COREFOUNDATION_H */
}
if (se == kDNSServiceErr_NoError)
{
p->dnssd_ipp_fd = DNSServiceRefSockFD(p->dnssd_ipp_ref);
p->txt_record = txt_record;
p->txt_len = txt_len;
txt_record = NULL;
cupsdAddSelect(p->dnssd_ipp_fd, (cupsd_selfunc_t)cupsdUpdateDNSSDBrowse,
NULL, (void *)p);
}
else
cupsdLogMessage(CUPSD_LOG_WARN,
"DNS-SD registration of \"%s\" failed with %d",
p->name, se);
}
else if (txt_len != p->txt_len || memcmp(txt_record, p->txt_record, txt_len))
{
/*
* Update the existing registration...
*/
/* A TTL of 0 means use record's original value (Radar 3176248) */
se = DNSServiceUpdateRecord(p->dnssd_ipp_ref, NULL, 0,
txt_len, txt_record, 0);
if (p->txt_record)
free(p->txt_record);
p->txt_record = txt_record;
p->txt_len = txt_len;
txt_record = NULL;
}
if (txt_record)
free(txt_record);
cupsdClearString(&name);
}
#endif /* HAVE_DNSSD */
/*
* 'process_implicit_classes()' - Create/update implicit classes as needed.
*/
static void
process_implicit_classes(
int *write_printcap) /* O - Write printcap file? */
{
int i; /* Looping var */
int update; /* Update printer attributes? */
char name[IPP_MAX_NAME], /* Name of printer */
*hptr; /* Pointer into hostname */
cupsd_printer_t *p, /* Printer information */
*pclass, /* Printer class */
*first; /* First printer in class */
int offset, /* Offset of name */
len; /* Length of name */
if (!ImplicitClasses || !Printers)
return;
/*
* Loop through all available printers and create classes as needed...
*/
for (p = (cupsd_printer_t *)cupsArrayFirst(Printers), len = 0, offset = 0,
update = 0, pclass = NULL, first = NULL;
p != NULL;
p = (cupsd_printer_t *)cupsArrayNext(Printers))
{
/*
* Skip implicit classes...
*/
if (p->type & CUPS_PRINTER_IMPLICIT)
{
len = 0;
continue;
}
/*
* If len == 0, get the length of this printer name up to the "@"
* sign (if any).
*/
cupsArraySave(Printers);
if (len > 0 &&
!strncasecmp(p->name, name + offset, len) &&
(p->name[len] == '\0' || p->name[len] == '@'))
{
/*
* We have more than one printer with the same name; see if
* we have a class, and if this printer is a member...
*/
if (pclass && strcasecmp(pclass->name, name))
{
if (update)
cupsdSetPrinterAttrs(pclass);
update = 0;
pclass = NULL;
}
if (!pclass && (pclass = cupsdFindDest(name)) == NULL)
{
/*
* Need to add the class...
*/
pclass = cupsdAddPrinter(name);
cupsArrayAdd(ImplicitPrinters, pclass);
pclass->type |= CUPS_PRINTER_IMPLICIT;
pclass->accepting = 1;
pclass->state = IPP_PRINTER_IDLE;
cupsdSetString(&pclass->location, p->location);
cupsdSetString(&pclass->info, p->info);
cupsdSetString(&pclass->job_sheets[0], p->job_sheets[0]);
cupsdSetString(&pclass->job_sheets[1], p->job_sheets[1]);
update = 1;
if (write_printcap)
*write_printcap = 1;
cupsdLogMessage(CUPSD_LOG_DEBUG, "Added implicit class \"%s\"...",
name);
cupsdAddEvent(CUPSD_EVENT_PRINTER_ADDED, p, NULL,
"Implicit class \'%s\' added by directory services.",
name);
}
if (first != NULL)
{
for (i = 0; i < pclass->num_printers; i ++)
if (pclass->printers[i] == first)
break;
if (i >= pclass->num_printers)
{
first->in_implicit_class = 1;
cupsdAddPrinterToClass(pclass, first);
}
first = NULL;
}
for (i = 0; i < pclass->num_printers; i ++)
if (pclass->printers[i] == p)
break;
if (i >= pclass->num_printers)
{
p->in_implicit_class = 1;
cupsdAddPrinterToClass(pclass, p);
update = 1;
}
}
else
{
/*
* First time around; just get name length and mark it as first
* in the list...
*/
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 ((first = (hptr ? cupsdFindDest(name) : p)) != NULL &&
!(first->type & CUPS_PRINTER_IMPLICIT))
{
/*
* Can't use same name as a local printer; add "Any" to the
* front of the name, unless we have explicitly disabled
* the "ImplicitAnyClasses"...
*/
if (ImplicitAnyClasses && len < (sizeof(name) - 4))
{
/*
* Add "Any" to the class name...
*/
strcpy(name, "Any");
strncpy(name + 3, p->name, len);
name[len + 3] = '\0';
offset = 3;
}
else
{
/*
* Don't create an implicit class if we have a local printer
* with the same name...
*/
len = 0;
cupsArrayRestore(Printers);
continue;
}
}
first = p;
}
cupsArrayRestore(Printers);
}
/*
* Update the last printer class as needed...
*/
if (pclass && update)
cupsdSetPrinterAttrs(pclass);
}
/*
* 'send_cups_browse()' - Send new browsing information using the CUPS
* protocol.
*/
static void
send_cups_browse(cupsd_printer_t *p) /* I - Printer to send */
{
int i; /* Looping var */
cups_ptype_t type; /* Printer type */
cupsd_dirsvc_addr_t *b; /* Browse address */
int bytes; /* Length of packet */
char packet[1453], /* Browse data packet */
uri[1024], /* Printer URI */
location[1024], /* printer-location */
info[1024], /* printer-info */
make_model[1024];
/* printer-make-and-model */
cupsd_netif_t *iface; /* Network interface */
/*
* Figure out the printer type value...
*/
type = p->type | CUPS_PRINTER_REMOTE;
if (!p->accepting)
type |= CUPS_PRINTER_REJECTING;
if (p == DefaultPrinter)
type |= CUPS_PRINTER_DEFAULT;
/*
* Remove quotes from printer-info, printer-location, and
* printer-make-and-model attributes...
*/
dequote(location, p->location, sizeof(location));
dequote(info, p->info, sizeof(info));
if (p->make_model)
dequote(make_model, p->make_model, sizeof(make_model));
else if (p->type & CUPS_PRINTER_CLASS)
{
if (p->num_printers > 0 && p->printers[0]->make_model)
strlcpy(make_model, p->printers[0]->make_model, sizeof(make_model));
else
strlcpy(make_model, "Local Printer Class", sizeof(make_model));
}
else if (p->raw)
strlcpy(make_model, "Local Raw Printer", sizeof(make_model));
else
strlcpy(make_model, "Local System V Printer", sizeof(make_model));
/*
* Send a packet to each browse address...
*/
for (i = NumBrowsers, b = Browsers; i > 0; i --, b ++)
if (b->iface[0])
{
/*
* Send the browse packet to one or more interfaces...
*/
if (!strcmp(b->iface, "*"))
{
/*
* Send to all local interfaces...
*/
cupsdNetIFUpdate();
for (iface = (cupsd_netif_t *)cupsArrayFirst(NetIFList);
iface;
iface = (cupsd_netif_t *)cupsArrayNext(NetIFList))
{
/*
* Only send to local, IPv4 interfaces...
*/
if (!iface->is_local || !iface->port ||
iface->address.addr.sa_family != AF_INET)
continue;
httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
iface->hostname, iface->port,
(p->type & CUPS_PRINTER_CLASS) ? "/classes/%s" :
"/printers/%s",
p->name);
snprintf(packet, sizeof(packet), "%x %x %s \"%s\" \"%s\" \"%s\" %s\n",
type, p->state, uri, location, info, make_model,
p->browse_attrs ? p->browse_attrs : "");
bytes = strlen(packet);
cupsdLogMessage(CUPSD_LOG_DEBUG2,
"cupsdSendBrowseList: (%d bytes to \"%s\") %s", bytes,
iface->name, packet);
iface->broadcast.ipv4.sin_port = htons(BrowsePort);
sendto(BrowseSocket, packet, bytes, 0,
(struct sockaddr *)&(iface->broadcast),
httpAddrLength(&(iface->broadcast)));
}
}
else if ((iface = cupsdNetIFFind(b->iface)) != NULL)
{
/*
* Send to the named interface using the IPv4 address...
*/
while (iface)
if (strcmp(b->iface, iface->name))
{
iface = NULL;
break;
}
else if (iface->address.addr.sa_family == AF_INET && iface->port)
break;
else
iface = (cupsd_netif_t *)cupsArrayNext(NetIFList);
if (iface)
{
httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
iface->hostname, iface->port,
(p->type & CUPS_PRINTER_CLASS) ? "/classes/%s" :
"/printers/%s",
p->name);
snprintf(packet, sizeof(packet), "%x %x %s \"%s\" \"%s\" \"%s\" %s\n",
type, p->state, uri, location, info, make_model,
p->browse_attrs ? p->browse_attrs : "");
bytes = strlen(packet);
cupsdLogMessage(CUPSD_LOG_DEBUG2,
"cupsdSendBrowseList: (%d bytes to \"%s\") %s", bytes,
iface->name, packet);
iface->broadcast.ipv4.sin_port = htons(BrowsePort);
sendto(BrowseSocket, packet, bytes, 0,
(struct sockaddr *)&(iface->broadcast),
httpAddrLength(&(iface->broadcast)));
}
}
}
else
{
/*
* Send the browse packet to the indicated address using
* the default server name...
*/
snprintf(packet, sizeof(packet), "%x %x %s \"%s\" \"%s\" \"%s\" %s\n",
type, p->state, p->uri, location, info, make_model,
p->browse_attrs ? p->browse_attrs : "");
bytes = strlen(packet);
cupsdLogMessage(CUPSD_LOG_DEBUG2,
"cupsdSendBrowseList: (%d bytes) %s", bytes, packet);
if (sendto(BrowseSocket, packet, bytes, 0,
(struct sockaddr *)&(b->to),
httpAddrLength(&(b->to))) <= 0)
{
/*
* Unable to send browse packet, so remove this address from the
* list...
*/
cupsdLogMessage(CUPSD_LOG_ERROR,
"cupsdSendBrowseList: sendto failed for browser "
"%d - %s.",
(int)(b - Browsers + 1), strerror(errno));
if (i > 1)
memmove(b, b + 1, (i - 1) * sizeof(cupsd_dirsvc_addr_t));
b --;
NumBrowsers --;
}
}
}
#ifdef HAVE_OPENLDAP
/*
* 'send_ldap_browse()' - Send LDAP printer registrations.
*/
static void
send_ldap_browse(cupsd_printer_t *p) /* I - Printer to register */
{
int i; /* Looping var... */
LDAPMod mods[7]; /* The 7 attributes we will be adding */
LDAPMod *pmods[8]; /* Pointers to the 7 attributes + NULL */
LDAPMessage *res; /* Search result token */
char *cn_value[2], /* Change records */
*uri[2],
*info[2],
*location[2],
*make_model[2],
*type[2],
typestring[255], /* String to hold printer-type */
filter[256], /* Search filter for possible UPDATEs */
dn[1024]; /* DN of the printer we are adding */
int rc; /* LDAP status */
static const char * const objectClass_values[] =
{ /* The 3 objectClass's we use in */
"top", /* our LDAP entries */
"device",
"cupsPrinter",
NULL
};
cupsdLogMessage(CUPSD_LOG_DEBUG2, "send_ldap_browse: %s\n", p->name);
/*
* Everything in ldap is ** so we fudge around it...
*/
sprintf(typestring, "%u", p->type);
cn_value[0] = p->name;
cn_value[1] = NULL;
info[0] = p->info ? p->info : "Unknown";
info[1] = NULL;
location[0] = p->location ? p->location : "Unknown";
location[1] = NULL;
make_model[0] = p->make_model ? p->make_model : "Unknown";
make_model[1] = NULL;
type[0] = typestring;
type[1] = NULL;
uri[0] = p->uri;
uri[1] = NULL;
snprintf(filter, sizeof(filter),
"(&(objectclass=cupsPrinter)(printerURI=%s))", p->uri);
ldap_search_s(BrowseLDAPHandle, BrowseLDAPDN, LDAP_SCOPE_SUBTREE,
filter, (char **)ldap_attrs, 0, &res);
cupsdLogMessage(CUPSD_LOG_DEBUG2, "send_ldap_browse: Searching \"%s\"",
filter);
mods[0].mod_type = "cn";
mods[0].mod_values = cn_value;
mods[1].mod_type = "printerDescription";
mods[1].mod_values = info;
mods[2].mod_type = "printerURI";
mods[2].mod_values = uri;
mods[3].mod_type = "printerLocation";
mods[3].mod_values = location;
mods[4].mod_type = "printerMakeAndModel";
mods[4].mod_values = make_model;
mods[5].mod_type = "printerType";
mods[5].mod_values = type;
mods[6].mod_type = "objectClass";
mods[6].mod_values = (char **)objectClass_values;
snprintf(dn, sizeof(dn), "cn=%s,ou=printers,%s", p->name, BrowseLDAPDN);
cupsdLogMessage(CUPSD_LOG_DEBUG2, "send_ldap_browse: dn=\"%s\"", dn);
if (ldap_count_entries(BrowseLDAPHandle, res) > 0)
{
/*
* Printer has already been registered, modify the current
* registration...
*/
cupsdLogMessage(CUPSD_LOG_DEBUG2,
"send_ldap_browse: Replacing entry...");
for (i = 0; i < 7; i ++)
{
pmods[i] = mods + i;
pmods[i]->mod_op = LDAP_MOD_REPLACE;
}
pmods[i] = NULL;
if ((rc = ldap_modify_s(BrowseLDAPHandle, dn, pmods)) != LDAP_SUCCESS)
cupsdLogMessage(CUPSD_LOG_ERROR,
"LDAP modify for %s failed with status %d: %s",
p->name, rc, ldap_err2string(rc));
}
else
{
/*
* Printer has never been registered, add the current
* registration...
*/
cupsdLogMessage(CUPSD_LOG_DEBUG2,
"send_ldap_browse: Adding entry...");
for (i = 0; i < 7; i ++)
{
pmods[i] = mods + i;
pmods[i]->mod_op = LDAP_MOD_ADD;
}
pmods[i] = NULL;
if ((rc = ldap_add_s(BrowseLDAPHandle, dn, pmods)) != LDAP_SUCCESS)
cupsdLogMessage(CUPSD_LOG_ERROR,
"LDAP add for %s failed with status %d: %s",
p->name, rc, ldap_err2string(rc));
}
}
#endif /* HAVE_OPENLDAP */
#ifdef HAVE_LIBSLP
/*
* 'send_slp_browse()' - Register the specified printer with SLP.
*/
static void
send_slp_browse(cupsd_printer_t *p) /* I - Printer to register */
{
char srvurl[HTTP_MAX_URI], /* Printer service URI */
attrs[8192], /* Printer attributes */
finishings[1024], /* Finishings to support */
make_model[IPP_MAX_NAME * 2],
/* Make and model, quoted */
location[IPP_MAX_NAME * 2],
/* Location, quoted */
info[IPP_MAX_NAME * 2], /* Info, quoted */
*src, /* Pointer to original string */
*dst; /* Pointer to destination string */
ipp_attribute_t *authentication; /* uri-authentication-supported value */
SLPError error; /* SLP error, if any */
cupsdLogMessage(CUPSD_LOG_DEBUG, "send_slp_browse(%p = \"%s\")", p,
p->name);
/*
* Make the SLP service URL that conforms to the IANA
* 'printer:' template.
*/
snprintf(srvurl, sizeof(srvurl), SLP_CUPS_SRVTYPE ":%s", p->uri);
cupsdLogMessage(CUPSD_LOG_DEBUG2, "Service URL = \"%s\"", srvurl);
/*
* Figure out the finishings string...
*/
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");
/*
* Quote any commas in the make and model, location, and info strings...
*/
for (src = p->make_model, dst = make_model;
src && *src && dst < (make_model + sizeof(make_model) - 2);)
{
if (*src == ',' || *src == '\\' || *src == ')')
*dst++ = '\\';
*dst++ = *src++;
}
*dst = '\0';
if (!make_model[0])
strcpy(make_model, "Unknown");
for (src = p->location, dst = location;
src && *src && dst < (location + sizeof(location) - 2);)
{
if (*src == ',' || *src == '\\' || *src == ')')
*dst++ = '\\';
*dst++ = *src++;
}
*dst = '\0';
if (!location[0])
strcpy(location, "Unknown");
for (src = p->info, dst = info;
src && *src && dst < (info + sizeof(info) - 2);)
{
if (*src == ',' || *src == '\\' || *src == ')')
*dst++ = '\\';
*dst++ = *src++;
}
*dst = '\0';
if (!info[0])
strcpy(info, "Unknown");
/*
* Get the authentication value...
*/
authentication = ippFindAttribute(p->attrs, "uri-authentication-supported",
IPP_TAG_KEYWORD);
/*
* Make the SLP attribute string list that conforms to
* the IANA 'printer:' template.
*/
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 /* HAVE_SSL */
"(printer-name=%s),"
"(printer-location=%s),"
"(printer-info=%s),"
"(printer-more-info=%s),"
"(printer-make-and-model=%s),"
"(printer-type=%d),"
"(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, p->type, DefaultLanguage,
p->type & CUPS_PRINTER_COLOR ? "true" : "false",
finishings,
p->type & CUPS_PRINTER_DUPLEX ?
",two-sided-long-edge,two-sided-short-edge" : "");
cupsdLogMessage(CUPSD_LOG_DEBUG2, "Attributes = \"%s\"", attrs);
/*
* Register the printer with the SLP server...
*/
error = SLPReg(BrowseSLPHandle, srvurl, BrowseTimeout,
SLP_CUPS_SRVTYPE, attrs, SLP_TRUE, slp_reg_callback, 0);
if (error != SLP_OK)
cupsdLogMessage(CUPSD_LOG_ERROR, "SLPReg of \"%s\" failed with status %d!", p->name,
error);
}
/*
* 'slp_attr_callback()' - SLP attribute callback
*/
static SLPBoolean /* O - SLP_TRUE for success */
slp_attr_callback(
SLPHandle hslp, /* I - SLP handle */
const char *attrlist, /* I - Attribute list */
SLPError errcode, /* I - Parsing status for this attr */
void *cookie) /* I - Current printer */
{
char *tmp = 0; /* Temporary string */
cupsd_printer_t *p = (cupsd_printer_t*)cookie;
/* Current printer */
(void)hslp; /* anti-compiler-warning-code */
/*
* Bail if there was an error
*/
if (errcode != SLP_OK)
return (SLP_TRUE);
/*
* Parse the attrlist to obtain things needed to build CUPS browse packet
*/
memset(p, 0, sizeof(cupsd_printer_t));
if (slp_get_attr(attrlist, "(printer-location=", &(p->location)))
return (SLP_FALSE);
if (slp_get_attr(attrlist, "(printer-info=", &(p->info)))
return (SLP_FALSE);
if (slp_get_attr(attrlist, "(printer-make-and-model=", &(p->make_model)))
return (SLP_FALSE);
if (!slp_get_attr(attrlist, "(printer-type=", &tmp))
p->type = atoi(tmp);
else
p->type = CUPS_PRINTER_REMOTE;
cupsdClearString(&tmp);
return (SLP_TRUE);
}
/*
* 'slp_dereg_printer()' - SLPDereg() the specified printer
*/
static void
slp_dereg_printer(cupsd_printer_t *p) /* I - Printer */
{
char srvurl[HTTP_MAX_URI]; /* Printer service URI */
cupsdLogMessage(CUPSD_LOG_DEBUG, "slp_dereg_printer: printer=\"%s\"", p->name);
if (!(p->type & CUPS_PRINTER_REMOTE))
{
/*
* Make the SLP service URL that conforms to the IANA
* 'printer:' template.
*/
snprintf(srvurl, sizeof(srvurl), SLP_CUPS_SRVTYPE ":%s", p->uri);
/*
* Deregister the printer...
*/
SLPDereg(BrowseSLPHandle, srvurl, slp_reg_callback, 0);
}
}
/*
* 'slp_get_attr()' - Get an attribute from an SLP registration.
*/
static int /* O - 0 on success */
slp_get_attr(const char *attrlist, /* I - Attribute list string */
const char *tag, /* I - Name of attribute */
char **valbuf) /* O - Value */
{
char *ptr1, /* Pointer into string */
*ptr2; /* ... */
cupsdClearString(valbuf);
if ((ptr1 = strstr(attrlist, tag)) != NULL)
{
ptr1 += strlen(tag);
if ((ptr2 = strchr(ptr1,')')) != NULL)
{
/*
* Copy the value...
*/
*valbuf = calloc(ptr2 - ptr1 + 1, 1);
strncpy(*valbuf, ptr1, ptr2 - ptr1);
/*
* Dequote the value...
*/
for (ptr1 = *valbuf; *ptr1; ptr1 ++)
if (*ptr1 == '\\' && ptr1[1])
_cups_strcpy(ptr1, ptr1 + 1);
return (0);
}
}
return (-1);
}
/*
* 'slp_reg_callback()' - Empty SLPRegReport.
*/
static void
slp_reg_callback(SLPHandle hslp, /* I - SLP handle */
SLPError errcode, /* I - Error code, if any */
void *cookie) /* I - App data */
{
(void)hslp;
(void)errcode;
(void)cookie;
return;
}
/*
* 'slp_url_callback()' - SLP service url callback
*/
static SLPBoolean /* O - TRUE = OK, FALSE = error */
slp_url_callback(
SLPHandle hslp, /* I - SLP handle */
const char *srvurl, /* I - URL of service */
unsigned short lifetime, /* I - Life of service */
SLPError errcode, /* I - Existing error code */
void *cookie) /* I - Pointer to service list */
{
slpsrvurl_t *s, /* New service entry */
**head; /* Pointer to head of entry */
/*
* Let the compiler know we won't be using these vars...
*/
(void)hslp;
(void)lifetime;
/*
* Bail if there was an error
*/
if (errcode != SLP_OK)
return (SLP_TRUE);
/*
* Grab the head of the list...
*/
head = (slpsrvurl_t**)cookie;
/*
* Allocate a *temporary* slpsrvurl_t to hold this entry.
*/
if ((s = (slpsrvurl_t *)calloc(1, sizeof(slpsrvurl_t))) == NULL)
return (SLP_FALSE);
/*
* Copy the SLP service URL...
*/
strlcpy(s->url, srvurl, sizeof(s->url));
/*
* Link the SLP service URL into the head of the list
*/
if (*head)
s->next = *head;
*head = s;
return (SLP_TRUE);
}
#endif /* HAVE_LIBSLP */
/*
* 'update_cups_browse()' - Update the browse lists using the CUPS protocol.
*/
static void
update_cups_browse(void)
{
int i; /* Looping var */
int auth; /* Authorization status */
int len; /* Length of name string */
int bytes; /* Number of bytes left */
char packet[1541], /* Broadcast packet */
*pptr; /* Pointer into packet */
socklen_t srclen; /* Length of source address */
http_addr_t srcaddr; /* Source address */
char srcname[1024]; /* Source hostname */
unsigned address[4]; /* Source address */
unsigned type; /* Printer type */
unsigned state; /* Printer state */
char uri[HTTP_MAX_URI], /* Printer URI */
host[HTTP_MAX_URI], /* Host portion of URI */
resource[HTTP_MAX_URI], /* Resource portion of URI */
info[IPP_MAX_NAME], /* Information string */
location[IPP_MAX_NAME], /* Location string */
make_model[IPP_MAX_NAME];/* Make and model string */
int num_attrs; /* Number of attributes */
cups_option_t *attrs; /* Attributes */
/*
* Read a packet from the browse socket...
*/
srclen = sizeof(srcaddr);
if ((bytes = recvfrom(BrowseSocket, packet, sizeof(packet) - 1, 0,
(struct sockaddr *)&srcaddr, &srclen)) < 0)
{
/*
* "Connection refused" is returned under Linux if the destination port
* or address is unreachable from a previous sendto(); check for the
* error here and ignore it for now...
*/
if (errno != ECONNREFUSED && errno != EAGAIN)
{
cupsdLogMessage(CUPSD_LOG_ERROR, "Browse recv failed - %s.",
strerror(errno));
cupsdLogMessage(CUPSD_LOG_ERROR, "Browsing turned off.");
cupsdStopBrowsing();
Browsing = 0;
}
return;
}
packet[bytes] = '\0';
/*
* If we're about to sleep, ignore incoming browse packets.
*/
if (Sleeping)
return;
/*
* Figure out where it came from...
*/
#ifdef AF_INET6
if (srcaddr.addr.sa_family == AF_INET6)
{
address[0] = ntohl(srcaddr.ipv6.sin6_addr.s6_addr32[0]);
address[1] = ntohl(srcaddr.ipv6.sin6_addr.s6_addr32[1]);
address[2] = ntohl(srcaddr.ipv6.sin6_addr.s6_addr32[2]);
address[3] = ntohl(srcaddr.ipv6.sin6_addr.s6_addr32[3]);
}
else
#endif /* AF_INET6 */
{
address[0] = 0;
address[1] = 0;
address[2] = 0;
address[3] = ntohl(srcaddr.ipv4.sin_addr.s_addr);
}
if (HostNameLookups)
httpAddrLookup(&srcaddr, srcname, sizeof(srcname));
else
httpAddrString(&srcaddr, srcname, sizeof(srcname));
len = strlen(srcname);
/*
* Do ACL stuff...
*/
if (BrowseACL)
{
if (httpAddrLocalhost(&srcaddr) || !strcasecmp(srcname, "localhost"))
{
/*
* Access from localhost (127.0.0.1) is always allowed...
*/
auth = AUTH_ALLOW;
}
else
{
/*
* Do authorization checks on the domain/address...
*/
switch (BrowseACL->order_type)
{
default :
auth = AUTH_DENY; /* anti-compiler-warning-code */
break;
case AUTH_ALLOW : /* Order Deny,Allow */
auth = AUTH_ALLOW;
if (cupsdCheckAuth(address, srcname, len,
BrowseACL->num_deny, BrowseACL->deny))
auth = AUTH_DENY;
if (cupsdCheckAuth(address, srcname, len,
BrowseACL->num_allow, BrowseACL->allow))
auth = AUTH_ALLOW;
break;
case AUTH_DENY : /* Order Allow,Deny */
auth = AUTH_DENY;
if (cupsdCheckAuth(address, srcname, len,
BrowseACL->num_allow, BrowseACL->allow))
auth = AUTH_ALLOW;
if (cupsdCheckAuth(address, srcname, len,
BrowseACL->num_deny, BrowseACL->deny))
auth = AUTH_DENY;
break;
}
}
}
else
auth = AUTH_ALLOW;
if (auth == AUTH_DENY)
{
cupsdLogMessage(CUPSD_LOG_DEBUG,
"update_cups_browse: Refused %d bytes from %s", bytes,
srcname);
return;
}
cupsdLogMessage(CUPSD_LOG_DEBUG2,
"update_cups_browse: (%d bytes from %s) %s", bytes,
srcname, packet);
/*
* Parse packet...
*/
if (sscanf(packet, "%x%x%1023s", &type, &state, uri) < 3)
{
cupsdLogMessage(CUPSD_LOG_WARN,
"update_cups_browse: Garbled browse packet - %s", packet);
return;
}
strcpy(location, "Location Unknown");
strcpy(info, "No Information Available");
make_model[0] = '\0';
num_attrs = 0;
attrs = NULL;
if ((pptr = strchr(packet, '\"')) != NULL)
{
/*
* Have extended information; can't use sscanf for it because not all
* sscanf's allow empty strings with %[^\"]...
*/
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 & 255))
pptr ++;
if (*pptr == '\"')
{
for (i = 0, pptr ++;
i < (sizeof(info) - 1) && *pptr && *pptr != '\"';
i ++, pptr ++)
info[i] = *pptr;
info[i] = '\0';
if (*pptr == '\"')
pptr ++;
while (*pptr && isspace(*pptr & 255))
pptr ++;
if (*pptr == '\"')
{
for (i = 0, pptr ++;
i < (sizeof(make_model) - 1) && *pptr && *pptr != '\"';
i ++, pptr ++)
make_model[i] = *pptr;
if (*pptr == '\"')
pptr ++;
make_model[i] = '\0';
if (*pptr)
num_attrs = cupsParseOptions(pptr, num_attrs, &attrs);
}
}
}
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));
/*
* Pull the URI apart to see if this is a local or remote printer...
*/
if (is_local_queue(uri, host, sizeof(host), resource, sizeof(resource)))
{
cupsFreeOptions(num_attrs, attrs);
return;
}
/*
* Do relaying...
*/
for (i = 0; i < NumRelays; i ++)
if (cupsdCheckAuth(address, srcname, len, 1, &(Relays[i].from)))
if (sendto(BrowseSocket, packet, bytes, 0,
(struct sockaddr *)&(Relays[i].to),
httpAddrLength(&(Relays[i].to))) <= 0)
{
cupsdLogMessage(CUPSD_LOG_ERROR,
"update_cups_browse: sendto failed for relay %d - %s.",
i + 1, strerror(errno));
cupsFreeOptions(num_attrs, attrs);
return;
}
/*
* Process the browse data...
*/
process_browse_data(uri, host, resource, (cups_ptype_t)type,
(ipp_pstate_t)state, location, info, make_model,
num_attrs, attrs);
}
/*
* 'update_lpd()' - Update the LPD configuration as needed.
*/
static void
update_lpd(int onoff) /* - 1 = turn on, 0 = turn off */
{
if (!LPDConfigFile)
return;
if (!strncmp(LPDConfigFile, "xinetd:///", 10))
{
/*
* Enable/disable LPD via the xinetd.d config file for cups-lpd...
*/
char newfile[1024]; /* New cups-lpd.N file */
cups_file_t *ofp, /* Original file pointer */
*nfp; /* New file pointer */
char line[1024]; /* Line from file */
snprintf(newfile, sizeof(newfile), "%s.N", LPDConfigFile + 9);
if ((ofp = cupsFileOpen(LPDConfigFile + 9, "r")) == NULL)
{
cupsdLogMessage(CUPSD_LOG_ERROR, "Unable to open \"%s\" - %s",
LPDConfigFile + 9, strerror(errno));
return;
}
if ((nfp = cupsFileOpen(newfile, "w")) == NULL)
{
cupsdLogMessage(CUPSD_LOG_ERROR, "Unable to create \"%s\" - %s",
newfile, strerror(errno));
cupsFileClose(ofp);
return;
}
/*
* Copy all of the lines from the cups-lpd file...
*/
while (cupsFileGets(ofp, line, sizeof(line)))
{
if (line[0] == '{')
{
cupsFilePrintf(nfp, "%s\n", line);
snprintf(line, sizeof(line), "\tdisable = %s",
onoff ? "no" : "yes");
}
else if (strstr(line, "disable ="))
continue;
cupsFilePrintf(nfp, "%s\n", line);
}
cupsFileClose(nfp);
cupsFileClose(ofp);
rename(newfile, LPDConfigFile + 9);
}
else if (!strncmp(LPDConfigFile, "launchd:///", 11))
{
/*
* Enable/disable LPD via the launchctl command...
*/
char *argv[5], /* Arguments for command */
*envp[MAX_ENV]; /* Environment for command */
int pid; /* Process ID */
cupsdLoadEnv(envp, (int)(sizeof(envp) / sizeof(envp[0])));
argv[0] = (char *)"launchctl";
argv[1] = (char *)(onoff ? "load" : "unload");
argv[2] = (char *)"-w";
argv[3] = LPDConfigFile + 10;
argv[4] = NULL;
cupsdStartProcess("/bin/launchctl", argv, envp, -1, -1, -1, -1, -1, 1, &pid);
}
}
/*
* 'update_polling()' - Read status messages from the poll daemons.
*/
static void
update_polling(void)
{
char *ptr, /* Pointer to end of line in buffer */
message[1024]; /* Pointer to message text */
int loglevel; /* Log level for message */
while ((ptr = cupsdStatBufUpdate(PollStatusBuffer, &loglevel,
message, sizeof(message))) != NULL)
if (!strchr(PollStatusBuffer->buffer, '\n'))
break;
if (ptr == NULL && !PollStatusBuffer->bufused)
{
/*
* All polling processes have died; stop polling...
*/
cupsdLogMessage(CUPSD_LOG_ERROR,
"update_polling: all polling processes have exited!");
cupsdStopPolling();
}
}
/*
* 'update_smb()' - Update the SMB configuration as needed.
*/
static void
update_smb(int onoff) /* I - 1 = turn on, 0 = turn off */
{
if (!SMBConfigFile)
return;
if (!strncmp(SMBConfigFile, "samba:///", 9))
{
/*
* Enable/disable SMB via the specified smb.conf config file...
*/
char newfile[1024]; /* New smb.conf.N file */
cups_file_t *ofp, /* Original file pointer */
*nfp; /* New file pointer */
char line[1024]; /* Line from file */
int in_printers; /* In [printers] section? */
snprintf(newfile, sizeof(newfile), "%s.N", SMBConfigFile + 8);
if ((ofp = cupsFileOpen(SMBConfigFile + 8, "r")) == NULL)
{
cupsdLogMessage(CUPSD_LOG_ERROR, "Unable to open \"%s\" - %s",
SMBConfigFile + 8, strerror(errno));
return;
}
if ((nfp = cupsFileOpen(newfile, "w")) == NULL)
{
cupsdLogMessage(CUPSD_LOG_ERROR, "Unable to create \"%s\" - %s",
newfile, strerror(errno));
cupsFileClose(ofp);
return;
}
/*
* Copy all of the lines from the smb.conf file...
*/
in_printers = 0;
while (cupsFileGets(ofp, line, sizeof(line)))
{
if (in_printers && strstr(line, "printable ="))
snprintf(line, sizeof(line), " printable = %s",
onoff ? "yes" : "no");
cupsFilePrintf(nfp, "%s\n", line);
if (line[0] == '[')
in_printers = !strcmp(line, "[printers]");
}
cupsFileClose(nfp);
cupsFileClose(ofp);
rename(newfile, SMBConfigFile + 8);
}
else if (!strncmp(SMBConfigFile, "launchd:///", 11))
{
/*
* Enable/disable SMB via the launchctl command...
*/
char *argv[5], /* Arguments for command */
*envp[MAX_ENV]; /* Environment for command */
int pid; /* Process ID */
cupsdLoadEnv(envp, (int)(sizeof(envp) / sizeof(envp[0])));
argv[0] = (char *)"launchctl";
argv[1] = (char *)(onoff ? "load" : "unload");
argv[2] = (char *)"-w";
argv[3] = SMBConfigFile + 10;
argv[4] = NULL;
cupsdStartProcess("/bin/launchctl", argv, envp, -1, -1, -1, -1, -1, 1, &pid);
}
}
/*
* End of "$Id: dirsvc.c 7003 2007-10-01 23:10:13Z mike $".
*/