]> git.ipfire.org Git - thirdparty/cups.git/blob - cups/emit.c
Load cups into easysw/current.
[thirdparty/cups.git] / cups / emit.c
1 /*
2 * "$Id: emit.c 5934 2006-09-11 14:54:40Z mike $"
3 *
4 * PPD code emission routines for the Common UNIX Printing System (CUPS).
5 *
6 * Copyright 1997-2006 by Easy Software Products, all rights reserved.
7 *
8 * These coded instructions, statements, and computer programs are the
9 * property of Easy Software Products and are protected by Federal
10 * copyright law. Distribution and use rights are outlined in the file
11 * "LICENSE.txt" which should have been included with this file. If this
12 * file is missing or damaged please contact Easy Software Products
13 * at:
14 *
15 * Attn: CUPS Licensing Information
16 * Easy Software Products
17 * 44141 Airport View Drive, Suite 204
18 * Hollywood, Maryland 20636 USA
19 *
20 * Voice: (301) 373-9600
21 * EMail: cups-info@cups.org
22 * WWW: http://www.cups.org
23 *
24 * PostScript is a trademark of Adobe Systems, Inc.
25 *
26 * This file is subject to the Apple OS-Developed Software exception.
27 *
28 * Contents:
29 *
30 * ppdCollect() - Collect all marked options that reside in the
31 * specified section.
32 * ppdCollect2() - Collect all marked options that reside in the
33 * specified section and minimum order.
34 * ppdEmit() - Emit code for marked options to a file.
35 * ppdEmitAfterOrder() - Emit a subset of the code for marked options to a
36 * file.
37 * ppdEmitFd() - Emit code for marked options to a file.
38 * ppdEmitJCL() - Emit code for JCL options to a file.
39 * ppdEmitJCLEnd() - Emit JCLEnd code to a file.
40 * ppdEmitString() - Get a string containing the code for marked options.
41 * ppd_handle_media() - Handle media selection...
42 * ppd_sort() - Sort options by ordering numbers...
43 */
44
45 /*
46 * Include necessary headers...
47 */
48
49 #include "ppd.h"
50 #include <stdlib.h>
51 #include "string.h"
52 #include <errno.h>
53 #include "debug.h"
54
55 #if defined(WIN32) || defined(__EMX__)
56 # include <io.h>
57 #else
58 # include <unistd.h>
59 #endif /* WIN32 || __EMX__ */
60
61
62 /*
63 * Local functions...
64 */
65
66 static void ppd_handle_media(ppd_file_t *ppd);
67 static int ppd_sort(ppd_choice_t **c1, ppd_choice_t **c2);
68
69
70 /*
71 * Local globals...
72 */
73
74 static const char ppd_custom_code[] =
75 "pop pop pop\n"
76 "<</PageSize[5 -2 roll]/ImagingBBox null>>setpagedevice\n";
77
78
79 /*
80 * 'ppdCollect()' - Collect all marked options that reside in the specified
81 * section.
82 */
83
84 int /* O - Number of options marked */
85 ppdCollect(ppd_file_t *ppd, /* I - PPD file data */
86 ppd_section_t section, /* I - Section to collect */
87 ppd_choice_t ***choices) /* O - Pointers to choices */
88 {
89 return (ppdCollect2(ppd, section, 0.0, choices));
90 }
91
92
93 /*
94 * 'ppdCollect2()' - Collect all marked options that reside in the
95 * specified section and minimum order.
96 *
97 * @since CUPS 1.2@
98 */
99
100 int /* O - Number of options marked */
101 ppdCollect2(ppd_file_t *ppd, /* I - PPD file data */
102 ppd_section_t section, /* I - Section to collect */
103 float min_order, /* I - Minimum OrderDependency value */
104 ppd_choice_t ***choices) /* O - Pointers to choices */
105 {
106 int i, j, k, m; /* Looping vars */
107 ppd_group_t *g, /* Current group */
108 *sg; /* Current sub-group */
109 ppd_option_t *o; /* Current option */
110 ppd_choice_t *c; /* Current choice */
111 int count; /* Number of choices collected */
112 ppd_choice_t **collect; /* Collected choices */
113
114
115 DEBUG_printf(("ppdCollect2(ppd=%p, section=%d, min_order=%f, choices=%p)\n",
116 ppd, section, min_order, choices));
117
118 if (ppd == NULL)
119 return (0);
120
121 /*
122 * Allocate memory for up to 1000 selected choices...
123 */
124
125 count = 0;
126 collect = calloc(sizeof(ppd_choice_t *), 1000);
127
128 /*
129 * Loop through all options and add choices as needed...
130 */
131
132 for (i = ppd->num_groups, g = ppd->groups; i > 0; i --, g ++)
133 {
134 for (j = g->num_options, o = g->options; j > 0; j --, o ++)
135 if (o->section == section && o->order >= min_order)
136 for (k = o->num_choices, c = o->choices; k > 0; k --, c ++)
137 if (c->marked && count < 1000)
138 {
139 DEBUG_printf(("ppdCollect2: %s=%s marked...\n", o->keyword,
140 c->choice));
141 collect[count] = c;
142 count ++;
143 }
144
145 for (j = g->num_subgroups, sg = g->subgroups; j > 0; j --, sg ++)
146 for (k = sg->num_options, o = sg->options; k > 0; k --, o ++)
147 if (o->section == section && o->order >= min_order)
148 for (m = o->num_choices, c = o->choices; m > 0; m --, c ++)
149 if (c->marked && count < 1000)
150 {
151 DEBUG_printf(("ppdCollect2: %s=%s marked...\n", o->keyword,
152 c->choice));
153 collect[count] = c;
154 count ++;
155 }
156 }
157
158 /*
159 * If we have more than 1 marked choice, sort them...
160 */
161
162 if (count > 1)
163 qsort(collect, count, sizeof(ppd_choice_t *),
164 (int (*)(const void *, const void *))ppd_sort);
165
166 DEBUG_printf(("ppdCollect2: %d marked choices...\n", count));
167
168 /*
169 * Return the array and number of choices; if 0, free the array since
170 * it isn't needed.
171 */
172
173 if (count > 0)
174 {
175 *choices = collect;
176 return (count);
177 }
178 else
179 {
180 *choices = NULL;
181 free(collect);
182 return (0);
183 }
184 }
185
186
187 /*
188 * 'ppdEmit()' - Emit code for marked options to a file.
189 */
190
191 int /* O - 0 on success, -1 on failure */
192 ppdEmit(ppd_file_t *ppd, /* I - PPD file record */
193 FILE *fp, /* I - File to write to */
194 ppd_section_t section) /* I - Section to write */
195 {
196 return (ppdEmitAfterOrder(ppd, fp, section, 0, 0.0));
197 }
198
199
200 /*
201 * 'ppdEmitAfterOrder()' - Emit a subset of the code for marked options to a file.
202 *
203 * When "limit" is non-zero, this function only emits options whose
204 * OrderDependency value is greater than or equal to "min_order".
205 *
206 * When "limit" is zero, this function is identical to ppdEmit().
207 *
208 * @since CUPS 1.2@
209 */
210
211 int /* O - 0 on success, -1 on failure */
212 ppdEmitAfterOrder(
213 ppd_file_t *ppd, /* I - PPD file record */
214 FILE *fp, /* I - File to write to */
215 ppd_section_t section, /* I - Section to write */
216 int limit, /* I - Non-zero to use min_order */
217 float min_order) /* I - Lowest OrderDependency */
218 {
219 char *buffer; /* Option code */
220 int status; /* Return status */
221
222
223 /*
224 * Range check input...
225 */
226
227 if (!ppd || !fp)
228 return (-1);
229
230 /*
231 * Get the string...
232 */
233
234 buffer = ppdEmitString(ppd, section, min_order);
235
236 /*
237 * Write it as needed and return...
238 */
239
240 if (buffer)
241 {
242 status = fputs(buffer, fp) < 0 ? -1 : 0;
243
244 free(buffer);
245 }
246 else
247 status = 0;
248
249 return (status);
250 }
251
252
253 /*
254 * 'ppdEmitFd()' - Emit code for marked options to a file.
255 */
256
257 int /* O - 0 on success, -1 on failure */
258 ppdEmitFd(ppd_file_t *ppd, /* I - PPD file record */
259 int fd, /* I - File to write to */
260 ppd_section_t section) /* I - Section to write */
261 {
262 char *buffer, /* Option code */
263 *bufptr; /* Pointer into code */
264 size_t buflength; /* Length of option code */
265 ssize_t bytes; /* Bytes written */
266 int status; /* Return status */
267
268
269 /*
270 * Range check input...
271 */
272
273 if (!ppd || fd < 0)
274 return (-1);
275
276 /*
277 * Get the string...
278 */
279
280 buffer = ppdEmitString(ppd, section, 0.0);
281
282 /*
283 * Write it as needed and return...
284 */
285
286 if (buffer)
287 {
288 buflength = strlen(buffer);
289 bufptr = buffer;
290 bytes = 0;
291
292 while (buflength > 0)
293 {
294 if ((bytes = write(fd, bufptr, buflength)) < 0)
295 {
296 if (errno == EAGAIN || errno == EINTR)
297 continue;
298
299 break;
300 }
301
302 buflength -= bytes;
303 bufptr += bytes;
304 }
305
306 status = bytes < 0 ? -1 : 0;
307
308 free(buffer);
309 }
310 else
311 status = 0;
312
313 return (status);
314 }
315
316
317 /*
318 * 'ppdEmitJCL()' - Emit code for JCL options to a file.
319 */
320
321 int /* O - 0 on success, -1 on failure */
322 ppdEmitJCL(ppd_file_t *ppd, /* I - PPD file record */
323 FILE *fp, /* I - File to write to */
324 int job_id, /* I - Job ID */
325 const char *user, /* I - Username */
326 const char *title) /* I - Title */
327 {
328 char *ptr; /* Pointer into JCL string */
329 char temp[81]; /* Local title string */
330
331
332 /*
333 * Range check the input...
334 */
335
336 if (!ppd || !ppd->jcl_begin || !ppd->jcl_ps)
337 return (0);
338
339 /*
340 * See if the printer supports HP PJL...
341 */
342
343 if (!strncmp(ppd->jcl_begin, "\033%-12345X@", 10))
344 {
345 /*
346 * This printer uses HP PJL commands for output; filter the output
347 * so that we only have a single "@PJL JOB" command in the header...
348 *
349 * To avoid bugs in the PJL implementation of certain vendors' products
350 * (Xerox in particular), we add a dummy "@PJL" command at the beginning
351 * of the PJL commands to initialize PJL processing.
352 */
353
354 fputs("\033%-12345X@PJL\n", fp);
355 for (ptr = ppd->jcl_begin + 9; *ptr;)
356 if (!strncmp(ptr, "@PJL JOB", 8))
357 {
358 /*
359 * Skip job command...
360 */
361
362 for (;*ptr; ptr ++)
363 if (*ptr == '\n')
364 break;
365
366 if (*ptr)
367 ptr ++;
368 }
369 else
370 {
371 /*
372 * Copy line...
373 */
374
375 for (;*ptr; ptr ++)
376 {
377 putc(*ptr, fp);
378 if (*ptr == '\n')
379 break;
380 }
381
382 if (*ptr)
383 ptr ++;
384 }
385
386 /*
387 * Eliminate any path info from the job title...
388 */
389
390 if ((ptr = strrchr(title, '/')) != NULL)
391 title = ptr + 1;
392
393 /*
394 * Replace double quotes with single quotes and 8-bit characters with
395 * question marks so that the title does not cause a PJL syntax error.
396 */
397
398 strlcpy(temp, title, sizeof(temp));
399
400 for (ptr = temp; *ptr; ptr ++)
401 if (*ptr == '\"')
402 *ptr = '\'';
403 else if (*ptr & 128)
404 *ptr = '?';
405
406 /*
407 * Send PJL JOB and PJL RDYMSG commands before we enter PostScript mode...
408 */
409
410 fprintf(fp, "@PJL JOB NAME = \"%s\" DISPLAY = \"%d %s %s\"\n", temp,
411 job_id, user, temp);
412 fprintf(fp, "@PJL RDYMSG DISPLAY = \"%d %s %s\"\n", job_id, user, temp);
413 }
414 else
415 fputs(ppd->jcl_begin, fp);
416
417 ppdEmit(ppd, fp, PPD_ORDER_JCL);
418 fputs(ppd->jcl_ps, fp);
419
420 return (0);
421 }
422
423
424 /*
425 * 'ppdEmitJCLEnd()' - Emit JCLEnd code to a file.
426 *
427 * @since CUPS 1.2@
428 */
429
430 int /* O - 0 on success, -1 on failure */
431 ppdEmitJCLEnd(ppd_file_t *ppd, /* I - PPD file record */
432 FILE *fp) /* I - File to write to */
433 {
434 /*
435 * Range check the input...
436 */
437
438 if (!ppd)
439 return (0);
440
441 if (!ppd->jcl_end)
442 {
443 if (ppd->num_filters == 0)
444 putc(0x04, fp);
445
446 return (0);
447 }
448
449 /*
450 * See if the printer supports HP PJL...
451 */
452
453 if (!strncmp(ppd->jcl_end, "\033%-12345X@", 10))
454 {
455 /*
456 * This printer uses HP PJL commands for output; filter the output
457 * so that we only have a single "@PJL JOB" command in the header...
458 *
459 * To avoid bugs in the PJL implementation of certain vendors' products
460 * (Xerox in particular), we add a dummy "@PJL" command at the beginning
461 * of the PJL commands to initialize PJL processing.
462 */
463
464 fputs("\033%-12345X@PJL\n", fp);
465 fputs("@PJL RDYMSG DISPLAY = \"READY\"\n", fp);
466 fputs(ppd->jcl_end + 9, fp);
467 }
468 else
469 fputs(ppd->jcl_end, fp);
470
471 return (0);
472 }
473
474
475 /*
476 * 'ppdEmitString()' - Get a string containing the code for marked options.
477 *
478 * When "min_order" is greater than zero, this function only includes options
479 * whose OrderDependency value is greater than or equal to "min_order".
480 * Otherwise, all options in the specified section are included in the
481 * returned string.
482 *
483 * The return string is allocated on the heap and should be freed using
484 * free() when you are done with it.
485 *
486 * @since CUPS 1.2@
487 */
488
489 char * /* O - String containing option code */
490 ppdEmitString(ppd_file_t *ppd, /* I - PPD file record */
491 ppd_section_t section, /* I - Section to write */
492 float min_order) /* I - Lowest OrderDependency */
493 {
494 int i, j, /* Looping vars */
495 count; /* Number of choices */
496 ppd_choice_t **choices; /* Choices */
497 ppd_size_t *size; /* Custom page size */
498 ppd_coption_t *coption; /* Custom option */
499 ppd_cparam_t *cparam; /* Custom parameter */
500 size_t bufsize; /* Size of string buffer needed */
501 char *buffer, /* String buffer */
502 *bufptr, /* Pointer into buffer */
503 *bufend; /* End of buffer */
504 struct lconv *loc; /* Locale data */
505
506
507 DEBUG_printf(("ppdEmitString(ppd=%p, section=%d, min_order=%f)\n",
508 ppd, section, min_order));
509
510 /*
511 * Range check input...
512 */
513
514 if (!ppd)
515 return (NULL);
516
517 /*
518 * Use PageSize or PageRegion as required...
519 */
520
521 ppd_handle_media(ppd);
522
523 /*
524 * Collect the options we need to emit...
525 */
526
527 if ((count = ppdCollect2(ppd, section, min_order, &choices)) == 0)
528 return (NULL);
529
530 /*
531 * Count the number of bytes that are required to hold all of the
532 * option code...
533 */
534
535 for (i = 0, bufsize = 1; i < count; i ++)
536 {
537 if (section != PPD_ORDER_EXIT && section != PPD_ORDER_JCL)
538 {
539 bufsize += 3; /* [{\n */
540
541 if ((!strcasecmp(choices[i]->option->keyword, "PageSize") ||
542 !strcasecmp(choices[i]->option->keyword, "PageRegion")) &&
543 !strcasecmp(choices[i]->choice, "Custom"))
544 {
545 DEBUG_puts("ppdEmitString: Custom size set!");
546
547 bufsize += 37; /* %%BeginFeature: *CustomPageSize True\n */
548 bufsize += 50; /* Five 9-digit numbers + newline */
549 }
550 else if (!strcasecmp(choices[i]->choice, "Custom") &&
551 (coption = ppdFindCustomOption(ppd,
552 choices[i]->option->keyword))
553 != NULL)
554 {
555 bufsize += 17 + strlen(choices[i]->option->keyword) + 6;
556 /* %%BeginFeature: *keyword True\n */
557
558
559 for (cparam = (ppd_cparam_t *)cupsArrayFirst(coption->params);
560 cparam;
561 cparam = (ppd_cparam_t *)cupsArrayNext(coption->params))
562 {
563 switch (cparam->type)
564 {
565 case PPD_CUSTOM_CURVE :
566 case PPD_CUSTOM_INVCURVE :
567 case PPD_CUSTOM_POINTS :
568 case PPD_CUSTOM_REAL :
569 case PPD_CUSTOM_INT :
570 bufsize += 10;
571 break;
572
573 case PPD_CUSTOM_PASSCODE :
574 case PPD_CUSTOM_PASSWORD :
575 case PPD_CUSTOM_STRING :
576 bufsize += 3 + 4 * strlen(cparam->current.custom_string);
577 break;
578 }
579 }
580 }
581 else
582 bufsize += 17 + strlen(choices[i]->option->keyword) + 1 +
583 strlen(choices[i]->choice) + 1;
584 /* %%BeginFeature: *keyword choice\n */
585
586 bufsize += 13; /* %%EndFeature\n */
587 bufsize += 22; /* } stopped cleartomark\n */
588 }
589
590 if (choices[i]->code)
591 bufsize += strlen(choices[i]->code) + 1;
592 else
593 bufsize += strlen(ppd_custom_code);
594 }
595
596 /*
597 * Allocate memory...
598 */
599
600 DEBUG_printf(("ppdEmitString: Allocating %d bytes for string...\n", bufsize));
601
602 if ((buffer = calloc(1, bufsize)) == NULL)
603 {
604 free(choices);
605 return (NULL);
606 }
607
608 bufend = buffer + bufsize - 1;
609 loc = localeconv();
610
611 /*
612 * Copy the option code to the buffer...
613 */
614
615 for (i = 0, bufptr = buffer; i < count; i ++, bufptr += strlen(bufptr))
616 if (section != PPD_ORDER_EXIT && section != PPD_ORDER_JCL)
617 {
618 /*
619 * Add wrapper commands to prevent printer errors for unsupported
620 * options...
621 */
622
623 strlcpy(bufptr, "[{\n", bufend - bufptr + 1);
624 bufptr += 3;
625
626 /*
627 * Send DSC comments with option...
628 */
629
630 DEBUG_printf(("Adding code for %s=%s...\n", choices[i]->option->keyword,
631 choices[i]->choice));
632
633 if ((!strcasecmp(choices[i]->option->keyword, "PageSize") ||
634 !strcasecmp(choices[i]->option->keyword, "PageRegion")) &&
635 !strcasecmp(choices[i]->choice, "Custom"))
636 {
637 /*
638 * Variable size; write out standard size options, using the
639 * parameter positions defined in the PPD file...
640 */
641
642 ppd_attr_t *attr; /* PPD attribute */
643 int pos, /* Position of custom value */
644 orientation; /* Orientation to use */
645 float values[5]; /* Values for custom command */
646
647
648 strlcpy(bufptr, "%%BeginFeature: *CustomPageSize True\n",
649 bufend - bufptr + 1);
650 bufptr += 37;
651
652 size = ppdPageSize(ppd, "Custom");
653
654 memset(values, 0, sizeof(values));
655
656 if ((attr = ppdFindAttr(ppd, "ParamCustomPageSize", "Width")) != NULL)
657 {
658 pos = atoi(attr->value) - 1;
659
660 if (pos < 0 || pos > 4)
661 pos = 0;
662 }
663 else
664 pos = 0;
665
666 values[pos] = size->width;
667
668 if ((attr = ppdFindAttr(ppd, "ParamCustomPageSize", "Height")) != NULL)
669 {
670 pos = atoi(attr->value) - 1;
671
672 if (pos < 0 || pos > 4)
673 pos = 1;
674 }
675 else
676 pos = 1;
677
678 values[pos] = size->length;
679
680 /*
681 * According to the Adobe PPD specification, an orientation of 1
682 * will produce a print that comes out upside-down with the X
683 * axis perpendicular to the direction of feed, which is exactly
684 * what we want to be consistent with non-PS printers.
685 *
686 * We could also use an orientation of 3 to produce output that
687 * comes out rightside-up (this is the default for many large format
688 * printer PPDs), however for consistency we will stick with the
689 * value 1.
690 *
691 * If we wanted to get fancy, we could use orientations of 0 or
692 * 2 and swap the width and length, however we don't want to get
693 * fancy, we just want it to work consistently.
694 *
695 * The orientation value is range limited by the Orientation
696 * parameter definition, so certain non-PS printer drivers that
697 * only support an Orientation of 0 will get the value 0 as
698 * expected.
699 */
700
701 orientation = 1;
702
703 if ((attr = ppdFindAttr(ppd, "ParamCustomPageSize",
704 "Orientation")) != NULL)
705 {
706 int min_orient, max_orient; /* Minimum and maximum orientations */
707
708
709 if (sscanf(attr->value, "%d%*s%d%d", &pos, &min_orient,
710 &max_orient) != 3)
711 pos = 4;
712 else
713 {
714 pos --;
715
716 if (pos < 0 || pos > 4)
717 pos = 4;
718
719 if (orientation > max_orient)
720 orientation = max_orient;
721 else if (orientation < min_orient)
722 orientation = min_orient;
723 }
724 }
725 else
726 pos = 4;
727
728 values[pos] = orientation;
729
730 for (pos = 0; pos < 5; pos ++)
731 {
732 bufptr = _cupsStrFormatd(bufptr, bufend, values[pos], loc);
733 *bufptr++ = '\n';
734 }
735
736 if (!choices[i]->code)
737 {
738 /*
739 * This can happen with certain buggy PPD files that don't include
740 * a CustomPageSize command sequence... We just use a generic
741 * Level 2 command sequence...
742 */
743
744 strlcpy(bufptr, ppd_custom_code, bufend - bufptr + 1);
745 bufptr += strlen(bufptr);
746 }
747 }
748 else if (!strcasecmp(choices[i]->choice, "Custom") &&
749 (coption = ppdFindCustomOption(ppd,
750 choices[i]->option->keyword))
751 != NULL)
752 {
753 /*
754 * Custom option...
755 */
756
757 const char *s; /* Pointer into string value */
758
759
760 snprintf(bufptr, bufend - bufptr + 1,
761 "%%%%BeginFeature: *Custom%s True\n", coption->keyword);
762 bufptr += strlen(bufptr);
763
764 for (cparam = (ppd_cparam_t *)cupsArrayFirst(coption->params);
765 cparam;
766 cparam = (ppd_cparam_t *)cupsArrayNext(coption->params))
767 {
768 switch (cparam->type)
769 {
770 case PPD_CUSTOM_CURVE :
771 case PPD_CUSTOM_INVCURVE :
772 case PPD_CUSTOM_POINTS :
773 case PPD_CUSTOM_REAL :
774 bufptr = _cupsStrFormatd(bufptr, bufend,
775 cparam->current.custom_real, loc);
776 *bufptr++ = '\n';
777 break;
778
779 case PPD_CUSTOM_INT :
780 snprintf(bufptr, bufend - bufptr + 1, "%d\n",
781 cparam->current.custom_int);
782 bufptr += strlen(bufptr);
783 break;
784
785 case PPD_CUSTOM_PASSCODE :
786 case PPD_CUSTOM_PASSWORD :
787 case PPD_CUSTOM_STRING :
788 *bufptr++ = '(';
789
790 for (s = cparam->current.custom_string; *s; s ++)
791 if (*s < ' ' || *s == '(' || *s == ')' || *s >= 127)
792 {
793 snprintf(bufptr, bufend - bufptr + 1, "\\%03o", *s & 255);
794 bufptr += strlen(bufptr);
795 }
796 else
797 *bufptr++ = *s;
798
799 *bufptr++ = ')';
800 *bufptr++ = '\n';
801 break;
802 }
803 }
804 }
805 else
806 {
807 snprintf(bufptr, bufend - bufptr + 1, "%%%%BeginFeature: *%s %s\n",
808 choices[i]->option->keyword, choices[i]->choice);
809 bufptr += strlen(bufptr);
810 }
811
812 if (choices[i]->code && choices[i]->code[0])
813 {
814 j = strlen(choices[i]->code);
815 memcpy(bufptr, choices[i]->code, j);
816 bufptr += j;
817
818 if (choices[i]->code[j - 1] != '\n')
819 *bufptr++ = '\n';
820 }
821
822 strlcpy(bufptr, "%%EndFeature\n"
823 "} stopped cleartomark\n", bufend - bufptr + 1);
824 bufptr += strlen(bufptr);
825
826 DEBUG_printf(("ppdEmitString: Offset in string is %d...\n",
827 bufptr - buffer));
828 }
829 else
830 {
831 strlcpy(bufptr, choices[i]->code, bufend - bufptr + 1);
832 bufptr += strlen(bufptr);
833 }
834
835 /*
836 * Nul-terminate, free, and return...
837 */
838
839 *bufptr = '\0';
840
841 free(choices);
842
843 return (buffer);
844 }
845
846
847 /*
848 * 'ppd_handle_media()' - Handle media selection...
849 */
850
851 static void
852 ppd_handle_media(ppd_file_t *ppd)
853 {
854 ppd_choice_t *manual_feed, /* ManualFeed choice, if any */
855 *input_slot, /* InputSlot choice, if any */
856 *page; /* PageSize/PageRegion */
857 ppd_size_t *size; /* Current media size */
858 ppd_attr_t *rpr; /* RequiresPageRegion value */
859
860
861 /*
862 * This function determines if the user has selected a media source
863 * via the InputSlot or ManualFeed options; if so, it marks the
864 * PageRegion option corresponding to the current media size.
865 * Otherwise it marks the PageSize option.
866 */
867
868 if ((size = ppdPageSize(ppd, NULL)) == NULL)
869 return;
870
871 manual_feed = ppdFindMarkedChoice(ppd, "ManualFeed");
872 input_slot = ppdFindMarkedChoice(ppd, "InputSlot");
873
874 if (input_slot != NULL)
875 rpr = ppdFindAttr(ppd, "RequiresPageRegion", input_slot->choice);
876 else
877 rpr = NULL;
878
879 if (!rpr)
880 rpr = ppdFindAttr(ppd, "RequiresPageRegion", "All");
881
882 if (!strcasecmp(size->name, "Custom") || (!manual_feed && !input_slot) ||
883 !((manual_feed && !strcasecmp(manual_feed->choice, "True")) ||
884 (input_slot && input_slot->code && input_slot->code[0])))
885 {
886 /*
887 * Manual feed was not selected and/or the input slot selection does
888 * not contain any PostScript code. Use the PageSize option...
889 */
890
891 ppdMarkOption(ppd, "PageSize", size->name);
892 }
893 else
894 {
895 /*
896 * Manual feed was selected and/or the input slot selection contains
897 * PostScript code. Use the PageRegion option...
898 */
899
900 ppdMarkOption(ppd, "PageRegion", size->name);
901
902 /*
903 * RequiresPageRegion does not apply to manual feed so we need to
904 * check that we are not doing manual feed before unmarking PageRegion.
905 */
906
907 if (!(manual_feed && !strcasecmp(manual_feed->choice, "True")) &&
908 ((rpr && rpr->value && !strcmp(rpr->value, "False")) ||
909 (!rpr && !ppd->num_filters)))
910 {
911 /*
912 * Either the PPD file specifies no PageRegion code or the PPD file
913 * not for a CUPS raster driver and thus defaults to no PageRegion
914 * code... Unmark the PageRegion choice so that we don't output the
915 * code...
916 */
917
918 page = ppdFindMarkedChoice(ppd, "PageRegion");
919
920 if (page)
921 page->marked = 0;
922 }
923 }
924 }
925
926
927 /*
928 * 'ppd_sort()' - Sort options by ordering numbers...
929 */
930
931 static int /* O - -1 if c1 < c2, 0 if equal, 1 otherwise */
932 ppd_sort(ppd_choice_t **c1, /* I - First choice */
933 ppd_choice_t **c2) /* I - Second choice */
934 {
935 if ((*c1)->option->order < (*c2)->option->order)
936 return (-1);
937 else if ((*c1)->option->order > (*c2)->option->order)
938 return (1);
939 else
940 return (0);
941 }
942
943
944 /*
945 * End of "$Id: emit.c 5934 2006-09-11 14:54:40Z mike $".
946 */