]> git.ipfire.org Git - thirdparty/cups.git/blob - backend/usb-darwin.c
Merge changes from CUPS 1.5svn-r9385.
[thirdparty/cups.git] / backend / usb-darwin.c
1 /*
2 * "$Id: usb-darwin.c 7953 2008-09-17 01:43:19Z mike $"
3 *
4 * Copyright 2005-2010 Apple Inc. All rights reserved.
5 *
6 * IMPORTANT: This Apple software is supplied to you by Apple Computer,
7 * Inc. ("Apple") in consideration of your agreement to the following
8 * terms, and your use, installation, modification or redistribution of
9 * this Apple software constitutes acceptance of these terms. If you do
10 * not agree with these terms, please do not use, install, modify or
11 * redistribute this Apple software.
12 *
13 * In consideration of your agreement to abide by the following terms, and
14 * subject to these terms, Apple grants you a personal, non-exclusive
15 * license, under Apple's copyrights in this original Apple software (the
16 * "Apple Software"), to use, reproduce, modify and redistribute the Apple
17 * Software, with or without modifications, in source and/or binary forms;
18 * provided that if you redistribute the Apple Software in its entirety and
19 * without modifications, you must retain this notice and the following
20 * text and disclaimers in all such redistributions of the Apple Software.
21 * Neither the name, trademarks, service marks or logos of Apple Computer,
22 * Inc. may be used to endorse or promote products derived from the Apple
23 * Software without specific prior written permission from Apple. Except
24 * as expressly stated in this notice, no other rights or licenses, express
25 * or implied, are granted by Apple herein, including but not limited to
26 * any patent rights that may be infringed by your derivative works or by
27 * other works in which the Apple Software may be incorporated.
28 *
29 * The Apple Software is provided by Apple on an "AS IS" basis. APPLE
30 * MAKES NO WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION
31 * THE IMPLIED WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS
32 * FOR A PARTICULAR PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND
33 * OPERATION ALONE OR IN COMBINATION WITH YOUR PRODUCTS.
34 *
35 * IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL
36 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
37 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
38 * INTERRUPTION) ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION,
39 * MODIFICATION AND/OR DISTRIBUTION OF THE APPLE SOFTWARE, HOWEVER CAUSED
40 * AND WHETHER UNDER THEORY OF CONTRACT, TORT (INCLUDING NEGLIGENCE),
41 * STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN ADVISED OF THE
42 * POSSIBILITY OF SUCH DAMAGE.
43 *
44 * Contents:
45 *
46 * list_devices() - List all USB devices.
47 * print_device() - Print a file to a USB device.
48 * read_thread() - Thread to read the backchannel data on.
49 * sidechannel_thread() - Handle side-channel requests.
50 * iterate_printers() - Iterate over all the printers.
51 * device_added() - Device added notifier.
52 * list_device_cb() - list_device iterator callback.
53 * find_device_cb() - print_device iterator callback.
54 * status_timer_cb() - Status timer callback.
55 * copy_deviceinfo() - Copy strings from the 1284 device ID.
56 * release_deviceinfo() - Release deviceinfo strings.
57 * load_classdriver() - Load a classdriver.
58 * unload_classdriver() - Unload a classdriver.
59 * load_printerdriver() - Load vendor's classdriver.
60 * registry_open() - Open a connection to the printer.
61 * registry_close() - Close the connection to the printer.
62 * copy_deviceid() - Copy the 1284 device id string.
63 * copy_devicestring() - Copy the 1284 device id string.
64 * copy_value_for_key() - Copy value string associated with a key.
65 * cfstr_create_trim() - Create CFString and trim whitespace characters.
66 * parse_options() - Parse URI options.
67 * sigterm_handler() - SIGTERM handler.
68 * next_line() - Find the next line in a buffer.
69 * parse_pserror() - Scan the backchannel data for postscript errors.
70 * soft_reset() - Send a soft reset to the device.
71 * get_device_id() - Return IEEE-1284 device ID.
72 */
73
74 /*
75 * Include necessary headers.
76 */
77
78 #include <stdio.h>
79 #include <stdlib.h>
80 #include <errno.h>
81 #include <signal.h>
82 #include <fcntl.h>
83 #include <termios.h>
84 #include <unistd.h>
85 #include <sys/stat.h>
86 #include <sys/sysctl.h>
87 #include <libgen.h>
88 #include <mach/mach.h>
89 #include <mach/mach_error.h>
90 #include <mach/mach_time.h>
91 #include <cups/debug-private.h>
92 #include <cups/sidechannel.h>
93 #include <cups/language-private.h>
94 #include "backend-private.h"
95
96 #include <CoreFoundation/CoreFoundation.h>
97 #include <IOKit/usb/IOUSBLib.h>
98 #include <IOKit/IOCFPlugIn.h>
99
100 #include <spawn.h>
101 #include <pthread.h>
102
103 extern char **environ;
104
105
106 /*
107 * DEBUG_WRITES, if defined, causes the backend to write data to the printer in
108 * 512 byte increments, up to 8192 bytes, to make debugging with a USB bus
109 * analyzer easier.
110 */
111
112 #define DEBUG_WRITES 0
113
114 /*
115 * WAIT_EOF_DELAY is number of seconds we'll wait for responses from
116 * the printer after we've finished sending all the data
117 */
118 #define WAIT_EOF_DELAY 7
119 #define WAIT_SIDE_DELAY 3
120 #define DEFAULT_TIMEOUT 5000L
121
122 #define USB_INTERFACE_KIND CFUUIDGetUUIDBytes(kIOUSBInterfaceInterfaceID190)
123 #define kUSBLanguageEnglish 0x409
124
125 #define PRINTER_POLLING_INTERVAL 5 /* seconds */
126 #define INITIAL_LOG_INTERVAL PRINTER_POLLING_INTERVAL
127 #define SUBSEQUENT_LOG_INTERVAL 3 * INITIAL_LOG_INTERVAL
128
129 #define kUSBPrinterClassTypeID CFUUIDGetConstantUUIDWithBytes(NULL, 0x06, 0x04, 0x7D, 0x16, 0x53, 0xA2, 0x11, 0xD6, 0x92, 0x06, 0x00, 0x30, 0x65, 0x52, 0x45, 0x92)
130 #define kUSBPrinterClassInterfaceID CFUUIDGetConstantUUIDWithBytes(NULL, 0x03, 0x34, 0x6D, 0x74, 0x53, 0xA3, 0x11, 0xD6, 0x9E, 0xA1, 0x76, 0x30, 0x65, 0x52, 0x45, 0x92)
131
132 #define kUSBClassDriverProperty CFSTR("USB Printing Class")
133
134 #define kUSBGenericTOPrinterClassDriver CFSTR("/System/Library/Printers/Libraries/USBGenericTOPrintingClass.plugin")
135 #define kUSBPrinterClassDeviceNotOpen -9664 /*kPMInvalidIOMContext*/
136
137
138 /*
139 * Section 5.3 USB Printing Class spec
140 */
141 #define kUSBPrintingSubclass 1
142 #define kUSBPrintingProtocolNoOpen 0
143 #define kUSBPrintingProtocolUnidirectional 1
144 #define kUSBPrintingProtocolBidirectional 2
145
146 typedef IOUSBInterfaceInterface190 **printer_interface_t;
147
148 typedef struct iodevice_request_s /**** Device request ****/
149 {
150 UInt8 requestType;
151 UInt8 request;
152 UInt16 value;
153 UInt16 index;
154 UInt16 length;
155 void *buffer;
156 } iodevice_request_t;
157
158 typedef union /**** Centronics status byte ****/
159 {
160 char b;
161 struct
162 {
163 unsigned reserved0:2;
164 unsigned paperError:1;
165 unsigned select:1;
166 unsigned notError:1;
167 unsigned reserved1:3;
168 } status;
169 } centronics_status_t;
170
171 typedef struct classdriver_s /**** g.classdriver context ****/
172 {
173 IUNKNOWN_C_GUTS;
174 CFPlugInRef plugin; /* release plugin */
175 IUnknownVTbl **factory; /* Factory */
176 void *vendorReference; /* vendor class specific usage */
177 UInt32 location; /* unique location in bus topology */
178 UInt8 interfaceNumber; /* Interface number */
179 UInt16 vendorID; /* Vendor id */
180 UInt16 productID; /* Product id */
181 printer_interface_t interface; /* identify the device to IOKit */
182 UInt8 outpipe; /* mandatory bulkOut pipe */
183 UInt8 inpipe; /* optional bulkIn pipe */
184
185 /* general class requests */
186 kern_return_t (*DeviceRequest)(struct classdriver_s **printer, iodevice_request_t *iorequest, UInt16 timeout);
187 kern_return_t (*GetString)(struct classdriver_s **printer, UInt8 whichString, UInt16 language, UInt16 timeout, CFStringRef *result);
188
189 /* standard printer class requests */
190 kern_return_t (*SoftReset)(struct classdriver_s **printer, UInt16 timeout);
191 kern_return_t (*GetCentronicsStatus)(struct classdriver_s **printer, centronics_status_t *result, UInt16 timeout);
192 kern_return_t (*GetDeviceID)(struct classdriver_s **printer, CFStringRef *devid, UInt16 timeout);
193
194 /* standard bulk device requests */
195 kern_return_t (*ReadPipe)(struct classdriver_s **printer, UInt8 *buffer, UInt32 *count);
196 kern_return_t (*WritePipe)(struct classdriver_s **printer, UInt8 *buffer, UInt32 *count, Boolean eoj);
197
198 /* interface requests */
199 kern_return_t (*Open)(struct classdriver_s **printer, UInt32 location, UInt8 protocol);
200 kern_return_t (*Abort)(struct classdriver_s **printer);
201 kern_return_t (*Close)(struct classdriver_s **printer);
202
203 /* initialize and terminate */
204 kern_return_t (*Initialize)(struct classdriver_s **printer, struct classdriver_s **baseclass);
205 kern_return_t (*Terminate)(struct classdriver_s **printer);
206
207 } classdriver_t;
208
209 typedef Boolean (*iterator_callback_t)(void *refcon, io_service_t obj);
210
211 typedef struct iterator_reference_s /**** Iterator reference data */
212 {
213 iterator_callback_t callback;
214 void *userdata;
215 Boolean keepRunning;
216 } iterator_reference_t;
217
218 typedef struct globals_s
219 {
220 io_service_t printer_obj;
221 classdriver_t **classdriver;
222
223 pthread_mutex_t read_thread_mutex;
224 pthread_cond_t read_thread_cond;
225 int read_thread_stop;
226 int read_thread_done;
227
228 pthread_mutex_t readwrite_lock_mutex;
229 pthread_cond_t readwrite_lock_cond;
230 int readwrite_lock;
231
232 CFStringRef make;
233 CFStringRef model;
234 CFStringRef serial;
235 UInt32 location;
236 UInt8 interfaceNum;
237
238 CFRunLoopTimerRef status_timer;
239
240 int print_fd; /* File descriptor to print */
241 ssize_t print_bytes; /* Print bytes read */
242 #if DEBUG_WRITES
243 ssize_t debug_bytes; /* Current bytes to read */
244 #endif /* DEBUG_WRITES */
245
246 Boolean wait_eof;
247 int drain_output; /* Drain all pending output */
248 int bidi_flag; /* 0=unidirectional, 1=bidirectional */
249
250 pthread_mutex_t sidechannel_thread_mutex;
251 pthread_cond_t sidechannel_thread_cond;
252 int sidechannel_thread_stop;
253 int sidechannel_thread_done;
254 } globals_t;
255
256
257 /*
258 * Globals...
259 */
260
261 globals_t g = { 0 }; /* Globals */
262
263
264 /*
265 * Local functions...
266 */
267
268 static Boolean find_device_cb(void *refcon, io_service_t obj);
269 static Boolean list_device_cb(void *refcon, io_service_t obj);
270 static CFStringRef cfstr_create_trim(const char *cstr);
271 static CFStringRef copy_value_for_key(CFStringRef deviceID, CFStringRef *keys);
272 static kern_return_t load_classdriver(CFStringRef driverPath, printer_interface_t intf, classdriver_t ***printerDriver);
273 static kern_return_t load_printerdriver(CFStringRef *driverBundlePath);
274 static kern_return_t registry_close();
275 static kern_return_t registry_open(CFStringRef *driverBundlePath);
276 static kern_return_t unload_classdriver();
277 static OSStatus copy_deviceid(classdriver_t **printer, CFStringRef *deviceID);
278 static void *read_thread(void *reference);
279 static void *sidechannel_thread(void *reference);
280 static void copy_deviceinfo(CFStringRef deviceIDString, CFStringRef *make, CFStringRef *model, CFStringRef *serial);
281 static void copy_devicestring(io_service_t usbInterface, CFStringRef *deviceID, UInt32 *deviceLocation, UInt8 *interfaceNum);
282 static void device_added(void *userdata, io_iterator_t iterator);
283 static void get_device_id(cups_sc_status_t *status, char *data, int *datalen);
284 static void iterate_printers(iterator_callback_t callBack, void *userdata);
285 static void parse_options(char *options, char *serial, int serial_size, UInt32 *location, Boolean *wait_eof);
286 static void release_deviceinfo(CFStringRef *make, CFStringRef *model, CFStringRef *serial);
287 static void setup_cfLanguage(void);
288 static void soft_reset();
289 static void status_timer_cb(CFRunLoopTimerRef timer, void *info);
290
291 #if defined(__i386__) || defined(__x86_64__)
292 static pid_t child_pid; /* Child PID */
293 static void run_legacy_backend(int argc, char *argv[], int fd); /* Starts child backend process running as a ppc executable */
294 #endif /* __i386__ || __x86_64__ */
295 static void sigterm_handler(int sig); /* SIGTERM handler */
296
297 #ifdef PARSE_PS_ERRORS
298 static const char *next_line (const char *buffer);
299 static void parse_pserror (char *sockBuffer, int len);
300 #endif /* PARSE_PS_ERRORS */
301
302 #pragma mark -
303
304 /*
305 * 'list_devices()' - List all USB devices.
306 */
307
308 void list_devices()
309 {
310 iterate_printers(list_device_cb, NULL);
311 }
312
313
314 /*
315 * 'print_device()' - Print a file to a USB device.
316 */
317
318 int /* O - Exit status */
319 print_device(const char *uri, /* I - Device URI */
320 const char *hostname, /* I - Hostname/manufacturer */
321 const char *resource, /* I - Resource/modelname */
322 char *options, /* I - Device options/serial number */
323 int print_fd, /* I - File descriptor to print */
324 int copies, /* I - Copies to print */
325 int argc, /* I - Number of command-line arguments (6 or 7) */
326 char *argv[]) /* I - Command-line arguments */
327 {
328 char serial[1024]; /* Serial number buffer */
329 OSStatus status; /* Function results */
330 IOReturn iostatus; /* Current IO status */
331 pthread_t read_thread_id, /* Read thread */
332 sidechannel_thread_id;/* Side-channel thread */
333 int have_sidechannel = 0; /* Was the side-channel thread started? */
334 struct stat sidechannel_info; /* Side-channel file descriptor info */
335 char print_buffer[8192], /* Print data buffer */
336 *print_ptr; /* Pointer into print data buffer */
337 UInt32 location; /* Unique location in bus topology */
338 fd_set input_set; /* Input set for select() */
339 CFStringRef driverBundlePath; /* Class driver path */
340 int countdown, /* Logging interval */
341 nfds; /* Number of file descriptors */
342 ssize_t total_bytes; /* Total bytes written */
343 UInt32 bytes; /* Bytes written */
344 struct timeval *timeout, /* Timeout pointer */
345 stimeout; /* Timeout for select() */
346 struct timespec cond_timeout; /* pthread condition timeout */
347
348
349 /*
350 * See if the side-channel descriptor is valid...
351 */
352
353 have_sidechannel = !fstat(CUPS_SC_FD, &sidechannel_info) &&
354 S_ISSOCK(sidechannel_info.st_mode);
355
356 /*
357 * Localize using CoreFoundation...
358 */
359
360 setup_cfLanguage();
361
362 parse_options(options, serial, sizeof(serial), &location, &g.wait_eof);
363
364 if (resource[0] == '/')
365 resource++;
366
367 g.print_fd = print_fd;
368 g.make = cfstr_create_trim(hostname);
369 g.model = cfstr_create_trim(resource);
370 g.serial = cfstr_create_trim(serial);
371 g.location = location;
372
373 if (!g.make || !g.model)
374 {
375 fprintf(stderr, "DEBUG: Fatal USB error.\n");
376 _cupsLangPrintFilter(stderr, "ERROR",
377 _("There was an unrecoverable USB error."));
378
379 if (!g.make)
380 fputs("DEBUG: USB make string is NULL\n", stderr);
381 if (!g.model)
382 fputs("DEBUG: USB model string is NULL\n", stderr);
383
384 return (CUPS_BACKEND_STOP);
385 }
386
387 fputs("STATE: +connecting-to-device\n", stderr);
388
389 countdown = INITIAL_LOG_INTERVAL;
390
391 do
392 {
393 if (g.printer_obj)
394 {
395 IOObjectRelease(g.printer_obj);
396 unload_classdriver(&g.classdriver);
397 g.printer_obj = 0x0;
398 g.classdriver = 0x0;
399 }
400
401 fprintf(stderr, "DEBUG: Looking for '%s %s'\n", hostname, resource);
402
403 iterate_printers(find_device_cb, NULL);
404
405 fputs("DEBUG: Opening connection\n", stderr);
406
407 driverBundlePath = NULL;
408
409 status = registry_open(&driverBundlePath);
410
411 #if defined(__i386__) || defined(__x86_64__)
412 /*
413 * If we were unable to load the class drivers for this printer it's
414 * probably because they're ppc or i386. In this case try to run this
415 * backend as i386 or ppc executables so we can use them...
416 */
417 if (status == -2)
418 {
419 run_legacy_backend(argc, argv, print_fd);
420 /* Never returns here */
421 }
422 #endif /* __i386__ || __x86_64__ */
423
424 if (status == -2)
425 {
426 /*
427 * If we still were unable to load the class drivers for this printer log
428 * the error and stop the queue...
429 */
430
431 if (driverBundlePath == NULL || !CFStringGetCString(driverBundlePath, print_buffer, sizeof(print_buffer), kCFStringEncodingUTF8))
432 strlcpy(print_buffer, "USB class driver", sizeof(print_buffer));
433
434 fputs("STATE: +apple-missing-usbclassdriver-error\n", stderr);
435 _cupsLangPrintFilter(stderr, "ERROR",
436 _("There was an unrecoverable USB error."));
437 fprintf(stderr, "DEBUG: Could not load %s\n", print_buffer);
438
439 if (driverBundlePath)
440 CFRelease(driverBundlePath);
441
442 return (CUPS_BACKEND_STOP);
443 }
444
445 if (driverBundlePath)
446 CFRelease(driverBundlePath);
447
448 if (status != noErr)
449 {
450 sleep(PRINTER_POLLING_INTERVAL);
451 countdown -= PRINTER_POLLING_INTERVAL;
452 if (countdown <= 0)
453 {
454 _cupsLangPrintFilter(stderr, "INFO",
455 _("Waiting for printer to become available."));
456 fprintf(stderr, "DEBUG: USB printer status: 0x%08x\n", (int)status);
457 countdown = SUBSEQUENT_LOG_INTERVAL; /* subsequent log entries, every 15 seconds */
458 }
459 }
460 } while (status != noErr);
461
462 fputs("STATE: -connecting-to-device\n", stderr);
463
464 /*
465 * Now that we are "connected" to the port, ignore SIGTERM so that we
466 * can finish out any page data the driver sends (e.g. to eject the
467 * current page... Only ignore SIGTERM if we are printing data from
468 * stdin (otherwise you can't cancel raw jobs...)
469 */
470
471 if (!print_fd)
472 {
473 struct sigaction action; /* POSIX signal action */
474
475
476 memset(&action, 0, sizeof(action));
477
478 sigemptyset(&action.sa_mask);
479 action.sa_handler = SIG_IGN;
480 sigaction(SIGTERM, &action, NULL);
481 }
482
483 /*
484 * Start the side channel thread if the descriptor is valid...
485 */
486
487 pthread_mutex_init(&g.readwrite_lock_mutex, NULL);
488 pthread_cond_init(&g.readwrite_lock_cond, NULL);
489 g.readwrite_lock = 1;
490
491 if (have_sidechannel)
492 {
493 g.sidechannel_thread_stop = 0;
494 g.sidechannel_thread_done = 0;
495
496 pthread_cond_init(&g.sidechannel_thread_cond, NULL);
497 pthread_mutex_init(&g.sidechannel_thread_mutex, NULL);
498
499 if (pthread_create(&sidechannel_thread_id, NULL, sidechannel_thread, NULL))
500 {
501 fprintf(stderr, "DEBUG: Fatal USB error.\n");
502 _cupsLangPrintFilter(stderr, "ERROR",
503 _("There was an unrecoverable USB error."));
504 fputs("DEBUG: Couldn't create side-channel thread\n", stderr);
505 registry_close();
506 return (CUPS_BACKEND_STOP);
507 }
508 }
509
510 /*
511 * Get the read thread going...
512 */
513
514 g.read_thread_stop = 0;
515 g.read_thread_done = 0;
516
517 pthread_cond_init(&g.read_thread_cond, NULL);
518 pthread_mutex_init(&g.read_thread_mutex, NULL);
519
520 if (pthread_create(&read_thread_id, NULL, read_thread, NULL))
521 {
522 fprintf(stderr, "DEBUG: Fatal USB error.\n");
523 _cupsLangPrintFilter(stderr, "ERROR",
524 _("There was an unrecoverable USB error."));
525 fputs("DEBUG: Couldn't create read thread\n", stderr);
526 registry_close();
527 return (CUPS_BACKEND_STOP);
528 }
529
530 /*
531 * The main thread sends the print file...
532 */
533
534 g.drain_output = 0;
535 g.print_bytes = 0;
536 total_bytes = 0;
537 print_ptr = print_buffer;
538
539 while (status == noErr && copies-- > 0)
540 {
541 _cupsLangPrintFilter(stderr, "INFO", _("Sending data to printer."));
542
543 if (print_fd != STDIN_FILENO)
544 {
545 fputs("PAGE: 1 1\n", stderr);
546 lseek(print_fd, 0, SEEK_SET);
547 }
548
549 while (status == noErr)
550 {
551 FD_ZERO(&input_set);
552
553 if (!g.print_bytes)
554 FD_SET(print_fd, &input_set);
555
556 /*
557 * Calculate select timeout...
558 * If we have data waiting to send timeout is 100ms.
559 * else if we're draining print_fd timeout is 0.
560 * else we're waiting forever...
561 */
562
563 if (g.print_bytes)
564 {
565 stimeout.tv_sec = 0;
566 stimeout.tv_usec = 100000; /* 100ms */
567 timeout = &stimeout;
568 }
569 else if (g.drain_output)
570 {
571 stimeout.tv_sec = 0;
572 stimeout.tv_usec = 0;
573 timeout = &stimeout;
574 }
575 else
576 timeout = NULL;
577
578 /*
579 * I/O is unlocked around select...
580 */
581
582 pthread_mutex_lock(&g.readwrite_lock_mutex);
583 g.readwrite_lock = 0;
584 pthread_cond_signal(&g.readwrite_lock_cond);
585 pthread_mutex_unlock(&g.readwrite_lock_mutex);
586
587 nfds = select(print_fd + 1, &input_set, NULL, NULL, timeout);
588
589 /*
590 * Reacquire the lock...
591 */
592
593 pthread_mutex_lock(&g.readwrite_lock_mutex);
594 while (g.readwrite_lock)
595 pthread_cond_wait(&g.readwrite_lock_cond, &g.readwrite_lock_mutex);
596 g.readwrite_lock = 1;
597 pthread_mutex_unlock(&g.readwrite_lock_mutex);
598
599 if (nfds < 0)
600 {
601 if (errno == EINTR && total_bytes == 0)
602 {
603 fputs("DEBUG: Received an interrupt before any bytes were "
604 "written, aborting\n", stderr);
605 registry_close();
606 return (CUPS_BACKEND_OK);
607 }
608 else if (errno != EAGAIN && errno != EINTR)
609 {
610 _cupsLangPrintFilter(stderr, "ERROR",
611 _("Unable to read print data."));
612 perror("DEBUG: select");
613 registry_close();
614 return (CUPS_BACKEND_FAILED);
615 }
616 }
617
618 /*
619 * If drain output has finished send a response...
620 */
621
622 if (g.drain_output && !nfds && !g.print_bytes)
623 {
624 /* Send a response... */
625 cupsSideChannelWrite(CUPS_SC_CMD_DRAIN_OUTPUT, CUPS_SC_STATUS_OK, NULL, 0, 1.0);
626 g.drain_output = 0;
627 }
628
629 /*
630 * Check if we have print data ready...
631 */
632
633 if (FD_ISSET(print_fd, &input_set))
634 {
635 #if DEBUG_WRITES
636 g.debug_bytes += 512;
637 if (g.debug_bytes > sizeof(print_buffer))
638 g.debug_bytes = 512;
639
640 g.print_bytes = read(print_fd, print_buffer, g.debug_bytes);
641
642 #else
643 g.print_bytes = read(print_fd, print_buffer, sizeof(print_buffer));
644 #endif /* DEBUG_WRITES */
645
646 if (g.print_bytes < 0)
647 {
648 /*
649 * Read error - bail if we don't see EAGAIN or EINTR...
650 */
651
652 if (errno != EAGAIN && errno != EINTR)
653 {
654 _cupsLangPrintFilter(stderr, "ERROR",
655 _("Unable to read print data."));
656 perror("DEBUG: read");
657 registry_close();
658 return (CUPS_BACKEND_FAILED);
659 }
660
661 g.print_bytes = 0;
662 }
663 else if (g.print_bytes == 0)
664 {
665 /*
666 * End of file, break out of the loop...
667 */
668
669 break;
670 }
671
672 print_ptr = print_buffer;
673
674 fprintf(stderr, "DEBUG: Read %d bytes of print data...\n",
675 (int)g.print_bytes);
676 }
677
678 if (g.print_bytes)
679 {
680 bytes = g.print_bytes;
681 iostatus = (*g.classdriver)->WritePipe(g.classdriver, (UInt8*)print_ptr, &bytes, 0);
682
683 /*
684 * Ignore timeout errors, but retain the number of bytes written to
685 * avoid sending duplicate data (<rdar://problem/6254911>)...
686 */
687
688 if (iostatus == kIOUSBTransactionTimeout)
689 {
690 fputs("DEBUG: Got USB transaction timeout during write\n", stderr);
691 iostatus = 0;
692 }
693
694 /*
695 * If we've stalled, retry the write...
696 */
697
698 else if (iostatus == kIOUSBPipeStalled)
699 {
700 fputs("DEBUG: Got USB pipe stalled during write\n", stderr);
701
702 bytes = g.print_bytes;
703 iostatus = (*g.classdriver)->WritePipe(g.classdriver, (UInt8*)print_ptr, &bytes, 0);
704 }
705
706 /*
707 * Retry a write after an aborted write since we probably just got
708 * SIGTERM (<rdar://problem/6860126>)...
709 */
710
711 else if (iostatus == kIOReturnAborted)
712 {
713 fputs("DEBUG: Got USB return aborted during write\n", stderr);
714
715 IOReturn err = (*g.classdriver)->Abort(g.classdriver);
716 fprintf(stderr, "DEBUG: USB class driver Abort returned %x\n", err);
717
718 #if DEBUG_WRITES
719 sleep(5);
720 #endif /* DEBUG_WRITES */
721
722 bytes = g.print_bytes;
723 iostatus = (*g.classdriver)->WritePipe(g.classdriver, (UInt8*)print_ptr, &bytes, 0);
724 }
725
726 if (iostatus || bytes < 0)
727 {
728 /*
729 * Write error - bail if we don't see an error we can retry...
730 */
731 _cupsLangPrintFilter(stderr, "ERROR",
732 _("Unable to send data to printer."));
733 fprintf(stderr, "DEBUG: USB class driver WritePipe returned %x\n",
734 iostatus);
735
736 IOReturn err = (*g.classdriver)->Abort(g.classdriver);
737 fprintf(stderr, "DEBUG: USB class driver Abort returned %x\n",
738 err);
739
740 status = CUPS_BACKEND_FAILED;
741 break;
742 }
743 else if (bytes > 0)
744 {
745 fprintf(stderr, "DEBUG: Wrote %d bytes of print data...\n", (int)bytes);
746
747 g.print_bytes -= bytes;
748 print_ptr += bytes;
749 total_bytes += bytes;
750 }
751 }
752
753 if (print_fd != 0 && status == noErr)
754 fprintf(stderr, "DEBUG: Sending print file, %lld bytes...\n",
755 (off_t)total_bytes);
756 }
757 }
758
759 fprintf(stderr, "DEBUG: Sent %lld bytes...\n", (off_t)total_bytes);
760
761 if (!print_fd)
762 {
763 /*
764 * Re-enable the SIGTERM handler so pthread_kill() will work...
765 */
766
767 struct sigaction action; /* POSIX signal action */
768
769 memset(&action, 0, sizeof(action));
770
771 sigemptyset(&action.sa_mask);
772 sigaddset(&action.sa_mask, SIGTERM);
773 action.sa_handler = sigterm_handler;
774 sigaction(SIGTERM, &action, NULL);
775 }
776
777 /*
778 * Wait for the side channel thread to exit...
779 */
780
781 if (have_sidechannel)
782 {
783 close(CUPS_SC_FD);
784 pthread_mutex_lock(&g.readwrite_lock_mutex);
785 g.readwrite_lock = 0;
786 pthread_cond_signal(&g.readwrite_lock_cond);
787 pthread_mutex_unlock(&g.readwrite_lock_mutex);
788
789 g.sidechannel_thread_stop = 1;
790 pthread_mutex_lock(&g.sidechannel_thread_mutex);
791 if (!g.sidechannel_thread_done)
792 {
793 /*
794 * Wait for the side-channel thread to exit...
795 */
796
797 cond_timeout.tv_sec = time(NULL) + WAIT_SIDE_DELAY;
798 cond_timeout.tv_nsec = 0;
799 if (pthread_cond_timedwait(&g.sidechannel_thread_cond,
800 &g.sidechannel_thread_mutex,
801 &cond_timeout) != 0)
802 {
803 /*
804 * Force the side-channel thread to exit...
805 */
806
807 fputs("DEBUG: Force the side-channel thread to exit...\n", stderr);
808 pthread_kill(sidechannel_thread_id, SIGTERM);
809 }
810 }
811 pthread_mutex_unlock(&g.sidechannel_thread_mutex);
812
813 pthread_join(sidechannel_thread_id, NULL);
814
815 pthread_cond_destroy(&g.sidechannel_thread_cond);
816 pthread_mutex_destroy(&g.sidechannel_thread_mutex);
817 }
818
819 pthread_cond_destroy(&g.readwrite_lock_cond);
820 pthread_mutex_destroy(&g.readwrite_lock_mutex);
821
822 /*
823 * Signal the read thread to stop...
824 */
825
826 g.read_thread_stop = 1;
827
828 /*
829 * Give the read thread WAIT_EOF_DELAY seconds to complete all the data. If
830 * we are not signaled in that time then force the thread to exit.
831 */
832
833 pthread_mutex_lock(&g.read_thread_mutex);
834
835 if (!g.read_thread_done)
836 {
837 cond_timeout.tv_sec = time(NULL) + WAIT_EOF_DELAY;
838 cond_timeout.tv_nsec = 0;
839
840 if (pthread_cond_timedwait(&g.read_thread_cond, &g.read_thread_mutex,
841 &cond_timeout) != 0)
842 {
843 /*
844 * Force the read thread to exit...
845 */
846
847 g.wait_eof = 0;
848 fputs("DEBUG: Force the read thread to exit...\n", stderr);
849 pthread_kill(read_thread_id, SIGTERM);
850 }
851 }
852 pthread_mutex_unlock(&g.read_thread_mutex);
853
854 pthread_join(read_thread_id, NULL); /* wait for the read thread to return */
855
856 pthread_cond_destroy(&g.read_thread_cond);
857 pthread_mutex_destroy(&g.read_thread_mutex);
858
859 /*
860 * Close the connection and input file and general clean up...
861 */
862
863 registry_close();
864
865 if (print_fd != STDIN_FILENO)
866 close(print_fd);
867
868 if (g.make != NULL)
869 CFRelease(g.make);
870
871 if (g.model != NULL)
872 CFRelease(g.model);
873
874 if (g.serial != NULL)
875 CFRelease(g.serial);
876
877 if (g.printer_obj != 0x0)
878 IOObjectRelease(g.printer_obj);
879
880 return status;
881 }
882
883
884 /*
885 * 'read_thread()' - Thread to read the backchannel data on.
886 */
887
888 static void *read_thread(void *reference)
889 {
890 UInt8 readbuffer[512];
891 UInt32 rbytes;
892 kern_return_t readstatus;
893 struct mach_timebase_info timeBaseInfo;
894 uint64_t start,
895 delay;
896
897 /* Calculate what 250 milliSeconds are in mach absolute time...
898 */
899 mach_timebase_info(&timeBaseInfo);
900 delay = ((uint64_t)250000000 * (uint64_t)timeBaseInfo.denom) / (uint64_t)timeBaseInfo.numer;
901
902 do
903 {
904 /*
905 * Remember when we started so we can throttle the loop after the read call...
906 */
907
908 start = mach_absolute_time();
909
910 rbytes = sizeof(readbuffer);
911 readstatus = (*g.classdriver)->ReadPipe(g.classdriver, readbuffer, &rbytes);
912 if (readstatus == kIOReturnSuccess && rbytes > 0)
913 {
914 fprintf(stderr, "DEBUG: Read %d bytes of back-channel data...\n",
915 (int)rbytes);
916 cupsBackChannelWrite((char*)readbuffer, rbytes, 1.0);
917
918 /* cntrl-d is echoed by the printer.
919 * NOTES:
920 * Xerox Phaser 6250D doesn't echo the cntrl-d.
921 * Xerox Phaser 6250D doesn't always send the product query.
922 */
923 if (g.wait_eof && readbuffer[rbytes-1] == 0x4)
924 break;
925
926 #ifdef PARSE_PS_ERRORS
927 parse_pserror(readbuffer, rbytes);
928 #endif
929 }
930 else if (readstatus == kIOUSBTransactionTimeout)
931 fputs("DEBUG: Got USB transaction timeout during read\n", stderr);
932 else if (readstatus == kIOUSBPipeStalled)
933 fputs("DEBUG: Got USB pipe stalled during read\n", stderr);
934 else if (readstatus == kIOReturnAborted)
935 fputs("DEBUG: Got USB return aborted during read\n", stderr);
936
937 /*
938 * Make sure this loop executes no more than once every 250 miliseconds...
939 */
940
941 if ((readstatus != kIOReturnSuccess || rbytes == 0) && (g.wait_eof || !g.read_thread_stop))
942 mach_wait_until(start + delay);
943
944 } while (g.wait_eof || !g.read_thread_stop); /* Abort from main thread tests error here */
945
946 /*
947 * Let the main thread know that we have completed the read thread...
948 */
949
950 pthread_mutex_lock(&g.read_thread_mutex);
951 g.read_thread_done = 1;
952 pthread_cond_signal(&g.read_thread_cond);
953 pthread_mutex_unlock(&g.read_thread_mutex);
954
955 return NULL;
956 }
957
958
959 /*
960 * 'sidechannel_thread()' - Handle side-channel requests.
961 */
962
963 static void*
964 sidechannel_thread(void *reference)
965 {
966 cups_sc_command_t command; /* Request command */
967 cups_sc_status_t status; /* Request/response status */
968 char data[2048]; /* Request/response data */
969 int datalen; /* Request/response data size */
970
971
972 do
973 {
974 datalen = sizeof(data);
975
976 if (cupsSideChannelRead(&command, &status, data, &datalen, 1.0))
977 {
978 if (status == CUPS_SC_STATUS_TIMEOUT)
979 continue;
980 else
981 break;
982 }
983
984 switch (command)
985 {
986 case CUPS_SC_CMD_SOFT_RESET: /* Do a soft reset */
987 fputs("DEBUG: CUPS_SC_CMD_SOFT_RESET received from driver...\n",
988 stderr);
989
990 if ((*g.classdriver)->SoftReset != NULL)
991 {
992 soft_reset();
993 cupsSideChannelWrite(command, CUPS_SC_STATUS_OK, NULL, 0, 1.0);
994 fputs("DEBUG: Returning status CUPS_STATUS_OK with no bytes...\n",
995 stderr);
996 }
997 else
998 {
999 cupsSideChannelWrite(command, CUPS_SC_STATUS_NOT_IMPLEMENTED,
1000 NULL, 0, 1.0);
1001 fputs("DEBUG: Returning status CUPS_STATUS_NOT_IMPLEMENTED with "
1002 "no bytes...\n", stderr);
1003 }
1004 break;
1005
1006 case CUPS_SC_CMD_DRAIN_OUTPUT: /* Drain all pending output */
1007 fputs("DEBUG: CUPS_SC_CMD_DRAIN_OUTPUT received from driver...\n",
1008 stderr);
1009
1010 g.drain_output = 1;
1011 break;
1012
1013 case CUPS_SC_CMD_GET_BIDI: /* Is the connection bidirectional? */
1014 fputs("DEBUG: CUPS_SC_CMD_GET_BIDI received from driver...\n",
1015 stderr);
1016
1017 data[0] = g.bidi_flag;
1018 cupsSideChannelWrite(command, CUPS_SC_STATUS_OK, data, 1, 1.0);
1019
1020 fprintf(stderr,
1021 "DEBUG: Returned CUPS_SC_STATUS_OK with 1 byte (%02X)...\n",
1022 data[0]);
1023 break;
1024
1025 case CUPS_SC_CMD_GET_DEVICE_ID: /* Return IEEE-1284 device ID */
1026 fputs("DEBUG: CUPS_SC_CMD_GET_DEVICE_ID received from driver...\n",
1027 stderr);
1028
1029 datalen = sizeof(data);
1030 get_device_id(&status, data, &datalen);
1031 cupsSideChannelWrite(command, CUPS_SC_STATUS_OK, data, datalen, 1.0);
1032
1033 if (datalen < sizeof(data))
1034 data[datalen] = '\0';
1035 else
1036 data[sizeof(data) - 1] = '\0';
1037
1038 fprintf(stderr,
1039 "DEBUG: Returning CUPS_SC_STATUS_OK with %d bytes (%s)...\n",
1040 datalen, data);
1041 break;
1042
1043 case CUPS_SC_CMD_GET_STATE: /* Return device state */
1044 fputs("DEBUG: CUPS_SC_CMD_GET_STATE received from driver...\n",
1045 stderr);
1046
1047 data[0] = CUPS_SC_STATE_ONLINE;
1048 cupsSideChannelWrite(command, CUPS_SC_STATUS_OK, data, 1, 1.0);
1049
1050 fprintf(stderr,
1051 "DEBUG: Returned CUPS_SC_STATUS_OK with 1 byte (%02X)...\n",
1052 data[0]);
1053 break;
1054
1055 default:
1056 fprintf(stderr, "DEBUG: Unknown side-channel command (%d) received "
1057 "from driver...\n", command);
1058
1059 cupsSideChannelWrite(command, CUPS_SC_STATUS_NOT_IMPLEMENTED,
1060 NULL, 0, 1.0);
1061
1062 fputs("DEBUG: Returned CUPS_SC_STATUS_NOT_IMPLEMENTED with no bytes...\n",
1063 stderr);
1064 break;
1065 }
1066 }
1067 while (!g.sidechannel_thread_stop);
1068
1069 pthread_mutex_lock(&g.sidechannel_thread_mutex);
1070 g.sidechannel_thread_done = 1;
1071 pthread_cond_signal(&g.sidechannel_thread_cond);
1072 pthread_mutex_unlock(&g.sidechannel_thread_mutex);
1073
1074 return NULL;
1075 }
1076
1077
1078 #pragma mark -
1079 /*
1080 * 'iterate_printers()' - Iterate over all the printers.
1081 */
1082
1083 static void iterate_printers(iterator_callback_t callBack,
1084 void *userdata)
1085 {
1086 mach_port_t masterPort = 0x0;
1087 kern_return_t kr = IOMasterPort (bootstrap_port, &masterPort);
1088
1089 if (kr == kIOReturnSuccess && masterPort != 0x0)
1090 {
1091 io_iterator_t addIterator = 0x0;
1092
1093 iterator_reference_t reference = { callBack, userdata, true };
1094 IONotificationPortRef addNotification = IONotificationPortCreate(masterPort);
1095
1096 int klass = kUSBPrintingClass;
1097 int subklass = kUSBPrintingSubclass;
1098
1099 CFNumberRef usb_klass = CFNumberCreate(NULL, kCFNumberIntType, &klass);
1100 CFNumberRef usb_subklass = CFNumberCreate(NULL, kCFNumberIntType, &subklass);
1101 CFMutableDictionaryRef usbPrinterMatchDictionary = IOServiceMatching(kIOUSBInterfaceClassName);
1102
1103 CFDictionaryAddValue(usbPrinterMatchDictionary, CFSTR("bInterfaceClass"), usb_klass);
1104 CFDictionaryAddValue(usbPrinterMatchDictionary, CFSTR("bInterfaceSubClass"), usb_subklass);
1105
1106 CFRelease(usb_klass);
1107 CFRelease(usb_subklass);
1108
1109 kr = IOServiceAddMatchingNotification(addNotification, kIOMatchedNotification, usbPrinterMatchDictionary, &device_added, &reference, &addIterator);
1110 if (addIterator != 0x0)
1111 {
1112 device_added (&reference, addIterator);
1113
1114 if (reference.keepRunning)
1115 {
1116 CFRunLoopAddSource(CFRunLoopGetCurrent(), IONotificationPortGetRunLoopSource(addNotification), kCFRunLoopDefaultMode);
1117 CFRunLoopRun();
1118 }
1119 IOObjectRelease(addIterator);
1120 }
1121 mach_port_deallocate(mach_task_self(), masterPort);
1122 }
1123 }
1124
1125
1126 /*
1127 * 'device_added()' - Device added notifier.
1128 */
1129
1130 static void device_added(void *userdata,
1131 io_iterator_t iterator)
1132 {
1133 iterator_reference_t *reference = userdata;
1134
1135 io_service_t obj;
1136 while (reference->keepRunning && (obj = IOIteratorNext(iterator)) != 0x0)
1137 {
1138 if (reference->callback != NULL)
1139 reference->keepRunning = reference->callback(reference->userdata, obj);
1140
1141 IOObjectRelease(obj);
1142 }
1143
1144 /* One last call to the call back now that we are not longer have printers left to iterate...
1145 */
1146 if (reference->keepRunning)
1147 reference->keepRunning = reference->callback(reference->userdata, 0x0);
1148
1149 if (!reference->keepRunning)
1150 CFRunLoopStop(CFRunLoopGetCurrent());
1151 }
1152
1153
1154 /*
1155 * 'list_device_cb()' - list_device iterator callback.
1156 */
1157
1158 static Boolean list_device_cb(void *refcon,
1159 io_service_t obj)
1160 {
1161 Boolean keepRunning = (obj != 0x0);
1162
1163 if (keepRunning)
1164 {
1165 CFStringRef deviceIDString = NULL;
1166 UInt32 deviceLocation = 0;
1167 UInt8 interfaceNum = 0;
1168
1169 copy_devicestring(obj, &deviceIDString, &deviceLocation, &interfaceNum);
1170 if (deviceIDString != NULL)
1171 {
1172 CFStringRef make = NULL, model = NULL, serial = NULL;
1173 char uristr[1024], makestr[1024], modelstr[1024], serialstr[1024];
1174 char optionsstr[1024], idstr[1024], make_modelstr[1024];
1175
1176 copy_deviceinfo(deviceIDString, &make, &model, &serial);
1177 CFStringGetCString(deviceIDString, idstr, sizeof(idstr),
1178 kCFStringEncodingUTF8);
1179 backendGetMakeModel(idstr, make_modelstr, sizeof(make_modelstr));
1180
1181 modelstr[0] = '/';
1182
1183 if (!make ||
1184 !CFStringGetCString(make, makestr, sizeof(makestr),
1185 kCFStringEncodingUTF8))
1186 strcpy(makestr, "Unknown");
1187
1188 if (!model ||
1189 !CFStringGetCString(model, &modelstr[1], sizeof(modelstr)-1,
1190 kCFStringEncodingUTF8))
1191 strcpy(modelstr + 1, "Printer");
1192
1193 optionsstr[0] = '\0';
1194 if (serial != NULL)
1195 {
1196 CFStringGetCString(serial, serialstr, sizeof(serialstr), kCFStringEncodingUTF8);
1197 snprintf(optionsstr, sizeof(optionsstr), "?serial=%s", serialstr);
1198 }
1199 else if (deviceLocation != 0)
1200 snprintf(optionsstr, sizeof(optionsstr), "?location=%x", (unsigned)deviceLocation);
1201
1202 httpAssembleURI(HTTP_URI_CODING_ALL, uristr, sizeof(uristr), "usb", NULL, makestr, 0, modelstr);
1203 strlcat(uristr, optionsstr, sizeof(uristr));
1204
1205 cupsBackendReport("direct", uristr, make_modelstr, make_modelstr, idstr,
1206 NULL);
1207
1208 release_deviceinfo(&make, &model, &serial);
1209 CFRelease(deviceIDString);
1210 }
1211 }
1212
1213 return keepRunning;
1214 }
1215
1216
1217 /*
1218 * 'find_device_cb()' - print_device iterator callback.
1219 */
1220
1221 static Boolean find_device_cb(void *refcon,
1222 io_service_t obj)
1223 {
1224 Boolean keepLooking = true;
1225
1226 if (obj != 0x0)
1227 {
1228 CFStringRef idString = NULL;
1229 UInt32 location = -1;
1230 UInt8 interfaceNum = 0;
1231
1232 copy_devicestring(obj, &idString, &location, &interfaceNum);
1233 if (idString != NULL)
1234 {
1235 CFStringRef make = NULL, model = NULL, serial = NULL;
1236
1237 copy_deviceinfo(idString, &make, &model, &serial);
1238 if (make && CFStringCompare(make, g.make, kCFCompareCaseInsensitive) == kCFCompareEqualTo)
1239 {
1240 if (model && CFStringCompare(model, g.model, kCFCompareCaseInsensitive) == kCFCompareEqualTo)
1241 {
1242 if (g.serial != NULL && CFStringGetLength(g.serial) > 0)
1243 {
1244 if (serial != NULL && CFStringCompare(serial, g.serial, kCFCompareCaseInsensitive) == kCFCompareEqualTo)
1245 {
1246 IOObjectRetain(obj);
1247 g.printer_obj = obj;
1248 keepLooking = false;
1249 }
1250 }
1251 else
1252 {
1253 if (g.printer_obj != 0)
1254 IOObjectRelease(g.printer_obj);
1255
1256 g.printer_obj = obj;
1257 IOObjectRetain(obj);
1258
1259 if (g.location == 0 || g.location == location)
1260 keepLooking = false;
1261 }
1262 if ( !keepLooking )
1263 g.interfaceNum = interfaceNum;
1264 }
1265 }
1266
1267 release_deviceinfo(&make, &model, &serial);
1268 CFRelease(idString);
1269 }
1270 }
1271 else
1272 {
1273 keepLooking = (g.printer_obj == 0);
1274 if (obj == 0x0 && keepLooking)
1275 {
1276 CFRunLoopTimerContext context = { 0, refcon, NULL, NULL, NULL };
1277 CFRunLoopTimerRef timer = CFRunLoopTimerCreate(NULL, CFAbsoluteTimeGetCurrent() + 1.0, 10, 0x0, 0x0, status_timer_cb, &context);
1278 if (timer != NULL)
1279 {
1280 CFRunLoopAddTimer(CFRunLoopGetCurrent(), timer, kCFRunLoopDefaultMode);
1281 g.status_timer = timer;
1282 }
1283 }
1284 }
1285
1286 if (!keepLooking && g.status_timer != NULL)
1287 {
1288 fputs("STATE: -offline-report\n", stderr);
1289 _cupsLangPrintFilter(stderr, "INFO", _("Printer is now online."));
1290 CFRunLoopRemoveTimer(CFRunLoopGetCurrent(), g.status_timer, kCFRunLoopDefaultMode);
1291 CFRelease(g.status_timer);
1292 g.status_timer = NULL;
1293 }
1294
1295 return keepLooking;
1296 }
1297
1298
1299 /*
1300 * 'status_timer_cb()' - Status timer callback.
1301 */
1302
1303 static void status_timer_cb(CFRunLoopTimerRef timer,
1304 void *info)
1305 {
1306 fputs("STATE: +offline-report\n", stderr);
1307 _cupsLangPrintFilter(stderr, "INFO", _("Printer is offline."));
1308
1309 if (getenv("CLASS") != NULL)
1310 {
1311 /*
1312 * If the CLASS environment variable is set, the job was submitted
1313 * to a class and not to a specific queue. In this case, we want
1314 * to abort immediately so that the job can be requeued on the next
1315 * available printer in the class.
1316 *
1317 * Sleep 5 seconds to keep the job from requeuing too rapidly...
1318 */
1319
1320 sleep(5);
1321
1322 exit(CUPS_BACKEND_FAILED);
1323 }
1324 }
1325
1326
1327 #pragma mark -
1328 /*
1329 * 'copy_deviceinfo()' - Copy strings from the 1284 device ID.
1330 */
1331
1332 static void copy_deviceinfo(CFStringRef deviceIDString,
1333 CFStringRef *make,
1334 CFStringRef *model,
1335 CFStringRef *serial)
1336 {
1337 CFStringRef modelKeys[] = { CFSTR("MDL:"), CFSTR("MODEL:"), NULL };
1338 CFStringRef makeKeys[] = { CFSTR("MFG:"), CFSTR("MANUFACTURER:"), NULL };
1339 CFStringRef serialKeys[] = { CFSTR("SN:"), CFSTR("SERN:"), NULL };
1340
1341 if (make != NULL)
1342 *make = copy_value_for_key(deviceIDString, makeKeys);
1343
1344 if (model != NULL)
1345 *model = copy_value_for_key(deviceIDString, modelKeys);
1346
1347 if (serial != NULL)
1348 *serial = copy_value_for_key(deviceIDString, serialKeys);
1349 }
1350
1351
1352 /*
1353 * 'release_deviceinfo()' - Release deviceinfo strings.
1354 */
1355
1356 static void release_deviceinfo(CFStringRef *make,
1357 CFStringRef *model,
1358 CFStringRef *serial)
1359 {
1360 if (make != NULL && *make != NULL)
1361 {
1362 CFRelease(*make);
1363 *make = NULL;
1364 }
1365
1366 if (model != NULL && *model != NULL)
1367 {
1368 CFRelease(*model);
1369 *model = NULL;
1370 }
1371
1372 if (serial != NULL && *serial != NULL)
1373 {
1374 CFRelease(*serial);
1375 *serial = NULL;
1376 }
1377 }
1378
1379
1380 #pragma mark -
1381 /*
1382 * 'load_classdriver()' - Load a classdriver.
1383 */
1384
1385 static kern_return_t load_classdriver(CFStringRef driverPath,
1386 printer_interface_t intf,
1387 classdriver_t ***printerDriver)
1388 {
1389 kern_return_t kr = kUSBPrinterClassDeviceNotOpen;
1390 classdriver_t **driver = NULL;
1391 CFStringRef bundle = driverPath ? driverPath : kUSBGenericTOPrinterClassDriver;
1392 char bundlestr[1024]; /* Bundle path */
1393 struct stat bundleinfo; /* File information for bundle */
1394 CFURLRef url; /* URL for driver */
1395 CFPlugInRef plugin = NULL; /* Plug-in address */
1396
1397
1398 CFStringGetCString(bundle, bundlestr, sizeof(bundlestr), kCFStringEncodingUTF8);
1399
1400 /*
1401 * Validate permissions for the class driver...
1402 */
1403
1404 if (stat(bundlestr, &bundleinfo))
1405 {
1406 fprintf(stderr, "DEBUG: Unable to load class driver \"%s\": %s\n",
1407 bundlestr, strerror(errno));
1408 if (errno == ENOENT)
1409 return (load_classdriver(NULL, intf, printerDriver));
1410 else
1411 return (kr);
1412 }
1413 else if (bundleinfo.st_mode & S_IWOTH)
1414 {
1415 fprintf(stderr, "DEBUG: Unable to load class driver \"%s\": insecure file "
1416 "permissions (0%o)\n", bundlestr, bundleinfo.st_mode);
1417 return (kr);
1418 }
1419
1420 /*
1421 * Try loading the class driver...
1422 */
1423
1424 url = CFURLCreateWithFileSystemPath(NULL, bundle, kCFURLPOSIXPathStyle, true);
1425
1426 if (url)
1427 {
1428 plugin = CFPlugInCreate(NULL, url);
1429 CFRelease(url);
1430 }
1431 else
1432 plugin = NULL;
1433
1434 if (plugin)
1435 {
1436 CFArrayRef factories = CFPlugInFindFactoriesForPlugInTypeInPlugIn(kUSBPrinterClassTypeID, plugin);
1437 if (factories != NULL && CFArrayGetCount(factories) > 0)
1438 {
1439 CFUUIDRef factoryID = CFArrayGetValueAtIndex(factories, 0);
1440 IUnknownVTbl **iunknown = CFPlugInInstanceCreate(NULL, factoryID, kUSBPrinterClassTypeID);
1441 if (iunknown != NULL)
1442 {
1443 kr = (*iunknown)->QueryInterface(iunknown, CFUUIDGetUUIDBytes(kUSBPrinterClassInterfaceID), (LPVOID *)&driver);
1444 if (kr == kIOReturnSuccess && driver != NULL)
1445 {
1446 classdriver_t **genericDriver = NULL;
1447 if (driverPath != NULL && CFStringCompare(driverPath, kUSBGenericTOPrinterClassDriver, 0) != kCFCompareEqualTo)
1448 kr = load_classdriver(NULL, intf, &genericDriver);
1449
1450 if (kr == kIOReturnSuccess)
1451 {
1452 (*driver)->interface = intf;
1453 (*driver)->Initialize(driver, genericDriver);
1454
1455 (*driver)->plugin = plugin;
1456 (*driver)->interface = intf;
1457 *printerDriver = driver;
1458 }
1459 }
1460 (*iunknown)->Release(iunknown);
1461 }
1462 CFRelease(factories);
1463 }
1464 }
1465
1466 fprintf(stderr, "DEBUG: load_classdriver(%s) (kr:0x%08x)\n", bundlestr, (int)kr);
1467
1468 return (kr);
1469 }
1470
1471
1472 /*
1473 * 'unload_classdriver()' - Unload a classdriver.
1474 */
1475
1476 static kern_return_t unload_classdriver(classdriver_t ***classdriver)
1477 {
1478 if (*classdriver != NULL)
1479 {
1480 (**classdriver)->Release(*classdriver);
1481 *classdriver = NULL;
1482 }
1483
1484 return kIOReturnSuccess;
1485 }
1486
1487
1488 /*
1489 * 'load_printerdriver()' - Load vendor's classdriver.
1490 *
1491 * If driverBundlePath is not NULL on return it is the callers responsbility to release it!
1492 */
1493
1494 static kern_return_t load_printerdriver(CFStringRef *driverBundlePath)
1495 {
1496 IOCFPlugInInterface **iodev = NULL;
1497 SInt32 score;
1498 kern_return_t kr;
1499 printer_interface_t intf;
1500 HRESULT res;
1501
1502 kr = IOCreatePlugInInterfaceForService(g.printer_obj, kIOUSBInterfaceUserClientTypeID, kIOCFPlugInInterfaceID, &iodev, &score);
1503 if (kr == kIOReturnSuccess)
1504 {
1505 if ((res = (*iodev)->QueryInterface(iodev, USB_INTERFACE_KIND, (LPVOID *) &intf)) == noErr)
1506 {
1507 *driverBundlePath = IORegistryEntryCreateCFProperty(g.printer_obj, kUSBClassDriverProperty, NULL, kNilOptions);
1508
1509 kr = load_classdriver(*driverBundlePath, intf, &g.classdriver);
1510
1511 if (kr != kIOReturnSuccess)
1512 (*intf)->Release(intf);
1513 }
1514 IODestroyPlugInInterface(iodev);
1515 }
1516 return kr;
1517 }
1518
1519
1520 /*
1521 * 'registry_open()' - Open a connection to the printer.
1522 */
1523
1524 static kern_return_t registry_open(CFStringRef *driverBundlePath)
1525 {
1526 g.bidi_flag = 0; /* 0=unidirectional */
1527
1528 kern_return_t kr = load_printerdriver(driverBundlePath);
1529 if (kr != kIOReturnSuccess)
1530 kr = -2;
1531
1532 if (g.classdriver != NULL)
1533 {
1534 (*g.classdriver)->interfaceNumber = g.interfaceNum;
1535 kr = (*g.classdriver)->Open(g.classdriver, g.location, kUSBPrintingProtocolBidirectional);
1536 if (kr != kIOReturnSuccess || (*g.classdriver)->interface == NULL)
1537 {
1538 kr = (*g.classdriver)->Open(g.classdriver, g.location, kUSBPrintingProtocolUnidirectional);
1539 if (kr == kIOReturnSuccess)
1540 {
1541 if ((*g.classdriver)->interface == NULL)
1542 {
1543 (*g.classdriver)->Close(g.classdriver);
1544 kr = -1;
1545 }
1546 }
1547 }
1548 else
1549 g.bidi_flag = 1; /* 1=bidirectional */
1550 }
1551
1552 if (kr != kIOReturnSuccess)
1553 unload_classdriver(&g.classdriver);
1554
1555 return kr;
1556 }
1557
1558
1559 /*
1560 * 'registry_close()' - Close the connection to the printer.
1561 */
1562
1563 static kern_return_t registry_close()
1564 {
1565 if (g.classdriver != NULL)
1566 (*g.classdriver)->Close(g.classdriver);
1567
1568 unload_classdriver(&g.classdriver);
1569 return kIOReturnSuccess;
1570 }
1571
1572
1573 /*
1574 * 'copy_deviceid()' - Copy the 1284 device id string.
1575 */
1576
1577 static OSStatus copy_deviceid(classdriver_t **classdriver,
1578 CFStringRef *deviceID)
1579 {
1580 CFStringRef devID = NULL,
1581
1582 deviceMake = NULL,
1583 deviceModel = NULL,
1584 deviceSerial = NULL;
1585
1586 OSStatus err = (*classdriver)->GetDeviceID(classdriver, &devID, DEFAULT_TIMEOUT);
1587
1588 copy_deviceinfo(devID, &deviceMake, &deviceModel, &deviceSerial);
1589
1590 if (deviceMake == NULL || deviceModel == NULL || deviceSerial == NULL)
1591 {
1592 IOUSBDeviceDescriptor desc;
1593 iodevice_request_t request;
1594
1595 request.requestType = USBmakebmRequestType(kUSBIn, kUSBStandard, kUSBDevice);
1596 request.request = kUSBRqGetDescriptor;
1597 request.value = (kUSBDeviceDesc << 8) | 0;
1598 request.index = 0;
1599 request.length = sizeof(desc);
1600 request.buffer = &desc;
1601 err = (*classdriver)->DeviceRequest(classdriver, &request, DEFAULT_TIMEOUT);
1602 if (err == kIOReturnSuccess)
1603 {
1604 CFMutableStringRef newDevID = CFStringCreateMutable(NULL, 0);
1605
1606 if (deviceMake == NULL)
1607 {
1608 CFStringRef data = NULL;
1609 err = (*classdriver)->GetString(classdriver, desc.iManufacturer, kUSBLanguageEnglish, DEFAULT_TIMEOUT, &data);
1610 if (data != NULL)
1611 {
1612 CFStringAppendFormat(newDevID, NULL, CFSTR("MFG:%@;"), data);
1613 CFRelease(data);
1614 }
1615 }
1616
1617 if (deviceModel == NULL)
1618 {
1619 CFStringRef data = NULL;
1620 err = (*classdriver)->GetString(classdriver, desc.iProduct, kUSBLanguageEnglish, DEFAULT_TIMEOUT, &data);
1621 if (data != NULL)
1622 {
1623 CFStringAppendFormat(newDevID, NULL, CFSTR("MDL:%@;"), data);
1624 CFRelease(data);
1625 }
1626 }
1627
1628 if (deviceSerial == NULL && desc.iSerialNumber != 0)
1629 {
1630 CFStringRef data = NULL;
1631 err = (*classdriver)->GetString(classdriver, desc.iSerialNumber, kUSBLanguageEnglish, DEFAULT_TIMEOUT, &data);
1632 if (data != NULL)
1633 {
1634 CFStringAppendFormat(newDevID, NULL, CFSTR("SERN:%@;"), data);
1635 CFRelease(data);
1636 }
1637 }
1638
1639 if (devID != NULL)
1640 {
1641 CFStringAppend(newDevID, devID);
1642 CFRelease(devID);
1643 }
1644
1645 *deviceID = newDevID;
1646 }
1647 }
1648 else
1649 {
1650 *deviceID = devID;
1651 }
1652 release_deviceinfo(&deviceMake, &deviceModel, &deviceSerial);
1653
1654 return err;
1655 }
1656
1657
1658 /*
1659 * 'copy_devicestring()' - Copy the 1284 device id string.
1660 */
1661
1662 static void copy_devicestring(io_service_t usbInterface,
1663 CFStringRef *deviceID,
1664 UInt32 *deviceLocation,
1665 UInt8 *interfaceNumber )
1666 {
1667 IOCFPlugInInterface **iodev = NULL;
1668 SInt32 score;
1669 kern_return_t kr;
1670 printer_interface_t intf;
1671 HRESULT res;
1672 classdriver_t **klassDriver = NULL;
1673 CFStringRef driverBundlePath;
1674
1675 if ((kr = IOCreatePlugInInterfaceForService(usbInterface,
1676 kIOUSBInterfaceUserClientTypeID,
1677 kIOCFPlugInInterfaceID,
1678 &iodev, &score)) == kIOReturnSuccess)
1679 {
1680 if ((res = (*iodev)->QueryInterface(iodev, USB_INTERFACE_KIND, (LPVOID *)
1681 &intf)) == noErr)
1682 {
1683 (*intf)->GetLocationID(intf, deviceLocation);
1684 (*intf)->GetInterfaceNumber(intf, interfaceNumber);
1685
1686 driverBundlePath = IORegistryEntryCreateCFProperty(usbInterface,
1687 kUSBClassDriverProperty,
1688 NULL, kNilOptions);
1689
1690 kr = load_classdriver(driverBundlePath, intf, &klassDriver);
1691
1692 if (kr != kIOReturnSuccess && driverBundlePath != NULL)
1693 kr = load_classdriver(NULL, intf, &klassDriver);
1694
1695 if (kr == kIOReturnSuccess && klassDriver != NULL)
1696 kr = copy_deviceid(klassDriver, deviceID);
1697
1698 unload_classdriver(&klassDriver);
1699
1700 if (driverBundlePath != NULL)
1701 CFRelease(driverBundlePath);
1702
1703 /* (*intf)->Release(intf); */
1704 }
1705 IODestroyPlugInInterface(iodev);
1706 }
1707 }
1708
1709
1710 #pragma mark -
1711 /*
1712 * 'copy_value_for_key()' - Copy value string associated with a key.
1713 */
1714
1715 static CFStringRef copy_value_for_key(CFStringRef deviceID,
1716 CFStringRef *keys)
1717 {
1718 CFStringRef value = NULL;
1719 CFArrayRef kvPairs = deviceID != NULL ? CFStringCreateArrayBySeparatingStrings(NULL, deviceID, CFSTR(";")) : NULL;
1720 CFIndex max = kvPairs != NULL ? CFArrayGetCount(kvPairs) : 0;
1721 CFIndex idx = 0;
1722
1723 while (idx < max && value == NULL)
1724 {
1725 CFStringRef kvpair = CFArrayGetValueAtIndex(kvPairs, idx);
1726 CFIndex idxx = 0;
1727 while (keys[idxx] != NULL && value == NULL)
1728 {
1729 CFRange range = CFStringFind(kvpair, keys[idxx], kCFCompareCaseInsensitive);
1730 if (range.length != -1)
1731 {
1732 if (range.location != 0)
1733 {
1734 CFMutableStringRef theString = CFStringCreateMutableCopy(NULL, 0, kvpair);
1735 CFStringTrimWhitespace(theString);
1736 range = CFStringFind(theString, keys[idxx], kCFCompareCaseInsensitive);
1737 if (range.location == 0)
1738 value = CFStringCreateWithSubstring(NULL, theString, CFRangeMake(range.length, CFStringGetLength(theString) - range.length));
1739
1740 CFRelease(theString);
1741 }
1742 else
1743 {
1744 CFStringRef theString = CFStringCreateWithSubstring(NULL, kvpair, CFRangeMake(range.length, CFStringGetLength(kvpair) - range.length));
1745 CFMutableStringRef theString2 = CFStringCreateMutableCopy(NULL, 0, theString);
1746 CFRelease(theString);
1747
1748 CFStringTrimWhitespace(theString2);
1749 value = theString2;
1750 }
1751 }
1752 idxx++;
1753 }
1754 idx++;
1755 }
1756
1757 if (kvPairs != NULL)
1758 CFRelease(kvPairs);
1759 return value;
1760 }
1761
1762
1763 /*
1764 * 'cfstr_create_trim()' - Create CFString and trim whitespace characters.
1765 */
1766
1767 CFStringRef cfstr_create_trim(const char *cstr)
1768 {
1769 CFStringRef cfstr;
1770 CFMutableStringRef cfmutablestr = NULL;
1771
1772 if ((cfstr = CFStringCreateWithCString(NULL, cstr, kCFStringEncodingUTF8)) != NULL)
1773 {
1774 if ((cfmutablestr = CFStringCreateMutableCopy(NULL, 1024, cfstr)) != NULL)
1775 CFStringTrimWhitespace(cfmutablestr);
1776
1777 CFRelease(cfstr);
1778 }
1779 return (CFStringRef) cfmutablestr;
1780 }
1781
1782
1783 #pragma mark -
1784 /*
1785 * 'parse_options()' - Parse URI options.
1786 */
1787
1788 static void parse_options(char *options,
1789 char *serial,
1790 int serial_size,
1791 UInt32 *location,
1792 Boolean *wait_eof)
1793 {
1794 char sep, /* Separator character */
1795 *name, /* Name of option */
1796 *value; /* Value of option */
1797
1798
1799 if (serial)
1800 *serial = '\0';
1801 if (location)
1802 *location = 0;
1803
1804 if (!options)
1805 return;
1806
1807 while (*options)
1808 {
1809 /*
1810 * Get the name...
1811 */
1812
1813 name = options;
1814
1815 while (*options && *options != '=' && *options != '+' && *options != '&')
1816 options ++;
1817
1818 if ((sep = *options) != '\0')
1819 *options++ = '\0';
1820
1821 if (sep == '=')
1822 {
1823 /*
1824 * Get the value...
1825 */
1826
1827 value = options;
1828
1829 while (*options && *options != '+' && *options != '&')
1830 options ++;
1831
1832 if (*options)
1833 *options++ = '\0';
1834 }
1835 else
1836 value = (char *)"";
1837
1838 /*
1839 * Process the option...
1840 */
1841
1842 if (!strcasecmp(name, "waiteof"))
1843 {
1844 if (!strcasecmp(value, "on") ||
1845 !strcasecmp(value, "yes") ||
1846 !strcasecmp(value, "true"))
1847 *wait_eof = true;
1848 else if (!strcasecmp(value, "off") ||
1849 !strcasecmp(value, "no") ||
1850 !strcasecmp(value, "false"))
1851 *wait_eof = false;
1852 else
1853 _cupsLangPrintFilter(stderr, "WARNING",
1854 _("Boolean expected for waiteof option \"%s\"."),
1855 value);
1856 }
1857 else if (!strcasecmp(name, "serial"))
1858 strlcpy(serial, value, serial_size);
1859 else if (!strcasecmp(name, "location") && location)
1860 *location = strtol(value, NULL, 16);
1861 }
1862 }
1863
1864
1865 /*!
1866 * @function setup_cfLanguage
1867 * @abstract Convert the contents of the CUPS 'APPLE_LANGUAGE' environment
1868 * variable into a one element CF array of languages.
1869 *
1870 * @discussion Each submitted job comes with a natural language. CUPS passes
1871 * that language in an environment variable. We take that language
1872 * and jam it into the AppleLanguages array so that CF will use
1873 * it when reading localized resources. We need to do this before
1874 * any CF code reads and caches the languages array, so this function
1875 * should be called early in main()
1876 */
1877 static void setup_cfLanguage(void)
1878 {
1879 CFStringRef lang[1] = {NULL};
1880 CFArrayRef langArray = NULL;
1881 const char *requestedLang = NULL;
1882
1883 if ((requestedLang = getenv("APPLE_LANGUAGE")) == NULL)
1884 requestedLang = getenv("LANG");
1885
1886 if (requestedLang != NULL)
1887 {
1888 lang[0] = CFStringCreateWithCString(kCFAllocatorDefault, requestedLang, kCFStringEncodingUTF8);
1889 langArray = CFArrayCreate(kCFAllocatorDefault, (const void **)lang, sizeof(lang) / sizeof(lang[0]), &kCFTypeArrayCallBacks);
1890
1891 CFPreferencesSetValue(CFSTR("AppleLanguages"), langArray, kCFPreferencesCurrentApplication, kCFPreferencesAnyUser, kCFPreferencesAnyHost);
1892 fprintf(stderr, "DEBUG: usb: AppleLanguages=\"%s\"\n", requestedLang);
1893
1894 CFRelease(lang[0]);
1895 CFRelease(langArray);
1896 }
1897 else
1898 fputs("DEBUG: usb: LANG and APPLE_LANGUAGE environment variables missing.\n", stderr);
1899 }
1900
1901 #pragma mark -
1902 #if defined(__i386__) || defined(__x86_64__)
1903 /*!
1904 * @function run_legacy_backend
1905 *
1906 * @abstract Starts child backend process running as a ppc or i386 executable.
1907 *
1908 * @result Never returns; always calls exit().
1909 *
1910 * @discussion
1911 */
1912 static void run_legacy_backend(int argc,
1913 char *argv[],
1914 int fd)
1915 {
1916 int i;
1917 int exitstatus = 0;
1918 int childstatus;
1919 pid_t waitpid_status;
1920 char *my_argv[32];
1921 char *usb_legacy_status;
1922
1923 /*
1924 * If we're running as x86_64 or i386 and couldn't load the class driver
1925 * (because it's ppc or i386), then try to re-exec ourselves in ppc or i386
1926 * mode to try again. If we don't have a ppc or i386 architecture we may be
1927 * running with the same architecture again so guard against this by setting
1928 * and testing an environment variable...
1929 */
1930
1931 # ifdef __x86_64__
1932 usb_legacy_status = getenv("USB_I386_STATUS");
1933 # else
1934 usb_legacy_status = getenv("USB_PPC_STATUS");
1935 # endif /* __x86_64__ */
1936
1937 if (!usb_legacy_status)
1938 {
1939 /*
1940 * Setup a SIGTERM handler then block it before forking...
1941 */
1942
1943 int err; /* posix_spawn result */
1944 struct sigaction action; /* POSIX signal action */
1945 sigset_t newmask, /* New signal mask */
1946 oldmask; /* Old signal mask */
1947 char usbpath[1024]; /* Path to USB backend */
1948 const char *cups_serverbin;/* Path to CUPS binaries */
1949
1950
1951 memset(&action, 0, sizeof(action));
1952 sigaddset(&action.sa_mask, SIGTERM);
1953 action.sa_handler = sigterm_handler;
1954 sigaction(SIGTERM, &action, NULL);
1955
1956 sigemptyset(&newmask);
1957 sigaddset(&newmask, SIGTERM);
1958 sigprocmask(SIG_BLOCK, &newmask, &oldmask);
1959
1960 /*
1961 * Set the environment variable...
1962 */
1963
1964 # ifdef __x86_64__
1965 setenv("USB_I386_STATUS", "1", false);
1966 # else
1967 setenv("USB_PPC_STATUS", "1", false);
1968 # endif /* __x86_64__ */
1969
1970 /*
1971 * Tell the kernel to use the specified CPU architecture...
1972 */
1973
1974 # ifdef __x86_64__
1975 cpu_type_t cpu = CPU_TYPE_I386;
1976 # else
1977 cpu_type_t cpu = CPU_TYPE_POWERPC;
1978 # endif /* __x86_64__ */
1979 size_t ocount = 1;
1980 posix_spawnattr_t attrs;
1981
1982 if (!posix_spawnattr_init(&attrs))
1983 {
1984 posix_spawnattr_setsigdefault(&attrs, &oldmask);
1985 if (posix_spawnattr_setbinpref_np(&attrs, 1, &cpu, &ocount) || ocount != 1)
1986 {
1987 # ifdef __x86_64__
1988 perror("DEBUG: Unable to set binary preference to i386");
1989 # else
1990 perror("DEBUG: Unable to set binary preference to ppc");
1991 # endif /* __x86_64__ */
1992 _cupsLangPrintFilter(stderr, "ERROR",
1993 _("Unable to use legacy USB class driver."));
1994 exit(CUPS_BACKEND_STOP);
1995 }
1996 }
1997
1998 /*
1999 * Set up the arguments and call posix_spawn...
2000 */
2001
2002 if ((cups_serverbin = getenv("CUPS_SERVERBIN")) == NULL)
2003 cups_serverbin = CUPS_SERVERBIN;
2004 snprintf(usbpath, sizeof(usbpath), "%s/backend/usb", cups_serverbin);
2005
2006 for (i = 0; i < argc && i < (sizeof(my_argv) / sizeof(my_argv[0])) - 1; i ++)
2007 my_argv[i] = argv[i];
2008
2009 my_argv[i] = NULL;
2010
2011 if ((err = posix_spawn(&child_pid, usbpath, NULL, &attrs, my_argv,
2012 environ)) != 0)
2013 {
2014 fprintf(stderr, "DEBUG: Unable to exec %s: %s\n", usbpath,
2015 strerror(err));
2016 _cupsLangPrintFilter(stderr, "ERROR",
2017 _("Unable to use legacy USB class driver."));
2018 exit(CUPS_BACKEND_STOP);
2019 }
2020
2021 /*
2022 * Unblock signals...
2023 */
2024
2025 sigprocmask(SIG_SETMASK, &oldmask, NULL);
2026
2027 /*
2028 * Close the fds we won't be using then wait for the child backend to exit.
2029 */
2030
2031 close(fd);
2032 close(1);
2033
2034 fprintf(stderr, "DEBUG: Started usb(legacy) backend (PID %d)\n",
2035 (int)child_pid);
2036
2037 while ((waitpid_status = waitpid(child_pid, &childstatus, 0)) == (pid_t)-1 && errno == EINTR)
2038 usleep(1000);
2039
2040 if (WIFSIGNALED(childstatus))
2041 {
2042 exitstatus = CUPS_BACKEND_STOP;
2043 fprintf(stderr, "DEBUG: usb(legacy) backend %d crashed on signal %d\n",
2044 child_pid, WTERMSIG(childstatus));
2045 }
2046 else
2047 {
2048 if ((exitstatus = WEXITSTATUS(childstatus)) != 0)
2049 fprintf(stderr,
2050 "DEBUG: usb(legacy) backend %d stopped with status %d\n",
2051 child_pid, exitstatus);
2052 else
2053 fprintf(stderr, "DEBUG: usb(legacy) backend %d exited with no errors\n",
2054 child_pid);
2055 }
2056 }
2057 else
2058 {
2059 fputs("DEBUG: usb(legacy) backend running native again\n", stderr);
2060 exitstatus = CUPS_BACKEND_STOP;
2061 }
2062
2063 exit(exitstatus);
2064 }
2065 #endif /* __i386__ || __x86_64__ */
2066
2067
2068 /*
2069 * 'sigterm_handler()' - SIGTERM handler.
2070 */
2071
2072 static void
2073 sigterm_handler(int sig) /* I - Signal */
2074 {
2075 #if defined(__i386__) || defined(__x86_64__)
2076 /*
2077 * If we started a child process pass the signal on to it...
2078 */
2079
2080 if (child_pid)
2081 {
2082 /*
2083 * If we started a child process pass the signal on to it...
2084 */
2085
2086 int status;
2087
2088 kill(child_pid, sig);
2089 while (waitpid(child_pid, &status, 0) < 0 && errno == EINTR);
2090
2091 if (WIFEXITED(status))
2092 exit(WEXITSTATUS(status));
2093 else if (status == SIGTERM || status == SIGKILL)
2094 exit(0);
2095 else
2096 {
2097 fprintf(stderr, "DEBUG: Child crashed on signal %d\n", status);
2098 exit(CUPS_BACKEND_STOP);
2099 }
2100 }
2101 #endif /* __i386__ || __x86_64__ */
2102 }
2103
2104
2105 #ifdef PARSE_PS_ERRORS
2106 /*
2107 * 'next_line()' - Find the next line in a buffer.
2108 */
2109
2110 static const char *next_line (const char *buffer)
2111 {
2112 const char *cptr, *lptr = NULL;
2113
2114 for (cptr = buffer; *cptr && lptr == NULL; cptr++)
2115 if (*cptr == '\n' || *cptr == '\r')
2116 lptr = cptr;
2117 return lptr;
2118 }
2119
2120
2121 /*
2122 * 'parse_pserror()' - Scan the backchannel data for postscript errors.
2123 */
2124
2125 static void parse_pserror(char *sockBuffer,
2126 int len)
2127 {
2128 static char gErrorBuffer[1024] = "";
2129 static char *gErrorBufferPtr = gErrorBuffer;
2130 static char *gErrorBufferEndPtr = gErrorBuffer + sizeof(gErrorBuffer);
2131
2132 char *pCommentBegin, *pCommentEnd, *pLineEnd;
2133 char *logLevel;
2134 char logstr[1024];
2135 int logstrlen;
2136
2137 if (gErrorBufferPtr + len > gErrorBufferEndPtr - 1)
2138 gErrorBufferPtr = gErrorBuffer;
2139 if (len > sizeof(gErrorBuffer) - 1)
2140 len = sizeof(gErrorBuffer) - 1;
2141
2142 memcpy(gErrorBufferPtr, (const void *)sockBuffer, len);
2143 gErrorBufferPtr += len;
2144 *(gErrorBufferPtr + 1) = '\0';
2145
2146 pLineEnd = (char *)next_line((const char *)gErrorBuffer);
2147 while (pLineEnd != NULL)
2148 {
2149 *pLineEnd++ = '\0';
2150
2151 pCommentBegin = strstr(gErrorBuffer,"%%[");
2152 pCommentEnd = strstr(gErrorBuffer, "]%%");
2153 if (pCommentBegin != gErrorBuffer && pCommentEnd != NULL)
2154 {
2155 pCommentEnd += 3; /* Skip past "]%%" */
2156 *pCommentEnd = '\0'; /* There's always room for the nul */
2157
2158 if (strncasecmp(pCommentBegin, "%%[ Error:", 10) == 0)
2159 logLevel = "DEBUG";
2160 else if (strncasecmp(pCommentBegin, "%%[ Flushing", 12) == 0)
2161 logLevel = "DEBUG";
2162 else
2163 logLevel = "INFO";
2164
2165 if ((logstrlen = snprintf(logstr, sizeof(logstr), "%s: %s\n", logLevel, pCommentBegin)) >= sizeof(logstr))
2166 {
2167 /* If the string was trucnated make sure it has a linefeed before the nul */
2168 logstrlen = sizeof(logstr) - 1;
2169 logstr[logstrlen - 1] = '\n';
2170 }
2171 write(STDERR_FILENO, logstr, logstrlen);
2172 }
2173
2174 /* move everything over... */
2175 strcpy(gErrorBuffer, pLineEnd);
2176 gErrorBufferPtr = gErrorBuffer;
2177 pLineEnd = (char *)next_line((const char *)gErrorBuffer);
2178 }
2179 }
2180 #endif /* PARSE_PS_ERRORS */
2181
2182
2183 /*
2184 * 'soft_reset()' - Send a soft reset to the device.
2185 */
2186
2187 static void soft_reset()
2188 {
2189 fd_set input_set; /* Input set for select() */
2190 struct timeval stimeout; /* Timeout for select() */
2191 char buffer[2048]; /* Buffer */
2192 struct timespec cond_timeout; /* pthread condition timeout */
2193
2194 /*
2195 * Send an abort once a second until the I/O lock is released by the main thread...
2196 */
2197
2198 pthread_mutex_lock(&g.readwrite_lock_mutex);
2199 while (g.readwrite_lock)
2200 {
2201 (*g.classdriver)->Abort(g.classdriver);
2202
2203 cond_timeout.tv_sec = time(NULL) + 1;
2204 cond_timeout.tv_nsec = 0;
2205
2206 pthread_cond_timedwait(&g.readwrite_lock_cond, &g.readwrite_lock_mutex, &cond_timeout);
2207 }
2208
2209 g.readwrite_lock = 1;
2210 pthread_mutex_unlock(&g.readwrite_lock_mutex);
2211
2212 /*
2213 * Flush bytes waiting on print_fd...
2214 */
2215
2216 g.print_bytes = 0;
2217
2218 FD_ZERO(&input_set);
2219 FD_SET(g.print_fd, &input_set);
2220
2221 stimeout.tv_sec = 0;
2222 stimeout.tv_usec = 0;
2223
2224 while (select(g.print_fd+1, &input_set, NULL, NULL, &stimeout) > 0)
2225 if (read(g.print_fd, buffer, sizeof(buffer)) <= 0)
2226 break;
2227
2228 /*
2229 * Send the reset...
2230 */
2231
2232 (*g.classdriver)->SoftReset(g.classdriver, DEFAULT_TIMEOUT);
2233
2234 /*
2235 * Release the I/O lock...
2236 */
2237
2238 pthread_mutex_lock(&g.readwrite_lock_mutex);
2239 g.readwrite_lock = 0;
2240 pthread_cond_signal(&g.readwrite_lock_cond);
2241 pthread_mutex_unlock(&g.readwrite_lock_mutex);
2242 }
2243
2244
2245 /*
2246 * 'get_device_id()' - Return IEEE-1284 device ID.
2247 */
2248
2249 static void get_device_id(cups_sc_status_t *status,
2250 char *data,
2251 int *datalen)
2252 {
2253 CFStringRef deviceIDString = NULL;
2254
2255 /* GetDeviceID */
2256 copy_deviceid(g.classdriver, &deviceIDString);
2257
2258 if (deviceIDString)
2259 {
2260 CFStringGetCString(deviceIDString, data, *datalen, kCFStringEncodingUTF8);
2261 *datalen = strlen(data);
2262 CFRelease(deviceIDString);
2263 }
2264 *status = CUPS_SC_STATUS_OK;
2265 }
2266
2267
2268 /*
2269 * End of "$Id: usb-darwin.c 7953 2008-09-17 01:43:19Z mike $".
2270 */