1 /*********************************************************************
2 *
3 * File : $Source: /cvsroot/ijbswa/current/jcc.c,v $
4 *
5 * Purpose : Main file. Contains main() method, main loop, and
6 * the main connection-handling function.
7 *
8 * Copyright : Written by and Copyright (C) 2001-2021 the
9 * Privoxy team. https://www.privoxy.org/
10 *
11 * Based on the Internet Junkbuster originally written
12 * by and Copyright (C) 1997 Anonymous Coders and
13 * Junkbusters Corporation. http://www.junkbusters.com
14 *
15 * This program is free software; you can redistribute it
16 * and/or modify it under the terms of the GNU General
17 * Public License as published by the Free Software
18 * Foundation; either version 2 of the License, or (at
19 * your option) any later version.
20 *
21 * This program is distributed in the hope that it will
22 * be useful, but WITHOUT ANY WARRANTY; without even the
23 * implied warranty of MERCHANTABILITY or FITNESS FOR A
24 * PARTICULAR PURPOSE. See the GNU General Public
25 * License for more details.
26 *
27 * The GNU General Public License should be included with
28 * this file. If not, you can view it at
29 * http://www.gnu.org/copyleft/gpl.html
30 * or write to the Free Software Foundation, Inc., 59
31 * Temple Place - Suite 330, Boston, MA 02111-1307, USA.
32 *
33 *********************************************************************/
34
35
36 #include "config.h"
37
38 #include <stdio.h>
39 #include <sys/types.h>
40 #include <stdlib.h>
41 #include <string.h>
42 #include <signal.h>
43 #include <fcntl.h>
44 #include <errno.h>
45 #include <assert.h>
46
47 #ifdef _WIN32
48 # ifndef FEATURE_PTHREAD
49 # ifndef STRICT
50 # define STRICT
51 # endif
52 # include <winsock2.h>
53 # include <windows.h>
54 # include <process.h>
55 # endif /* ndef FEATURE_PTHREAD */
56
57 # include "win32.h"
58 # ifndef _WIN_CONSOLE
59 # include "w32log.h"
60 # endif /* ndef _WIN_CONSOLE */
61 # include "w32svrapi.h"
62
63 #else /* ifndef _WIN32 */
64
65 # include <unistd.h>
66 # include <sys/wait.h>
67 # include <sys/time.h>
68 # include <sys/stat.h>
69 # include <sys/ioctl.h>
70
71 #ifdef sun
72 #include <sys/termios.h>
73 #endif /* sun */
74
75 #ifdef unix
76 #include <pwd.h>
77 #include <grp.h>
78 #endif
79
80 # include <signal.h>
81
82 # ifdef __BEOS__
83 # include <socket.h> /* BeOS has select() for sockets only. */
84 # include <OS.h> /* declarations for threads and stuff. */
85 # endif
86
87 #ifdef HAVE_POLL
88 #ifdef __GLIBC__
89 #include <sys/poll.h>
90 #else
91 #include <poll.h>
92 #endif /* def __GLIBC__ */
93 #else
94 # ifndef FD_ZERO
95 # include <select.h>
96 # endif
97 #warning poll() appears to be unavailable. Your platform will become unsupported in the future.
98 #endif /* HAVE_POLL */
99
100 #endif
101
102 #include "project.h"
103 #include "list.h"
104 #include "jcc.h"
105 #ifdef FEATURE_HTTPS_INSPECTION
106 #include "ssl.h"
107 #endif
108 #include "filters.h"
109 #include "loaders.h"
110 #include "parsers.h"
111 #include "miscutil.h"
112 #include "errlog.h"
113 #include "jbsockets.h"
114 #include "gateway.h"
115 #include "actions.h"
116 #include "cgi.h"
117 #include "loadcfg.h"
118 #include "urlmatch.h"
119 #ifdef FEATURE_CLIENT_TAGS
120 #include "client-tags.h"
121 #endif
122
123 int daemon_mode = 1;
124 struct client_states clients[1];
125 struct file_list files[1];
126
127 #ifdef FEATURE_STATISTICS
128 int urls_read = 0; /* total nr of urls read inc rejected */
129 int urls_rejected = 0; /* total nr of urls rejected */
130 #endif /* def FEATURE_STATISTICS */
131
132 #ifdef FEATURE_GRACEFUL_TERMINATION
133 int g_terminate = 0;
134 #endif
135
136 #if !defined(_WIN32)
137 static void sig_handler(int the_signal);
138 #endif
139 static int client_protocol_is_unsupported(struct client_state *csp, char *req);
140 static jb_err get_request_destination_elsewhere(struct client_state *csp, struct list *headers);
141 static jb_err get_server_headers(struct client_state *csp);
142 static const char *crunch_reason(const struct http_response *rsp);
143 static void send_crunch_response(struct client_state *csp, struct http_response *rsp);
144 static char *get_request_line(struct client_state *csp);
145 static jb_err receive_client_request(struct client_state *csp);
146 static jb_err parse_client_request(struct client_state *csp);
147 static void build_request_line(struct client_state *csp, const struct forward_spec *fwd, char **request_line);
148 static jb_err change_request_destination(struct client_state *csp);
149 static void handle_established_connection(struct client_state *csp);
150 static void chat(struct client_state *csp);
151 static void serve(struct client_state *csp);
152 #if !defined(_WIN32) || defined(_WIN_CONSOLE)
153 static void usage(const char *myname);
154 #endif
155 static void initialize_mutexes(void);
156 static jb_socket bind_port_helper(const char *haddr, int hport, int backlog);
157 static void bind_ports_helper(struct configuration_spec *config, jb_socket sockets[]);
158 static void close_ports_helper(jb_socket sockets[]);
159 static void listen_loop(void);
160 static void serve(struct client_state *csp);
161
162 #ifdef __BEOS__
163 static int32 server_thread(void *data);
164 #endif /* def __BEOS__ */
165
166 #ifdef _WIN32
167 #define sleep(N) Sleep(((N) * 1000))
168 #endif
169
170 #ifdef FUZZ
171 int process_fuzzed_input(char *fuzz_input_type, char *fuzz_input_file);
172 void show_fuzz_usage(const char *name);
173 #endif
174
175 #ifdef MUTEX_LOCKS_AVAILABLE
176 /*
177 * XXX: Does the locking stuff really belong in this file?
178 */
179 privoxy_mutex_t log_mutex;
180 privoxy_mutex_t log_init_mutex;
181 privoxy_mutex_t connection_reuse_mutex;
182
183 #ifdef FEATURE_HTTPS_INSPECTION
184 privoxy_mutex_t certificate_mutex;
185 privoxy_mutex_t ssl_init_mutex;
186 #endif
187
188 #ifdef FEATURE_EXTERNAL_FILTERS
189 privoxy_mutex_t external_filter_mutex;
190 #endif
191 #ifdef FEATURE_CLIENT_TAGS
192 privoxy_mutex_t client_tags_mutex;
193 #endif
194 #ifdef FEATURE_EXTENDED_STATISTICS
195 privoxy_mutex_t filter_statistics_mutex;
196 privoxy_mutex_t block_statistics_mutex;
197 #endif
198
199 #if !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R)
200 privoxy_mutex_t resolver_mutex;
201 #endif /* !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R) */
202
203 #ifndef HAVE_GMTIME_R
204 privoxy_mutex_t gmtime_mutex;
205 #endif /* ndef HAVE_GMTIME_R */
206
207 #ifndef HAVE_LOCALTIME_R
208 privoxy_mutex_t localtime_mutex;
209 #endif /* ndef HAVE_GMTIME_R */
210
211 #if !defined(HAVE_ARC4RANDOM) && !defined(HAVE_RANDOM)
212 privoxy_mutex_t rand_mutex;
213 #endif /* !defined(HAVE_ARC4RANDOM) && !defined(HAVE_RANDOM) */
214
215 #endif /* def MUTEX_LOCKS_AVAILABLE */
216
217 #if defined(unix)
218 const char *basedir = NULL;
219 const char *pidfile = NULL;
220 static int received_hup_signal = 0;
221 #endif /* defined unix */
222
223 /* HTTP snipplets. */
224 static const char CSUCCEED[] =
225 "HTTP/1.1 200 Connection established\r\n\r\n";
226
227 static const char CHEADER[] =
228 "HTTP/1.1 400 Invalid header received from client\r\n"
229 "Content-Type: text/plain\r\n"
230 "Connection: close\r\n\r\n"
231 "Invalid header received from client.\n";
232
233 static const char FTP_RESPONSE[] =
234 "HTTP/1.1 400 Invalid request received from client\r\n"
235 "Content-Type: text/plain\r\n"
236 "Connection: close\r\n\r\n"
237 "Invalid request. Privoxy doesn't support FTP.\n";
238
239 static const char GOPHER_RESPONSE[] =
240 "HTTP/1.1 400 Invalid request received from client\r\n"
241 "Content-Type: text/plain\r\n"
242 "Connection: close\r\n\r\n"
243 "Invalid request. Privoxy doesn't support gopher.\n";
244
245 /* XXX: should be a template */
246 static const char MISSING_DESTINATION_RESPONSE[] =
247 "HTTP/1.1 400 Bad request received from client\r\n"
248 "Content-Type: text/plain\r\n"
249 "Connection: close\r\n\r\n"
250 "Bad request. Privoxy was unable to extract the destination.\n";
251
252 /* XXX: should be a template */
253 static const char INVALID_SERVER_HEADERS_RESPONSE[] =
254 "HTTP/1.1 502 Server or forwarder response invalid\r\n"
255 "Content-Type: text/plain\r\n"
256 "Connection: close\r\n\r\n"
257 "Bad response. The server or forwarder response doesn't look like HTTP.\n";
258
259 /* XXX: should be a template */
260 static const char MESSED_UP_REQUEST_RESPONSE[] =
261 "HTTP/1.1 400 Malformed request after rewriting\r\n"
262 "Content-Type: text/plain\r\n"
263 "Connection: close\r\n\r\n"
264 "Bad request. Messed up with header filters.\n";
265
266 static const char TOO_MANY_CONNECTIONS_RESPONSE[] =
267 "HTTP/1.1 503 Too many open connections\r\n"
268 "Content-Type: text/plain\r\n"
269 "Connection: close\r\n\r\n"
270 "Maximum number of open connections reached.\n";
271
272 static const char CLIENT_CONNECTION_TIMEOUT_RESPONSE[] =
273 "HTTP/1.1 504 Connection timeout\r\n"
274 "Content-Type: text/plain\r\n"
275 "Connection: close\r\n\r\n"
276 "The connection timed out because the client request didn't arrive in time.\n";
277
278 static const char CLIENT_BODY_PARSE_ERROR_RESPONSE[] =
279 "HTTP/1.1 400 Failed reading client body\r\n"
280 "Content-Type: text/plain\r\n"
281 "Connection: close\r\n\r\n"
282 "Failed parsing or buffering the chunk-encoded client body.\n";
283
284 static const char UNSUPPORTED_CLIENT_EXPECTATION_ERROR_RESPONSE[] =
285 "HTTP/1.1 417 Expecting too much\r\n"
286 "Content-Type: text/plain\r\n"
287 "Connection: close\r\n\r\n"
288 "Privoxy detected an unsupported Expect header value.\n";
289
290 /* A function to crunch a response */
291 typedef struct http_response *(*crunch_func_ptr)(struct client_state *);
292
293 /* Crunch function flags */
294 #define CF_NO_FLAGS 0
295 /* Cruncher applies to forced requests as well */
296 #define CF_IGNORE_FORCE 1
297 /* Crunched requests are counted for the block statistics */
298 #define CF_COUNT_AS_REJECT 2
299
300 /* A crunch function and its flags */
301 struct cruncher
302 {
303 const crunch_func_ptr cruncher;
304 const int flags;
305 };
306
307 static int crunch_response_triggered(struct client_state *csp, const struct cruncher crunchers[]);
308
309 /* Complete list of cruncher functions */
310 static const struct cruncher crunchers_all[] = {
311 { direct_response, CF_COUNT_AS_REJECT|CF_IGNORE_FORCE},
312 { block_url, CF_COUNT_AS_REJECT },
313 #ifdef FEATURE_TRUST
314 { trust_url, CF_COUNT_AS_REJECT },
315 #endif /* def FEATURE_TRUST */
316 { redirect_url, CF_NO_FLAGS },
317 { dispatch_cgi, CF_IGNORE_FORCE},
318 { NULL, 0 }
319 };
320
321 /* Light version, used after tags are applied */
322 static const struct cruncher crunchers_light[] = {
323 { block_url, CF_COUNT_AS_REJECT },
324 { redirect_url, CF_NO_FLAGS },
325 { NULL, 0 }
326 };
327
328
329 /*
330 * XXX: Don't we really mean
331 *
332 * #if defined(unix)
333 *
334 * here?
335 */
336 #if !defined(_WIN32)
337 /*********************************************************************
338 *
339 * Function : sig_handler
340 *
341 * Description : Signal handler for different signals.
342 * Exit gracefully on TERM and INT
343 * or set a flag that will cause the errlog
344 * to be reopened by the main thread on HUP.
345 *
346 * Parameters :
347 * 1 : the_signal = the signal cause this function to call
348 *
349 * Returns : -
350 *
351 *********************************************************************/
sig_handler(int the_signal)352 static void sig_handler(int the_signal)
353 {
354 switch(the_signal)
355 {
356 case SIGTERM:
357 case SIGINT:
358 log_error(LOG_LEVEL_INFO, "exiting by signal %d .. bye", the_signal);
359 #if defined(unix)
360 if (pidfile)
361 {
362 unlink(pidfile);
363 }
364 #endif /* unix */
365 exit(the_signal);
366 break;
367
368 case SIGHUP:
369 #if defined(unix)
370 received_hup_signal = 1;
371 #endif
372 break;
373
374 default:
375 /*
376 * We shouldn't be here, unless we catch signals
377 * in main() that we can't handle here!
378 */
379 log_error(LOG_LEVEL_FATAL,
380 "sig_handler: exiting on unexpected signal %d", the_signal);
381 }
382 return;
383
384 }
385 #endif
386
387
388 /*********************************************************************
389 *
390 * Function : get_write_delay
391 *
392 * Description : Parse the delay-response parameter.
393 *
394 * Parameters :
395 * 1 : csp = Current client state (buffers, headers, etc...)
396 *
397 * Returns : Number of milliseconds to delay writes.
398 *
399 *********************************************************************/
get_write_delay(const struct client_state * csp)400 static unsigned int get_write_delay(const struct client_state *csp)
401 {
402 unsigned int delay;
403 char *endptr;
404 char *newval;
405
406 if ((csp->action->flags & ACTION_DELAY_RESPONSE) == 0)
407 {
408 return 0;
409 }
410 newval = csp->action->string[ACTION_STRING_DELAY_RESPONSE];
411
412 delay = (unsigned)strtol(newval, &endptr, 0);
413 if (*endptr != '\0')
414 {
415 log_error(LOG_LEVEL_FATAL,
416 "Invalid delay-response{} parameter: '%s'", newval);
417 }
418
419 return delay;
420
421 }
422
423
424 /*********************************************************************
425 *
426 * Function : client_protocol_is_unsupported
427 *
428 * Description : Checks if the client used a known unsupported
429 * protocol and deals with it by sending an error
430 * response.
431 *
432 * Parameters :
433 * 1 : csp = Current client state (buffers, headers, etc...)
434 * 2 : req = the first request line send by the client
435 *
436 * Returns : TRUE if an error response has been generated, or
437 * FALSE if the request doesn't look invalid.
438 *
439 *********************************************************************/
client_protocol_is_unsupported(struct client_state * csp,char * req)440 static int client_protocol_is_unsupported(struct client_state *csp, char *req)
441 {
442 /*
443 * If it's a FTP or gopher request, we don't support it.
444 *
445 * These checks are better than nothing, but they might
446 * not work in all configurations and some clients might
447 * have problems digesting the answer.
448 *
449 * They should, however, never cause more problems than
450 * Privoxy's old behaviour (returning the misleading HTML
451 * error message:
452 *
453 * "Could not resolve http://(ftp|gopher)://example.org").
454 */
455 if (!strncmpic(req, "GET ftp://", 10) || !strncmpic(req, "GET gopher://", 13))
456 {
457 const char *response = NULL;
458 const char *protocol = NULL;
459
460 if (!strncmpic(req, "GET ftp://", 10))
461 {
462 response = FTP_RESPONSE;
463 protocol = "FTP";
464 }
465 else
466 {
467 response = GOPHER_RESPONSE;
468 protocol = "GOPHER";
469 }
470 log_error(LOG_LEVEL_ERROR,
471 "%s tried to use Privoxy as %s proxy: %s",
472 csp->ip_addr_str, protocol, req);
473 log_error(LOG_LEVEL_CLF,
474 "%s - - [%T] \"%s\" 400 0", csp->ip_addr_str, req);
475 freez(req);
476
477 #ifdef FEATURE_HTTPS_INSPECTION
478 if (client_use_ssl(csp))
479 {
480 ssl_send_data_delayed(&(csp->ssl_client_attr),
481 (const unsigned char *)response, strlen(response),
482 get_write_delay(csp));
483 }
484 else
485 #endif
486 {
487 write_socket_delayed(csp->cfd, response, strlen(response),
488 get_write_delay(csp));
489 }
490
491 return TRUE;
492 }
493
494 return FALSE;
495 }
496
497
498 /*********************************************************************
499 *
500 * Function : client_has_unsupported_expectations
501 *
502 * Description : Checks if the client used an unsupported expectation
503 * in which case an error message is delivered.
504 *
505 * Parameters :
506 * 1 : csp = Current client state (buffers, headers, etc...)
507 *
508 * Returns : TRUE if an error response has been generated, or
509 * FALSE if the request doesn't look invalid.
510 *
511 *********************************************************************/
client_has_unsupported_expectations(const struct client_state * csp)512 static int client_has_unsupported_expectations(const struct client_state *csp)
513 {
514 if ((csp->flags & CSP_FLAG_UNSUPPORTED_CLIENT_EXPECTATION))
515 {
516 log_error(LOG_LEVEL_ERROR,
517 "Rejecting request from client %s with unsupported Expect header value",
518 csp->ip_addr_str);
519 log_error(LOG_LEVEL_CLF,
520 "%s - - [%T] \"%s\" 417 0", csp->ip_addr_str, csp->http->cmd);
521 write_socket_delayed(csp->cfd,
522 UNSUPPORTED_CLIENT_EXPECTATION_ERROR_RESPONSE,
523 strlen(UNSUPPORTED_CLIENT_EXPECTATION_ERROR_RESPONSE),
524 get_write_delay(csp));
525
526 return TRUE;
527 }
528
529 return FALSE;
530
531 }
532
533
534 /*********************************************************************
535 *
536 * Function : get_request_destination_elsewhere
537 *
538 * Description : If the client's request was redirected into
539 * Privoxy without the client's knowledge,
540 * the request line lacks the destination host.
541 *
542 * This function tries to get it elsewhere,
543 * provided accept-intercepted-requests is enabled.
544 *
545 * "Elsewhere" currently only means "Host: header",
546 * but in the future we may ask the redirecting
547 * packet filter to look the destination up.
548 *
549 * If the destination stays unknown, an error
550 * response is send to the client and headers
551 * are freed so that chat() can return directly.
552 *
553 * Parameters :
554 * 1 : csp = Current client state (buffers, headers, etc...)
555 * 2 : headers = a header list
556 *
557 * Returns : JB_ERR_OK if the destination is now known, or
558 * JB_ERR_PARSE if it isn't.
559 *
560 *********************************************************************/
get_request_destination_elsewhere(struct client_state * csp,struct list * headers)561 static jb_err get_request_destination_elsewhere(struct client_state *csp, struct list *headers)
562 {
563 if (!(csp->config->feature_flags & RUNTIME_FEATURE_ACCEPT_INTERCEPTED_REQUESTS))
564 {
565 log_error(LOG_LEVEL_ERROR, "%s's request: \'%s\' is invalid."
566 " Privoxy isn't configured to accept intercepted requests.",
567 csp->ip_addr_str, csp->http->cmd);
568 /* XXX: Use correct size */
569 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
570 csp->ip_addr_str, csp->http->cmd);
571
572 write_socket_delayed(csp->cfd, CHEADER, strlen(CHEADER),
573 get_write_delay(csp));
574 destroy_list(headers);
575
576 return JB_ERR_PARSE;
577 }
578 else if (JB_ERR_OK == get_destination_from_headers(headers, csp->http))
579 {
580 /* Split the domain we just got for pattern matching */
581 init_domain_components(csp->http);
582
583 return JB_ERR_OK;
584 }
585 else
586 {
587 /* We can't work without destination. Go spread the news.*/
588
589 /* XXX: Use correct size */
590 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
591 csp->ip_addr_str, csp->http->cmd);
592 log_error(LOG_LEVEL_ERROR,
593 "Privoxy was unable to get the destination for %s's request: %s",
594 csp->ip_addr_str, csp->http->cmd);
595
596 write_socket_delayed(csp->cfd, MISSING_DESTINATION_RESPONSE,
597 strlen(MISSING_DESTINATION_RESPONSE), get_write_delay(csp));
598 destroy_list(headers);
599
600 return JB_ERR_PARSE;
601 }
602 /*
603 * TODO: If available, use PF's ioctl DIOCNATLOOK as last resort
604 * to get the destination IP address, use it as host directly
605 * or do a reverse DNS lookup first.
606 */
607 }
608
609
610 /*********************************************************************
611 *
612 * Function : get_server_headers
613 *
614 * Description : Parses server headers in iob and fills them
615 * into csp->headers so that they can later be
616 * handled by sed().
617 *
618 * Parameters :
619 * 1 : csp = Current client state (buffers, headers, etc...)
620 *
621 * Returns : JB_ERR_OK if everything went fine, or
622 * JB_ERR_PARSE if the headers were incomplete.
623 *
624 *********************************************************************/
get_server_headers(struct client_state * csp)625 static jb_err get_server_headers(struct client_state *csp)
626 {
627 int continue_hack_in_da_house = 0;
628 char * header;
629
630 while (((header = get_header(csp->iob)) != NULL) || continue_hack_in_da_house)
631 {
632 if (header == NULL)
633 {
634 /*
635 * continue hack in da house. Ignore the ending of
636 * this head and continue enlisting header lines.
637 * The reason is described below.
638 */
639 enlist(csp->headers, "");
640 continue_hack_in_da_house = 0;
641 continue;
642 }
643 else if (0 == strncmpic(header, "HTTP/1.1 100", 12))
644 {
645 /*
646 * It's a bodyless continue response, don't
647 * stop header parsing after reaching its end.
648 *
649 * As a result Privoxy will concatenate the
650 * next response's head and parse and deliver
651 * the headers as if they belonged to one request.
652 *
653 * The client will separate them because of the
654 * empty line between them.
655 *
656 * XXX: What we're doing here is clearly against
657 * the intended purpose of the continue header,
658 * and under some conditions (HTTP/1.0 client request)
659 * it's a standard violation.
660 *
661 * Anyway, "sort of against the spec" is preferable
662 * to "always getting confused by Continue responses"
663 * (Privoxy's behaviour before this hack was added)
664 */
665 log_error(LOG_LEVEL_HEADER, "Continue hack in da house.");
666 continue_hack_in_da_house = 1;
667 }
668 else if (*header == '\0')
669 {
670 /*
671 * If the header is empty, but the Continue hack
672 * isn't active, we can assume that we reached the
673 * end of the buffer before we hit the end of the
674 * head.
675 *
676 * Inform the caller an let it decide how to handle it.
677 */
678 return JB_ERR_PARSE;
679 }
680
681 if (JB_ERR_MEMORY == enlist(csp->headers, header))
682 {
683 /*
684 * XXX: Should we quit the request and return a
685 * out of memory error page instead?
686 */
687 log_error(LOG_LEVEL_ERROR,
688 "Out of memory while enlisting server headers. %s lost.",
689 header);
690 }
691 freez(header);
692 }
693
694 return JB_ERR_OK;
695 }
696
697
698 /*********************************************************************
699 *
700 * Function : crunch_reason
701 *
702 * Description : Translates the crunch reason code into a string.
703 *
704 * Parameters :
705 * 1 : rsp = a http_response
706 *
707 * Returns : A string with the crunch reason or an error description.
708 *
709 *********************************************************************/
crunch_reason(const struct http_response * rsp)710 static const char *crunch_reason(const struct http_response *rsp)
711 {
712 char * reason = NULL;
713
714 assert(rsp != NULL);
715 if (rsp == NULL)
716 {
717 return "Internal error while searching for crunch reason";
718 }
719
720 switch (rsp->crunch_reason)
721 {
722 case UNSUPPORTED:
723 reason = "Unsupported HTTP feature";
724 break;
725 case BLOCKED:
726 reason = "Blocked";
727 break;
728 case UNTRUSTED:
729 reason = "Untrusted";
730 break;
731 case REDIRECTED:
732 reason = "Redirected";
733 break;
734 case CGI_CALL:
735 reason = "CGI Call";
736 break;
737 case NO_SUCH_DOMAIN:
738 reason = "DNS failure";
739 break;
740 case FORWARDING_FAILED:
741 reason = "Forwarding failed";
742 break;
743 case CONNECT_FAILED:
744 reason = "Connection failure";
745 break;
746 case OUT_OF_MEMORY:
747 reason = "Out of memory (may mask other reasons)";
748 break;
749 case CONNECTION_TIMEOUT:
750 reason = "Connection timeout";
751 break;
752 case NO_SERVER_DATA:
753 reason = "No server data received";
754 break;
755 default:
756 reason = "No reason recorded";
757 break;
758 }
759
760 return reason;
761 }
762
763
764 /*********************************************************************
765 *
766 * Function : log_applied_actions
767 *
768 * Description : Logs the applied actions if LOG_LEVEL_ACTIONS is
769 * enabled.
770 *
771 * Parameters :
772 * 1 : actions = Current action spec to log
773 *
774 * Returns : Nothing.
775 *
776 *********************************************************************/
log_applied_actions(const struct current_action_spec * actions)777 static void log_applied_actions(const struct current_action_spec *actions)
778 {
779 /*
780 * The conversion to text requires lots of memory allocations so
781 * we only do the conversion if the user is actually interested.
782 */
783 if (debug_level_is_enabled(LOG_LEVEL_ACTIONS))
784 {
785 char *actions_as_text = actions_to_line_of_text(actions);
786 log_error(LOG_LEVEL_ACTIONS, "%s", actions_as_text);
787 freez(actions_as_text);
788 }
789 }
790
791
792 /*********************************************************************
793 *
794 * Function : send_crunch_response
795 *
796 * Description : Delivers already prepared response for
797 * intercepted requests, logs the interception
798 * and frees the response.
799 *
800 * Parameters :
801 * 1 : csp = Current client state (buffers, headers, etc...)
802 * 2 : rsp = Fully prepared response. Will be freed on exit.
803 *
804 * Returns : Nothing.
805 *
806 *********************************************************************/
send_crunch_response(struct client_state * csp,struct http_response * rsp)807 static void send_crunch_response(struct client_state *csp, struct http_response *rsp)
808 {
809 const struct http_request *http = csp->http;
810 char status_code[4];
811
812 assert(rsp != NULL);
813 assert(rsp->head != NULL);
814
815 if (rsp == NULL)
816 {
817 log_error(LOG_LEVEL_FATAL, "NULL response in send_crunch_response.");
818 }
819
820 /*
821 * Extract the status code from the actual head
822 * that will be send to the client. It is the only
823 * way to get it right for all requests, including
824 * the fixed ones for out-of-memory problems.
825 *
826 * A head starts like this: 'HTTP/1.1 200...'
827 * 0123456789|11
828 * 10
829 */
830 status_code[0] = rsp->head[9];
831 status_code[1] = rsp->head[10];
832 status_code[2] = rsp->head[11];
833 status_code[3] = '\0';
834
835 /* Log that the request was crunched and why. */
836 log_applied_actions(csp->action);
837 #ifdef FEATURE_HTTPS_INSPECTION
838 if (client_use_ssl(csp))
839 {
840 log_error(LOG_LEVEL_CRUNCH, "%s: https://%s%s", crunch_reason(rsp),
841 http->hostport, http->path);
842 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s https://%s%s %s\" %s %lu",
843 csp->ip_addr_str, http->gpc, http->hostport, http->path,
844 http->version, status_code, rsp->content_length);
845 }
846 else
847 #endif
848 {
849 log_error(LOG_LEVEL_CRUNCH, "%s: %s", crunch_reason(rsp), http->url);
850 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" %s %lu",
851 csp->ip_addr_str, http->ocmd, status_code, rsp->content_length);
852 }
853 /* Write the answer to the client */
854 #ifdef FEATURE_HTTPS_INSPECTION
855 if (client_use_ssl(csp))
856 {
857 if ((ssl_send_data_delayed(&(csp->ssl_client_attr),
858 (const unsigned char *)rsp->head, rsp->head_length,
859 get_write_delay(csp)) < 0)
860 || (ssl_send_data_delayed(&(csp->ssl_client_attr),
861 (const unsigned char *)rsp->body, rsp->content_length,
862 get_write_delay(csp)) < 0))
863 {
864 /* There is nothing we can do about it. */
865 log_error(LOG_LEVEL_CONNECT, "Couldn't deliver the error message "
866 "for https://%s%s through client socket %d using TLS/SSL",
867 http->hostport, http->url, csp->cfd);
868 }
869 }
870 else
871 #endif
872 {
873 if (write_socket_delayed(csp->cfd, rsp->head, rsp->head_length,
874 get_write_delay(csp))
875 || write_socket_delayed(csp->cfd, rsp->body, rsp->content_length,
876 get_write_delay(csp)))
877 {
878 /* There is nothing we can do about it. */
879 log_error(LOG_LEVEL_CONNECT,
880 "Couldn't deliver the error message for %s through client socket %d: %E",
881 http->url, csp->cfd);
882 }
883 }
884
885 /* Clean up and return */
886 if (cgi_error_memory() != rsp)
887 {
888 free_http_response(rsp);
889 }
890 return;
891 }
892
893
894 /*********************************************************************
895 *
896 * Function : crunch_response_triggered
897 *
898 * Description : Checks if the request has to be crunched,
899 * and delivers the crunch response if necessary.
900 *
901 * Parameters :
902 * 1 : csp = Current client state (buffers, headers, etc...)
903 * 2 : crunchers = list of cruncher functions to run
904 *
905 * Returns : TRUE if the request was answered with a crunch response
906 * FALSE otherwise.
907 *
908 *********************************************************************/
crunch_response_triggered(struct client_state * csp,const struct cruncher crunchers[])909 static int crunch_response_triggered(struct client_state *csp, const struct cruncher crunchers[])
910 {
911 struct http_response *rsp = NULL;
912 const struct cruncher *c;
913
914 /*
915 * If CGI request crunching is disabled,
916 * check the CGI dispatcher out of order to
917 * prevent unintentional blocks or redirects.
918 */
919 if (!(csp->config->feature_flags & RUNTIME_FEATURE_CGI_CRUNCHING)
920 && (NULL != (rsp = dispatch_cgi(csp))))
921 {
922 /* Deliver, log and free the interception response. */
923 send_crunch_response(csp, rsp);
924 csp->flags |= CSP_FLAG_CRUNCHED;
925 return TRUE;
926 }
927
928 for (c = crunchers; c->cruncher != NULL; c++)
929 {
930 /*
931 * Check the cruncher if either Privoxy is toggled
932 * on and the request isn't forced, or if the cruncher
933 * applies to forced requests as well.
934 */
935 if (((csp->flags & CSP_FLAG_TOGGLED_ON) &&
936 !(csp->flags & CSP_FLAG_FORCED)) ||
937 (c->flags & CF_IGNORE_FORCE))
938 {
939 rsp = c->cruncher(csp);
940 if (NULL != rsp)
941 {
942 /* Deliver, log and free the interception response. */
943 send_crunch_response(csp, rsp);
944 csp->flags |= CSP_FLAG_CRUNCHED;
945 #ifdef FEATURE_STATISTICS
946 if (c->flags & CF_COUNT_AS_REJECT)
947 {
948 csp->flags |= CSP_FLAG_REJECTED;
949 }
950 #endif /* def FEATURE_STATISTICS */
951
952 return TRUE;
953 }
954 }
955 }
956
957 return FALSE;
958 }
959
960
961 /*********************************************************************
962 *
963 * Function : build_request_line
964 *
965 * Description : Builds the HTTP request line.
966 *
967 * If a HTTP forwarder is used it expects the whole URL,
968 * web servers only get the path.
969 *
970 * Parameters :
971 * 1 : csp = Current client state (buffers, headers, etc...)
972 * 2 : fwd = The forwarding spec used for the request.
973 * Can be NULL.
974 * 3 : request_line = The old request line which will be replaced.
975 *
976 * Returns : Nothing. Terminates in case of memory problems.
977 *
978 *********************************************************************/
build_request_line(struct client_state * csp,const struct forward_spec * fwd,char ** request_line)979 static void build_request_line(struct client_state *csp, const struct forward_spec *fwd, char **request_line)
980 {
981 struct http_request *http = csp->http;
982
983 /*
984 * Downgrade http version from 1.1 to 1.0
985 * if +downgrade action applies.
986 */
987 if ((csp->action->flags & ACTION_DOWNGRADE)
988 && (!strcmpic(http->version, "HTTP/1.1")))
989 {
990 freez(http->version);
991 http->version = strdup_or_die("HTTP/1.0");
992 }
993
994 /*
995 * Rebuild the request line.
996 */
997 freez(*request_line);
998 #ifdef FEATURE_HTTPS_INSPECTION
999 if (fwd != NULL && fwd->forward_host &&
1000 fwd->type != FORWARD_WEBSERVER && client_use_ssl(csp))
1001 {
1002 *request_line = strdup("CONNECT ");
1003 }
1004 else
1005 #endif
1006 {
1007 *request_line = strdup(http->gpc);
1008 string_append(request_line, " ");
1009 }
1010
1011 if (fwd != NULL && fwd->forward_host && fwd->type != FORWARD_WEBSERVER)
1012 {
1013 #ifdef FEATURE_HTTPS_INSPECTION
1014 if (client_use_ssl(csp))
1015 {
1016 char port_string[10];
1017
1018 string_append(request_line, http->host);
1019 snprintf(port_string, sizeof(port_string), ":%d", http->port);
1020 string_append(request_line, port_string);
1021 }
1022 else
1023 #endif
1024 {
1025 string_append(request_line, http->url);
1026 }
1027 }
1028 else
1029 {
1030 string_append(request_line, http->path);
1031 }
1032 string_append(request_line, " ");
1033 string_append(request_line, http->version);
1034
1035 if (*request_line == NULL)
1036 {
1037 log_error(LOG_LEVEL_FATAL, "Out of memory writing HTTP command");
1038 }
1039 log_error(LOG_LEVEL_HEADER, "New HTTP Request-Line: %s", *request_line);
1040 }
1041
1042
1043 /*********************************************************************
1044 *
1045 * Function : change_request_destination
1046 *
1047 * Description : Parse a (rewritten) request line and regenerate
1048 * the http request data.
1049 *
1050 * Parameters :
1051 * 1 : csp = Current client state (buffers, headers, etc...)
1052 *
1053 * Returns : Forwards the parse_http_request() return code.
1054 * Terminates in case of memory problems.
1055 *
1056 *********************************************************************/
change_request_destination(struct client_state * csp)1057 static jb_err change_request_destination(struct client_state *csp)
1058 {
1059 struct http_request *http = csp->http;
1060 jb_err err;
1061
1062 log_error(LOG_LEVEL_REDIRECTS, "Rewrite detected: %s",
1063 csp->headers->first->str);
1064 free_http_request(http);
1065 err = parse_http_request(csp->headers->first->str, http);
1066 if (JB_ERR_OK != err)
1067 {
1068 log_error(LOG_LEVEL_ERROR, "Couldn't parse rewritten request: %s.",
1069 jb_err_to_string(err));
1070 }
1071 if (http->ssl && strcmpic(csp->http->gpc, "CONNECT"))
1072 {
1073 /*
1074 * A client header filter changed the request URL from
1075 * http:// to https:// which we currently don't support.
1076 */
1077 log_error(LOG_LEVEL_ERROR, "Changing the request destination from http "
1078 "to https behind the client's back currently isn't supported.");
1079 return JB_ERR_PARSE;
1080 }
1081
1082 return err;
1083 }
1084
1085
1086 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
1087 /*********************************************************************
1088 *
1089 * Function : server_response_is_complete
1090 *
1091 * Description : Determines whether we should stop reading
1092 * from the server socket.
1093 *
1094 * Parameters :
1095 * 1 : csp = Current client state (buffers, headers, etc...)
1096 * 2 : content_length = Length of content received so far.
1097 *
1098 * Returns : TRUE if the response is complete,
1099 * FALSE otherwise.
1100 *
1101 *********************************************************************/
server_response_is_complete(struct client_state * csp,unsigned long long content_length)1102 static int server_response_is_complete(struct client_state *csp,
1103 unsigned long long content_length)
1104 {
1105 int content_length_known = !!(csp->flags & CSP_FLAG_CONTENT_LENGTH_SET);
1106
1107 if (!strcmpic(csp->http->gpc, "HEAD"))
1108 {
1109 /*
1110 * "HEAD" implies no body, we are thus expecting
1111 * no content. XXX: incomplete "list" of methods?
1112 */
1113 csp->expected_content_length = 0;
1114 content_length_known = TRUE;
1115 csp->flags |= CSP_FLAG_SERVER_CONTENT_LENGTH_SET;
1116 }
1117
1118 if (csp->http->status == 204 || csp->http->status == 304)
1119 {
1120 /*
1121 * Expect no body. XXX: incomplete "list" of status codes?
1122 */
1123 csp->expected_content_length = 0;
1124 content_length_known = TRUE;
1125 csp->flags |= CSP_FLAG_SERVER_CONTENT_LENGTH_SET;
1126 }
1127
1128 return (content_length_known && ((0 == csp->expected_content_length)
1129 || (csp->expected_content_length <= content_length)));
1130 }
1131
1132
1133 #ifdef FEATURE_CONNECTION_SHARING
1134 /*********************************************************************
1135 *
1136 * Function : wait_for_alive_connections
1137 *
1138 * Description : Waits for alive connections to timeout.
1139 *
1140 * Parameters : N/A
1141 *
1142 * Returns : N/A
1143 *
1144 *********************************************************************/
wait_for_alive_connections(void)1145 static void wait_for_alive_connections(void)
1146 {
1147 int connections_alive = close_unusable_connections();
1148
1149 while (0 < connections_alive)
1150 {
1151 log_error(LOG_LEVEL_CONNECT,
1152 "Waiting for %d connections to timeout.",
1153 connections_alive);
1154 sleep(60);
1155 connections_alive = close_unusable_connections();
1156 }
1157
1158 log_error(LOG_LEVEL_CONNECT, "No connections to wait for left.");
1159
1160 }
1161 #endif /* def FEATURE_CONNECTION_SHARING */
1162
1163
1164 /*********************************************************************
1165 *
1166 * Function : save_connection_destination
1167 *
1168 * Description : Remembers a connection for reuse later on.
1169 *
1170 * Parameters :
1171 * 1 : sfd = Open socket to remember.
1172 * 2 : http = The destination for the connection.
1173 * 3 : fwd = The forwarder settings used.
1174 * 4 : server_connection = storage.
1175 *
1176 * Returns : void
1177 *
1178 *********************************************************************/
save_connection_destination(jb_socket sfd,const struct http_request * http,const struct forward_spec * fwd,struct reusable_connection * server_connection)1179 static void save_connection_destination(jb_socket sfd,
1180 const struct http_request *http,
1181 const struct forward_spec *fwd,
1182 struct reusable_connection *server_connection)
1183 {
1184 assert(sfd != JB_INVALID_SOCKET);
1185 assert(NULL != http->host);
1186
1187 server_connection->sfd = sfd;
1188 server_connection->host = strdup_or_die(http->host);
1189 server_connection->port = http->port;
1190
1191 assert(NULL != fwd);
1192 assert(server_connection->gateway_host == NULL);
1193 assert(server_connection->gateway_port == 0);
1194 assert(server_connection->forwarder_type == 0);
1195 assert(server_connection->forward_host == NULL);
1196 assert(server_connection->forward_port == 0);
1197
1198 server_connection->forwarder_type = fwd->type;
1199 if (NULL != fwd->gateway_host)
1200 {
1201 server_connection->gateway_host = strdup_or_die(fwd->gateway_host);
1202 }
1203 else
1204 {
1205 server_connection->gateway_host = NULL;
1206 }
1207 server_connection->gateway_port = fwd->gateway_port;
1208 if (NULL != fwd->auth_username)
1209 {
1210 server_connection->auth_username = strdup_or_die(fwd->auth_username);
1211 }
1212 else
1213 {
1214 server_connection->auth_username = NULL;
1215 }
1216 if (NULL != fwd->auth_password)
1217 {
1218 server_connection->auth_password = strdup_or_die(fwd->auth_password);
1219 }
1220 else
1221 {
1222 server_connection->auth_password = NULL;
1223 }
1224
1225 if (NULL != fwd->forward_host)
1226 {
1227 server_connection->forward_host = strdup_or_die(fwd->forward_host);
1228 }
1229 else
1230 {
1231 server_connection->forward_host = NULL;
1232 }
1233 server_connection->forward_port = fwd->forward_port;
1234 }
1235 #endif /* FEATURE_CONNECTION_KEEP_ALIVE */
1236
1237
1238 /*********************************************************************
1239 *
1240 * Function : verify_request_length
1241 *
1242 * Description : Checks if we already got the whole client requests
1243 * and sets CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ if
1244 * we do.
1245 *
1246 * Data that doesn't belong to the current request is
1247 * either thrown away to let the client retry on a clean
1248 * socket, or stashed to be dealt with after the current
1249 * request is served.
1250 *
1251 * Parameters :
1252 * 1 : csp = Current client state (buffers, headers, etc...)
1253 *
1254 * Returns : void
1255 *
1256 *********************************************************************/
verify_request_length(struct client_state * csp)1257 static void verify_request_length(struct client_state *csp)
1258 {
1259 unsigned long long buffered_request_bytes =
1260 (unsigned long long)(csp->client_iob->eod - csp->client_iob->cur);
1261
1262 if ((csp->expected_client_content_length != 0)
1263 && (buffered_request_bytes != 0))
1264 {
1265 if (csp->expected_client_content_length >= buffered_request_bytes)
1266 {
1267 csp->expected_client_content_length -= buffered_request_bytes;
1268 log_error(LOG_LEVEL_CONNECT, "Reduced expected bytes to %llu "
1269 "to account for the %llu ones we already got.",
1270 csp->expected_client_content_length, buffered_request_bytes);
1271 }
1272 else
1273 {
1274 assert(csp->client_iob->eod > csp->client_iob->cur + csp->expected_client_content_length);
1275 csp->client_iob->eod = csp->client_iob->cur + csp->expected_client_content_length;
1276 log_error(LOG_LEVEL_CONNECT, "Reducing expected bytes to 0. "
1277 "Marking the server socket tainted after throwing %llu bytes away.",
1278 buffered_request_bytes - csp->expected_client_content_length);
1279 csp->expected_client_content_length = 0;
1280 csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
1281 }
1282
1283 if (csp->expected_client_content_length == 0)
1284 {
1285 csp->flags |= CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
1286 }
1287 }
1288
1289 if (!(csp->flags & CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ)
1290 && ((csp->client_iob->cur < csp->client_iob->eod)
1291 || (csp->expected_client_content_length != 0)))
1292 {
1293 if (strcmpic(csp->http->gpc, "GET")
1294 && strcmpic(csp->http->gpc, "HEAD")
1295 && strcmpic(csp->http->gpc, "TRACE")
1296 && strcmpic(csp->http->gpc, "OPTIONS")
1297 && strcmpic(csp->http->gpc, "DELETE"))
1298 {
1299 /* XXX: this is an incomplete hack */
1300 csp->flags &= ~CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
1301 log_error(LOG_LEVEL_CONNECT, "There better be a request body.");
1302 }
1303 else
1304 {
1305 csp->flags |= CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
1306
1307 if ((csp->config->feature_flags & RUNTIME_FEATURE_TOLERATE_PIPELINING) == 0)
1308 {
1309 csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
1310 log_error(LOG_LEVEL_CONNECT,
1311 "Possible pipeline attempt detected. The connection will not "
1312 "be kept alive and we will only serve the first request.");
1313 /* Nuke the pipelined requests from orbit, just to be sure. */
1314 clear_iob(csp->client_iob);
1315 }
1316 else
1317 {
1318 /*
1319 * Keep the pipelined data around for now, we'll deal with
1320 * it once we're done serving the current request.
1321 */
1322 csp->flags |= CSP_FLAG_PIPELINED_REQUEST_WAITING;
1323 assert(csp->client_iob->eod >= csp->client_iob->cur);
1324 log_error(LOG_LEVEL_CONNECT, "Complete client request followed by "
1325 "%d bytes of pipelined data received.",
1326 (int)(csp->client_iob->eod - csp->client_iob->cur));
1327 }
1328 }
1329 }
1330 else
1331 {
1332 csp->flags |= CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
1333 log_error(LOG_LEVEL_CONNECT, "Complete client request received.");
1334 }
1335 }
1336
1337
1338 /*********************************************************************
1339 *
1340 * Function : mark_server_socket_tainted
1341 *
1342 * Description : Makes sure we don't reuse a server socket
1343 * (if we didn't read everything the server sent
1344 * us reusing the socket would lead to garbage).
1345 *
1346 * Parameters :
1347 * 1 : csp = Current client state (buffers, headers, etc...)
1348 *
1349 * Returns : void.
1350 *
1351 *********************************************************************/
mark_server_socket_tainted(struct client_state * csp)1352 static void mark_server_socket_tainted(struct client_state *csp)
1353 {
1354 /*
1355 * For consistency we always mark the server socket
1356 * tainted, however, to reduce the log noise we only
1357 * emit a log message if the server socket could have
1358 * actually been reused.
1359 */
1360 if ((csp->flags & CSP_FLAG_SERVER_CONNECTION_KEEP_ALIVE)
1361 && !(csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED))
1362 {
1363 log_error(LOG_LEVEL_CONNECT,
1364 "Marking the server socket %d tainted.",
1365 csp->server_connection.sfd);
1366 }
1367 csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
1368 }
1369
1370 /*********************************************************************
1371 *
1372 * Function : get_request_line
1373 *
1374 * Description : Read the client request line.
1375 *
1376 * Parameters :
1377 * 1 : csp = Current client state (buffers, headers, etc...)
1378 *
1379 * Returns : Pointer to request line or NULL in case of errors.
1380 *
1381 *********************************************************************/
get_request_line(struct client_state * csp)1382 static char *get_request_line(struct client_state *csp)
1383 {
1384 char buf[BUFFER_SIZE];
1385 char *request_line = NULL;
1386 int len;
1387
1388 memset(buf, 0, sizeof(buf));
1389
1390 if ((csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING) != 0)
1391 {
1392 /*
1393 * If there are multiple pipelined requests waiting,
1394 * the flag will be set again once the next request
1395 * has been parsed.
1396 */
1397 csp->flags &= ~CSP_FLAG_PIPELINED_REQUEST_WAITING;
1398
1399 request_line = get_header(csp->client_iob);
1400 if ((NULL != request_line) && ('\0' != *request_line))
1401 {
1402 return request_line;
1403 }
1404 else
1405 {
1406 log_error(LOG_LEVEL_CONNECT, "No complete request line "
1407 "received yet. Continuing reading from %d.", csp->cfd);
1408 }
1409 }
1410
1411 do
1412 {
1413 if (
1414 #ifdef FUZZ
1415 0 == (csp->flags & CSP_FLAG_FUZZED_INPUT) &&
1416 #endif
1417 !data_is_available(csp->cfd, csp->config->socket_timeout)
1418 )
1419 {
1420 if (socket_is_still_alive(csp->cfd))
1421 {
1422 log_error(LOG_LEVEL_CONNECT,
1423 "No request line on socket %d received in time. Timeout: %d.",
1424 csp->cfd, csp->config->socket_timeout);
1425 write_socket_delayed(csp->cfd, CLIENT_CONNECTION_TIMEOUT_RESPONSE,
1426 strlen(CLIENT_CONNECTION_TIMEOUT_RESPONSE),
1427 get_write_delay(csp));
1428 }
1429 else
1430 {
1431 log_error(LOG_LEVEL_CONNECT,
1432 "The client side of the connection on socket %d got "
1433 "closed without sending a complete request line.", csp->cfd);
1434 }
1435 return NULL;
1436 }
1437
1438 len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
1439
1440 if (len <= 0) return NULL;
1441
1442 /*
1443 * If there is no memory left for buffering the
1444 * request, there is nothing we can do but hang up
1445 */
1446 if (add_to_iob(csp->client_iob, csp->config->buffer_limit, buf, len))
1447 {
1448 return NULL;
1449 }
1450
1451 request_line = get_header(csp->client_iob);
1452
1453 } while ((NULL != request_line) && ('\0' == *request_line));
1454
1455 return request_line;
1456
1457 }
1458
1459 enum chunk_status
1460 {
1461 CHUNK_STATUS_MISSING_DATA,
1462 CHUNK_STATUS_BODY_COMPLETE,
1463 CHUNK_STATUS_PARSE_ERROR
1464 };
1465
1466
1467 /*********************************************************************
1468 *
1469 * Function : chunked_body_is_complete
1470 *
1471 * Description : Figures out whether or not a chunked body is complete.
1472 *
1473 * Currently it always starts at the beginning of the
1474 * buffer which is somewhat wasteful and prevents Privoxy
1475 * from starting to forward the correctly parsed chunks
1476 * as soon as theoretically possible.
1477 *
1478 * Should be modified to work with a common buffer,
1479 * and allow the caller to skip already parsed chunks.
1480 *
1481 * This would allow the function to be used for unbuffered
1482 * response bodies as well.
1483 *
1484 * Parameters :
1485 * 1 : iob = Buffer with the body to check.
1486 * 2 : length = Length of complete body
1487 *
1488 * Returns : Enum with the result of the check.
1489 *
1490 *********************************************************************/
chunked_body_is_complete(struct iob * iob,size_t * length)1491 static enum chunk_status chunked_body_is_complete(struct iob *iob, size_t *length)
1492 {
1493 unsigned int chunksize;
1494 char *p = iob->cur;
1495
1496 do
1497 {
1498 /*
1499 * We need at least a single digit, followed by "\r\n",
1500 * followed by an unknown amount of data, followed by "\r\n".
1501 */
1502 if (p + 5 > iob->eod)
1503 {
1504 return CHUNK_STATUS_MISSING_DATA;
1505 }
1506 if (sscanf(p, "%x", &chunksize) != 1)
1507 {
1508 return CHUNK_STATUS_PARSE_ERROR;
1509 }
1510
1511 /*
1512 * We want at least a single digit, followed by "\r\n",
1513 * followed by the specified amount of data, followed by "\r\n".
1514 */
1515 if (p + chunksize + 5 > iob->eod)
1516 {
1517 return CHUNK_STATUS_MISSING_DATA;
1518 }
1519
1520 /* Skip chunk-size. */
1521 p = strstr(p, "\r\n");
1522 if (NULL == p)
1523 {
1524 return CHUNK_STATUS_PARSE_ERROR;
1525 }
1526 /* Move beyond the chunkdata. */
1527 p += 2 + chunksize;
1528
1529 /* Make sure we're still within the buffer and have two bytes left */
1530 if (p + 2 > iob->eod)
1531 {
1532 return CHUNK_STATUS_MISSING_DATA;
1533 }
1534
1535 /* There should be another "\r\n" to skip */
1536 if (memcmp(p, "\r\n", 2))
1537 {
1538 return CHUNK_STATUS_PARSE_ERROR;
1539 }
1540 p += 2;
1541 } while (chunksize > 0U);
1542
1543 *length = (size_t)(p - iob->cur);
1544 assert(*length <= (size_t)(iob->eod - iob->cur));
1545 assert(p <= iob->eod);
1546
1547 return CHUNK_STATUS_BODY_COMPLETE;
1548
1549 }
1550
1551
1552 /*********************************************************************
1553 *
1554 * Function : receive_chunked_client_request_body
1555 *
1556 * Description : Read the chunk-encoded client request body.
1557 * Failures are dealt with.
1558 *
1559 * Parameters :
1560 * 1 : csp = Current client state (buffers, headers, etc...)
1561 *
1562 * Returns : JB_ERR_OK or JB_ERR_PARSE
1563 *
1564 *********************************************************************/
receive_chunked_client_request_body(struct client_state * csp)1565 static jb_err receive_chunked_client_request_body(struct client_state *csp)
1566 {
1567 size_t body_length;
1568 enum chunk_status status;
1569
1570 while (CHUNK_STATUS_MISSING_DATA ==
1571 (status = chunked_body_is_complete(csp->client_iob, &body_length)))
1572 {
1573 char buf[BUFFER_SIZE];
1574 int len;
1575
1576 if (!data_is_available(csp->cfd, csp->config->socket_timeout))
1577 {
1578 log_error(LOG_LEVEL_ERROR,
1579 "Timeout while waiting for the client body.");
1580 break;
1581 }
1582 len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
1583 if (len <= 0)
1584 {
1585 log_error(LOG_LEVEL_ERROR,
1586 "Reading the client body failed: %E");
1587 break;
1588 }
1589 if (add_to_iob(csp->client_iob, csp->config->buffer_limit, buf, len))
1590 {
1591 break;
1592 }
1593 }
1594 if (status != CHUNK_STATUS_BODY_COMPLETE)
1595 {
1596 write_socket_delayed(csp->cfd, CLIENT_BODY_PARSE_ERROR_RESPONSE,
1597 strlen(CLIENT_BODY_PARSE_ERROR_RESPONSE), get_write_delay(csp));
1598 log_error(LOG_LEVEL_CLF,
1599 "%s - - [%T] \"Failed reading chunked client body\" 400 0", csp->ip_addr_str);
1600 return JB_ERR_PARSE;
1601 }
1602 log_error(LOG_LEVEL_CONNECT,
1603 "Chunked client body completely read. Length: %lu", body_length);
1604 csp->expected_client_content_length = body_length;
1605
1606 return JB_ERR_OK;
1607
1608 }
1609
1610
1611 #ifdef FUZZ
1612 /*********************************************************************
1613 *
1614 * Function : fuzz_chunked_transfer_encoding
1615 *
1616 * Description : Treat the fuzzed input as chunked transfer encoding
1617 * to check and dechunk.
1618 *
1619 * Parameters :
1620 * 1 : csp = Used to store the data.
1621 * 2 : fuzz_input_file = File to read the input from.
1622 *
1623 * Returns : Result of dechunking
1624 *
1625 *********************************************************************/
fuzz_chunked_transfer_encoding(struct client_state * csp,char * fuzz_input_file)1626 extern int fuzz_chunked_transfer_encoding(struct client_state *csp, char *fuzz_input_file)
1627 {
1628 size_t length;
1629 size_t size = (size_t)(csp->iob->eod - csp->iob->cur);
1630 enum chunk_status status;
1631
1632 status = chunked_body_is_complete(csp->iob, &length);
1633 if (CHUNK_STATUS_BODY_COMPLETE != status)
1634 {
1635 log_error(LOG_LEVEL_INFO, "Chunked body is incomplete or invalid");
1636 }
1637
1638 return (JB_ERR_OK == remove_chunked_transfer_coding(csp->iob->cur, &size));
1639
1640 }
1641
1642
1643 /*********************************************************************
1644 *
1645 * Function : fuzz_client_request
1646 *
1647 * Description : Try to get a client request from the fuzzed input.
1648 *
1649 * Parameters :
1650 * 1 : csp = Current client state (buffers, headers, etc...)
1651 * 2 : fuzz_input_file = File to read the input from.
1652 *
1653 * Returns : Result of fuzzing.
1654 *
1655 *********************************************************************/
fuzz_client_request(struct client_state * csp,char * fuzz_input_file)1656 extern int fuzz_client_request(struct client_state *csp, char *fuzz_input_file)
1657 {
1658 jb_err err;
1659
1660 csp->cfd = 0;
1661 csp->ip_addr_str = "fuzzer";
1662
1663 if (strcmp(fuzz_input_file, "-") != 0)
1664 {
1665 log_error(LOG_LEVEL_FATAL,
1666 "Fuzzed client requests can currently only be read from stdin (-).");
1667 }
1668 err = receive_client_request(csp);
1669 if (err != JB_ERR_OK)
1670 {
1671 return 1;
1672 }
1673 err = parse_client_request(csp);
1674 if (err != JB_ERR_OK)
1675 {
1676 return 1;
1677 }
1678
1679 return 0;
1680
1681 }
1682 #endif /* def FUZZ */
1683
1684
1685 #ifdef FEATURE_FORCE_LOAD
1686 /*********************************************************************
1687 *
1688 * Function : force_required
1689 *
1690 * Description : Checks a request line to see if it contains
1691 * the FORCE_PREFIX. If it does, it is removed
1692 * unless enforcing requests has beend disabled.
1693 *
1694 * Parameters :
1695 * 1 : request_line = HTTP request line
1696 *
1697 * Returns : TRUE if force is required, FALSE otherwise.
1698 *
1699 *********************************************************************/
force_required(const struct client_state * csp,char * request_line)1700 static int force_required(const struct client_state *csp, char *request_line)
1701 {
1702 char *p;
1703
1704 p = strstr(request_line, "http://");
1705 if (p != NULL)
1706 {
1707 /* Skip protocol */
1708 p += strlen("http://");
1709 }
1710 else
1711 {
1712 /* Intercepted request usually don't specify the protocol. */
1713 p = request_line;
1714 }
1715
1716 /* Go to the beginning of the path */
1717 p = strstr(p, "/");
1718 if (p == NULL)
1719 {
1720 /*
1721 * If the path is missing the request line is invalid and we
1722 * are done here. The client-visible rejection happens later on.
1723 */
1724 return 0;
1725 }
1726
1727 if (0 == strncmpic(p, FORCE_PREFIX, strlen(FORCE_PREFIX) - 1))
1728 {
1729 if (!(csp->config->feature_flags & RUNTIME_FEATURE_ENFORCE_BLOCKS))
1730 {
1731 /* XXX: Should clean more carefully */
1732 strclean(request_line, FORCE_PREFIX);
1733 log_error(LOG_LEVEL_FORCE,
1734 "Enforcing request: \"%s\".", request_line);
1735
1736 return 1;
1737 }
1738 log_error(LOG_LEVEL_FORCE,
1739 "Ignored force prefix in request: \"%s\".", request_line);
1740 }
1741
1742 return 0;
1743
1744 }
1745 #endif /* def FEATURE_FORCE_LOAD */
1746
1747
1748 /*********************************************************************
1749 *
1750 * Function : receive_client_request
1751 *
1752 * Description : Read the client's request (more precisely the
1753 * client headers) and answer it if necessary.
1754 *
1755 * Parameters :
1756 * 1 : csp = Current client state (buffers, headers, etc...)
1757 *
1758 * Returns : JB_ERR_OK, JB_ERR_PARSE or JB_ERR_MEMORY
1759 *
1760 *********************************************************************/
receive_client_request(struct client_state * csp)1761 static jb_err receive_client_request(struct client_state *csp)
1762 {
1763 char buf[BUFFER_SIZE];
1764 char *p;
1765 char *req = NULL;
1766 struct http_request *http;
1767 int len;
1768 jb_err err;
1769
1770 /* Temporary copy of the client's headers before they get enlisted in csp->headers */
1771 struct list header_list;
1772 struct list *headers = &header_list;
1773
1774 /* We don't care if the arriving data is a valid HTTP request or not. */
1775 csp->requests_received_total++;
1776
1777 http = csp->http;
1778
1779 memset(buf, 0, sizeof(buf));
1780
1781 req = get_request_line(csp);
1782 if (req == NULL)
1783 {
1784 mark_server_socket_tainted(csp);
1785 return JB_ERR_PARSE;
1786 }
1787 assert(*req != '\0');
1788
1789 if (client_protocol_is_unsupported(csp, req))
1790 {
1791 return JB_ERR_PARSE;
1792 }
1793
1794 #ifdef FEATURE_FORCE_LOAD
1795 if (force_required(csp, req))
1796 {
1797 csp->flags |= CSP_FLAG_FORCED;
1798 }
1799 #endif /* def FEATURE_FORCE_LOAD */
1800
1801 err = parse_http_request(req, http);
1802 freez(req);
1803 if (JB_ERR_OK != err)
1804 {
1805 write_socket_delayed(csp->cfd, CHEADER, strlen(CHEADER),
1806 get_write_delay(csp));
1807 /* XXX: Use correct size */
1808 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request\" 400 0", csp->ip_addr_str);
1809 log_error(LOG_LEVEL_ERROR,
1810 "Couldn't parse request line received from %s: %s",
1811 csp->ip_addr_str, jb_err_to_string(err));
1812
1813 free_http_request(http);
1814 return JB_ERR_PARSE;
1815 }
1816
1817 /* grab the rest of the client's headers */
1818 init_list(headers);
1819 for (;;)
1820 {
1821 p = get_header(csp->client_iob);
1822
1823 if (p == NULL)
1824 {
1825 /* There are no additional headers to read. */
1826 break;
1827 }
1828
1829 if (*p == '\0')
1830 {
1831 /*
1832 * We didn't receive a complete header
1833 * line yet, get the rest of it.
1834 */
1835 if (!data_is_available(csp->cfd, csp->config->socket_timeout))
1836 {
1837 log_error(LOG_LEVEL_ERROR,
1838 "Stopped grabbing the client headers.");
1839 destroy_list(headers);
1840 return JB_ERR_PARSE;
1841 }
1842
1843 len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
1844 if (len <= 0)
1845 {
1846 log_error(LOG_LEVEL_ERROR, "read from client failed: %E");
1847 destroy_list(headers);
1848 return JB_ERR_PARSE;
1849 }
1850
1851 if (add_to_iob(csp->client_iob, csp->config->buffer_limit, buf, len))
1852 {
1853 /*
1854 * If there is no memory left for buffering the
1855 * request, there is nothing we can do but hang up
1856 */
1857 destroy_list(headers);
1858 return JB_ERR_MEMORY;
1859 }
1860 }
1861 else
1862 {
1863 if (!strncmpic(p, "Transfer-Encoding:", 18))
1864 {
1865 /*
1866 * XXX: should be called through sed()
1867 * but currently can't.
1868 */
1869 client_transfer_encoding(csp, &p);
1870 }
1871 /*
1872 * We were able to read a complete
1873 * header and can finally enlist it.
1874 */
1875 enlist(headers, p);
1876 freez(p);
1877 }
1878 }
1879
1880 if (http->host == NULL)
1881 {
1882 /*
1883 * If we still don't know the request destination,
1884 * the request is invalid or the client uses
1885 * Privoxy without its knowledge.
1886 */
1887 if (JB_ERR_OK != get_request_destination_elsewhere(csp, headers))
1888 {
1889 /*
1890 * Our attempts to get the request destination
1891 * elsewhere failed or Privoxy is configured
1892 * to only accept proxy requests.
1893 *
1894 * An error response has already been sent
1895 * and we're done here.
1896 */
1897 return JB_ERR_PARSE;
1898 }
1899 }
1900
1901 #ifdef FEATURE_CLIENT_TAGS
1902 /* XXX: If the headers were enlisted sooner, passing csp would do. */
1903 set_client_address(csp, headers);
1904 get_tag_list_for_client(csp->client_tags, csp->client_address);
1905 #endif
1906
1907 /*
1908 * Determine the actions for this URL
1909 */
1910 #ifdef FEATURE_TOGGLE
1911 if (!(csp->flags & CSP_FLAG_TOGGLED_ON))
1912 {
1913 /* Most compatible set of actions (i.e. none) */
1914 init_current_action(csp->action);
1915 }
1916 else
1917 #endif /* ndef FEATURE_TOGGLE */
1918 {
1919 get_url_actions(csp, http);
1920 }
1921
1922 enlist(csp->headers, http->cmd);
1923
1924 /* Append the previously read headers */
1925 err = list_append_list_unique(csp->headers, headers);
1926 destroy_list(headers);
1927
1928 return err;
1929
1930 }
1931
1932
1933 /*********************************************************************
1934 *
1935 * Function : parse_client_request
1936 *
1937 * Description : Parses the client's request and decides what to do
1938 * with it.
1939 *
1940 * Note that since we're not using select() we could get
1941 * blocked here if a client connected, then didn't say
1942 * anything!
1943 *
1944 * Parameters :
1945 * 1 : csp = Current client state (buffers, headers, etc...)
1946 *
1947 * Returns : JB_ERR_OK or JB_ERR_PARSE
1948 *
1949 *********************************************************************/
parse_client_request(struct client_state * csp)1950 static jb_err parse_client_request(struct client_state *csp)
1951 {
1952 struct http_request *http = csp->http;
1953 jb_err err;
1954
1955 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
1956 if ((csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE)
1957 && (!strcmpic(csp->http->version, "HTTP/1.1"))
1958 && (csp->http->ssl == 0))
1959 {
1960 /* Assume persistence until further notice */
1961 csp->flags |= CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
1962 }
1963 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
1964
1965 if (csp->http->ssl == 0)
1966 {
1967 /*
1968 * This whole block belongs to chat() but currently
1969 * has to be executed before sed().
1970 */
1971 if (csp->flags & CSP_FLAG_CHUNKED_CLIENT_BODY)
1972 {
1973 if (receive_chunked_client_request_body(csp) != JB_ERR_OK)
1974 {
1975 return JB_ERR_PARSE;
1976 }
1977 }
1978 else
1979 {
1980 csp->expected_client_content_length = get_expected_content_length(csp->headers);
1981 }
1982 verify_request_length(csp);
1983 }
1984 #ifndef FEATURE_HTTPS_INSPECTION
1985 else
1986 {
1987 csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
1988 }
1989 #endif
1990
1991 err = sed(csp, FILTER_CLIENT_HEADERS);
1992 if (JB_ERR_OK != err)
1993 {
1994 log_error(LOG_LEVEL_ERROR, "Failed to parse client request from %s.",
1995 csp->ip_addr_str);
1996 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
1997 csp->ip_addr_str, csp->http->cmd);
1998 write_socket_delayed(csp->cfd, CHEADER, strlen(CHEADER), get_write_delay(csp));
1999 return JB_ERR_PARSE;
2000 }
2001 csp->flags |= CSP_FLAG_CLIENT_HEADER_PARSING_DONE;
2002
2003 /* Check request line for rewrites. */
2004 if ((NULL == csp->headers->first->str)
2005 || (strcmp(http->cmd, csp->headers->first->str) &&
2006 (JB_ERR_OK != change_request_destination(csp))))
2007 {
2008 /*
2009 * A header filter broke the request line - bail out.
2010 */
2011 write_socket_delayed(csp->cfd, MESSED_UP_REQUEST_RESPONSE,
2012 strlen(MESSED_UP_REQUEST_RESPONSE), get_write_delay(csp));
2013 /* XXX: Use correct size */
2014 log_error(LOG_LEVEL_CLF,
2015 "%s - - [%T] \"Invalid request generated\" 400 0", csp->ip_addr_str);
2016 log_error(LOG_LEVEL_ERROR,
2017 "Invalid request line after applying header filters.");
2018 free_http_request(http);
2019
2020 return JB_ERR_PARSE;
2021 }
2022
2023 if (client_has_unsupported_expectations(csp))
2024 {
2025 return JB_ERR_PARSE;
2026 }
2027
2028 return JB_ERR_OK;
2029
2030 }
2031
2032
2033 /*********************************************************************
2034 *
2035 * Function : read_http_request_body
2036 *
2037 * Description : Reads remaining request body from the client.
2038 *
2039 * Parameters :
2040 * 1 : csp = Current client state (buffers, headers, etc...)
2041 *
2042 * Returns : 0 on success, anything else is an error.
2043 *
2044 *********************************************************************/
read_http_request_body(struct client_state * csp)2045 static int read_http_request_body(struct client_state *csp)
2046 {
2047 size_t to_read = csp->expected_client_content_length;
2048 int len;
2049
2050 assert(to_read != 0);
2051
2052 /* check if all data has been already read */
2053 if (to_read <= (csp->client_iob->eod - csp->client_iob->cur))
2054 {
2055 return 0;
2056 }
2057
2058 for (to_read -= (size_t)(csp->client_iob->eod - csp->client_iob->cur);
2059 to_read > 0 && data_is_available(csp->cfd, csp->config->socket_timeout);
2060 to_read -= (unsigned)len)
2061 {
2062 char buf[BUFFER_SIZE];
2063 size_t max_bytes_to_read = to_read < sizeof(buf) ? to_read : sizeof(buf);
2064
2065 log_error(LOG_LEVEL_CONNECT,
2066 "Waiting for up to %lu bytes of request body from the client.",
2067 max_bytes_to_read);
2068 len = read_socket(csp->cfd, buf, (int)max_bytes_to_read);
2069 if (len <= -1)
2070 {
2071 log_error(LOG_LEVEL_CONNECT, "Failed receiving request body from %s: %E", csp->ip_addr_str);
2072 return 1;
2073 }
2074 if (add_to_iob(csp->client_iob, csp->config->buffer_limit, (char *)buf, len))
2075 {
2076 return 1;
2077 }
2078 assert(to_read >= len);
2079 }
2080
2081 if (to_read != 0)
2082 {
2083 log_error(LOG_LEVEL_CONNECT,
2084 "Not enough request body has been read: expected %lu more bytes",
2085 to_read);
2086 return 1;
2087 }
2088 log_error(LOG_LEVEL_CONNECT,
2089 "The last %d bytes of the request body have been read", len);
2090 return 0;
2091 }
2092
2093
2094 /*********************************************************************
2095 *
2096 * Function : update_client_headers
2097 *
2098 * Description : Updates the HTTP headers from the client request.
2099 *
2100 * Parameters :
2101 * 1 : csp = Current client state (buffers, headers, etc...)
2102 * 2 : new_content_length = new content length value to set
2103 *
2104 * Returns : 0 on success, anything else is an error.
2105 *
2106 *********************************************************************/
update_client_headers(struct client_state * csp,size_t new_content_length)2107 static int update_client_headers(struct client_state *csp, size_t new_content_length)
2108 {
2109 static const char content_length[] = "Content-Length:";
2110 int updated = 0;
2111 struct list_entry *p;
2112
2113 #ifndef FEATURE_HTTPS_INSPECTION
2114 for (p = csp->headers->first;
2115 #else
2116 for (p = csp->http->client_ssl ? csp->https_headers->first : csp->headers->first;
2117 #endif
2118 !updated && (p != NULL); p = p->next)
2119 {
2120 /* Header crunch()ed in previous run? -> ignore */
2121 if (p->str == NULL)
2122 {
2123 continue;
2124 }
2125
2126 /* Does the current parser handle this header? */
2127 if (0 == strncmpic(p->str, content_length, sizeof(content_length) - 1))
2128 {
2129 updated = (JB_ERR_OK == header_adjust_content_length((char **)&(p->str), new_content_length));
2130 if (!updated)
2131 {
2132 return 1;
2133 }
2134 }
2135 }
2136
2137 return !updated;
2138 }
2139
2140
2141 /*********************************************************************
2142 *
2143 * Function : can_filter_request_body
2144 *
2145 * Description : Checks if the current request body can be stored in
2146 * the client_iob without hitting buffer limit.
2147 *
2148 * Parameters :
2149 * 1 : csp = Current client state (buffers, headers, etc...)
2150 *
2151 * Returns : TRUE if the current request size do not exceed buffer limit
2152 * FALSE otherwise.
2153 *
2154 *********************************************************************/
can_filter_request_body(const struct client_state * csp)2155 static int can_filter_request_body(const struct client_state *csp)
2156 {
2157 if (!can_add_to_iob(csp->client_iob, csp->config->buffer_limit,
2158 csp->expected_client_content_length))
2159 {
2160 log_error(LOG_LEVEL_INFO,
2161 "Not filtering request body from %s: buffer limit %lu will be exceeded "
2162 "(content length %lluu)", csp->ip_addr_str, csp->config->buffer_limit,
2163 csp->expected_client_content_length);
2164 return FALSE;
2165 }
2166 return TRUE;
2167 }
2168
2169
2170 /*********************************************************************
2171 *
2172 * Function : send_http_request
2173 *
2174 * Description : Sends the HTTP headers from the client request
2175 * and all the body data that has already been received.
2176 *
2177 * Parameters :
2178 * 1 : csp = Current client state (buffers, headers, etc...)
2179 *
2180 * Returns : 0 on success, anything else is an error.
2181 *
2182 *********************************************************************/
send_http_request(struct client_state * csp)2183 static int send_http_request(struct client_state *csp)
2184 {
2185 char *hdr;
2186 int write_failure;
2187 const char *to_send;
2188 size_t to_send_len;
2189 int filter_client_body = csp->expected_client_content_length != 0 &&
2190 client_body_filters_enabled(csp->action) && can_filter_request_body(csp);
2191
2192 if (filter_client_body)
2193 {
2194 if (read_http_request_body(csp))
2195 {
2196 return 1;
2197 }
2198 to_send_len = csp->expected_client_content_length;
2199 to_send = execute_client_body_filters(csp, &to_send_len);
2200 if (to_send == NULL)
2201 {
2202 /* just flush client_iob */
2203 filter_client_body = FALSE;
2204 }
2205 else if (to_send_len != csp->expected_client_content_length &&
2206 update_client_headers(csp, to_send_len))
2207 {
2208 log_error(LOG_LEVEL_HEADER, "Error updating client headers");
2209 freez(to_send);
2210 return 1;
2211 }
2212 csp->expected_client_content_length = 0;
2213 }
2214
2215 hdr = list_to_text(csp->headers);
2216 if (hdr == NULL)
2217 {
2218 /* FIXME Should handle error properly */
2219 log_error(LOG_LEVEL_FATAL, "Out of memory parsing client header");
2220 }
2221 list_remove_all(csp->headers);
2222
2223 /*
2224 * Write the client's (modified) header to the server
2225 * (along with anything else that may be in the buffer)
2226 */
2227 write_failure = 0 != write_socket(csp->server_connection.sfd, hdr, strlen(hdr));
2228 freez(hdr);
2229
2230 if (write_failure)
2231 {
2232 log_error(LOG_LEVEL_CONNECT, "Failed sending request headers to: %s: %E",
2233 csp->http->hostport);
2234 if (filter_client_body)
2235 {
2236 freez(to_send);
2237 }
2238 return 1;
2239 }
2240
2241 if (filter_client_body)
2242 {
2243 write_failure = 0 != write_socket(csp->server_connection.sfd, to_send, to_send_len);
2244 freez(to_send);
2245 if (write_failure)
2246 {
2247 log_error(LOG_LEVEL_CONNECT, "Failed sending filtered request body to: %s: %E",
2248 csp->http->hostport);
2249 return 1;
2250 }
2251 }
2252
2253 if (((csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING) == 0)
2254 && (flush_iob(csp->server_connection.sfd, csp->client_iob, 0) < 0))
2255 {
2256 log_error(LOG_LEVEL_CONNECT, "Failed sending request body to: %s: %E",
2257 csp->http->hostport);
2258 return 1;
2259 }
2260 return 0;
2261 }
2262
2263
2264 #ifdef FEATURE_HTTPS_INSPECTION
2265 /*********************************************************************
2266 *
2267 * Function : read_https_request_body
2268 *
2269 * Description : Reads remaining request body from the client.
2270 *
2271 * Parameters :
2272 * 1 : csp = Current client state (buffers, headers, etc...)
2273 *
2274 * Returns : 0 on success, anything else is an error.
2275 *
2276 *********************************************************************/
read_https_request_body(struct client_state * csp)2277 static int read_https_request_body(struct client_state *csp)
2278 {
2279 size_t to_read = csp->expected_client_content_length;
2280 int len;
2281
2282 assert(to_read != 0);
2283
2284 /* check if all data has been already read */
2285 if (to_read <= (csp->client_iob->eod - csp->client_iob->cur))
2286 {
2287 return 0;
2288 }
2289
2290 for (to_read -= (size_t)(csp->client_iob->eod - csp->client_iob->cur);
2291 to_read > 0 && (is_ssl_pending(&(csp->ssl_client_attr)) ||
2292 data_is_available(csp->cfd, csp->config->socket_timeout));
2293 to_read -= (unsigned)len)
2294 {
2295 unsigned char buf[BUFFER_SIZE];
2296 size_t max_bytes_to_read = to_read < sizeof(buf) ? to_read : sizeof(buf);
2297
2298 log_error(LOG_LEVEL_CONNECT,
2299 "Waiting for up to %lu bytes of request body from the client.",
2300 max_bytes_to_read);
2301 len = ssl_recv_data(&(csp->ssl_client_attr), buf,
2302 (unsigned)max_bytes_to_read);
2303 if (len <= 0)
2304 {
2305 log_error(LOG_LEVEL_CONNECT, "Failed receiving request body from %s", csp->ip_addr_str);
2306 return 1;
2307 }
2308 if (add_to_iob(csp->client_iob, csp->config->buffer_limit, (char *)buf, len))
2309 {
2310 return 1;
2311 }
2312 assert(to_read >= len);
2313 }
2314
2315 if (to_read != 0)
2316 {
2317 log_error(LOG_LEVEL_CONNECT,
2318 "Not enough request body has been read: expected %lu more bytes",
2319 to_read);
2320 return 1;
2321 }
2322
2323 log_error(LOG_LEVEL_CONNECT,
2324 "The last %llu bytes of the request body have been read",
2325 csp->expected_client_content_length);
2326 return 0;
2327 }
2328
2329
2330 /*********************************************************************
2331 *
2332 * Function : receive_and_send_encrypted_post_data
2333 *
2334 * Description : Reads remaining request body from the client and sends
2335 * it to the server.
2336 *
2337 * Parameters :
2338 * 1 : csp = Current client state (buffers, headers, etc...)
2339 *
2340 * Returns : 0 on success, anything else is an error.
2341 *
2342 *********************************************************************/
receive_and_send_encrypted_post_data(struct client_state * csp)2343 static int receive_and_send_encrypted_post_data(struct client_state *csp)
2344 {
2345 int content_length_known = csp->expected_client_content_length != 0;
2346
2347 while (is_ssl_pending(&(csp->ssl_client_attr))
2348 || (content_length_known && csp->expected_client_content_length != 0))
2349 {
2350 unsigned char buf[BUFFER_SIZE];
2351 int len;
2352 int max_bytes_to_read = sizeof(buf);
2353
2354 if (content_length_known && csp->expected_client_content_length < sizeof(buf))
2355 {
2356 max_bytes_to_read = (int)csp->expected_client_content_length;
2357 }
2358 log_error(LOG_LEVEL_CONNECT,
2359 "Waiting for up to %d bytes of request body from the client.",
2360 max_bytes_to_read);
2361 len = ssl_recv_data(&(csp->ssl_client_attr), buf,
2362 (unsigned)max_bytes_to_read);
2363 if (len == -1)
2364 {
2365 return 1;
2366 }
2367 if (len == 0)
2368 {
2369 /* XXX: Does this actually happen? */
2370 break;
2371 }
2372 log_error(LOG_LEVEL_CONNECT, "Forwarding %d bytes of encrypted request body",
2373 len);
2374 len = ssl_send_data(&(csp->ssl_server_attr), buf, (size_t)len);
2375 if (len == -1)
2376 {
2377 return 1;
2378 }
2379 if (csp->expected_client_content_length != 0)
2380 {
2381 if (csp->expected_client_content_length >= len)
2382 {
2383 csp->expected_client_content_length -= (unsigned)len;
2384 }
2385 if (csp->expected_client_content_length == 0)
2386 {
2387 log_error(LOG_LEVEL_CONNECT, "Forwarded the last %d bytes", len);
2388 break;
2389 }
2390 }
2391 }
2392
2393 log_error(LOG_LEVEL_CONNECT, "Done forwarding encrypted request body");
2394
2395 return 0;
2396
2397 }
2398
2399
2400 /*********************************************************************
2401 *
2402 * Function : send_https_request
2403 *
2404 * Description : Sends the HTTP headers from the client request
2405 * and all the body data that has already been received.
2406 *
2407 * Parameters :
2408 * 1 : csp = Current client state (buffers, headers, etc...)
2409 *
2410 * Returns : 0 on success, anything else is an error.
2411 *
2412 *********************************************************************/
send_https_request(struct client_state * csp)2413 static int send_https_request(struct client_state *csp)
2414 {
2415 char *hdr;
2416 int ret;
2417 long flushed = 0;
2418 const char *to_send;
2419 size_t to_send_len;
2420 int filter_client_body = csp->expected_client_content_length != 0 &&
2421 client_body_filters_enabled(csp->action) && can_filter_request_body(csp);
2422
2423 if (filter_client_body)
2424 {
2425 if (read_https_request_body(csp))
2426 {
2427 return 1;
2428 }
2429 to_send_len = csp->expected_client_content_length;
2430 to_send = execute_client_body_filters(csp, &to_send_len);
2431 if (to_send == NULL)
2432 {
2433 /* just flush client_iob */
2434 filter_client_body = FALSE;
2435 }
2436 else if (to_send_len != csp->expected_client_content_length &&
2437 update_client_headers(csp, to_send_len))
2438 {
2439 log_error(LOG_LEVEL_HEADER, "Error updating client headers");
2440 return 1;
2441 }
2442 csp->expected_client_content_length = 0;
2443 }
2444
2445 hdr = list_to_text(csp->https_headers);
2446 if (hdr == NULL)
2447 {
2448 /* FIXME Should handle error properly */
2449 log_error(LOG_LEVEL_FATAL, "Out of memory parsing client header");
2450 }
2451 list_remove_all(csp->https_headers);
2452
2453 /*
2454 * Write the client's (modified) header to the server
2455 * (along with anything else that may be in the buffer)
2456 */
2457 ret = ssl_send_data(&(csp->ssl_server_attr),
2458 (const unsigned char *)hdr, strlen(hdr));
2459 freez(hdr);
2460
2461 if (ret < 0)
2462 {
2463 log_error(LOG_LEVEL_CONNECT,
2464 "Failed sending encrypted request headers to: %s: %E",
2465 csp->http->hostport);
2466 mark_server_socket_tainted(csp);
2467 return 1;
2468 }
2469
2470 if (filter_client_body)
2471 {
2472 ret = ssl_send_data(&(csp->ssl_server_attr), (const unsigned char *)to_send, to_send_len);
2473 freez(to_send);
2474 if (ret < 0)
2475 {
2476 log_error(LOG_LEVEL_CONNECT, "Failed sending filtered request body to: %s",
2477 csp->http->hostport);
2478 return 1;
2479 }
2480 }
2481
2482 if (((csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING) == 0)
2483 && ((flushed = ssl_flush_socket(&(csp->ssl_server_attr),
2484 csp->client_iob)) < 0))
2485 {
2486 log_error(LOG_LEVEL_CONNECT, "Failed sending request body to: %s: %E",
2487 csp->http->hostport);
2488 return 1;
2489 }
2490 if (flushed != 0 || csp->expected_client_content_length != 0)
2491 {
2492 if (csp->expected_client_content_length != 0)
2493 {
2494 if (csp->expected_client_content_length < flushed)
2495 {
2496 log_error(LOG_LEVEL_ERROR,
2497 "Flushed %ld bytes of request body while only expecting %llu",
2498 flushed, csp->expected_client_content_length);
2499 csp->expected_client_content_length = 0;
2500 }
2501 else
2502 {
2503 log_error(LOG_LEVEL_CONNECT,
2504 "Flushed %ld bytes of request body while expecting %llu",
2505 flushed, csp->expected_client_content_length);
2506 csp->expected_client_content_length -= (unsigned)flushed;
2507 if (receive_and_send_encrypted_post_data(csp))
2508 {
2509 return 1;
2510 }
2511 }
2512 }
2513 else
2514 {
2515 log_error(LOG_LEVEL_CONNECT,
2516 "Flushed %ld bytes of request body", flushed);
2517 }
2518 }
2519
2520 log_error(LOG_LEVEL_CONNECT, "Encrypted request sent");
2521
2522 return 0;
2523
2524 }
2525
2526
2527 /*********************************************************************
2528 *
2529 * Function : receive_encrypted_request_headers
2530 *
2531 * Description : Receives the encrypted request headers when
2532 * https-inspecting.
2533 *
2534 * Parameters :
2535 * 1 : csp = Current client state (buffers, headers, etc...)
2536 *
2537 * Returns : JB_ERR_OK on success,
2538 * JB_ERR_PARSE or JB_ERR_MEMORY otherwise
2539 *
2540 *********************************************************************/
receive_encrypted_request_headers(struct client_state * csp)2541 static jb_err receive_encrypted_request_headers(struct client_state *csp)
2542 {
2543 char buf[BUFFER_SIZE];
2544 int len;
2545 char *p;
2546
2547 do
2548 {
2549 log_error(LOG_LEVEL_HEADER, "Waiting for encrypted client headers");
2550 if (!is_ssl_pending(&(csp->ssl_client_attr)) &&
2551 !data_is_available(csp->cfd, csp->config->socket_timeout))
2552 {
2553 log_error(LOG_LEVEL_CONNECT,
2554 "Socket %d timed out while waiting for client headers", csp->cfd);
2555 return JB_ERR_PARSE;
2556 }
2557 len = ssl_recv_data(&(csp->ssl_client_attr),
2558 (unsigned char *)buf, sizeof(buf));
2559 if (len == 0)
2560 {
2561 log_error(LOG_LEVEL_CONNECT,
2562 "Socket %d closed while waiting for client headers", csp->cfd);
2563 return JB_ERR_PARSE;
2564 }
2565 if (len == -1)
2566 {
2567 return JB_ERR_PARSE;
2568 }
2569 if (add_to_iob(csp->client_iob, csp->config->buffer_limit, buf, len))
2570 {
2571 return JB_ERR_MEMORY;
2572 }
2573 p = strstr(csp->client_iob->cur, "\r\n\r\n");
2574 } while (p == NULL);
2575
2576 log_error(LOG_LEVEL_HEADER, "Encrypted headers received completely");
2577
2578 return JB_ERR_OK;
2579 }
2580
2581
2582 /*********************************************************************
2583 *
2584 * Function : change_encrypted_request_destination
2585 *
2586 * Description : Parse a (rewritten) request line from an encrypted
2587 * request and regenerate the http request data.
2588 *
2589 * Parameters :
2590 * 1 : csp = Current client state (buffers, headers, etc...)
2591 *
2592 * Returns : Forwards the parse_http_request() return code.
2593 * Terminates in case of memory problems.
2594 *
2595 *********************************************************************/
change_encrypted_request_destination(struct client_state * csp)2596 static jb_err change_encrypted_request_destination(struct client_state *csp)
2597 {
2598 jb_err err;
2599 char *original_host = csp->http->host;
2600 int original_port = csp->http->port;
2601
2602 log_error(LOG_LEVEL_REDIRECTS, "Rewrite detected: %s",
2603 csp->https_headers->first->str);
2604 csp->http->host = NULL;
2605 free_http_request(csp->http);
2606 err = parse_http_request(csp->https_headers->first->str, csp->http);
2607 if (JB_ERR_OK != err)
2608 {
2609 log_error(LOG_LEVEL_ERROR, "Couldn't parse rewritten request: %s.",
2610 jb_err_to_string(err));
2611 freez(original_host);
2612 return err;
2613 }
2614
2615 if (csp->http->host == NULL)
2616 {
2617 char port_string[10];
2618 /*
2619 * The rewritten request line did not specify a host
2620 * which means we can use the original host specified
2621 * by the client.
2622 */
2623 csp->http->host = original_host;
2624 csp->http->port = original_port;
2625 log_error(LOG_LEVEL_REDIRECTS, "Keeping the original host: %s",
2626 csp->http->host);
2627 /*
2628 * If the rewritten request line didn't contain a host
2629 * it also didn't contain a port so we can reuse the host
2630 * port.
2631 */
2632 freez(csp->http->hostport);
2633 csp->http->hostport = strdup_or_die(csp->http->host);
2634 snprintf(port_string, sizeof(port_string), ":%d", original_port);
2635 err = string_append(&csp->http->hostport, port_string);
2636 if (err != JB_ERR_OK)
2637 {
2638 log_error(LOG_LEVEL_ERROR, "Failed to rebuild hostport: %s.",
2639 jb_err_to_string(err));
2640 return err;
2641 }
2642
2643 /*
2644 * While the request line didn't mention it,
2645 * we're https-inspecting and want to speak TLS
2646 * with the server.
2647 */
2648 csp->http->server_ssl = 1;
2649 csp->http->ssl = 1;
2650 }
2651 else
2652 {
2653 /* The rewrite filter added a host so we can ditch the original */
2654 freez(original_host);
2655 csp->http->server_ssl = csp->http->ssl;
2656 }
2657
2658 csp->http->client_ssl = 1;
2659
2660 freez(csp->https_headers->first->str);
2661 build_request_line(csp, NULL, &csp->https_headers->first->str);
2662
2663 if (!server_use_ssl(csp))
2664 {
2665 log_error(LOG_LEVEL_REDIRECTS,
2666 "Rewritten request line results in downgrade to http");
2667 /*
2668 * Replace the unencryptd headers received with the
2669 * CONNECT request with the ones we received securely.
2670 */
2671 destroy_list(csp->headers);
2672 csp->headers->first = csp->https_headers->first;
2673 csp->headers->last = csp->https_headers->last;
2674 csp->https_headers->first = NULL;
2675 csp->https_headers->last = NULL;
2676 }
2677
2678 return JB_ERR_OK;
2679
2680 }
2681
2682
2683 /*********************************************************************
2684 *
2685 * Function : process_encrypted_request_headers
2686 *
2687 * Description : Receives and parses the encrypted headers send
2688 * by the client when https-inspecting.
2689 *
2690 * Parameters :
2691 * 1 : csp = Current client state (buffers, headers, etc...)
2692 *
2693 * Returns : JB_ERR_OK on success,
2694 * JB_ERR_PARSE or JB_ERR_MEMORY otherwise
2695 *
2696 *********************************************************************/
process_encrypted_request_headers(struct client_state * csp)2697 static jb_err process_encrypted_request_headers(struct client_state *csp)
2698 {
2699 char *p;
2700 char *request_line;
2701 jb_err err;
2702 /* Temporary copy of the client's headers before they get enlisted in csp->https_headers */
2703 struct list header_list;
2704 struct list *headers = &header_list;
2705
2706 assert(csp->ssl_with_client_is_opened);
2707
2708 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
2709 if (csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE)
2710 {
2711 csp->flags |= CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
2712 }
2713 #endif
2714 err = receive_encrypted_request_headers(csp);
2715 if (err != JB_ERR_OK)
2716 {
2717 if (csp->client_iob->cur == NULL ||
2718 csp->client_iob->cur == csp->client_iob->eod)
2719 {
2720 /*
2721 * We did not receive any data, most likely because the
2722 * client is done. Don't log this as a parse failure.
2723 */
2724 return JB_ERR_PARSE;
2725 }
2726 /* XXX: Also used for JB_ERR_MEMORY */
2727 log_error(LOG_LEVEL_ERROR, "Failed to receive encrypted request: %s",
2728 jb_err_to_string(err));
2729 ssl_send_data_delayed(&(csp->ssl_client_attr),
2730 (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
2731 return err;
2732 }
2733
2734 /* We don't need get_request_line() because the whole HTTP head is buffered. */
2735 request_line = get_header(csp->client_iob);
2736 if (request_line == NULL)
2737 {
2738 log_error(LOG_LEVEL_ERROR, "Failed to get the encrypted request line");
2739 ssl_send_data_delayed(&(csp->ssl_client_attr),
2740 (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
2741 return JB_ERR_PARSE;
2742 }
2743 assert(*request_line != '\0');
2744
2745 if (client_protocol_is_unsupported(csp, request_line))
2746 {
2747 /*
2748 * If the protocol is unsupported we're done here.
2749 * client_protocol_is_unsupported() took care of sending
2750 * the error response and logging the error message.
2751 */
2752 return JB_ERR_PARSE;
2753 }
2754
2755 #ifdef FEATURE_FORCE_LOAD
2756 if (force_required(csp, request_line))
2757 {
2758 csp->flags |= CSP_FLAG_FORCED;
2759 }
2760 #endif /* def FEATURE_FORCE_LOAD */
2761
2762 free_http_request(csp->http);
2763
2764 err = parse_http_request(request_line, csp->http);
2765 /* XXX: Restore ssl setting. This is ugly */
2766 csp->http->client_ssl = 1;
2767 csp->http->server_ssl = 1;
2768
2769 freez(request_line);
2770 if (JB_ERR_OK != err)
2771 {
2772 ssl_send_data_delayed(&(csp->ssl_client_attr),
2773 (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
2774 /* XXX: Use correct size */
2775 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request\" 400 0", csp->ip_addr_str);
2776 log_error(LOG_LEVEL_ERROR,
2777 "Couldn't parse request line received from %s: %s",
2778 csp->ip_addr_str, jb_err_to_string(err));
2779
2780 free_http_request(csp->http);
2781 return JB_ERR_PARSE;
2782 }
2783
2784 /* Parse the rest of the client's headers. */
2785 init_list(headers);
2786 for (;;)
2787 {
2788 p = get_header(csp->client_iob);
2789
2790 if (p == NULL)
2791 {
2792 /* There are no additional headers to read. */
2793 break;
2794 }
2795 enlist(headers, p);
2796 freez(p);
2797 }
2798
2799 if (JB_ERR_OK != get_destination_from_https_headers(headers, csp->http))
2800 {
2801 /*
2802 * Our attempts to get the request destination
2803 * elsewhere failed.
2804 */
2805 log_error(LOG_LEVEL_ERROR,
2806 "Failed to get the encrypted request destination");
2807 ssl_send_data_delayed(&(csp->ssl_client_attr),
2808 (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
2809 destroy_list(headers);
2810
2811 return JB_ERR_PARSE;
2812 }
2813
2814 /* Split the domain we just got for pattern matching */
2815 init_domain_components(csp->http);
2816
2817 #ifdef FEATURE_CLIENT_TAGS
2818 /* XXX: If the headers were enlisted sooner, passing csp would do. */
2819 if (csp->client_address == NULL)
2820 {
2821 set_client_address(csp, headers);
2822 get_tag_list_for_client(csp->client_tags, csp->client_address);
2823 }
2824 #endif
2825
2826 #ifdef FEATURE_TOGGLE
2827 if ((csp->flags & CSP_FLAG_TOGGLED_ON) != 0)
2828 #endif
2829 {
2830 /*
2831 * Determine the actions for this request after
2832 * clearing the ones from the previous one.
2833 */
2834 free_current_action(csp->action);
2835 get_url_actions(csp, csp->http);
2836 }
2837
2838 enlist(csp->https_headers, csp->http->cmd);
2839
2840 /* Append the previously read headers */
2841 err = list_append_list_unique(csp->https_headers, headers);
2842 destroy_list(headers);
2843 if (JB_ERR_OK != err)
2844 {
2845 /* XXX: Send error message */
2846 return err;
2847 }
2848
2849 /* XXX: Work around crash */
2850 csp->error_message = NULL;
2851
2852 /* XXX: Why do this here? */
2853 csp->http->ssl = 1;
2854
2855 err = sed_https(csp);
2856 if (JB_ERR_OK != err)
2857 {
2858 ssl_send_data_delayed(&(csp->ssl_client_attr),
2859 (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
2860 log_error(LOG_LEVEL_ERROR, "Failed to parse client request from %s.",
2861 csp->ip_addr_str);
2862 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
2863 csp->ip_addr_str, csp->http->cmd);
2864 return JB_ERR_PARSE;
2865 }
2866
2867 if ((NULL == csp->https_headers->first->str)
2868 || (strcmp(csp->http->cmd, csp->https_headers->first->str) &&
2869 (JB_ERR_OK != change_encrypted_request_destination(csp))))
2870 {
2871 ssl_send_data_delayed(&(csp->ssl_client_attr),
2872 (const unsigned char *)MESSED_UP_REQUEST_RESPONSE,
2873 strlen(MESSED_UP_REQUEST_RESPONSE), get_write_delay(csp));
2874 log_error(LOG_LEVEL_ERROR,
2875 "Invalid request line after applying header filters.");
2876 /* XXX: Use correct size */
2877 log_error(LOG_LEVEL_CLF,
2878 "%s - - [%T] \"Invalid request generated\" 400 0", csp->ip_addr_str);
2879
2880 return JB_ERR_PARSE;
2881 }
2882
2883 log_error(LOG_LEVEL_HEADER, "Encrypted request headers processed");
2884 log_error(LOG_LEVEL_REQUEST, "https://%s%s", csp->http->hostport,
2885 csp->http->path);
2886
2887 return err;
2888
2889 }
2890
2891 /*********************************************************************
2892 *
2893 * Function : cgi_page_requested
2894 *
2895 * Description : Checks if a request is for an internal CGI page.
2896 *
2897 * Parameters :
2898 * 1 : host = The host requested by the client.
2899 *
2900 * Returns : 1 if a CGI page has been requested, 0 otherwise
2901 *
2902 *********************************************************************/
cgi_page_requested(const char * host)2903 static int cgi_page_requested(const char *host)
2904 {
2905 if ((0 == strcmpic(host, CGI_SITE_1_HOST))
2906 || (0 == strcmpic(host, CGI_SITE_1_HOST "."))
2907 || (0 == strcmpic(host, CGI_SITE_2_HOST))
2908 || (0 == strcmpic(host, CGI_SITE_2_HOST ".")))
2909 {
2910 return 1;
2911 }
2912
2913 return 0;
2914
2915 }
2916
2917
2918 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
2919 /*********************************************************************
2920 *
2921 * Function : continue_https_chat
2922 *
2923 * Description : Behaves similar to chat() but only deals with
2924 * https-inspected requests that arrive on an already
2925 * established connection. The first request is always
2926 * served by chat() which is a lot more complex as it
2927 * has to deal with forwarding settings and connection
2928 * failures etc.
2929 *
2930 * If a connection to the server has already been
2931 * opened it is reused unless the request is blocked
2932 * or the forwarder changed.
2933 *
2934 * If a connection to the server has not yet been
2935 * opened (because the previous request was crunched),
2936 * or the forwarder changed, the connection is dropped
2937 * so that the client retries on a fresh one.
2938 *
2939 * Parameters :
2940 * 1 : csp = Current client state (buffers, headers, etc...)
2941 *
2942 * Returns : Nothing.
2943 *
2944 *********************************************************************/
continue_https_chat(struct client_state * csp)2945 static void continue_https_chat(struct client_state *csp)
2946 {
2947 const struct forward_spec *fwd;
2948
2949 if (JB_ERR_OK != process_encrypted_request_headers(csp))
2950 {
2951 csp->flags &= ~CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
2952 return;
2953 }
2954
2955 csp->requests_received_total++;
2956
2957 /*
2958 * We have an encrypted request. Check if one of the crunchers wants it.
2959 */
2960 if (crunch_response_triggered(csp, crunchers_all))
2961 {
2962 /*
2963 * Yes. The client got the crunch response and we're done here.
2964 */
2965 return;
2966 }
2967 if (csp->ssl_with_server_is_opened == 0)
2968 {
2969 log_error(LOG_LEVEL_CONNECT,
2970 "Dropping the client connection on socket %d. "
2971 "The server connection has not been established yet.",
2972 csp->cfd);
2973 csp->flags &= ~CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
2974 return;
2975 }
2976 assert(csp->server_connection.sfd != JB_INVALID_SOCKET);
2977
2978 fwd = forward_url(csp, csp->http);
2979 if (!connection_destination_matches(&csp->server_connection, csp->http, fwd))
2980 {
2981 log_error(LOG_LEVEL_CONNECT,
2982 "Dropping the client connection on socket %d with "
2983 "server socket %d connected to %s. The forwarder has changed.",
2984 csp->cfd, csp->server_connection.sfd, csp->server_connection.host);
2985 csp->flags &= ~CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
2986 return;
2987 }
2988
2989 log_applied_actions(csp->action);
2990
2991 log_error(LOG_LEVEL_CONNECT,
2992 "Reusing server socket %d connected to %s. Requests already sent: %u.",
2993 csp->server_connection.sfd, csp->server_connection.host,
2994 csp->server_connection.requests_sent_total);
2995
2996 if (send_https_request(csp))
2997 {
2998 /*
2999 * Most likely the server connection timed out. We can't easily
3000 * create a new one so simply drop the client connection without a
3001 * error response to let the client retry.
3002 */
3003 log_error(LOG_LEVEL_CONNECT,
3004 "Dropping client connection on socket %d. "
3005 "Forwarding the encrypted client request failed.",
3006 csp->cfd);
3007 return;
3008 }
3009 csp->server_connection.request_sent = time(NULL);
3010 csp->server_connection.requests_sent_total++;
3011 handle_established_connection(csp);
3012 freez(csp->receive_buffer);
3013 }
3014 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
3015 #endif
3016
3017
3018 /*********************************************************************
3019 *
3020 * Function : handle_established_connection
3021 *
3022 * Description : Shuffle data between client and server once the
3023 * connection has been established and the request
3024 * has been sent.
3025 *
3026 * Parameters :
3027 * 1 : csp = Current client state (buffers, headers, etc...)
3028 *
3029 * Returns : Nothing.
3030 *
3031 *********************************************************************/
handle_established_connection(struct client_state * csp)3032 static void handle_established_connection(struct client_state *csp)
3033 {
3034 char *hdr;
3035 char *p;
3036 int n;
3037 #ifdef HAVE_POLL
3038 struct pollfd poll_fds[2];
3039 #else
3040 fd_set rfds;
3041 jb_socket maxfd;
3042 struct timeval timeout;
3043 #endif
3044 int server_body;
3045 int ms_iis5_hack = 0;
3046 unsigned long long byte_count = 0;
3047 struct http_request *http;
3048 long len = 0; /* for buffer sizes (and negative error codes) */
3049 int buffer_and_filter_content = 0;
3050 unsigned int write_delay;
3051 #ifdef FEATURE_HTTPS_INSPECTION
3052 int ret = 0;
3053 int use_ssl_tunnel = 0;
3054 csp->dont_verify_certificate = 0;
3055
3056 if (csp->http->ssl && !(csp->action->flags & ACTION_HTTPS_INSPECTION))
3057 {
3058 /* Pass encrypted content without filtering. */
3059 use_ssl_tunnel = 1;
3060 }
3061 #endif
3062
3063 /* Skeleton for HTTP response, if we should intercept the request */
3064 struct http_response *rsp;
3065 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3066 int watch_client_socket;
3067 #endif
3068
3069 csp->receive_buffer_size = csp->config->receive_buffer_size;
3070 csp->receive_buffer = zalloc(csp->receive_buffer_size + 1);
3071 if (csp->receive_buffer == NULL)
3072 {
3073 log_error(LOG_LEVEL_ERROR,
3074 "Out of memory. Failed to allocate the receive buffer.");
3075 rsp = cgi_error_memory();
3076 send_crunch_response(csp, rsp);
3077 return;
3078 }
3079
3080 http = csp->http;
3081
3082 #ifndef HAVE_POLL
3083 maxfd = (csp->cfd > csp->server_connection.sfd) ?
3084 csp->cfd : csp->server_connection.sfd;
3085 #endif
3086
3087 /* pass data between the client and server
3088 * until one or the other shuts down the connection.
3089 */
3090
3091 server_body = 0;
3092
3093 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3094 watch_client_socket = 0 == (csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING);
3095 #endif
3096 write_delay = get_write_delay(csp);
3097
3098 for (;;)
3099 {
3100 #ifdef FEATURE_HTTPS_INSPECTION
3101 if (server_use_ssl(csp) && is_ssl_pending(&(csp->ssl_server_attr)))
3102 {
3103 /*
3104 * It's possible that the TLS library already consumed all the
3105 * data the server intends to send. If that happens poll() and
3106 * select() will no longer see the data as available so we have
3107 * to skip the calls.
3108 */
3109 goto server_wants_to_talk;
3110 }
3111 #endif
3112 #ifndef HAVE_POLL
3113 FD_ZERO(&rfds);
3114 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3115 if (!watch_client_socket)
3116 {
3117 maxfd = csp->server_connection.sfd;
3118 }
3119 else
3120 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
3121 {
3122 FD_SET(csp->cfd, &rfds);
3123 }
3124
3125 FD_SET(csp->server_connection.sfd, &rfds);
3126 #endif /* ndef HAVE_POLL */
3127
3128 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3129 if ((csp->flags & CSP_FLAG_CHUNKED)
3130 && !(csp->flags & CSP_FLAG_CONTENT_LENGTH_SET)
3131 && ((csp->iob->eod - csp->iob->cur) >= 5)
3132 && !memcmp(csp->iob->eod-5, "0\r\n\r\n", 5))
3133 {
3134 /*
3135 * XXX: This check should be obsolete now,
3136 * but let's wait a while to be sure.
3137 */
3138 log_error(LOG_LEVEL_CONNECT,
3139 "Looks like we got the last chunk together with "
3140 "the server headers but didn't detect it earlier. "
3141 "We better stop reading.");
3142 byte_count = (unsigned long long)(csp->iob->eod - csp->iob->cur);
3143 csp->expected_content_length = byte_count;
3144 csp->flags |= CSP_FLAG_CONTENT_LENGTH_SET;
3145 }
3146 if (server_body && server_response_is_complete(csp, byte_count))
3147 {
3148 if (csp->expected_content_length == byte_count)
3149 {
3150 log_error(LOG_LEVEL_CONNECT,
3151 "Done reading from server. Content length: %llu as expected. "
3152 "Bytes most recently read: %ld.",
3153 byte_count, len);
3154 }
3155 else
3156 {
3157 log_error(LOG_LEVEL_CONNECT,
3158 "Done reading from server. Expected content length: %llu. "
3159 "Actual content length: %llu. Bytes most recently read: %ld.",
3160 csp->expected_content_length, byte_count, len);
3161 }
3162 len = 0;
3163 /*
3164 * XXX: Should not jump around, handle_established_connection()
3165 * is complicated enough already.
3166 */
3167 goto reading_done;
3168 }
3169 #endif /* FEATURE_CONNECTION_KEEP_ALIVE */
3170
3171 #ifdef HAVE_POLL
3172 poll_fds[0].fd = csp->cfd;
3173 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3174 if (!watch_client_socket)
3175 {
3176 /*
3177 * Ignore incoming data, but still watch out
3178 * for disconnects etc. These flags are always
3179 * implied anyway but explicitly setting them
3180 * doesn't hurt.
3181 */
3182 poll_fds[0].events = POLLERR|POLLHUP;
3183 }
3184 else
3185 #endif
3186 {
3187 poll_fds[0].events = POLLIN;
3188 }
3189 poll_fds[1].fd = csp->server_connection.sfd;
3190 poll_fds[1].events = POLLIN;
3191 n = poll(poll_fds, 2, csp->config->socket_timeout * 1000);
3192 #else
3193 timeout.tv_sec = csp->config->socket_timeout;
3194 timeout.tv_usec = 0;
3195 n = select((int)maxfd + 1, &rfds, NULL, NULL, &timeout);
3196 #endif /* def HAVE_POLL */
3197
3198 /* Server or client not responding in timeout */
3199 if (n == 0)
3200 {
3201 log_error(LOG_LEVEL_CONNECT, "Socket timeout %d reached: %s",
3202 csp->config->socket_timeout, http->url);
3203 if ((byte_count == 0) && (http->ssl == 0))
3204 {
3205 send_crunch_response(csp, error_response(csp, "connection-timeout"));
3206 }
3207 mark_server_socket_tainted(csp);
3208 #ifdef FEATURE_HTTPS_INSPECTION
3209 close_client_and_server_ssl_connections(csp);
3210 #endif
3211 return;
3212 }
3213 else if (n < 0)
3214 {
3215 #ifdef HAVE_POLL
3216 log_error(LOG_LEVEL_ERROR, "poll() failed!: %E");
3217 #else
3218 log_error(LOG_LEVEL_ERROR, "select() failed!: %E");
3219 #endif
3220 mark_server_socket_tainted(csp);
3221 #ifdef FEATURE_HTTPS_INSPECTION
3222 close_client_and_server_ssl_connections(csp);
3223 #endif
3224 return;
3225 }
3226
3227 /*
3228 * This is the body of the browser's request,
3229 * just read and write it.
3230 *
3231 * Receives data from browser and sends it to server
3232 *
3233 * XXX: Make sure the client doesn't use pipelining
3234 * behind Privoxy's back.
3235 */
3236 #ifdef HAVE_POLL
3237 if ((poll_fds[0].revents & (POLLERR|POLLHUP|POLLNVAL)) != 0)
3238 {
3239 log_error(LOG_LEVEL_CONNECT,
3240 "The client socket %d has become unusable while "
3241 "the server socket %d is still open.",
3242 csp->cfd, csp->server_connection.sfd);
3243 mark_server_socket_tainted(csp);
3244 break;
3245 }
3246
3247 if (poll_fds[0].revents != 0)
3248 #else
3249 if (FD_ISSET(csp->cfd, &rfds))
3250 #endif /* def HAVE_POLL*/
3251 {
3252 int max_bytes_to_read = (int)csp->receive_buffer_size;
3253
3254 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3255 if ((csp->flags & CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ))
3256 {
3257 if (data_is_available(csp->cfd, 0))
3258 {
3259 /*
3260 * If the next request is already waiting, we have
3261 * to stop select()ing the client socket. Otherwise
3262 * we would always return right away and get nothing
3263 * else done.
3264 */
3265 watch_client_socket = 0;
3266 log_error(LOG_LEVEL_CONNECT,
3267 "Stop watching client socket %d. "
3268 "There's already another request waiting.",
3269 csp->cfd);
3270 continue;
3271 }
3272 /*
3273 * If the client socket is set, but there's no data
3274 * available on the socket, the client went fishing
3275 * and continuing talking to the server makes no sense.
3276 */
3277 log_error(LOG_LEVEL_CONNECT,
3278 "The client closed socket %d while "
3279 "the server socket %d is still open.",
3280 csp->cfd, csp->server_connection.sfd);
3281 mark_server_socket_tainted(csp);
3282 break;
3283 }
3284 if (csp->expected_client_content_length != 0)
3285 {
3286 if (csp->expected_client_content_length < csp->receive_buffer_size)
3287 {
3288 max_bytes_to_read = (int)csp->expected_client_content_length;
3289 }
3290 log_error(LOG_LEVEL_CONNECT,
3291 "Waiting for up to %d bytes from the client.",
3292 max_bytes_to_read);
3293 }
3294 assert(max_bytes_to_read <= csp->receive_buffer_size);
3295 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
3296
3297 #ifdef FEATURE_HTTPS_INSPECTION
3298 if (client_use_ssl(csp))
3299 {
3300 if (csp->http->status == 101)
3301 {
3302 len = ssl_recv_data(&(csp->ssl_client_attr),
3303 (unsigned char *)csp->receive_buffer,
3304 (size_t)max_bytes_to_read);
3305 if (len == -1)
3306 {
3307 log_error(LOG_LEVEL_ERROR, "Failed to receive data "
3308 "on client socket %d for an upgraded connection",
3309 csp->cfd);
3310 break;
3311 }
3312 if (len == 0)
3313 {
3314 log_error(LOG_LEVEL_CONNECT, "Done receiving data "
3315 "on client socket %d for an upgraded connection",
3316 csp->cfd);
3317 break;
3318 }
3319 byte_count += (unsigned long long)len;
3320 len = ssl_send_data(&(csp->ssl_server_attr),
3321 (unsigned char *)csp->receive_buffer, (size_t)len);
3322 if (len == -1)
3323 {
3324 log_error(LOG_LEVEL_ERROR, "Failed to send data "
3325 "on server socket %d for an upgraded connection",
3326 csp->server_connection.sfd);
3327 break;
3328 }
3329 continue;
3330 }
3331 log_error(LOG_LEVEL_CONNECT, "Breaking with TLS/SSL.");
3332 break;
3333 }
3334 else
3335 #endif /* def FEATURE_HTTPS_INSPECTION */
3336 {
3337 len = read_socket(csp->cfd, csp->receive_buffer, max_bytes_to_read);
3338
3339 if (len <= 0)
3340 {
3341 /* XXX: not sure if this is necessary. */
3342 mark_server_socket_tainted(csp);
3343 break; /* "game over, man" */
3344 }
3345
3346 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3347 if (csp->expected_client_content_length != 0)
3348 {
3349 assert(len <= max_bytes_to_read);
3350 csp->expected_client_content_length -= (unsigned)len;
3351 log_error(LOG_LEVEL_CONNECT,
3352 "Expected client content length set to %llu "
3353 "after reading %ld bytes.",
3354 csp->expected_client_content_length, len);
3355 if (csp->expected_client_content_length == 0)
3356 {
3357 log_error(LOG_LEVEL_CONNECT,
3358 "Done reading from the client.");
3359 csp->flags |= CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
3360 }
3361 }
3362 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
3363
3364 if (write_socket(csp->server_connection.sfd, csp->receive_buffer, (size_t)len))
3365 {
3366 log_error(LOG_LEVEL_ERROR, "write to: %s failed: %E", http->host);
3367 mark_server_socket_tainted(csp);
3368 return;
3369 }
3370 }
3371 continue;
3372 }
3373
3374 /*
3375 * The server wants to talk. It could be the header or the body.
3376 * If `hdr' is null, then it's the header otherwise it's the body.
3377 * FIXME: Does `hdr' really mean `host'? No.
3378 */
3379 #ifdef HAVE_POLL
3380 if (poll_fds[1].revents != 0)
3381 #else
3382 if (FD_ISSET(csp->server_connection.sfd, &rfds))
3383 #endif /* HAVE_POLL */
3384 {
3385 #ifdef FEATURE_HTTPS_INSPECTION
3386 server_wants_to_talk:
3387 #endif
3388 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3389 /*
3390 * If we are buffering content, we don't want to eat up to
3391 * buffer-limit bytes if the client no longer cares about them.
3392 * If we aren't buffering, however, a dead client socket will be
3393 * noticed pretty much right away anyway, so we can reduce the
3394 * overhead by skipping the check.
3395 */
3396 if (buffer_and_filter_content && !socket_is_still_alive(csp->cfd))
3397 {
3398 #ifdef _WIN32
3399 log_error(LOG_LEVEL_CONNECT,
3400 "The server still wants to talk, but the client may already have hung up on us.");
3401 #else
3402 log_error(LOG_LEVEL_CONNECT,
3403 "The server still wants to talk, but the client hung up on us.");
3404 mark_server_socket_tainted(csp);
3405 #ifdef FEATURE_HTTPS_INSPECTION
3406 close_client_and_server_ssl_connections(csp);
3407 #endif
3408 return;
3409 #endif /* def _WIN32 */
3410 }
3411 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
3412
3413 #ifdef FEATURE_HTTPS_INSPECTION
3414 /*
3415 * Reading data from standard or secured connection (HTTP/HTTPS)
3416 */
3417 if (server_use_ssl(csp))
3418 {
3419 len = ssl_recv_data(&(csp->ssl_server_attr),
3420 (unsigned char *)csp->receive_buffer, csp->receive_buffer_size);
3421 }
3422 else
3423 #endif
3424 {
3425 len = read_socket(csp->server_connection.sfd, csp->receive_buffer,
3426 (int)csp->receive_buffer_size);
3427 }
3428
3429 if (len < 0)
3430 {
3431 log_error(LOG_LEVEL_ERROR, "read from: %s failed: %E", http->host);
3432
3433 if ((http->ssl && (csp->fwd == NULL))
3434 #ifdef FEATURE_HTTPS_INSPECTION
3435 && use_ssl_tunnel
3436 #endif
3437 )
3438 {
3439 /*
3440 * Just hang up. We already confirmed the client's CONNECT
3441 * request with status code 200 and unencrypted content is
3442 * no longer welcome.
3443 */
3444 log_error(LOG_LEVEL_ERROR,
3445 "CONNECT already confirmed. Unable to tell the client about the problem.");
3446 return;
3447 }
3448 else if (byte_count)
3449 {
3450 /*
3451 * Just hang up. We already transmitted the original headers
3452 * and parts of the original content and therefore missed the
3453 * chance to send an error message (without risking data corruption).
3454 *
3455 * XXX: we could retry with a fancy range request here.
3456 */
3457 log_error(LOG_LEVEL_ERROR, "Already forwarded the original headers. "
3458 "Unable to tell the client about the problem.");
3459 mark_server_socket_tainted(csp);
3460 #ifdef FEATURE_HTTPS_INSPECTION
3461 close_client_and_server_ssl_connections(csp);
3462 #endif
3463 return;
3464 }
3465 /*
3466 * XXX: Consider handling the cases above the same.
3467 */
3468 mark_server_socket_tainted(csp);
3469 len = 0;
3470 }
3471
3472 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
3473 if (csp->flags & CSP_FLAG_CHUNKED)
3474 {
3475 if ((len >= 5) && !memcmp(csp->receive_buffer+len-5, "0\r\n\r\n", 5))
3476 {
3477 /* XXX: this is a temporary hack */
3478 log_error(LOG_LEVEL_CONNECT,
3479 "Looks like we reached the end of the last chunk. "
3480 "We better stop reading.");
3481 csp->expected_content_length = byte_count + (unsigned long long)len;
3482 csp->flags |= CSP_FLAG_CONTENT_LENGTH_SET;
3483 }
3484 }
3485 reading_done:
3486 #endif /* FEATURE_CONNECTION_KEEP_ALIVE */
3487
3488 /*
3489 * This is guaranteed by allocating with zalloc_or_die()
3490 * and never (intentionally) writing to the last byte.
3491 *
3492 * csp->receive_buffer_size is the size of the part of the
3493 * buffer we intentionally write to, but we actually
3494 * allocated csp->receive_buffer_size+1 bytes so the assertion
3495 * stays within the allocated range.
3496 */
3497 assert(csp->receive_buffer[csp->receive_buffer_size] == '\0');
3498
3499 /*
3500 * Add a trailing zero to let be able to use string operations.
3501 * XXX: do we still need this with filter_popups gone?
3502 */
3503 assert(len <= csp->receive_buffer_size);
3504 csp->receive_buffer[len] = '\0';
3505
3506 /*
3507 * Normally, this would indicate that we've read
3508 * as much as the server has sent us and we can
3509 * close the client connection. However, Microsoft
3510 * in its wisdom has released IIS/5 with a bug that
3511 * prevents it from sending the trailing \r\n in
3512 * a 302 redirect header (and possibly other headers).
3513 * To work around this if we've haven't parsed
3514 * a full header we'll append a trailing \r\n
3515 * and see if this now generates a valid one.
3516 *
3517 * This hack shouldn't have any impacts. If we've
3518 * already transmitted the header or if this is a
3519 * SSL connection, then we won't bother with this
3520 * hack. So we only work on partially received
3521 * headers. If we append a \r\n and this still
3522 * doesn't generate a valid header, then we won't
3523 * transmit anything to the client.
3524 */
3525 if (len == 0)
3526 {
3527
3528 if (server_body || (http->ssl
3529 #ifdef FEATURE_HTTPS_INSPECTION
3530 && use_ssl_tunnel
3531 #endif
3532 ))
3533 {
3534 /*
3535 * If we have been buffering up the document,
3536 * now is the time to apply content modification
3537 * and send the result to the client.
3538 */
3539 if (buffer_and_filter_content)
3540 {
3541 p = execute_content_filters(csp);
3542 /*
3543 * If content filtering fails, use the original
3544 * buffer and length.
3545 * (see p != NULL ? p : csp->iob->cur below)
3546 */
3547 if (NULL == p)
3548 {
3549 csp->content_length = (size_t)(csp->iob->eod - csp->iob->cur);
3550 }
3551 #ifdef FEATURE_COMPRESSION
3552 else if ((csp->flags & CSP_FLAG_CLIENT_SUPPORTS_DEFLATE)
3553 && (csp->content_length > LOWER_LENGTH_LIMIT_FOR_COMPRESSION))
3554 {
3555 char *compressed_content = compress_buffer(p,
3556 (size_t *)&csp->content_length, csp->config->compression_level);
3557 if (compressed_content != NULL)
3558 {
3559 freez(p);
3560 p = compressed_content;
3561 csp->flags |= CSP_FLAG_BUFFERED_CONTENT_DEFLATED;
3562 }
3563 }
3564 #endif
3565
3566 if (JB_ERR_OK != update_server_headers(csp))
3567 {
3568 log_error(LOG_LEVEL_FATAL,
3569 "Failed to update server headers. after filtering.");
3570 }
3571
3572 hdr = list_to_text(csp->headers);
3573 if (hdr == NULL)
3574 {
3575 /* FIXME Should handle error properly */
3576 log_error(LOG_LEVEL_FATAL, "Out of memory parsing server header");
3577 }
3578
3579 #ifdef FEATURE_HTTPS_INSPECTION
3580 /*
3581 * Sending data with standard or secured connection (HTTP/HTTPS)
3582 */
3583 if (client_use_ssl(csp))
3584 {
3585 if ((ssl_send_data_delayed(&(csp->ssl_client_attr),
3586 (const unsigned char *)hdr, strlen(hdr),
3587 get_write_delay(csp)) < 0)
3588 || (ssl_send_data_delayed(&(csp->ssl_client_attr),
3589 (const unsigned char *) ((p != NULL) ? p : csp->iob->cur),
3590 csp->content_length, get_write_delay(csp)) < 0))
3591 {
3592 log_error(LOG_LEVEL_ERROR,
3593 "Failed to send the modified content to the client over TLS");
3594 freez(hdr);
3595 freez(p);
3596 mark_server_socket_tainted(csp);
3597 close_client_and_server_ssl_connections(csp);
3598 return;
3599 }
3600 }
3601 else
3602 #endif /* def FEATURE_HTTPS_INSPECTION */
3603 {
3604 if (write_socket_delayed(csp->cfd, hdr, strlen(hdr), write_delay)
3605 || write_socket_delayed(csp->cfd, ((p != NULL) ? p : csp->iob->cur),
3606 (size_t)csp->content_length, write_delay))
3607 {
3608 log_error(LOG_LEVEL_ERROR, "write modified content to client failed: %E");
3609 freez(hdr);
3610 freez(p);
3611 mark_server_socket_tainted(csp);
3612 return;
3613 }
3614 }
3615
3616 freez(hdr);
3617 freez(p);
3618 }
3619
3620 break; /* "game over, man" */
3621 }
3622
3623 /*
3624 * This is not the body, so let's pretend the server just sent
3625 * us a blank line.
3626 */
3627 snprintf(csp->receive_buffer, csp->receive_buffer_size, "\r\n");
3628 len = (int)strlen(csp->receive_buffer);
3629
3630 /*
3631 * Now, let the normal header parsing algorithm below do its
3632 * job. If it fails, we'll exit instead of continuing.
3633 */
3634
3635 ms_iis5_hack = 1;
3636 }
3637
3638 /*
3639 * If we're in the body of the server document, just write it to
3640 * the client, unless we need to buffer the body for later
3641 * content-filtering.
3642 */
3643 if (server_body || (http->ssl
3644 #ifdef FEATURE_HTTPS_INSPECTION
3645 && use_ssl_tunnel
3646 #endif
3647 ))
3648 {
3649 if (buffer_and_filter_content)
3650 {
3651 /*
3652 * If there is no memory left for buffering the content, or the buffer limit
3653 * has been reached, switch to non-filtering mode, i.e. make & write the
3654 * header, flush the iob and buf, and get out of the way.
3655 */
3656 if (add_to_iob(csp->iob, csp->config->buffer_limit, csp->receive_buffer, len))
3657 {
3658 size_t hdrlen;
3659 long flushed;
3660
3661 log_error(LOG_LEVEL_INFO,
3662 "Flushing header and buffers. Stepping back from filtering.");
3663
3664 hdr = list_to_text(csp->headers);
3665 if (hdr == NULL)
3666 {
3667 /*
3668 * Memory is too tight to even generate the header.
3669 * Send our static "Out-of-memory" page.
3670 */
3671 log_error(LOG_LEVEL_ERROR, "Out of memory while trying to flush.");
3672 rsp = cgi_error_memory();
3673 send_crunch_response(csp, rsp);
3674 mark_server_socket_tainted(csp);
3675 #ifdef FEATURE_HTTPS_INSPECTION
3676 close_client_and_server_ssl_connections(csp);
3677 #endif
3678 return;
3679 }
3680 hdrlen = strlen(hdr);
3681
3682 #ifdef FEATURE_HTTPS_INSPECTION
3683 /*
3684 * Sending data with standard or secured connection (HTTP/HTTPS)
3685 */
3686 if (client_use_ssl(csp))
3687 {
3688 if ((ssl_send_data_delayed(&(csp->ssl_client_attr),
3689 (const unsigned char *)hdr, hdrlen, get_write_delay(csp)) < 0)
3690 || ((flushed = ssl_flush_socket(&(csp->ssl_client_attr),
3691 csp->iob)) < 0)
3692 || (ssl_send_data_delayed(&(csp->ssl_client_attr),
3693 (const unsigned char *)csp->receive_buffer, (size_t)len,
3694 get_write_delay(csp)) < 0))
3695 {
3696 log_error(LOG_LEVEL_CONNECT,
3697 "Flush header and buffers to client failed");
3698 freez(hdr);
3699 mark_server_socket_tainted(csp);
3700 close_client_and_server_ssl_connections(csp);
3701 return;
3702 }
3703 }
3704 else
3705 #endif /* def FEATURE_HTTPS_INSPECTION */
3706 {
3707 if (write_socket_delayed(csp->cfd, hdr, hdrlen, write_delay)
3708 || ((flushed = flush_iob(csp->cfd, csp->iob, write_delay)) < 0)
3709 || write_socket_delayed(csp->cfd, csp->receive_buffer, (size_t)len,
3710 write_delay))
3711 {
3712 log_error(LOG_LEVEL_CONNECT,
3713 "Flush header and buffers to client failed: %E");
3714 freez(hdr);
3715 mark_server_socket_tainted(csp);
3716 return;
3717 }
3718 }
3719
3720 /*
3721 * Reset the byte_count to the amount of bytes
3722 * we just flushed. len will be added a few lines below,
3723 * hdrlen doesn't matter for LOG_LEVEL_CLF.
3724 */
3725 byte_count = (unsigned long long)flushed;
3726 freez(hdr);
3727 buffer_and_filter_content = 0;
3728 server_body = 1;
3729 }
3730 }
3731 else
3732 {
3733 #ifdef FEATURE_HTTPS_INSPECTION
3734 /*
3735 * Sending data with standard or secured connection (HTTP/HTTPS)
3736 */
3737 if (client_use_ssl(csp))
3738 {
3739 ret = ssl_send_data_delayed(&(csp->ssl_client_attr),
3740 (const unsigned char *)csp->receive_buffer, (size_t)len,
3741 get_write_delay(csp));
3742 if (ret < 0)
3743 {
3744 log_error(LOG_LEVEL_ERROR,
3745 "Sending data to client failed");
3746 mark_server_socket_tainted(csp);
3747 close_client_and_server_ssl_connections(csp);
3748 return;
3749 }
3750 }
3751 else
3752 #endif /* def FEATURE_HTTPS_INSPECTION */
3753 {
3754 if (write_socket_delayed(csp->cfd, csp->receive_buffer,
3755 (size_t)len, write_delay))
3756 {
3757 log_error(LOG_LEVEL_ERROR, "write to client failed: %E");
3758 mark_server_socket_tainted(csp);
3759 return;
3760 }
3761 }
3762 }
3763 byte_count += (unsigned long long)len;
3764 continue;
3765 }
3766 else
3767 {
3768 /*
3769 * We're still looking for the end of the server's header.
3770 * Buffer up the data we just read. If that fails, there's
3771 * little we can do but send our static out-of-memory page.
3772 */
3773 if (add_to_iob(csp->iob, csp->config->buffer_limit, csp->receive_buffer, len))
3774 {
3775 log_error(LOG_LEVEL_ERROR, "Out of memory while looking for end of server headers.");
3776 rsp = cgi_error_memory();
3777 send_crunch_response(csp, rsp);
3778 mark_server_socket_tainted(csp);
3779 #ifdef FEATURE_HTTPS_INSPECTION
3780 close_client_and_server_ssl_connections(csp);
3781 #endif
3782 return;
3783 }
3784
3785 /* Convert iob into something sed() can digest */
3786 if (JB_ERR_PARSE == get_server_headers(csp))
3787 {
3788 if (ms_iis5_hack)
3789 {
3790 /*
3791 * Well, we tried our MS IIS/5 hack and it didn't work.
3792 * The header is incomplete and there isn't anything
3793 * we can do about it.
3794 */
3795 log_error(LOG_LEVEL_ERROR, "Invalid server headers. "
3796 "Applying the MS IIS5 hack didn't help.");
3797 log_error(LOG_LEVEL_CLF,
3798 "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
3799 #ifdef FEATURE_HTTPS_INSPECTION
3800 /*
3801 * Sending data with standard or secured connection (HTTP/HTTPS)
3802 */
3803 if (client_use_ssl(csp))
3804 {
3805 ssl_send_data_delayed(&(csp->ssl_client_attr),
3806 (const unsigned char *)INVALID_SERVER_HEADERS_RESPONSE,
3807 strlen(INVALID_SERVER_HEADERS_RESPONSE), get_write_delay(csp));
3808 }
3809 else
3810 #endif /* def FEATURE_HTTPS_INSPECTION */
3811 {
3812 write_socket_delayed(csp->cfd,
3813 INVALID_SERVER_HEADERS_RESPONSE,
3814 strlen(INVALID_SERVER_HEADERS_RESPONSE), write_delay);
3815 }
3816 mark_server_socket_tainted(csp);
3817 #ifdef FEATURE_HTTPS_INSPECTION
3818 close_client_and_server_ssl_connections(csp);
3819 #endif
3820 return;
3821 }
3822 else
3823 {
3824 /*
3825 * Since we have to wait for more from the server before
3826 * we can parse the headers we just continue here.
3827 */
3828 log_error(LOG_LEVEL_CONNECT,
3829 "Continuing buffering server headers from socket %d. "
3830 "Bytes most recently read: %ld.", csp->cfd, len);
3831 continue;
3832 }
3833 }
3834 else
3835 {
3836 /*
3837 * Account for the content bytes we
3838 * might have gotten with the headers.
3839 */
3840 assert(csp->iob->eod >= csp->iob->cur);
3841 byte_count = (unsigned long long)(csp->iob->eod - csp->iob->cur);
3842 }
3843
3844 /* Did we actually get anything? */
3845 if (NULL == csp->headers->first)
3846 {
3847 if ((csp->flags & CSP_FLAG_REUSED_CLIENT_CONNECTION))
3848 {
3849 log_error(LOG_LEVEL_ERROR,
3850 "No server or forwarder response received on socket %d. "
3851 "Closing client socket %d without sending data.",
3852 csp->server_connection.sfd, csp->cfd);
3853 log_error(LOG_LEVEL_CLF,
3854 "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
3855 }
3856 else
3857 {
3858 log_error(LOG_LEVEL_ERROR,
3859 "No server or forwarder response received on socket %d.",
3860 csp->server_connection.sfd);
3861 send_crunch_response(csp, error_response(csp, "no-server-data"));
3862 }
3863 free_http_request(http);
3864 mark_server_socket_tainted(csp);
3865 #ifdef FEATURE_HTTPS_INSPECTION
3866 close_client_and_server_ssl_connections(csp);
3867 #endif
3868 return;
3869 }
3870
3871 if (!csp->headers->first->str)
3872 {
3873 log_error(LOG_LEVEL_ERROR, "header search: csp->headers->first->str == NULL, assert will be called");
3874 }
3875 assert(csp->headers->first->str);
3876
3877 if (strncmpic(csp->headers->first->str, "HTTP", 4) &&
3878 strncmpic(csp->headers->first->str, "ICY", 3))
3879 {
3880 /*
3881 * It doesn't look like a HTTP (or Shoutcast) response:
3882 * tell the client and log the problem.
3883 */
3884 if (strlen(csp->headers->first->str) > 30)
3885 {
3886 csp->headers->first->str[30] = '\0';
3887 }
3888 log_error(LOG_LEVEL_ERROR,
3889 "Invalid server or forwarder response. Starts with: %s",
3890 csp->headers->first->str);
3891 log_error(LOG_LEVEL_CLF,
3892 "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
3893 #ifdef FEATURE_HTTPS_INSPECTION
3894 /*
3895 * Sending data with standard or secured connection (HTTP/HTTPS)
3896 */
3897 if (client_use_ssl(csp))
3898 {
3899 ssl_send_data_delayed(&(csp->ssl_client_attr),
3900 (const unsigned char *)INVALID_SERVER_HEADERS_RESPONSE,
3901 strlen(INVALID_SERVER_HEADERS_RESPONSE),
3902 get_write_delay(csp));
3903 }
3904 else
3905 #endif /* def FEATURE_HTTPS_INSPECTION */
3906 {
3907 write_socket_delayed(csp->cfd, INVALID_SERVER_HEADERS_RESPONSE,
3908 strlen(INVALID_SERVER_HEADERS_RESPONSE), write_delay);
3909 }
3910 free_http_request(http);
3911 mark_server_socket_tainted(csp);
3912 #ifdef FEATURE_HTTPS_INSPECTION
3913 close_client_and_server_ssl_connections(csp);
3914 #endif
3915 return;
3916 }
3917
3918 /*
3919 * Disable redirect checkers, so that they will be only run
3920 * again if the user also enables them through tags.
3921 *
3922 * From a performance point of view it doesn't matter,
3923 * but it prevents duplicated log messages.
3924 */
3925 #ifdef FEATURE_FAST_REDIRECTS
3926 csp->action->flags &= ~ACTION_FAST_REDIRECTS;
3927 #endif
3928 csp->action->flags &= ~ACTION_REDIRECT;
3929
3930 /*
3931 * We have now received the entire server header,
3932 * filter it and send the result to the client
3933 */
3934 if (JB_ERR_OK != sed(csp, FILTER_SERVER_HEADERS))
3935 {
3936 log_error(LOG_LEVEL_CLF,
3937 "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
3938 #ifdef FEATURE_HTTPS_INSPECTION
3939 /*
3940 * Sending data with standard or secured connection (HTTP/HTTPS)
3941 */
3942 if (client_use_ssl(csp))
3943 {
3944 ssl_send_data_delayed(&(csp->ssl_client_attr),
3945 (const unsigned char *)INVALID_SERVER_HEADERS_RESPONSE,
3946 strlen(INVALID_SERVER_HEADERS_RESPONSE),
3947 get_write_delay(csp));
3948 }
3949 else
3950 #endif
3951 {
3952 write_socket_delayed(csp->cfd, INVALID_SERVER_HEADERS_RESPONSE,
3953 strlen(INVALID_SERVER_HEADERS_RESPONSE), write_delay);
3954 }
3955 free_http_request(http);
3956 mark_server_socket_tainted(csp);
3957 #ifdef FEATURE_HTTPS_INSPECTION
3958 close_client_and_server_ssl_connections(csp);
3959 #endif
3960 return;
3961 }
3962 hdr = list_to_text(csp->headers);
3963 if (hdr == NULL)
3964 {
3965 /* FIXME Should handle error properly */
3966 log_error(LOG_LEVEL_FATAL, "Out of memory parsing server header");
3967 }
3968
3969 if ((csp->flags & CSP_FLAG_CHUNKED)
3970 && !(csp->flags & CSP_FLAG_CONTENT_LENGTH_SET)
3971 && ((csp->iob->eod - csp->iob->cur) >= 5)
3972 && !memcmp(csp->iob->eod-5, "0\r\n\r\n", 5))
3973 {
3974 log_error(LOG_LEVEL_CONNECT,
3975 "Looks like we got the last chunk together with "
3976 "the server headers. We better stop reading.");
3977 byte_count = (unsigned long long)(csp->iob->eod - csp->iob->cur);
3978 csp->expected_content_length = byte_count;
3979 csp->flags |= CSP_FLAG_CONTENT_LENGTH_SET;
3980 }
3981
3982 csp->server_connection.response_received = time(NULL);
3983
3984 if (crunch_response_triggered(csp, crunchers_light))
3985 {
3986 /*
3987 * One of the tags created by a server-header
3988 * tagger triggered a crunch. We already
3989 * delivered the crunch response to the client
3990 * and are done here after cleaning up.
3991 */
3992 freez(hdr);
3993 mark_server_socket_tainted(csp);
3994 #ifdef FEATURE_HTTPS_INSPECTION
3995 close_client_and_server_ssl_connections(csp);
3996 #endif
3997 return;
3998 }
3999
4000 /* Buffer and pcrs filter this if appropriate. */
4001 buffer_and_filter_content = content_requires_filtering(csp);
4002
4003 if (!buffer_and_filter_content)
4004 {
4005 /*
4006 * Write the server's (modified) header to
4007 * the client (along with anything else that
4008 * may be in the buffer). Use standard or secured
4009 * connection.
4010 */
4011 #ifdef FEATURE_HTTPS_INSPECTION
4012 if (client_use_ssl(csp))
4013 {
4014 if ((ssl_send_data_delayed(&(csp->ssl_client_attr),
4015 (const unsigned char *)hdr, strlen(hdr),
4016 get_write_delay(csp)) < 0)
4017 || ((len = ssl_flush_socket(&(csp->ssl_client_attr),
4018 csp->iob)) < 0))
4019 {
4020 log_error(LOG_LEVEL_CONNECT, "Write header to client failed");
4021
4022 /*
4023 * The write failed, so don't bother mentioning it
4024 * to the client... it probably can't hear us anyway.
4025 */
4026 freez(hdr);
4027 mark_server_socket_tainted(csp);
4028 #ifdef FEATURE_HTTPS_INSPECTION
4029 close_client_and_server_ssl_connections(csp);
4030 #endif
4031 return;
4032 }
4033 }
4034 else
4035 #endif /* def FEATURE_HTTPS_INSPECTION */
4036 {
4037 if (write_socket_delayed(csp->cfd, hdr, strlen(hdr), write_delay)
4038 || ((len = flush_iob(csp->cfd, csp->iob, write_delay)) < 0))
4039 {
4040 log_error(LOG_LEVEL_ERROR,
4041 "write header to client failed");
4042 /*
4043 * The write failed, so don't bother mentioning it
4044 * to the client... it probably can't hear us anyway.
4045 */
4046 freez(hdr);
4047 mark_server_socket_tainted(csp);
4048 return;
4049 }
4050 }
4051 }
4052
4053 /* we're finished with the server's header */
4054
4055 freez(hdr);
4056 server_body = 1;
4057
4058 /*
4059 * If this was a MS IIS/5 hack then it means the server
4060 * has already closed the connection. Nothing more to read.
4061 * Time to bail.
4062 */
4063 if (ms_iis5_hack)
4064 {
4065 log_error(LOG_LEVEL_ERROR,
4066 "Closed server connection detected. "
4067 "Applying the MS IIS5 hack didn't help.");
4068 log_error(LOG_LEVEL_CLF,
4069 "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
4070 #ifdef FEATURE_HTTPS_INSPECTION
4071 /*
4072 * Sending data with standard or secured connection (HTTP/HTTPS)
4073 */
4074 if (client_use_ssl(csp))
4075 {
4076 ssl_send_data_delayed(&(csp->ssl_client_attr),
4077 (const unsigned char *)INVALID_SERVER_HEADERS_RESPONSE,
4078 strlen(INVALID_SERVER_HEADERS_RESPONSE),
4079 get_write_delay(csp));
4080 }
4081 else
4082 #endif /* def FEATURE_HTTPS_INSPECTION */
4083 {
4084 write_socket_delayed(csp->cfd, INVALID_SERVER_HEADERS_RESPONSE,
4085 strlen(INVALID_SERVER_HEADERS_RESPONSE), write_delay);
4086 }
4087 mark_server_socket_tainted(csp);
4088 #ifdef FEATURE_HTTPS_INSPECTION
4089 close_client_and_server_ssl_connections(csp);
4090 #endif
4091 return;
4092 }
4093 }
4094 continue;
4095 }
4096 mark_server_socket_tainted(csp);
4097 #ifdef FEATURE_HTTPS_INSPECTION
4098 close_client_and_server_ssl_connections(csp);
4099 #endif
4100 return; /* huh? we should never get here */
4101 }
4102
4103 if (csp->content_length == 0)
4104 {
4105 /*
4106 * If Privoxy didn't recalculate the Content-Length,
4107 * byte_count is still correct.
4108 */
4109 csp->content_length = byte_count;
4110 }
4111
4112 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
4113 if ((csp->flags & CSP_FLAG_CONTENT_LENGTH_SET)
4114 && (csp->expected_content_length != byte_count))
4115 {
4116 log_error(LOG_LEVEL_CONNECT,
4117 "Received %llu bytes while expecting %llu.",
4118 byte_count, csp->expected_content_length);
4119 mark_server_socket_tainted(csp);
4120 }
4121 #endif
4122
4123 #ifdef FEATURE_HTTPS_INSPECTION
4124 if (client_use_ssl(csp))
4125 {
4126 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s https://%s%s %s\" 200 %llu",
4127 csp->ip_addr_str, http->gpc, http->hostport, http->path,
4128 http->version, csp->content_length);
4129 }
4130 else
4131 #endif
4132 {
4133 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 %llu",
4134 csp->ip_addr_str, http->ocmd, csp->content_length);
4135 }
4136 csp->server_connection.timestamp = time(NULL);
4137 }
4138
4139
4140 /*********************************************************************
4141 *
4142 * Function : chat
4143 *
4144 * Description : Once a connection from the client has been accepted,
4145 * this function is called (via serve()) to handle the
4146 * main business of the communication. This function
4147 * returns after dealing with a single request. It can
4148 * be called multiple times with the same client socket
4149 * if the client is keeping the connection alive.
4150 *
4151 * The decision whether or not a client connection will
4152 * be kept alive is up to the caller which also must
4153 * close the client socket when done.
4154 *
4155 * FIXME: chat is nearly thousand lines long.
4156 * Ridiculous.
4157 *
4158 * Parameters :
4159 * 1 : csp = Current client state (buffers, headers, etc...)
4160 *
4161 * Returns : Nothing.
4162 *
4163 *********************************************************************/
chat(struct client_state * csp)4164 static void chat(struct client_state *csp)
4165 {
4166 const struct forward_spec *fwd;
4167 struct http_request *http;
4168 /* Skeleton for HTTP response, if we should intercept the request */
4169 struct http_response *rsp;
4170 #ifdef FEATURE_HTTPS_INSPECTION
4171 int use_ssl_tunnel = 0;
4172 #endif
4173
4174 http = csp->http;
4175
4176 if (receive_client_request(csp) != JB_ERR_OK)
4177 {
4178 return;
4179 }
4180 if (parse_client_request(csp) != JB_ERR_OK)
4181 {
4182 return;
4183 }
4184
4185 #ifdef FEATURE_HTTPS_INSPECTION
4186 /*
4187 * Setting flags to use old solution with SSL tunnel and to disable
4188 * certificate verification.
4189 */
4190 if (csp->http->ssl && !(csp->action->flags & ACTION_HTTPS_INSPECTION)
4191 && !cgi_page_requested(csp->http->host))
4192 {
4193 use_ssl_tunnel = 1;
4194 }
4195
4196 if (http->ssl && (csp->action->flags & ACTION_IGNORE_CERTIFICATE_ERRORS))
4197 {
4198 csp->dont_verify_certificate = 1;
4199 }
4200 #endif
4201
4202 /*
4203 * build the http request to send to the server
4204 * we have to do one of the following:
4205 *
4206 * create = use the original HTTP request to create a new
4207 * HTTP request that has either the path component
4208 * without the http://domainspec (w/path) or the
4209 * full orininal URL (w/url)
4210 * Note that the path and/or the HTTP version may
4211 * have been altered by now.
4212 *
4213 * SSL proxy = Open a socket to the host:port of the server
4214 * and create TLS/SSL connection with server and
4215 * with client. Then behave like mediator between
4216 * client and server over TLS/SSL.
4217 *
4218 * SSL proxy = Pass the request unchanged if forwarding a CONNECT
4219 * with request to a parent proxy. Note that we'll be sending
4220 * forwarding the CFAIL message ourselves if connecting to the parent
4221 * fails, but we won't send a CSUCCEED message if it works,
4222 * since that would result in a double message (ours and the
4223 * parent's). After sending the request to the parent, we
4224 * must parse answer and send it to client. If connection
4225 * with server is established, we do TLS/SSL proxy. Otherwise
4226 * we send parent response to client and close connections.
4227 *
4228 * here's the matrix:
4229 * SSL
4230 * 0 1
4231 * +--------+--------+
4232 * | | |
4233 * 0 | create | SSL |
4234 * | w/path | proxy |
4235 * Forwarding +--------+--------+
4236 * | | SSL |
4237 * 1 | create | proxy |
4238 * | w/url |+forward|
4239 * +--------+--------+
4240 *
4241 */
4242
4243 #ifdef FEATURE_HTTPS_INSPECTION
4244 /*
4245 * Presetting SSL client and server flags
4246 */
4247 if (http->ssl && !use_ssl_tunnel)
4248 {
4249 http->client_ssl = 1;
4250 http->server_ssl = 1;
4251 }
4252 else
4253 {
4254 http->client_ssl = 0;
4255 http->server_ssl = 0;
4256 }
4257 #endif
4258
4259 #ifdef FEATURE_HTTPS_INSPECTION
4260 /*
4261 * Log the request unless we're https inspecting
4262 * in which case we don't have the path yet and
4263 * will log the request later.
4264 */
4265 if (!client_use_ssl(csp))
4266 #endif
4267 {
4268 log_error(LOG_LEVEL_REQUEST, "%s%s", http->hostport, http->path);
4269 }
4270
4271 if (http->ssl && connect_port_is_forbidden(csp))
4272 {
4273 const char *acceptable_connect_ports =
4274 csp->action->string[ACTION_STRING_LIMIT_CONNECT];
4275 assert(NULL != acceptable_connect_ports);
4276 log_error(LOG_LEVEL_INFO, "Request from %s marked for blocking. "
4277 "limit-connect{%s} doesn't allow CONNECT requests to %s",
4278 csp->ip_addr_str, acceptable_connect_ports, csp->http->hostport);
4279 csp->action->flags |= ACTION_BLOCK;
4280 http->ssl = 0;
4281 #ifdef FEATURE_HTTPS_INSPECTION
4282 http->client_ssl = 0;
4283 http->server_ssl = 0;
4284 #endif
4285 }
4286
4287 /*
4288 * We have a request. Check if one of the crunchers wants it
4289 * unless the client wants to use TLS/SSL in which case we
4290 * haven't setup the TLS context yet and will send the crunch
4291 * response later.
4292 */
4293 if (
4294 #ifdef FEATURE_HTTPS_INSPECTION
4295 !client_use_ssl(csp) &&
4296 #endif
4297 crunch_response_triggered(csp, crunchers_all))
4298 {
4299 /*
4300 * Yes. The client got the crunch response and we're done here.
4301 */
4302 return;
4303 }
4304
4305 #ifdef FEATURE_HTTPS_INSPECTION
4306 if (client_use_ssl(csp) && !use_ssl_tunnel)
4307 {
4308 int ret;
4309 /*
4310 * Creating a SSL proxy.
4311 *
4312 * By sending the CSUCCEED message we're lying to the client as
4313 * the connection hasn't actually been established yet. We don't
4314 * establish the connection until we have seen and parsed the
4315 * encrypted client headers.
4316 */
4317 if (write_socket_delayed(csp->cfd, CSUCCEED,
4318 strlen(CSUCCEED), get_write_delay(csp)) != 0)
4319 {
4320 log_error(LOG_LEVEL_ERROR, "Sending SUCCEED to client failed");
4321 return;
4322 }
4323
4324 ret = create_client_ssl_connection(csp);
4325 if (ret != 0)
4326 {
4327 log_error(LOG_LEVEL_ERROR,
4328 "Failed to open a secure connection with the client");
4329 return;
4330 }
4331 if (JB_ERR_OK != process_encrypted_request_headers(csp))
4332 {
4333 close_client_ssl_connection(csp);
4334 return;
4335 }
4336 /*
4337 * We have an encrypted request. Check if one of the crunchers now
4338 * wants it (for example because the previously invisible path was
4339 * required to match).
4340 */
4341 if (crunch_response_triggered(csp, crunchers_all))
4342 {
4343 /*
4344 * Yes. The client got the crunch response and we're done here.
4345 */
4346 return;
4347 }
4348 }
4349 #endif
4350
4351 log_applied_actions(csp->action);
4352
4353 /* decide how to route the HTTP request */
4354 fwd = forward_url(csp, http);
4355
4356 freez(csp->headers->first->str);
4357 build_request_line(csp, fwd, &csp->headers->first->str);
4358
4359 if (fwd->forward_host)
4360 {
4361 log_error(LOG_LEVEL_CONNECT, "via [%s]:%d to: %s",
4362 fwd->forward_host, fwd->forward_port, http->hostport);
4363 }
4364 else
4365 {
4366 log_error(LOG_LEVEL_CONNECT, "to %s", http->hostport);
4367 }
4368
4369 /* here we connect to the server, gateway, or the forwarder */
4370
4371 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
4372 if ((csp->server_connection.sfd != JB_INVALID_SOCKET)
4373 && socket_is_still_alive(csp->server_connection.sfd)
4374 && connection_destination_matches(&csp->server_connection, http, fwd))
4375 {
4376 log_error(LOG_LEVEL_CONNECT,
4377 "Reusing server socket %d connected to %s. Total requests: %u.",
4378 csp->server_connection.sfd, csp->server_connection.host,
4379 csp->server_connection.requests_sent_total);
4380 }
4381 else
4382 {
4383 if (csp->server_connection.sfd != JB_INVALID_SOCKET)
4384 {
4385 #ifdef FEATURE_CONNECTION_SHARING
4386 if (csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING
4387 #ifdef FEATURE_HTTPS_INSPECTION
4388 && !server_use_ssl(csp)
4389 #endif
4390 )
4391 {
4392 remember_connection(&csp->server_connection);
4393 }
4394 else
4395 #endif /* def FEATURE_CONNECTION_SHARING */
4396 {
4397 log_error(LOG_LEVEL_CONNECT,
4398 "Closing server socket %d connected to %s. Total requests: %u.",
4399 csp->server_connection.sfd, csp->server_connection.host,
4400 csp->server_connection.requests_sent_total);
4401 close_socket(csp->server_connection.sfd);
4402 }
4403 mark_connection_closed(&csp->server_connection);
4404 }
4405 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
4406
4407 /*
4408 * Connecting to destination server
4409 */
4410 csp->server_connection.sfd = forwarded_connect(fwd, http, csp);
4411
4412 if (csp->server_connection.sfd == JB_INVALID_SOCKET)
4413 {
4414 if (fwd->type != SOCKS_NONE)
4415 {
4416 /* Socks error. */
4417 rsp = error_response(csp, "forwarding-failed");
4418 }
4419 else if (errno == EINVAL)
4420 {
4421 rsp = error_response(csp, "no-such-domain");
4422 }
4423 else
4424 {
4425 rsp = error_response(csp, "connect-failed");
4426 }
4427
4428 /* Write the answer to the client */
4429 if (rsp != NULL)
4430 {
4431 send_crunch_response(csp, rsp);
4432 }
4433
4434 /*
4435 * Temporary workaround to prevent already-read client
4436 * bodies from being parsed as new requests. For now we
4437 * err on the safe side and throw all the following
4438 * requests under the bus, even if no client body has been
4439 * buffered. A compliant client will repeat the dropped
4440 * requests on an untainted connection.
4441 *
4442 * The proper fix is to discard the no longer needed
4443 * client body in the buffer (if there is one) and to
4444 * continue parsing the bytes that follow.
4445 */
4446 #ifdef FEATURE_HTTPS_INSPECTION
4447 close_client_ssl_connection(csp);
4448 #endif
4449 drain_and_close_socket(csp->cfd);
4450 csp->cfd = JB_INVALID_SOCKET;
4451
4452 return;
4453 }
4454
4455 #ifdef FEATURE_HTTPS_INSPECTION
4456 /*
4457 * Creating TLS/SSL connections with destination server or parent
4458 * proxy. If forwarding is enabled, we must send client request to
4459 * parent proxy and receive, parse and resend parent proxy answer.
4460 */
4461 if (http->ssl && !use_ssl_tunnel)
4462 {
4463 if (fwd->forward_host != NULL)
4464 {
4465 char server_response[BUFFER_SIZE];
4466 int ret = 0;
4467 int len = 0;
4468 char *hdr = list_to_text(csp->headers);
4469 memset(server_response, 0, sizeof(server_response));
4470
4471 if (hdr == NULL)
4472 {
4473 log_error(LOG_LEVEL_FATAL,
4474 "Out of memory parsing client header");
4475 }
4476 list_remove_all(csp->headers);
4477
4478 /*
4479 * Sending client's CONNECT request to the parent proxy
4480 */
4481 ret = write_socket(csp->server_connection.sfd, hdr, strlen(hdr));
4482
4483 freez(hdr);
4484
4485 if (ret != 0)
4486 {
4487 log_error(LOG_LEVEL_CONNECT,
4488 "Sending request headers to: %s failed", http->hostport);
4489 mark_server_socket_tainted(csp);
4490 close_client_ssl_connection(csp);
4491 return;
4492 }
4493
4494 /* Waiting for parent proxy server response */
4495 len = read_socket(csp->server_connection.sfd, server_response,
4496 sizeof(server_response)-1);
4497
4498 if (len <= 0)
4499 {
4500 log_error(LOG_LEVEL_ERROR, "No response from parent proxy "
4501 "server on socket %d.", csp->server_connection.sfd);
4502
4503 rsp = error_response(csp, "no-server-data");
4504 if (rsp)
4505 {
4506 send_crunch_response(csp, rsp);
4507 }
4508 mark_server_socket_tainted(csp);
4509 close_client_ssl_connection(csp);
4510 return;
4511 }
4512
4513 /*
4514 * Test if the connection to the destination server was
4515 * established successfully by the parent proxy.
4516 */
4517 if (!tunnel_established_successfully(server_response, (unsigned int)len))
4518 {
4519 log_error(LOG_LEVEL_ERROR,
4520 "The forwarder %s failed to establish a connection with %s",
4521 fwd->forward_host, http->host);
4522 rsp = error_response(csp, "connect-failed");
4523 if (rsp)
4524 {
4525 send_crunch_response(csp, rsp);
4526 }
4527 mark_server_socket_tainted(csp);
4528 close_client_ssl_connection(csp);
4529 return;
4530 }
4531 } /* -END- if (fwd->forward_host != NULL) */
4532
4533 /*
4534 * We can now create the TLS/SSL connection with the destination server.
4535 */
4536 int ret = create_server_ssl_connection(csp);
4537 if (ret != 0)
4538 {
4539 if (csp->server_cert_verification_result != SSL_CERT_VALID &&
4540 csp->server_cert_verification_result != SSL_CERT_NOT_VERIFIED)
4541 {
4542 /*
4543 * If the server certificate is invalid, we must inform
4544 * the client and then close connection to the client.
4545 */
4546 ssl_send_certificate_error(csp);
4547 close_client_and_server_ssl_connections(csp);
4548 return;
4549 }
4550 if (csp->server_cert_verification_result == SSL_CERT_NOT_VERIFIED
4551 || csp->server_cert_verification_result == SSL_CERT_VALID)
4552 {
4553 /*
4554 * The TLS/SSL connection wasn't created but an invalid
4555 * certificate wasn't detected. Report it as connection
4556 * failure.
4557 */
4558 rsp = error_response(csp, "connect-failed");
4559 if (rsp)
4560 {
4561 send_crunch_response(csp, rsp);
4562 }
4563 close_client_and_server_ssl_connections(csp);
4564 return;
4565 }
4566 }
4567 }/* -END- if (http->ssl) */
4568 #endif /* def FEATURE_HTTPS_INSPECTION */
4569
4570 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
4571 save_connection_destination(csp->server_connection.sfd,
4572 http, fwd, &csp->server_connection);
4573 csp->server_connection.keep_alive_timeout =
4574 (unsigned)csp->config->keep_alive_timeout;
4575 }
4576 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
4577
4578 csp->server_connection.requests_sent_total++;
4579
4580 if ((fwd->type == SOCKS_5T) && (NULL == csp->headers->first))
4581 {
4582 /* Client headers have been sent optimistically */
4583 assert(csp->headers->last == NULL);
4584 }
4585 else if (http->ssl == 0 || (fwd->forward_host
4586 #ifdef FEATURE_HTTPS_INSPECTION
4587 && use_ssl_tunnel
4588 #endif
4589 ))
4590 {
4591 if (send_http_request(csp))
4592 {
4593 rsp = error_response(csp, "connect-failed");
4594 if (rsp)
4595 {
4596 send_crunch_response(csp, rsp);
4597 }
4598 return;
4599 }
4600 }
4601 else
4602 {
4603 /*
4604 * Using old solution with SSL tunnel or new solution with SSL proxy
4605 */
4606 list_remove_all(csp->headers);
4607 #ifdef FEATURE_HTTPS_INSPECTION
4608 if (use_ssl_tunnel)
4609 #endif
4610 {
4611 /*
4612 * We're running an SSL tunnel and we're not forwarding,
4613 * so just ditch the client headers, send the "connect succeeded"
4614 * message to the client, flush the rest, and get out of the way.
4615 */
4616 if (write_socket_delayed(csp->cfd, CSUCCEED,
4617 strlen(CSUCCEED), get_write_delay(csp)))
4618 {
4619 return;
4620 }
4621 }
4622 #ifdef FEATURE_HTTPS_INSPECTION
4623 else
4624 {
4625 /*
4626 * If server certificate has been verified and is invalid,
4627 * we must inform the client and then close the connection
4628 * with client and server.
4629 */
4630 if (csp->server_cert_verification_result != SSL_CERT_VALID &&
4631 csp->server_cert_verification_result != SSL_CERT_NOT_VERIFIED)
4632 {
4633 ssl_send_certificate_error(csp);
4634 close_client_and_server_ssl_connections(csp);
4635 return;
4636 }
4637 if (send_https_request(csp))
4638 {
4639 rsp = error_response(csp, "connect-failed");
4640 if (rsp)
4641 {
4642 send_crunch_response(csp, rsp);
4643 }
4644 close_client_and_server_ssl_connections(csp);
4645 return;
4646 }
4647 }
4648 #endif /* def FEATURE_HTTPS_INSPECTION */
4649 clear_iob(csp->client_iob);
4650 }/* -END- else ... if (http->ssl == 1) */
4651
4652 log_error(LOG_LEVEL_CONNECT, "to %s successful", http->hostport);
4653
4654 /* XXX: should the time start earlier for optimistically sent data? */
4655 csp->server_connection.request_sent = time(NULL);
4656
4657 handle_established_connection(csp);
4658 freez(csp->receive_buffer);
4659 }
4660
4661
4662 #ifdef FUZZ
4663 /*********************************************************************
4664 *
4665 * Function : fuzz_server_response
4666 *
4667 * Description : Treat the input as a whole server response.
4668 *
4669 * Parameters :
4670 * 1 : csp = Current client state (buffers, headers, etc...)
4671 * 2 : fuzz_input_file = File to read the input from.
4672 *
4673 * Returns : 0
4674 *
4675 *********************************************************************/
fuzz_server_response(struct client_state * csp,char * fuzz_input_file)4676 extern int fuzz_server_response(struct client_state *csp, char *fuzz_input_file)
4677 {
4678 static struct forward_spec fwd; /* Zero'd due to being static */
4679 csp->cfd = 0;
4680
4681 if (strcmp(fuzz_input_file, "-") == 0)
4682 {
4683 /* XXX: Doesn't work yet. */
4684 csp->server_connection.sfd = 0;
4685 }
4686 else
4687 {
4688 csp->server_connection.sfd = open(fuzz_input_file, O_RDONLY);
4689 if (csp->server_connection.sfd == -1)
4690 {
4691 log_error(LOG_LEVEL_FATAL, "Failed to open %s: %E",
4692 fuzz_input_file);
4693 }
4694 }
4695 csp->fwd = &fwd;
4696 csp->content_type |= CT_GIF;
4697 csp->action->flags |= ACTION_DEANIMATE;
4698 csp->action->string[ACTION_STRING_DEANIMATE] = "last";
4699
4700 csp->http->path = strdup_or_die("/");
4701 csp->http->host = strdup_or_die("fuzz.example.org");
4702 csp->http->hostport = strdup_or_die("fuzz.example.org:80");
4703 /* Prevent client socket monitoring */
4704 csp->flags |= CSP_FLAG_PIPELINED_REQUEST_WAITING;
4705 csp->flags |= CSP_FLAG_CHUNKED;
4706
4707 csp->config->feature_flags |= RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE;
4708 csp->flags |= CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
4709
4710 csp->content_type |= CT_DECLARED|CT_GIF;
4711
4712 csp->config->socket_timeout = 0;
4713
4714 cgi_init_error_messages();
4715
4716 handle_established_connection(csp);
4717 freez(csp->receive_buffer);
4718
4719 return 0;
4720 }
4721 #endif
4722
4723
4724 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
4725 /*********************************************************************
4726 *
4727 * Function : prepare_csp_for_next_request
4728 *
4729 * Description : Put the csp in a mostly vergin state.
4730 *
4731 * Parameters :
4732 * 1 : csp = Current client state (buffers, headers, etc...)
4733 *
4734 * Returns : N/A
4735 *
4736 *********************************************************************/
prepare_csp_for_next_request(struct client_state * csp)4737 static void prepare_csp_for_next_request(struct client_state *csp)
4738 {
4739 csp->content_type = 0;
4740 csp->content_length = 0;
4741 csp->expected_content_length = 0;
4742 csp->expected_client_content_length = 0;
4743 list_remove_all(csp->headers);
4744 clear_iob(csp->iob);
4745 freez(csp->error_message);
4746 free_http_request(csp->http);
4747 destroy_list(csp->headers);
4748 #ifdef FEATURE_HTTPS_INSPECTION
4749 destroy_list(csp->https_headers);
4750 #endif
4751 destroy_list(csp->tags);
4752 #ifdef FEATURE_CLIENT_TAGS
4753 destroy_list(csp->client_tags);
4754 freez(csp->client_address);
4755 #endif
4756 free_current_action(csp->action);
4757 if (NULL != csp->fwd)
4758 {
4759 unload_forward_spec(csp->fwd);
4760 csp->fwd = NULL;
4761 }
4762 /* XXX: Store per-connection flags someplace else. */
4763 csp->flags = (CSP_FLAG_ACTIVE | CSP_FLAG_REUSED_CLIENT_CONNECTION);
4764 #ifdef FEATURE_TOGGLE
4765 if (global_toggle_state)
4766 #endif /* def FEATURE_TOGGLE */
4767 {
4768 csp->flags |= CSP_FLAG_TOGGLED_ON;
4769 }
4770
4771 if (csp->client_iob->eod > csp->client_iob->cur)
4772 {
4773 long bytes_to_shift = csp->client_iob->cur - csp->client_iob->buf;
4774 size_t data_length = (size_t)(csp->client_iob->eod - csp->client_iob->cur);
4775
4776 assert(bytes_to_shift > 0);
4777 assert(data_length > 0);
4778
4779 log_error(LOG_LEVEL_CONNECT, "Shifting %lu pipelined bytes by %ld bytes",
4780 data_length, bytes_to_shift);
4781 memmove(csp->client_iob->buf, csp->client_iob->cur, data_length);
4782 csp->client_iob->cur = csp->client_iob->buf;
4783 assert(csp->client_iob->eod == csp->client_iob->buf + bytes_to_shift + data_length);
4784 csp->client_iob->eod = csp->client_iob->buf + data_length;
4785 memset(csp->client_iob->eod, '\0', (size_t)bytes_to_shift);
4786
4787 csp->flags |= CSP_FLAG_PIPELINED_REQUEST_WAITING;
4788 }
4789 else
4790 {
4791 /*
4792 * We mainly care about resetting client_iob->cur so we don't
4793 * waste buffer space at the beginning and don't mess up the
4794 * request restoration done by cgi_show_request().
4795 *
4796 * Freeing the buffer itself isn't technically necessary,
4797 * but makes debugging more convenient.
4798 */
4799 clear_iob(csp->client_iob);
4800 }
4801 }
4802 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
4803
4804
4805 /*********************************************************************
4806 *
4807 * Function : serve
4808 *
4809 * Description : This is little more than chat. We only "serve" to
4810 * to close (or remember) any socket that chat may have
4811 * opened.
4812 *
4813 * Parameters :
4814 * 1 : csp = Current client state (buffers, headers, etc...)
4815 *
4816 * Returns : N/A
4817 *
4818 *********************************************************************/
serve(struct client_state * csp)4819 static void serve(struct client_state *csp)
4820 {
4821 int config_file_change_detected = 0; /* Only used for debugging */
4822 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
4823 #ifdef FEATURE_CONNECTION_SHARING
4824 static int monitor_thread_running = 0;
4825 #endif /* def FEATURE_CONNECTION_SHARING */
4826 int continue_chatting = 0;
4827
4828 log_error(LOG_LEVEL_CONNECT, "Accepted connection from %s on socket %d",
4829 csp->ip_addr_str, csp->cfd);
4830
4831 do
4832 {
4833 unsigned int latency;
4834
4835 #ifdef FEATURE_HTTPS_INSPECTION
4836 if (continue_chatting && client_use_ssl(csp))
4837 {
4838 continue_https_chat(csp);
4839 }
4840 else
4841 #endif
4842 {
4843 chat(csp);
4844 }
4845
4846 /*
4847 * If the request has been crunched,
4848 * the calculated latency is zero.
4849 */
4850 latency = (unsigned)(csp->server_connection.response_received -
4851 csp->server_connection.request_sent) / 2;
4852
4853 if ((csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE)
4854 && (csp->flags & CSP_FLAG_CRUNCHED)
4855 && (csp->expected_client_content_length != 0))
4856 {
4857 csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
4858 log_error(LOG_LEVEL_CONNECT,
4859 "Tainting client socket %d due to unread data.", csp->cfd);
4860 }
4861
4862 continue_chatting = (csp->config->feature_flags
4863 & RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE)
4864 && !(csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED)
4865 && (csp->cfd != JB_INVALID_SOCKET)
4866 && (csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE)
4867 && ((csp->flags & CSP_FLAG_SERVER_CONTENT_LENGTH_SET)
4868 || (csp->flags & CSP_FLAG_CHUNKED));
4869
4870 if (!(csp->flags & CSP_FLAG_CRUNCHED)
4871 && (csp->server_connection.sfd != JB_INVALID_SOCKET))
4872 {
4873 if (!(csp->flags & CSP_FLAG_SERVER_KEEP_ALIVE_TIMEOUT_SET))
4874 {
4875 csp->server_connection.keep_alive_timeout = csp->config->default_server_timeout;
4876 }
4877 if (!(csp->flags & CSP_FLAG_SERVER_CONNECTION_KEEP_ALIVE)
4878 || (csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED)
4879 || !socket_is_still_alive(csp->server_connection.sfd)
4880 || !(latency < csp->server_connection.keep_alive_timeout))
4881 {
4882 log_error(LOG_LEVEL_CONNECT,
4883 "Closing server socket %d connected to %s. "
4884 "Keep-alive: %u. Tainted: %u. Socket alive: %u. Timeout: %u.",
4885 csp->server_connection.sfd, (csp->server_connection.host != NULL) ?
4886 csp->server_connection.host : csp->http->host,
4887 0 != (csp->flags & CSP_FLAG_SERVER_CONNECTION_KEEP_ALIVE),
4888 0 != (csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED),
4889 socket_is_still_alive(csp->server_connection.sfd),
4890 csp->server_connection.keep_alive_timeout);
4891 #ifdef FEATURE_CONNECTION_SHARING
4892 if (csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING)
4893 {
4894 forget_connection(csp->server_connection.sfd);
4895 }
4896 #endif /* def FEATURE_CONNECTION_SHARING */
4897 #ifdef FEATURE_HTTPS_INSPECTION
4898 close_server_ssl_connection(csp);
4899 #endif
4900 close_socket(csp->server_connection.sfd);
4901 mark_connection_closed(&csp->server_connection);
4902 #ifdef FEATURE_HTTPS_INSPECTION
4903 if (continue_chatting && client_use_ssl(csp))
4904 {
4905 /*
4906 * Close the client socket as well as Privoxy currently
4907 * can't establish a new server connection when the client
4908 * socket is reused and would drop the connection in
4909 * continue_https_chat() anyway.
4910 */
4911 continue_chatting = 0;
4912 csp->flags &= ~CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
4913 log_error(LOG_LEVEL_CONNECT,
4914 "Client socket %d is no longer usable. "
4915 "The server socket has been closed.", csp->cfd);
4916 }
4917 #endif
4918 }
4919 }
4920
4921 if (continue_chatting && any_loaded_file_changed(csp))
4922 {
4923 continue_chatting = 0;
4924 config_file_change_detected = 1;
4925 }
4926 #ifdef FEATURE_HTTPS_INSPECTION
4927 if (continue_chatting && client_use_ssl(csp) &&
4928 csp->ssl_with_client_is_opened == 0)
4929 {
4930 continue_chatting = 0;
4931 log_error(LOG_LEVEL_CONNECT, "Client socket %d is no longer usable. "
4932 "The TLS session has been terminated.", csp->cfd);
4933 }
4934 #endif
4935
4936 if (continue_chatting)
4937 {
4938 if (((csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING) != 0)
4939 && socket_is_still_alive(csp->cfd))
4940 {
4941 log_error(LOG_LEVEL_CONNECT, "Client request %d has been "
4942 "pipelined on socket %d and the socket is still alive.",
4943 csp->requests_received_total+1, csp->cfd);
4944 prepare_csp_for_next_request(csp);
4945 continue;
4946 }
4947
4948 if (0 != (csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE))
4949 {
4950 if (csp->server_connection.sfd != JB_INVALID_SOCKET)
4951 {
4952 log_error(LOG_LEVEL_CONNECT,
4953 "Waiting for the next client request on socket %d. "
4954 "Keeping the server socket %d to %s open.",
4955 csp->cfd, csp->server_connection.sfd, csp->server_connection.host);
4956 }
4957 else
4958 {
4959 log_error(LOG_LEVEL_CONNECT,
4960 "Waiting for the next client request on socket %d. "
4961 "No server socket to keep open.", csp->cfd);
4962 }
4963 }
4964
4965 if ((csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE)
4966 && data_is_available(csp->cfd, (int)csp->config->keep_alive_timeout)
4967 && socket_is_still_alive(csp->cfd))
4968 {
4969 log_error(LOG_LEVEL_CONNECT,
4970 "Data arrived in time on client socket %d. Requests so far: %u",
4971 csp->cfd, csp->requests_received_total);
4972 prepare_csp_for_next_request(csp);
4973 }
4974 else
4975 {
4976 #ifdef FEATURE_CONNECTION_SHARING
4977 if ((csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING)
4978 && (csp->server_connection.sfd != JB_INVALID_SOCKET)
4979 && (socket_is_still_alive(csp->server_connection.sfd))
4980 #ifdef FEATURE_HTTPS_INSPECTION
4981 && !server_use_ssl(csp)
4982 #endif
4983 )
4984 {
4985 time_t time_open = time(NULL) - csp->server_connection.timestamp;
4986
4987 if (csp->server_connection.keep_alive_timeout < time_open - (time_t)latency)
4988 {
4989 break;
4990 }
4991
4992 remember_connection(&csp->server_connection);
4993 csp->server_connection.sfd = JB_INVALID_SOCKET;
4994 drain_and_close_socket(csp->cfd);
4995 csp->cfd = JB_INVALID_SOCKET;
4996 privoxy_mutex_lock(&connection_reuse_mutex);
4997 if (!monitor_thread_running)
4998 {
4999 monitor_thread_running = 1;
5000 privoxy_mutex_unlock(&connection_reuse_mutex);
5001 wait_for_alive_connections();
5002 privoxy_mutex_lock(&connection_reuse_mutex);
5003 monitor_thread_running = 0;
5004 }
5005 privoxy_mutex_unlock(&connection_reuse_mutex);
5006 }
5007 #endif /* def FEATURE_CONNECTION_SHARING */
5008 break;
5009 }
5010 }
5011 else if (csp->server_connection.sfd != JB_INVALID_SOCKET)
5012 {
5013 log_error(LOG_LEVEL_CONNECT,
5014 "Closing server socket %d connected to %s. Keep-alive: %u. "
5015 "Tainted: %u. Socket alive: %u. Timeout: %u. "
5016 "Configuration file change detected: %u",
5017 csp->server_connection.sfd, csp->server_connection.host,
5018 0 != (csp->flags & CSP_FLAG_SERVER_CONNECTION_KEEP_ALIVE),
5019 0 != (csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED),
5020 socket_is_still_alive(csp->server_connection.sfd),
5021 csp->server_connection.keep_alive_timeout,
5022 config_file_change_detected);
5023 }
5024 } while (continue_chatting);
5025
5026 #else
5027 chat(csp);
5028 #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
5029
5030 if (csp->cfd != JB_INVALID_SOCKET)
5031 {
5032 log_error(LOG_LEVEL_CONNECT, "Closing client socket %d. "
5033 "Keep-alive: %u. Socket alive: %u. Data available: %u. "
5034 "Configuration file change detected: %u. Requests received: %u.",
5035 csp->cfd, 0 != (csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE),
5036 socket_is_still_alive(csp->cfd), data_is_available(csp->cfd, 0),
5037 config_file_change_detected, csp->requests_received_total);
5038 #ifdef FEATURE_HTTPS_INSPECTION
5039 close_client_ssl_connection(csp);
5040 #endif
5041 drain_and_close_socket(csp->cfd);
5042 }
5043
5044 if (csp->server_connection.sfd != JB_INVALID_SOCKET)
5045 {
5046 #ifdef FEATURE_CONNECTION_SHARING
5047 if (csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING)
5048 {
5049 forget_connection(csp->server_connection.sfd);
5050 }
5051 #endif /* def FEATURE_CONNECTION_SHARING */
5052
5053 #ifdef FEATURE_HTTPS_INSPECTION
5054 close_server_ssl_connection(csp);
5055 #endif /* def FEATURE_HTTPS_INSPECTION */
5056
5057 close_socket(csp->server_connection.sfd);
5058 }
5059
5060 #ifdef FEATURE_CONNECTION_KEEP_ALIVE
5061 mark_connection_closed(&csp->server_connection);
5062 #endif
5063
5064 free_csp_resources(csp);
5065
5066 csp->flags &= ~CSP_FLAG_ACTIVE;
5067
5068 }
5069
5070
5071 #ifdef __BEOS__
5072 /*********************************************************************
5073 *
5074 * Function : server_thread
5075 *
5076 * Description : We only exist to call `serve' in a threaded environment.
5077 *
5078 * Parameters :
5079 * 1 : data = Current client state (buffers, headers, etc...)
5080 *
5081 * Returns : Always 0.
5082 *
5083 *********************************************************************/
server_thread(void * data)5084 static int32 server_thread(void *data)
5085 {
5086 serve((struct client_state *) data);
5087 return 0;
5088
5089 }
5090 #endif
5091
5092
5093 #if !defined(_WIN32) || defined(_WIN_CONSOLE)
5094 /*********************************************************************
5095 *
5096 * Function : usage
5097 *
5098 * Description : Print usage info & exit.
5099 *
5100 * Parameters : Pointer to argv[0] for identifying ourselves
5101 *
5102 * Returns : No. ,-)
5103 *
5104 *********************************************************************/
usage(const char * name)5105 static void usage(const char *name)
5106 {
5107 printf("Privoxy version " VERSION " (" HOME_PAGE_URL ")\n"
5108 "Usage: %s [--config-test] "
5109 #if defined(unix)
5110 "[--chroot] "
5111 #endif /* defined(unix) */
5112 "[--help] "
5113 #if defined(unix)
5114 "[--no-daemon] [--pidfile pidfile] [--pre-chroot-nslookup hostname] [--user user[.group]] "
5115 #endif /* defined(unix) */
5116 "[--version] [configfile]\n",
5117 name);
5118
5119 #ifdef FUZZ
5120 show_fuzz_usage(name);
5121 #endif
5122
5123 printf("Aborting\n");
5124
5125 exit(2);
5126
5127 }
5128 #endif /* #if !defined(_WIN32) || defined(_WIN_CONSOLE) */
5129
5130
5131 #ifdef MUTEX_LOCKS_AVAILABLE
5132 /*********************************************************************
5133 *
5134 * Function : privoxy_mutex_lock
5135 *
5136 * Description : Locks a mutex.
5137 *
5138 * Parameters :
5139 * 1 : mutex = The mutex to lock.
5140 *
5141 * Returns : Void. May exit in case of errors.
5142 *
5143 *********************************************************************/
privoxy_mutex_lock(privoxy_mutex_t * mutex)5144 void privoxy_mutex_lock(privoxy_mutex_t *mutex)
5145 {
5146 #ifdef FEATURE_PTHREAD
5147 int err = pthread_mutex_lock(mutex);
5148 if (err)
5149 {
5150 if (mutex != &log_mutex)
5151 {
5152 log_error(LOG_LEVEL_FATAL,
5153 "Mutex locking failed: %s.\n", strerror(err));
5154 }
5155 exit(1);
5156 }
5157 #else
5158 EnterCriticalSection(mutex);
5159 #endif /* def FEATURE_PTHREAD */
5160 }
5161
5162
5163 /*********************************************************************
5164 *
5165 * Function : privoxy_mutex_unlock
5166 *
5167 * Description : Unlocks a mutex.
5168 *
5169 * Parameters :
5170 * 1 : mutex = The mutex to unlock.
5171 *
5172 * Returns : Void. May exit in case of errors.
5173 *
5174 *********************************************************************/
privoxy_mutex_unlock(privoxy_mutex_t * mutex)5175 void privoxy_mutex_unlock(privoxy_mutex_t *mutex)
5176 {
5177 #ifdef FEATURE_PTHREAD
5178 int err = pthread_mutex_unlock(mutex);
5179 if (err)
5180 {
5181 if (mutex != &log_mutex)
5182 {
5183 log_error(LOG_LEVEL_FATAL,
5184 "Mutex unlocking failed: %s.\n", strerror(err));
5185 }
5186 exit(1);
5187 }
5188 #else
5189 LeaveCriticalSection(mutex);
5190 #endif /* def FEATURE_PTHREAD */
5191 }
5192
5193
5194 /*********************************************************************
5195 *
5196 * Function : privoxy_mutex_init
5197 *
5198 * Description : Prepares a mutex.
5199 *
5200 * Parameters :
5201 * 1 : mutex = The mutex to initialize.
5202 *
5203 * Returns : Void. May exit in case of errors.
5204 *
5205 *********************************************************************/
privoxy_mutex_init(privoxy_mutex_t * mutex)5206 static void privoxy_mutex_init(privoxy_mutex_t *mutex)
5207 {
5208 #ifdef FEATURE_PTHREAD
5209 int err = pthread_mutex_init(mutex, 0);
5210 if (err)
5211 {
5212 printf("Fatal error. Mutex initialization failed: %s.\n",
5213 strerror(err));
5214 exit(1);
5215 }
5216 #else
5217 InitializeCriticalSection(mutex);
5218 #endif /* def FEATURE_PTHREAD */
5219 }
5220 #endif /* def MUTEX_LOCKS_AVAILABLE */
5221
5222 /*********************************************************************
5223 *
5224 * Function : initialize_mutexes
5225 *
5226 * Description : Prepares mutexes if mutex support is available.
5227 *
5228 * Parameters : None
5229 *
5230 * Returns : Void, exits in case of errors.
5231 *
5232 *********************************************************************/
initialize_mutexes(void)5233 static void initialize_mutexes(void)
5234 {
5235 #ifdef MUTEX_LOCKS_AVAILABLE
5236 /*
5237 * Prepare global mutex semaphores
5238 */
5239
5240 #ifdef FEATURE_HTTPS_INSPECTION
5241 privoxy_mutex_init(&certificate_mutex);
5242 privoxy_mutex_init(&ssl_init_mutex);
5243 #endif
5244
5245 privoxy_mutex_init(&log_mutex);
5246 privoxy_mutex_init(&log_init_mutex);
5247 privoxy_mutex_init(&connection_reuse_mutex);
5248 #ifdef FEATURE_EXTERNAL_FILTERS
5249 privoxy_mutex_init(&external_filter_mutex);
5250 #endif
5251 #ifdef FEATURE_CLIENT_TAGS
5252 privoxy_mutex_init(&client_tags_mutex);
5253 #endif
5254 #ifdef FEATURE_EXTENDED_STATISTICS
5255 privoxy_mutex_init(&filter_statistics_mutex);
5256 privoxy_mutex_init(&block_statistics_mutex);
5257 #endif
5258
5259 /*
5260 * XXX: The assumptions below are a bit naive
5261 * and can cause locks that aren't necessary.
5262 *
5263 * For example older FreeBSD versions (< 6.x?)
5264 * have no gethostbyname_r, but gethostbyname is
5265 * thread safe.
5266 */
5267 #if !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R)
5268 privoxy_mutex_init(&resolver_mutex);
5269 #endif /* !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R) */
5270 /*
5271 * XXX: should we use a single mutex for
5272 * localtime() and gmtime() as well?
5273 */
5274 #ifndef HAVE_GMTIME_R
5275 privoxy_mutex_init(&gmtime_mutex);
5276 #endif /* ndef HAVE_GMTIME_R */
5277
5278 #ifndef HAVE_LOCALTIME_R
5279 privoxy_mutex_init(&localtime_mutex);
5280 #endif /* ndef HAVE_GMTIME_R */
5281
5282 #if !defined(HAVE_ARC4RANDOM) && !defined(HAVE_RANDOM)
5283 privoxy_mutex_init(&rand_mutex);
5284 #endif /* !defined(HAVE_ARC4RANDOM) && !defined(HAVE_RANDOM) */
5285
5286 #endif /* def MUTEX_LOCKS_AVAILABLE */
5287 }
5288
5289 /*********************************************************************
5290 *
5291 * Function : main
5292 *
5293 * Description : Load the config file and start the listen loop.
5294 * This function is a lot more *sane* with the `load_config'
5295 * and `listen_loop' functions; although it stills does
5296 * a *little* too much for my taste.
5297 *
5298 * Parameters :
5299 * 1 : argc = Number of parameters (including $0).
5300 * 2 : argv = Array of (char *)'s to the parameters.
5301 *
5302 * Returns : 1 if : can't open config file, unrecognized directive,
5303 * stats requested in multi-thread mode, can't open the
5304 * log file, can't open the jar file, listen port is invalid,
5305 * any load fails, and can't bind port.
5306 *
5307 * Else main never returns, the process must be signaled
5308 * to terminate execution. Or, on Windows, use the
5309 * "File", "Exit" menu option.
5310 *
5311 *********************************************************************/
5312 #ifdef __MINGW32__
real_main(int argc,char ** argv)5313 int real_main(int argc, char **argv)
5314 #else
5315 int main(int argc, char **argv)
5316 #endif
5317 {
5318 int argc_pos = 0;
5319 int do_config_test = 0;
5320 #ifndef HAVE_ARC4RANDOM
5321 unsigned int random_seed;
5322 #endif
5323 #ifdef unix
5324 struct passwd *pw = NULL;
5325 struct group *grp = NULL;
5326 int do_chroot = 0;
5327 char *pre_chroot_nslookup_to_load_resolver = NULL;
5328 #endif
5329 #ifdef FUZZ
5330 char *fuzz_input_type = NULL;
5331 char *fuzz_input_file = NULL;
5332 #endif
5333
5334 Argc = argc;
5335 Argv = argv;
5336
5337 configfile =
5338 #if !defined(_WIN32)
5339 "config"
5340 #else
5341 "config.txt"
5342 #endif
5343 ;
5344
5345 /* Prepare mutexes if supported and necessary. */
5346 initialize_mutexes();
5347
5348 /* Enable logging until further notice. */
5349 init_log_module();
5350
5351 /*
5352 * Parse the command line arguments
5353 *
5354 * XXX: simply printing usage information in case of
5355 * invalid arguments isn't particularly user friendly.
5356 */
5357 while (++argc_pos < argc)
5358 {
5359 #ifdef _WIN32
5360 /* Check to see if the service must be installed or uninstalled */
5361 if (strncmp(argv[argc_pos], "--install", 9) == 0)
5362 {
5363 const char *pName = argv[argc_pos] + 9;
5364 if (*pName == ':')
5365 pName++;
5366 exit((install_service(pName)) ? 0 : 1);
5367 }
5368 else if (strncmp(argv[argc_pos], "--uninstall", 11) == 0)
5369 {
5370 const char *pName = argv[argc_pos] + 11;
5371 if (*pName == ':')
5372 pName++;
5373 exit((uninstall_service(pName)) ? 0 : 1);
5374 }
5375 else if (strcmp(argv[argc_pos], "--service") == 0)
5376 {
5377 bRunAsService = TRUE;
5378 w32_set_service_cwd();
5379 atexit(w32_service_exit_notify);
5380 }
5381 else
5382 #endif /* defined(_WIN32) */
5383
5384
5385 #if !defined(_WIN32) || defined(_WIN_CONSOLE)
5386
5387 if (strcmp(argv[argc_pos], "--help") == 0)
5388 {
5389 usage(argv[0]);
5390 }
5391
5392 else if (strcmp(argv[argc_pos], "--version") == 0)
5393 {
5394 printf("Privoxy version " VERSION " (" HOME_PAGE_URL ")\n");
5395 exit(0);
5396 }
5397
5398 #if defined(unix)
5399
5400 else if (strcmp(argv[argc_pos], "--no-daemon") == 0)
5401 {
5402 set_debug_level(LOG_LEVEL_FATAL | LOG_LEVEL_ERROR | LOG_LEVEL_INFO);
5403 daemon_mode = 0;
5404 }
5405
5406 else if (strcmp(argv[argc_pos], "--pidfile") == 0)
5407 {
5408 if (++argc_pos == argc) usage(argv[0]);
5409 pidfile = strdup_or_die(argv[argc_pos]);
5410 }
5411
5412 else if (strcmp(argv[argc_pos], "--user") == 0)
5413 {
5414 char *user_arg;
5415 char *group_name;
5416
5417 if (++argc_pos == argc) usage(argv[argc_pos]);
5418
5419 user_arg = strdup_or_die(argv[argc_pos]);
5420 group_name = strchr(user_arg, '.');
5421 if (NULL != group_name)
5422 {
5423 /* Nul-terminate the user name */
5424 *group_name = '\0';
5425
5426 /* Skip the former delimiter to actually reach the group name */
5427 group_name++;
5428
5429 grp = getgrnam(group_name);
5430 if (NULL == grp)
5431 {
5432 log_error(LOG_LEVEL_FATAL, "Group '%s' not found.", group_name);
5433 }
5434 }
5435 pw = getpwnam(user_arg);
5436 if (NULL == pw)
5437 {
5438 log_error(LOG_LEVEL_FATAL, "User '%s' not found.", user_arg);
5439 }
5440
5441 freez(user_arg);
5442 }
5443
5444 else if (strcmp(argv[argc_pos], "--pre-chroot-nslookup") == 0)
5445 {
5446 if (++argc_pos == argc) usage(argv[0]);
5447 pre_chroot_nslookup_to_load_resolver = strdup_or_die(argv[argc_pos]);
5448 }
5449
5450 else if (strcmp(argv[argc_pos], "--chroot") == 0)
5451 {
5452 do_chroot = 1;
5453 }
5454 #endif /* defined(unix) */
5455
5456 else if (strcmp(argv[argc_pos], "--config-test") == 0)
5457 {
5458 do_config_test = 1;
5459 }
5460 #ifdef FUZZ
5461 else if (strcmp(argv[argc_pos], "--fuzz") == 0)
5462 {
5463 argc_pos++;
5464 if (argc < argc_pos + 2) usage(argv[0]);
5465 fuzz_input_type = argv[argc_pos];
5466 argc_pos++;
5467 fuzz_input_file = argv[argc_pos];
5468 }
5469 else if (strcmp(argv[argc_pos], "--stfu") == 0)
5470 {
5471 set_debug_level(LOG_LEVEL_STFU);
5472 }
5473 #endif
5474 else if (argc_pos + 1 != argc)
5475 {
5476 /*
5477 * This is neither the last command line
5478 * option, nor was it recognized before,
5479 * therefore it must be invalid.
5480 */
5481 usage(argv[0]);
5482 }
5483 else
5484
5485 #endif /* defined(_WIN32) && !defined(_WIN_CONSOLE) */
5486 {
5487 configfile = argv[argc_pos];
5488 }
5489
5490 } /* -END- while (more arguments) */
5491
5492 show_version(Argv[0]);
5493
5494 #if defined(unix)
5495 if (*configfile != '/')
5496 {
5497 char cwd[BUFFER_SIZE];
5498 char *abs_file;
5499 size_t abs_file_size;
5500
5501 /* make config-filename absolute here */
5502 if (NULL == getcwd(cwd, sizeof(cwd)))
5503 {
5504 perror("failed to get current working directory");
5505 exit(1);
5506 }
5507
5508 basedir = strdup_or_die(cwd);
5509 /* XXX: why + 5? */
5510 abs_file_size = strlen(cwd) + strlen(configfile) + 5;
5511 abs_file = malloc_or_die(abs_file_size);
5512 strlcpy(abs_file, basedir, abs_file_size);
5513 strlcat(abs_file, "/", abs_file_size);
5514 strlcat(abs_file, configfile, abs_file_size);
5515 configfile = abs_file;
5516 }
5517 #endif /* defined unix */
5518
5519
5520 files->next = NULL;
5521 clients->next = NULL;
5522
5523 /* XXX: factor out initialising after the next stable release. */
5524 #ifdef _WIN32
5525 InitWin32();
5526 #endif
5527
5528 #ifndef HAVE_ARC4RANDOM
5529 random_seed = (unsigned int)time(NULL);
5530 #ifdef HAVE_RANDOM
5531 srandom(random_seed);
5532 #else
5533 srand(random_seed);
5534 #endif /* ifdef HAVE_RANDOM */
5535 #endif /* ifndef HAVE_ARC4RANDOM */
5536
5537 /*
5538 * Unix signal handling
5539 *
5540 * Catch the abort, interrupt and terminate signals for a graceful exit
5541 * Catch the hangup signal so the errlog can be reopened.
5542 *
5543 * Ignore the broken pipe signal as connection failures
5544 * are handled when and where they occur without relying
5545 * on a signal.
5546 */
5547 #if !defined(_WIN32)
5548 {
5549 int idx;
5550 const int catched_signals[] = { SIGTERM, SIGINT, SIGHUP };
5551
5552 for (idx = 0; idx < SZ(catched_signals); idx++)
5553 {
5554 #ifdef sun /* FIXME: Is it safe to check for HAVE_SIGSET instead? */
5555 if (sigset(catched_signals[idx], sig_handler) == SIG_ERR)
5556 #else
5557 if (signal(catched_signals[idx], sig_handler) == SIG_ERR)
5558 #endif /* ifdef sun */
5559 {
5560 log_error(LOG_LEVEL_FATAL, "Can't set signal-handler for signal %d: %E", catched_signals[idx]);
5561 }
5562 }
5563
5564 if (signal(SIGPIPE, SIG_IGN) == SIG_ERR)
5565 {
5566 log_error(LOG_LEVEL_FATAL, "Can't set ignore-handler for SIGPIPE: %E");
5567 }
5568
5569 }
5570 #else /* ifdef _WIN32 */
5571 # ifdef _WIN_CONSOLE
5572 /*
5573 * We *are* in a windows console app.
5574 * Print a verbose messages about FAQ's and such
5575 */
5576 printf("%s", win32_blurb);
5577 # endif /* def _WIN_CONSOLE */
5578 #endif /* def _WIN32 */
5579
5580 #ifdef FUZZ
5581 if (fuzz_input_type != NULL)
5582 {
5583 exit(process_fuzzed_input(fuzz_input_type, fuzz_input_file));
5584 }
5585 log_error(LOG_LEVEL_FATAL,
5586 "When compiled with fuzzing support, Privoxy should only be used for fuzzing. "
5587 "Various data structures are static which is unsafe when using threads.");
5588 #endif
5589
5590 if (do_config_test)
5591 {
5592 exit(NULL == load_config());
5593 }
5594
5595 /* Initialize the CGI subsystem */
5596 cgi_init_error_messages();
5597
5598 /*
5599 * If running on unix and without the --no-daemon
5600 * option, become a daemon. I.e. fork, detach
5601 * from tty and get process group leadership
5602 */
5603 #if defined(unix)
5604 {
5605 if (daemon_mode)
5606 {
5607 int fd;
5608 pid_t pid = fork();
5609
5610 if (pid < 0) /* error */
5611 {
5612 perror("fork");
5613 exit(3);
5614 }
5615 else if (pid != 0) /* parent */
5616 {
5617 int status;
5618 pid_t wpid;
5619 /*
5620 * must check for errors
5621 * child died due to missing files aso
5622 */
5623 sleep(1);
5624 wpid = waitpid(pid, &status, WNOHANG);
5625 if (wpid != 0)
5626 {
5627 exit(1);
5628 }
5629 exit(0);
5630 }
5631 /* child */
5632
5633 setsid();
5634
5635 /*
5636 * stderr (fd 2) will be closed later on,
5637 * when the config file has been parsed.
5638 */
5639 close(0);
5640 close(1);
5641
5642 /*
5643 * Reserve fd 0 and 1 to prevent abort() and friends
5644 * from sending stuff to the clients or servers.
5645 */
5646 fd = open("/dev/null", O_RDONLY);
5647 if (fd == -1)
5648 {
5649 log_error(LOG_LEVEL_FATAL, "Failed to open /dev/null: %E");
5650 }
5651 else if (fd != 0)
5652 {
5653 if (dup2(fd, 0) == -1)
5654 {
5655 log_error(LOG_LEVEL_FATAL, "Failed to reserve fd 0: %E");
5656 }
5657 close(fd);
5658 }
5659 fd = open("/dev/null", O_WRONLY);
5660 if (fd == -1)
5661 {
5662 log_error(LOG_LEVEL_FATAL, "Failed to open /dev/null: %E");
5663 }
5664 else if (fd != 1)
5665 {
5666 if (dup2(fd, 1) == -1)
5667 {
5668 log_error(LOG_LEVEL_FATAL, "Failed to reserve fd 1: %E");
5669 }
5670 close(fd);
5671 }
5672
5673 #ifdef FEATURE_EXTERNAL_FILTERS
5674 for (fd = 0; fd < 3; fd++)
5675 {
5676 mark_socket_for_close_on_execute(fd);
5677 }
5678 #endif
5679
5680 if (chdir("/") != 0)
5681 {
5682 log_error(LOG_LEVEL_FATAL, "Failed to cd into '/': %E");
5683 }
5684
5685 } /* -END- if (daemon_mode) */
5686
5687 /*
5688 * As soon as we have written the PID file, we can switch
5689 * to the user and group ID indicated by the --user option
5690 */
5691 if (pidfile != NULL)
5692 {
5693 write_pid_file(pidfile);
5694 }
5695 if (NULL != pw)
5696 {
5697 if (setgid((NULL != grp) ? grp->gr_gid : pw->pw_gid))
5698 {
5699 log_error(LOG_LEVEL_FATAL, "Cannot setgid(): Insufficient permissions.");
5700 }
5701 if (NULL != grp)
5702 {
5703 if (setgroups(1, &grp->gr_gid))
5704 {
5705 log_error(LOG_LEVEL_FATAL, "setgroups() failed: %E");
5706 }
5707 }
5708 else if (initgroups(pw->pw_name, pw->pw_gid))
5709 {
5710 log_error(LOG_LEVEL_FATAL, "initgroups() failed: %E");
5711 }
5712 if (do_chroot)
5713 {
5714 if (!pw->pw_dir)
5715 {
5716 log_error(LOG_LEVEL_FATAL, "Home directory for %s undefined", pw->pw_name);
5717 }
5718 /* Read the time zone file from /etc before doing chroot. */
5719 tzset();
5720 if (NULL != pre_chroot_nslookup_to_load_resolver
5721 && '\0' != pre_chroot_nslookup_to_load_resolver[0])
5722 {
5723 /* Initialize resolver library. */
5724 (void) resolve_hostname_to_ip(pre_chroot_nslookup_to_load_resolver);
5725 }
5726 if (chroot(pw->pw_dir) < 0)
5727 {
5728 log_error(LOG_LEVEL_FATAL, "Cannot chroot to %s", pw->pw_dir);
5729 }
5730 if (chdir ("/"))
5731 {
5732 log_error(LOG_LEVEL_FATAL, "Cannot chdir /");
5733 }
5734 }
5735 if (setuid(pw->pw_uid))
5736 {
5737 log_error(LOG_LEVEL_FATAL, "Cannot setuid(): Insufficient permissions.");
5738 }
5739 if (do_chroot)
5740 {
5741 char putenv_dummy[64];
5742
5743 strlcpy(putenv_dummy, "HOME=/", sizeof(putenv_dummy));
5744 if (putenv(putenv_dummy) != 0)
5745 {
5746 log_error(LOG_LEVEL_FATAL, "Cannot putenv(): HOME");
5747 }
5748
5749 snprintf(putenv_dummy, sizeof(putenv_dummy), "USER=%s", pw->pw_name);
5750 if (putenv(putenv_dummy) != 0)
5751 {
5752 log_error(LOG_LEVEL_FATAL, "Cannot putenv(): USER");
5753 }
5754 }
5755 }
5756 else if (do_chroot)
5757 {
5758 log_error(LOG_LEVEL_FATAL, "Cannot chroot without --user argument.");
5759 }
5760 }
5761 #endif /* defined unix */
5762
5763 #ifdef _WIN32
5764 /* This will be FALSE unless the command line specified --service
5765 */
5766 if (bRunAsService)
5767 {
5768 /* Yup, so now we must attempt to establish a connection
5769 * with the service dispatcher. This will only work if this
5770 * process was launched by the service control manager to
5771 * actually run as a service. If this isn't the case, i've
5772 * known it take around 30 seconds or so for the call to return.
5773 */
5774
5775 /* The StartServiceCtrlDispatcher won't return until the service is stopping */
5776 if (w32_start_service_ctrl_dispatcher(w32ServiceDispatchTable))
5777 {
5778 /* Service has run, and at this point is now being stopped, so just return */
5779 return 0;
5780 }
5781
5782 #ifdef _WIN_CONSOLE
5783 printf("Warning: Failed to connect to Service Control Dispatcher\nwhen starting as a service!\n");
5784 #endif
5785 /* An error occurred. Usually it's because --service was wrongly specified
5786 * and we were unable to connect to the Service Control Dispatcher because
5787 * it wasn't expecting us and is therefore not listening.
5788 *
5789 * For now, just continue below to call the listen_loop function.
5790 */
5791 }
5792 #endif /* def _WIN32 */
5793
5794 listen_loop();
5795
5796 /* NOTREACHED */
5797 return(-1);
5798
5799 }
5800
5801
5802 /*********************************************************************
5803 *
5804 * Function : bind_port_helper
5805 *
5806 * Description : Bind the listen port. Handles logging, and aborts
5807 * on failure.
5808 *
5809 * Parameters :
5810 * 1 : haddr = Host address to bind to. Use NULL to bind to
5811 * INADDR_ANY.
5812 * 2 : hport = Specifies port to bind to.
5813 * 3 : backlog = Listen backlog.
5814 *
5815 * Returns : Port that was opened.
5816 *
5817 *********************************************************************/
bind_port_helper(const char * haddr,int hport,int backlog)5818 static jb_socket bind_port_helper(const char *haddr, int hport, int backlog)
5819 {
5820 int result;
5821 jb_socket bfd;
5822
5823 result = bind_port(haddr, hport, backlog, &bfd);
5824
5825 if (result < 0)
5826 {
5827 const char *bind_address = (NULL != haddr) ? haddr : "INADDR_ANY";
5828 switch(result)
5829 {
5830 case -3:
5831 log_error(LOG_LEVEL_FATAL,
5832 "can't bind to %s:%d: There may be another Privoxy "
5833 "or some other proxy running on port %d",
5834 bind_address, hport, hport);
5835 exit(-1);
5836
5837 case -2:
5838 log_error(LOG_LEVEL_FATAL,
5839 "can't bind to %s:%d: The hostname is not resolvable",
5840 bind_address, hport);
5841 exit(-1);
5842
5843 default:
5844 log_error(LOG_LEVEL_FATAL, "can't bind to %s:%d: %E",
5845 bind_address, hport);
5846 exit(-1);
5847 }
5848
5849 /* shouldn't get here */
5850 return JB_INVALID_SOCKET;
5851 }
5852
5853 #ifndef HAVE_POLL
5854 #ifndef _WIN32
5855 if (bfd >= FD_SETSIZE)
5856 {
5857 log_error(LOG_LEVEL_FATAL,
5858 "Bind socket number too high to use select(): %d >= %d",
5859 bfd, FD_SETSIZE);
5860 }
5861 #endif
5862 #endif
5863
5864 if (haddr == NULL)
5865 {
5866 log_error(LOG_LEVEL_INFO, "Listening on port %d on all IP addresses",
5867 hport);
5868 }
5869 else
5870 {
5871 log_error(LOG_LEVEL_INFO, "Listening on port %d on IP address %s",
5872 hport, haddr);
5873 }
5874
5875 return bfd;
5876 }
5877
5878
5879 /*********************************************************************
5880 *
5881 * Function : bind_ports_helper
5882 *
5883 * Description : Bind the listen ports. Handles logging, and aborts
5884 * on failure.
5885 *
5886 * Parameters :
5887 * 1 : config = Privoxy configuration. Specifies ports
5888 * to bind to.
5889 * 2 : sockets = Preallocated array of opened sockets
5890 * corresponding to specification in config.
5891 * All non-opened sockets will be set to
5892 * JB_INVALID_SOCKET.
5893 *
5894 * Returns : Nothing. Inspect sockets argument.
5895 *
5896 *********************************************************************/
bind_ports_helper(struct configuration_spec * config,jb_socket sockets[])5897 static void bind_ports_helper(struct configuration_spec * config,
5898 jb_socket sockets[])
5899 {
5900 int i;
5901
5902 for (i = 0; i < MAX_LISTENING_SOCKETS; i++)
5903 {
5904 if (config->hport[i])
5905 {
5906 sockets[i] = bind_port_helper(config->haddr[i],
5907 config->hport[i], config->listen_backlog);
5908 #if defined(FEATURE_ACCEPT_FILTER) && defined(SO_ACCEPTFILTER)
5909 if (config->enable_accept_filter && sockets[i] != JB_INVALID_SOCKET)
5910 {
5911 struct accept_filter_arg af_options;
5912 bzero(&af_options, sizeof(af_options));
5913 strlcpy(af_options.af_name, "httpready", sizeof(af_options.af_name));
5914 if (setsockopt(sockets[i], SOL_SOCKET, SO_ACCEPTFILTER, &af_options,
5915 sizeof(af_options)))
5916 {
5917 log_error(LOG_LEVEL_ERROR,
5918 "Enabling accept filter for socket %d failed: %E", sockets[i]);
5919 }
5920 }
5921 #endif
5922 }
5923 else
5924 {
5925 sockets[i] = JB_INVALID_SOCKET;
5926 }
5927 }
5928 config->need_bind = 0;
5929 }
5930
5931
5932 /*********************************************************************
5933 *
5934 * Function : close_ports_helper
5935 *
5936 * Description : Close listenings ports.
5937 *
5938 * Parameters :
5939 * 1 : sockets = Array of opened and non-opened sockets to
5940 * close. All sockets will be set to
5941 * JB_INVALID_SOCKET.
5942 *
5943 * Returns : Nothing.
5944 *
5945 *********************************************************************/
close_ports_helper(jb_socket sockets[])5946 static void close_ports_helper(jb_socket sockets[])
5947 {
5948 int i;
5949
5950 for (i = 0; i < MAX_LISTENING_SOCKETS; i++)
5951 {
5952 if (JB_INVALID_SOCKET != sockets[i])
5953 {
5954 close_socket(sockets[i]);
5955 }
5956 sockets[i] = JB_INVALID_SOCKET;
5957 }
5958 }
5959
5960
5961 #ifdef _WIN32
5962 /* Without this simple workaround we get this compiler warning from _beginthread
5963 * warning C4028: formal parameter 1 different from declaration
5964 */
w32_service_listen_loop(void * p)5965 void w32_service_listen_loop(void *p)
5966 {
5967 listen_loop();
5968 }
5969 #endif /* def _WIN32 */
5970
5971
5972 /*********************************************************************
5973 *
5974 * Function : listen_loop
5975 *
5976 * Description : bind the listen port and enter a "FOREVER" listening loop.
5977 *
5978 * Parameters : N/A
5979 *
5980 * Returns : Never.
5981 *
5982 *********************************************************************/
listen_loop(void)5983 static void listen_loop(void)
5984 {
5985 struct client_states *csp_list = NULL;
5986 struct client_state *csp = NULL;
5987 jb_socket bfds[MAX_LISTENING_SOCKETS];
5988 struct configuration_spec *config;
5989 unsigned int active_threads = 0;
5990 #if defined(FEATURE_PTHREAD)
5991 pthread_attr_t attrs;
5992
5993 pthread_attr_init(&attrs);
5994 pthread_attr_setdetachstate(&attrs, PTHREAD_CREATE_DETACHED);
5995 #endif
5996
5997 config = load_config();
5998
5999 #ifdef FEATURE_CONNECTION_SHARING
6000 /*
6001 * XXX: Should be relocated once it no
6002 * longer needs to emit log messages.
6003 */
6004 initialize_reusable_connections();
6005 #endif /* def FEATURE_CONNECTION_SHARING */
6006
6007 bind_ports_helper(config, bfds);
6008
6009 #ifdef FEATURE_GRACEFUL_TERMINATION
6010 while (!g_terminate)
6011 #else
6012 for (;;)
6013 #endif
6014 {
6015 #if !defined(FEATURE_PTHREAD) && !defined(_WIN32) && !defined(__BEOS__)
6016 while (waitpid(-1, NULL, WNOHANG) > 0)
6017 {
6018 /* zombie children */
6019 }
6020 #endif /* !defined(FEATURE_PTHREAD) && !defined(_WIN32) && !defined(__BEOS__) */
6021
6022 /*
6023 * Free data that was used by died threads
6024 */
6025 active_threads = sweep();
6026
6027 #if defined(unix)
6028 /*
6029 * Re-open the errlog after HUP signal
6030 */
6031 if (received_hup_signal)
6032 {
6033 if (NULL != config->logfile)
6034 {
6035 init_error_log(Argv[0], config->logfile);
6036 }
6037 received_hup_signal = 0;
6038 }
6039 #endif
6040
6041 csp_list = zalloc_or_die(sizeof(*csp_list));
6042 csp = &csp_list->csp;
6043
6044 log_error(LOG_LEVEL_CONNECT,
6045 "Waiting for the next client connection. Currently active threads: %u",
6046 active_threads);
6047
6048 /*
6049 * This config may be outdated, but for accept_connection()
6050 * it's fresh enough.
6051 */
6052 csp->config = config;
6053
6054 if (!accept_connection(csp, bfds))
6055 {
6056 log_error(LOG_LEVEL_CONNECT, "accept failed: %E");
6057 freez(csp_list);
6058 continue;
6059 }
6060
6061 csp->flags |= CSP_FLAG_ACTIVE;
6062 csp->server_connection.sfd = JB_INVALID_SOCKET;
6063
6064 csp->config = config = load_config();
6065
6066 if (config->need_bind)
6067 {
6068 /*
6069 * Since we were listening to the "old port", we will not see
6070 * a "listen" param change until the next request. So, at
6071 * least 1 more request must be made for us to find the new
6072 * setting. I am simply closing the old socket and binding the
6073 * new one.
6074 *
6075 * Which-ever is correct, we will serve 1 more page via the
6076 * old settings. This should probably be a "show-status"
6077 * request. This should not be a so common of an operation
6078 * that this will hurt people's feelings.
6079 */
6080
6081 close_ports_helper(bfds);
6082
6083 bind_ports_helper(config, bfds);
6084 }
6085
6086 #ifdef FEATURE_TOGGLE
6087 if (global_toggle_state)
6088 #endif /* def FEATURE_TOGGLE */
6089 {
6090 csp->flags |= CSP_FLAG_TOGGLED_ON;
6091 }
6092
6093 if (run_loader(csp))
6094 {
6095 log_error(LOG_LEVEL_FATAL, "a loader failed - must exit");
6096 /* Never get here - LOG_LEVEL_FATAL causes program exit */
6097 }
6098
6099 #ifdef FEATURE_ACL
6100 if (block_acl(NULL,csp))
6101 {
6102 log_error(LOG_LEVEL_CONNECT,
6103 "Connection from %s on %s (socket %d) dropped due to ACL",
6104 csp->ip_addr_str, csp->listen_addr_str, csp->cfd);
6105 close_socket(csp->cfd);
6106 freez(csp->ip_addr_str);
6107 freez(csp->listen_addr_str);
6108 freez(csp_list);
6109 continue;
6110 }
6111 #endif /* def FEATURE_ACL */
6112
6113 if ((0 != config->max_client_connections)
6114 && (active_threads >= config->max_client_connections))
6115 {
6116 log_error(LOG_LEVEL_ERROR,
6117 "Rejecting connection from %s. Maximum number of connections reached.",
6118 csp->ip_addr_str);
6119 write_socket_delayed(csp->cfd, TOO_MANY_CONNECTIONS_RESPONSE,
6120 strlen(TOO_MANY_CONNECTIONS_RESPONSE), get_write_delay(csp));
6121 close_socket(csp->cfd);
6122 freez(csp->ip_addr_str);
6123 freez(csp->listen_addr_str);
6124 freez(csp_list);
6125 continue;
6126 }
6127
6128 /* add it to the list of clients */
6129 csp_list->next = clients->next;
6130 clients->next = csp_list;
6131
6132 if (config->multi_threaded)
6133 {
6134 int child_id;
6135
6136 /* this is a switch () statement in the C preprocessor - ugh */
6137 #undef SELECTED_ONE_OPTION
6138
6139 /* Use Pthreads in preference to native code */
6140 #if defined(FEATURE_PTHREAD) && !defined(SELECTED_ONE_OPTION)
6141 #define SELECTED_ONE_OPTION
6142 {
6143 pthread_t the_thread;
6144 int ret;
6145
6146 ret = pthread_create(&the_thread, &attrs,
6147 (void * (*)(void *))serve, csp);
6148 child_id = ret ? -1 : 0;
6149 }
6150 #endif
6151
6152 #if defined(_WIN32) && !defined(SELECTED_ONE_OPTION)
6153 #define SELECTED_ONE_OPTION
6154 child_id = _beginthread(
6155 (void (*)(void *))serve,
6156 64 * 1024,
6157 csp);
6158 #endif
6159
6160 #if defined(__BEOS__) && !defined(SELECTED_ONE_OPTION)
6161 #define SELECTED_ONE_OPTION
6162 {
6163 thread_id tid = spawn_thread
6164 (server_thread, "server", B_NORMAL_PRIORITY, csp);
6165
6166 if ((tid >= 0) && (resume_thread(tid) == B_OK))
6167 {
6168 child_id = (int) tid;
6169 }
6170 else
6171 {
6172 child_id = -1;
6173 }
6174 }
6175 #endif
6176
6177 #if !defined(SELECTED_ONE_OPTION)
6178 child_id = fork();
6179
6180 /* This block is only needed when using fork().
6181 * When using threads, the server thread was
6182 * created and run by the call to _beginthread().
6183 */
6184 if (child_id == 0) /* child */
6185 {
6186 int rc = 0;
6187 #ifdef FEATURE_TOGGLE
6188 int inherited_toggle_state = global_toggle_state;
6189 #endif /* def FEATURE_TOGGLE */
6190
6191 serve(csp);
6192
6193 /*
6194 * If we've been toggled or we've blocked the request, tell Mom
6195 */
6196
6197 #ifdef FEATURE_TOGGLE
6198 if (inherited_toggle_state != global_toggle_state)
6199 {
6200 rc |= RC_FLAG_TOGGLED;
6201 }
6202 #endif /* def FEATURE_TOGGLE */
6203
6204 #ifdef FEATURE_STATISTICS
6205 if (csp->flags & CSP_FLAG_REJECTED)
6206 {
6207 rc |= RC_FLAG_BLOCKED;
6208 }
6209 #endif /* ndef FEATURE_STATISTICS */
6210
6211 _exit(rc);
6212 }
6213 else if (child_id > 0) /* parent */
6214 {
6215 /* in a fork()'d environment, the parent's
6216 * copy of the client socket and the CSP
6217 * are not used.
6218 */
6219 int child_status;
6220 #if !defined(_WIN32) && !defined(__CYGWIN__)
6221
6222 wait(&child_status);
6223
6224 /*
6225 * Evaluate child's return code: If the child has
6226 * - been toggled, toggle ourselves
6227 * - blocked its request, bump up the stats counter
6228 */
6229
6230 #ifdef FEATURE_TOGGLE
6231 if (WIFEXITED(child_status) && (WEXITSTATUS(child_status) & RC_FLAG_TOGGLED))
6232 {
6233 global_toggle_state = !global_toggle_state;
6234 }
6235 #endif /* def FEATURE_TOGGLE */
6236
6237 #ifdef FEATURE_STATISTICS
6238 urls_read++;
6239 if (WIFEXITED(child_status) && (WEXITSTATUS(child_status) & RC_FLAG_BLOCKED))
6240 {
6241 urls_rejected++;
6242 }
6243 #endif /* def FEATURE_STATISTICS */
6244
6245 #endif /* !defined(_WIN32) && defined(__CYGWIN__) */
6246 close_socket(csp->cfd);
6247 csp->flags &= ~CSP_FLAG_ACTIVE;
6248 }
6249 #endif
6250
6251 #undef SELECTED_ONE_OPTION
6252 /* end of cpp switch () */
6253
6254 if (child_id < 0)
6255 {
6256 /*
6257 * Spawning the child failed, assume it's because
6258 * there are too many children running already.
6259 * XXX: If you assume ...
6260 */
6261 log_error(LOG_LEVEL_ERROR,
6262 "Unable to take any additional connections: %E. Active threads: %u",
6263 active_threads);
6264 write_socket_delayed(csp->cfd, TOO_MANY_CONNECTIONS_RESPONSE,
6265 strlen(TOO_MANY_CONNECTIONS_RESPONSE), get_write_delay(csp));
6266 close_socket(csp->cfd);
6267 csp->flags &= ~CSP_FLAG_ACTIVE;
6268 }
6269 }
6270 else
6271 {
6272 serve(csp);
6273 }
6274 }
6275
6276 #if defined(FEATURE_PTHREAD)
6277 pthread_attr_destroy(&attrs);
6278 #endif
6279
6280 /* NOTREACHED unless FEATURE_GRACEFUL_TERMINATION is defined */
6281
6282 #ifdef FEATURE_GRACEFUL_TERMINATION
6283
6284 log_error(LOG_LEVEL_INFO, "Graceful termination requested.");
6285
6286 close_ports_helper(bfds);
6287
6288 unload_current_config_file();
6289 unload_current_actions_file();
6290 unload_current_re_filterfile();
6291 #ifdef FEATURE_TRUST
6292 unload_current_trust_file();
6293 #endif
6294
6295 if (config->multi_threaded)
6296 {
6297 int i = 60;
6298 do
6299 {
6300 sleep(1);
6301 sweep();
6302 } while ((clients->next != NULL) && (--i > 0));
6303
6304 if (i <= 0)
6305 {
6306 log_error(LOG_LEVEL_ERROR, "Graceful termination failed "
6307 "- still some live clients after 1 minute wait.");
6308 }
6309 }
6310 sweep();
6311 sweep();
6312
6313 #if defined(unix)
6314 freez(basedir);
6315 #endif
6316
6317 #ifdef FEATURE_HTTPS_INSPECTION
6318 /*
6319 * Only release TLS backed resources if there
6320 * are no active connections left.
6321 */
6322 if (clients->next == NULL)
6323 {
6324 ssl_release();
6325 }
6326 #endif
6327
6328 log_error(LOG_LEVEL_INFO, "Exiting gracefully.");
6329
6330 #if defined(_WIN32) && !defined(_WIN_CONSOLE)
6331 /* Cleanup - remove taskbar icon etc. */
6332 TermLogWindow();
6333 #endif
6334
6335 exit(0);
6336 #endif /* FEATURE_GRACEFUL_TERMINATION */
6337
6338 }
6339
6340
6341 /*
6342 Local Variables:
6343 tab-width: 3
6344 end:
6345 */
6346