2 * "$Id: lpd.c 7583 2008-05-16 17:47:16Z mike $"
4 * Line Printer Daemon backend for the Common UNIX Printing System (CUPS).
6 * Copyright 2007-2008 by Apple Inc.
7 * Copyright 1997-2007 by Easy Software Products, all rights reserved.
9 * These coded instructions, statements, and computer programs are the
10 * property of Apple Inc. and are protected by Federal copyright
11 * law. Distribution and use rights are outlined in the file "LICENSE.txt"
12 * "LICENSE" which should have been included with this file. If this
13 * file is missing or damaged, see the license at "http://www.cups.org/".
15 * This file is subject to the Apple OS-Developed Software exception.
19 * main() - Send a file to the printer or server.
20 * lpd_command() - Send an LPR command sequence and wait for a reply.
21 * lpd_queue() - Queue a file using the Line Printer Daemon protocol.
22 * lpd_timeout() - Handle timeout alarms...
23 * lpd_write() - Write a buffer of data to an LPD server.
24 * rresvport_af() - A simple implementation of rresvport_af().
25 * sigterm_handler() - Handle 'terminate' signals that stop the backend.
29 * Include necessary headers.
32 #include <cups/http-private.h>
33 #include "backend-private.h"
35 #include <sys/types.h>
41 # include <sys/socket.h>
42 # include <netinet/in.h>
43 # include <arpa/inet.h>
47 # include <CoreFoundation/CFNumber.h>
48 # include <CoreFoundation/CFPreferences.h>
49 #endif /* __APPLE__ */
56 static char tmpfilename
[1024] = ""; /* Temporary spool file name */
57 static int abort_job
= 0; /* Non-zero if we get SIGTERM */
64 #define MODE_STANDARD 0 /* Queue a copy */
65 #define MODE_STREAM 1 /* Stream a copy */
69 * The order for control and data files in LPD requests...
72 #define ORDER_CONTROL_DATA 0 /* Control file first, then data */
73 #define ORDER_DATA_CONTROL 1 /* Data file first, then control */
80 #define RESERVE_NONE 0 /* Don't reserve a priviledged port */
81 #define RESERVE_RFC1179 1 /* Reserve port 721-731 */
82 #define RESERVE_ANY 2 /* Reserve port 1-1023 */
89 static int lpd_command(int lpd_fd
, int timeout
, char *format
, ...);
90 static int lpd_queue(const char *hostname
, int port
, const char *printer
,
91 int print_fd
, int mode
, const char *user
,
92 const char *title
, int copies
, int banner
,
93 int format
, int order
, int reserve
,
94 int manual_copies
, int timeout
, int contimeout
);
95 static void lpd_timeout(int sig
);
96 static int lpd_write(int lpd_fd
, char *buffer
, int length
);
97 #ifndef HAVE_RRESVPORT_AF
98 static int rresvport_af(int *port
, int family
);
99 #endif /* !HAVE_RRESVPORT_AF */
100 static void sigterm_handler(int sig
);
104 * 'main()' - Send a file to the printer or server.
108 * printer-uri job-id user title copies options [file]
111 int /* O - Exit status */
112 main(int argc
, /* I - Number of command-line arguments (6 or 7) */
113 char *argv
[]) /* I - Command-line arguments */
115 char method
[255], /* Method in URI */
116 hostname
[1024], /* Hostname */
117 username
[255], /* Username info */
118 resource
[1024], /* Resource info (printer name) */
119 *options
, /* Pointer to options */
120 *name
, /* Name of option */
121 *value
, /* Value of option */
122 sep
, /* Separator character */
123 *filename
, /* File to print */
124 title
[256]; /* Title string */
125 int port
; /* Port number */
126 int fd
; /* Print file */
127 int status
; /* Status of LPD job */
128 int mode
; /* Print mode */
129 int banner
; /* Print banner page? */
130 int format
; /* Print format */
131 int order
; /* Order of control/data files */
132 int reserve
; /* Reserve priviledged port? */
133 int sanitize_title
; /* Sanitize title string? */
134 int manual_copies
, /* Do manual copies? */
135 timeout
, /* Timeout */
136 contimeout
, /* Connection timeout */
137 copies
; /* Number of copies */
138 #if defined(HAVE_SIGACTION) && !defined(HAVE_SIGSET)
139 struct sigaction action
; /* Actions for POSIX signals */
140 #endif /* HAVE_SIGACTION && !HAVE_SIGSET */
144 * Make sure status messages are not buffered...
147 setbuf(stderr
, NULL
);
150 * Ignore SIGPIPE and catch SIGTERM signals...
154 sigset(SIGPIPE
, SIG_IGN
);
155 sigset(SIGTERM
, sigterm_handler
);
156 #elif defined(HAVE_SIGACTION)
157 memset(&action
, 0, sizeof(action
));
158 action
.sa_handler
= SIG_IGN
;
159 sigaction(SIGPIPE
, &action
, NULL
);
161 sigemptyset(&action
.sa_mask
);
162 sigaddset(&action
.sa_mask
, SIGTERM
);
163 action
.sa_handler
= sigterm_handler
;
164 sigaction(SIGTERM
, &action
, NULL
);
166 signal(SIGPIPE
, SIG_IGN
);
167 signal(SIGTERM
, sigterm_handler
);
168 #endif /* HAVE_SIGSET */
171 * Check command-line...
176 puts("network lpd \"Unknown\" \"LPD/LPR Host or Printer\"");
177 return (CUPS_BACKEND_OK
);
179 else if (argc
< 6 || argc
> 7)
181 _cupsLangPrintf(stderr
,
182 _("Usage: %s job-id user title copies options [file]\n"),
184 return (CUPS_BACKEND_FAILED
);
188 * Extract the hostname and printer name from the URI...
191 httpSeparateURI(HTTP_URI_CODING_ALL
, cupsBackendDeviceURI(argv
),
192 method
, sizeof(method
), username
, sizeof(username
),
193 hostname
, sizeof(hostname
), &port
,
194 resource
, sizeof(resource
));
197 port
= 515; /* Default to port 515 */
202 * If no username is in the device URI, then use the print job user...
205 strlcpy(username
, argv
[2], sizeof(username
));
209 * See if there are any options...
212 mode
= MODE_STANDARD
;
215 order
= ORDER_CONTROL_DATA
;
216 reserve
= RESERVE_ANY
;
219 contimeout
= 7 * 24 * 60 * 60;
223 * We want to pass utf-8 characters, not re-map them (3071945)
229 * Get the default timeout from a system preference...
233 CFPropertyListRef pvalue
; /* Preference value */
234 SInt32 toval
; /* Timeout value */
237 pvalue
= CFPreferencesCopyValue(CFSTR("timeout"),
238 CFSTR("com.apple.print.backends"),
239 kCFPreferencesAnyUser
,
240 kCFPreferencesCurrentHost
);
243 if (CFGetTypeID(pvalue
) == CFNumberGetTypeID())
245 CFNumberGetValue(pvalue
, kCFNumberSInt32Type
, &toval
);
246 contimeout
= (int)toval
;
254 #endif /* __APPLE__ */
256 if ((options
= strchr(resource
, '?')) != NULL
)
259 * Yup, terminate the device name string and move to the first
260 * character of the options...
277 while (*options
&& *options
!= '=' && *options
!= '+' && *options
!= '&')
280 if ((sep
= *options
) != '\0')
291 while (*options
&& *options
!= '+' && *options
!= '&')
301 * Process the option...
304 if (!strcasecmp(name
, "banner"))
310 banner
= !value
[0] || !strcasecmp(value
, "on") ||
311 !strcasecmp(value
, "yes") || !strcasecmp(value
, "true");
313 else if (!strcasecmp(name
, "format") && value
[0])
316 * Set output format...
319 if (strchr("cdfglnoprtv", value
[0]))
322 _cupsLangPrintf(stderr
, _("ERROR: Unknown format character \"%c\"\n"),
325 else if (!strcasecmp(name
, "mode") && value
[0])
328 * Set control/data order...
331 if (!strcasecmp(value
, "standard"))
332 mode
= MODE_STANDARD
;
333 else if (!strcasecmp(value
, "stream"))
336 _cupsLangPrintf(stderr
, _("ERROR: Unknown print mode \"%s\"\n"),
339 else if (!strcasecmp(name
, "order") && value
[0])
342 * Set control/data order...
345 if (!strcasecmp(value
, "control,data"))
346 order
= ORDER_CONTROL_DATA
;
347 else if (!strcasecmp(value
, "data,control"))
348 order
= ORDER_DATA_CONTROL
;
350 _cupsLangPrintf(stderr
, _("ERROR: Unknown file order \"%s\"\n"),
353 else if (!strcasecmp(name
, "reserve"))
356 * Set port reservation mode...
359 if (!value
[0] || !strcasecmp(value
, "on") ||
360 !strcasecmp(value
, "yes") || !strcasecmp(value
, "true") ||
361 !strcasecmp(value
, "rfc1179"))
362 reserve
= RESERVE_RFC1179
;
363 else if (!strcasecmp(value
, "any"))
364 reserve
= RESERVE_ANY
;
366 reserve
= RESERVE_NONE
;
368 else if (!strcasecmp(name
, "manual_copies"))
371 * Set manual copies...
374 manual_copies
= !value
[0] || !strcasecmp(value
, "on") ||
375 !strcasecmp(value
, "yes") || !strcasecmp(value
, "true");
377 else if (!strcasecmp(name
, "sanitize_title"))
380 * Set sanitize title...
383 sanitize_title
= !value
[0] || !strcasecmp(value
, "on") ||
384 !strcasecmp(value
, "yes") || !strcasecmp(value
, "true");
386 else if (!strcasecmp(name
, "timeout"))
393 timeout
= atoi(value
);
395 else if (!strcasecmp(name
, "contimeout"))
398 * Set the connection timeout...
402 contimeout
= atoi(value
);
407 if (mode
== MODE_STREAM
)
408 order
= ORDER_CONTROL_DATA
;
411 * If we have 7 arguments, print the file named on the command-line.
412 * Otherwise, copy stdin to a temporary file and print the temporary
416 if (argc
== 6 && mode
== MODE_STANDARD
)
419 * Copy stdin to a temporary file...
422 char buffer
[8192]; /* Buffer for copying */
423 int bytes
; /* Number of bytes read */
426 if ((fd
= cupsTempFd(tmpfilename
, sizeof(tmpfilename
))) < 0)
428 _cupsLangPrintError(_("ERROR: Unable to create temporary file"));
429 return (CUPS_BACKEND_FAILED
);
432 while ((bytes
= fread(buffer
, 1, sizeof(buffer
), stdin
)) > 0)
433 if (write(fd
, buffer
, bytes
) < bytes
)
435 _cupsLangPrintError(_("ERROR: Unable to write to temporary file"));
438 return (CUPS_BACKEND_FAILED
);
441 filename
= tmpfilename
;
446 * Stream from stdin...
455 fd
= open(filename
, O_RDONLY
);
459 _cupsLangPrintf(stderr
, _("ERROR: Unable to open print file %s: %s\n"),
460 filename
, strerror(errno
));
461 return (CUPS_BACKEND_FAILED
);
466 * Sanitize the document title...
469 strlcpy(title
, argv
[3], sizeof(title
));
474 * Sanitize the title string so that we don't cause problems on
480 for (ptr
= title
; *ptr
; ptr
++)
481 if (!isalnum(*ptr
& 255) && !isspace(*ptr
& 255))
493 manual_copies
= atoi(argv
[4]);
499 copies
= atoi(argv
[4]);
502 status
= lpd_queue(hostname
, port
, resource
+ 1, fd
, mode
,
503 username
, title
, copies
,
504 banner
, format
, order
, reserve
, manual_copies
,
505 timeout
, contimeout
);
508 fprintf(stderr
, "PAGE: 1 %d\n", atoi(argv
[4]));
511 status
= lpd_queue(hostname
, port
, resource
+ 1, fd
, mode
,
513 banner
, format
, order
, reserve
, 1,
514 timeout
, contimeout
);
517 * Remove the temporary file if necessary...
527 * Return the queue status...
535 * 'lpd_command()' - Send an LPR command sequence and wait for a reply.
538 static int /* O - Status of command */
539 lpd_command(int fd
, /* I - Socket connection to LPD host */
540 int timeout
, /* I - Seconds to wait for a response */
541 char *format
, /* I - printf()-style format string */
542 ...) /* I - Additional args as necessary */
544 va_list ap
; /* Argument pointer */
545 char buf
[1024]; /* Output buffer */
546 int bytes
; /* Number of bytes to output */
547 char status
; /* Status from command */
551 * Don't try to send commands if the job has been cancelled...
558 * Format the string...
561 va_start(ap
, format
);
562 bytes
= vsnprintf(buf
, sizeof(buf
), format
, ap
);
565 fprintf(stderr
, "DEBUG: lpd_command %2.2x %s", buf
[0], buf
+ 1);
568 * Send the command...
571 fprintf(stderr
, "DEBUG: Sending command string (%d bytes)...\n", bytes
);
573 if (lpd_write(fd
, buf
, bytes
) < bytes
)
575 _cupsLangPrintError(_("ERROR: Unable to send LPD command"));
580 * Read back the status from the command and return it...
583 fputs("DEBUG: Reading command status...\n", stderr
);
587 if (recv(fd
, &status
, 1, 0) < 1)
589 _cupsLangPrintf(stderr
,
590 _("WARNING: Remote host did not respond with command "
591 "status byte after %d seconds!\n"), timeout
);
597 fprintf(stderr
, "DEBUG: lpd_command returning %d\n", status
);
604 * 'lpd_queue()' - Queue a file using the Line Printer Daemon protocol.
607 static int /* O - Zero on success, non-zero on failure */
608 lpd_queue(const char *hostname
, /* I - Host to connect to */
609 int port
, /* I - Port to connect on */
610 const char *printer
, /* I - Printer/queue name */
611 int print_fd
, /* I - File to print */
612 int mode
, /* I - Print mode */
613 const char *user
, /* I - Requesting user */
614 const char *title
, /* I - Job title */
615 int copies
, /* I - Number of copies */
616 int banner
, /* I - Print LPD banner? */
617 int format
, /* I - Format specifier */
618 int order
, /* I - Order of data/control files */
619 int reserve
, /* I - Reserve ports? */
620 int manual_copies
, /* I - Do copies by hand... */
621 int timeout
, /* I - Timeout... */
622 int contimeout
) /* I - Connection timeout */
624 char localhost
[255]; /* Local host name */
625 int error
; /* Error number */
626 struct stat filestats
; /* File statistics */
627 int lport
; /* LPD connection local port */
628 int fd
; /* LPD socket */
629 char control
[10240], /* LPD control 'file' */
630 *cptr
; /* Pointer into control file string */
631 char status
; /* Status byte from command */
632 char portname
[255]; /* Port name */
633 int delay
; /* Delay for retries... */
634 char addrname
[256]; /* Address name */
635 http_addrlist_t
*addrlist
, /* Address list */
636 *addr
; /* Socket address */
637 int snmp_fd
, /* SNMP socket */
638 start_count
, /* Page count via SNMP at start */
639 page_count
; /* Page count via SNMP */
640 int copy
; /* Copies written */
641 time_t start_time
; /* Time of first connect */
642 int recoverable
; /* Recoverable error shown? */
643 size_t nbytes
; /* Number of bytes written */
644 off_t tbytes
; /* Total bytes written */
645 char buffer
[32768]; /* Output buffer */
646 #if defined(HAVE_SIGACTION) && !defined(HAVE_SIGSET)
647 struct sigaction action
; /* Actions for POSIX signals */
648 #endif /* HAVE_SIGACTION && !HAVE_SIGSET */
652 * Setup an alarm handler for timeouts...
655 #ifdef HAVE_SIGSET /* Use System V signals over POSIX to avoid bugs */
656 sigset(SIGALRM
, lpd_timeout
);
657 #elif defined(HAVE_SIGACTION)
658 memset(&action
, 0, sizeof(action
));
660 sigemptyset(&action
.sa_mask
);
661 action
.sa_handler
= lpd_timeout
;
662 sigaction(SIGALRM
, &action
, NULL
);
664 signal(SIGALRM
, lpd_timeout
);
665 #endif /* HAVE_SIGSET */
668 * Find the printer...
671 sprintf(portname
, "%d", port
);
673 if ((addrlist
= httpAddrGetList(hostname
, AF_UNSPEC
, portname
)) == NULL
)
675 _cupsLangPrintf(stderr
, _("ERROR: Unable to locate printer \'%s\'!\n"),
677 return (CUPS_BACKEND_STOP
);
681 * Remember when we started trying to connect to the printer...
685 start_time
= time(NULL
);
688 * Loop forever trying to print the file...
694 * First try to reserve a port for this connection...
697 fputs("STATE: +connecting-to-device\n", stderr
);
698 _cupsLangPrintf(stderr
,
699 _("INFO: Attempting to connect to host %s for printer %s\n"),
702 for (lport
= reserve
== RESERVE_RFC1179
? 732 : 1024, addr
= addrlist
,
707 * Stop if this job has been cancelled...
712 httpAddrFreeList(addrlist
);
714 return (CUPS_BACKEND_FAILED
);
718 * Choose the next priviledged port...
726 if (lport
< 721 && reserve
== RESERVE_RFC1179
)
732 if (geteuid() || !reserve
)
734 if (getuid() || !reserve
)
735 #endif /* HAVE_GETEUID */
738 * Just create a regular socket...
741 if ((fd
= socket(addr
->addr
.addr
.sa_family
, SOCK_STREAM
, 0)) < 0)
743 _cupsLangPrintError(_("ERROR: Unable to create socket"));
754 * We're running as root and want to comply with RFC 1179. Reserve a
755 * priviledged lport between 721 and 731...
758 if ((fd
= rresvport_af(&lport
, addr
->addr
.addr
.sa_family
)) < 0)
760 _cupsLangPrintError(_("ERROR: Unable to reserve port"));
768 * Connect to the printer or server...
773 httpAddrFreeList(addrlist
);
777 return (CUPS_BACKEND_FAILED
);
780 if (!connect(fd
, &(addr
->addr
.addr
), httpAddrLength(&(addr
->addr
))))
790 if (getenv("CLASS") != NULL
)
793 * If the CLASS environment variable is set, the job was submitted
794 * to a class and not to a specific queue. In this case, we want
795 * to abort immediately so that the job can be requeued on the next
796 * available printer in the class.
799 _cupsLangPuts(stderr
,
800 _("INFO: Unable to contact printer, queuing on next "
801 "printer in class...\n"));
803 httpAddrFreeList(addrlist
);
806 * Sleep 5 seconds to keep the job from requeuing too rapidly...
811 return (CUPS_BACKEND_FAILED
);
814 if (error
== ECONNREFUSED
|| error
== EHOSTDOWN
||
815 error
== EHOSTUNREACH
)
817 if (contimeout
&& (time(NULL
) - start_time
) > contimeout
)
819 _cupsLangPuts(stderr
, _("ERROR: Printer not responding!\n"));
820 return (CUPS_BACKEND_FAILED
);
825 _cupsLangPrintf(stderr
,
826 _("WARNING: recoverable: Network host \'%s\' is busy; "
827 "will retry in %d seconds...\n"), hostname
, delay
);
834 else if (error
== EADDRINUSE
)
837 * Try on another port...
846 fprintf(stderr
, "DEBUG: Connection error: %s\n", strerror(errno
));
847 _cupsLangPuts(stderr
,
848 _("ERROR: recoverable: Unable to connect to printer; "
849 "will retry in 30 seconds...\n"));
857 * If we've shown a recoverable error make sure the printer proxies
858 * have a chance to see the recovered message. Not pretty but
859 * necessary for now...
862 fputs("INFO: recovered: \n", stderr
);
866 fputs("STATE: -connecting-to-device\n", stderr
);
867 _cupsLangPrintf(stderr
, _("INFO: Connected to %s...\n"), hostname
);
870 if (addr
->addr
.addr
.sa_family
== AF_INET6
)
871 fprintf(stderr
, "DEBUG: Connected to [%s]:%d (IPv6) (local port %d)...\n",
872 httpAddrString(&addr
->addr
, addrname
, sizeof(addrname
)),
873 ntohs(addr
->addr
.ipv6
.sin6_port
), lport
);
875 #endif /* AF_INET6 */
876 if (addr
->addr
.addr
.sa_family
== AF_INET
)
877 fprintf(stderr
, "DEBUG: Connected to %s:%d (IPv4) (local port %d)...\n",
878 httpAddrString(&addr
->addr
, addrname
, sizeof(addrname
)),
879 ntohs(addr
->addr
.ipv4
.sin_port
), lport
);
882 * See if the printer supports SNMP...
885 if ((snmp_fd
= _cupsSNMPOpen(addr
->addr
.addr
.sa_family
)) >= 0)
886 if (backendSNMPSupplies(snmp_fd
, &(addr
->addr
), &start_count
, NULL
))
892 _cupsSNMPClose(snmp_fd
);
897 * Check for side-channel requests...
900 backendCheckSideChannel(snmp_fd
, &(addr
->addr
));
903 * Next, open the print file and figure out its size...
909 * Use the size from the print file...
912 if (fstat(print_fd
, &filestats
))
914 httpAddrFreeList(addrlist
);
917 _cupsLangPrintError(_("ERROR: unable to stat print file"));
918 return (CUPS_BACKEND_FAILED
);
921 filestats
.st_size
*= manual_copies
;
926 * Use a "very large value" for the size so that the printer will
927 * keep printing until we close the connection...
930 #ifdef _LARGEFILE_SOURCE
931 filestats
.st_size
= (size_t)(999999999999.0);
933 filestats
.st_size
= 2147483647;
934 #endif /* _LARGEFILE_SOURCE */
938 * Send a job header to the printer, specifying no banner page and
942 if (lpd_command(fd
, timeout
, "\002%s\n",
943 printer
)) /* Receive print job(s) */
945 httpAddrFreeList(addrlist
);
947 return (CUPS_BACKEND_FAILED
);
950 httpGetHostname(NULL
, localhost
, sizeof(localhost
));
952 snprintf(control
, sizeof(control
),
953 "H%.31s\n" /* RFC 1179, Section 7.2 - host name <= 31 chars */
954 "P%.31s\n" /* RFC 1179, Section 7.2 - user name <= 31 chars */
955 "J%.99s\n", /* RFC 1179, Section 7.2 - job name <= 99 chars */
956 localhost
, user
, title
);
957 cptr
= control
+ strlen(control
);
961 snprintf(cptr
, sizeof(control
) - (cptr
- control
),
962 "C%.31s\n" /* RFC 1179, Section 7.2 - class name <= 31 chars */
965 cptr
+= strlen(cptr
);
970 snprintf(cptr
, sizeof(control
) - (cptr
- control
), "%cdfA%03d%.15s\n",
971 format
, (int)getpid() % 1000, localhost
);
972 cptr
+= strlen(cptr
);
976 snprintf(cptr
, sizeof(control
) - (cptr
- control
),
978 "N%.131s\n", /* RFC 1179, Section 7.2 - sourcefile name <= 131 chars */
979 (int)getpid() % 1000, localhost
, title
);
981 fprintf(stderr
, "DEBUG: Control file is:\n%s", control
);
983 if (order
== ORDER_CONTROL_DATA
)
986 * Check for side-channel requests...
989 backendCheckSideChannel(snmp_fd
, &(addr
->addr
));
992 * Send the control file...
995 if (lpd_command(fd
, timeout
, "\002%d cfA%03.3d%.15s\n", strlen(control
),
996 (int)getpid() % 1000, localhost
))
998 httpAddrFreeList(addrlist
);
1001 return (CUPS_BACKEND_FAILED
);
1004 _cupsLangPrintf(stderr
, _("INFO: Sending control file (%u bytes)\n"),
1005 (unsigned)strlen(control
));
1007 if (lpd_write(fd
, control
, strlen(control
) + 1) < (strlen(control
) + 1))
1010 _cupsLangPrintError(_("ERROR: Unable to write control file"));
1016 if (read(fd
, &status
, 1) < 1)
1018 _cupsLangPrintf(stderr
,
1019 _("WARNING: Remote host did not respond with control "
1020 "status byte after %d seconds!\n"), timeout
);
1028 _cupsLangPrintf(stderr
,
1029 _("ERROR: Remote host did not accept control file "
1032 _cupsLangPuts(stderr
, _("INFO: Control file sent successfully\n"));
1040 * Check for side-channel requests...
1043 backendCheckSideChannel(snmp_fd
, &(addr
->addr
));
1046 * Send the print file...
1049 if (lpd_command(fd
, timeout
, "\003" CUPS_LLFMT
" dfA%03.3d%.15s\n",
1050 CUPS_LLCAST filestats
.st_size
, (int)getpid() % 1000,
1053 httpAddrFreeList(addrlist
);
1056 return (CUPS_BACKEND_FAILED
);
1059 _cupsLangPrintf(stderr
,
1060 #ifdef HAVE_LONG_LONG
1061 _("INFO: Sending data file (%lld bytes)\n"),
1063 _("INFO: Sending data file (%ld bytes)\n"),
1064 #endif /* HAVE_LONG_LONG */
1065 CUPS_LLCAST filestats
.st_size
);
1068 for (copy
= 0; copy
< manual_copies
; copy
++)
1070 lseek(print_fd
, 0, SEEK_SET
);
1072 while ((nbytes
= read(print_fd
, buffer
, sizeof(buffer
))) > 0)
1074 _cupsLangPrintf(stderr
,
1075 _("INFO: Spooling LPR job, %.0f%% complete...\n"),
1076 100.0 * tbytes
/ filestats
.st_size
);
1078 if (lpd_write(fd
, buffer
, nbytes
) < nbytes
)
1080 _cupsLangPrintError(_("ERROR: Unable to send print file to printer"));
1088 if (mode
== MODE_STANDARD
)
1090 if (tbytes
< filestats
.st_size
)
1092 else if (lpd_write(fd
, "", 1) < 1)
1094 _cupsLangPrintError(_("ERROR: Unable to send trailing nul to printer"));
1100 * Read the status byte from the printer; if we can't read the byte
1101 * back now, we should set status to "errno", however at this point
1102 * we know the printer got the whole file and we don't necessarily
1103 * want to requeue it over and over...
1108 if (recv(fd
, &status
, 1, 0) < 1)
1110 _cupsLangPrintf(stderr
,
1111 _("WARNING: Remote host did not respond with data "
1112 "status byte after %d seconds!\n"), timeout
);
1123 _cupsLangPrintf(stderr
,
1124 _("ERROR: Remote host did not accept data file (%d)\n"),
1127 _cupsLangPuts(stderr
, _("INFO: Data file sent successfully\n"));
1130 if (status
== 0 && order
== ORDER_DATA_CONTROL
)
1133 * Check for side-channel requests...
1136 backendCheckSideChannel(snmp_fd
, &(addr
->addr
));
1139 * Send control file...
1142 if (lpd_command(fd
, timeout
, "\002%d cfA%03.3d%.15s\n", strlen(control
),
1143 (int)getpid() % 1000, localhost
))
1145 httpAddrFreeList(addrlist
);
1148 return (CUPS_BACKEND_FAILED
);
1151 _cupsLangPrintf(stderr
, _("INFO: Sending control file (%lu bytes)\n"),
1152 (unsigned long)strlen(control
));
1154 if (lpd_write(fd
, control
, strlen(control
) + 1) < (strlen(control
) + 1))
1157 _cupsLangPrintError(_("ERROR: Unable to write control file"));
1163 if (read(fd
, &status
, 1) < 1)
1165 _cupsLangPrintf(stderr
,
1166 _("WARNING: Remote host did not respond with control "
1167 "status byte after %d seconds!\n"), timeout
);
1175 _cupsLangPrintf(stderr
,
1176 _("ERROR: Remote host did not accept control file "
1179 _cupsLangPuts(stderr
, _("INFO: Control file sent successfully\n"));
1183 * Collect the final page count as needed...
1188 int printer_state
; /* State of printer */
1191 while (!backendSNMPSupplies(snmp_fd
, &(addr
->addr
), &page_count
,
1193 printer_state
!= CUPS_TC_idle
)
1196 if (page_count
> start_count
)
1197 fprintf(stderr
, "PAGE: total %d\n", page_count
- start_count
);
1201 * Close the socket connection and input file...
1208 httpAddrFreeList(addrlist
);
1210 return (CUPS_BACKEND_OK
);
1214 * Waiting for a retry...
1220 httpAddrFreeList(addrlist
);
1223 * If we get here, then the job has been cancelled...
1226 return (CUPS_BACKEND_FAILED
);
1231 * 'lpd_timeout()' - Handle timeout alarms...
1235 lpd_timeout(int sig
) /* I - Signal number */
1239 #if !defined(HAVE_SIGSET) && !defined(HAVE_SIGACTION)
1240 signal(SIGALRM
, lpd_timeout
);
1241 #endif /* !HAVE_SIGSET && !HAVE_SIGACTION */
1246 * 'lpd_write()' - Write a buffer of data to an LPD server.
1249 static int /* O - Number of bytes written or -1 on error */
1250 lpd_write(int lpd_fd
, /* I - LPD socket */
1251 char *buffer
, /* I - Buffer to write */
1252 int length
) /* I - Number of bytes to write */
1254 int bytes
, /* Number of bytes written */
1255 total
; /* Total number of bytes written */
1262 while ((bytes
= send(lpd_fd
, buffer
, length
- total
, 0)) >= 0)
1267 if (total
== length
)
1278 #ifndef HAVE_RRESVPORT_AF
1280 * 'rresvport_af()' - A simple implementation of rresvport_af().
1283 static int /* O - Socket or -1 on error */
1284 rresvport_af(int *port
, /* IO - Port number to bind to */
1285 int family
) /* I - Address family */
1287 http_addr_t addr
; /* Socket address */
1288 int fd
; /* Socket file descriptor */
1292 * Try to create an IPv4 socket...
1295 if ((fd
= socket(family
, SOCK_STREAM
, 0)) < 0)
1299 * Initialize the address buffer...
1302 memset(&addr
, 0, sizeof(addr
));
1303 addr
.addr
.sa_family
= family
;
1306 * Try to bind the socket to a reserved port...
1312 * Set the port number...
1316 if (family
== AF_INET6
)
1317 addr
.ipv6
.sin6_port
= htons(*port
);
1319 # endif /* AF_INET6 */
1320 addr
.ipv4
.sin_port
= htons(*port
);
1323 * Try binding the port to the socket; return if all is OK...
1326 if (!bind(fd
, (struct sockaddr
*)&addr
, sizeof(addr
)))
1330 * Stop if we have any error other than "address already in use"...
1333 if (errno
!= EADDRINUSE
)
1345 * Try the next port...
1352 * Wasn't able to bind to a reserved port, so close the socket and return
1364 #endif /* !HAVE_RRESVPORT_AF */
1368 * 'sigterm_handler()' - Handle 'terminate' signals that stop the backend.
1372 sigterm_handler(int sig
) /* I - Signal */
1374 (void)sig
; /* remove compiler warnings... */
1381 * End of "$Id: lpd.c 7583 2008-05-16 17:47:16Z mike $".