1 /*
2  * "lpadmin" command for CUPS.
3  *
4  * Copyright © 2007-2019 by Apple Inc.
5  * Copyright © 1997-2006 by Easy Software Products.
6  *
7  * Licensed under Apache License v2.0.  See the file "LICENSE" for more
8  * information.
9  */
10 
11 /*
12  * Include necessary headers...
13  */
14 
15 #include <cups/cups-private.h>
16 #include <cups/ppd-private.h>
17 
18 
19 /*
20  * Local functions...
21  */
22 
23 static int		add_printer_to_class(http_t *http, char *printer, char *pclass);
24 static int		default_printer(http_t *http, char *printer);
25 static int		delete_printer(http_t *http, char *printer);
26 static int		delete_printer_from_class(http_t *http, char *printer,
27 			                          char *pclass);
28 static int		delete_printer_option(http_t *http, char *printer,
29 			                      char *option);
30 static int		enable_printer(http_t *http, char *printer);
31 static char		*get_printer_ppd(const char *uri, char *buffer, size_t bufsize, int *num_options, cups_option_t **options);
32 static cups_ptype_t	get_printer_type(http_t *http, char *printer, char *uri,
33 			                 size_t urisize);
34 static int		set_printer_options(http_t *http, char *printer,
35 			                    int num_options, cups_option_t *options,
36 					    char *file, int enable);
37 static void		usage(void) _CUPS_NORETURN;
38 static int		validate_name(const char *name);
39 
40 
41 /*
42  * 'main()' - Parse options and configure the scheduler.
43  */
44 
45 int					/* O - Exit status */
main(int argc,char * argv[])46 main(int  argc,				/* I - Number of command-line arguments */
47      char *argv[])			/* I - Command-line arguments */
48 {
49   int		i;			/* Looping var */
50   http_t	*http;			/* Connection to server */
51   char		*printer,		/* Destination printer */
52 		*pclass,		/* Printer class name */
53 		*opt,			/* Option pointer */
54 		*val;			/* Pointer to allow/deny value */
55   int		enable = 0;		/* Enable/resume printer? */
56   int		num_options;		/* Number of options */
57   cups_option_t	*options;		/* Options */
58   char		*file,			/* New PPD file */
59 		evefile[1024] = "";	/* IPP Everywhere PPD */
60   const char	*ppd_name,		/* ppd-name value */
61 		*device_uri;		/* device-uri value */
62 
63 
64   _cupsSetLocale(argv);
65 
66   http        = NULL;
67   printer     = NULL;
68   num_options = 0;
69   options     = NULL;
70   file        = NULL;
71 
72   for (i = 1; i < argc; i ++)
73   {
74     if (!strcmp(argv[i], "--help"))
75       usage();
76     else if (argv[i][0] == '-')
77     {
78       for (opt = argv[i] + 1; *opt; opt ++)
79       {
80 	switch (*opt)
81 	{
82 	  case 'c' : /* Add printer to class */
83 	      if (!http)
84 	      {
85 		http = httpConnect2(cupsServer(), ippPort(), NULL, AF_UNSPEC, cupsEncryption(), 1, 30000, NULL);
86 
87 		if (http == NULL)
88 		{
89 		  _cupsLangPrintf(stderr, _("lpadmin: Unable to connect to server: %s"), strerror(errno));
90 		  return (1);
91 		}
92 	      }
93 
94 	      if (printer == NULL)
95 	      {
96 		_cupsLangPuts(stderr,
97 			      _("lpadmin: Unable to add a printer to the class:\n"
98 				"         You must specify a printer name first."));
99 		return (1);
100 	      }
101 
102 	      if (opt[1] != '\0')
103 	      {
104 		pclass = opt + 1;
105 		opt += strlen(opt) - 1;
106 	      }
107 	      else
108 	      {
109 		i ++;
110 
111 		if (i >= argc)
112 		{
113 		  _cupsLangPuts(stderr, _("lpadmin: Expected class name after \"-c\" option."));
114 		  usage();
115 		}
116 
117 		pclass = argv[i];
118 	      }
119 
120 	      if (!validate_name(pclass))
121 	      {
122 		_cupsLangPuts(stderr,
123 			      _("lpadmin: Class name can only contain printable "
124 				"characters."));
125 		return (1);
126 	      }
127 
128 	      if (add_printer_to_class(http, printer, pclass))
129 		return (1);
130 	      break;
131 
132 	  case 'd' : /* Set as default destination */
133 	      if (!http)
134 	      {
135 		http = httpConnect2(cupsServer(), ippPort(), NULL, AF_UNSPEC, cupsEncryption(), 1, 30000, NULL);
136 
137 		if (http == NULL)
138 		{
139 		  _cupsLangPrintf(stderr, _("lpadmin: Unable to connect to server: %s"), strerror(errno));
140 		  return (1);
141 		}
142 	      }
143 
144 	      if (opt[1] != '\0')
145 	      {
146 		printer = opt + 1;
147 		opt += strlen(opt) - 1;
148 	      }
149 	      else
150 	      {
151 		i ++;
152 
153 		if (i >= argc)
154 		{
155 		  _cupsLangPuts(stderr, _("lpadmin: Expected printer name after \"-d\" option."));
156 		  usage();
157 		}
158 
159 		printer = argv[i];
160 	      }
161 
162 	      if (!validate_name(printer))
163 	      {
164 		_cupsLangPuts(stderr, _("lpadmin: Printer name can only contain printable characters."));
165 		return (1);
166 	      }
167 
168 	      if (default_printer(http, printer))
169 		return (1);
170 
171 	      i = argc;
172 	      break;
173 
174 	  case 'h' : /* Connect to host */
175 	      if (http)
176 	      {
177 		httpClose(http);
178 		http = NULL;
179 	      }
180 
181 	      if (opt[1] != '\0')
182 	      {
183 		cupsSetServer(opt + 1);
184 		opt += strlen(opt) - 1;
185 	      }
186 	      else
187 	      {
188 		i ++;
189 
190 		if (i >= argc)
191 		{
192 		  _cupsLangPuts(stderr, _("lpadmin: Expected hostname after \"-h\" option."));
193 		  usage();
194 		}
195 
196 		cupsSetServer(argv[i]);
197 	      }
198 	      break;
199 
200 	  case 'P' : /* Use the specified PPD file */
201 	  case 'i' : /* Use the specified PPD file */
202 	      if (opt[1] != '\0')
203 	      {
204 		file = opt + 1;
205 		opt += strlen(opt) - 1;
206 	      }
207 	      else
208 	      {
209 		i ++;
210 
211 		if (i >= argc)
212 		{
213 		  _cupsLangPrintf(stderr, _("lpadmin: Expected PPD after \"-%c\" option."), argv[i - 1][1]);
214 		  usage();
215 		}
216 
217 		file = argv[i];
218 	      }
219 
220 	      if (*opt == 'i')
221 	      {
222 	       /*
223 	        * Check to see that the specified file is, in fact, a PPD...
224 	        */
225 
226                 cups_file_t *fp = cupsFileOpen(file, "r");
227                 char line[256];
228 
229                 if (!cupsFileGets(fp, line, sizeof(line)) || strncmp(line, "*PPD-Adobe", 10))
230                 {
231                   _cupsLangPuts(stderr, _("lpadmin: System V interface scripts are no longer supported for security reasons."));
232                   cupsFileClose(fp);
233                   return (1);
234                 }
235 
236                 cupsFileClose(fp);
237 	      }
238 	      break;
239 
240 	  case 'E' : /* Enable the printer/enable encryption */
241 	      if (printer == NULL)
242 	      {
243 #ifdef HAVE_SSL
244 		cupsSetEncryption(HTTP_ENCRYPTION_REQUIRED);
245 
246 		if (http)
247 		  httpEncryption(http, HTTP_ENCRYPTION_REQUIRED);
248 #else
249 		_cupsLangPrintf(stderr, _("%s: Sorry, no encryption support."), argv[0]);
250 #endif /* HAVE_SSL */
251 		break;
252 	      }
253 
254 	      if (!http)
255 	      {
256 		http = httpConnect2(cupsServer(), ippPort(), NULL, AF_UNSPEC, cupsEncryption(), 1, 30000, NULL);
257 
258 		if (http == NULL)
259 		{
260 		  _cupsLangPrintf(stderr,
261 				  _("lpadmin: Unable to connect to server: %s"),
262 				  strerror(errno));
263 		  return (1);
264 		}
265 	      }
266 
267               enable = 1;
268 	      break;
269 
270 	  case 'm' : /* Use the specified standard script/PPD file */
271 	      if (opt[1] != '\0')
272 	      {
273 		num_options = cupsAddOption("ppd-name", opt + 1, num_options, &options);
274 		opt += strlen(opt) - 1;
275 	      }
276 	      else
277 	      {
278 		i ++;
279 
280 		if (i >= argc)
281 		{
282 		  _cupsLangPuts(stderr, _("lpadmin: Expected model after \"-m\" option."));
283 		  usage();
284 		}
285 
286 		num_options = cupsAddOption("ppd-name", argv[i], num_options, &options);
287 	      }
288 	      break;
289 
290 	  case 'o' : /* Set option */
291 	      if (opt[1] != '\0')
292 	      {
293 		num_options = cupsParseOptions(opt + 1, num_options, &options);
294 		opt += strlen(opt) - 1;
295 	      }
296 	      else
297 	      {
298 		i ++;
299 
300 		if (i >= argc)
301 		{
302 		  _cupsLangPuts(stderr, _("lpadmin: Expected name=value after \"-o\" option."));
303 		  usage();
304 		}
305 
306 		num_options = cupsParseOptions(argv[i], num_options, &options);
307 	      }
308 	      break;
309 
310 	  case 'p' : /* Add/modify a printer */
311 	      if (opt[1] != '\0')
312 	      {
313 		printer = opt + 1;
314 		opt += strlen(opt) - 1;
315 	      }
316 	      else
317 	      {
318 		i ++;
319 
320 		if (i >= argc)
321 		{
322 		  _cupsLangPuts(stderr, _("lpadmin: Expected printer after \"-p\" option."));
323 		  usage();
324 		}
325 
326 		printer = argv[i];
327 	      }
328 
329 	      if (!validate_name(printer))
330 	      {
331 		_cupsLangPuts(stderr, _("lpadmin: Printer name can only contain printable characters."));
332 		return (1);
333 	      }
334 	      break;
335 
336 	  case 'r' : /* Remove printer from class */
337 	      if (!http)
338 	      {
339 		http = httpConnect2(cupsServer(), ippPort(), NULL, AF_UNSPEC, cupsEncryption(), 1, 30000, NULL);
340 
341 		if (http == NULL)
342 		{
343 		  _cupsLangPrintf(stderr,
344 				  _("lpadmin: Unable to connect to server: %s"),
345 				  strerror(errno));
346 		  return (1);
347 		}
348 	      }
349 
350 	      if (printer == NULL)
351 	      {
352 		_cupsLangPuts(stderr,
353 			      _("lpadmin: Unable to remove a printer from the class:\n"
354 				"         You must specify a printer name first."));
355 		return (1);
356 	      }
357 
358 	      if (opt[1] != '\0')
359 	      {
360 		pclass = opt + 1;
361 		opt += strlen(opt) - 1;
362 	      }
363 	      else
364 	      {
365 		i ++;
366 
367 		if (i >= argc)
368 		{
369 		  _cupsLangPuts(stderr, _("lpadmin: Expected class after \"-r\" option."));
370 		  usage();
371 		}
372 
373 		pclass = argv[i];
374 	      }
375 
376 	      if (!validate_name(pclass))
377 	      {
378 		_cupsLangPuts(stderr, _("lpadmin: Class name can only contain printable characters."));
379 		return (1);
380 	      }
381 
382 	      if (delete_printer_from_class(http, printer, pclass))
383 		return (1);
384 	      break;
385 
386 	  case 'R' : /* Remove option */
387 	      if (!http)
388 	      {
389 		http = httpConnect2(cupsServer(), ippPort(), NULL, AF_UNSPEC, cupsEncryption(), 1, 30000, NULL);
390 
391 		if (http == NULL)
392 		{
393 		  _cupsLangPrintf(stderr, _("lpadmin: Unable to connect to server: %s"), strerror(errno));
394 		  return (1);
395 		}
396 	      }
397 
398 	      if (printer == NULL)
399 	      {
400 		_cupsLangPuts(stderr,
401 			      _("lpadmin: Unable to delete option:\n"
402 				"         You must specify a printer name first."));
403 		return (1);
404 	      }
405 
406 	      if (opt[1] != '\0')
407 	      {
408 		val = opt + 1;
409 		opt += strlen(opt) - 1;
410 	      }
411 	      else
412 	      {
413 		i ++;
414 
415 		if (i >= argc)
416 		{
417 		  _cupsLangPuts(stderr, _("lpadmin: Expected name after \"-R\" option."));
418 		  usage();
419 		}
420 
421 		val = argv[i];
422 	      }
423 
424 	      if (delete_printer_option(http, printer, val))
425 		return (1);
426 	      break;
427 
428 	  case 'U' : /* Username */
429 	      if (opt[1] != '\0')
430 	      {
431 		cupsSetUser(opt + 1);
432 		opt += strlen(opt) - 1;
433 	      }
434 	      else
435 	      {
436 		i ++;
437 		if (i >= argc)
438 		{
439 		  _cupsLangPrintf(stderr, _("%s: Error - expected username after \"-U\" option."), argv[0]);
440 		  usage();
441 		}
442 
443 		cupsSetUser(argv[i]);
444 	      }
445 	      break;
446 
447 	  case 'u' : /* Allow/deny users */
448 	      if (opt[1] != '\0')
449 	      {
450 		val = opt + 1;
451 		opt += strlen(opt) - 1;
452 	      }
453 	      else
454 	      {
455 		i ++;
456 
457 		if (i >= argc)
458 		{
459 		  _cupsLangPuts(stderr, _("lpadmin: Expected allow/deny:userlist after \"-u\" option."));
460 		  usage();
461 		}
462 
463 		val = argv[i];
464 	      }
465 
466 	      if (!_cups_strncasecmp(val, "allow:", 6))
467 		num_options = cupsAddOption("requesting-user-name-allowed", val + 6, num_options, &options);
468 	      else if (!_cups_strncasecmp(val, "deny:", 5))
469 		num_options = cupsAddOption("requesting-user-name-denied", val + 5, num_options, &options);
470 	      else
471 	      {
472 		_cupsLangPrintf(stderr, _("lpadmin: Unknown allow/deny option \"%s\"."), val);
473 		return (1);
474 	      }
475 	      break;
476 
477 	  case 'v' : /* Set the device-uri attribute */
478 	      if (opt[1] != '\0')
479 	      {
480 		num_options = cupsAddOption("device-uri", opt + 1, num_options, &options);
481 		opt += strlen(opt) - 1;
482 	      }
483 	      else
484 	      {
485 		i ++;
486 
487 		if (i >= argc)
488 		{
489 		  _cupsLangPuts(stderr, _("lpadmin: Expected device URI after \"-v\" option."));
490 		  usage();
491 		}
492 
493 		num_options = cupsAddOption("device-uri", argv[i], num_options, &options);
494 	      }
495 	      break;
496 
497 	  case 'x' : /* Delete a printer */
498 	      if (!http)
499 	      {
500 		http = httpConnect2(cupsServer(), ippPort(), NULL, AF_UNSPEC, cupsEncryption(), 1, 30000, NULL);
501 
502 		if (http == NULL)
503 		{
504 		  _cupsLangPrintf(stderr,
505 				  _("lpadmin: Unable to connect to server: %s"),
506 				  strerror(errno));
507 		  return (1);
508 		}
509 	      }
510 
511 	      if (opt[1] != '\0')
512 	      {
513 		printer = opt + 1;
514 		opt += strlen(opt) - 1;
515 	      }
516 	      else
517 	      {
518 		i ++;
519 
520 		if (i >= argc)
521 		{
522 		  _cupsLangPuts(stderr, _("lpadmin: Expected printer or class after \"-x\" option."));
523 		  usage();
524 		}
525 
526 		printer = argv[i];
527 	      }
528 
529 	      if (!validate_name(printer))
530 	      {
531 		_cupsLangPuts(stderr, _("lpadmin: Printer name can only contain printable characters."));
532 		return (1);
533 	      }
534 
535 	      if (delete_printer(http, printer))
536 		return (1);
537 
538 	      i = argc;
539 	      break;
540 
541 	  case 'D' : /* Set the printer-info attribute */
542 	      if (opt[1] != '\0')
543 	      {
544 		num_options = cupsAddOption("printer-info", opt + 1, num_options, &options);
545 		opt += strlen(opt) - 1;
546 	      }
547 	      else
548 	      {
549 		i ++;
550 
551 		if (i >= argc)
552 		{
553 		  _cupsLangPuts(stderr, _("lpadmin: Expected description after \"-D\" option."));
554 		  usage();
555 		}
556 
557 		num_options = cupsAddOption("printer-info", argv[i], num_options, &options);
558 	      }
559 	      break;
560 
561 	  case 'I' : /* Set the supported file types (ignored) */
562 	      i ++;
563 
564 	      if (i >= argc)
565 	      {
566 		_cupsLangPuts(stderr, _("lpadmin: Expected file type(s) after \"-I\" option."));
567 		usage();
568 	      }
569 
570 	      _cupsLangPuts(stderr, _("lpadmin: Warning - content type list ignored."));
571 	      break;
572 
573 	  case 'L' : /* Set the printer-location attribute */
574 	      if (opt[1] != '\0')
575 	      {
576 		num_options = cupsAddOption("printer-location", opt + 1, num_options, &options);
577 		opt += strlen(opt) - 1;
578 	      }
579 	      else
580 	      {
581 		i ++;
582 
583 		if (i >= argc)
584 		{
585 		  _cupsLangPuts(stderr, _("lpadmin: Expected location after \"-L\" option."));
586 		  usage();
587 		}
588 
589 		num_options = cupsAddOption("printer-location", argv[i], num_options, &options);
590 	      }
591 	      break;
592 
593 	  default :
594 	      _cupsLangPrintf(stderr, _("lpadmin: Unknown option \"%c\"."), *opt);
595 	      usage();
596 	}
597       }
598     }
599     else
600     {
601       _cupsLangPrintf(stderr, _("lpadmin: Unknown argument \"%s\"."), argv[i]);
602       usage();
603     }
604   }
605 
606  /*
607   * Set options as needed...
608   */
609 
610   ppd_name   = cupsGetOption("ppd-name", num_options, options);
611   device_uri = cupsGetOption("device-uri", num_options, options);
612 
613   if (ppd_name && !strcmp(ppd_name, "raw"))
614   {
615 #ifdef __APPLE__
616     _cupsLangPuts(stderr, _("lpadmin: Raw queues are no longer supported on macOS."));
617 #else
618     _cupsLangPuts(stderr, _("lpadmin: Raw queues are deprecated and will stop working in a future version of CUPS."));
619 #endif /* __APPLE__ */
620 
621     if (device_uri && (!strncmp(device_uri, "ipp://", 6) || !strncmp(device_uri, "ipps://", 7)) && strstr(device_uri, "/printers/"))
622       _cupsLangPuts(stderr, _("lpadmin: Use the 'everywhere' model for shared printers."));
623 
624 #ifdef __APPLE__
625     return (1);
626 #endif /* __APPLE__ */
627   }
628   else if (ppd_name && !strcmp(ppd_name, "everywhere") && device_uri)
629   {
630     if ((file = get_printer_ppd(device_uri, evefile, sizeof(evefile), &num_options, &options)) == NULL)
631       return (1);
632 
633     num_options = cupsRemoveOption("ppd-name", num_options, &options);
634   }
635   else if (ppd_name || file)
636   {
637     _cupsLangPuts(stderr, _("lpadmin: Printer drivers are deprecated and will stop working in a future version of CUPS."));
638   }
639 
640   if (num_options || file)
641   {
642     if (printer == NULL)
643     {
644       _cupsLangPuts(stderr,
645                     _("lpadmin: Unable to set the printer options:\n"
646                       "         You must specify a printer name first."));
647       return (1);
648     }
649 
650     if (!http)
651     {
652       http = httpConnect2(cupsServer(), ippPort(), NULL, AF_UNSPEC,
653                           cupsEncryption(), 1, 30000, NULL);
654 
655       if (http == NULL) {
656         _cupsLangPrintf(stderr, _("lpadmin: Unable to connect to server: %s"),
657                         strerror(errno));
658         return (1);
659       }
660     }
661 
662     if (set_printer_options(http, printer, num_options, options, file, enable))
663       return (1);
664   }
665   else if (enable && enable_printer(http, printer))
666     return (1);
667 
668   if (evefile[0])
669     unlink(evefile);
670 
671   if (printer == NULL)
672     usage();
673 
674   if (http)
675     httpClose(http);
676 
677   return (0);
678 }
679 
680 
681 /*
682  * 'add_printer_to_class()' - Add a printer to a class.
683  */
684 
685 static int				/* O - 0 on success, 1 on fail */
add_printer_to_class(http_t * http,char * printer,char * pclass)686 add_printer_to_class(http_t *http,	/* I - Server connection */
687                      char   *printer,	/* I - Printer to add */
688 		     char   *pclass)	/* I - Class to add to */
689 {
690   int		i;			/* Looping var */
691   ipp_t		*request,		/* IPP Request */
692 		*response;		/* IPP Response */
693   ipp_attribute_t *attr,		/* Current attribute */
694 		*members;		/* Members in class */
695   char		uri[HTTP_MAX_URI];	/* URI for printer/class */
696 
697 
698  /*
699   * Build an IPP_OP_GET_PRINTER_ATTRIBUTES request, which requires the following
700   * attributes:
701   *
702   *    attributes-charset
703   *    attributes-natural-language
704   *    printer-uri
705   *    requesting-user-name
706   */
707 
708   request = ippNewRequest(IPP_OP_GET_PRINTER_ATTRIBUTES);
709 
710   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
711                    "localhost", 0, "/classes/%s", pclass);
712   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
713                "printer-uri", NULL, uri);
714   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
715                NULL, cupsUser());
716 
717  /*
718   * Do the request and get back a response...
719   */
720 
721   response = cupsDoRequest(http, request, "/");
722 
723  /*
724   * Build a CUPS-Add-Modify-Class request, which requires the following
725   * attributes:
726   *
727   *    attributes-charset
728   *    attributes-natural-language
729   *    printer-uri
730   *    requesting-user-name
731   *    member-uris
732   */
733 
734   request = ippNewRequest(IPP_OP_CUPS_ADD_MODIFY_CLASS);
735 
736   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
737                "printer-uri", NULL, uri);
738   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
739                NULL, cupsUser());
740 
741  /*
742   * See if the printer is already in the class...
743   */
744 
745   if (response != NULL &&
746       (members = ippFindAttribute(response, "member-names",
747                                   IPP_TAG_NAME)) != NULL)
748     for (i = 0; i < members->num_values; i ++)
749       if (_cups_strcasecmp(printer, members->values[i].string.text) == 0)
750       {
751         _cupsLangPrintf(stderr,
752 	                _("lpadmin: Printer %s is already a member of class "
753 			  "%s."), printer, pclass);
754         ippDelete(request);
755 	ippDelete(response);
756 	return (0);
757       }
758 
759  /*
760   * OK, the printer isn't part of the class, so add it...
761   */
762 
763   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
764                    "localhost", 0, "/printers/%s", printer);
765 
766   if (response != NULL &&
767       (members = ippFindAttribute(response, "member-uris",
768                                   IPP_TAG_URI)) != NULL)
769   {
770    /*
771     * Add the printer to the existing list...
772     */
773 
774     attr = ippAddStrings(request, IPP_TAG_PRINTER, IPP_TAG_URI,
775                          "member-uris", members->num_values + 1, NULL, NULL);
776     for (i = 0; i < members->num_values; i ++)
777       attr->values[i].string.text =
778           _cupsStrAlloc(members->values[i].string.text);
779 
780     attr->values[i].string.text = _cupsStrAlloc(uri);
781   }
782   else
783     ippAddString(request, IPP_TAG_PRINTER, IPP_TAG_URI, "member-uris", NULL,
784                  uri);
785 
786  /*
787   * Then send the request...
788   */
789 
790   ippDelete(response);
791 
792   ippDelete(cupsDoRequest(http, request, "/admin/"));
793   if (cupsLastError() > IPP_STATUS_OK_CONFLICTING)
794   {
795     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
796 
797     return (1);
798   }
799   else
800     return (0);
801 }
802 
803 
804 /*
805  * 'default_printer()' - Set the default printing destination.
806  */
807 
808 static int				/* O - 0 on success, 1 on fail */
default_printer(http_t * http,char * printer)809 default_printer(http_t *http,		/* I - Server connection */
810                 char   *printer)	/* I - Printer name */
811 {
812   ipp_t		*request;		/* IPP Request */
813   char		uri[HTTP_MAX_URI];	/* URI for printer/class */
814 
815 
816  /*
817   * Build a CUPS-Set-Default request, which requires the following
818   * attributes:
819   *
820   *    attributes-charset
821   *    attributes-natural-language
822   *    printer-uri
823   *    requesting-user-name
824   */
825 
826   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
827                    "localhost", 0, "/printers/%s", printer);
828 
829   request = ippNewRequest(IPP_OP_CUPS_SET_DEFAULT);
830 
831   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
832                "printer-uri", NULL, uri);
833   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
834                NULL, cupsUser());
835 
836  /*
837   * Do the request and get back a response...
838   */
839 
840   ippDelete(cupsDoRequest(http, request, "/admin/"));
841 
842   if (cupsLastError() > IPP_STATUS_OK_CONFLICTING)
843   {
844     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
845 
846     return (1);
847   }
848   else
849     return (0);
850 }
851 
852 
853 /*
854  * 'delete_printer()' - Delete a printer from the system...
855  */
856 
857 static int				/* O - 0 on success, 1 on fail */
delete_printer(http_t * http,char * printer)858 delete_printer(http_t *http,		/* I - Server connection */
859                char   *printer)		/* I - Printer to delete */
860 {
861   ipp_t		*request;		/* IPP Request */
862   char		uri[HTTP_MAX_URI];	/* URI for printer/class */
863 
864 
865  /*
866   * Build a CUPS-Delete-Printer request, which requires the following
867   * attributes:
868   *
869   *    attributes-charset
870   *    attributes-natural-language
871   *    printer-uri
872   *    requesting-user-name
873   */
874 
875   request = ippNewRequest(IPP_OP_CUPS_DELETE_PRINTER);
876 
877   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
878                    "localhost", 0, "/printers/%s", printer);
879   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
880                "printer-uri", NULL, uri);
881   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
882                NULL, cupsUser());
883 
884  /*
885   * Do the request and get back a response...
886   */
887 
888   ippDelete(cupsDoRequest(http, request, "/admin/"));
889 
890   if (cupsLastError() > IPP_STATUS_OK_CONFLICTING)
891   {
892     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
893 
894     return (1);
895   }
896   else
897     return (0);
898 }
899 
900 
901 /*
902  * 'delete_printer_from_class()' - Delete a printer from a class.
903  */
904 
905 static int				/* O - 0 on success, 1 on fail */
delete_printer_from_class(http_t * http,char * printer,char * pclass)906 delete_printer_from_class(
907     http_t *http,			/* I - Server connection */
908     char   *printer,			/* I - Printer to remove */
909     char   *pclass)	  		/* I - Class to remove from */
910 {
911   int		i, j, k;		/* Looping vars */
912   ipp_t		*request,		/* IPP Request */
913 		*response;		/* IPP Response */
914   ipp_attribute_t *attr,		/* Current attribute */
915 		*members;		/* Members in class */
916   char		uri[HTTP_MAX_URI];	/* URI for printer/class */
917 
918 
919  /*
920   * Build an IPP_OP_GET_PRINTER_ATTRIBUTES request, which requires the following
921   * attributes:
922   *
923   *    attributes-charset
924   *    attributes-natural-language
925   *    printer-uri
926   *    requesting-user-name
927   */
928 
929   request = ippNewRequest(IPP_OP_GET_PRINTER_ATTRIBUTES);
930 
931   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
932                    "localhost", 0, "/classes/%s", pclass);
933   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
934                "printer-uri", NULL, uri);
935   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
936                NULL, cupsUser());
937 
938  /*
939   * Do the request and get back a response...
940   */
941 
942   if ((response = cupsDoRequest(http, request, "/classes/")) == NULL ||
943       response->request.status.status_code == IPP_STATUS_ERROR_NOT_FOUND)
944   {
945     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
946 
947     ippDelete(response);
948 
949     return (1);
950   }
951 
952  /*
953   * See if the printer is already in the class...
954   */
955 
956   if ((members = ippFindAttribute(response, "member-names", IPP_TAG_NAME)) == NULL)
957   {
958     _cupsLangPuts(stderr, _("lpadmin: No member names were seen."));
959 
960     ippDelete(response);
961 
962     return (1);
963   }
964 
965   for (i = 0; i < members->num_values; i ++)
966     if (!_cups_strcasecmp(printer, members->values[i].string.text))
967       break;
968 
969   if (i >= members->num_values)
970   {
971     _cupsLangPrintf(stderr,
972                     _("lpadmin: Printer %s is not a member of class %s."),
973 	            printer, pclass);
974 
975     ippDelete(response);
976 
977     return (1);
978   }
979 
980   if (members->num_values == 1)
981   {
982    /*
983     * Build a CUPS-Delete-Class request, which requires the following
984     * attributes:
985     *
986     *    attributes-charset
987     *    attributes-natural-language
988     *    printer-uri
989     *    requesting-user-name
990     */
991 
992     request = ippNewRequest(IPP_OP_CUPS_DELETE_CLASS);
993 
994     ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
995         	 "printer-uri", NULL, uri);
996     ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
997                  "requesting-user-name", NULL, cupsUser());
998   }
999   else
1000   {
1001    /*
1002     * Build a IPP_OP_CUPS_ADD_MODIFY_CLASS request, which requires the following
1003     * attributes:
1004     *
1005     *    attributes-charset
1006     *    attributes-natural-language
1007     *    printer-uri
1008     *    requesting-user-name
1009     *    member-uris
1010     */
1011 
1012     request = ippNewRequest(IPP_OP_CUPS_ADD_MODIFY_CLASS);
1013 
1014     ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
1015         	 "printer-uri", NULL, uri);
1016     ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
1017                  "requesting-user-name", NULL, cupsUser());
1018 
1019    /*
1020     * Delete the printer from the class...
1021     */
1022 
1023     members = ippFindAttribute(response, "member-uris", IPP_TAG_URI);
1024     attr = ippAddStrings(request, IPP_TAG_PRINTER, IPP_TAG_URI,
1025                          "member-uris", members->num_values - 1, NULL, NULL);
1026 
1027     for (j = 0, k = 0; j < members->num_values; j ++)
1028       if (j != i)
1029         attr->values[k ++].string.text =
1030 	    _cupsStrAlloc(members->values[j].string.text);
1031   }
1032 
1033  /*
1034   * Then send the request...
1035   */
1036 
1037   ippDelete(response);
1038 
1039   ippDelete(cupsDoRequest(http, request, "/admin/"));
1040 
1041   if (cupsLastError() > IPP_STATUS_OK_CONFLICTING)
1042   {
1043     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
1044 
1045     return (1);
1046   }
1047   else
1048     return (0);
1049 }
1050 
1051 
1052 /*
1053  * 'delete_printer_option()' - Delete a printer option.
1054  */
1055 
1056 static int				/* O - 0 on success, 1 on fail */
delete_printer_option(http_t * http,char * printer,char * option)1057 delete_printer_option(http_t *http,	/* I - Server connection */
1058                       char   *printer,	/* I - Printer */
1059 		      char   *option)	/* I - Option to delete */
1060 {
1061   ipp_t		*request;		/* IPP request */
1062   char		uri[HTTP_MAX_URI];	/* URI for printer/class */
1063 
1064 
1065  /*
1066   * Build a IPP_OP_CUPS_ADD_MODIFY_PRINTER or IPP_OP_CUPS_ADD_MODIFY_CLASS request, which
1067   * requires the following attributes:
1068   *
1069   *    attributes-charset
1070   *    attributes-natural-language
1071   *    printer-uri
1072   *    requesting-user-name
1073   *    option with deleteAttr tag
1074   */
1075 
1076   if (get_printer_type(http, printer, uri, sizeof(uri)) & CUPS_PRINTER_CLASS)
1077     request = ippNewRequest(IPP_OP_CUPS_ADD_MODIFY_CLASS);
1078   else
1079     request = ippNewRequest(IPP_OP_CUPS_ADD_MODIFY_PRINTER);
1080 
1081   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
1082                "printer-uri", NULL, uri);
1083   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
1084                "requesting-user-name", NULL, cupsUser());
1085   ippAddInteger(request, IPP_TAG_PRINTER, IPP_TAG_DELETEATTR, option, 0);
1086 
1087  /*
1088   * Do the request and get back a response...
1089   */
1090 
1091   ippDelete(cupsDoRequest(http, request, "/admin/"));
1092 
1093   if (cupsLastError() > IPP_STATUS_OK_CONFLICTING)
1094   {
1095     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
1096 
1097     return (1);
1098   }
1099   else
1100     return (0);
1101 }
1102 
1103 
1104 /*
1105  * 'enable_printer()' - Enable a printer...
1106  */
1107 
1108 static int				/* O - 0 on success, 1 on fail */
enable_printer(http_t * http,char * printer)1109 enable_printer(http_t *http,		/* I - Server connection */
1110                char   *printer)		/* I - Printer to enable */
1111 {
1112   ipp_t		*request;		/* IPP Request */
1113   char		uri[HTTP_MAX_URI];	/* URI for printer/class */
1114 
1115 
1116  /*
1117   * Send IPP_OP_ENABLE_PRINTER and IPP_OP_RESUME_PRINTER requests, which
1118   * require the following attributes:
1119   *
1120   *    attributes-charset
1121   *    attributes-natural-language
1122   *    printer-uri
1123   *    requesting-user-name
1124   */
1125 
1126   request = ippNewRequest(IPP_OP_ENABLE_PRINTER);
1127 
1128   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL, "localhost", ippPort(), "/printers/%s", printer);
1129   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL, uri);
1130   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name", NULL, cupsUser());
1131 
1132   ippDelete(cupsDoRequest(http, request, "/admin/"));
1133 
1134   if (cupsLastError() > IPP_STATUS_OK_CONFLICTING)
1135   {
1136     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
1137 
1138     return (1);
1139   }
1140 
1141   request = ippNewRequest(IPP_OP_RESUME_PRINTER);
1142 
1143   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL, uri);
1144   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name", NULL, cupsUser());
1145 
1146   ippDelete(cupsDoRequest(http, request, "/admin/"));
1147 
1148   if (cupsLastError() > IPP_STATUS_OK_CONFLICTING)
1149   {
1150     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
1151 
1152     return (1);
1153   }
1154 
1155   return (0);
1156 }
1157 
1158 
1159 /*
1160  * 'get_printer_ppd()' - Get an IPP Everywhere PPD file for the given URI.
1161  */
1162 
1163 static char *				/* O  - Filename or NULL */
get_printer_ppd(const char * uri,char * buffer,size_t bufsize,int * num_options,cups_option_t ** options)1164 get_printer_ppd(
1165     const char    *uri,			/* I  - Printer URI */
1166     char          *buffer,		/* I  - Filename buffer */
1167     size_t        bufsize,		/* I  - Size of filename buffer */
1168     int           *num_options,		/* IO - Number of options */
1169     cups_option_t **options)		/* IO - Options */
1170 {
1171   http_t	*http;			/* Connection to printer */
1172   ipp_t		*request,		/* Get-Printer-Attributes request */
1173 		*response;		/* Get-Printer-Attributes response */
1174   ipp_attribute_t *attr;		/* Attribute from response */
1175   char		resolved[1024],		/* Resolved URI */
1176 		scheme[32],		/* URI scheme */
1177 		userpass[256],		/* Username:password */
1178 		host[256],		/* Hostname */
1179 		resource[256];		/* Resource path */
1180   int		port;			/* Port number */
1181   static const char * const pattrs[] =	/* Attributes to use */
1182   {
1183     "all",
1184     "media-col-database"
1185   };
1186 
1187 
1188  /*
1189   * Connect to the printer...
1190   */
1191 
1192   if (strstr(uri, "._tcp"))
1193   {
1194    /*
1195     * Resolve URI...
1196     */
1197 
1198     if (!_httpResolveURI(uri, resolved, sizeof(resolved), _HTTP_RESOLVE_DEFAULT, NULL, NULL))
1199     {
1200       _cupsLangPrintf(stderr, _("%s: Unable to resolve \"%s\"."), "lpadmin", uri);
1201       return (NULL);
1202     }
1203 
1204     uri = resolved;
1205   }
1206 
1207   if (httpSeparateURI(HTTP_URI_CODING_ALL, uri, scheme, sizeof(scheme), userpass, sizeof(userpass), host, sizeof(host), &port, resource, sizeof(resource)) < HTTP_URI_STATUS_OK)
1208   {
1209     _cupsLangPrintf(stderr, _("%s: Bad printer URI \"%s\"."), "lpadmin", uri);
1210     return (NULL);
1211   }
1212 
1213   http = httpConnect2(host, port, NULL, AF_UNSPEC, !strcmp(scheme, "ipps") ? HTTP_ENCRYPTION_ALWAYS : HTTP_ENCRYPTION_IF_REQUESTED, 1, 30000, NULL);
1214   if (!http)
1215   {
1216     _cupsLangPrintf(stderr, _("%s: Unable to connect to \"%s:%d\": %s"), "lpadmin", host, port, cupsLastErrorString());
1217     return (NULL);
1218   }
1219 
1220  /*
1221   * Send a Get-Printer-Attributes request...
1222   */
1223 
1224   request = ippNewRequest(IPP_OP_GET_PRINTER_ATTRIBUTES);
1225   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL, uri);
1226   ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD, "requested-attributes", sizeof(pattrs) / sizeof(pattrs[0]), NULL, pattrs);
1227   response = cupsDoRequest(http, request, resource);
1228 
1229   if (cupsLastError() >= IPP_STATUS_REDIRECTION_OTHER_SITE)
1230   {
1231     _cupsLangPrintf(stderr, _("%s: Unable to query printer: %s"), "lpadmin", cupsLastErrorString());
1232     buffer[0] = '\0';
1233   }
1234   else if (_ppdCreateFromIPP(buffer, bufsize, response))
1235   {
1236     if (!cupsGetOption("printer-geo-location", *num_options, *options) && (attr = ippFindAttribute(response, "printer-geo-location", IPP_TAG_URI)) != NULL)
1237       *num_options = cupsAddOption("printer-geo-location", ippGetString(attr, 0, NULL), *num_options, options);
1238 
1239     if (!cupsGetOption("printer-info", *num_options, *options) && (attr = ippFindAttribute(response, "printer-info", IPP_TAG_TEXT)) != NULL)
1240       *num_options = cupsAddOption("printer-info", ippGetString(attr, 0, NULL), *num_options, options);
1241 
1242     if (!cupsGetOption("printer-location", *num_options, *options) && (attr = ippFindAttribute(response, "printer-location", IPP_TAG_TEXT)) != NULL)
1243       *num_options = cupsAddOption("printer-location", ippGetString(attr, 0, NULL), *num_options, options);
1244   }
1245   else
1246     _cupsLangPrintf(stderr, _("%s: Unable to create PPD file: %s"), "lpadmin", strerror(errno));
1247 
1248   ippDelete(response);
1249   httpClose(http);
1250 
1251   if (buffer[0])
1252     return (buffer);
1253   else
1254     return (NULL);
1255 }
1256 
1257 
1258 /*
1259  * 'get_printer_type()' - Determine the printer type and URI.
1260  */
1261 
1262 static cups_ptype_t			/* O - printer-type value */
get_printer_type(http_t * http,char * printer,char * uri,size_t urisize)1263 get_printer_type(http_t *http,		/* I - Server connection */
1264                  char   *printer,	/* I - Printer name */
1265 		 char   *uri,		/* I - URI buffer */
1266                  size_t urisize)	/* I - Size of URI buffer */
1267 {
1268   ipp_t			*request,	/* IPP request */
1269 			*response;	/* IPP response */
1270   ipp_attribute_t	*attr;		/* printer-type attribute */
1271   cups_ptype_t		type;		/* printer-type value */
1272 
1273 
1274  /*
1275   * Build a GET_PRINTER_ATTRIBUTES request, which requires the following
1276   * attributes:
1277   *
1278   *    attributes-charset
1279   *    attributes-natural-language
1280   *    printer-uri
1281   *    requested-attributes
1282   *    requesting-user-name
1283   */
1284 
1285   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, (int)urisize, "ipp", NULL, "localhost", ippPort(), "/printers/%s", printer);
1286 
1287   request = ippNewRequest(IPP_OP_GET_PRINTER_ATTRIBUTES);
1288   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
1289                "printer-uri", NULL, uri);
1290   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
1291                "requested-attributes", NULL, "printer-type");
1292   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
1293                "requesting-user-name", NULL, cupsUser());
1294 
1295  /*
1296   * Do the request...
1297   */
1298 
1299   response = cupsDoRequest(http, request, "/");
1300   if ((attr = ippFindAttribute(response, "printer-type",
1301                                IPP_TAG_ENUM)) != NULL)
1302   {
1303     type = (cups_ptype_t)attr->values[0].integer;
1304 
1305     if (type & CUPS_PRINTER_CLASS)
1306       httpAssembleURIf(HTTP_URI_CODING_ALL, uri, (int)urisize, "ipp", NULL, "localhost", ippPort(), "/classes/%s", printer);
1307   }
1308   else
1309     type = CUPS_PRINTER_LOCAL;
1310 
1311   ippDelete(response);
1312 
1313   return (type);
1314 }
1315 
1316 
1317 /*
1318  * 'set_printer_options()' - Set the printer options.
1319  */
1320 
1321 static int				/* O - 0 on success, 1 on fail */
set_printer_options(http_t * http,char * printer,int num_options,cups_option_t * options,char * file,int enable)1322 set_printer_options(
1323     http_t        *http,		/* I - Server connection */
1324     char          *printer,		/* I - Printer */
1325     int           num_options,		/* I - Number of options */
1326     cups_option_t *options,		/* I - Options */
1327     char          *file,		/* I - PPD file */
1328     int           enable)		/* I - Enable printer? */
1329 {
1330   ipp_t		*request;		/* IPP Request */
1331   const char	*ppdfile;		/* PPD filename */
1332   int		ppdchanged = 0;		/* PPD changed? */
1333   ppd_file_t	*ppd;			/* PPD file */
1334   ppd_choice_t	*choice;		/* Marked choice */
1335   char		uri[HTTP_MAX_URI],	/* URI for printer/class */
1336 		line[1024],		/* Line from PPD file */
1337 		keyword[1024],		/* Keyword from Default line */
1338 		*keyptr,		/* Pointer into keyword... */
1339 		tempfile[1024];		/* Temporary filename */
1340   cups_file_t	*in,			/* PPD file */
1341 		*out;			/* Temporary file */
1342   const char	*ppdname,		/* ppd-name value */
1343 		*protocol,		/* Old protocol option */
1344 		*customval,		/* Custom option value */
1345 		*boolval;		/* Boolean value */
1346   int		wrote_ipp_supplies = 0,	/* Wrote cupsIPPSupplies keyword? */
1347 		wrote_snmp_supplies = 0,/* Wrote cupsSNMPSupplies keyword? */
1348 		copied_options = 0;	/* Copied options? */
1349 
1350 
1351  /*
1352   * Build a CUPS-Add-Modify-Printer or CUPS-Add-Modify-Class request,
1353   * which requires the following attributes:
1354   *
1355   *    attributes-charset
1356   *    attributes-natural-language
1357   *    printer-uri
1358   *    requesting-user-name
1359   *    other options
1360   */
1361 
1362   if (get_printer_type(http, printer, uri, sizeof(uri)) & CUPS_PRINTER_CLASS)
1363     request = ippNewRequest(IPP_OP_CUPS_ADD_MODIFY_CLASS);
1364   else
1365     request = ippNewRequest(IPP_OP_CUPS_ADD_MODIFY_PRINTER);
1366 
1367   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL, uri);
1368   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name", NULL, cupsUser());
1369 
1370  /*
1371   * Add the options...
1372   */
1373 
1374   if (file)
1375     ppdfile = file;
1376   else if ((ppdname = cupsGetOption("ppd-name", num_options, options)) != NULL && strcmp(ppdname, "raw") && num_options > 1)
1377   {
1378     if ((ppdfile = cupsGetServerPPD(http, ppdname)) != NULL)
1379     {
1380      /*
1381       * Copy options array and remove ppd-name from it...
1382       */
1383 
1384       cups_option_t *temp = NULL, *optr;
1385       int i, num_temp = 0;
1386       for (i = num_options, optr = options; i > 0; i --, optr ++)
1387         if (strcmp(optr->name, "ppd-name"))
1388 	  num_temp = cupsAddOption(optr->name, optr->value, num_temp, &temp);
1389 
1390       copied_options = 1;
1391       ppdchanged     = 1;
1392       num_options    = num_temp;
1393       options        = temp;
1394     }
1395   }
1396   else if (request->request.op.operation_id == IPP_OP_CUPS_ADD_MODIFY_PRINTER)
1397     ppdfile = cupsGetPPD(printer);
1398   else
1399     ppdfile = NULL;
1400 
1401   cupsEncodeOptions2(request, num_options, options, IPP_TAG_OPERATION);
1402 
1403   if (enable)
1404   {
1405     ippAddInteger(request, IPP_TAG_PRINTER, IPP_TAG_ENUM, "printer-state", IPP_PSTATE_IDLE);
1406     ippAddBoolean(request, IPP_TAG_PRINTER, "printer-is-accepting-jobs", 1);
1407   }
1408 
1409   cupsEncodeOptions2(request, num_options, options, IPP_TAG_PRINTER);
1410 
1411   if ((protocol = cupsGetOption("protocol", num_options, options)) != NULL)
1412   {
1413     if (!_cups_strcasecmp(protocol, "bcp"))
1414       ippAddString(request, IPP_TAG_PRINTER, IPP_TAG_NAME, "port-monitor",
1415                    NULL, "bcp");
1416     else if (!_cups_strcasecmp(protocol, "tbcp"))
1417       ippAddString(request, IPP_TAG_PRINTER, IPP_TAG_NAME, "port-monitor",
1418                    NULL, "tbcp");
1419   }
1420 
1421   if (ppdfile)
1422   {
1423    /*
1424     * Set default options in the PPD file...
1425     */
1426 
1427     if ((ppd = ppdOpenFile(ppdfile)) == NULL)
1428     {
1429       int		linenum;	/* Line number of error */
1430       ppd_status_t	status = ppdLastError(&linenum);
1431 					/* Status code */
1432 
1433       _cupsLangPrintf(stderr, _("lpadmin: Unable to open PPD \"%s\": %s on line %d."), ppdfile, ppdErrorString(status), linenum);
1434       return (1);
1435     }
1436 
1437     ppdMarkDefaults(ppd);
1438     cupsMarkOptions(ppd, num_options, options);
1439 
1440     if ((out = cupsTempFile2(tempfile, sizeof(tempfile))) == NULL)
1441     {
1442       _cupsLangPrintError(NULL, _("lpadmin: Unable to create temporary file"));
1443       ippDelete(request);
1444       if (ppdfile != file)
1445         unlink(ppdfile);
1446       if (copied_options)
1447         cupsFreeOptions(num_options, options);
1448       return (1);
1449     }
1450 
1451     if ((in = cupsFileOpen(ppdfile, "r")) == NULL)
1452     {
1453       _cupsLangPrintf(stderr, _("lpadmin: Unable to open PPD \"%s\": %s"), ppdfile, strerror(errno));
1454       ippDelete(request);
1455       if (ppdfile != file)
1456 	unlink(ppdfile);
1457       if (copied_options)
1458         cupsFreeOptions(num_options, options);
1459       cupsFileClose(out);
1460       unlink(tempfile);
1461       return (1);
1462     }
1463 
1464     while (cupsFileGets(in, line, sizeof(line)))
1465     {
1466       if (!strncmp(line, "*cupsIPPSupplies:", 17) &&
1467 	  (boolval = cupsGetOption("cupsIPPSupplies", num_options,
1468 	                           options)) != NULL)
1469       {
1470         ppdchanged         = 1;
1471         wrote_ipp_supplies = 1;
1472         cupsFilePrintf(out, "*cupsIPPSupplies: %s\n",
1473 	               (!_cups_strcasecmp(boolval, "true") ||
1474 		        !_cups_strcasecmp(boolval, "yes") ||
1475 		        !_cups_strcasecmp(boolval, "on")) ? "True" : "False");
1476       }
1477       else if (!strncmp(line, "*cupsSNMPSupplies:", 18) &&
1478 	       (boolval = cupsGetOption("cupsSNMPSupplies", num_options,
1479 	                                options)) != NULL)
1480       {
1481         ppdchanged          = 1;
1482         wrote_snmp_supplies = 1;
1483         cupsFilePrintf(out, "*cupsSNMPSupplies: %s\n",
1484 	               (!_cups_strcasecmp(boolval, "true") ||
1485 		        !_cups_strcasecmp(boolval, "yes") ||
1486 		        !_cups_strcasecmp(boolval, "on")) ? "True" : "False");
1487       }
1488       else if (strncmp(line, "*Default", 8))
1489         cupsFilePrintf(out, "%s\n", line);
1490       else
1491       {
1492        /*
1493         * Get default option name...
1494 	*/
1495 
1496         strlcpy(keyword, line + 8, sizeof(keyword));
1497 
1498 	for (keyptr = keyword; *keyptr; keyptr ++)
1499 	  if (*keyptr == ':' || isspace(*keyptr & 255))
1500 	    break;
1501 
1502         *keyptr++ = '\0';
1503         while (isspace(*keyptr & 255))
1504 	  keyptr ++;
1505 
1506         if (!strcmp(keyword, "PageRegion") ||
1507 	    !strcmp(keyword, "PageSize") ||
1508 	    !strcmp(keyword, "PaperDimension") ||
1509 	    !strcmp(keyword, "ImageableArea"))
1510 	{
1511 	  if ((choice = ppdFindMarkedChoice(ppd, "PageSize")) == NULL)
1512 	    choice = ppdFindMarkedChoice(ppd, "PageRegion");
1513         }
1514 	else
1515 	  choice = ppdFindMarkedChoice(ppd, keyword);
1516 
1517         if (choice && strcmp(choice->choice, keyptr))
1518 	{
1519 	  if (strcmp(choice->choice, "Custom"))
1520 	  {
1521 	    cupsFilePrintf(out, "*Default%s: %s\n", keyword, choice->choice);
1522 	    ppdchanged = 1;
1523 	  }
1524 	  else if ((customval = cupsGetOption(keyword, num_options,
1525 	                                      options)) != NULL)
1526 	  {
1527 	    cupsFilePrintf(out, "*Default%s: %s\n", keyword, customval);
1528 	    ppdchanged = 1;
1529 	  }
1530 	  else
1531 	    cupsFilePrintf(out, "%s\n", line);
1532 	}
1533 	else
1534 	  cupsFilePrintf(out, "%s\n", line);
1535       }
1536     }
1537 
1538     if (!wrote_ipp_supplies &&
1539 	(boolval = cupsGetOption("cupsIPPSupplies", num_options,
1540 				 options)) != NULL)
1541     {
1542       ppdchanged = 1;
1543 
1544       cupsFilePrintf(out, "*cupsIPPSupplies: %s\n",
1545 		     (!_cups_strcasecmp(boolval, "true") ||
1546 		      !_cups_strcasecmp(boolval, "yes") ||
1547 		      !_cups_strcasecmp(boolval, "on")) ? "True" : "False");
1548     }
1549 
1550     if (!wrote_snmp_supplies &&
1551         (boolval = cupsGetOption("cupsSNMPSupplies", num_options,
1552 			         options)) != NULL)
1553     {
1554       ppdchanged = 1;
1555 
1556       cupsFilePrintf(out, "*cupsSNMPSupplies: %s\n",
1557 		     (!_cups_strcasecmp(boolval, "true") ||
1558 		      !_cups_strcasecmp(boolval, "yes") ||
1559 		      !_cups_strcasecmp(boolval, "on")) ? "True" : "False");
1560     }
1561 
1562     cupsFileClose(in);
1563     cupsFileClose(out);
1564     ppdClose(ppd);
1565 
1566    /*
1567     * Do the request...
1568     */
1569 
1570     ippDelete(cupsDoFileRequest(http, request, "/admin/", ppdchanged ? tempfile : file));
1571 
1572    /*
1573     * Clean up temp files... (TODO: catch signals in case we CTRL-C during
1574     * lpadmin)
1575     */
1576 
1577     if (ppdfile != file)
1578       unlink(ppdfile);
1579     unlink(tempfile);
1580   }
1581   else
1582   {
1583    /*
1584     * No PPD file - just set the options...
1585     */
1586 
1587     ippDelete(cupsDoRequest(http, request, "/admin/"));
1588   }
1589 
1590   if (copied_options)
1591     cupsFreeOptions(num_options, options);
1592 
1593  /*
1594   * Check the response...
1595   */
1596 
1597   if (cupsLastError() > IPP_STATUS_OK_CONFLICTING)
1598   {
1599     _cupsLangPrintf(stderr, _("%s: %s"), "lpadmin", cupsLastErrorString());
1600 
1601     return (1);
1602   }
1603   else
1604     return (0);
1605 }
1606 
1607 
1608 /*
1609  * 'usage()' - Show program usage and exit.
1610  */
1611 
1612 static void
usage(void)1613 usage(void)
1614 {
1615   _cupsLangPuts(stdout, _("Usage: lpadmin [options] -d destination\n"
1616                           "       lpadmin [options] -p destination\n"
1617                           "       lpadmin [options] -p destination -c class\n"
1618                           "       lpadmin [options] -p destination -r class\n"
1619                           "       lpadmin [options] -x destination"));
1620   _cupsLangPuts(stdout, _("Options:"));
1621   _cupsLangPuts(stdout, _("-c class                Add the named destination to a class"));
1622   _cupsLangPuts(stdout, _("-d destination          Set the named destination as the server default"));
1623   _cupsLangPuts(stdout, _("-D description          Specify the textual description of the printer"));
1624   _cupsLangPuts(stdout, _("-E                      Encrypt the connection to the server"));
1625   _cupsLangPuts(stdout, _("-E                      Enable and accept jobs on the printer (after -p)"));
1626   _cupsLangPuts(stdout, _("-h server[:port]        Connect to the named server and port"));
1627   _cupsLangPuts(stdout, _("-i ppd-file             Specify a PPD file for the printer"));
1628   _cupsLangPuts(stdout, _("-L location             Specify the textual location of the printer"));
1629   _cupsLangPuts(stdout, _("-m model                Specify a standard model/PPD file for the printer"));
1630   _cupsLangPuts(stdout, _("-m everywhere           Specify the printer is compatible with IPP Everywhere"));
1631   _cupsLangPuts(stdout, _("-o name-default=value   Specify the default value for the named option"));
1632   _cupsLangPuts(stdout, _("-o Name=Value           Specify the default value for the named PPD option "));
1633   _cupsLangPuts(stdout, _("-o cupsIPPSupplies=false\n"
1634                           "                        Disable supply level reporting via IPP"));
1635   _cupsLangPuts(stdout, _("-o cupsSNMPSupplies=false\n"
1636                           "                        Disable supply level reporting via SNMP"));
1637   _cupsLangPuts(stdout, _("-o job-k-limit=N        Specify the kilobyte limit for per-user quotas"));
1638   _cupsLangPuts(stdout, _("-o job-page-limit=N     Specify the page limit for per-user quotas"));
1639   _cupsLangPuts(stdout, _("-o job-quota-period=N   Specify the per-user quota period in seconds"));
1640   _cupsLangPuts(stdout, _("-o printer-error-policy=name\n"
1641                           "                        Specify the printer error policy"));
1642   _cupsLangPuts(stdout, _("-o printer-is-shared=true\n"
1643                           "                        Share the printer"));
1644   _cupsLangPuts(stdout, _("-o printer-op-policy=name\n"
1645                           "                        Specify the printer operation policy"));
1646   _cupsLangPuts(stdout, _("-p destination          Specify/add the named destination"));
1647   _cupsLangPuts(stdout, _("-r class                Remove the named destination from a class"));
1648   _cupsLangPuts(stdout, _("-R name-default         Remove the default value for the named option"));
1649   _cupsLangPuts(stdout, _("-u allow:all            Allow all users to print"));
1650   _cupsLangPuts(stdout, _("-u allow:list           Allow the list of users or groups (@name) to print"));
1651   _cupsLangPuts(stdout, _("-u deny:list            Prevent the list of users or groups (@name) to print"));
1652   _cupsLangPuts(stdout, _("-U username             Specify the username to use for authentication"));
1653   _cupsLangPuts(stdout, _("-v device-uri           Specify the device URI for the printer"));
1654   _cupsLangPuts(stdout, _("-x destination          Remove the named destination"));
1655 
1656   exit(1);
1657 }
1658 
1659 
1660 /*
1661  * 'validate_name()' - Make sure the printer name only contains valid chars.
1662  */
1663 
1664 static int				/* O - 0 if name is no good, 1 if name is good */
validate_name(const char * name)1665 validate_name(const char *name)		/* I - Name to check */
1666 {
1667   const char	*ptr;			/* Pointer into name */
1668 
1669 
1670  /*
1671   * Scan the whole name...
1672   */
1673 
1674   for (ptr = name; *ptr; ptr ++)
1675     if (*ptr == '@')
1676       break;
1677     else if ((*ptr >= 0 && *ptr <= ' ') || *ptr == 127 || *ptr == '/' || *ptr == '\\' || *ptr == '?' || *ptr == '\'' || *ptr == '\"' || *ptr == '#')
1678       return (0);
1679 
1680  /*
1681   * All the characters are good; validate the length, too...
1682   */
1683 
1684   return ((ptr - name) < 128);
1685 }
1686