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