]> git.ipfire.org Git - thirdparty/cups.git/blob - scheduler/client.c
projects / thirdparty / cups.git / blob
? search:


15abbe3f0d26e8848aff5a15d6962b54f4a24773
[thirdparty/cups.git] / scheduler / client.c
1 /*
2 * "$Id: client.c 12701 2015-06-08 18:33:44Z msweet $"
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 cupsdLogClient(con, CUPSD_LOG_DEBUG2, "cupsdSendError code=%d, auth_type=%d",
2163 code, auth_type);
2164
2165 #ifdef HAVE_SSL
2166 /*
2167 * Force client to upgrade for authentication if that is how the
2168 * server is configured...
2169 */
2170
2171 if (code == HTTP_STATUS_UNAUTHORIZED &&
2172 DefaultEncryption == HTTP_ENCRYPTION_REQUIRED &&
2173 _cups_strcasecmp(httpGetHostname(con->http, NULL, 0), "localhost") &&
2174 !httpIsEncrypted(con->http))
2175 {
2176 code = HTTP_STATUS_UPGRADE_REQUIRED;
2177 }
2178 #endif /* HAVE_SSL */
2179
2180 /*
2181 * Put the request in the access_log file...
2182 */
2183
2184 cupsdLogRequest(con, code);
2185
2186 /*
2187 * To work around bugs in some proxies, don't use Keep-Alive for some
2188 * error messages...
2189 *
2190 * Kerberos authentication doesn't work without Keep-Alive, so
2191 * never disable it in that case.
2192 */
2193
2194 httpClearFields(con->http);
2195
2196 if (code >= HTTP_STATUS_BAD_REQUEST && con->type != CUPSD_AUTH_NEGOTIATE)
2197 httpSetKeepAlive(con->http, HTTP_KEEPALIVE_OFF);
2198
2199 if (httpGetVersion(con->http) >= HTTP_VERSION_1_1 &&
2200 httpGetKeepAlive(con->http) == HTTP_KEEPALIVE_OFF)
2201 httpSetField(con->http, HTTP_FIELD_CONNECTION, "close");
2202
2203 if (code >= HTTP_STATUS_BAD_REQUEST)
2204 {
2205 /*
2206 * Send a human-readable error message.
2207 */
2208
2209 char message[4096], /* Message for user */
2210 urltext[1024], /* URL redirection text */
2211 redirect[1024]; /* Redirection link */
2212 const char *text; /* Status-specific text */
2213
2214
2215 redirect[0] = '\0';
2216
2217 if (code == HTTP_STATUS_UNAUTHORIZED)
2218 text = _cupsLangString(con->language,
2219 _("Enter your username and password or the "
2220 "root username and password to access this "
2221 "page. If you are using Kerberos authentication, "
2222 "make sure you have a valid Kerberos ticket."));
2223 else if (code == HTTP_STATUS_UPGRADE_REQUIRED)
2224 {
2225 text = urltext;
2226
2227 snprintf(urltext, sizeof(urltext),
2228 _cupsLangString(con->language,
2229 _("You must access this page using the URL "
2230 "<A HREF=\"https://%s:%d%s\">"
2231 "https://%s:%d%s</A>.")),
2232 con->servername, con->serverport, con->uri,
2233 con->servername, con->serverport, con->uri);
2234
2235 snprintf(redirect, sizeof(redirect),
2236 "<META HTTP-EQUIV=\"Refresh\" "
2237 "CONTENT=\"3;URL=https://%s:%d%s\">\n",
2238 con->servername, con->serverport, con->uri);
2239 }
2240 else if (code == HTTP_STATUS_CUPS_WEBIF_DISABLED)
2241 text = _cupsLangString(con->language,
2242 _("The web interface is currently disabled. Run "
2243 "\"cupsctl WebInterface=yes\" to enable it."));
2244 else
2245 text = "";
2246
2247 snprintf(message, sizeof(message),
2248 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\" "
2249 "\"http://www.w3.org/TR/html4/loose.dtd\">\n"
2250 "<HTML>\n"
2251 "<HEAD>\n"
2252 "\t<META HTTP-EQUIV=\"Content-Type\" "
2253 "CONTENT=\"text/html; charset=utf-8\">\n"
2254 "\t<TITLE>%s - " CUPS_SVERSION "</TITLE>\n"
2255 "\t<LINK REL=\"STYLESHEET\" TYPE=\"text/css\" "
2256 "HREF=\"/cups.css\">\n"
2257 "%s"
2258 "</HEAD>\n"
2259 "<BODY>\n"
2260 "<H1>%s</H1>\n"
2261 "<P>%s</P>\n"
2262 "</BODY>\n"
2263 "</HTML>\n",
2264 _httpStatus(con->language, code), redirect,
2265 _httpStatus(con->language, code), text);
2266
2267 /*
2268 * Send an error message back to the client. If the error code is a
2269 * 400 or 500 series, make sure the message contains some text, too!
2270 */
2271
2272 size_t length = strlen(message); /* Length of message */
2273
2274 httpSetLength(con->http, length);
2275
2276 if (!cupsdSendHeader(con, code, "text/html", auth_type))
2277 return (0);
2278
2279 if (httpWrite2(con->http, message, length) < 0)
2280 return (0);
2281
2282 if (httpFlushWrite(con->http) < 0)
2283 return (0);
2284 }
2285 else
2286 {
2287 httpSetField(con->http, HTTP_FIELD_CONTENT_LENGTH, "0");
2288
2289 if (!cupsdSendHeader(con, code, NULL, auth_type))
2290 return (0);
2291 }
2292
2293 return (1);
2294 }
2295
2296
2297 /*
2298 * 'cupsdSendHeader()' - Send an HTTP request.
2299 */
2300
2301 int /* O - 1 on success, 0 on failure */
2302 cupsdSendHeader(
2303 cupsd_client_t *con, /* I - Client to send to */
2304 http_status_t code, /* I - HTTP status code */
2305 char *type, /* I - MIME type of document */
2306 int auth_type) /* I - Type of authentication */
2307 {
2308 char auth_str[1024]; /* Authorization string */
2309
2310
2311 cupsdLogClient(con, CUPSD_LOG_DEBUG, "cupsdSendHeader: code=%d, type=\"%s\", auth_type=%d", code, type, auth_type);
2312
2313 /*
2314 * Send the HTTP status header...
2315 */
2316
2317 if (code == HTTP_STATUS_CUPS_WEBIF_DISABLED)
2318 {
2319 /*
2320 * Treat our special "web interface is disabled" status as "200 OK" for web
2321 * browsers.
2322 */
2323
2324 code = HTTP_STATUS_OK;
2325 }
2326
2327 if (ServerHeader)
2328 httpSetField(con->http, HTTP_FIELD_SERVER, ServerHeader);
2329
2330 if (code == HTTP_STATUS_METHOD_NOT_ALLOWED)
2331 httpSetField(con->http, HTTP_FIELD_ALLOW, "GET, HEAD, OPTIONS, POST, PUT");
2332
2333 if (code == HTTP_STATUS_UNAUTHORIZED)
2334 {
2335 if (auth_type == CUPSD_AUTH_NONE)
2336 {
2337 if (!con->best || con->best->type <= CUPSD_AUTH_NONE)
2338 auth_type = cupsdDefaultAuthType();
2339 else
2340 auth_type = con->best->type;
2341 }
2342
2343 auth_str[0] = '\0';
2344
2345 if (auth_type == CUPSD_AUTH_BASIC)
2346 strlcpy(auth_str, "Basic realm=\"CUPS\"", sizeof(auth_str));
2347 #ifdef HAVE_GSSAPI
2348 else if (auth_type == CUPSD_AUTH_NEGOTIATE)
2349 {
2350 # ifdef AF_LOCAL
2351 if (httpAddrFamily(httpGetAddress(con->http)) == AF_LOCAL)
2352 strlcpy(auth_str, "Basic realm=\"CUPS\"", sizeof(auth_str));
2353 else
2354 # endif /* AF_LOCAL */
2355 strlcpy(auth_str, "Negotiate", sizeof(auth_str));
2356 }
2357 #endif /* HAVE_GSSAPI */
2358
2359 if (con->best && auth_type != CUPSD_AUTH_NEGOTIATE &&
2360 !_cups_strcasecmp(httpGetHostname(con->http, NULL, 0), "localhost"))
2361 {
2362 /*
2363 * Add a "trc" (try root certification) parameter for local non-Kerberos
2364 * requests when the request requires system group membership - then the
2365 * client knows the root certificate can/should be used.
2366 *
2367 * Also, for OS X we also look for @AUTHKEY and add an "authkey"
2368 * parameter as needed...
2369 */
2370
2371 char *name, /* Current user name */
2372 *auth_key; /* Auth key buffer */
2373 size_t auth_size; /* Size of remaining buffer */
2374
2375 auth_key = auth_str + strlen(auth_str);
2376 auth_size = sizeof(auth_str) - (size_t)(auth_key - auth_str);
2377
2378 for (name = (char *)cupsArrayFirst(con->best->names);
2379 name;
2380 name = (char *)cupsArrayNext(con->best->names))
2381 {
2382 #ifdef HAVE_AUTHORIZATION_H
2383 if (!_cups_strncasecmp(name, "@AUTHKEY(", 9))
2384 {
2385 snprintf(auth_key, auth_size, ", authkey=\"%s\"", name + 9);
2386 /* end parenthesis is stripped in conf.c */
2387 break;
2388 }
2389 else
2390 #endif /* HAVE_AUTHORIZATION_H */
2391 if (!_cups_strcasecmp(name, "@SYSTEM"))
2392 {
2393 #ifdef HAVE_AUTHORIZATION_H
2394 if (SystemGroupAuthKey)
2395 snprintf(auth_key, auth_size,
2396 ", authkey=\"%s\"",
2397 SystemGroupAuthKey);
2398 else
2399 #else
2400 strlcpy(auth_key, ", trc=\"y\"", auth_size);
2401 #endif /* HAVE_AUTHORIZATION_H */
2402 break;
2403 }
2404 }
2405 }
2406
2407 if (auth_str[0])
2408 {
2409 cupsdLogClient(con, CUPSD_LOG_DEBUG, "WWW-Authenticate: %s", auth_str);
2410
2411 httpSetField(con->http, HTTP_FIELD_WWW_AUTHENTICATE, auth_str);
2412 }
2413 }
2414
2415 if (con->language && strcmp(con->language->language, "C"))
2416 httpSetField(con->http, HTTP_FIELD_CONTENT_LANGUAGE, con->language->language);
2417
2418 if (type)
2419 {
2420 if (!strcmp(type, "text/html"))
2421 httpSetField(con->http, HTTP_FIELD_CONTENT_TYPE, "text/html; charset=utf-8");
2422 else
2423 httpSetField(con->http, HTTP_FIELD_CONTENT_TYPE, type);
2424 }
2425
2426 return (!httpWriteResponse(con->http, code));
2427 }
2428
2429
2430 /*
2431 * 'cupsdUpdateCGI()' - Read status messages from CGI scripts and programs.
2432 */
2433
2434 void
2435 cupsdUpdateCGI(void)
2436 {
2437 char *ptr, /* Pointer to end of line in buffer */
2438 message[1024]; /* Pointer to message text */
2439 int loglevel; /* Log level for message */
2440
2441
2442 while ((ptr = cupsdStatBufUpdate(CGIStatusBuffer, &loglevel,
2443 message, sizeof(message))) != NULL)
2444 {
2445 if (loglevel == CUPSD_LOG_INFO)
2446 cupsdLogMessage(CUPSD_LOG_INFO, "%s", message);
2447
2448 if (!strchr(CGIStatusBuffer->buffer, '\n'))
2449 break;
2450 }
2451
2452 if (ptr == NULL && !CGIStatusBuffer->bufused)
2453 {
2454 /*
2455 * Fatal error on pipe - should never happen!
2456 */
2457
2458 cupsdLogMessage(CUPSD_LOG_CRIT,
2459 "cupsdUpdateCGI: error reading from CGI error pipe - %s",
2460 strerror(errno));
2461 }
2462 }
2463
2464
2465 /*
2466 * 'cupsdWriteClient()' - Write data to a client as needed.
2467 */
2468
2469 void
2470 cupsdWriteClient(cupsd_client_t *con) /* I - Client connection */
2471 {
2472 int bytes, /* Number of bytes written */
2473 field_col; /* Current column */
2474 char *bufptr, /* Pointer into buffer */
2475 *bufend; /* Pointer to end of buffer */
2476 ipp_state_t ipp_state; /* IPP state value */
2477
2478
2479 cupsdLogClient(con, CUPSD_LOG_DEBUG, "con->http=%p", con->http);
2480 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2481 "cupsdWriteClient "
2482 "error=%d, "
2483 "used=%d, "
2484 "state=%s, "
2485 "data_encoding=HTTP_ENCODING_%s, "
2486 "data_remaining=" CUPS_LLFMT ", "
2487 "response=%p(%s), "
2488 "pipe_pid=%d, "
2489 "file=%d",
2490 httpError(con->http), (int)httpGetReady(con->http),
2491 httpStateString(httpGetState(con->http)),
2492 httpIsChunked(con->http) ? "CHUNKED" : "LENGTH",
2493 CUPS_LLCAST httpGetLength2(con->http),
2494 con->response,
2495 con->response ? ippStateString(ippGetState(con->request)) : "",
2496 con->pipe_pid, con->file);
2497
2498 if (httpGetState(con->http) != HTTP_STATE_GET_SEND &&
2499 httpGetState(con->http) != HTTP_STATE_POST_SEND)
2500 {
2501 /*
2502 * If we get called in the wrong state, then something went wrong with the
2503 * connection and we need to shut it down...
2504 */
2505
2506 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing on unexpected HTTP write state %s.",
2507 httpStateString(httpGetState(con->http)));
2508 cupsdCloseClient(con);
2509 return;
2510 }
2511
2512 if (con->pipe_pid)
2513 {
2514 /*
2515 * Make sure we select on the CGI output...
2516 */
2517
2518 cupsdAddSelect(con->file, (cupsd_selfunc_t)write_pipe, NULL, con);
2519
2520 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Waiting for CGI data.");
2521
2522 if (!con->file_ready)
2523 {
2524 /*
2525 * Try again later when there is CGI output available...
2526 */
2527
2528 cupsdRemoveSelect(httpGetFd(con->http));
2529 return;
2530 }
2531
2532 con->file_ready = 0;
2533 }
2534
2535 bytes = (ssize_t)(sizeof(con->header) - (size_t)con->header_used);
2536
2537 if (!con->pipe_pid && bytes > (ssize_t)httpGetRemaining(con->http))
2538 {
2539 /*
2540 * Limit GET bytes to original size of file (STR #3265)...
2541 */
2542
2543 bytes = (ssize_t)httpGetRemaining(con->http);
2544 }
2545
2546 if (con->response && con->response->state != IPP_STATE_DATA)
2547 {
2548 size_t wused = httpGetPending(con->http); /* Previous write buffer use */
2549
2550 do
2551 {
2552 /*
2553 * Write a single attribute or the IPP message header...
2554 */
2555
2556 ipp_state = ippWrite(con->http, con->response);
2557
2558 /*
2559 * If the write buffer has been flushed, stop buffering up attributes...
2560 */
2561
2562 if (httpGetPending(con->http) <= wused)
2563 break;
2564 }
2565 while (ipp_state != IPP_STATE_DATA && ipp_state != IPP_STATE_ERROR);
2566
2567 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2568 "Writing IPP response, ipp_state=%s, old "
2569 "wused=" CUPS_LLFMT ", new wused=" CUPS_LLFMT,
2570 ippStateString(ipp_state),
2571 CUPS_LLCAST wused, CUPS_LLCAST httpGetPending(con->http));
2572
2573 if (httpGetPending(con->http) > 0)
2574 httpFlushWrite(con->http);
2575
2576 bytes = ipp_state != IPP_STATE_ERROR &&
2577 (con->file >= 0 || ipp_state != IPP_STATE_DATA);
2578
2579 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2580 "bytes=%d, http_state=%d, data_remaining=" CUPS_LLFMT,
2581 (int)bytes, httpGetState(con->http),
2582 CUPS_LLCAST httpGetLength2(con->http));
2583 }
2584 else if ((bytes = read(con->file, con->header + con->header_used, (size_t)bytes)) > 0)
2585 {
2586 con->header_used += bytes;
2587
2588 if (con->pipe_pid && !con->got_fields)
2589 {
2590 /*
2591 * Inspect the data for Content-Type and other fields.
2592 */
2593
2594 for (bufptr = con->header, bufend = con->header + con->header_used,
2595 field_col = 0;
2596 !con->got_fields && bufptr < bufend;
2597 bufptr ++)
2598 {
2599 if (*bufptr == '\n')
2600 {
2601 /*
2602 * Send line to client...
2603 */
2604
2605 if (bufptr > con->header && bufptr[-1] == '\r')
2606 bufptr[-1] = '\0';
2607 *bufptr++ = '\0';
2608
2609 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Script header: %s", con->header);
2610
2611 if (!con->sent_header)
2612 {
2613 /*
2614 * Handle redirection and CGI status codes...
2615 */
2616
2617 http_field_t field; /* HTTP field */
2618 char *value = strchr(con->header, ':');
2619 /* Value of field */
2620
2621 if (value)
2622 {
2623 *value++ = '\0';
2624 while (isspace(*value & 255))
2625 value ++;
2626 }
2627
2628 field = httpFieldValue(con->header);
2629
2630 if (field != HTTP_FIELD_UNKNOWN && value)
2631 {
2632 httpSetField(con->http, field, value);
2633
2634 if (field == HTTP_FIELD_LOCATION)
2635 {
2636 con->pipe_status = HTTP_STATUS_SEE_OTHER;
2637 con->sent_header = 2;
2638 }
2639 else
2640 con->sent_header = 1;
2641 }
2642 else if (!_cups_strcasecmp(con->header, "Status") && value)
2643 {
2644 con->pipe_status = (http_status_t)atoi(value);
2645 con->sent_header = 2;
2646 }
2647 else if (!_cups_strcasecmp(con->header, "Set-Cookie") && value)
2648 {
2649 httpSetCookie(con->http, value);
2650 con->sent_header = 1;
2651 }
2652 }
2653
2654 /*
2655 * Update buffer...
2656 */
2657
2658 con->header_used -= bufptr - con->header;
2659
2660 if (con->header_used > 0)
2661 memmove(con->header, bufptr, (size_t)con->header_used);
2662
2663 bufptr = con->header - 1;
2664
2665 /*
2666 * See if the line was empty...
2667 */
2668
2669 if (field_col == 0)
2670 {
2671 con->got_fields = 1;
2672
2673 if (httpGetVersion(con->http) == HTTP_VERSION_1_1 &&
2674 !httpGetField(con->http, HTTP_FIELD_CONTENT_LENGTH)[0])
2675 httpSetLength(con->http, 0);
2676
2677 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Sending status %d for CGI.", con->pipe_status);
2678
2679 if (con->pipe_status == HTTP_STATUS_OK)
2680 {
2681 if (!cupsdSendHeader(con, con->pipe_status, NULL, CUPSD_AUTH_NONE))
2682 {
2683 cupsdCloseClient(con);
2684 return;
2685 }
2686 }
2687 else
2688 {
2689 if (!cupsdSendError(con, con->pipe_status, CUPSD_AUTH_NONE))
2690 {
2691 cupsdCloseClient(con);
2692 return;
2693 }
2694 }
2695 }
2696 else
2697 field_col = 0;
2698 }
2699 else if (*bufptr != '\r')
2700 field_col ++;
2701 }
2702
2703 if (!con->got_fields)
2704 return;
2705 }
2706
2707 if (con->header_used > 0)
2708 {
2709 if (httpWrite2(con->http, con->header, (size_t)con->header_used) < 0)
2710 {
2711 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing for error %d (%s)",
2712 httpError(con->http), strerror(httpError(con->http)));
2713 cupsdCloseClient(con);
2714 return;
2715 }
2716
2717 if (httpIsChunked(con->http))
2718 httpFlushWrite(con->http);
2719
2720 con->bytes += con->header_used;
2721
2722 if (httpGetState(con->http) == HTTP_STATE_WAITING)
2723 bytes = 0;
2724 else
2725 bytes = con->header_used;
2726
2727 con->header_used = 0;
2728 }
2729 }
2730
2731 if (bytes <= 0 ||
2732 (httpGetState(con->http) != HTTP_STATE_GET_SEND &&
2733 httpGetState(con->http) != HTTP_STATE_POST_SEND))
2734 {
2735 if (!con->sent_header && con->pipe_pid)
2736 cupsdSendError(con, HTTP_STATUS_SERVER_ERROR, CUPSD_AUTH_NONE);
2737 else
2738 {
2739 cupsdLogRequest(con, HTTP_STATUS_OK);
2740
2741 if (httpIsChunked(con->http) && (!con->pipe_pid || con->sent_header > 0))
2742 {
2743 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Sending 0-length chunk.");
2744
2745 if (httpWrite2(con->http, "", 0) < 0)
2746 {
2747 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Closing for error %d (%s)",
2748 httpError(con->http), strerror(httpError(con->http)));
2749 cupsdCloseClient(con);
2750 return;
2751 }
2752 }
2753
2754 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Flushing write buffer.");
2755 httpFlushWrite(con->http);
2756 cupsdLogClient(con, CUPSD_LOG_DEBUG, "New state is %s", httpStateString(httpGetState(con->http)));
2757 }
2758
2759 cupsdAddSelect(httpGetFd(con->http), (cupsd_selfunc_t)cupsdReadClient, NULL, con);
2760
2761 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Waiting for request.");
2762
2763 if (con->file >= 0)
2764 {
2765 cupsdRemoveSelect(con->file);
2766
2767 if (con->pipe_pid)
2768 cupsdEndProcess(con->pipe_pid, 0);
2769
2770 close(con->file);
2771 con->file = -1;
2772 con->pipe_pid = 0;
2773 }
2774
2775 if (con->filename)
2776 {
2777 unlink(con->filename);
2778 cupsdClearString(&con->filename);
2779 }
2780
2781 if (con->request)
2782 {
2783 ippDelete(con->request);
2784 con->request = NULL;
2785 }
2786
2787 if (con->response)
2788 {
2789 ippDelete(con->response);
2790 con->response = NULL;
2791 }
2792
2793 cupsdClearString(&con->command);
2794 cupsdClearString(&con->options);
2795 cupsdClearString(&con->query_string);
2796
2797 if (!httpGetKeepAlive(con->http))
2798 {
2799 cupsdLogClient(con, CUPSD_LOG_DEBUG,
2800 "Closing because Keep-Alive is disabled.");
2801 cupsdCloseClient(con);
2802 return;
2803 }
2804 else
2805 {
2806 cupsArrayRemove(ActiveClients, con);
2807 cupsdSetBusyState();
2808 }
2809 }
2810 }
2811
2812
2813 /*
2814 * 'check_if_modified()' - Decode an "If-Modified-Since" line.
2815 */
2816
2817 static int /* O - 1 if modified since */
2818 check_if_modified(
2819 cupsd_client_t *con, /* I - Client connection */
2820 struct stat *filestats) /* I - File information */
2821 {
2822 const char *ptr; /* Pointer into field */
2823 time_t date; /* Time/date value */
2824 off_t size; /* Size/length value */
2825
2826
2827 size = 0;
2828 date = 0;
2829 ptr = httpGetField(con->http, HTTP_FIELD_IF_MODIFIED_SINCE);
2830
2831 if (*ptr == '\0')
2832 return (1);
2833
2834 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
2835 "check_if_modified "
2836 "filestats=%p(" CUPS_LLFMT ", %d)) If-Modified-Since=\"%s\"",
2837 filestats, CUPS_LLCAST filestats->st_size,
2838 (int)filestats->st_mtime, ptr);
2839
2840 while (*ptr != '\0')
2841 {
2842 while (isspace(*ptr) || *ptr == ';')
2843 ptr ++;
2844
2845 if (_cups_strncasecmp(ptr, "length=", 7) == 0)
2846 {
2847 ptr += 7;
2848 size = strtoll(ptr, NULL, 10);
2849
2850 while (isdigit(*ptr))
2851 ptr ++;
2852 }
2853 else if (isalpha(*ptr))
2854 {
2855 date = httpGetDateTime(ptr);
2856 while (*ptr != '\0' && *ptr != ';')
2857 ptr ++;
2858 }
2859 else
2860 ptr ++;
2861 }
2862
2863 return ((size != filestats->st_size && size != 0) ||
2864 (date < filestats->st_mtime && date != 0) ||
2865 (size == 0 && date == 0));
2866 }
2867
2868
2869 /*
2870 * 'compare_clients()' - Compare two client connections.
2871 */
2872
2873 static int /* O - Result of comparison */
2874 compare_clients(cupsd_client_t *a, /* I - First client */
2875 cupsd_client_t *b, /* I - Second client */
2876 void *data) /* I - User data (not used) */
2877 {
2878 (void)data;
2879
2880 if (a == b)
2881 return (0);
2882 else if (a < b)
2883 return (-1);
2884 else
2885 return (1);
2886 }
2887
2888
2889 #ifdef HAVE_SSL
2890 /*
2891 * 'cupsd_start_tls()' - Start encryption on a connection.
2892 */
2893
2894 static int /* O - 0 on success, -1 on error */
2895 cupsd_start_tls(cupsd_client_t *con, /* I - Client connection */
2896 http_encryption_t e) /* I - Encryption mode */
2897 {
2898 if (httpEncryption(con->http, e))
2899 {
2900 cupsdLogClient(con, CUPSD_LOG_ERROR, "Unable to encrypt connection: %s",
2901 cupsLastErrorString());
2902 return (-1);
2903 }
2904
2905 cupsdLogClient(con, CUPSD_LOG_INFO, "Connection now encrypted.");
2906 return (0);
2907 }
2908 #endif /* HAVE_SSL */
2909
2910
2911 /*
2912 * 'get_file()' - Get a filename and state info.
2913 */
2914
2915 static char * /* O - Real filename */
2916 get_file(cupsd_client_t *con, /* I - Client connection */
2917 struct stat *filestats, /* O - File information */
2918 char *filename, /* IO - Filename buffer */
2919 size_t len) /* I - Buffer length */
2920 {
2921 int status; /* Status of filesystem calls */
2922 char *ptr; /* Pointer info filename */
2923 size_t plen; /* Remaining length after pointer */
2924 char language[7]; /* Language subdirectory, if any */
2925 int perm_check = 1; /* Do permissions check? */
2926
2927
2928 /*
2929 * Figure out the real filename...
2930 */
2931
2932 language[0] = '\0';
2933
2934 if (!strncmp(con->uri, "/ppd/", 5) && !strchr(con->uri + 5, '/'))
2935 {
2936 snprintf(filename, len, "%s%s", ServerRoot, con->uri);
2937
2938 perm_check = 0;
2939 }
2940 else if (!strncmp(con->uri, "/icons/", 7) && !strchr(con->uri + 7, '/'))
2941 {
2942 snprintf(filename, len, "%s/%s", CacheDir, con->uri + 7);
2943 if (access(filename, F_OK) < 0)
2944 snprintf(filename, len, "%s/images/generic.png", DocumentRoot);
2945
2946 perm_check = 0;
2947 }
2948 else if (!strncmp(con->uri, "/rss/", 5) && !strchr(con->uri + 5, '/'))
2949 snprintf(filename, len, "%s/rss/%s", CacheDir, con->uri + 5);
2950 else if (!strcmp(con->uri, "/admin/conf/cupsd.conf"))
2951 {
2952 strlcpy(filename, ConfigurationFile, len);
2953
2954 perm_check = 0;
2955 }
2956 else if (!strncmp(con->uri, "/admin/log/", 11))
2957 {
2958 if (!strncmp(con->uri + 11, "access_log", 10) && AccessLog[0] == '/')
2959 strlcpy(filename, AccessLog, len);
2960 else if (!strncmp(con->uri + 11, "error_log", 9) && ErrorLog[0] == '/')
2961 strlcpy(filename, ErrorLog, len);
2962 else if (!strncmp(con->uri + 11, "page_log", 8) && PageLog[0] == '/')
2963 strlcpy(filename, PageLog, len);
2964 else
2965 return (NULL);
2966
2967 perm_check = 0;
2968 }
2969 else if (con->language)
2970 {
2971 snprintf(language, sizeof(language), "/%s", con->language->language);
2972 snprintf(filename, len, "%s%s%s", DocumentRoot, language, con->uri);
2973 }
2974 else
2975 snprintf(filename, len, "%s%s", DocumentRoot, con->uri);
2976
2977 if ((ptr = strchr(filename, '?')) != NULL)
2978 *ptr = '\0';
2979
2980 /*
2981 * Grab the status for this language; if there isn't a language-specific file
2982 * then fallback to the default one...
2983 */
2984
2985 if ((status = lstat(filename, filestats)) != 0 && language[0] &&
2986 strncmp(con->uri, "/icons/", 7) &&
2987 strncmp(con->uri, "/ppd/", 5) &&
2988 strncmp(con->uri, "/rss/", 5) &&
2989 strncmp(con->uri, "/admin/conf/", 12) &&
2990 strncmp(con->uri, "/admin/log/", 11))
2991 {
2992 /*
2993 * Drop the country code...
2994 */
2995
2996 language[3] = '\0';
2997 snprintf(filename, len, "%s%s%s", DocumentRoot, language, con->uri);
2998
2999 if ((ptr = strchr(filename, '?')) != NULL)
3000 *ptr = '\0';
3001
3002 if ((status = lstat(filename, filestats)) != 0)
3003 {
3004 /*
3005 * Drop the language prefix and try the root directory...
3006 */
3007
3008 language[0] = '\0';
3009 snprintf(filename, len, "%s%s", DocumentRoot, con->uri);
3010
3011 if ((ptr = strchr(filename, '?')) != NULL)
3012 *ptr = '\0';
3013
3014 status = lstat(filename, filestats);
3015 }
3016 }
3017
3018 /*
3019 * If we've found a symlink, 404 the sucker to avoid disclosing information.
3020 */
3021
3022 if (!status && S_ISLNK(filestats->st_mode))
3023 {
3024 cupsdLogClient(con, CUPSD_LOG_INFO, "Symlinks such as \"%s\" are not allowed.", filename);
3025 return (NULL);
3026 }
3027
3028 /*
3029 * Similarly, if the file/directory does not have world read permissions, do
3030 * not allow access...
3031 */
3032
3033 if (!status && perm_check && !(filestats->st_mode & S_IROTH))
3034 {
3035 cupsdLogClient(con, CUPSD_LOG_INFO, "Files/directories such as \"%s\" must be world-readable.", filename);
3036 return (NULL);
3037 }
3038
3039 /*
3040 * If we've found a directory, get the index.html file instead...
3041 */
3042
3043 if (!status && S_ISDIR(filestats->st_mode))
3044 {
3045 /*
3046 * Make sure the URI ends with a slash...
3047 */
3048
3049 if (con->uri[strlen(con->uri) - 1] != '/')
3050 strlcat(con->uri, "/", sizeof(con->uri));
3051
3052 /*
3053 * Find the directory index file, trying every language...
3054 */
3055
3056 do
3057 {
3058 if (status && language[0])
3059 {
3060 /*
3061 * Try a different language subset...
3062 */
3063
3064 if (language[3])
3065 language[0] = '\0'; /* Strip country code */
3066 else
3067 language[0] = '\0'; /* Strip language */
3068 }
3069
3070 /*
3071 * Look for the index file...
3072 */
3073
3074 snprintf(filename, len, "%s%s%s", DocumentRoot, language, con->uri);
3075
3076 if ((ptr = strchr(filename, '?')) != NULL)
3077 *ptr = '\0';
3078
3079 ptr = filename + strlen(filename);
3080 plen = len - (size_t)(ptr - filename);
3081
3082 strlcpy(ptr, "index.html", plen);
3083 status = lstat(filename, filestats);
3084
3085 #ifdef HAVE_JAVA
3086 if (status)
3087 {
3088 strlcpy(ptr, "index.class", plen);
3089 status = lstat(filename, filestats);
3090 }
3091 #endif /* HAVE_JAVA */
3092
3093 #ifdef HAVE_PERL
3094 if (status)
3095 {
3096 strlcpy(ptr, "index.pl", plen);
3097 status = lstat(filename, filestats);
3098 }
3099 #endif /* HAVE_PERL */
3100
3101 #ifdef HAVE_PHP
3102 if (status)
3103 {
3104 strlcpy(ptr, "index.php", plen);
3105 status = lstat(filename, filestats);
3106 }
3107 #endif /* HAVE_PHP */
3108
3109 #ifdef HAVE_PYTHON
3110 if (status)
3111 {
3112 strlcpy(ptr, "index.pyc", plen);
3113 status = lstat(filename, filestats);
3114 }
3115
3116 if (status)
3117 {
3118 strlcpy(ptr, "index.py", plen);
3119 status = lstat(filename, filestats);
3120 }
3121 #endif /* HAVE_PYTHON */
3122
3123 }
3124 while (status && language[0]);
3125
3126 /*
3127 * If we've found a symlink, 404 the sucker to avoid disclosing information.
3128 */
3129
3130 if (!status && S_ISLNK(filestats->st_mode))
3131 {
3132 cupsdLogClient(con, CUPSD_LOG_INFO, "Symlinks such as \"%s\" are not allowed.", filename);
3133 return (NULL);
3134 }
3135
3136 /*
3137 * Similarly, if the file/directory does not have world read permissions, do
3138 * not allow access...
3139 */
3140
3141 if (!status && perm_check && !(filestats->st_mode & S_IROTH))
3142 {
3143 cupsdLogClient(con, CUPSD_LOG_INFO, "Files/directories such as \"%s\" must be world-readable.", filename);
3144 return (NULL);
3145 }
3146 }
3147
3148 cupsdLogClient(con, CUPSD_LOG_DEBUG2, "get_file filestats=%p, filename=%p, len=" CUPS_LLFMT ", returning \"%s\".", filestats, filename, CUPS_LLCAST len, status ? "(null)" : filename);
3149
3150 if (status)
3151 return (NULL);
3152 else
3153 return (filename);
3154 }
3155
3156
3157 /*
3158 * 'install_cupsd_conf()' - Install a configuration file.
3159 */
3160
3161 static http_status_t /* O - Status */
3162 install_cupsd_conf(cupsd_client_t *con) /* I - Connection */
3163 {
3164 char filename[1024]; /* Configuration filename */
3165 cups_file_t *in, /* Input file */
3166 *out; /* Output file */
3167 char buffer[16384]; /* Copy buffer */
3168 ssize_t bytes; /* Number of bytes */
3169
3170
3171 /*
3172 * Open the request file...
3173 */
3174
3175 if ((in = cupsFileOpen(con->filename, "rb")) == NULL)
3176 {
3177 cupsdLogClient(con, CUPSD_LOG_ERROR, "Unable to open request file \"%s\": %s",
3178 con->filename, strerror(errno));
3179 return (HTTP_STATUS_SERVER_ERROR);
3180 }
3181
3182 /*
3183 * Open the new config file...
3184 */
3185
3186 if ((out = cupsdCreateConfFile(ConfigurationFile, ConfigFilePerm)) == NULL)
3187 {
3188 cupsFileClose(in);
3189 return (HTTP_STATUS_SERVER_ERROR);
3190 }
3191
3192 cupsdLogClient(con, CUPSD_LOG_INFO, "Installing config file \"%s\"...",
3193 ConfigurationFile);
3194
3195 /*
3196 * Copy from the request to the new config file...
3197 */
3198
3199 while ((bytes = cupsFileRead(in, buffer, sizeof(buffer))) > 0)
3200 if (cupsFileWrite(out, buffer, (size_t)bytes) < bytes)
3201 {
3202 cupsdLogClient(con, CUPSD_LOG_ERROR,
3203 "Unable to copy to config file \"%s\": %s",
3204 ConfigurationFile, strerror(errno));
3205
3206 cupsFileClose(in);
3207 cupsFileClose(out);
3208
3209 snprintf(filename, sizeof(filename), "%s.N", ConfigurationFile);
3210 cupsdUnlinkOrRemoveFile(filename);
3211
3212 return (HTTP_STATUS_SERVER_ERROR);
3213 }
3214
3215 /*
3216 * Close the files...
3217 */
3218
3219 cupsFileClose(in);
3220
3221 if (cupsdCloseCreatedConfFile(out, ConfigurationFile))
3222 return (HTTP_STATUS_SERVER_ERROR);
3223
3224 /*
3225 * Remove the request file...
3226 */
3227
3228 cupsdUnlinkOrRemoveFile(con->filename);
3229 cupsdClearString(&con->filename);
3230
3231 /*
3232 * Set the NeedReload flag...
3233 */
3234
3235 NeedReload = RELOAD_CUPSD;
3236 ReloadTime = time(NULL);
3237
3238 /*
3239 * Return that the file was created successfully...
3240 */
3241
3242 return (HTTP_STATUS_CREATED);
3243 }
3244
3245
3246 /*
3247 * 'is_cgi()' - Is the resource a CGI script/program?
3248 */
3249
3250 static int /* O - 1 = CGI, 0 = file */
3251 is_cgi(cupsd_client_t *con, /* I - Client connection */
3252 const char *filename, /* I - Real filename */
3253 struct stat *filestats, /* I - File information */
3254 mime_type_t *type) /* I - MIME type */
3255 {
3256 const char *options; /* Options on URL */
3257
3258
3259 /*
3260 * Get the options, if any...
3261 */
3262
3263 if ((options = strchr(con->uri, '?')) != NULL)
3264 {
3265 options ++;
3266 cupsdSetStringf(&(con->query_string), "QUERY_STRING=%s", options);
3267 }
3268
3269 /*
3270 * Check for known types...
3271 */
3272
3273 if (!type || _cups_strcasecmp(type->super, "application"))
3274 {
3275 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3276 "is_cgi filename=\"%s\", filestats=%p, "
3277 "type=%s/%s, returning 0", filename,
3278 filestats, type ? type->super : "unknown",
3279 type ? type->type : "unknown");
3280 return (0);
3281 }
3282
3283 if (!_cups_strcasecmp(type->type, "x-httpd-cgi") &&
3284 (filestats->st_mode & 0111))
3285 {
3286 /*
3287 * "application/x-httpd-cgi" is a CGI script.
3288 */
3289
3290 cupsdSetString(&con->command, filename);
3291
3292 if (options)
3293 cupsdSetStringf(&con->options, " %s", options);
3294
3295 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3296 "is_cgi filename=\"%s\", filestats=%p, "
3297 "type=%s/%s, returning 1", filename,
3298 filestats, type->super, type->type);
3299 return (1);
3300 }
3301 #ifdef HAVE_JAVA
3302 else if (!_cups_strcasecmp(type->type, "x-httpd-java"))
3303 {
3304 /*
3305 * "application/x-httpd-java" is a Java servlet.
3306 */
3307
3308 cupsdSetString(&con->command, CUPS_JAVA);
3309
3310 if (options)
3311 cupsdSetStringf(&con->options, " %s %s", filename, options);
3312 else
3313 cupsdSetStringf(&con->options, " %s", filename);
3314
3315 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3316 "is_cgi filename=\"%s\", filestats=%p, "
3317 "type=%s/%s, returning 1", filename,
3318 filestats, type->super, type->type);
3319 return (1);
3320 }
3321 #endif /* HAVE_JAVA */
3322 #ifdef HAVE_PERL
3323 else if (!_cups_strcasecmp(type->type, "x-httpd-perl"))
3324 {
3325 /*
3326 * "application/x-httpd-perl" is a Perl page.
3327 */
3328
3329 cupsdSetString(&con->command, CUPS_PERL);
3330
3331 if (options)
3332 cupsdSetStringf(&con->options, " %s %s", filename, options);
3333 else
3334 cupsdSetStringf(&con->options, " %s", filename);
3335
3336 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3337 "is_cgi filename=\"%s\", filestats=%p, "
3338 "type=%s/%s, returning 1", filename,
3339 filestats, type->super, type->type);
3340 return (1);
3341 }
3342 #endif /* HAVE_PERL */
3343 #ifdef HAVE_PHP
3344 else if (!_cups_strcasecmp(type->type, "x-httpd-php"))
3345 {
3346 /*
3347 * "application/x-httpd-php" is a PHP page.
3348 */
3349
3350 cupsdSetString(&con->command, CUPS_PHP);
3351
3352 if (options)
3353 cupsdSetStringf(&con->options, " %s %s", filename, options);
3354 else
3355 cupsdSetStringf(&con->options, " %s", filename);
3356
3357 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3358 "is_cgi filename=\"%s\", filestats=%p, "
3359 "type=%s/%s, returning 1", filename,
3360 filestats, type->super, type->type);
3361 return (1);
3362 }
3363 #endif /* HAVE_PHP */
3364 #ifdef HAVE_PYTHON
3365 else if (!_cups_strcasecmp(type->type, "x-httpd-python"))
3366 {
3367 /*
3368 * "application/x-httpd-python" is a Python page.
3369 */
3370
3371 cupsdSetString(&con->command, CUPS_PYTHON);
3372
3373 if (options)
3374 cupsdSetStringf(&con->options, " %s %s", filename, options);
3375 else
3376 cupsdSetStringf(&con->options, " %s", filename);
3377
3378 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3379 "is_cgi filename=\"%s\", filestats=%p, "
3380 "type=%s/%s, returning 1", filename,
3381 filestats, type->super, type->type);
3382 return (1);
3383 }
3384 #endif /* HAVE_PYTHON */
3385
3386 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3387 "is_cgi filename=\"%s\", filestats=%p, "
3388 "type=%s/%s, returning 0", filename,
3389 filestats, type->super, type->type);
3390 return (0);
3391 }
3392
3393
3394 /*
3395 * 'is_path_absolute()' - Is a path absolute and free of relative elements (i.e. "..").
3396 */
3397
3398 static int /* O - 0 if relative, 1 if absolute */
3399 is_path_absolute(const char *path) /* I - Input path */
3400 {
3401 /*
3402 * Check for a leading slash...
3403 */
3404
3405 if (path[0] != '/')
3406 return (0);
3407
3408 /*
3409 * Check for "<" or quotes in the path and reject since this is probably
3410 * someone trying to inject HTML...
3411 */
3412
3413 if (strchr(path, '<') != NULL || strchr(path, '\"') != NULL || strchr(path, '\'') != NULL)
3414 return (0);
3415
3416 /*
3417 * Check for "/.." in the path...
3418 */
3419
3420 while ((path = strstr(path, "/..")) != NULL)
3421 {
3422 if (!path[3] || path[3] == '/')
3423 return (0);
3424
3425 path ++;
3426 }
3427
3428 /*
3429 * If we haven't found any relative paths, return 1 indicating an
3430 * absolute path...
3431 */
3432
3433 return (1);
3434 }
3435
3436
3437 /*
3438 * 'pipe_command()' - Pipe the output of a command to the remote client.
3439 */
3440
3441 static int /* O - Process ID */
3442 pipe_command(cupsd_client_t *con, /* I - Client connection */
3443 int infile, /* I - Standard input for command */
3444 int *outfile, /* O - Standard output for command */
3445 char *command, /* I - Command to run */
3446 char *options, /* I - Options for command */
3447 int root) /* I - Run as root? */
3448 {
3449 int i; /* Looping var */
3450 int pid; /* Process ID */
3451 char *commptr, /* Command string pointer */
3452 commch; /* Command string character */
3453 char *uriptr; /* URI string pointer */
3454 int fds[2]; /* Pipe FDs */
3455 int argc; /* Number of arguments */
3456 int envc; /* Number of environment variables */
3457 char argbuf[10240], /* Argument buffer */
3458 *argv[100], /* Argument strings */
3459 *envp[MAX_ENV + 20]; /* Environment variables */
3460 char auth_type[256], /* AUTH_TYPE environment variable */
3461 content_length[1024], /* CONTENT_LENGTH environment variable */
3462 content_type[1024], /* CONTENT_TYPE environment variable */
3463 http_cookie[32768], /* HTTP_COOKIE environment variable */
3464 http_referer[1024], /* HTTP_REFERER environment variable */
3465 http_user_agent[1024], /* HTTP_USER_AGENT environment variable */
3466 lang[1024], /* LANG environment variable */
3467 path_info[1024], /* PATH_INFO environment variable */
3468 remote_addr[1024], /* REMOTE_ADDR environment variable */
3469 remote_host[1024], /* REMOTE_HOST environment variable */
3470 remote_user[1024], /* REMOTE_USER environment variable */
3471 script_filename[1024], /* SCRIPT_FILENAME environment variable */
3472 script_name[1024], /* SCRIPT_NAME environment variable */
3473 server_name[1024], /* SERVER_NAME environment variable */
3474 server_port[1024]; /* SERVER_PORT environment variable */
3475 ipp_attribute_t *attr; /* attributes-natural-language attribute */
3476
3477
3478 /*
3479 * Parse a copy of the options string, which is of the form:
3480 *
3481 * argument+argument+argument
3482 * ?argument+argument+argument
3483 * param=value&param=value
3484 * ?param=value&param=value
3485 * /name?argument+argument+argument
3486 * /name?param=value&param=value
3487 *
3488 * If the string contains an "=" character after the initial name,
3489 * then we treat it as a HTTP GET form request and make a copy of
3490 * the remaining string for the environment variable.
3491 *
3492 * The string is always parsed out as command-line arguments, to
3493 * be consistent with Apache...
3494 */
3495
3496 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
3497 "pipe_command infile=%d, outfile=%p, "
3498 "command=\"%s\", options=\"%s\", root=%d",
3499 infile, outfile, command,
3500 options ? options : "(null)", root);
3501
3502 argv[0] = command;
3503
3504 if (options)
3505 strlcpy(argbuf, options, sizeof(argbuf));
3506 else
3507 argbuf[0] = '\0';
3508
3509 if (argbuf[0] == '/')
3510 {
3511 /*
3512 * Found some trailing path information, set PATH_INFO...
3513 */
3514
3515 if ((commptr = strchr(argbuf, '?')) == NULL)
3516 commptr = argbuf + strlen(argbuf);
3517
3518 commch = *commptr;
3519 *commptr = '\0';
3520 snprintf(path_info, sizeof(path_info), "PATH_INFO=%s", argbuf);
3521 *commptr = commch;
3522 }
3523 else
3524 {
3525 commptr = argbuf;
3526 path_info[0] = '\0';
3527
3528 if (*commptr == ' ')
3529 commptr ++;
3530 }
3531
3532 if (*commptr == '?' && con->operation == HTTP_STATE_GET && !con->query_string)
3533 {
3534 commptr ++;
3535 cupsdSetStringf(&(con->query_string), "QUERY_STRING=%s", commptr);
3536 }
3537
3538 argc = 1;
3539
3540 if (*commptr)
3541 {
3542 argv[argc ++] = commptr;
3543
3544 for (; *commptr && argc < 99; commptr ++)
3545 {
3546 /*
3547 * Break arguments whenever we see a + or space...
3548 */
3549
3550 if (*commptr == ' ' || *commptr == '+')
3551 {
3552 while (*commptr == ' ' || *commptr == '+')
3553 *commptr++ = '\0';
3554
3555 /*
3556 * If we don't have a blank string, save it as another argument...
3557 */
3558
3559 if (*commptr)
3560 {
3561 argv[argc] = commptr;
3562 argc ++;
3563 }
3564 else
3565 break;
3566 }
3567 else if (*commptr == '%' && isxdigit(commptr[1] & 255) &&
3568 isxdigit(commptr[2] & 255))
3569 {
3570 /*
3571 * Convert the %xx notation to the individual character.
3572 */
3573
3574 if (commptr[1] >= '0' && commptr[1] <= '9')
3575 *commptr = (char)((commptr[1] - '0') << 4);
3576 else
3577 *commptr = (char)((tolower(commptr[1]) - 'a' + 10) << 4);
3578
3579 if (commptr[2] >= '0' && commptr[2] <= '9')
3580 *commptr |= commptr[2] - '0';
3581 else
3582 *commptr |= tolower(commptr[2]) - 'a' + 10;
3583
3584 _cups_strcpy(commptr + 1, commptr + 3);
3585
3586 /*
3587 * Check for a %00 and break if that is the case...
3588 */
3589
3590 if (!*commptr)
3591 break;
3592 }
3593 }
3594 }
3595
3596 argv[argc] = NULL;
3597
3598 /*
3599 * Setup the environment variables as needed...
3600 */
3601
3602 if (con->username[0])
3603 {
3604 snprintf(auth_type, sizeof(auth_type), "AUTH_TYPE=%s",
3605 httpGetField(con->http, HTTP_FIELD_AUTHORIZATION));
3606
3607 if ((uriptr = strchr(auth_type + 10, ' ')) != NULL)
3608 *uriptr = '\0';
3609 }
3610 else
3611 auth_type[0] = '\0';
3612
3613 if (con->request &&
3614 (attr = ippFindAttribute(con->request, "attributes-natural-language",
3615 IPP_TAG_LANGUAGE)) != NULL)
3616 {
3617 switch (strlen(attr->values[0].string.text))
3618 {
3619 default :
3620 /*
3621 * This is an unknown or badly formatted language code; use
3622 * the POSIX locale...
3623 */
3624
3625 strlcpy(lang, "LANG=C", sizeof(lang));
3626 break;
3627
3628 case 2 :
3629 /*
3630 * Just the language code (ll)...
3631 */
3632
3633 snprintf(lang, sizeof(lang), "LANG=%s.UTF8",
3634 attr->values[0].string.text);
3635 break;
3636
3637 case 5 :
3638 /*
3639 * Language and country code (ll-cc)...
3640 */
3641
3642 snprintf(lang, sizeof(lang), "LANG=%c%c_%c%c.UTF8",
3643 attr->values[0].string.text[0],
3644 attr->values[0].string.text[1],
3645 toupper(attr->values[0].string.text[3] & 255),
3646 toupper(attr->values[0].string.text[4] & 255));
3647 break;
3648 }
3649 }
3650 else if (con->language)
3651 snprintf(lang, sizeof(lang), "LANG=%s.UTF8", con->language->language);
3652 else
3653 strlcpy(lang, "LANG=C", sizeof(lang));
3654
3655 strlcpy(remote_addr, "REMOTE_ADDR=", sizeof(remote_addr));
3656 httpAddrString(httpGetAddress(con->http), remote_addr + 12,
3657 sizeof(remote_addr) - 12);
3658
3659 snprintf(remote_host, sizeof(remote_host), "REMOTE_HOST=%s",
3660 httpGetHostname(con->http, NULL, 0));
3661
3662 snprintf(script_name, sizeof(script_name), "SCRIPT_NAME=%s", con->uri);
3663 if ((uriptr = strchr(script_name, '?')) != NULL)
3664 *uriptr = '\0';
3665
3666 snprintf(script_filename, sizeof(script_filename), "SCRIPT_FILENAME=%s%s",
3667 DocumentRoot, script_name + 12);
3668
3669 snprintf(server_port, sizeof(server_port), "SERVER_PORT=%d", con->serverport);
3670
3671 if (httpGetField(con->http, HTTP_FIELD_HOST)[0])
3672 {
3673 char *nameptr; /* Pointer to ":port" */
3674
3675 snprintf(server_name, sizeof(server_name), "SERVER_NAME=%s",
3676 httpGetField(con->http, HTTP_FIELD_HOST));
3677 if ((nameptr = strrchr(server_name, ':')) != NULL && !strchr(nameptr, ']'))
3678 *nameptr = '\0'; /* Strip trailing ":port" */
3679 }
3680 else
3681 snprintf(server_name, sizeof(server_name), "SERVER_NAME=%s",
3682 con->servername);
3683
3684 envc = cupsdLoadEnv(envp, (int)(sizeof(envp) / sizeof(envp[0])));
3685
3686 if (auth_type[0])
3687 envp[envc ++] = auth_type;
3688
3689 envp[envc ++] = lang;
3690 envp[envc ++] = "REDIRECT_STATUS=1";
3691 envp[envc ++] = "GATEWAY_INTERFACE=CGI/1.1";
3692 envp[envc ++] = server_name;
3693 envp[envc ++] = server_port;
3694 envp[envc ++] = remote_addr;
3695 envp[envc ++] = remote_host;
3696 envp[envc ++] = script_name;
3697 envp[envc ++] = script_filename;
3698
3699 if (path_info[0])
3700 envp[envc ++] = path_info;
3701
3702 if (con->username[0])
3703 {
3704 snprintf(remote_user, sizeof(remote_user), "REMOTE_USER=%s", con->username);
3705
3706 envp[envc ++] = remote_user;
3707 }
3708
3709 if (httpGetVersion(con->http) == HTTP_VERSION_1_1)
3710 envp[envc ++] = "SERVER_PROTOCOL=HTTP/1.1";
3711 else if (httpGetVersion(con->http) == HTTP_VERSION_1_0)
3712 envp[envc ++] = "SERVER_PROTOCOL=HTTP/1.0";
3713 else
3714 envp[envc ++] = "SERVER_PROTOCOL=HTTP/0.9";
3715
3716 if (httpGetCookie(con->http))
3717 {
3718 snprintf(http_cookie, sizeof(http_cookie), "HTTP_COOKIE=%s",
3719 httpGetCookie(con->http));
3720 envp[envc ++] = http_cookie;
3721 }
3722
3723 if (httpGetField(con->http, HTTP_FIELD_USER_AGENT)[0])
3724 {
3725 snprintf(http_user_agent, sizeof(http_user_agent), "HTTP_USER_AGENT=%s",
3726 httpGetField(con->http, HTTP_FIELD_USER_AGENT));
3727 envp[envc ++] = http_user_agent;
3728 }
3729
3730 if (httpGetField(con->http, HTTP_FIELD_REFERER)[0])
3731 {
3732 snprintf(http_referer, sizeof(http_referer), "HTTP_REFERER=%s",
3733 httpGetField(con->http, HTTP_FIELD_REFERER));
3734 envp[envc ++] = http_referer;
3735 }
3736
3737 if (con->operation == HTTP_STATE_GET)
3738 {
3739 envp[envc ++] = "REQUEST_METHOD=GET";
3740
3741 if (con->query_string)
3742 {
3743 /*
3744 * Add GET form variables after ?...
3745 */
3746
3747 envp[envc ++] = con->query_string;
3748 }
3749 else
3750 envp[envc ++] = "QUERY_STRING=";
3751 }
3752 else
3753 {
3754 sprintf(content_length, "CONTENT_LENGTH=" CUPS_LLFMT,
3755 CUPS_LLCAST con->bytes);
3756 snprintf(content_type, sizeof(content_type), "CONTENT_TYPE=%s",
3757 httpGetField(con->http, HTTP_FIELD_CONTENT_TYPE));
3758
3759 envp[envc ++] = "REQUEST_METHOD=POST";
3760 envp[envc ++] = content_length;
3761 envp[envc ++] = content_type;
3762 }
3763
3764 /*
3765 * Tell the CGI if we are using encryption...
3766 */
3767
3768 if (httpIsEncrypted(con->http))
3769 envp[envc ++] = "HTTPS=ON";
3770
3771 /*
3772 * Terminate the environment array...
3773 */
3774
3775 envp[envc] = NULL;
3776
3777 if (LogLevel >= CUPSD_LOG_DEBUG)
3778 {
3779 for (i = 0; i < argc; i ++)
3780 cupsdLogMessage(CUPSD_LOG_DEBUG,
3781 "[CGI] argv[%d] = \"%s\"", i, argv[i]);
3782 for (i = 0; i < envc; i ++)
3783 cupsdLogMessage(CUPSD_LOG_DEBUG,
3784 "[CGI] envp[%d] = \"%s\"", i, envp[i]);
3785 }
3786
3787 /*
3788 * Create a pipe for the output...
3789 */
3790
3791 if (cupsdOpenPipe(fds))
3792 {
3793 cupsdLogMessage(CUPSD_LOG_ERROR, "[CGI] Unable to create pipe for %s - %s",
3794 argv[0], strerror(errno));
3795 return (0);
3796 }
3797
3798 /*
3799 * Then execute the command...
3800 */
3801
3802 if (cupsdStartProcess(command, argv, envp, infile, fds[1], CGIPipes[1],
3803 -1, -1, root, DefaultProfile, NULL, &pid) < 0)
3804 {
3805 /*
3806 * Error - can't fork!
3807 */
3808
3809 cupsdLogMessage(CUPSD_LOG_ERROR, "[CGI] Unable to start %s - %s", argv[0],
3810 strerror(errno));
3811
3812 cupsdClosePipe(fds);
3813 pid = 0;
3814 }
3815 else
3816 {
3817 /*
3818 * Fork successful - return the PID...
3819 */
3820
3821 if (con->username[0])
3822 cupsdAddCert(pid, con->username, con->type);
3823
3824 cupsdLogMessage(CUPSD_LOG_DEBUG, "[CGI] Started %s (PID %d)", command, pid);
3825
3826 *outfile = fds[0];
3827 close(fds[1]);
3828 }
3829
3830 return (pid);
3831 }
3832
3833
3834 /*
3835 * 'valid_host()' - Is the Host: field valid?
3836 */
3837
3838 static int /* O - 1 if valid, 0 if not */
3839 valid_host(cupsd_client_t *con) /* I - Client connection */
3840 {
3841 cupsd_alias_t *a; /* Current alias */
3842 cupsd_netif_t *netif; /* Current network interface */
3843 const char *end; /* End character */
3844 char *ptr; /* Pointer into host value */
3845
3846
3847 /*
3848 * Copy the Host: header for later use...
3849 */
3850
3851 strlcpy(con->clientname, httpGetField(con->http, HTTP_FIELD_HOST),
3852 sizeof(con->clientname));
3853 if ((ptr = strrchr(con->clientname, ':')) != NULL && !strchr(ptr, ']'))
3854 {
3855 *ptr++ = '\0';
3856 con->clientport = atoi(ptr);
3857 }
3858 else
3859 con->clientport = con->serverport;
3860
3861 /*
3862 * Then validate...
3863 */
3864
3865 if (httpAddrLocalhost(httpGetAddress(con->http)))
3866 {
3867 /*
3868 * Only allow "localhost" or the equivalent IPv4 or IPv6 numerical
3869 * addresses when accessing CUPS via the loopback interface...
3870 */
3871
3872 return (!_cups_strcasecmp(con->clientname, "localhost") ||
3873 !_cups_strcasecmp(con->clientname, "localhost.") ||
3874 #ifdef __linux
3875 !_cups_strcasecmp(con->clientname, "localhost.localdomain") ||
3876 #endif /* __linux */
3877 !strcmp(con->clientname, "127.0.0.1") ||
3878 !strcmp(con->clientname, "[::1]"));
3879 }
3880
3881 #if defined(HAVE_DNSSD) || defined(HAVE_AVAHI)
3882 /*
3883 * Check if the hostname is something.local (Bonjour); if so, allow it.
3884 */
3885
3886 if ((end = strrchr(con->clientname, '.')) != NULL && end > con->clientname &&
3887 !end[1])
3888 {
3889 /*
3890 * "." on end, work back to second-to-last "."...
3891 */
3892
3893 for (end --; end > con->clientname && *end != '.'; end --);
3894 }
3895
3896 if (end && (!_cups_strcasecmp(end, ".local") ||
3897 !_cups_strcasecmp(end, ".local.")))
3898 return (1);
3899 #endif /* HAVE_DNSSD || HAVE_AVAHI */
3900
3901 /*
3902 * Check if the hostname is an IP address...
3903 */
3904
3905 if (isdigit(con->clientname[0] & 255) || con->clientname[0] == '[')
3906 {
3907 /*
3908 * Possible IPv4/IPv6 address...
3909 */
3910
3911 http_addrlist_t *addrlist; /* List of addresses */
3912
3913
3914 if ((addrlist = httpAddrGetList(con->clientname, AF_UNSPEC, NULL)) != NULL)
3915 {
3916 /*
3917 * Good IPv4/IPv6 address...
3918 */
3919
3920 httpAddrFreeList(addrlist);
3921 return (1);
3922 }
3923 }
3924
3925 /*
3926 * Check for (alias) name matches...
3927 */
3928
3929 for (a = (cupsd_alias_t *)cupsArrayFirst(ServerAlias);
3930 a;
3931 a = (cupsd_alias_t *)cupsArrayNext(ServerAlias))
3932 {
3933 /*
3934 * "ServerAlias *" allows all host values through...
3935 */
3936
3937 if (!strcmp(a->name, "*"))
3938 return (1);
3939
3940 if (!_cups_strncasecmp(con->clientname, a->name, a->namelen))
3941 {
3942 /*
3943 * Prefix matches; check the character at the end - it must be "." or nul.
3944 */
3945
3946 end = con->clientname + a->namelen;
3947
3948 if (!*end || (*end == '.' && !end[1]))
3949 return (1);
3950 }
3951 }
3952
3953 #if defined(HAVE_DNSSD) || defined(HAVE_AVAHI)
3954 for (a = (cupsd_alias_t *)cupsArrayFirst(DNSSDAlias);
3955 a;
3956 a = (cupsd_alias_t *)cupsArrayNext(DNSSDAlias))
3957 {
3958 /*
3959 * "ServerAlias *" allows all host values through...
3960 */
3961
3962 if (!strcmp(a->name, "*"))
3963 return (1);
3964
3965 if (!_cups_strncasecmp(con->clientname, a->name, a->namelen))
3966 {
3967 /*
3968 * Prefix matches; check the character at the end - it must be "." or nul.
3969 */
3970
3971 end = con->clientname + a->namelen;
3972
3973 if (!*end || (*end == '.' && !end[1]))
3974 return (1);
3975 }
3976 }
3977 #endif /* HAVE_DNSSD || HAVE_AVAHI */
3978
3979 /*
3980 * Check for interface hostname matches...
3981 */
3982
3983 for (netif = (cupsd_netif_t *)cupsArrayFirst(NetIFList);
3984 netif;
3985 netif = (cupsd_netif_t *)cupsArrayNext(NetIFList))
3986 {
3987 if (!_cups_strncasecmp(con->clientname, netif->hostname, netif->hostlen))
3988 {
3989 /*
3990 * Prefix matches; check the character at the end - it must be "." or nul.
3991 */
3992
3993 end = con->clientname + netif->hostlen;
3994
3995 if (!*end || (*end == '.' && !end[1]))
3996 return (1);
3997 }
3998 }
3999
4000 return (0);
4001 }
4002
4003
4004 /*
4005 * 'write_file()' - Send a file via HTTP.
4006 */
4007
4008 static int /* O - 0 on failure, 1 on success */
4009 write_file(cupsd_client_t *con, /* I - Client connection */
4010 http_status_t code, /* I - HTTP status */
4011 char *filename, /* I - Filename */
4012 char *type, /* I - File type */
4013 struct stat *filestats) /* O - File information */
4014 {
4015 con->file = open(filename, O_RDONLY);
4016
4017 cupsdLogClient(con, CUPSD_LOG_DEBUG2,
4018 "write_file code=%d, filename=\"%s\" (%d), "
4019 "type=\"%s\", filestats=%p",
4020 code, filename, con->file, type ? type : "(null)", filestats);
4021
4022 if (con->file < 0)
4023 return (0);
4024
4025 fcntl(con->file, F_SETFD, fcntl(con->file, F_GETFD) | FD_CLOEXEC);
4026
4027 con->pipe_pid = 0;
4028 con->sent_header = 1;
4029
4030 httpClearFields(con->http);
4031
4032 httpSetLength(con->http, (size_t)filestats->st_size);
4033
4034 httpSetField(con->http, HTTP_FIELD_LAST_MODIFIED,
4035 httpGetDateString(filestats->st_mtime));
4036
4037 if (!cupsdSendHeader(con, code, type, CUPSD_AUTH_NONE))
4038 return (0);
4039
4040 cupsdAddSelect(httpGetFd(con->http), NULL, (cupsd_selfunc_t)cupsdWriteClient, con);
4041
4042 cupsdLogClient(con, CUPSD_LOG_DEBUG, "Sending file.");
4043
4044 return (1);
4045 }
4046
4047
4048 /*
4049 * 'write_pipe()' - Flag that data is available on the CGI pipe.
4050 */
4051
4052 static void
4053 write_pipe(cupsd_client_t *con) /* I - Client connection */
4054 {
4055 cupsdLogClient(con, CUPSD_LOG_DEBUG2, "write_pipe CGI output on fd %d",
4056 con->file);
4057
4058 con->file_ready = 1;
4059
4060 cupsdRemoveSelect(con->file);
4061 cupsdAddSelect(httpGetFd(con->http), NULL, (cupsd_selfunc_t)cupsdWriteClient, con);
4062
4063 cupsdLogClient(con, CUPSD_LOG_DEBUG, "CGI data ready to be sent.");
4064 }
4065
4066
4067 /*
4068 * End of "$Id: client.c 12701 2015-06-08 18:33:44Z msweet $".
4069 */
Unnamed repository; edit this file 'description' to name the repository.