]> git.ipfire.org Git - thirdparty/cups.git/blob - scheduler/client.c
projects / thirdparty / cups.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Fix another "new logging" bug for journald only this time (STR #4690)
[thirdparty/cups.git] / scheduler / client.c
1 /*
2 * "$Id$"
3 *
4 * Client routines for the CUPS scheduler.
5 *
6 * Copyright 2007-2015 by Apple Inc.
7 * Copyright 1997-2007 by Easy Software Products, all rights reserved.
8 *
9 * This file contains Kerberos support code, copyright 2006 by
10 * Jelmer Vernooij.
11 *
12 * These coded instructions, statements, and computer programs are the
13 * property of Apple Inc. and are protected by Federal copyright
14 * law. Distribution and use rights are outlined in the file "LICENSE.txt"
15 * which should have been included with this file. If this file is
16 * file is missing or damaged, see the license at "http://www.cups.org/".
17 */
18
19 /*
20 * Include necessary headers...
21 */
22
23 #define _CUPS_NO_DEPRECATED
24 #define _HTTP_NO_PRIVATE
25 #include "cupsd.h"
26
27 #ifdef __APPLE__
28 # include <libproc.h>
29 #endif /* __APPLE__ */
30 #ifdef HAVE_TCPD_H
31 # include <tcpd.h>
32 #endif /* HAVE_TCPD_H */
33
34
35 /*
36 * Local functions...
37 */
38
39 static int check_if_modified(cupsd_client_t *con,
40 struct stat *filestats);
41 static int compare_clients(cupsd_client_t *a, cupsd_client_t *b,
42 void *data);
43 #ifdef HAVE_SSL
44 static int cupsd_start_tls(cupsd_client_t *con, http_encryption_t e);
45 #endif /* HAVE_SSL */
46 static char *get_file(cupsd_client_t *con, struct stat *filestats,
47 char *filename, size_t len);
48 static http_status_t install_cupsd_conf(cupsd_client_t *con);
49 static int is_cgi(cupsd_client_t *con, const char *filename,
50 struct stat *filestats, mime_type_t *type);
51 static int is_path_absolute(const char *path);
52 static int pipe_command(cupsd_client_t *con, int infile, int *outfile,
53 char *command, char *options, int root);
54 static int valid_host(cupsd_client_t *con);
55 static int write_file(cupsd_client_t *con, http_status_t code,
56 char *filename, char *type,
57 struct stat *filestats);
58 static void write_pipe(cupsd_client_t *con);
59
60
61 /*
62 * 'cupsdAcceptClient()' - Accept a new client.
63 */
64
65 void
66 cupsdAcceptClient(cupsd_listener_t *lis)/* I - Listener socket */
67 {
68 const char *hostname; /* Hostname of client */
69 char name[256]; /* Hostname of client */
70 int count; /* Count of connections on a host */
71 cupsd_client_t *con, /* New client pointer */
72 *tempcon; /* Temporary client pointer */
73 socklen_t addrlen; /* Length of address */
74 http_addr_t temp; /* Temporary address variable */
75 static time_t last_dos = 0; /* Time of last DoS attack */
76 #ifdef HAVE_TCPD_H
77 struct request_info wrap_req; /* TCP wrappers request information */
78 #endif /* HAVE_TCPD_H */
79
80
81 cupsdLogMessage(CUPSD_LOG_DEBUG2,
82 "cupsdAcceptClient(lis=%p(%d)) Clients=%d",
83 lis, lis->fd, cupsArrayCount(Clients));
84
85 /*
86 * Make sure we don't have a full set of clients already...
87 */
88
89 if (cupsArrayCount(Clients) == MaxClients)
90 return;
91
92 /*
93 * Get a pointer to the next available client...
94 */
95
96 if (!Clients)
97 Clients = cupsArrayNew(NULL, NULL);
98
99 if (!Clients)
100 {
101 cupsdLogMessage(CUPSD_LOG_ERROR,
102 "Unable to allocate memory for clients array!");
103 cupsdPauseListening();
104 return;
105 }
106
107 if (!ActiveClients)
108 ActiveClients = cupsArrayNew((cups_array_func_t)compare_clients, NULL);
109
110 if (!ActiveClients)
111 {
112 cupsdLogMessage(CUPSD_LOG_ERROR,
113 "Unable to allocate memory for active clients array!");
114 cupsdPauseListening();
115 return;
116 }
117
118 if ((con = calloc(1, sizeof(cupsd_client_t))) == NULL)
119 {
120 cupsdLogMessage(CUPSD_LOG_ERROR, "Unable to allocate memory for client!");
121 cupsdPauseListening();
122 return;
123 }
124
125 /*
126 * Accept the client and get the remote address...
127 */
128
129 con->number = ++ LastClientNumber;
130 con->file = -1;
131
132 if ((con->http = httpAcceptConnection(lis->fd, 0)) == NULL)
133 {
134 if (errno == ENFILE || errno == EMFILE)
135 cupsdPauseListening();
136
137 cupsdLogMessage(CUPSD_LOG_ERROR, "Unable to accept client connection - %s.",
138 strerror(errno));
139 free(con);
140
141 return;
142 }
143
144 /*
145 * Save the connected address and port number...
146 */
147
148 con->clientaddr = lis->address;
149
150 /*
151 * Check the number of clients on the same address...
152 */
153
154 for (count = 0, tempcon = (cupsd_client_t *)cupsArrayFirst(Clients);
155 tempcon;
156 tempcon = (cupsd_client_t *)cupsArrayNext(Clients))
157 if (httpAddrEqual(httpGetAddress(tempcon->http), httpGetAddress(con->http)))
158 {
159 count ++;
160 if (count >= MaxClientsPerHost)
161 break;
162 }
163
164 if (count >= MaxClientsPerHost)
165 {
166 if ((time(NULL) - last_dos) >= 60)
167 {
168 last_dos = time(NULL);
169 cupsdLogMessage(CUPSD_LOG_WARN,
170 "Possible DoS attack - more than %d clients connecting "
171 "from %s.",
172 MaxClientsPerHost,
173 httpGetHostname(con->http, name, sizeof(name)));
174 }
175
176 httpClose(con->http);
177 free(con);
178 return;
179 }
180
181 /*
182 * Get the hostname or format the IP address as needed...
183 */
184
185 if (HostNameLookups)
186 hostname = httpResolveHostname(con->http, NULL, 0);
187 else
188 hostname = httpGetHostname(con->http, NULL, 0);
189
190 if (hostname == NULL && HostNameLookups == 2)
191 {
192 /*
193 * Can't have an unresolved IP address with double-lookups enabled...
194 */
195
196 httpClose(con->http);
197
198 cupsdLogClient(con, CUPSD_LOG_WARN,
199 "Name lookup failed - connection from %s closed!",
200 httpGetHostname(con->http, NULL, 0));
201
202 free(con);
203 return;
204 }
205
206 if (HostNameLookups == 2)
207 {
208 /*
209 * Do double lookups as needed...
210 */
211
212 http_addrlist_t *addrlist, /* List of addresses */
213 *addr; /* Current address */
214
215 if ((addrlist = httpAddrGetList(hostname, AF_UNSPEC, NULL)) != NULL)
216 {
217 /*
218 * See if the hostname maps to the same IP address...
219 */
220
221 for (addr = addrlist; addr; addr = addr->next)
222 if (httpAddrEqual(httpGetAddress(con->http), &(addr->addr)))
223 break;
224 }
225 else
226 addr = NULL;
227
228 httpAddrFreeList(addrlist);
229
230 if (!addr)
231 {
232 /*
233 * Can't have a hostname that doesn't resolve to the same IP address
234 * with double-lookups enabled...
235 */
236
237 httpClose(con->http);
238
239 cupsdLogClient(con, CUPSD_LOG_WARN,
240 "IP lookup failed - connection from %s closed!",
241 httpGetHostname(con->http, NULL, 0));
242 free(con);
243 return;
244 }
245 }
246
247 #ifdef HAVE_TCPD_H
248 /*
249 * See if the connection is denied by TCP wrappers...
250 */
251
252 request_init(&wrap_req, RQ_DAEMON, "cupsd", RQ_FILE, httpGetFd(con->http),
253 NULL);
254 fromhost(&wrap_req);
255
256 if (!hosts_access(&wrap_req))
257 {
258 httpClose(con->http);
259
260 cupsdLogClient(con, CUPSD_LOG_WARN,
261 "Connection from %s refused by /etc/hosts.allow and "
262 "/etc/hosts.deny rules.", httpGetHostname(con->http, NULL, 0));
263 free(con);
264 return;
265 }
266 #endif /* HAVE_TCPD_H */
267
268 #ifdef AF_LOCAL
269 if (httpAddrFamily(httpGetAddress(con->http)) == AF_LOCAL)
270 {
271 # ifdef __APPLE__
272 socklen_t peersize; /* Size of peer credentials */
273 pid_t peerpid; /* Peer process ID */
274 char peername[256]; /* Name of process */
275
276 peersize = sizeof(peerpid);
277 if (!getsockopt(httpGetFd(con->http), SOL_LOCAL, LOCAL_PEERPID, &peerpid,
278 &peersize))
279 {
280 if (!proc_name((int)peerpid, peername, sizeof(peername)))
281 cupsdLogClient(con, CUPSD_LOG_DEBUG,
282 "Accepted from %s (Domain ???[%d])",
283 httpGetHostname(con->http, NULL, 0), (int)peerpid);
284 else
285 cupsdLogClient(con, CUPSD_LOG_DEBUG,
286 "Accepted from %s (Domain %s[%d])",
287 httpGetHostname(con->http, NULL, 0), peername, (int)peerpid);
288 }
289 else
290 # endif /* __APPLE__ */
291
292 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Accepted from %s (Domain)",
293 httpGetHostname(con->http, NULL, 0));
294 }
295 else
296 #endif /* AF_LOCAL */
297 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Accepted from %s:%d (IPv%d)",
298 httpGetHostname(con->http, NULL, 0),
299 httpAddrPort(httpGetAddress(con->http)),
300 httpAddrFamily(httpGetAddress(con->http)) == AF_INET ? 4 : 6);
301
302 /*
303 * Get the local address the client connected to...
304 */
305
306 addrlen = sizeof(temp);
307 if (getsockname(httpGetFd(con->http), (struct sockaddr *)&temp, &addrlen))
308 {
309 cupsdLogClient(con, CUPSD_LOG_ERROR, "Unable to get local address - %s",
310 strerror(errno));
311
312 strlcpy(con->servername, "localhost", sizeof(con->servername));
313 con->serverport = LocalPort;
314 }
315 #ifdef AF_LOCAL
316 else if (httpAddrFamily(&temp) == AF_LOCAL)
317 {
318 strlcpy(con->servername, "localhost", sizeof(con->servername));
319 con->serverport = LocalPort;
320 }
321 #endif /* AF_LOCAL */
322 else
323 {
324 if (httpAddrLocalhost(&temp))
325 strlcpy(con->servername, "localhost", sizeof(con->servername));
326 else if (HostNameLookups)
327 httpAddrLookup(&temp, con->servername, sizeof(con->servername));
328 else
329 httpAddrString(&temp, con->servername, sizeof(con->servername));
330
331 con->serverport = httpAddrPort(&(lis->address));
332 }
333
334 /*
335 * Add the connection to the array of active clients...
336 */
337
338 cupsArrayAdd(Clients, con);
339
340 /*
341 * Add the socket to the server select.
342 */
343
344 cupsdAddSelect(httpGetFd(con->http), (cupsd_selfunc_t)cupsdReadClient, NULL,
345 con);
346
347 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Waiting for request.");
348
349 /*
350 * Temporarily suspend accept()'s until we lose a client...
351 */
352
353 if (cupsArrayCount(Clients) == MaxClients)
354 cupsdPauseListening();
355
356 #ifdef HAVE_SSL
357 /*
358 * See if we are connecting on a secure port...
359 */
360
361 if (lis->encryption == HTTP_ENCRYPTION_ALWAYS)
362 {
363 /*
364 * https connection; go secure...
365 */
366
367 if (cupsd_start_tls(con, HTTP_ENCRYPTION_ALWAYS))
368 cupsdCloseClient(con);
369 }
370 else
371 con->auto_ssl = 1;
372 #endif /* HAVE_SSL */
373 }
374
375
376 /*
377 * 'cupsdCloseAllClients()' - Close all remote clients immediately.
378 */
379
380 void
381 cupsdCloseAllClients(void)
382 {
383 cupsd_client_t *con; /* Current client */
384
385
386 cupsdLogMessage(CUPSD_LOG_DEBUG2, "cupsdCloseAllClients() Clients=%d",
387 cupsArrayCount(Clients));
388
389 for (con = (cupsd_client_t *)cupsArrayFirst(Clients);
390 con;
391 con = (cupsd_client_t *)cupsArrayNext(Clients))
392 if (cupsdCloseClient(con))
393 cupsdCloseClient(con);
394 }
395
396
397 /*
398 * 'cupsdCloseClient()' - Close a remote client.
399 */
400
401 int /* O - 1 if partial close, 0 if fully closed */
402 cupsdCloseClient(cupsd_client_t *con) /* I - Client to close */
403 {
404 int partial; /* Do partial close for SSL? */
405
406
407 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing connection.");
408
409 /*
410 * Flush pending writes before closing...
411 */
412
413 httpFlushWrite(con->http);
414
415 partial = 0;
416
417 if (con->pipe_pid != 0)
418 {
419 /*
420 * Stop any CGI process...
421 */
422
423 cupsdEndProcess(con->pipe_pid, 1);
424 con->pipe_pid = 0;
425 }
426
427 if (con->file >= 0)
428 {
429 cupsdRemoveSelect(con->file);
430
431 close(con->file);
432 con->file = -1;
433 }
434
435 /*
436 * Close the socket and clear the file from the input set for select()...
437 */
438
439 if (httpGetFd(con->http) >= 0)
440 {
441 cupsArrayRemove(ActiveClients, con);
442 cupsdSetBusyState();
443
444 #ifdef HAVE_SSL
445 /*
446 * Shutdown encryption as needed...
447 */
448
449 if (httpIsEncrypted(con->http))
450 partial = 1;
451 #endif /* HAVE_SSL */
452
453 if (partial)
454 {
455 /*
456 * Only do a partial close so that the encrypted client gets everything.
457 */
458
459 httpShutdown(con->http);
460 cupsdAddSelect(httpGetFd(con->http), (cupsd_selfunc_t)cupsdReadClient,
461 NULL, con);
462
463 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Waiting for socket close.");
464 }
465 else
466 {
467 /*
468 * Shut the socket down fully...
469 */
470
471 cupsdRemoveSelect(httpGetFd(con->http));
472 httpClose(con->http);
473 con->http = NULL;
474 }
475 }
476
477 if (!partial)
478 {
479 /*
480 * Free memory...
481 */
482
483 cupsdRemoveSelect(httpGetFd(con->http));
484
485 httpClose(con->http);
486
487 if (con->filename)
488 {
489 unlink(con->filename);
490 cupsdClearString(&con->filename);
491 }
492
493 cupsdClearString(&con->command);
494 cupsdClearString(&con->options);
495 cupsdClearString(&con->query_string);
496
497 if (con->request)
498 {
499 ippDelete(con->request);
500 con->request = NULL;
501 }
502
503 if (con->response)
504 {
505 ippDelete(con->response);
506 con->response = NULL;
507 }
508
509 if (con->language)
510 {
511 cupsLangFree(con->language);
512 con->language = NULL;
513 }
514
515 #ifdef HAVE_AUTHORIZATION_H
516 if (con->authref)
517 {
518 AuthorizationFree(con->authref, kAuthorizationFlagDefaults);
519 con->authref = NULL;
520 }
521 #endif /* HAVE_AUTHORIZATION_H */
522
523 /*
524 * Re-enable new client connections if we are going back under the
525 * limit...
526 */
527
528 if (cupsArrayCount(Clients) == MaxClients)
529 cupsdResumeListening();
530
531 /*
532 * Compact the list of clients as necessary...
533 */
534
535 cupsArrayRemove(Clients, con);
536
537 free(con);
538 }
539
540 return (partial);
541 }
542
543
544 /*
545 * 'cupsdReadClient()' - Read data from a client.
546 */
547
548 void
549 cupsdReadClient(cupsd_client_t *con) /* I - Client to read from */
550 {
551 char line[32768], /* Line from client... */
552 locale[64], /* Locale */
553 *ptr; /* Pointer into strings */
554 http_status_t status; /* Transfer status */
555 ipp_state_t ipp_state; /* State of IPP transfer */
556 int bytes; /* Number of bytes to POST */
557 char *filename; /* Name of file for GET/HEAD */
558 char buf[1024]; /* Buffer for real filename */
559 struct stat filestats; /* File information */
560 mime_type_t *type; /* MIME type of file */
561 cupsd_printer_t *p; /* Printer */
562 static unsigned request_id = 0; /* Request ID for temp files */
563
564
565 status = HTTP_STATUS_CONTINUE;
566
567 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
568 "cupsdReadClient "
569 "error=%d, "
570 "used=%d, "
571 "state=%s, "
572 "data_encoding=HTTP_ENCODING_%s, "
573 "data_remaining=" CUPS_LLFMT ", "
574 "request=%p(%s), "
575 "file=%d",
576 httpError(con->http), (int)httpGetReady(con->http),
577 httpStateString(httpGetState(con->http)),
578 httpIsChunked(con->http) ? "CHUNKED" : "LENGTH",
579 CUPS_LLCAST httpGetRemaining(con->http),
580 con->request,
581 con->request ? ippStateString(ippGetState(con->request)) : "",
582 con->file);
583
584 if (httpGetState(con->http) == HTTP_STATE_GET_SEND ||
585 httpGetState(con->http) == HTTP_STATE_POST_SEND ||
586 httpGetState(con->http) == HTTP_STATE_STATUS)
587 {
588 /*
589 * If we get called in the wrong state, then something went wrong with the
590 * connection and we need to shut it down...
591 */
592
593 if (!httpGetReady(con->http) && recv(httpGetFd(con->http), buf, 1, MSG_PEEK) < 1)
594 {
595 /*
596 * Connection closed...
597 */
598
599 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing on EOF.");
600 cupsdCloseClient(con);
601 return;
602 }
603
604 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing on unexpected HTTP read state %s.",
605 httpStateString(httpGetState(con->http)));
606 cupsdCloseClient(con);
607 return;
608 }
609
610 #ifdef HAVE_SSL
611 if (con->auto_ssl)
612 {
613 /*
614 * Automatically check for a SSL/TLS handshake...
615 */
616
617 con->auto_ssl = 0;
618
619 if (recv(httpGetFd(con->http), buf, 1, MSG_PEEK) == 1 &&
620 (!buf[0] || !strchr("DGHOPT", buf[0])))
621 {
622 /*
623 * Encrypt this connection...
624 */
625
626 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
627 "Saw first byte %02X, auto-negotiating "
628 "SSL/TLS session.", buf[0] & 255);
629
630 if (cupsd_start_tls(con, HTTP_ENCRYPTION_ALWAYS))
631 cupsdCloseClient(con);
632
633 return;
634 }
635 }
636 #endif /* HAVE_SSL */
637
638 switch (httpGetState(con->http))
639 {
640 case HTTP_STATE_WAITING :
641 /*
642 * See if we've received a request line...
643 */
644
645 con->operation = httpReadRequest(con->http, con->uri, sizeof(con->uri));
646 if (con->operation == HTTP_STATE_ERROR ||
647 con->operation == HTTP_STATE_UNKNOWN_METHOD ||
648 con->operation == HTTP_STATE_UNKNOWN_VERSION)
649 {
650 if (httpError(con->http))
651 cupsdLogClient(con, CUPSD_LOG_DEBUG,
652 "HTTP_STATE_WAITING Closing for error %d (%s)",
653 httpError(con->http), strerror(httpError(con->http)));
654 else
655 cupsdLogClient(con, CUPSD_LOG_DEBUG,
656 "HTTP_STATE_WAITING Closing on error: %s",
657 cupsLastErrorString());
658
659 cupsdCloseClient(con);
660 return;
661 }
662
663 /*
664 * Ignore blank request lines...
665 */
666
667 if (con->operation == HTTP_STATE_WAITING)
668 break;
669
670 /*
671 * Clear other state variables...
672 */
673
674 con->bytes = 0;
675 con->file = -1;
676 con->file_ready = 0;
677 con->pipe_pid = 0;
678 con->username[0] = '\0';
679 con->password[0] = '\0';
680
681 cupsdClearString(&con->command);
682 cupsdClearString(&con->options);
683 cupsdClearString(&con->query_string);
684
685 if (con->request)
686 {
687 ippDelete(con->request);
688 con->request = NULL;
689 }
690
691 if (con->response)
692 {
693 ippDelete(con->response);
694 con->response = NULL;
695 }
696
697 if (con->language)
698 {
699 cupsLangFree(con->language);
700 con->language = NULL;
701 }
702
703 #ifdef HAVE_GSSAPI
704 con->have_gss = 0;
705 con->gss_uid = 0;
706 #endif /* HAVE_GSSAPI */
707
708 /*
709 * Handle full URLs in the request line...
710 */
711
712 if (strcmp(con->uri, "*"))
713 {
714 char scheme[HTTP_MAX_URI], /* Method/scheme */
715 userpass[HTTP_MAX_URI], /* Username:password */
716 hostname[HTTP_MAX_URI], /* Hostname */
717 resource[HTTP_MAX_URI]; /* Resource path */
718 int port; /* Port number */
719
720 /*
721 * Separate the URI into its components...
722 */
723
724 if (httpSeparateURI(HTTP_URI_CODING_MOST, con->uri,
725 scheme, sizeof(scheme),
726 userpass, sizeof(userpass),
727 hostname, sizeof(hostname), &port,
728 resource, sizeof(resource)) < HTTP_URI_STATUS_OK)
729 {
730 cupsdLogClient(con, CUPSD_LOG_ERROR, "Bad URI \"%s\" in request.",
731 con->uri);
732 cupsdSendError(con, HTTP_STATUS_METHOD_NOT_ALLOWED, CUPSD_AUTH_NONE);
733 cupsdCloseClient(con);
734 return;
735 }
736
737 /*
738 * Only allow URIs with the servername, localhost, or an IP
739 * address...
740 */
741
742 if (strcmp(scheme, "file") &&
743 _cups_strcasecmp(hostname, ServerName) &&
744 _cups_strcasecmp(hostname, "localhost") &&
745 !cupsArrayFind(ServerAlias, hostname) &&
746 !isdigit(hostname[0]) && hostname[0] != '[')
747 {
748 /*
749 * Nope, we don't do proxies...
750 */
751
752 cupsdLogClient(con, CUPSD_LOG_ERROR, "Bad URI \"%s\" in request.",
753 con->uri);
754 cupsdSendError(con, HTTP_STATUS_METHOD_NOT_ALLOWED, CUPSD_AUTH_NONE);
755 cupsdCloseClient(con);
756 return;
757 }
758
759 /*
760 * Copy the resource portion back into the URI; both resource and
761 * con->uri are HTTP_MAX_URI bytes in size...
762 */
763
764 strlcpy(con->uri, resource, sizeof(con->uri));
765 }
766
767 /*
768 * Process the request...
769 */
770
771 gettimeofday(&(con->start), NULL);
772
773 cupsdLogClient(con, CUPSD_LOG_DEBUG, "%s %s HTTP/%d.%d",
774 httpStateString(con->operation) + 11, con->uri,
775 httpGetVersion(con->http) / 100,
776 httpGetVersion(con->http) % 100);
777
778 if (!cupsArrayFind(ActiveClients, con))
779 {
780 cupsArrayAdd(ActiveClients, con);
781 cupsdSetBusyState();
782 }
783
784 case HTTP_STATE_OPTIONS :
785 case HTTP_STATE_DELETE :
786 case HTTP_STATE_GET :
787 case HTTP_STATE_HEAD :
788 case HTTP_STATE_POST :
789 case HTTP_STATE_PUT :
790 case HTTP_STATE_TRACE :
791 /*
792 * Parse incoming parameters until the status changes...
793 */
794
795 while ((status = httpUpdate(con->http)) == HTTP_STATUS_CONTINUE)
796 if (!httpGetReady(con->http))
797 break;
798
799 if (status != HTTP_STATUS_OK && status != HTTP_STATUS_CONTINUE)
800 {
801 if (httpError(con->http) && httpError(con->http) != EPIPE)
802 cupsdLogClient(con, CUPSD_LOG_DEBUG,
803 "Closing for error %d (%s) while reading headers.",
804 httpError(con->http), strerror(httpError(con->http)));
805 else
806 cupsdLogClient(con, CUPSD_LOG_DEBUG,
807 "Closing on EOF while reading headers.");
808
809 cupsdSendError(con, HTTP_STATUS_BAD_REQUEST, CUPSD_AUTH_NONE);
810 cupsdCloseClient(con);
811 return;
812 }
813 break;
814
815 default :
816 if (!httpGetReady(con->http) && recv(httpGetFd(con->http), buf, 1, MSG_PEEK) < 1)
817 {
818 /*
819 * Connection closed...
820 */
821
822 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing on EOF.");
823 cupsdCloseClient(con);
824 return;
825 }
826 break; /* Anti-compiler-warning-code */
827 }
828
829 /*
830 * Handle new transfers...
831 */
832
833 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Read: status=%d", status);
834
835 if (status == HTTP_STATUS_OK)
836 {
837 if (httpGetField(con->http, HTTP_FIELD_ACCEPT_LANGUAGE)[0])
838 {
839 /*
840 * Figure out the locale from the Accept-Language and Content-Type
841 * fields...
842 */
843
844 if ((ptr = strchr(httpGetField(con->http, HTTP_FIELD_ACCEPT_LANGUAGE),
845 ',')) != NULL)
846 *ptr = '\0';
847
848 if ((ptr = strchr(httpGetField(con->http, HTTP_FIELD_ACCEPT_LANGUAGE),
849 ';')) != NULL)
850 *ptr = '\0';
851
852 if ((ptr = strstr(httpGetField(con->http, HTTP_FIELD_CONTENT_TYPE),
853 "charset=")) != NULL)
854 {
855 /*
856 * Combine language and charset, and trim any extra params in the
857 * content-type.
858 */
859
860 snprintf(locale, sizeof(locale), "%s.%s",
861 httpGetField(con->http, HTTP_FIELD_ACCEPT_LANGUAGE), ptr + 8);
862
863 if ((ptr = strchr(locale, ',')) != NULL)
864 *ptr = '\0';
865 }
866 else
867 snprintf(locale, sizeof(locale), "%s.UTF-8",
868 httpGetField(con->http, HTTP_FIELD_ACCEPT_LANGUAGE));
869
870 con->language = cupsLangGet(locale);
871 }
872 else
873 con->language = cupsLangGet(DefaultLocale);
874
875 cupsdAuthorize(con);
876
877 if (!_cups_strncasecmp(httpGetField(con->http, HTTP_FIELD_CONNECTION),
878 "Keep-Alive", 10) && KeepAlive)
879 httpSetKeepAlive(con->http, HTTP_KEEPALIVE_ON);
880 else if (!_cups_strncasecmp(httpGetField(con->http, HTTP_FIELD_CONNECTION),
881 "close", 5))
882 httpSetKeepAlive(con->http, HTTP_KEEPALIVE_OFF);
883
884 if (!httpGetField(con->http, HTTP_FIELD_HOST)[0] &&
885 httpGetVersion(con->http) >= HTTP_VERSION_1_1)
886 {
887 /*
888 * HTTP/1.1 and higher require the "Host:" field...
889 */
890
891 if (!cupsdSendError(con, HTTP_STATUS_BAD_REQUEST, CUPSD_AUTH_NONE))
892 {
893 cupsdLogClient(con, CUPSD_LOG_ERROR, "Missing Host: field in request.");
894 cupsdCloseClient(con);
895 return;
896 }
897 }
898 else if (!valid_host(con))
899 {
900 /*
901 * Access to localhost must use "localhost" or the corresponding IPv4
902 * or IPv6 values in the Host: field.
903 */
904
905 cupsdLogClient(con, CUPSD_LOG_ERROR,
906 "Request from \"%s\" using invalid Host: field \"%s\".",
907 httpGetHostname(con->http, NULL, 0), httpGetField(con->http, HTTP_FIELD_HOST));
908
909 if (!cupsdSendError(con, HTTP_STATUS_BAD_REQUEST, CUPSD_AUTH_NONE))
910 {
911 cupsdCloseClient(con);
912 return;
913 }
914 }
915 else if (con->operation == HTTP_STATE_OPTIONS)
916 {
917 /*
918 * Do OPTIONS command...
919 */
920
921 if (con->best && con->best->type != CUPSD_AUTH_NONE)
922 {
923 httpClearFields(con->http);
924
925 if (!cupsdSendHeader(con, HTTP_STATUS_UNAUTHORIZED, NULL, CUPSD_AUTH_NONE))
926 {
927 cupsdCloseClient(con);
928 return;
929 }
930 }
931
932 if (!_cups_strcasecmp(httpGetField(con->http, HTTP_FIELD_CONNECTION), "Upgrade") && strstr(httpGetField(con->http, HTTP_FIELD_UPGRADE), "TLS/") != NULL && !httpIsEncrypted(con->http))
933 {
934 #ifdef HAVE_SSL
935 /*
936 * Do encryption stuff...
937 */
938
939 httpClearFields(con->http);
940
941 if (!cupsdSendHeader(con, HTTP_STATUS_SWITCHING_PROTOCOLS, NULL, CUPSD_AUTH_NONE))
942 {
943 cupsdCloseClient(con);
944 return;
945 }
946
947 if (cupsd_start_tls(con, HTTP_ENCRYPTION_REQUIRED))
948 {
949 cupsdCloseClient(con);
950 return;
951 }
952 #else
953 if (!cupsdSendError(con, HTTP_STATUS_NOT_IMPLEMENTED, CUPSD_AUTH_NONE))
954 {
955 cupsdCloseClient(con);
956 return;
957 }
958 #endif /* HAVE_SSL */
959 }
960
961 httpClearFields(con->http);
962 httpSetField(con->http, HTTP_FIELD_ALLOW,
963 "GET, HEAD, OPTIONS, POST, PUT");
964 httpSetField(con->http, HTTP_FIELD_CONTENT_LENGTH, "0");
965
966 if (!cupsdSendHeader(con, HTTP_STATUS_OK, NULL, CUPSD_AUTH_NONE))
967 {
968 cupsdCloseClient(con);
969 return;
970 }
971 }
972 else if (!is_path_absolute(con->uri))
973 {
974 /*
975 * Protect against malicious users!
976 */
977
978 cupsdLogClient(con, CUPSD_LOG_ERROR,
979 "Request for non-absolute resource \"%s\".", con->uri);
980
981 if (!cupsdSendError(con, HTTP_STATUS_FORBIDDEN, CUPSD_AUTH_NONE))
982 {
983 cupsdCloseClient(con);
984 return;
985 }
986 }
987 else
988 {
989 if (!_cups_strcasecmp(httpGetField(con->http, HTTP_FIELD_CONNECTION),
990 "Upgrade") && !httpIsEncrypted(con->http))
991 {
992 #ifdef HAVE_SSL
993 /*
994 * Do encryption stuff...
995 */
996
997 httpClearFields(con->http);
998
999 if (!cupsdSendHeader(con, HTTP_STATUS_SWITCHING_PROTOCOLS, NULL,
1000 CUPSD_AUTH_NONE))
1001 {
1002 cupsdCloseClient(con);
1003 return;
1004 }
1005
1006 if (cupsd_start_tls(con, HTTP_ENCRYPTION_REQUIRED))
1007 {
1008 cupsdCloseClient(con);
1009 return;
1010 }
1011 #else
1012 if (!cupsdSendError(con, HTTP_STATUS_NOT_IMPLEMENTED, CUPSD_AUTH_NONE))
1013 {
1014 cupsdCloseClient(con);
1015 return;
1016 }
1017 #endif /* HAVE_SSL */
1018 }
1019
1020 if ((status = cupsdIsAuthorized(con, NULL)) != HTTP_STATUS_OK)
1021 {
1022 cupsdSendError(con, status, CUPSD_AUTH_NONE);
1023 cupsdCloseClient(con);
1024 return;
1025 }
1026
1027 if (httpGetExpect(con->http) &&
1028 (con->operation == HTTP_STATE_POST || con->operation == HTTP_STATE_PUT))
1029 {
1030 if (httpGetExpect(con->http) == HTTP_STATUS_CONTINUE)
1031 {
1032 /*
1033 * Send 100-continue header...
1034 */
1035
1036 if (httpWriteResponse(con->http, HTTP_STATUS_CONTINUE))
1037 {
1038 cupsdCloseClient(con);
1039 return;
1040 }
1041 }
1042 else
1043 {
1044 /*
1045 * Send 417-expectation-failed header...
1046 */
1047
1048 httpClearFields(con->http);
1049 httpSetField(con->http, HTTP_FIELD_CONTENT_LENGTH, "0");
1050
1051 cupsdSendError(con, HTTP_STATUS_EXPECTATION_FAILED, CUPSD_AUTH_NONE);
1052 cupsdCloseClient(con);
1053 return;
1054 }
1055 }
1056
1057 switch (httpGetState(con->http))
1058 {
1059 case HTTP_STATE_GET_SEND :
1060 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Processing GET %s", con->uri);
1061
1062 if ((!strncmp(con->uri, "/ppd/", 5) ||
1063 !strncmp(con->uri, "/printers/", 10) ||
1064 !strncmp(con->uri, "/classes/", 9)) &&
1065 !strcmp(con->uri + strlen(con->uri) - 4, ".ppd"))
1066 {
1067 /*
1068 * Send PPD file - get the real printer name since printer
1069 * names are not case sensitive but filenames can be...
1070 */
1071
1072 con->uri[strlen(con->uri) - 4] = '\0'; /* Drop ".ppd" */
1073
1074 if (!strncmp(con->uri, "/ppd/", 5))
1075 p = cupsdFindPrinter(con->uri + 5);
1076 else if (!strncmp(con->uri, "/printers/", 10))
1077 p = cupsdFindPrinter(con->uri + 10);
1078 else
1079 {
1080 p = cupsdFindClass(con->uri + 9);
1081
1082 if (p)
1083 {
1084 int i; /* Looping var */
1085
1086 for (i = 0; i < p->num_printers; i ++)
1087 {
1088 if (!(p->printers[i]->type & CUPS_PRINTER_CLASS))
1089 {
1090 char ppdname[1024];/* PPD filename */
1091
1092 snprintf(ppdname, sizeof(ppdname), "%s/ppd/%s.ppd",
1093 ServerRoot, p->printers[i]->name);
1094 if (!access(ppdname, 0))
1095 {
1096 p = p->printers[i];
1097 break;
1098 }
1099 }
1100 }
1101
1102 if (i >= p->num_printers)
1103 p = NULL;
1104 }
1105 }
1106
1107 if (p)
1108 {
1109 snprintf(con->uri, sizeof(con->uri), "/ppd/%s.ppd", p->name);
1110 }
1111 else
1112 {
1113 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
1114 {
1115 cupsdCloseClient(con);
1116 return;
1117 }
1118
1119 break;
1120 }
1121 }
1122 else if ((!strncmp(con->uri, "/icons/", 7) ||
1123 !strncmp(con->uri, "/printers/", 10) ||
1124 !strncmp(con->uri, "/classes/", 9)) &&
1125 !strcmp(con->uri + strlen(con->uri) - 4, ".png"))
1126 {
1127 /*
1128 * Send icon file - get the real queue name since queue names are
1129 * not case sensitive but filenames can be...
1130 */
1131
1132 con->uri[strlen(con->uri) - 4] = '\0'; /* Drop ".png" */
1133
1134 if (!strncmp(con->uri, "/icons/", 7))
1135 p = cupsdFindPrinter(con->uri + 7);
1136 else if (!strncmp(con->uri, "/printers/", 10))
1137 p = cupsdFindPrinter(con->uri + 10);
1138 else
1139 {
1140 p = cupsdFindClass(con->uri + 9);
1141
1142 if (p)
1143 {
1144 int i; /* Looping var */
1145
1146 for (i = 0; i < p->num_printers; i ++)
1147 {
1148 if (!(p->printers[i]->type & CUPS_PRINTER_CLASS))
1149 {
1150 char ppdname[1024];/* PPD filename */
1151
1152 snprintf(ppdname, sizeof(ppdname), "%s/ppd/%s.ppd",
1153 ServerRoot, p->printers[i]->name);
1154 if (!access(ppdname, 0))
1155 {
1156 p = p->printers[i];
1157 break;
1158 }
1159 }
1160 }
1161
1162 if (i >= p->num_printers)
1163 p = NULL;
1164 }
1165 }
1166
1167 if (p)
1168 snprintf(con->uri, sizeof(con->uri), "/icons/%s.png", p->name);
1169 else
1170 {
1171 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
1172 {
1173 cupsdCloseClient(con);
1174 return;
1175 }
1176
1177 break;
1178 }
1179 }
1180 else if (!WebInterface)
1181 {
1182 /*
1183 * Web interface is disabled. Show an appropriate message...
1184 */
1185
1186 if (!cupsdSendError(con, HTTP_STATUS_CUPS_WEBIF_DISABLED, CUPSD_AUTH_NONE))
1187 {
1188 cupsdCloseClient(con);
1189 return;
1190 }
1191
1192 break;
1193 }
1194
1195 if ((!strncmp(con->uri, "/admin", 6) &&
1196 strncmp(con->uri, "/admin/conf/", 12) &&
1197 strncmp(con->uri, "/admin/log/", 11)) ||
1198 !strncmp(con->uri, "/printers", 9) ||
1199 !strncmp(con->uri, "/classes", 8) ||
1200 !strncmp(con->uri, "/help", 5) ||
1201 !strncmp(con->uri, "/jobs", 5))
1202 {
1203 /*
1204 * Send CGI output...
1205 */
1206
1207 if (!strncmp(con->uri, "/admin", 6))
1208 {
1209 cupsdSetStringf(&con->command, "%s/cgi-bin/admin.cgi",
1210 ServerBin);
1211
1212 cupsdSetString(&con->options, strchr(con->uri + 6, '?'));
1213 }
1214 else if (!strncmp(con->uri, "/printers", 9))
1215 {
1216 cupsdSetStringf(&con->command, "%s/cgi-bin/printers.cgi",
1217 ServerBin);
1218
1219 if (con->uri[9] && con->uri[10])
1220 cupsdSetString(&con->options, con->uri + 9);
1221 else
1222 cupsdSetString(&con->options, NULL);
1223 }
1224 else if (!strncmp(con->uri, "/classes", 8))
1225 {
1226 cupsdSetStringf(&con->command, "%s/cgi-bin/classes.cgi",
1227 ServerBin);
1228
1229 if (con->uri[8] && con->uri[9])
1230 cupsdSetString(&con->options, con->uri + 8);
1231 else
1232 cupsdSetString(&con->options, NULL);
1233 }
1234 else if (!strncmp(con->uri, "/jobs", 5))
1235 {
1236 cupsdSetStringf(&con->command, "%s/cgi-bin/jobs.cgi",
1237 ServerBin);
1238
1239 if (con->uri[5] && con->uri[6])
1240 cupsdSetString(&con->options, con->uri + 5);
1241 else
1242 cupsdSetString(&con->options, NULL);
1243 }
1244 else
1245 {
1246 cupsdSetStringf(&con->command, "%s/cgi-bin/help.cgi",
1247 ServerBin);
1248
1249 if (con->uri[5] && con->uri[6])
1250 cupsdSetString(&con->options, con->uri + 5);
1251 else
1252 cupsdSetString(&con->options, NULL);
1253 }
1254
1255 if (!cupsdSendCommand(con, con->command, con->options, 0))
1256 {
1257 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
1258 {
1259 cupsdCloseClient(con);
1260 return;
1261 }
1262 }
1263 else
1264 cupsdLogRequest(con, HTTP_STATUS_OK);
1265
1266 if (httpGetVersion(con->http) <= HTTP_VERSION_1_0)
1267 httpSetKeepAlive(con->http, HTTP_KEEPALIVE_OFF);
1268 }
1269 else if ((!strncmp(con->uri, "/admin/conf/", 12) &&
1270 (strchr(con->uri + 12, '/') ||
1271 strlen(con->uri) == 12)) ||
1272 (!strncmp(con->uri, "/admin/log/", 11) &&
1273 (strchr(con->uri + 11, '/') ||
1274 strlen(con->uri) == 11)))
1275 {
1276 /*
1277 * GET can only be done to configuration files directly under
1278 * /admin/conf...
1279 */
1280
1281 cupsdLogClient(con, CUPSD_LOG_ERROR,
1282 "Request for subdirectory \"%s\"!", con->uri);
1283
1284 if (!cupsdSendError(con, HTTP_STATUS_FORBIDDEN, CUPSD_AUTH_NONE))
1285 {
1286 cupsdCloseClient(con);
1287 return;
1288 }
1289
1290 break;
1291 }
1292 else
1293 {
1294 /*
1295 * Serve a file...
1296 */
1297
1298 if ((filename = get_file(con, &filestats, buf,
1299 sizeof(buf))) == NULL)
1300 {
1301 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
1302 {
1303 cupsdCloseClient(con);
1304 return;
1305 }
1306
1307 break;
1308 }
1309
1310 type = mimeFileType(MimeDatabase, filename, NULL, NULL);
1311
1312 cupsdLogClient(con, CUPSD_LOG_DEBUG, "filename=\"%s\", type=%s/%s", filename, type ? type->super : "", type ? type->type : "");
1313
1314 if (is_cgi(con, filename, &filestats, type))
1315 {
1316 /*
1317 * Note: con->command and con->options were set by
1318 * is_cgi()...
1319 */
1320
1321 if (!cupsdSendCommand(con, con->command, con->options, 0))
1322 {
1323 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
1324 {
1325 cupsdCloseClient(con);
1326 return;
1327 }
1328 }
1329 else
1330 cupsdLogRequest(con, HTTP_STATUS_OK);
1331
1332 if (httpGetVersion(con->http) <= HTTP_VERSION_1_0)
1333 httpSetKeepAlive(con->http, HTTP_KEEPALIVE_OFF);
1334 break;
1335 }
1336
1337 if (!check_if_modified(con, &filestats))
1338 {
1339 if (!cupsdSendError(con, HTTP_STATUS_NOT_MODIFIED, CUPSD_AUTH_NONE))
1340 {
1341 cupsdCloseClient(con);
1342 return;
1343 }
1344 }
1345 else
1346 {
1347 if (type == NULL)
1348 strlcpy(line, "text/plain", sizeof(line));
1349 else
1350 snprintf(line, sizeof(line), "%s/%s", type->super, type->type);
1351
1352 if (!write_file(con, HTTP_STATUS_OK, filename, line, &filestats))
1353 {
1354 cupsdCloseClient(con);
1355 return;
1356 }
1357 }
1358 }
1359 break;
1360
1361 case HTTP_STATE_POST_RECV :
1362 /*
1363 * See if the POST request includes a Content-Length field, and if
1364 * so check the length against any limits that are set...
1365 */
1366
1367 if (httpGetField(con->http, HTTP_FIELD_CONTENT_LENGTH)[0] &&
1368 MaxRequestSize > 0 &&
1369 httpGetLength2(con->http) > MaxRequestSize)
1370 {
1371 /*
1372 * Request too large...
1373 */
1374
1375 if (!cupsdSendError(con, HTTP_STATUS_REQUEST_TOO_LARGE, CUPSD_AUTH_NONE))
1376 {
1377 cupsdCloseClient(con);
1378 return;
1379 }
1380
1381 break;
1382 }
1383 else if (httpGetLength2(con->http) < 0)
1384 {
1385 /*
1386 * Negative content lengths are invalid!
1387 */
1388
1389 if (!cupsdSendError(con, HTTP_STATUS_BAD_REQUEST, CUPSD_AUTH_NONE))
1390 {
1391 cupsdCloseClient(con);
1392 return;
1393 }
1394
1395 break;
1396 }
1397
1398 /*
1399 * See what kind of POST request this is; for IPP requests the
1400 * content-type field will be "application/ipp"...
1401 */
1402
1403 if (!strcmp(httpGetField(con->http, HTTP_FIELD_CONTENT_TYPE),
1404 "application/ipp"))
1405 con->request = ippNew();
1406 else if (!WebInterface)
1407 {
1408 /*
1409 * Web interface is disabled. Show an appropriate message...
1410 */
1411
1412 if (!cupsdSendError(con, HTTP_STATUS_CUPS_WEBIF_DISABLED, CUPSD_AUTH_NONE))
1413 {
1414 cupsdCloseClient(con);
1415 return;
1416 }
1417
1418 break;
1419 }
1420 else if ((!strncmp(con->uri, "/admin", 6) &&
1421 strncmp(con->uri, "/admin/conf/", 12) &&
1422 strncmp(con->uri, "/admin/log/", 11)) ||
1423 !strncmp(con->uri, "/printers", 9) ||
1424 !strncmp(con->uri, "/classes", 8) ||
1425 !strncmp(con->uri, "/help", 5) ||
1426 !strncmp(con->uri, "/jobs", 5))
1427 {
1428 /*
1429 * CGI request...
1430 */
1431
1432 if (!strncmp(con->uri, "/admin", 6))
1433 {
1434 cupsdSetStringf(&con->command, "%s/cgi-bin/admin.cgi",
1435 ServerBin);
1436
1437 cupsdSetString(&con->options, strchr(con->uri + 6, '?'));
1438 }
1439 else if (!strncmp(con->uri, "/printers", 9))
1440 {
1441 cupsdSetStringf(&con->command, "%s/cgi-bin/printers.cgi",
1442 ServerBin);
1443
1444 if (con->uri[9] && con->uri[10])
1445 cupsdSetString(&con->options, con->uri + 9);
1446 else
1447 cupsdSetString(&con->options, NULL);
1448 }
1449 else if (!strncmp(con->uri, "/classes", 8))
1450 {
1451 cupsdSetStringf(&con->command, "%s/cgi-bin/classes.cgi",
1452 ServerBin);
1453
1454 if (con->uri[8] && con->uri[9])
1455 cupsdSetString(&con->options, con->uri + 8);
1456 else
1457 cupsdSetString(&con->options, NULL);
1458 }
1459 else if (!strncmp(con->uri, "/jobs", 5))
1460 {
1461 cupsdSetStringf(&con->command, "%s/cgi-bin/jobs.cgi",
1462 ServerBin);
1463
1464 if (con->uri[5] && con->uri[6])
1465 cupsdSetString(&con->options, con->uri + 5);
1466 else
1467 cupsdSetString(&con->options, NULL);
1468 }
1469 else
1470 {
1471 cupsdSetStringf(&con->command, "%s/cgi-bin/help.cgi",
1472 ServerBin);
1473
1474 if (con->uri[5] && con->uri[6])
1475 cupsdSetString(&con->options, con->uri + 5);
1476 else
1477 cupsdSetString(&con->options, NULL);
1478 }
1479
1480 if (httpGetVersion(con->http) <= HTTP_VERSION_1_0)
1481 httpSetKeepAlive(con->http, HTTP_KEEPALIVE_OFF);
1482 }
1483 else
1484 {
1485 /*
1486 * POST to a file...
1487 */
1488
1489 if ((filename = get_file(con, &filestats, buf,
1490 sizeof(buf))) == NULL)
1491 {
1492 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
1493 {
1494 cupsdCloseClient(con);
1495 return;
1496 }
1497
1498 break;
1499 }
1500
1501 type = mimeFileType(MimeDatabase, filename, NULL, NULL);
1502
1503 if (!is_cgi(con, filename, &filestats, type))
1504 {
1505 /*
1506 * Only POST to CGI's...
1507 */
1508
1509 if (!cupsdSendError(con, HTTP_STATUS_UNAUTHORIZED, CUPSD_AUTH_NONE))
1510 {
1511 cupsdCloseClient(con);
1512 return;
1513 }
1514 }
1515 }
1516 break;
1517
1518 case HTTP_STATE_PUT_RECV :
1519 /*
1520 * Validate the resource name...
1521 */
1522
1523 if (strcmp(con->uri, "/admin/conf/cupsd.conf"))
1524 {
1525 /*
1526 * PUT can only be done to the cupsd.conf file...
1527 */
1528
1529 cupsdLogClient(con, CUPSD_LOG_ERROR,
1530 "Disallowed PUT request for \"%s\".", con->uri);
1531
1532 if (!cupsdSendError(con, HTTP_STATUS_FORBIDDEN, CUPSD_AUTH_NONE))
1533 {
1534 cupsdCloseClient(con);
1535 return;
1536 }
1537
1538 break;
1539 }
1540
1541 /*
1542 * See if the PUT request includes a Content-Length field, and if
1543 * so check the length against any limits that are set...
1544 */
1545
1546 if (httpGetField(con->http, HTTP_FIELD_CONTENT_LENGTH)[0] &&
1547 MaxRequestSize > 0 &&
1548 httpGetLength2(con->http) > MaxRequestSize)
1549 {
1550 /*
1551 * Request too large...
1552 */
1553
1554 if (!cupsdSendError(con, HTTP_STATUS_REQUEST_TOO_LARGE, CUPSD_AUTH_NONE))
1555 {
1556 cupsdCloseClient(con);
1557 return;
1558 }
1559
1560 break;
1561 }
1562 else if (httpGetLength2(con->http) < 0)
1563 {
1564 /*
1565 * Negative content lengths are invalid!
1566 */
1567
1568 if (!cupsdSendError(con, HTTP_STATUS_BAD_REQUEST, CUPSD_AUTH_NONE))
1569 {
1570 cupsdCloseClient(con);
1571 return;
1572 }
1573
1574 break;
1575 }
1576
1577 /*
1578 * Open a temporary file to hold the request...
1579 */
1580
1581 cupsdSetStringf(&con->filename, "%s/%08x", RequestRoot,
1582 request_id ++);
1583 con->file = open(con->filename, O_WRONLY | O_CREAT | O_TRUNC, 0640);
1584
1585 if (con->file < 0)
1586 {
1587 cupsdLogClient(con, CUPSD_LOG_ERROR,
1588 "Unable to create request file \"%s\": %s",
1589 con->filename, strerror(errno));
1590
1591 if (!cupsdSendError(con, HTTP_STATUS_REQUEST_TOO_LARGE, CUPSD_AUTH_NONE))
1592 {
1593 cupsdCloseClient(con);
1594 return;
1595 }
1596 }
1597
1598 fchmod(con->file, 0640);
1599 fchown(con->file, RunUser, Group);
1600 fcntl(con->file, F_SETFD, fcntl(con->file, F_GETFD) | FD_CLOEXEC);
1601 break;
1602
1603 case HTTP_STATE_DELETE :
1604 case HTTP_STATE_TRACE :
1605 cupsdSendError(con, HTTP_STATUS_NOT_IMPLEMENTED, CUPSD_AUTH_NONE);
1606 cupsdCloseClient(con);
1607 return;
1608
1609 case HTTP_STATE_HEAD :
1610 if (!strncmp(con->uri, "/printers/", 10) &&
1611 !strcmp(con->uri + strlen(con->uri) - 4, ".ppd"))
1612 {
1613 /*
1614 * Send PPD file - get the real printer name since printer
1615 * names are not case sensitive but filenames can be...
1616 */
1617
1618 con->uri[strlen(con->uri) - 4] = '\0'; /* Drop ".ppd" */
1619
1620 if ((p = cupsdFindPrinter(con->uri + 10)) != NULL)
1621 snprintf(con->uri, sizeof(con->uri), "/ppd/%s.ppd", p->name);
1622 else
1623 {
1624 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
1625 {
1626 cupsdCloseClient(con);
1627 return;
1628 }
1629
1630 cupsdLogRequest(con, HTTP_STATUS_NOT_FOUND);
1631 break;
1632 }
1633 }
1634 else if (!strncmp(con->uri, "/printers/", 10) &&
1635 !strcmp(con->uri + strlen(con->uri) - 4, ".png"))
1636 {
1637 /*
1638 * Send PNG file - get the real printer name since printer
1639 * names are not case sensitive but filenames can be...
1640 */
1641
1642 con->uri[strlen(con->uri) - 4] = '\0'; /* Drop ".ppd" */
1643
1644 if ((p = cupsdFindPrinter(con->uri + 10)) != NULL)
1645 snprintf(con->uri, sizeof(con->uri), "/icons/%s.png", p->name);
1646 else
1647 {
1648 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
1649 {
1650 cupsdCloseClient(con);
1651 return;
1652 }
1653
1654 cupsdLogRequest(con, HTTP_STATUS_NOT_FOUND);
1655 break;
1656 }
1657 }
1658 else if (!WebInterface)
1659 {
1660 httpClearFields(con->http);
1661
1662 if (!cupsdSendHeader(con, HTTP_STATUS_OK, NULL, CUPSD_AUTH_NONE))
1663 {
1664 cupsdCloseClient(con);
1665 return;
1666 }
1667
1668 cupsdLogRequest(con, HTTP_STATUS_OK);
1669 break;
1670 }
1671
1672 if ((!strncmp(con->uri, "/admin", 6) &&
1673 strncmp(con->uri, "/admin/conf/", 12) &&
1674 strncmp(con->uri, "/admin/log/", 11)) ||
1675 !strncmp(con->uri, "/printers", 9) ||
1676 !strncmp(con->uri, "/classes", 8) ||
1677 !strncmp(con->uri, "/help", 5) ||
1678 !strncmp(con->uri, "/jobs", 5))
1679 {
1680 /*
1681 * CGI output...
1682 */
1683
1684 httpClearFields(con->http);
1685
1686 if (!cupsdSendHeader(con, HTTP_STATUS_OK, "text/html", CUPSD_AUTH_NONE))
1687 {
1688 cupsdCloseClient(con);
1689 return;
1690 }
1691
1692 cupsdLogRequest(con, HTTP_STATUS_OK);
1693 }
1694 else if ((!strncmp(con->uri, "/admin/conf/", 12) &&
1695 (strchr(con->uri + 12, '/') ||
1696 strlen(con->uri) == 12)) ||
1697 (!strncmp(con->uri, "/admin/log/", 11) &&
1698 (strchr(con->uri + 11, '/') ||
1699 strlen(con->uri) == 11)))
1700 {
1701 /*
1702 * HEAD can only be done to configuration files under
1703 * /admin/conf...
1704 */
1705
1706 cupsdLogClient(con, CUPSD_LOG_ERROR,
1707 "Request for subdirectory \"%s\".", con->uri);
1708
1709 if (!cupsdSendError(con, HTTP_STATUS_FORBIDDEN, CUPSD_AUTH_NONE))
1710 {
1711 cupsdCloseClient(con);
1712 return;
1713 }
1714
1715 cupsdLogRequest(con, HTTP_STATUS_FORBIDDEN);
1716 break;
1717 }
1718 else if ((filename = get_file(con, &filestats, buf,
1719 sizeof(buf))) == NULL)
1720 {
1721 httpClearFields(con->http);
1722
1723 if (!cupsdSendHeader(con, HTTP_STATUS_NOT_FOUND, "text/html",
1724 CUPSD_AUTH_NONE))
1725 {
1726 cupsdCloseClient(con);
1727 return;
1728 }
1729
1730 cupsdLogRequest(con, HTTP_STATUS_NOT_FOUND);
1731 }
1732 else if (!check_if_modified(con, &filestats))
1733 {
1734 if (!cupsdSendError(con, HTTP_STATUS_NOT_MODIFIED, CUPSD_AUTH_NONE))
1735 {
1736 cupsdCloseClient(con);
1737 return;
1738 }
1739
1740 cupsdLogRequest(con, HTTP_STATUS_NOT_MODIFIED);
1741 }
1742 else
1743 {
1744 /*
1745 * Serve a file...
1746 */
1747
1748 type = mimeFileType(MimeDatabase, filename, NULL, NULL);
1749 if (type == NULL)
1750 strlcpy(line, "text/plain", sizeof(line));
1751 else
1752 snprintf(line, sizeof(line), "%s/%s", type->super, type->type);
1753
1754 httpClearFields(con->http);
1755
1756 httpSetField(con->http, HTTP_FIELD_LAST_MODIFIED,
1757 httpGetDateString(filestats.st_mtime));
1758 httpSetLength(con->http, (size_t)filestats.st_size);
1759
1760 if (!cupsdSendHeader(con, HTTP_STATUS_OK, line, CUPSD_AUTH_NONE))
1761 {
1762 cupsdCloseClient(con);
1763 return;
1764 }
1765
1766 cupsdLogRequest(con, HTTP_STATUS_OK);
1767 }
1768 break;
1769
1770 default :
1771 break; /* Anti-compiler-warning-code */
1772 }
1773 }
1774 }
1775
1776 /*
1777 * Handle any incoming data...
1778 */
1779
1780 switch (httpGetState(con->http))
1781 {
1782 case HTTP_STATE_PUT_RECV :
1783 do
1784 {
1785 if ((bytes = httpRead2(con->http, line, sizeof(line))) < 0)
1786 {
1787 if (httpError(con->http) && httpError(con->http) != EPIPE)
1788 cupsdLogClient(con, CUPSD_LOG_DEBUG,
1789 "HTTP_STATE_PUT_RECV Closing for error %d (%s)",
1790 httpError(con->http), strerror(httpError(con->http)));
1791 else
1792 cupsdLogClient(con, CUPSD_LOG_DEBUG,
1793 "HTTP_STATE_PUT_RECV Closing on EOF.");
1794
1795 cupsdCloseClient(con);
1796 return;
1797 }
1798 else if (bytes > 0)
1799 {
1800 con->bytes += bytes;
1801
1802 if (write(con->file, line, (size_t)bytes) < bytes)
1803 {
1804 cupsdLogClient(con, CUPSD_LOG_ERROR,
1805 "Unable to write %d bytes to \"%s\": %s", bytes,
1806 con->filename, strerror(errno));
1807
1808 close(con->file);
1809 con->file = -1;
1810 unlink(con->filename);
1811 cupsdClearString(&con->filename);
1812
1813 if (!cupsdSendError(con, HTTP_STATUS_REQUEST_TOO_LARGE, CUPSD_AUTH_NONE))
1814 {
1815 cupsdCloseClient(con);
1816 return;
1817 }
1818 }
1819 }
1820 }
1821 while (httpGetState(con->http) == HTTP_STATE_PUT_RECV && httpGetReady(con->http));
1822
1823 if (httpGetState(con->http) == HTTP_STATE_STATUS)
1824 {
1825 /*
1826 * End of file, see how big it is...
1827 */
1828
1829 fstat(con->file, &filestats);
1830
1831 close(con->file);
1832 con->file = -1;
1833
1834 if (filestats.st_size > MaxRequestSize &&
1835 MaxRequestSize > 0)
1836 {
1837 /*
1838 * Request is too big; remove it and send an error...
1839 */
1840
1841 unlink(con->filename);
1842 cupsdClearString(&con->filename);
1843
1844 if (!cupsdSendError(con, HTTP_STATUS_REQUEST_TOO_LARGE, CUPSD_AUTH_NONE))
1845 {
1846 cupsdCloseClient(con);
1847 return;
1848 }
1849 }
1850
1851 /*
1852 * Install the configuration file...
1853 */
1854
1855 status = install_cupsd_conf(con);
1856
1857 /*
1858 * Return the status to the client...
1859 */
1860
1861 if (!cupsdSendError(con, status, CUPSD_AUTH_NONE))
1862 {
1863 cupsdCloseClient(con);
1864 return;
1865 }
1866 }
1867 break;
1868
1869 case HTTP_STATE_POST_RECV :
1870 do
1871 {
1872 if (con->request && con->file < 0)
1873 {
1874 /*
1875 * Grab any request data from the connection...
1876 */
1877
1878 if (!httpWait(con->http, 0))
1879 return;
1880
1881 if ((ipp_state = ippRead(con->http, con->request)) == IPP_STATE_ERROR)
1882 {
1883 cupsdLogClient(con, CUPSD_LOG_ERROR, "IPP read error: %s",
1884 cupsLastErrorString());
1885
1886 cupsdSendError(con, HTTP_STATUS_BAD_REQUEST, CUPSD_AUTH_NONE);
1887 cupsdCloseClient(con);
1888 return;
1889 }
1890 else if (ipp_state != IPP_STATE_DATA)
1891 {
1892 if (httpGetState(con->http) == HTTP_STATE_POST_SEND)
1893 {
1894 cupsdSendError(con, HTTP_STATUS_BAD_REQUEST, CUPSD_AUTH_NONE);
1895 cupsdCloseClient(con);
1896 return;
1897 }
1898
1899 if (httpGetReady(con->http))
1900 continue;
1901 break;
1902 }
1903 else
1904 {
1905 cupsdLogClient(con, CUPSD_LOG_DEBUG, "%d.%d %s %d",
1906 con->request->request.op.version[0],
1907 con->request->request.op.version[1],
1908 ippOpString(con->request->request.op.operation_id),
1909 con->request->request.op.request_id);
1910 con->bytes += (off_t)ippLength(con->request);
1911 }
1912 }
1913
1914 if (con->file < 0 && httpGetState(con->http) != HTTP_STATE_POST_SEND)
1915 {
1916 /*
1917 * Create a file as needed for the request data...
1918 */
1919
1920 cupsdSetStringf(&con->filename, "%s/%08x", RequestRoot,
1921 request_id ++);
1922 con->file = open(con->filename, O_WRONLY | O_CREAT | O_TRUNC, 0640);
1923
1924 if (con->file < 0)
1925 {
1926 cupsdLogClient(con, CUPSD_LOG_ERROR,
1927 "Unable to create request file \"%s\": %s",
1928 con->filename, strerror(errno));
1929
1930 if (!cupsdSendError(con, HTTP_STATUS_REQUEST_TOO_LARGE, CUPSD_AUTH_NONE))
1931 {
1932 cupsdCloseClient(con);
1933 return;
1934 }
1935 }
1936
1937 fchmod(con->file, 0640);
1938 fchown(con->file, RunUser, Group);
1939 fcntl(con->file, F_SETFD, fcntl(con->file, F_GETFD) | FD_CLOEXEC);
1940 }
1941
1942 if (httpGetState(con->http) != HTTP_STATE_POST_SEND)
1943 {
1944 if (!httpWait(con->http, 0))
1945 return;
1946 else if ((bytes = httpRead2(con->http, line, sizeof(line))) < 0)
1947 {
1948 if (httpError(con->http) && httpError(con->http) != EPIPE)
1949 cupsdLogClient(con, CUPSD_LOG_DEBUG,
1950 "HTTP_STATE_POST_SEND Closing for error %d (%s)",
1951 httpError(con->http), strerror(httpError(con->http)));
1952 else
1953 cupsdLogClient(con, CUPSD_LOG_DEBUG,
1954 "HTTP_STATE_POST_SEND Closing on EOF.");
1955
1956 cupsdCloseClient(con);
1957 return;
1958 }
1959 else if (bytes > 0)
1960 {
1961 con->bytes += bytes;
1962
1963 if (write(con->file, line, (size_t)bytes) < bytes)
1964 {
1965 cupsdLogClient(con, CUPSD_LOG_ERROR,
1966 "Unable to write %d bytes to \"%s\": %s",
1967 bytes, con->filename, strerror(errno));
1968
1969 close(con->file);
1970 con->file = -1;
1971 unlink(con->filename);
1972 cupsdClearString(&con->filename);
1973
1974 if (!cupsdSendError(con, HTTP_STATUS_REQUEST_TOO_LARGE,
1975 CUPSD_AUTH_NONE))
1976 {
1977 cupsdCloseClient(con);
1978 return;
1979 }
1980 }
1981 }
1982 else if (httpGetState(con->http) == HTTP_STATE_POST_RECV)
1983 return;
1984 else if (httpGetState(con->http) != HTTP_STATE_POST_SEND)
1985 {
1986 cupsdLogClient(con, CUPSD_LOG_DEBUG,
1987 "Closing on unexpected state %s.",
1988 httpStateString(httpGetState(con->http)));
1989 cupsdCloseClient(con);
1990 return;
1991 }
1992 }
1993 }
1994 while (httpGetState(con->http) == HTTP_STATE_POST_RECV && httpGetReady(con->http));
1995
1996 if (httpGetState(con->http) == HTTP_STATE_POST_SEND)
1997 {
1998 if (con->file >= 0)
1999 {
2000 fstat(con->file, &filestats);
2001
2002 close(con->file);
2003 con->file = -1;
2004
2005 if (filestats.st_size > MaxRequestSize &&
2006 MaxRequestSize > 0)
2007 {
2008 /*
2009 * Request is too big; remove it and send an error...
2010 */
2011
2012 unlink(con->filename);
2013 cupsdClearString(&con->filename);
2014
2015 if (con->request)
2016 {
2017 /*
2018 * Delete any IPP request data...
2019 */
2020
2021 ippDelete(con->request);
2022 con->request = NULL;
2023 }
2024
2025 if (!cupsdSendError(con, HTTP_STATUS_REQUEST_TOO_LARGE, CUPSD_AUTH_NONE))
2026 {
2027 cupsdCloseClient(con);
2028 return;
2029 }
2030 }
2031 else if (filestats.st_size == 0)
2032 {
2033 /*
2034 * Don't allow empty file...
2035 */
2036
2037 unlink(con->filename);
2038 cupsdClearString(&con->filename);
2039 }
2040
2041 if (con->command)
2042 {
2043 if (!cupsdSendCommand(con, con->command, con->options, 0))
2044 {
2045 if (!cupsdSendError(con, HTTP_STATUS_NOT_FOUND, CUPSD_AUTH_NONE))
2046 {
2047 cupsdCloseClient(con);
2048 return;
2049 }
2050 }
2051 else
2052 cupsdLogRequest(con, HTTP_STATUS_OK);
2053 }
2054 }
2055
2056 if (con->request)
2057 {
2058 cupsdProcessIPPRequest(con);
2059
2060 if (con->filename)
2061 {
2062 unlink(con->filename);
2063 cupsdClearString(&con->filename);
2064 }
2065
2066 return;
2067 }
2068 }
2069 break;
2070
2071 default :
2072 break; /* Anti-compiler-warning-code */
2073 }
2074
2075 if (httpGetState(con->http) == HTTP_STATE_WAITING)
2076 {
2077 if (!httpGetKeepAlive(con->http))
2078 {
2079 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2080 "Closing because Keep-Alive is disabled.");
2081 cupsdCloseClient(con);
2082 }
2083 else
2084 {
2085 cupsArrayRemove(ActiveClients, con);
2086 cupsdSetBusyState();
2087 }
2088 }
2089 }
2090
2091
2092 /*
2093 * 'cupsdSendCommand()' - Send output from a command via HTTP.
2094 */
2095
2096 int /* O - 1 on success, 0 on failure */
2097 cupsdSendCommand(
2098 cupsd_client_t *con, /* I - Client connection */
2099 char *command, /* I - Command to run */
2100 char *options, /* I - Command-line options */
2101 int root) /* I - Run as root? */
2102 {
2103 int fd; /* Standard input file descriptor */
2104
2105
2106 if (con->filename)
2107 {
2108 fd = open(con->filename, O_RDONLY);
2109
2110 if (fd < 0)
2111 {
2112 cupsdLogClient(con, CUPSD_LOG_ERROR,
2113 "Unable to open \"%s\" for reading: %s",
2114 con->filename ? con->filename : "/dev/null",
2115 strerror(errno));
2116 return (0);
2117 }
2118
2119 fcntl(fd, F_SETFD, fcntl(fd, F_GETFD) | FD_CLOEXEC);
2120 }
2121 else
2122 fd = -1;
2123
2124 con->pipe_pid = pipe_command(con, fd, &(con->file), command, options, root);
2125 con->pipe_status = HTTP_STATUS_OK;
2126
2127 httpClearFields(con->http);
2128
2129 if (fd >= 0)
2130 close(fd);
2131
2132 cupsdLogClient(con, CUPSD_LOG_INFO, "Started \"%s\" (pid=%d, file=%d)",
2133 command, con->pipe_pid, con->file);
2134
2135 if (con->pipe_pid == 0)
2136 return (0);
2137
2138 fcntl(con->file, F_SETFD, fcntl(con->file, F_GETFD) | FD_CLOEXEC);
2139
2140 cupsdAddSelect(con->file, (cupsd_selfunc_t)write_pipe, NULL, con);
2141
2142 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Waiting for CGI data.");
2143
2144 con->sent_header = 0;
2145 con->file_ready = 0;
2146 con->got_fields = 0;
2147 con->header_used = 0;
2148
2149 return (1);
2150 }
2151
2152
2153 /*
2154 * 'cupsdSendError()' - Send an error message via HTTP.
2155 */
2156
2157 int /* O - 1 if successful, 0 otherwise */
2158 cupsdSendError(cupsd_client_t *con, /* I - Connection */
2159 http_status_t code, /* I - Error code */
2160 int auth_type)/* I - Authentication type */
2161 {
2162 char location[HTTP_MAX_VALUE]; /* Location field */
2163
2164
2165 cupsdLogClient(con, CUPSD_LOG_DEBUG2, "cupsdSendError code=%d, auth_type=%d",
2166 code, auth_type);
2167
2168 #ifdef HAVE_SSL
2169 /*
2170 * Force client to upgrade for authentication if that is how the
2171 * server is configured...
2172 */
2173
2174 if (code == HTTP_STATUS_UNAUTHORIZED &&
2175 DefaultEncryption == HTTP_ENCRYPTION_REQUIRED &&
2176 _cups_strcasecmp(httpGetHostname(con->http, NULL, 0), "localhost") &&
2177 !httpIsEncrypted(con->http))
2178 {
2179 code = HTTP_STATUS_UPGRADE_REQUIRED;
2180 }
2181 #endif /* HAVE_SSL */
2182
2183 /*
2184 * Put the request in the access_log file...
2185 */
2186
2187 cupsdLogRequest(con, code);
2188
2189 /*
2190 * To work around bugs in some proxies, don't use Keep-Alive for some
2191 * error messages...
2192 *
2193 * Kerberos authentication doesn't work without Keep-Alive, so
2194 * never disable it in that case.
2195 */
2196
2197 strlcpy(location, httpGetField(con->http, HTTP_FIELD_LOCATION), sizeof(location));
2198
2199 httpClearFields(con->http);
2200
2201 httpSetField(con->http, HTTP_FIELD_LOCATION, location);
2202
2203 if (code >= HTTP_STATUS_BAD_REQUEST && con->type != CUPSD_AUTH_NEGOTIATE)
2204 httpSetKeepAlive(con->http, HTTP_KEEPALIVE_OFF);
2205
2206 if (httpGetVersion(con->http) >= HTTP_VERSION_1_1 &&
2207 httpGetKeepAlive(con->http) == HTTP_KEEPALIVE_OFF)
2208 httpSetField(con->http, HTTP_FIELD_CONNECTION, "close");
2209
2210 if (code >= HTTP_STATUS_BAD_REQUEST)
2211 {
2212 /*
2213 * Send a human-readable error message.
2214 */
2215
2216 char message[4096], /* Message for user */
2217 urltext[1024], /* URL redirection text */
2218 redirect[1024]; /* Redirection link */
2219 const char *text; /* Status-specific text */
2220
2221
2222 redirect[0] = '\0';
2223
2224 if (code == HTTP_STATUS_UNAUTHORIZED)
2225 text = _cupsLangString(con->language,
2226 _("Enter your username and password or the "
2227 "root username and password to access this "
2228 "page. If you are using Kerberos authentication, "
2229 "make sure you have a valid Kerberos ticket."));
2230 else if (code == HTTP_STATUS_UPGRADE_REQUIRED)
2231 {
2232 text = urltext;
2233
2234 snprintf(urltext, sizeof(urltext),
2235 _cupsLangString(con->language,
2236 _("You must access this page using the URL "
2237 "<A HREF=\"https://%s:%d%s\">"
2238 "https://%s:%d%s</A>.")),
2239 con->servername, con->serverport, con->uri,
2240 con->servername, con->serverport, con->uri);
2241
2242 snprintf(redirect, sizeof(redirect),
2243 "<META HTTP-EQUIV=\"Refresh\" "
2244 "CONTENT=\"3;URL=https://%s:%d%s\">\n",
2245 con->servername, con->serverport, con->uri);
2246 }
2247 else if (code == HTTP_STATUS_CUPS_WEBIF_DISABLED)
2248 text = _cupsLangString(con->language,
2249 _("The web interface is currently disabled. Run "
2250 "\"cupsctl WebInterface=yes\" to enable it."));
2251 else
2252 text = "";
2253
2254 snprintf(message, sizeof(message),
2255 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\" "
2256 "\"http://www.w3.org/TR/html4/loose.dtd\">\n"
2257 "<HTML>\n"
2258 "<HEAD>\n"
2259 "\t<META HTTP-EQUIV=\"Content-Type\" "
2260 "CONTENT=\"text/html; charset=utf-8\">\n"
2261 "\t<TITLE>%s - " CUPS_SVERSION "</TITLE>\n"
2262 "\t<LINK REL=\"STYLESHEET\" TYPE=\"text/css\" "
2263 "HREF=\"/cups.css\">\n"
2264 "%s"
2265 "</HEAD>\n"
2266 "<BODY>\n"
2267 "<H1>%s</H1>\n"
2268 "<P>%s</P>\n"
2269 "</BODY>\n"
2270 "</HTML>\n",
2271 _httpStatus(con->language, code), redirect,
2272 _httpStatus(con->language, code), text);
2273
2274 /*
2275 * Send an error message back to the client. If the error code is a
2276 * 400 or 500 series, make sure the message contains some text, too!
2277 */
2278
2279 size_t length = strlen(message); /* Length of message */
2280
2281 httpSetLength(con->http, length);
2282
2283 if (!cupsdSendHeader(con, code, "text/html", auth_type))
2284 return (0);
2285
2286 if (httpWrite2(con->http, message, length) < 0)
2287 return (0);
2288
2289 if (httpFlushWrite(con->http) < 0)
2290 return (0);
2291 }
2292 else
2293 {
2294 httpSetField(con->http, HTTP_FIELD_CONTENT_LENGTH, "0");
2295
2296 if (!cupsdSendHeader(con, code, NULL, auth_type))
2297 return (0);
2298 }
2299
2300 return (1);
2301 }
2302
2303
2304 /*
2305 * 'cupsdSendHeader()' - Send an HTTP request.
2306 */
2307
2308 int /* O - 1 on success, 0 on failure */
2309 cupsdSendHeader(
2310 cupsd_client_t *con, /* I - Client to send to */
2311 http_status_t code, /* I - HTTP status code */
2312 char *type, /* I - MIME type of document */
2313 int auth_type) /* I - Type of authentication */
2314 {
2315 char auth_str[1024]; /* Authorization string */
2316
2317
2318 cupsdLogClient(con, CUPSD_LOG_DEBUG, "cupsdSendHeader: code=%d, type=\"%s\", auth_type=%d", code, type, auth_type);
2319
2320 /*
2321 * Send the HTTP status header...
2322 */
2323
2324 if (code == HTTP_STATUS_CUPS_WEBIF_DISABLED)
2325 {
2326 /*
2327 * Treat our special "web interface is disabled" status as "200 OK" for web
2328 * browsers.
2329 */
2330
2331 code = HTTP_STATUS_OK;
2332 }
2333
2334 if (ServerHeader)
2335 httpSetField(con->http, HTTP_FIELD_SERVER, ServerHeader);
2336
2337 if (code == HTTP_STATUS_METHOD_NOT_ALLOWED)
2338 httpSetField(con->http, HTTP_FIELD_ALLOW, "GET, HEAD, OPTIONS, POST, PUT");
2339
2340 if (code == HTTP_STATUS_UNAUTHORIZED)
2341 {
2342 if (auth_type == CUPSD_AUTH_NONE)
2343 {
2344 if (!con->best || con->best->type <= CUPSD_AUTH_NONE)
2345 auth_type = cupsdDefaultAuthType();
2346 else
2347 auth_type = con->best->type;
2348 }
2349
2350 auth_str[0] = '\0';
2351
2352 if (auth_type == CUPSD_AUTH_BASIC)
2353 strlcpy(auth_str, "Basic realm=\"CUPS\"", sizeof(auth_str));
2354 #ifdef HAVE_GSSAPI
2355 else if (auth_type == CUPSD_AUTH_NEGOTIATE)
2356 {
2357 # ifdef AF_LOCAL
2358 if (httpAddrFamily(httpGetAddress(con->http)) == AF_LOCAL)
2359 strlcpy(auth_str, "Basic realm=\"CUPS\"", sizeof(auth_str));
2360 else
2361 # endif /* AF_LOCAL */
2362 strlcpy(auth_str, "Negotiate", sizeof(auth_str));
2363 }
2364 #endif /* HAVE_GSSAPI */
2365
2366 if (con->best && auth_type != CUPSD_AUTH_NEGOTIATE &&
2367 !_cups_strcasecmp(httpGetHostname(con->http, NULL, 0), "localhost"))
2368 {
2369 /*
2370 * Add a "trc" (try root certification) parameter for local non-Kerberos
2371 * requests when the request requires system group membership - then the
2372 * client knows the root certificate can/should be used.
2373 *
2374 * Also, for OS X we also look for @AUTHKEY and add an "authkey"
2375 * parameter as needed...
2376 */
2377
2378 char *name, /* Current user name */
2379 *auth_key; /* Auth key buffer */
2380 size_t auth_size; /* Size of remaining buffer */
2381
2382 auth_key = auth_str + strlen(auth_str);
2383 auth_size = sizeof(auth_str) - (size_t)(auth_key - auth_str);
2384
2385 for (name = (char *)cupsArrayFirst(con->best->names);
2386 name;
2387 name = (char *)cupsArrayNext(con->best->names))
2388 {
2389 #ifdef HAVE_AUTHORIZATION_H
2390 if (!_cups_strncasecmp(name, "@AUTHKEY(", 9))
2391 {
2392 snprintf(auth_key, auth_size, ", authkey=\"%s\"", name + 9);
2393 /* end parenthesis is stripped in conf.c */
2394 break;
2395 }
2396 else
2397 #endif /* HAVE_AUTHORIZATION_H */
2398 if (!_cups_strcasecmp(name, "@SYSTEM"))
2399 {
2400 #ifdef HAVE_AUTHORIZATION_H
2401 if (SystemGroupAuthKey)
2402 snprintf(auth_key, auth_size,
2403 ", authkey=\"%s\"",
2404 SystemGroupAuthKey);
2405 else
2406 #else
2407 strlcpy(auth_key, ", trc=\"y\"", auth_size);
2408 #endif /* HAVE_AUTHORIZATION_H */
2409 break;
2410 }
2411 }
2412 }
2413
2414 if (auth_str[0])
2415 {
2416 cupsdLogClient(con, CUPSD_LOG_DEBUG, "WWW-Authenticate: %s", auth_str);
2417
2418 httpSetField(con->http, HTTP_FIELD_WWW_AUTHENTICATE, auth_str);
2419 }
2420 }
2421
2422 if (con->language && strcmp(con->language->language, "C"))
2423 httpSetField(con->http, HTTP_FIELD_CONTENT_LANGUAGE, con->language->language);
2424
2425 if (type)
2426 {
2427 if (!strcmp(type, "text/html"))
2428 httpSetField(con->http, HTTP_FIELD_CONTENT_TYPE, "text/html; charset=utf-8");
2429 else
2430 httpSetField(con->http, HTTP_FIELD_CONTENT_TYPE, type);
2431 }
2432
2433 return (!httpWriteResponse(con->http, code));
2434 }
2435
2436
2437 /*
2438 * 'cupsdUpdateCGI()' - Read status messages from CGI scripts and programs.
2439 */
2440
2441 void
2442 cupsdUpdateCGI(void)
2443 {
2444 char *ptr, /* Pointer to end of line in buffer */
2445 message[1024]; /* Pointer to message text */
2446 int loglevel; /* Log level for message */
2447
2448
2449 while ((ptr = cupsdStatBufUpdate(CGIStatusBuffer, &loglevel,
2450 message, sizeof(message))) != NULL)
2451 {
2452 if (loglevel == CUPSD_LOG_INFO)
2453 cupsdLogMessage(CUPSD_LOG_INFO, "%s", message);
2454
2455 if (!strchr(CGIStatusBuffer->buffer, '\n'))
2456 break;
2457 }
2458
2459 if (ptr == NULL && !CGIStatusBuffer->bufused)
2460 {
2461 /*
2462 * Fatal error on pipe - should never happen!
2463 */
2464
2465 cupsdLogMessage(CUPSD_LOG_CRIT,
2466 "cupsdUpdateCGI: error reading from CGI error pipe - %s",
2467 strerror(errno));
2468 }
2469 }
2470
2471
2472 /*
2473 * 'cupsdWriteClient()' - Write data to a client as needed.
2474 */
2475
2476 void
2477 cupsdWriteClient(cupsd_client_t *con) /* I - Client connection */
2478 {
2479 int bytes, /* Number of bytes written */
2480 field_col; /* Current column */
2481 char *bufptr, /* Pointer into buffer */
2482 *bufend; /* Pointer to end of buffer */
2483 ipp_state_t ipp_state; /* IPP state value */
2484
2485
2486 cupsdLogClient(con, CUPSD_LOG_DEBUG, "con->http=%p", con->http);
2487 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2488 "cupsdWriteClient "
2489 "error=%d, "
2490 "used=%d, "
2491 "state=%s, "
2492 "data_encoding=HTTP_ENCODING_%s, "
2493 "data_remaining=" CUPS_LLFMT ", "
2494 "response=%p(%s), "
2495 "pipe_pid=%d, "
2496 "file=%d",
2497 httpError(con->http), (int)httpGetReady(con->http),
2498 httpStateString(httpGetState(con->http)),
2499 httpIsChunked(con->http) ? "CHUNKED" : "LENGTH",
2500 CUPS_LLCAST httpGetLength2(con->http),
2501 con->response,
2502 con->response ? ippStateString(ippGetState(con->request)) : "",
2503 con->pipe_pid, con->file);
2504
2505 if (httpGetState(con->http) != HTTP_STATE_GET_SEND &&
2506 httpGetState(con->http) != HTTP_STATE_POST_SEND)
2507 {
2508 /*
2509 * If we get called in the wrong state, then something went wrong with the
2510 * connection and we need to shut it down...
2511 */
2512
2513 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing on unexpected HTTP write state %s.",
2514 httpStateString(httpGetState(con->http)));
2515 cupsdCloseClient(con);
2516 return;
2517 }
2518
2519 if (con->pipe_pid)
2520 {
2521 /*
2522 * Make sure we select on the CGI output...
2523 */
2524
2525 cupsdAddSelect(con->file, (cupsd_selfunc_t)write_pipe, NULL, con);
2526
2527 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Waiting for CGI data.");
2528
2529 if (!con->file_ready)
2530 {
2531 /*
2532 * Try again later when there is CGI output available...
2533 */
2534
2535 cupsdRemoveSelect(httpGetFd(con->http));
2536 return;
2537 }
2538
2539 con->file_ready = 0;
2540 }
2541
2542 bytes = (ssize_t)(sizeof(con->header) - (size_t)con->header_used);
2543
2544 if (!con->pipe_pid && bytes > (ssize_t)httpGetRemaining(con->http))
2545 {
2546 /*
2547 * Limit GET bytes to original size of file (STR #3265)...
2548 */
2549
2550 bytes = (ssize_t)httpGetRemaining(con->http);
2551 }
2552
2553 if (con->response && con->response->state != IPP_STATE_DATA)
2554 {
2555 size_t wused = httpGetPending(con->http); /* Previous write buffer use */
2556
2557 do
2558 {
2559 /*
2560 * Write a single attribute or the IPP message header...
2561 */
2562
2563 ipp_state = ippWrite(con->http, con->response);
2564
2565 /*
2566 * If the write buffer has been flushed, stop buffering up attributes...
2567 */
2568
2569 if (httpGetPending(con->http) <= wused)
2570 break;
2571 }
2572 while (ipp_state != IPP_STATE_DATA && ipp_state != IPP_STATE_ERROR);
2573
2574 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2575 "Writing IPP response, ipp_state=%s, old "
2576 "wused=" CUPS_LLFMT ", new wused=" CUPS_LLFMT,
2577 ippStateString(ipp_state),
2578 CUPS_LLCAST wused, CUPS_LLCAST httpGetPending(con->http));
2579
2580 if (httpGetPending(con->http) > 0)
2581 httpFlushWrite(con->http);
2582
2583 bytes = ipp_state != IPP_STATE_ERROR &&
2584 (con->file >= 0 || ipp_state != IPP_STATE_DATA);
2585
2586 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2587 "bytes=%d, http_state=%d, data_remaining=" CUPS_LLFMT,
2588 (int)bytes, httpGetState(con->http),
2589 CUPS_LLCAST httpGetLength2(con->http));
2590 }
2591 else if ((bytes = read(con->file, con->header + con->header_used, (size_t)bytes)) > 0)
2592 {
2593 con->header_used += bytes;
2594
2595 if (con->pipe_pid && !con->got_fields)
2596 {
2597 /*
2598 * Inspect the data for Content-Type and other fields.
2599 */
2600
2601 for (bufptr = con->header, bufend = con->header + con->header_used,
2602 field_col = 0;
2603 !con->got_fields && bufptr < bufend;
2604 bufptr ++)
2605 {
2606 if (*bufptr == '\n')
2607 {
2608 /*
2609 * Send line to client...
2610 */
2611
2612 if (bufptr > con->header && bufptr[-1] == '\r')
2613 bufptr[-1] = '\0';
2614 *bufptr++ = '\0';
2615
2616 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Script header: %s", con->header);
2617
2618 if (!con->sent_header)
2619 {
2620 /*
2621 * Handle redirection and CGI status codes...
2622 */
2623
2624 http_field_t field; /* HTTP field */
2625 char *value = strchr(con->header, ':');
2626 /* Value of field */
2627
2628 if (value)
2629 {
2630 *value++ = '\0';
2631 while (isspace(*value & 255))
2632 value ++;
2633 }
2634
2635 field = httpFieldValue(con->header);
2636
2637 if (field != HTTP_FIELD_UNKNOWN && value)
2638 {
2639 httpSetField(con->http, field, value);
2640
2641 if (field == HTTP_FIELD_LOCATION)
2642 {
2643 con->pipe_status = HTTP_STATUS_SEE_OTHER;
2644 con->sent_header = 2;
2645 }
2646 else
2647 con->sent_header = 1;
2648 }
2649 else if (!_cups_strcasecmp(con->header, "Status") && value)
2650 {
2651 con->pipe_status = (http_status_t)atoi(value);
2652 con->sent_header = 2;
2653 }
2654 else if (!_cups_strcasecmp(con->header, "Set-Cookie") && value)
2655 {
2656 httpSetCookie(con->http, value);
2657 con->sent_header = 1;
2658 }
2659 }
2660
2661 /*
2662 * Update buffer...
2663 */
2664
2665 con->header_used -= bufptr - con->header;
2666
2667 if (con->header_used > 0)
2668 memmove(con->header, bufptr, (size_t)con->header_used);
2669
2670 bufptr = con->header - 1;
2671
2672 /*
2673 * See if the line was empty...
2674 */
2675
2676 if (field_col == 0)
2677 {
2678 con->got_fields = 1;
2679
2680 if (httpGetVersion(con->http) == HTTP_VERSION_1_1 &&
2681 !httpGetField(con->http, HTTP_FIELD_CONTENT_LENGTH)[0])
2682 httpSetLength(con->http, 0);
2683
2684 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Sending status %d for CGI.", con->pipe_status);
2685
2686 if (con->pipe_status == HTTP_STATUS_OK)
2687 {
2688 if (!cupsdSendHeader(con, con->pipe_status, NULL, CUPSD_AUTH_NONE))
2689 {
2690 cupsdCloseClient(con);
2691 return;
2692 }
2693 }
2694 else
2695 {
2696 if (!cupsdSendError(con, con->pipe_status, CUPSD_AUTH_NONE))
2697 {
2698 cupsdCloseClient(con);
2699 return;
2700 }
2701 }
2702 }
2703 else
2704 field_col = 0;
2705 }
2706 else if (*bufptr != '\r')
2707 field_col ++;
2708 }
2709
2710 if (!con->got_fields)
2711 return;
2712 }
2713
2714 if (con->header_used > 0)
2715 {
2716 if (httpWrite2(con->http, con->header, (size_t)con->header_used) < 0)
2717 {
2718 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing for error %d (%s)",
2719 httpError(con->http), strerror(httpError(con->http)));
2720 cupsdCloseClient(con);
2721 return;
2722 }
2723
2724 if (httpIsChunked(con->http))
2725 httpFlushWrite(con->http);
2726
2727 con->bytes += con->header_used;
2728
2729 if (httpGetState(con->http) == HTTP_STATE_WAITING)
2730 bytes = 0;
2731 else
2732 bytes = con->header_used;
2733
2734 con->header_used = 0;
2735 }
2736 }
2737
2738 if (bytes <= 0 ||
2739 (httpGetState(con->http) != HTTP_STATE_GET_SEND &&
2740 httpGetState(con->http) != HTTP_STATE_POST_SEND))
2741 {
2742 if (!con->sent_header && con->pipe_pid)
2743 cupsdSendError(con, HTTP_STATUS_SERVER_ERROR, CUPSD_AUTH_NONE);
2744 else
2745 {
2746 cupsdLogRequest(con, HTTP_STATUS_OK);
2747
2748 if (httpIsChunked(con->http) && (!con->pipe_pid || con->sent_header > 0))
2749 {
2750 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Sending 0-length chunk.");
2751
2752 if (httpWrite2(con->http, "", 0) < 0)
2753 {
2754 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing for error %d (%s)",
2755 httpError(con->http), strerror(httpError(con->http)));
2756 cupsdCloseClient(con);
2757 return;
2758 }
2759 }
2760
2761 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Flushing write buffer.");
2762 httpFlushWrite(con->http);
2763 cupsdLogClient(con, CUPSD_LOG_DEBUG, "New state is %s", httpStateString(httpGetState(con->http)));
2764 }
2765
2766 cupsdAddSelect(httpGetFd(con->http), (cupsd_selfunc_t)cupsdReadClient, NULL, con);
2767
2768 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Waiting for request.");
2769
2770 if (con->file >= 0)
2771 {
2772 cupsdRemoveSelect(con->file);
2773
2774 if (con->pipe_pid)
2775 cupsdEndProcess(con->pipe_pid, 0);
2776
2777 close(con->file);
2778 con->file = -1;
2779 con->pipe_pid = 0;
2780 }
2781
2782 if (con->filename)
2783 {
2784 unlink(con->filename);
2785 cupsdClearString(&con->filename);
2786 }
2787
2788 if (con->request)
2789 {
2790 ippDelete(con->request);
2791 con->request = NULL;
2792 }
2793
2794 if (con->response)
2795 {
2796 ippDelete(con->response);
2797 con->response = NULL;
2798 }
2799
2800 cupsdClearString(&con->command);
2801 cupsdClearString(&con->options);
2802 cupsdClearString(&con->query_string);
2803
2804 if (!httpGetKeepAlive(con->http))
2805 {
2806 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2807 "Closing because Keep-Alive is disabled.");
2808 cupsdCloseClient(con);
2809 return;
2810 }
2811 else
2812 {
2813 cupsArrayRemove(ActiveClients, con);
2814 cupsdSetBusyState();
2815 }
2816 }
2817 }
2818
2819
2820 /*
2821 * 'check_if_modified()' - Decode an "If-Modified-Since" line.
2822 */
2823
2824 static int /* O - 1 if modified since */
2825 check_if_modified(
2826 cupsd_client_t *con, /* I - Client connection */
2827 struct stat *filestats) /* I - File information */
2828 {
2829 const char *ptr; /* Pointer into field */
2830 time_t date; /* Time/date value */
2831 off_t size; /* Size/length value */
2832
2833
2834 size = 0;
2835 date = 0;
2836 ptr = httpGetField(con->http, HTTP_FIELD_IF_MODIFIED_SINCE);
2837
2838 if (*ptr == '\0')
2839 return (1);
2840
2841 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
2842 "check_if_modified "
2843 "filestats=%p(" CUPS_LLFMT ", %d)) If-Modified-Since=\"%s\"",
2844 filestats, CUPS_LLCAST filestats->st_size,
2845 (int)filestats->st_mtime, ptr);
2846
2847 while (*ptr != '\0')
2848 {
2849 while (isspace(*ptr) || *ptr == ';')
2850 ptr ++;
2851
2852 if (_cups_strncasecmp(ptr, "length=", 7) == 0)
2853 {
2854 ptr += 7;
2855 size = strtoll(ptr, NULL, 10);
2856
2857 while (isdigit(*ptr))
2858 ptr ++;
2859 }
2860 else if (isalpha(*ptr))
2861 {
2862 date = httpGetDateTime(ptr);
2863 while (*ptr != '\0' && *ptr != ';')
2864 ptr ++;
2865 }
2866 else
2867 ptr ++;
2868 }
2869
2870 return ((size != filestats->st_size && size != 0) ||
2871 (date < filestats->st_mtime && date != 0) ||
2872 (size == 0 && date == 0));
2873 }
2874
2875
2876 /*
2877 * 'compare_clients()' - Compare two client connections.
2878 */
2879
2880 static int /* O - Result of comparison */
2881 compare_clients(cupsd_client_t *a, /* I - First client */
2882 cupsd_client_t *b, /* I - Second client */
2883 void *data) /* I - User data (not used) */
2884 {
2885 (void)data;
2886
2887 if (a == b)
2888 return (0);
2889 else if (a < b)
2890 return (-1);
2891 else
2892 return (1);
2893 }
2894
2895
2896 #ifdef HAVE_SSL
2897 /*
2898 * 'cupsd_start_tls()' - Start encryption on a connection.
2899 */
2900
2901 static int /* O - 0 on success, -1 on error */
2902 cupsd_start_tls(cupsd_client_t *con, /* I - Client connection */
2903 http_encryption_t e) /* I - Encryption mode */
2904 {
2905 if (httpEncryption(con->http, e))
2906 {
2907 cupsdLogClient(con, CUPSD_LOG_ERROR, "Unable to encrypt connection: %s",
2908 cupsLastErrorString());
2909 return (-1);
2910 }
2911
2912 cupsdLogClient(con, CUPSD_LOG_INFO, "Connection now encrypted.");
2913 return (0);
2914 }
2915 #endif /* HAVE_SSL */
2916
2917
2918 /*
2919 * 'get_file()' - Get a filename and state info.
2920 */
2921
2922 static char * /* O - Real filename */
2923 get_file(cupsd_client_t *con, /* I - Client connection */
2924 struct stat *filestats, /* O - File information */
2925 char *filename, /* IO - Filename buffer */
2926 size_t len) /* I - Buffer length */
2927 {
2928 int status; /* Status of filesystem calls */
2929 char *ptr; /* Pointer info filename */
2930 size_t plen; /* Remaining length after pointer */
2931 char language[7]; /* Language subdirectory, if any */
2932 int perm_check = 1; /* Do permissions check? */
2933
2934
2935 /*
2936 * Figure out the real filename...
2937 */
2938
2939 language[0] = '\0';
2940
2941 if (!strncmp(con->uri, "/ppd/", 5) && !strchr(con->uri + 5, '/'))
2942 {
2943 snprintf(filename, len, "%s%s", ServerRoot, con->uri);
2944
2945 perm_check = 0;
2946 }
2947 else if (!strncmp(con->uri, "/icons/", 7) && !strchr(con->uri + 7, '/'))
2948 {
2949 snprintf(filename, len, "%s/%s", CacheDir, con->uri + 7);
2950 if (access(filename, F_OK) < 0)
2951 snprintf(filename, len, "%s/images/generic.png", DocumentRoot);
2952
2953 perm_check = 0;
2954 }
2955 else if (!strncmp(con->uri, "/rss/", 5) && !strchr(con->uri + 5, '/'))
2956 snprintf(filename, len, "%s/rss/%s", CacheDir, con->uri + 5);
2957 else if (!strcmp(con->uri, "/admin/conf/cupsd.conf"))
2958 {
2959 strlcpy(filename, ConfigurationFile, len);
2960
2961 perm_check = 0;
2962 }
2963 else if (!strncmp(con->uri, "/admin/log/", 11))
2964 {
2965 if (!strncmp(con->uri + 11, "access_log", 10) && AccessLog[0] == '/')
2966 strlcpy(filename, AccessLog, len);
2967 else if (!strncmp(con->uri + 11, "error_log", 9) && ErrorLog[0] == '/')
2968 strlcpy(filename, ErrorLog, len);
2969 else if (!strncmp(con->uri + 11, "page_log", 8) && PageLog[0] == '/')
2970 strlcpy(filename, PageLog, len);
2971 else
2972 return (NULL);
2973
2974 perm_check = 0;
2975 }
2976 else if (con->language)
2977 {
2978 snprintf(language, sizeof(language), "/%s", con->language->language);
2979 snprintf(filename, len, "%s%s%s", DocumentRoot, language, con->uri);
2980 }
2981 else
2982 snprintf(filename, len, "%s%s", DocumentRoot, con->uri);
2983
2984 if ((ptr = strchr(filename, '?')) != NULL)
2985 *ptr = '\0';
2986
2987 /*
2988 * Grab the status for this language; if there isn't a language-specific file
2989 * then fallback to the default one...
2990 */
2991
2992 if ((status = lstat(filename, filestats)) != 0 && language[0] &&
2993 strncmp(con->uri, "/icons/", 7) &&
2994 strncmp(con->uri, "/ppd/", 5) &&
2995 strncmp(con->uri, "/rss/", 5) &&
2996 strncmp(con->uri, "/admin/conf/", 12) &&
2997 strncmp(con->uri, "/admin/log/", 11))
2998 {
2999 /*
3000 * Drop the country code...
3001 */
3002
3003 language[3] = '\0';
3004 snprintf(filename, len, "%s%s%s", DocumentRoot, language, con->uri);
3005
3006 if ((ptr = strchr(filename, '?')) != NULL)
3007 *ptr = '\0';
3008
3009 if ((status = lstat(filename, filestats)) != 0)
3010 {
3011 /*
3012 * Drop the language prefix and try the root directory...
3013 */
3014
3015 language[0] = '\0';
3016 snprintf(filename, len, "%s%s", DocumentRoot, con->uri);
3017
3018 if ((ptr = strchr(filename, '?')) != NULL)
3019 *ptr = '\0';
3020
3021 status = lstat(filename, filestats);
3022 }
3023 }
3024
3025 /*
3026 * If we've found a symlink, 404 the sucker to avoid disclosing information.
3027 */
3028
3029 if (!status && S_ISLNK(filestats->st_mode))
3030 {
3031 cupsdLogClient(con, CUPSD_LOG_INFO, "Symlinks such as \"%s\" are not allowed.", filename);
3032 return (NULL);
3033 }
3034
3035 /*
3036 * Similarly, if the file/directory does not have world read permissions, do
3037 * not allow access...
3038 */
3039
3040 if (!status && perm_check && !(filestats->st_mode & S_IROTH))
3041 {
3042 cupsdLogClient(con, CUPSD_LOG_INFO, "Files/directories such as \"%s\" must be world-readable.", filename);
3043 return (NULL);
3044 }
3045
3046 /*
3047 * If we've found a directory, get the index.html file instead...
3048 */
3049
3050 if (!status && S_ISDIR(filestats->st_mode))
3051 {
3052 /*
3053 * Make sure the URI ends with a slash...
3054 */
3055
3056 if (con->uri[strlen(con->uri) - 1] != '/')
3057 strlcat(con->uri, "/", sizeof(con->uri));
3058
3059 /*
3060 * Find the directory index file, trying every language...
3061 */
3062
3063 do
3064 {
3065 if (status && language[0])
3066 {
3067 /*
3068 * Try a different language subset...
3069 */
3070
3071 if (language[3])
3072 language[0] = '\0'; /* Strip country code */
3073 else
3074 language[0] = '\0'; /* Strip language */
3075 }
3076
3077 /*
3078 * Look for the index file...
3079 */
3080
3081 snprintf(filename, len, "%s%s%s", DocumentRoot, language, con->uri);
3082
3083 if ((ptr = strchr(filename, '?')) != NULL)
3084 *ptr = '\0';
3085
3086 ptr = filename + strlen(filename);
3087 plen = len - (size_t)(ptr - filename);
3088
3089 strlcpy(ptr, "index.html", plen);
3090 status = lstat(filename, filestats);
3091
3092 #ifdef HAVE_JAVA
3093 if (status)
3094 {
3095 strlcpy(ptr, "index.class", plen);
3096 status = lstat(filename, filestats);
3097 }
3098 #endif /* HAVE_JAVA */
3099
3100 #ifdef HAVE_PERL
3101 if (status)
3102 {
3103 strlcpy(ptr, "index.pl", plen);
3104 status = lstat(filename, filestats);
3105 }
3106 #endif /* HAVE_PERL */
3107
3108 #ifdef HAVE_PHP
3109 if (status)
3110 {
3111 strlcpy(ptr, "index.php", plen);
3112 status = lstat(filename, filestats);
3113 }
3114 #endif /* HAVE_PHP */
3115
3116 #ifdef HAVE_PYTHON
3117 if (status)
3118 {
3119 strlcpy(ptr, "index.pyc", plen);
3120 status = lstat(filename, filestats);
3121 }
3122
3123 if (status)
3124 {
3125 strlcpy(ptr, "index.py", plen);
3126 status = lstat(filename, filestats);
3127 }
3128 #endif /* HAVE_PYTHON */
3129
3130 }
3131 while (status && language[0]);
3132
3133 /*
3134 * If we've found a symlink, 404 the sucker to avoid disclosing information.
3135 */
3136
3137 if (!status && S_ISLNK(filestats->st_mode))
3138 {
3139 cupsdLogClient(con, CUPSD_LOG_INFO, "Symlinks such as \"%s\" are not allowed.", filename);
3140 return (NULL);
3141 }
3142
3143 /*
3144 * Similarly, if the file/directory does not have world read permissions, do
3145 * not allow access...
3146 */
3147
3148 if (!status && perm_check && !(filestats->st_mode & S_IROTH))
3149 {
3150 cupsdLogClient(con, CUPSD_LOG_INFO, "Files/directories such as \"%s\" must be world-readable.", filename);
3151 return (NULL);
3152 }
3153 }
3154
3155 cupsdLogClient(con, CUPSD_LOG_DEBUG2, "get_file filestats=%p, filename=%p, len=" CUPS_LLFMT ", returning \"%s\".", filestats, filename, CUPS_LLCAST len, status ? "(null)" : filename);
3156
3157 if (status)
3158 return (NULL);
3159 else
3160 return (filename);
3161 }
3162
3163
3164 /*
3165 * 'install_cupsd_conf()' - Install a configuration file.
3166 */
3167
3168 static http_status_t /* O - Status */
3169 install_cupsd_conf(cupsd_client_t *con) /* I - Connection */
3170 {
3171 char filename[1024]; /* Configuration filename */
3172 cups_file_t *in, /* Input file */
3173 *out; /* Output file */
3174 char buffer[16384]; /* Copy buffer */
3175 ssize_t bytes; /* Number of bytes */
3176
3177
3178 /*
3179 * Open the request file...
3180 */
3181
3182 if ((in = cupsFileOpen(con->filename, "rb")) == NULL)
3183 {
3184 cupsdLogClient(con, CUPSD_LOG_ERROR, "Unable to open request file \"%s\": %s",
3185 con->filename, strerror(errno));
3186 return (HTTP_STATUS_SERVER_ERROR);
3187 }
3188
3189 /*
3190 * Open the new config file...
3191 */
3192
3193 if ((out = cupsdCreateConfFile(ConfigurationFile, ConfigFilePerm)) == NULL)
3194 {
3195 cupsFileClose(in);
3196 return (HTTP_STATUS_SERVER_ERROR);
3197 }
3198
3199 cupsdLogClient(con, CUPSD_LOG_INFO, "Installing config file \"%s\"...",
3200 ConfigurationFile);
3201
3202 /*
3203 * Copy from the request to the new config file...
3204 */
3205
3206 while ((bytes = cupsFileRead(in, buffer, sizeof(buffer))) > 0)
3207 if (cupsFileWrite(out, buffer, (size_t)bytes) < bytes)
3208 {
3209 cupsdLogClient(con, CUPSD_LOG_ERROR,
3210 "Unable to copy to config file \"%s\": %s",
3211 ConfigurationFile, strerror(errno));
3212
3213 cupsFileClose(in);
3214 cupsFileClose(out);
3215
3216 snprintf(filename, sizeof(filename), "%s.N", ConfigurationFile);
3217 cupsdUnlinkOrRemoveFile(filename);
3218
3219 return (HTTP_STATUS_SERVER_ERROR);
3220 }
3221
3222 /*
3223 * Close the files...
3224 */
3225
3226 cupsFileClose(in);
3227
3228 if (cupsdCloseCreatedConfFile(out, ConfigurationFile))
3229 return (HTTP_STATUS_SERVER_ERROR);
3230
3231 /*
3232 * Remove the request file...
3233 */
3234
3235 cupsdUnlinkOrRemoveFile(con->filename);
3236 cupsdClearString(&con->filename);
3237
3238 /*
3239 * Set the NeedReload flag...
3240 */
3241
3242 NeedReload = RELOAD_CUPSD;
3243 ReloadTime = time(NULL);
3244
3245 /*
3246 * Return that the file was created successfully...
3247 */
3248
3249 return (HTTP_STATUS_CREATED);
3250 }
3251
3252
3253 /*
3254 * 'is_cgi()' - Is the resource a CGI script/program?
3255 */
3256
3257 static int /* O - 1 = CGI, 0 = file */
3258 is_cgi(cupsd_client_t *con, /* I - Client connection */
3259 const char *filename, /* I - Real filename */
3260 struct stat *filestats, /* I - File information */
3261 mime_type_t *type) /* I - MIME type */
3262 {
3263 const char *options; /* Options on URL */
3264
3265
3266 /*
3267 * Get the options, if any...
3268 */
3269
3270 if ((options = strchr(con->uri, '?')) != NULL)
3271 {
3272 options ++;
3273 cupsdSetStringf(&(con->query_string), "QUERY_STRING=%s", options);
3274 }
3275
3276 /*
3277 * Check for known types...
3278 */
3279
3280 if (!type || _cups_strcasecmp(type->super, "application"))
3281 {
3282 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3283 "is_cgi filename=\"%s\", filestats=%p, "
3284 "type=%s/%s, returning 0", filename,
3285 filestats, type ? type->super : "unknown",
3286 type ? type->type : "unknown");
3287 return (0);
3288 }
3289
3290 if (!_cups_strcasecmp(type->type, "x-httpd-cgi") &&
3291 (filestats->st_mode & 0111))
3292 {
3293 /*
3294 * "application/x-httpd-cgi" is a CGI script.
3295 */
3296
3297 cupsdSetString(&con->command, filename);
3298
3299 if (options)
3300 cupsdSetStringf(&con->options, " %s", options);
3301
3302 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3303 "is_cgi filename=\"%s\", filestats=%p, "
3304 "type=%s/%s, returning 1", filename,
3305 filestats, type->super, type->type);
3306 return (1);
3307 }
3308 #ifdef HAVE_JAVA
3309 else if (!_cups_strcasecmp(type->type, "x-httpd-java"))
3310 {
3311 /*
3312 * "application/x-httpd-java" is a Java servlet.
3313 */
3314
3315 cupsdSetString(&con->command, CUPS_JAVA);
3316
3317 if (options)
3318 cupsdSetStringf(&con->options, " %s %s", filename, options);
3319 else
3320 cupsdSetStringf(&con->options, " %s", filename);
3321
3322 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3323 "is_cgi filename=\"%s\", filestats=%p, "
3324 "type=%s/%s, returning 1", filename,
3325 filestats, type->super, type->type);
3326 return (1);
3327 }
3328 #endif /* HAVE_JAVA */
3329 #ifdef HAVE_PERL
3330 else if (!_cups_strcasecmp(type->type, "x-httpd-perl"))
3331 {
3332 /*
3333 * "application/x-httpd-perl" is a Perl page.
3334 */
3335
3336 cupsdSetString(&con->command, CUPS_PERL);
3337
3338 if (options)
3339 cupsdSetStringf(&con->options, " %s %s", filename, options);
3340 else
3341 cupsdSetStringf(&con->options, " %s", filename);
3342
3343 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3344 "is_cgi filename=\"%s\", filestats=%p, "
3345 "type=%s/%s, returning 1", filename,
3346 filestats, type->super, type->type);
3347 return (1);
3348 }
3349 #endif /* HAVE_PERL */
3350 #ifdef HAVE_PHP
3351 else if (!_cups_strcasecmp(type->type, "x-httpd-php"))
3352 {
3353 /*
3354 * "application/x-httpd-php" is a PHP page.
3355 */
3356
3357 cupsdSetString(&con->command, CUPS_PHP);
3358
3359 if (options)
3360 cupsdSetStringf(&con->options, " %s %s", filename, options);
3361 else
3362 cupsdSetStringf(&con->options, " %s", filename);
3363
3364 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3365 "is_cgi filename=\"%s\", filestats=%p, "
3366 "type=%s/%s, returning 1", filename,
3367 filestats, type->super, type->type);
3368 return (1);
3369 }
3370 #endif /* HAVE_PHP */
3371 #ifdef HAVE_PYTHON
3372 else if (!_cups_strcasecmp(type->type, "x-httpd-python"))
3373 {
3374 /*
3375 * "application/x-httpd-python" is a Python page.
3376 */
3377
3378 cupsdSetString(&con->command, CUPS_PYTHON);
3379
3380 if (options)
3381 cupsdSetStringf(&con->options, " %s %s", filename, options);
3382 else
3383 cupsdSetStringf(&con->options, " %s", filename);
3384
3385 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3386 "is_cgi filename=\"%s\", filestats=%p, "
3387 "type=%s/%s, returning 1", filename,
3388 filestats, type->super, type->type);
3389 return (1);
3390 }
3391 #endif /* HAVE_PYTHON */
3392
3393 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3394 "is_cgi filename=\"%s\", filestats=%p, "
3395 "type=%s/%s, returning 0", filename,
3396 filestats, type->super, type->type);
3397 return (0);
3398 }
3399
3400
3401 /*
3402 * 'is_path_absolute()' - Is a path absolute and free of relative elements (i.e. "..").
3403 */
3404
3405 static int /* O - 0 if relative, 1 if absolute */
3406 is_path_absolute(const char *path) /* I - Input path */
3407 {
3408 /*
3409 * Check for a leading slash...
3410 */
3411
3412 if (path[0] != '/')
3413 return (0);
3414
3415 /*
3416 * Check for "<" or quotes in the path and reject since this is probably
3417 * someone trying to inject HTML...
3418 */
3419
3420 if (strchr(path, '<') != NULL || strchr(path, '\"') != NULL || strchr(path, '\'') != NULL)
3421 return (0);
3422
3423 /*
3424 * Check for "/.." in the path...
3425 */
3426
3427 while ((path = strstr(path, "/..")) != NULL)
3428 {
3429 if (!path[3] || path[3] == '/')
3430 return (0);
3431
3432 path ++;
3433 }
3434
3435 /*
3436 * If we haven't found any relative paths, return 1 indicating an
3437 * absolute path...
3438 */
3439
3440 return (1);
3441 }
3442
3443
3444 /*
3445 * 'pipe_command()' - Pipe the output of a command to the remote client.
3446 */
3447
3448 static int /* O - Process ID */
3449 pipe_command(cupsd_client_t *con, /* I - Client connection */
3450 int infile, /* I - Standard input for command */
3451 int *outfile, /* O - Standard output for command */
3452 char *command, /* I - Command to run */
3453 char *options, /* I - Options for command */
3454 int root) /* I - Run as root? */
3455 {
3456 int i; /* Looping var */
3457 int pid; /* Process ID */
3458 char *commptr, /* Command string pointer */
3459 commch; /* Command string character */
3460 char *uriptr; /* URI string pointer */
3461 int fds[2]; /* Pipe FDs */
3462 int argc; /* Number of arguments */
3463 int envc; /* Number of environment variables */
3464 char argbuf[10240], /* Argument buffer */
3465 *argv[100], /* Argument strings */
3466 *envp[MAX_ENV + 20]; /* Environment variables */
3467 char auth_type[256], /* AUTH_TYPE environment variable */
3468 content_length[1024], /* CONTENT_LENGTH environment variable */
3469 content_type[1024], /* CONTENT_TYPE environment variable */
3470 http_cookie[32768], /* HTTP_COOKIE environment variable */
3471 http_referer[1024], /* HTTP_REFERER environment variable */
3472 http_user_agent[1024], /* HTTP_USER_AGENT environment variable */
3473 lang[1024], /* LANG environment variable */
3474 path_info[1024], /* PATH_INFO environment variable */
3475 remote_addr[1024], /* REMOTE_ADDR environment variable */
3476 remote_host[1024], /* REMOTE_HOST environment variable */
3477 remote_user[1024], /* REMOTE_USER environment variable */
3478 script_filename[1024], /* SCRIPT_FILENAME environment variable */
3479 script_name[1024], /* SCRIPT_NAME environment variable */
3480 server_name[1024], /* SERVER_NAME environment variable */
3481 server_port[1024]; /* SERVER_PORT environment variable */
3482 ipp_attribute_t *attr; /* attributes-natural-language attribute */
3483
3484
3485 /*
3486 * Parse a copy of the options string, which is of the form:
3487 *
3488 * argument+argument+argument
3489 * ?argument+argument+argument
3490 * param=value&param=value
3491 * ?param=value&param=value
3492 * /name?argument+argument+argument
3493 * /name?param=value&param=value
3494 *
3495 * If the string contains an "=" character after the initial name,
3496 * then we treat it as a HTTP GET form request and make a copy of
3497 * the remaining string for the environment variable.
3498 *
3499 * The string is always parsed out as command-line arguments, to
3500 * be consistent with Apache...
3501 */
3502
3503 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3504 "pipe_command infile=%d, outfile=%p, "
3505 "command=\"%s\", options=\"%s\", root=%d",
3506 infile, outfile, command,
3507 options ? options : "(null)", root);
3508
3509 argv[0] = command;
3510
3511 if (options)
3512 strlcpy(argbuf, options, sizeof(argbuf));
3513 else
3514 argbuf[0] = '\0';
3515
3516 if (argbuf[0] == '/')
3517 {
3518 /*
3519 * Found some trailing path information, set PATH_INFO...
3520 */
3521
3522 if ((commptr = strchr(argbuf, '?')) == NULL)
3523 commptr = argbuf + strlen(argbuf);
3524
3525 commch = *commptr;
3526 *commptr = '\0';
3527 snprintf(path_info, sizeof(path_info), "PATH_INFO=%s", argbuf);
3528 *commptr = commch;
3529 }
3530 else
3531 {
3532 commptr = argbuf;
3533 path_info[0] = '\0';
3534
3535 if (*commptr == ' ')
3536 commptr ++;
3537 }
3538
3539 if (*commptr == '?' && con->operation == HTTP_STATE_GET && !con->query_string)
3540 {
3541 commptr ++;
3542 cupsdSetStringf(&(con->query_string), "QUERY_STRING=%s", commptr);
3543 }
3544
3545 argc = 1;
3546
3547 if (*commptr)
3548 {
3549 argv[argc ++] = commptr;
3550
3551 for (; *commptr && argc < 99; commptr ++)
3552 {
3553 /*
3554 * Break arguments whenever we see a + or space...
3555 */
3556
3557 if (*commptr == ' ' || *commptr == '+')
3558 {
3559 while (*commptr == ' ' || *commptr == '+')
3560 *commptr++ = '\0';
3561
3562 /*
3563 * If we don't have a blank string, save it as another argument...
3564 */
3565
3566 if (*commptr)
3567 {
3568 argv[argc] = commptr;
3569 argc ++;
3570 }
3571 else
3572 break;
3573 }
3574 else if (*commptr == '%' && isxdigit(commptr[1] & 255) &&
3575 isxdigit(commptr[2] & 255))
3576 {
3577 /*
3578 * Convert the %xx notation to the individual character.
3579 */
3580
3581 if (commptr[1] >= '0' && commptr[1] <= '9')
3582 *commptr = (char)((commptr[1] - '0') << 4);
3583 else
3584 *commptr = (char)((tolower(commptr[1]) - 'a' + 10) << 4);
3585
3586 if (commptr[2] >= '0' && commptr[2] <= '9')
3587 *commptr |= commptr[2] - '0';
3588 else
3589 *commptr |= tolower(commptr[2]) - 'a' + 10;
3590
3591 _cups_strcpy(commptr + 1, commptr + 3);
3592
3593 /*
3594 * Check for a %00 and break if that is the case...
3595 */
3596
3597 if (!*commptr)
3598 break;
3599 }
3600 }
3601 }
3602
3603 argv[argc] = NULL;
3604
3605 /*
3606 * Setup the environment variables as needed...
3607 */
3608
3609 if (con->username[0])
3610 {
3611 snprintf(auth_type, sizeof(auth_type), "AUTH_TYPE=%s",
3612 httpGetField(con->http, HTTP_FIELD_AUTHORIZATION));
3613
3614 if ((uriptr = strchr(auth_type + 10, ' ')) != NULL)
3615 *uriptr = '\0';
3616 }
3617 else
3618 auth_type[0] = '\0';
3619
3620 if (con->request &&
3621 (attr = ippFindAttribute(con->request, "attributes-natural-language",
3622 IPP_TAG_LANGUAGE)) != NULL)
3623 {
3624 switch (strlen(attr->values[0].string.text))
3625 {
3626 default :
3627 /*
3628 * This is an unknown or badly formatted language code; use
3629 * the POSIX locale...
3630 */
3631
3632 strlcpy(lang, "LANG=C", sizeof(lang));
3633 break;
3634
3635 case 2 :
3636 /*
3637 * Just the language code (ll)...
3638 */
3639
3640 snprintf(lang, sizeof(lang), "LANG=%s.UTF8",
3641 attr->values[0].string.text);
3642 break;
3643
3644 case 5 :
3645 /*
3646 * Language and country code (ll-cc)...
3647 */
3648
3649 snprintf(lang, sizeof(lang), "LANG=%c%c_%c%c.UTF8",
3650 attr->values[0].string.text[0],
3651 attr->values[0].string.text[1],
3652 toupper(attr->values[0].string.text[3] & 255),
3653 toupper(attr->values[0].string.text[4] & 255));
3654 break;
3655 }
3656 }
3657 else if (con->language)
3658 snprintf(lang, sizeof(lang), "LANG=%s.UTF8", con->language->language);
3659 else
3660 strlcpy(lang, "LANG=C", sizeof(lang));
3661
3662 strlcpy(remote_addr, "REMOTE_ADDR=", sizeof(remote_addr));
3663 httpAddrString(httpGetAddress(con->http), remote_addr + 12,
3664 sizeof(remote_addr) - 12);
3665
3666 snprintf(remote_host, sizeof(remote_host), "REMOTE_HOST=%s",
3667 httpGetHostname(con->http, NULL, 0));
3668
3669 snprintf(script_name, sizeof(script_name), "SCRIPT_NAME=%s", con->uri);
3670 if ((uriptr = strchr(script_name, '?')) != NULL)
3671 *uriptr = '\0';
3672
3673 snprintf(script_filename, sizeof(script_filename), "SCRIPT_FILENAME=%s%s",
3674 DocumentRoot, script_name + 12);
3675
3676 snprintf(server_port, sizeof(server_port), "SERVER_PORT=%d", con->serverport);
3677
3678 if (httpGetField(con->http, HTTP_FIELD_HOST)[0])
3679 {
3680 char *nameptr; /* Pointer to ":port" */
3681
3682 snprintf(server_name, sizeof(server_name), "SERVER_NAME=%s",
3683 httpGetField(con->http, HTTP_FIELD_HOST));
3684 if ((nameptr = strrchr(server_name, ':')) != NULL && !strchr(nameptr, ']'))
3685 *nameptr = '\0'; /* Strip trailing ":port" */
3686 }
3687 else
3688 snprintf(server_name, sizeof(server_name), "SERVER_NAME=%s",
3689 con->servername);
3690
3691 envc = cupsdLoadEnv(envp, (int)(sizeof(envp) / sizeof(envp[0])));
3692
3693 if (auth_type[0])
3694 envp[envc ++] = auth_type;
3695
3696 envp[envc ++] = lang;
3697 envp[envc ++] = "REDIRECT_STATUS=1";
3698 envp[envc ++] = "GATEWAY_INTERFACE=CGI/1.1";
3699 envp[envc ++] = server_name;
3700 envp[envc ++] = server_port;
3701 envp[envc ++] = remote_addr;
3702 envp[envc ++] = remote_host;
3703 envp[envc ++] = script_name;
3704 envp[envc ++] = script_filename;
3705
3706 if (path_info[0])
3707 envp[envc ++] = path_info;
3708
3709 if (con->username[0])
3710 {
3711 snprintf(remote_user, sizeof(remote_user), "REMOTE_USER=%s", con->username);
3712
3713 envp[envc ++] = remote_user;
3714 }
3715
3716 if (httpGetVersion(con->http) == HTTP_VERSION_1_1)
3717 envp[envc ++] = "SERVER_PROTOCOL=HTTP/1.1";
3718 else if (httpGetVersion(con->http) == HTTP_VERSION_1_0)
3719 envp[envc ++] = "SERVER_PROTOCOL=HTTP/1.0";
3720 else
3721 envp[envc ++] = "SERVER_PROTOCOL=HTTP/0.9";
3722
3723 if (httpGetCookie(con->http))
3724 {
3725 snprintf(http_cookie, sizeof(http_cookie), "HTTP_COOKIE=%s",
3726 httpGetCookie(con->http));
3727 envp[envc ++] = http_cookie;
3728 }
3729
3730 if (httpGetField(con->http, HTTP_FIELD_USER_AGENT)[0])
3731 {
3732 snprintf(http_user_agent, sizeof(http_user_agent), "HTTP_USER_AGENT=%s",
3733 httpGetField(con->http, HTTP_FIELD_USER_AGENT));
3734 envp[envc ++] = http_user_agent;
3735 }
3736
3737 if (httpGetField(con->http, HTTP_FIELD_REFERER)[0])
3738 {
3739 snprintf(http_referer, sizeof(http_referer), "HTTP_REFERER=%s",
3740 httpGetField(con->http, HTTP_FIELD_REFERER));
3741 envp[envc ++] = http_referer;
3742 }
3743
3744 if (con->operation == HTTP_STATE_GET)
3745 {
3746 envp[envc ++] = "REQUEST_METHOD=GET";
3747
3748 if (con->query_string)
3749 {
3750 /*
3751 * Add GET form variables after ?...
3752 */
3753
3754 envp[envc ++] = con->query_string;
3755 }
3756 else
3757 envp[envc ++] = "QUERY_STRING=";
3758 }
3759 else
3760 {
3761 sprintf(content_length, "CONTENT_LENGTH=" CUPS_LLFMT,
3762 CUPS_LLCAST con->bytes);
3763 snprintf(content_type, sizeof(content_type), "CONTENT_TYPE=%s",
3764 httpGetField(con->http, HTTP_FIELD_CONTENT_TYPE));
3765
3766 envp[envc ++] = "REQUEST_METHOD=POST";
3767 envp[envc ++] = content_length;
3768 envp[envc ++] = content_type;
3769 }
3770
3771 /*
3772 * Tell the CGI if we are using encryption...
3773 */
3774
3775 if (httpIsEncrypted(con->http))
3776 envp[envc ++] = "HTTPS=ON";
3777
3778 /*
3779 * Terminate the environment array...
3780 */
3781
3782 envp[envc] = NULL;
3783
3784 if (LogLevel >= CUPSD_LOG_DEBUG)
3785 {
3786 for (i = 0; i < argc; i ++)
3787 cupsdLogMessage(CUPSD_LOG_DEBUG,
3788 "[CGI] argv[%d] = \"%s\"", i, argv[i]);
3789 for (i = 0; i < envc; i ++)
3790 cupsdLogMessage(CUPSD_LOG_DEBUG,
3791 "[CGI] envp[%d] = \"%s\"", i, envp[i]);
3792 }
3793
3794 /*
3795 * Create a pipe for the output...
3796 */
3797
3798 if (cupsdOpenPipe(fds))
3799 {
3800 cupsdLogMessage(CUPSD_LOG_ERROR, "[CGI] Unable to create pipe for %s - %s",
3801 argv[0], strerror(errno));
3802 return (0);
3803 }
3804
3805 /*
3806 * Then execute the command...
3807 */
3808
3809 if (cupsdStartProcess(command, argv, envp, infile, fds[1], CGIPipes[1],
3810 -1, -1, root, DefaultProfile, NULL, &pid) < 0)
3811 {
3812 /*
3813 * Error - can't fork!
3814 */
3815
3816 cupsdLogMessage(CUPSD_LOG_ERROR, "[CGI] Unable to start %s - %s", argv[0],
3817 strerror(errno));
3818
3819 cupsdClosePipe(fds);
3820 pid = 0;
3821 }
3822 else
3823 {
3824 /*
3825 * Fork successful - return the PID...
3826 */
3827
3828 if (con->username[0])
3829 cupsdAddCert(pid, con->username, con->type);
3830
3831 cupsdLogMessage(CUPSD_LOG_DEBUG, "[CGI] Started %s (PID %d)", command, pid);
3832
3833 *outfile = fds[0];
3834 close(fds[1]);
3835 }
3836
3837 return (pid);
3838 }
3839
3840
3841 /*
3842 * 'valid_host()' - Is the Host: field valid?
3843 */
3844
3845 static int /* O - 1 if valid, 0 if not */
3846 valid_host(cupsd_client_t *con) /* I - Client connection */
3847 {
3848 cupsd_alias_t *a; /* Current alias */
3849 cupsd_netif_t *netif; /* Current network interface */
3850 const char *end; /* End character */
3851 char *ptr; /* Pointer into host value */
3852
3853
3854 /*
3855 * Copy the Host: header for later use...
3856 */
3857
3858 strlcpy(con->clientname, httpGetField(con->http, HTTP_FIELD_HOST),
3859 sizeof(con->clientname));
3860 if ((ptr = strrchr(con->clientname, ':')) != NULL && !strchr(ptr, ']'))
3861 {
3862 *ptr++ = '\0';
3863 con->clientport = atoi(ptr);
3864 }
3865 else
3866 con->clientport = con->serverport;
3867
3868 /*
3869 * Then validate...
3870 */
3871
3872 if (httpAddrLocalhost(httpGetAddress(con->http)))
3873 {
3874 /*
3875 * Only allow "localhost" or the equivalent IPv4 or IPv6 numerical
3876 * addresses when accessing CUPS via the loopback interface...
3877 */
3878
3879 return (!_cups_strcasecmp(con->clientname, "localhost") ||
3880 !_cups_strcasecmp(con->clientname, "localhost.") ||
3881 #ifdef __linux
3882 !_cups_strcasecmp(con->clientname, "localhost.localdomain") ||
3883 #endif /* __linux */
3884 !strcmp(con->clientname, "127.0.0.1") ||
3885 !strcmp(con->clientname, "[::1]"));
3886 }
3887
3888 #if defined(HAVE_DNSSD) || defined(HAVE_AVAHI)
3889 /*
3890 * Check if the hostname is something.local (Bonjour); if so, allow it.
3891 */
3892
3893 if ((end = strrchr(con->clientname, '.')) != NULL && end > con->clientname &&
3894 !end[1])
3895 {
3896 /*
3897 * "." on end, work back to second-to-last "."...
3898 */
3899
3900 for (end --; end > con->clientname && *end != '.'; end --);
3901 }
3902
3903 if (end && (!_cups_strcasecmp(end, ".local") ||
3904 !_cups_strcasecmp(end, ".local.")))
3905 return (1);
3906 #endif /* HAVE_DNSSD || HAVE_AVAHI */
3907
3908 /*
3909 * Check if the hostname is an IP address...
3910 */
3911
3912 if (isdigit(con->clientname[0] & 255) || con->clientname[0] == '[')
3913 {
3914 /*
3915 * Possible IPv4/IPv6 address...
3916 */
3917
3918 http_addrlist_t *addrlist; /* List of addresses */
3919
3920
3921 if ((addrlist = httpAddrGetList(con->clientname, AF_UNSPEC, NULL)) != NULL)
3922 {
3923 /*
3924 * Good IPv4/IPv6 address...
3925 */
3926
3927 httpAddrFreeList(addrlist);
3928 return (1);
3929 }
3930 }
3931
3932 /*
3933 * Check for (alias) name matches...
3934 */
3935
3936 for (a = (cupsd_alias_t *)cupsArrayFirst(ServerAlias);
3937 a;
3938 a = (cupsd_alias_t *)cupsArrayNext(ServerAlias))
3939 {
3940 /*
3941 * "ServerAlias *" allows all host values through...
3942 */
3943
3944 if (!strcmp(a->name, "*"))
3945 return (1);
3946
3947 if (!_cups_strncasecmp(con->clientname, a->name, a->namelen))
3948 {
3949 /*
3950 * Prefix matches; check the character at the end - it must be "." or nul.
3951 */
3952
3953 end = con->clientname + a->namelen;
3954
3955 if (!*end || (*end == '.' && !end[1]))
3956 return (1);
3957 }
3958 }
3959
3960 #if defined(HAVE_DNSSD) || defined(HAVE_AVAHI)
3961 for (a = (cupsd_alias_t *)cupsArrayFirst(DNSSDAlias);
3962 a;
3963 a = (cupsd_alias_t *)cupsArrayNext(DNSSDAlias))
3964 {
3965 /*
3966 * "ServerAlias *" allows all host values through...
3967 */
3968
3969 if (!strcmp(a->name, "*"))
3970 return (1);
3971
3972 if (!_cups_strncasecmp(con->clientname, a->name, a->namelen))
3973 {
3974 /*
3975 * Prefix matches; check the character at the end - it must be "." or nul.
3976 */
3977
3978 end = con->clientname + a->namelen;
3979
3980 if (!*end || (*end == '.' && !end[1]))
3981 return (1);
3982 }
3983 }
3984 #endif /* HAVE_DNSSD || HAVE_AVAHI */
3985
3986 /*
3987 * Check for interface hostname matches...
3988 */
3989
3990 for (netif = (cupsd_netif_t *)cupsArrayFirst(NetIFList);
3991 netif;
3992 netif = (cupsd_netif_t *)cupsArrayNext(NetIFList))
3993 {
3994 if (!_cups_strncasecmp(con->clientname, netif->hostname, netif->hostlen))
3995 {
3996 /*
3997 * Prefix matches; check the character at the end - it must be "." or nul.
3998 */
3999
4000 end = con->clientname + netif->hostlen;
4001
4002 if (!*end || (*end == '.' && !end[1]))
4003 return (1);
4004 }
4005 }
4006
4007 return (0);
4008 }
4009
4010
4011 /*
4012 * 'write_file()' - Send a file via HTTP.
4013 */
4014
4015 static int /* O - 0 on failure, 1 on success */
4016 write_file(cupsd_client_t *con, /* I - Client connection */
4017 http_status_t code, /* I - HTTP status */
4018 char *filename, /* I - Filename */
4019 char *type, /* I - File type */
4020 struct stat *filestats) /* O - File information */
4021 {
4022 con->file = open(filename, O_RDONLY);
4023
4024 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
4025 "write_file code=%d, filename=\"%s\" (%d), "
4026 "type=\"%s\", filestats=%p",
4027 code, filename, con->file, type ? type : "(null)", filestats);
4028
4029 if (con->file < 0)
4030 return (0);
4031
4032 fcntl(con->file, F_SETFD, fcntl(con->file, F_GETFD) | FD_CLOEXEC);
4033
4034 con->pipe_pid = 0;
4035 con->sent_header = 1;
4036
4037 httpClearFields(con->http);
4038
4039 httpSetLength(con->http, (size_t)filestats->st_size);
4040
4041 httpSetField(con->http, HTTP_FIELD_LAST_MODIFIED,
4042 httpGetDateString(filestats->st_mtime));
4043
4044 if (!cupsdSendHeader(con, code, type, CUPSD_AUTH_NONE))
4045 return (0);
4046
4047 cupsdAddSelect(httpGetFd(con->http), NULL, (cupsd_selfunc_t)cupsdWriteClient, con);
4048
4049 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Sending file.");
4050
4051 return (1);
4052 }
4053
4054
4055 /*
4056 * 'write_pipe()' - Flag that data is available on the CGI pipe.
4057 */
4058
4059 static void
4060 write_pipe(cupsd_client_t *con) /* I - Client connection */
4061 {
4062 cupsdLogClient(con, CUPSD_LOG_DEBUG2, "write_pipe CGI output on fd %d",
4063 con->file);
4064
4065 con->file_ready = 1;
4066
4067 cupsdRemoveSelect(con->file);
4068 cupsdAddSelect(httpGetFd(con->http), NULL, (cupsd_selfunc_t)cupsdWriteClient, con);
4069
4070 cupsdLogClient(con, CUPSD_LOG_DEBUG, "CGI data ready to be sent.");
4071 }
4072
4073
4074 /*
4075 * End of "$Id$".
4076 */
Unnamed repository; edit this file 'description' to name the repository.