/*
- * "$Id: lpd.c,v 1.28.2.26 2003/11/07 19:45:05 mike Exp $"
+ * "$Id$"
*
- * Line Printer Daemon backend for the Common UNIX Printing System (CUPS).
+ * Line Printer Daemon backend for CUPS.
*
- * Copyright 1997-2003 by Easy Software Products, all rights reserved.
+ * Copyright 2007-2010 by Apple Inc.
+ * Copyright 1997-2007 by Easy Software Products, all rights reserved.
*
* These coded instructions, statements, and computer programs are the
- * property of Easy Software Products and are protected by Federal
- * copyright law. Distribution and use rights are outlined in the file
+ * property of Apple Inc. and are protected by Federal copyright
+ * law. Distribution and use rights are outlined in the file "LICENSE.txt"
* "LICENSE" which should have been included with this file. If this
- * file is missing or damaged please contact Easy Software Products
- * at:
- *
- * Attn: CUPS Licensing Information
- * Easy Software Products
- * 44141 Airport View Drive, Suite 204
- * Hollywood, Maryland 20636-3111 USA
- *
- * Voice: (301) 373-9603
- * EMail: cups-info@cups.org
- * WWW: http://www.cups.org
+ * file is missing or damaged, see the license at "http://www.cups.org/".
*
* This file is subject to the Apple OS-Developed Software exception.
*
* lpd_queue() - Queue a file using the Line Printer Daemon protocol.
* lpd_timeout() - Handle timeout alarms...
* lpd_write() - Write a buffer of data to an LPD server.
- * rresvport() - A simple implementation of rresvport().
+ * rresvport_af() - A simple implementation of rresvport_af().
* sigterm_handler() - Handle 'terminate' signals that stop the backend.
*/
* Include necessary headers.
*/
-#include <cups/cups.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <stdarg.h>
-#include <ctype.h>
#include <cups/http-private.h>
-#include <cups/string.h>
-#include <errno.h>
+#include "backend-private.h"
+#include <stdarg.h>
#include <sys/types.h>
#include <sys/stat.h>
-#include <signal.h>
+#include <stdio.h>
#ifdef WIN32
# include <winsock.h>
# include <arpa/inet.h>
# include <netdb.h>
#endif /* WIN32 */
+#ifdef __APPLE__
+# include <CoreFoundation/CFNumber.h>
+# include <CoreFoundation/CFPreferences.h>
+#endif /* __APPLE__ */
/*
*/
static char tmpfilename[1024] = ""; /* Temporary spool file name */
+static int abort_job = 0; /* Non-zero if we get SIGTERM */
+
+
+/*
+ * Print mode...
+ */
+
+#define MODE_STANDARD 0 /* Queue a copy */
+#define MODE_STREAM 1 /* Stream a copy */
/*
* The order for control and data files in LPD requests...
*/
-#define ORDER_CONTROL_DATA 0
-#define ORDER_DATA_CONTROL 1
+#define ORDER_CONTROL_DATA 0 /* Control file first, then data */
+#define ORDER_DATA_CONTROL 1 /* Data file first, then control */
/*
- * It appears that rresvport() is never declared on most systems...
+ * What to reserve...
*/
-extern int rresvport(int *port);
+#define RESERVE_NONE 0 /* Don't reserve a priviledged port */
+#define RESERVE_RFC1179 1 /* Reserve port 721-731 */
+#define RESERVE_ANY 2 /* Reserve port 1-1023 */
/*
static int lpd_command(int lpd_fd, int timeout, char *format, ...);
static int lpd_queue(const char *hostname, int port, const char *printer,
- const char *filename,
- const char *user, const char *title, int copies,
- int banner, int format, int order, int reserve,
- int manual_copies, int timeout);
+ int print_fd, int mode, const char *user,
+ const char *title, int copies, int banner,
+ int format, int order, int reserve,
+ int manual_copies, int timeout, int contimeout);
static void lpd_timeout(int sig);
static int lpd_write(int lpd_fd, char *buffer, int length);
+#ifndef HAVE_RRESVPORT_AF
+static int rresvport_af(int *port, int family);
+#endif /* !HAVE_RRESVPORT_AF */
static void sigterm_handler(int sig);
main(int argc, /* I - Number of command-line arguments (6 or 7) */
char *argv[]) /* I - Command-line arguments */
{
- char method[255], /* Method in URI */
- hostname[1024], /* Hostname */
- username[255], /* Username info (not used) */
- resource[1024], /* Resource info (printer name) */
- *options, /* Pointer to options */
- name[255], /* Name of option */
- value[255], /* Value of option */
- *ptr, /* Pointer into name or value */
- *filename, /* File to print */
- title[256]; /* Title string */
- int port; /* Port number (not used) */
- int status; /* Status of LPD job */
- int banner; /* Print banner page? */
- int format; /* Print format */
- int order; /* Order of control/data files */
- int reserve; /* Reserve priviledged port? */
- int sanitize_title; /* Sanitize title string? */
- int manual_copies, /* Do manual copies? */
- timeout, /* Timeout */
- copies; /* Number of copies */
+ const char *device_uri; /* Device URI */
+ char scheme[255], /* Scheme in URI */
+ hostname[1024], /* Hostname */
+ username[255], /* Username info */
+ resource[1024], /* Resource info (printer name) */
+ *options, /* Pointer to options */
+ *name, /* Name of option */
+ *value, /* Value of option */
+ sep, /* Separator character */
+ *filename, /* File to print */
+ title[256]; /* Title string */
+ int port; /* Port number */
+ int fd; /* Print file */
+ int status; /* Status of LPD job */
+ int mode; /* Print mode */
+ int banner; /* Print banner page? */
+ int format; /* Print format */
+ int order; /* Order of control/data files */
+ int reserve; /* Reserve priviledged port? */
+ int sanitize_title; /* Sanitize title string? */
+ int manual_copies, /* Do manual copies? */
+ timeout, /* Timeout */
+ contimeout, /* Connection timeout */
+ copies; /* Number of copies */
#if defined(HAVE_SIGACTION) && !defined(HAVE_SIGSET)
- struct sigaction action; /* Actions for POSIX signals */
+ struct sigaction action; /* Actions for POSIX signals */
#endif /* HAVE_SIGACTION && !HAVE_SIGSET */
if (argc == 1)
{
- puts("network lpd \"Unknown\" \"LPD/LPR Host or Printer\"");
- return (0);
+ printf("network lpd \"Unknown\" \"%s\"\n",
+ _cupsLangString(cupsLangDefault(), _("LPD/LPR Host or Printer")));
+ return (CUPS_BACKEND_OK);
}
else if (argc < 6 || argc > 7)
{
- fprintf(stderr, "Usage: %s job-id user title copies options [file]\n",
- argv[0]);
- return (1);
+ _cupsLangPrintf(stderr,
+ _("Usage: %s job-id user title copies options [file]"),
+ argv[0]);
+ return (CUPS_BACKEND_FAILED);
}
/*
- * If we have 7 arguments, print the file named on the command-line.
- * Otherwise, copy stdin to a temporary file and print the temporary
- * file.
+ * Extract the hostname and printer name from the URI...
*/
- if (argc == 6)
+ if ((device_uri = cupsBackendDeviceURI(argv)) == NULL)
+ return (CUPS_BACKEND_FAILED);
+
+ httpSeparateURI(HTTP_URI_CODING_ALL, device_uri, scheme, sizeof(scheme),
+ username, sizeof(username), hostname, sizeof(hostname), &port,
+ resource, sizeof(resource));
+
+ if (!port)
+ port = 515; /* Default to port 515 */
+
+ if (!username[0])
{
/*
- * Copy stdin to a temporary file...
+ * If no username is in the device URI, then use the print job user...
*/
- int fd; /* Temporary file */
- char buffer[8192]; /* Buffer for copying */
- int bytes; /* Number of bytes read */
-
-
- if ((fd = cupsTempFd(tmpfilename, sizeof(tmpfilename))) < 0)
- {
- perror("ERROR: unable to create temporary file");
- return (1);
- }
+ strlcpy(username, argv[2], sizeof(username));
+ }
- while ((bytes = fread(buffer, 1, sizeof(buffer), stdin)) > 0)
- if (write(fd, buffer, bytes) < bytes)
- {
- perror("ERROR: unable to write to temporary file");
- close(fd);
- unlink(tmpfilename);
- return (1);
- }
+ /*
+ * See if there are any options...
+ */
- close(fd);
- filename = tmpfilename;
- }
- else
- filename = argv[6];
+ mode = MODE_STANDARD;
+ banner = 0;
+ format = 'l';
+ order = ORDER_CONTROL_DATA;
+ reserve = RESERVE_ANY;
+ manual_copies = 1;
+ timeout = 300;
+ contimeout = 7 * 24 * 60 * 60;
+#ifdef __APPLE__
/*
- * Extract the hostname and printer name from the URI...
+ * We want to pass utf-8 characters, not re-map them (3071945)
*/
- httpSeparate(argv[0], method, username, hostname, &port, resource);
+ sanitize_title = 0;
/*
- * See if there are any options...
+ * Get the default timeout from a system preference...
*/
- banner = 0;
- format = 'l';
- order = ORDER_CONTROL_DATA;
- reserve = 0;
- manual_copies = 1;
- timeout = 300;
+ {
+ CFPropertyListRef pvalue; /* Preference value */
+ SInt32 toval; /* Timeout value */
+
+
+ pvalue = CFPreferencesCopyValue(CFSTR("timeout"),
+ CFSTR("com.apple.print.backends"),
+ kCFPreferencesAnyUser,
+ kCFPreferencesCurrentHost);
+ if (pvalue)
+ {
+ if (CFGetTypeID(pvalue) == CFNumberGetTypeID())
+ {
+ CFNumberGetValue(pvalue, kCFNumberSInt32Type, &toval);
+ contimeout = (int)toval;
+ }
+
+ CFRelease(pvalue);
+ }
+ }
+#else
sanitize_title = 1;
+#endif /* __APPLE__ */
if ((options = strchr(resource, '?')) != NULL)
{
* Get the name...
*/
- for (ptr = name; *options && *options != '=';)
- *ptr++ = *options++;
- *ptr = '\0';
+ name = options;
+
+ while (*options && *options != '=' && *options != '+' && *options != '&')
+ options ++;
- if (*options == '=')
+ if ((sep = *options) != '\0')
+ *options++ = '\0';
+
+ if (sep == '=')
{
/*
* Get the value...
*/
- options ++;
-
- for (ptr = value; *options && *options != '+';)
- *ptr++ = *options++;
- *ptr = '\0';
+ value = options;
- if (*options == '+')
+ while (*options && *options != '+' && *options != '&')
options ++;
+
+ if (*options)
+ *options++ = '\0';
}
else
- value[0] = '\0';
+ value = (char *)"";
/*
* Process the option...
*/
- if (strcasecmp(name, "banner") == 0)
+ if (!strcasecmp(name, "banner"))
{
/*
* Set the banner...
*/
- banner = !value[0] ||
- strcasecmp(value, "on") == 0 ||
- strcasecmp(value, "yes") == 0 ||
- strcasecmp(value, "true") == 0;
+ banner = !value[0] || !strcasecmp(value, "on") ||
+ !strcasecmp(value, "yes") || !strcasecmp(value, "true");
}
- else if (strcasecmp(name, "format") == 0 && value[0])
+ else if (!strcasecmp(name, "format") && value[0])
{
/*
* Set output format...
*/
- if (strchr("cdfglnoprtv", value[0]) != NULL)
+ if (strchr("cdfglnoprtv", value[0]))
format = value[0];
else
- fprintf(stderr, "ERROR: Unknown format character \"%c\"\n", value[0]);
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("Unknown format character: \"%c\"."),
+ value[0]);
}
- else if (strcasecmp(name, "order") == 0 && value[0])
+ else if (!strcasecmp(name, "mode") && value[0])
{
/*
* Set control/data order...
*/
- if (strcasecmp(value, "control,data") == 0)
+ if (!strcasecmp(value, "standard"))
+ mode = MODE_STANDARD;
+ else if (!strcasecmp(value, "stream"))
+ mode = MODE_STREAM;
+ else
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("Unknown print mode: \"%s\"."), value);
+ }
+ else if (!strcasecmp(name, "order") && value[0])
+ {
+ /*
+ * Set control/data order...
+ */
+
+ if (!strcasecmp(value, "control,data"))
order = ORDER_CONTROL_DATA;
- else if (strcasecmp(value, "data,control") == 0)
+ else if (!strcasecmp(value, "data,control"))
order = ORDER_DATA_CONTROL;
else
- fprintf(stderr, "ERROR: Unknown file order \"%s\"\n", value);
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("Unknown file order: \"%s\"."), value);
}
- else if (strcasecmp(name, "reserve") == 0)
+ else if (!strcasecmp(name, "reserve"))
{
/*
* Set port reservation mode...
*/
- reserve = !value[0] ||
- strcasecmp(value, "on") == 0 ||
- strcasecmp(value, "yes") == 0 ||
- strcasecmp(value, "true") == 0;
+ if (!value[0] || !strcasecmp(value, "on") ||
+ !strcasecmp(value, "yes") || !strcasecmp(value, "true") ||
+ !strcasecmp(value, "rfc1179"))
+ reserve = RESERVE_RFC1179;
+ else if (!strcasecmp(value, "any"))
+ reserve = RESERVE_ANY;
+ else
+ reserve = RESERVE_NONE;
}
- else if (strcasecmp(name, "manual_copies") == 0)
+ else if (!strcasecmp(name, "manual_copies"))
{
/*
* Set manual copies...
*/
- manual_copies = !value[0] ||
- strcasecmp(value, "on") == 0 ||
- strcasecmp(value, "yes") == 0 ||
- strcasecmp(value, "true") == 0;
+ manual_copies = !value[0] || !strcasecmp(value, "on") ||
+ !strcasecmp(value, "yes") || !strcasecmp(value, "true");
}
- else if (strcasecmp(name, "sanitize_title") == 0)
+ else if (!strcasecmp(name, "sanitize_title"))
{
/*
* Set sanitize title...
*/
- sanitize_title = !value[0] ||
- strcasecmp(value, "on") == 0 ||
- strcasecmp(value, "yes") == 0 ||
- strcasecmp(value, "true") == 0;
+ sanitize_title = !value[0] || !strcasecmp(value, "on") ||
+ !strcasecmp(value, "yes") || !strcasecmp(value, "true");
}
- else if (strcasecmp(name, "timeout") == 0)
+ else if (!strcasecmp(name, "timeout"))
{
/*
* Set the timeout...
if (atoi(value) > 0)
timeout = atoi(value);
}
+ else if (!strcasecmp(name, "contimeout"))
+ {
+ /*
+ * Set the connection timeout...
+ */
+
+ if (atoi(value) > 0)
+ contimeout = atoi(value);
+ }
+ }
+ }
+
+ if (mode == MODE_STREAM)
+ order = ORDER_CONTROL_DATA;
+
+ /*
+ * If we have 7 arguments, print the file named on the command-line.
+ * Otherwise, copy stdin to a temporary file and print the temporary
+ * file.
+ */
+
+ if (argc == 6 && mode == MODE_STANDARD)
+ {
+ /*
+ * Copy stdin to a temporary file...
+ */
+
+ http_addrlist_t *addrlist; /* Address list */
+ int snmp_fd; /* SNMP socket */
+
+
+ fputs("STATE: +connecting-to-device\n", stderr);
+ fprintf(stderr, "DEBUG: Looking up \"%s\"...\n", hostname);
+
+ if ((addrlist = httpAddrGetList(hostname, AF_UNSPEC, "1")) == NULL)
+ {
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("Unable to locate printer \"%s\"."), hostname);
+ return (CUPS_BACKEND_STOP);
+ }
+
+ snmp_fd = _cupsSNMPOpen(addrlist->addr.addr.sa_family);
+
+ if ((fd = cupsTempFd(tmpfilename, sizeof(tmpfilename))) < 0)
+ {
+ perror("DEBUG: Unable to create temporary file");
+ return (CUPS_BACKEND_FAILED);
+ }
+
+ _cupsLangPrintFilter(stderr, "INFO", _("Copying print data."));
+
+ backendRunLoop(-1, fd, snmp_fd, &(addrlist->addr), 0, 0,
+ backendNetworkSideCB);
+
+ if (snmp_fd >= 0)
+ _cupsSNMPClose(snmp_fd);
+
+ httpAddrFreeList(addrlist);
+ }
+ else if (argc == 6)
+ {
+ /*
+ * Stream from stdin...
+ */
+
+ filename = NULL;
+ fd = 0;
+ }
+ else
+ {
+ filename = argv[6];
+ fd = open(filename, O_RDONLY);
+
+ if (fd == -1)
+ {
+ _cupsLangPrintError("ERROR", _("Unable to open print file"));
+ return (CUPS_BACKEND_FAILED);
}
}
* the remote end...
*/
+ char *ptr;
+
for (ptr = title; *ptr; ptr ++)
- if (!isalnum(*ptr) && !isspace(*ptr))
+ if (!isalnum(*ptr & 255) && !isspace(*ptr & 255))
*ptr = '_';
}
copies = atoi(argv[4]);
}
- status = lpd_queue(hostname, port, resource + 1, filename,
- argv[2] /* user */, title, copies,
- banner, format, order, reserve, manual_copies, timeout);
+ status = lpd_queue(hostname, port, resource + 1, fd, mode,
+ username, title, copies,
+ banner, format, order, reserve, manual_copies,
+ timeout, contimeout);
if (!status)
fprintf(stderr, "PAGE: 1 %d\n", atoi(argv[4]));
}
else
- status = lpd_queue(hostname, port, resource + 1, filename,
- argv[2] /* user */, title, 1,
- banner, format, order, reserve, 1, timeout);
+ status = lpd_queue(hostname, port, resource + 1, fd, mode,
+ username, title, 1,
+ banner, format, order, reserve, 1,
+ timeout, contimeout);
/*
* Remove the temporary file if necessary...
if (tmpfilename[0])
unlink(tmpfilename);
+ if (fd)
+ close(fd);
+
/*
* Return the queue status...
*/
char status; /* Status from command */
+ /*
+ * Don't try to send commands if the job has been cancelled...
+ */
+
+ if (abort_job)
+ return (-1);
+
/*
* Format the string...
*/
if (lpd_write(fd, buf, bytes) < bytes)
{
- perror("ERROR: Unable to send LPD command");
+ perror("DEBUG: Unable to send LPD command");
return (-1);
}
* Read back the status from the command and return it...
*/
- fprintf(stderr, "DEBUG: Reading command status...\n");
+ fputs("DEBUG: Reading command status...\n", stderr);
alarm(timeout);
if (recv(fd, &status, 1, 0) < 1)
{
- fprintf(stderr, "WARNING: Remote host did not respond with command "
- "status byte after %d seconds!\n", timeout);
+ _cupsLangPrintFilter(stderr, "WARNING",
+ _("Printer did not respond after %d seconds."),
+ timeout);
status = errno;
}
lpd_queue(const char *hostname, /* I - Host to connect to */
int port, /* I - Port to connect on */
const char *printer, /* I - Printer/queue name */
- const char *filename, /* I - File to print */
+ int print_fd, /* I - File to print */
+ int mode, /* I - Print mode */
const char *user, /* I - Requesting user */
const char *title, /* I - Job title */
int copies, /* I - Number of copies */
int order, /* I - Order of data/control files */
int reserve, /* I - Reserve ports? */
int manual_copies, /* I - Do copies by hand... */
- int timeout) /* I - Timeout... */
+ int timeout, /* I - Timeout... */
+ int contimeout) /* I - Connection timeout */
{
- FILE *fp; /* Job file */
char localhost[255]; /* Local host name */
int error; /* Error number */
struct stat filestats; /* File statistics */
char control[10240], /* LPD control 'file' */
*cptr; /* Pointer into control file string */
char status; /* Status byte from command */
- struct sockaddr_in addr; /* Socket address */
- struct hostent *hostaddr; /* Host address */
+ char portname[255]; /* Port name */
+ int delay; /* Delay for retries... */
+ char addrname[256]; /* Address name */
+ http_addrlist_t *addrlist, /* Address list */
+ *addr; /* Socket address */
+ int snmp_fd, /* SNMP socket */
+ have_supplies; /* Printer supports supply levels? */
int copy; /* Copies written */
- size_t nbytes, /* Number of bytes written */
- tbytes; /* Total bytes written */
- char buffer[8192]; /* Output buffer */
+ time_t start_time; /* Time of first connect */
+ size_t nbytes; /* Number of bytes written */
+ off_t tbytes; /* Total bytes written */
+ char buffer[32768]; /* Output buffer */
#if defined(HAVE_SIGACTION) && !defined(HAVE_SIGSET)
struct sigaction action; /* Actions for POSIX signals */
#endif /* HAVE_SIGACTION && !HAVE_SIGSET */
signal(SIGALRM, lpd_timeout);
#endif /* HAVE_SIGSET */
+ /*
+ * Find the printer...
+ */
+
+ sprintf(portname, "%d", port);
+
+ fputs("STATE: +connecting-to-device\n", stderr);
+ fprintf(stderr, "DEBUG: Looking up \"%s\"...\n", hostname);
+
+ if ((addrlist = httpAddrGetList(hostname, AF_UNSPEC, portname)) == NULL)
+ {
+ _cupsLangPrintFilter(stderr, "ERROR", _("Unable to locate printer \"%s\"."),
+ hostname);
+ return (CUPS_BACKEND_STOP);
+ }
+
+ /*
+ * Remember when we started trying to connect to the printer...
+ */
+
+ start_time = time(NULL);
+
/*
* Loop forever trying to print the file...
*/
- for (;;) /* FOREVER */
+ while (!abort_job)
{
/*
* First try to reserve a port for this connection...
*/
- if ((hostaddr = httpGetHostByName(hostname)) == NULL)
+ fprintf(stderr, "DEBUG: Connecting to %s:%d for printer %s\n", hostname,
+ port, printer);
+ _cupsLangPrintFilter(stderr, "INFO", _("Connecting to printer."));
+
+ for (lport = reserve == RESERVE_RFC1179 ? 732 : 1024, addr = addrlist,
+ delay = 5;;
+ addr = addr->next)
{
- fprintf(stderr, "ERROR: Unable to locate printer \'%s\' - %s\n",
- hostname, hstrerror(h_errno));
- return (1);
- }
+ /*
+ * Stop if this job has been cancelled...
+ */
- fprintf(stderr, "INFO: Attempting to connect to host %s for printer %s\n",
- hostname, printer);
+ if (abort_job)
+ {
+ httpAddrFreeList(addrlist);
- memset(&addr, 0, sizeof(addr));
- memcpy(&(addr.sin_addr), hostaddr->h_addr, hostaddr->h_length);
- addr.sin_family = hostaddr->h_addrtype;
- addr.sin_port = htons(port);
+ return (CUPS_BACKEND_FAILED);
+ }
- for (lport = 732;;)
- {
+ /*
+ * Choose the next priviledged port...
+ */
+
+ if (!addr)
+ addr = addrlist;
+
+ lport --;
+
+ if (lport < 721 && reserve == RESERVE_RFC1179)
+ lport = 731;
+ else if (lport < 1)
+ lport = 1023;
+
+#ifdef HAVE_GETEUID
+ if (geteuid() || !reserve)
+#else
if (getuid() || !reserve)
+#endif /* HAVE_GETEUID */
{
/*
* Just create a regular socket...
*/
- if ((fd = socket(AF_INET, SOCK_STREAM, 0)) < 0)
+ if ((fd = socket(addr->addr.addr.sa_family, SOCK_STREAM, 0)) < 0)
{
- perror("ERROR: Unable to create socket");
- return (1);
+ perror("DEBUG: Unable to create socket");
+ sleep(1);
+
+ continue;
}
lport = 0;
{
/*
* We're running as root and want to comply with RFC 1179. Reserve a
- * priviledged lport between 721 and 732...
+ * priviledged lport between 721 and 731...
*/
- if ((fd = rresvport(&lport)) < 0)
+ if ((fd = rresvport_af(&lport, addr->addr.addr.sa_family)) < 0)
{
- perror("ERROR: Unable to reserve port");
- sleep(30);
+ perror("DEBUG: Unable to reserve port");
+ sleep(1);
+
continue;
}
}
- if (connect(fd, (struct sockaddr *)&addr, sizeof(addr)) < 0)
+ /*
+ * Connect to the printer or server...
+ */
+
+ if (abort_job)
{
- error = errno;
+ httpAddrFreeList(addrlist);
+
close(fd);
- fd = -1;
- if (error == ECONNREFUSED || error == EHOSTDOWN ||
- error == EHOSTUNREACH)
- {
- fprintf(stderr, "WARNING: Network host \'%s\' is busy, down, or unreachable; will retry in 30 seconds...\n",
- hostname);
- sleep(30);
- }
- else if (error == EADDRINUSE)
+ return (CUPS_BACKEND_FAILED);
+ }
+
+ if (!connect(fd, &(addr->addr.addr), httpAddrLength(&(addr->addr))))
+ break;
+
+ error = errno;
+ close(fd);
+
+ if (addr->next)
+ continue;
+
+ if (getenv("CLASS") != NULL)
+ {
+ /*
+ * If the CLASS environment variable is set, the job was submitted
+ * to a class and not to a specific queue. In this case, we want
+ * to abort immediately so that the job can be requeued on the next
+ * available printer in the class.
+ */
+
+ _cupsLangPrintFilter(stderr, "INFO",
+ _("Unable to contact printer, queuing on next "
+ "printer in class."));
+
+ httpAddrFreeList(addrlist);
+
+ /*
+ * Sleep 5 seconds to keep the job from requeuing too rapidly...
+ */
+
+ sleep(5);
+
+ return (CUPS_BACKEND_FAILED);
+ }
+
+ fprintf(stderr, "DEBUG: Connection error: %s\n", strerror(error));
+
+ if (error == ECONNREFUSED || error == EHOSTDOWN ||
+ error == EHOSTUNREACH)
+ {
+ if (contimeout && (time(NULL) - start_time) > contimeout)
{
- port --;
- if (port < 721)
- port = 732;
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("The printer is not responding."));
+ return (CUPS_BACKEND_FAILED);
}
- else
+
+ switch (error)
{
- perror("ERROR: Unable to connect to printer");
- sleep(30);
- }
+ case EHOSTDOWN :
+ _cupsLangPrintFilter(stderr, "WARNING",
+ _("Network printer \"%s\" may not exist or "
+ "is unavailable at this time."),
+ hostname);
+ break;
+
+ case EHOSTUNREACH :
+ _cupsLangPrintFilter(stderr, "WARNING",
+ _("Network printer \"%s\" is unreachable at "
+ "this time."), hostname);
+ break;
+
+ case ECONNREFUSED :
+ default :
+ _cupsLangPrintFilter(stderr, "WARNING",
+ _("Network printer \"%s\" is busy."),
+ hostname);
+ break;
+ }
+
+ sleep(delay);
+
+ if (delay < 30)
+ delay += 5;
+ }
+ else if (error == EADDRINUSE)
+ {
+ /*
+ * Try on another port...
+ */
+
+ sleep(1);
}
else
- break;
+ {
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("Network printer \"%s\" is not responding."),
+ hostname);
+ sleep(30);
+ }
}
- fprintf(stderr, "INFO: Connected to %s...\n", hostname);
- fprintf(stderr, "DEBUG: Connected on ports %d (local %d)...\n", port,
- lport);
+ fputs("STATE: -connecting-to-device\n", stderr);
+ _cupsLangPrintFilter(stderr, "INFO", _("Connected to printer."));
+
+#ifdef AF_INET6
+ if (addr->addr.addr.sa_family == AF_INET6)
+ fprintf(stderr, "DEBUG: Connected to [%s]:%d (IPv6) (local port %d)...\n",
+ httpAddrString(&addr->addr, addrname, sizeof(addrname)),
+ ntohs(addr->addr.ipv6.sin6_port), lport);
+ else
+#endif /* AF_INET6 */
+ if (addr->addr.addr.sa_family == AF_INET)
+ fprintf(stderr, "DEBUG: Connected to %s:%d (IPv4) (local port %d)...\n",
+ httpAddrString(&addr->addr, addrname, sizeof(addrname)),
+ ntohs(addr->addr.ipv4.sin_port), lport);
+
+ /*
+ * See if the printer supports SNMP...
+ */
+
+ if ((snmp_fd = _cupsSNMPOpen(addr->addr.addr.sa_family)) >= 0)
+ have_supplies = !backendSNMPSupplies(snmp_fd, &(addr->addr), NULL, NULL);
+ else
+ have_supplies = 0;
+
+ /*
+ * Check for side-channel requests...
+ */
+
+ backendCheckSideChannel(snmp_fd, &(addr->addr));
/*
* Next, open the print file and figure out its size...
*/
- if (stat(filename, &filestats))
+ if (print_fd)
{
- perror("ERROR: unable to stat print file");
- return (1);
- }
+ /*
+ * Use the size from the print file...
+ */
- filestats.st_size *= manual_copies;
+ if (fstat(print_fd, &filestats))
+ {
+ httpAddrFreeList(addrlist);
+ close(fd);
- if ((fp = fopen(filename, "rb")) == NULL)
+ perror("DEBUG: unable to stat print file");
+ return (CUPS_BACKEND_FAILED);
+ }
+
+ filestats.st_size *= manual_copies;
+ }
+ else
{
- perror("ERROR: unable to open print file for reading");
- return (1);
+ /*
+ * Use a "very large value" for the size so that the printer will
+ * keep printing until we close the connection...
+ */
+
+#ifdef _LARGEFILE_SOURCE
+ filestats.st_size = (size_t)(999999999999.0);
+#else
+ filestats.st_size = 2147483647;
+#endif /* _LARGEFILE_SOURCE */
}
/*
if (lpd_command(fd, timeout, "\002%s\n",
printer)) /* Receive print job(s) */
- return (1);
+ {
+ httpAddrFreeList(addrlist);
+ close(fd);
+ return (CUPS_BACKEND_FAILED);
+ }
- gethostname(localhost, sizeof(localhost));
- localhost[31] = '\0'; /* RFC 1179, Section 7.2 - host name < 32 chars */
+ httpGetHostname(NULL, localhost, sizeof(localhost));
- snprintf(control, sizeof(control), "H%s\nP%s\nJ%s\n", localhost, user,
- title);
+ snprintf(control, sizeof(control),
+ "H%.31s\n" /* RFC 1179, Section 7.2 - host name <= 31 chars */
+ "P%.31s\n" /* RFC 1179, Section 7.2 - user name <= 31 chars */
+ "J%.99s\n", /* RFC 1179, Section 7.2 - job name <= 99 chars */
+ localhost, user, title);
cptr = control + strlen(control);
if (banner)
{
- snprintf(cptr, sizeof(control) - (cptr - control), "C%s\nL%s\n",
+ snprintf(cptr, sizeof(control) - (cptr - control),
+ "C%.31s\n" /* RFC 1179, Section 7.2 - class name <= 31 chars */
+ "L%s\n",
localhost, user);
cptr += strlen(cptr);
}
while (copies > 0)
{
- snprintf(cptr, sizeof(control) - (cptr - control), "%cdfA%03d%s\n", format,
- getpid() % 1000, localhost);
+ snprintf(cptr, sizeof(control) - (cptr - control), "%cdfA%03d%.15s\n",
+ format, (int)getpid() % 1000, localhost);
cptr += strlen(cptr);
copies --;
}
snprintf(cptr, sizeof(control) - (cptr - control),
- "UdfA%03d%s\nN%s\n",
- getpid() % 1000, localhost, title);
+ "UdfA%03d%.15s\n"
+ "N%.131s\n", /* RFC 1179, Section 7.2 - sourcefile name <= 131 chars */
+ (int)getpid() % 1000, localhost, title);
fprintf(stderr, "DEBUG: Control file is:\n%s", control);
if (order == ORDER_CONTROL_DATA)
{
- if (lpd_command(fd, timeout, "\002%d cfA%03.3d%s\n", strlen(control),
- getpid() % 1000, localhost))
- return (1);
+ /*
+ * Check for side-channel requests...
+ */
- fprintf(stderr, "INFO: Sending control file (%lu bytes)\n",
- (unsigned long)strlen(control));
+ backendCheckSideChannel(snmp_fd, &(addr->addr));
+
+ /*
+ * Send the control file...
+ */
+
+ if (lpd_command(fd, timeout, "\002%d cfA%03.3d%.15s\n", strlen(control),
+ (int)getpid() % 1000, localhost))
+ {
+ httpAddrFreeList(addrlist);
+ close(fd);
+
+ return (CUPS_BACKEND_FAILED);
+ }
+
+ fprintf(stderr, "DEBUG: Sending control file (%u bytes)\n",
+ (unsigned)strlen(control));
if (lpd_write(fd, control, strlen(control) + 1) < (strlen(control) + 1))
{
status = errno;
- perror("ERROR: Unable to write control file");
+ perror("DEBUG: Unable to write control file");
+
}
else
{
if (read(fd, &status, 1) < 1)
{
- fprintf(stderr, "WARNING: Remote host did not respond with control "
- "status byte after %d seconds!\n", timeout);
+ _cupsLangPrintFilter(stderr, "WARNING",
+ _("Printer did not respond after %d seconds."),
+ timeout);
status = errno;
}
}
if (status != 0)
- fprintf(stderr, "ERROR: Remote host did not accept control file (%d)\n",
- status);
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("Remote host did not accept control file (%d)."),
+ status);
else
- fputs("INFO: Control file sent successfully\n", stderr);
+ _cupsLangPrintFilter(stderr, "INFO",
+ _("Control file sent successfully."));
}
else
status = 0;
if (status == 0)
{
+ /*
+ * Check for side-channel requests...
+ */
+
+ backendCheckSideChannel(snmp_fd, &(addr->addr));
+
/*
* Send the print file...
*/
- if (lpd_command(fd, timeout, "\003%u dfA%03.3d%s\n",
- (unsigned)filestats.st_size, getpid() % 1000,
+ if (lpd_command(fd, timeout, "\003" CUPS_LLFMT " dfA%03.3d%.15s\n",
+ CUPS_LLCAST filestats.st_size, (int)getpid() % 1000,
localhost))
- return (1);
+ {
+ httpAddrFreeList(addrlist);
+ close(fd);
+
+ return (CUPS_BACKEND_FAILED);
+ }
- fprintf(stderr, "INFO: Sending data file (%u bytes)\n",
- (unsigned)filestats.st_size);
+ fprintf(stderr, "DEBUG: Sending data file (" CUPS_LLFMT " bytes)\n",
+ CUPS_LLCAST filestats.st_size);
tbytes = 0;
for (copy = 0; copy < manual_copies; copy ++)
{
- rewind(fp);
+ lseek(print_fd, 0, SEEK_SET);
- while ((nbytes = fread(buffer, 1, sizeof(buffer), fp)) > 0)
+ while ((nbytes = read(print_fd, buffer, sizeof(buffer))) > 0)
{
- fprintf(stderr, "INFO: Spooling LPR job, %u%% complete...\n",
- (unsigned)(100.0f * tbytes / filestats.st_size));
+ _cupsLangPrintFilter(stderr, "INFO",
+ _("Spooling job, %.0f%% complete."),
+ 100.0 * tbytes / filestats.st_size);
if (lpd_write(fd, buffer, nbytes) < nbytes)
{
- perror("ERROR: Unable to send print file to printer");
+ perror("DEBUG: Unable to send print file to printer");
break;
}
else
}
}
- if (tbytes < filestats.st_size)
- status = errno;
- else if (lpd_write(fd, "", 1) < 1)
- {
- perror("ERROR: Unable to send trailing nul to printer");
- status = errno;
- }
- else
+ if (mode == MODE_STANDARD)
{
- /*
- * Read the status byte from the printer; if we can't read the byte
- * back now, we should set status to "errno", however at this point
- * we know the printer got the whole file and we don't necessarily
- * want to requeue it over and over...
- */
+ if (tbytes < filestats.st_size)
+ status = errno;
+ else if (lpd_write(fd, "", 1) < 1)
+ {
+ perror("DEBUG: Unable to send trailing nul to printer");
+ status = errno;
+ }
+ else
+ {
+ /*
+ * Read the status byte from the printer; if we can't read the byte
+ * back now, we should set status to "errno", however at this point
+ * we know the printer got the whole file and we don't necessarily
+ * want to requeue it over and over...
+ */
- alarm(timeout);
+ alarm(timeout);
- if (recv(fd, &status, 1, 0) < 1)
- {
- fprintf(stderr, "WARNING: Remote host did not respond with data "
- "status byte after %d seconds!\n", timeout);
- status = 0;
- }
+ if (recv(fd, &status, 1, 0) < 1)
+ {
+ _cupsLangPrintFilter(stderr, "WARNING",
+ _("Printer did not respond after %d seconds."),
+ timeout);
+ status = 0;
+ }
- alarm(0);
+ alarm(0);
+ }
}
+ else
+ status = 0;
if (status != 0)
- fprintf(stderr, "ERROR: Remote host did not accept data file (%d)\n",
- status);
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("Remote host did not accept data file (%d)."),
+ status);
else
- fputs("INFO: Data file sent successfully\n", stderr);
+ _cupsLangPrintFilter(stderr, "INFO",
+ _("Data file sent successfully."));
}
if (status == 0 && order == ORDER_DATA_CONTROL)
{
- if (lpd_command(fd, timeout, "\002%d cfA%03.3d%s\n", strlen(control),
- getpid() % 1000, localhost))
- return (1);
+ /*
+ * Check for side-channel requests...
+ */
+
+ backendCheckSideChannel(snmp_fd, &(addr->addr));
+
+ /*
+ * Send control file...
+ */
+
+ if (lpd_command(fd, timeout, "\002%d cfA%03.3d%.15s\n", strlen(control),
+ (int)getpid() % 1000, localhost))
+ {
+ httpAddrFreeList(addrlist);
+ close(fd);
+
+ return (CUPS_BACKEND_FAILED);
+ }
- fprintf(stderr, "INFO: Sending control file (%lu bytes)\n",
- (unsigned long)strlen(control));
+ fprintf(stderr, "DEBUG: Sending control file (%lu bytes)\n",
+ (unsigned long)strlen(control));
if (lpd_write(fd, control, strlen(control) + 1) < (strlen(control) + 1))
{
status = errno;
- perror("ERROR: Unable to write control file");
+ perror("DEBUG: Unable to write control file");
}
else
{
if (read(fd, &status, 1) < 1)
{
- fprintf(stderr, "WARNING: Remote host did not respond with control "
- "status byte after %d seconds!\n", timeout);
+ _cupsLangPrintFilter(stderr, "WARNING",
+ _("Printer did not respond after %d seconds."),
+ timeout);
status = errno;
}
}
if (status != 0)
- fprintf(stderr, "ERROR: Remote host did not accept control file (%d)\n",
- status);
+ _cupsLangPrintFilter(stderr, "ERROR",
+ _("Remote host did not accept control file (%d)."),
+ status);
else
- fputs("INFO: Control file sent successfully\n", stderr);
+ _cupsLangPrintFilter(stderr, "INFO",
+ _("Control file sent successfully."));
}
+ /*
+ * Collect the final supply levels as needed...
+ */
+
+ if (have_supplies)
+ backendSNMPSupplies(snmp_fd, &(addr->addr), NULL, NULL);
+
/*
* Close the socket connection and input file...
*/
close(fd);
- fclose(fp);
if (status == 0)
- return (0);
+ {
+ httpAddrFreeList(addrlist);
+
+ return (CUPS_BACKEND_OK);
+ }
/*
* Waiting for a retry...
sleep(30);
}
+
+ httpAddrFreeList(addrlist);
+
+ /*
+ * If we get here, then the job has been cancelled...
+ */
+
+ return (CUPS_BACKEND_FAILED);
}
total; /* Total number of bytes written */
+ if (abort_job)
+ return (-1);
+
total = 0;
while ((bytes = send(lpd_fd, buffer, length - total, 0)) >= 0)
{
}
-#ifndef HAVE_RRESVPORT
+#ifndef HAVE_RRESVPORT_AF
/*
- * 'rresvport()' - A simple implementation of rresvport().
+ * 'rresvport_af()' - A simple implementation of rresvport_af().
*/
-int /* O - Socket or -1 on error */
-rresvport(int *port) /* IO - Port number to bind to */
+static int /* O - Socket or -1 on error */
+rresvport_af(int *port, /* IO - Port number to bind to */
+ int family) /* I - Address family */
{
- struct sockaddr_in addr; /* Socket address */
- int fd; /* Socket file descriptor */
+ http_addr_t addr; /* Socket address */
+ int fd; /* Socket file descriptor */
/*
* Try to create an IPv4 socket...
*/
- if ((fd = socket(AF_INET, SOCK_STREAM, 0)) < 0)
+ if ((fd = socket(family, SOCK_STREAM, 0)) < 0)
return (-1);
/*
*/
memset(&addr, 0, sizeof(addr));
-
- addr.sin_family = AF_INET;
- addr.sin_addr.s_addr = INADDR_ANY;
+ addr.addr.sa_family = family;
/*
- * Try to bind the socket to a reserved port; unlike the standard
- * BSD rresvport(), we limit the port number to 721 through 732
- * (instead of 512 to 1023) since RFC 1179 defines the local port
- * number between 721 and 732...
+ * Try to bind the socket to a reserved port...
*/
- while (*port > 720)
+ while (*port > 511)
{
/*
* Set the port number...
*/
- addr.sin_port = htons(*port);
+# ifdef AF_INET6
+ if (family == AF_INET6)
+ addr.ipv6.sin6_port = htons(*port);
+ else
+# endif /* AF_INET6 */
+ addr.ipv4.sin_port = htons(*port);
/*
* Try binding the port to the socket; return if all is OK...
return (-1);
}
-#endif /* !HAVE_RRESVPORT */
+#endif /* !HAVE_RRESVPORT_AF */
/*
{
(void)sig; /* remove compiler warnings... */
- /*
- * Remove the temporary file if necessary...
- */
-
- if (tmpfilename[0])
- unlink(tmpfilename);
-
- exit(1);
+ abort_job = 1;
}
/*
- * End of "$Id: lpd.c,v 1.28.2.26 2003/11/07 19:45:05 mike Exp $".
+ * End of "$Id$".
*/