1 const char jcc_rcs[] = "$Id: jcc.c,v 1.126 2007/03/17 15:20:05 fabiankeil Exp $";
2 /*********************************************************************
4 * File : $Source: /cvsroot/ijbswa/current/jcc.c,v $
6 * Purpose : Main file. Contains main() method, main loop, and
7 * the main connection-handling function.
9 * Copyright : Written by and Copyright (C) 2001-2007 the SourceForge
10 * Privoxy team. http://www.privoxy.org/
12 * Based on the Internet Junkbuster originally written
13 * by and Copyright (C) 1997 Anonymous Coders and
14 * Junkbusters Corporation. http://www.junkbusters.com
16 * This program is free software; you can redistribute it
17 * and/or modify it under the terms of the GNU General
18 * Public License as published by the Free Software
19 * Foundation; either version 2 of the License, or (at
20 * your option) any later version.
22 * This program is distributed in the hope that it will
23 * be useful, but WITHOUT ANY WARRANTY; without even the
24 * implied warranty of MERCHANTABILITY or FITNESS FOR A
25 * PARTICULAR PURPOSE. See the GNU General Public
26 * License for more details.
28 * The GNU General Public License should be included with
29 * this file. If not, you can view it at
30 * http://www.gnu.org/copyleft/gpl.html
31 * or write to the Free Software Foundation, Inc., 59
32 * Temple Place - Suite 330, Boston, MA 02111-1307, USA.
36 * Revision 1.126 2007/03/17 15:20:05 fabiankeil
37 * New config option: enforce-blocks.
39 * Revision 1.125 2007/03/09 14:12:00 fabiankeil
40 * - Move null byte check into separate function.
41 * - Don't confuse the client with error pages
42 * if a CONNECT request was already confirmed.
44 * Revision 1.124 2007/02/23 14:59:54 fabiankeil
45 * Speed up NULL byte escaping and only log the complete
46 * NULL byte requests with header debugging enabled.
48 * Revision 1.123 2007/02/21 18:42:10 fabiankeil
49 * Answer requests that contain NULL bytes with
50 * a custom response instead of waiting for more
51 * data until the client eventually hangs up.
53 * Revision 1.122 2007/02/07 11:12:02 fabiankeil
54 * - Move delivery and logging of crunched responses
55 * from chat() into send_crunch_response().
56 * - Display the reason for generating http_responses.
57 * - Log the content length for LOG_LEVEL_CLF correctly
58 * (still incorrect for some fixed responses).
59 * - Reword an incorrect comment about
60 * treat-forbidden-connects-like-blocks violating
62 * - Add some log messages.
64 * Revision 1.121 2007/01/27 10:52:56 fabiankeil
65 * Move mutex initialization into separate
66 * function and exit in case of errors.
68 * Revision 1.120 2007/01/26 14:18:42 fabiankeil
69 * - Start to reduce chat()'s line count and move
70 * parts of it into separate functions.
71 * - Add "HTTP/1.1 100 Continue" hack for BR 756734.
73 * Revision 1.119 2007/01/25 14:02:30 fabiankeil
74 * - Add Proxy-Agent header to HTTP snippets that are
75 * supposed to reach HTTP clients only.
76 * - Made a few CONNECT log messages more descriptive.
77 * - Catch completely empty server responses (as seen
78 * with Tor's fake ".noconnect" top level domain).
79 * - Use shiny new "forwarding-failed" template for socks errors.
81 * Revision 1.118 2007/01/07 07:43:43 joergs
82 * AmigaOS4 support added.
84 * Revision 1.117 2006/12/31 17:56:37 fabiankeil
85 * Added config option accept-intercepted-requests
86 * and disabled it by default.
88 * Revision 1.116 2006/12/29 19:08:22 fabiankeil
89 * Reverted parts of my last commit
90 * to keep error handling working.
92 * Revision 1.115 2006/12/29 17:38:57 fabiankeil
93 * Fixed gcc43 conversion warnings.
95 * Revision 1.114 2006/12/27 18:52:02 fabiankeil
96 * Fix -pedantic ISO C warning about converting
97 * from function pointer to object pointer.
99 * Revision 1.113 2006/12/26 17:38:50 fabiankeil
100 * Silence compiler warning I introduced with my last commit.
102 * Revision 1.112 2006/12/26 17:31:41 fabiankeil
103 * Mutex protect rand() if POSIX threading
104 * is used, warn the user if that's not possible
105 * and stop using it on _WIN32 where it could
108 * Revision 1.111 2006/12/23 16:15:06 fabiankeil
109 * Don't prevent core dumps by catching SIGABRT.
110 * It's rude and makes debugging unreasonable painful.
112 * Revision 1.110 2006/12/13 14:52:53 etresoft
113 * Fix build failure on MacOS X. Global symbols can be either static or extern, but not both.
115 * Revision 1.109 2006/12/06 19:41:40 fabiankeil
116 * Privoxy is now able to run as intercepting
117 * proxy in combination with any packet filter
118 * that does the port redirection. The destination
119 * is extracted from the "Host:" header which
120 * should be available for nearly all requests.
122 * Moved HTTP snipplets into jcc.c.
123 * Added error message for gopher proxy requests.
125 * Revision 1.108 2006/11/28 15:38:51 fabiankeil
126 * Only unlink the pidfile if it's actually used.
128 * Change order of interception checks to make
129 * it possible to block or redirect requests for
132 * Revision 1.107 2006/11/13 19:05:51 fabiankeil
133 * Make pthread mutex locking more generic. Instead of
134 * checking for OSX and OpenBSD, check for FEATURE_PTHREAD
135 * and use mutex locking unless there is an _r function
136 * available. Better safe than sorry.
138 * Fixes "./configure --disable-pthread" and should result
139 * in less threading-related problems on pthread-using platforms,
140 * but it still doesn't fix BR#1122404.
142 * Revision 1.106 2006/11/06 19:58:23 fabiankeil
143 * Move pthread.h inclusion from jcc.c to jcc.h.
144 * Fixes build on x86-freebsd1 (FreeBSD 5.4-RELEASE).
146 * Revision 1.105 2006/11/06 14:26:02 fabiankeil
147 * Don't exit after receiving the second SIGHUP on Solaris.
149 * Fixes BR 1052235, but the same problem may exist on other
150 * systems. Once 3.0.6 is out we should use sigset()
151 * where available and see if it breaks anything.
153 * Revision 1.104 2006/09/23 13:26:38 roro
154 * Replace TABs by spaces in source code.
156 * Revision 1.103 2006/09/21 12:54:43 fabiankeil
157 * Fix +redirect{}. Didn't work with -fast-redirects.
159 * Revision 1.102 2006/09/06 13:03:04 fabiankeil
160 * Respond with 400 and a short text message
161 * if the client tries to use Privoxy as FTP proxy.
163 * Revision 1.101 2006/09/06 09:23:37 fabiankeil
164 * Make number of retries in case of forwarded-connect problems
165 * a config file option (forwarded-connect-retries) and use 0 as
168 * Revision 1.100 2006/09/03 19:42:59 fabiankeil
169 * Set random(3) seed.
171 * Revision 1.99 2006/09/02 15:36:42 fabiankeil
172 * Follow the OpenBSD port's lead and protect the resolve
173 * functions on OpenBSD as well.
175 * Revision 1.98 2006/08/24 11:01:34 fabiankeil
176 * --user fix. Only use the user as group if no group is specified.
177 * Solves BR 1492612. Thanks to Spinor S. and David Laight.
179 * Revision 1.97 2006/08/18 15:23:17 david__schmidt
180 * Windows service (re-)integration
184 * --install[:service_name]
185 * --uninstall[:service_name]
188 * They work as follows:
189 * --install will create a service for you and then terminate.
190 * By default the service name will be "privoxy" (without the quotes).
191 * However you can run multiple services if you wish, just by adding
192 * a colon and then a name (no spaces).
194 * --uninstall follows the exact same rules a --install.
196 * --service is used when the program is executed by the service
197 * control manager, and in normal circumstances would never be
198 * used as a command line argument.
200 * Revision 1.96 2006/08/15 20:12:36 david__schmidt
201 * Windows service integration
203 * Revision 1.95 2006/08/03 02:46:41 david__schmidt
204 * Incorporate Fabian Keil's patch work:
205 http://www.fabiankeil.de/sourcecode/privoxy/
207 * Revision 1.94 2006/07/18 14:48:46 david__schmidt
208 * Reorganizing the repository: swapping out what was HEAD (the old 3.1 branch)
209 * with what was really the latest development (the v_3_0_branch branch)
211 * Revision 1.92.2.16 2005/04/03 20:10:50 david__schmidt
212 * Thanks to Jindrich Makovicka for a race condition fix for the log
213 * file. The race condition remains for non-pthread implementations.
214 * Reference patch #1175720.
216 * Revision 1.92.2.15 2004/10/03 12:53:32 david__schmidt
217 * Add the ability to check jpeg images for invalid
218 * lengths of comment blocks. Defensive strategy
219 * against the exploit:
220 * Microsoft Security Bulletin MS04-028
221 * Buffer Overrun in JPEG Processing (GDI+) Could
222 * Allow Code Execution (833987)
223 * Enabled with +inspect-jpegs in actions files.
225 * Revision 1.92.2.14 2003/12/12 12:52:53 oes
226 * - Fixed usage info for non-unix platforms
227 * - Fixed small cmdline parsing bug
229 * Revision 1.92.2.13 2003/11/27 19:20:27 oes
230 * Diagnostics: Now preserve the returncode of pthread_create
231 * in errno. Closes BR #775721. Thanks to Geoffrey Hausheer.
233 * Revision 1.92.2.12 2003/07/11 11:34:19 oes
234 * No longer ignore SIGCHLD. Fixes bug #769381
236 * Revision 1.92.2.11 2003/05/14 12:32:02 oes
237 * Close jarfile on graceful exit, remove stray line
239 * Revision 1.92.2.10 2003/05/08 15:13:46 oes
240 * Cosmetics: Killed a warning, a typo and an allocation left at exit
242 * Revision 1.92.2.9 2003/04/03 15:08:42 oes
243 * No longer rely on non-POSIX.1 extensions of getcwd().
246 * Revision 1.92.2.8 2003/03/31 13:12:32 oes
247 * Replaced setenv() by posix-compliant putenv()
248 * Thanks to Neil McCalden (nmcc AT users.sf.net).
250 * Revision 1.92.2.7 2003/03/17 16:48:59 oes
251 * Added chroot ability, thanks to patch by Sviatoslav Sviridov
253 * Revision 1.92.2.6 2003/03/11 11:55:00 oes
254 * Clean-up and extension of improvements for forked mode:
255 * - Child's return code now consists of flags RC_FLAG_*
256 * - Reporting toggle to parent now properly #ifdef'ed
257 * - Children now report blocking to parent. This enables
258 * statistics in forked mode
260 * Revision 1.92.2.5 2003/03/10 23:45:32 oes
261 * Fixed bug #700381: Non-Threaded version now capable of being toggled.
262 * Children now report having been toggled through _exit(17), parents
263 * watch for that code and toggle themselves if found.
265 * Revision 1.92.2.4 2003/03/07 03:41:04 david__schmidt
266 * Wrapping all *_r functions (the non-_r versions of them) with
267 * mutex semaphores for OSX. Hopefully this will take care of all
268 * of those pesky crash reports.
270 * Revision 1.92.2.3 2003/02/28 12:53:06 oes
271 * Fixed two mostly harmless mem leaks
273 * Revision 1.92.2.2 2002/11/20 14:37:47 oes
274 * Fix: Head of global clients list now initialized to NULL
276 * Revision 1.92.2.1 2002/09/25 14:52:24 oes
277 * Added basic support for OPTIONS and TRACE HTTP methods:
278 * - New interceptor direct_response() added in chat().
279 * - sed() moved to earlier in the process, so that the
280 * Host: header is evaluated before actions and forwarding
283 * Revision 1.92 2002/05/08 16:00:46 oes
284 * Chat's buffer handling:
285 * - Fixed bug with unchecked out-of-mem conditions
286 * while reading client request & server headers
287 * - No longer predict if the buffer limit will be exceeded
288 * in the next read -- check add_to_iob's new
289 * return code. If buffer couldn't be extended
290 * (policy or out-of-mem) while
291 * - reading from client: abort
292 * - reading server headers: send error page
293 * - buffering server body for filter: flush,
294 * and if that fails: send error page
296 * Revision 1.91 2002/04/08 20:35:58 swa
299 * Revision 1.90 2002/04/02 14:57:28 oes
300 * Made sending wafers independent of FEATURE_COOKIE_JAR
302 * Revision 1.89 2002/03/31 17:18:59 jongfoster
303 * Win32 only: Enabling STRICT to fix a VC++ compile warning.
305 * Revision 1.88 2002/03/27 14:32:43 david__schmidt
306 * More compiler warning message maintenance
308 * Revision 1.87 2002/03/26 22:29:54 swa
309 * we have a new homepage!
311 * Revision 1.86 2002/03/25 17:04:55 david__schmidt
312 * Workaround for closing the jarfile before load_config() comes around again
314 * Revision 1.85 2002/03/24 15:23:33 jongfoster
317 * Revision 1.84 2002/03/24 13:25:43 swa
318 * name change related issues
320 * Revision 1.83 2002/03/16 23:54:06 jongfoster
321 * Adding graceful termination feature, to help look for memory leaks.
322 * If you enable this (which, by design, has to be done by hand
323 * editing config.h) and then go to http://i.j.b/die, then the program
324 * will exit cleanly after the *next* request. It should free all the
325 * memory that was used.
327 * Revision 1.82 2002/03/13 00:27:05 jongfoster
330 * Revision 1.81 2002/03/12 01:42:50 oes
331 * Introduced modular filters
333 * Revision 1.80 2002/03/11 22:07:05 david__schmidt
334 * OS/2 port maintenance:
335 * - Fixed EMX build - it had decayed a little
336 * - Fixed inexplicable crash during FD_ZERO - must be due to a bad macro.
337 * substituted a memset for now.
339 * Revision 1.79 2002/03/09 20:03:52 jongfoster
340 * - Making various functions return int rather than size_t.
341 * (Undoing a recent change). Since size_t is unsigned on
342 * Windows, functions like read_socket that return -1 on
343 * error cannot return a size_t.
345 * THIS WAS A MAJOR BUG - it caused frequent, unpredictable
346 * crashes, and also frequently caused JB to jump to 100%
347 * CPU and stay there. (Because it thought it had just
348 * read ((unsigned)-1) == 4Gb of data...)
350 * - The signature of write_socket has changed, it now simply
351 * returns success=0/failure=nonzero.
353 * - Trying to get rid of a few warnings --with-debug on
354 * Windows, I've introduced a new type "jb_socket". This is
355 * used for the socket file descriptors. On Windows, this
356 * is SOCKET (a typedef for unsigned). Everywhere else, it's
357 * an int. The error value can't be -1 any more, so it's
358 * now JB_INVALID_SOCKET (which is -1 on UNIX, and in
359 * Windows it maps to the #define INVALID_SOCKET.)
361 * - The signature of bind_port has changed.
363 * Revision 1.78 2002/03/08 21:35:04 oes
364 * Added optional group supplement to --user option. Will now use default group of user if no group given
366 * Revision 1.77 2002/03/07 03:52:06 oes
367 * - Fixed compiler warnings etc
368 * - Improved handling of failed DNS lookups
370 * Revision 1.76 2002/03/06 22:54:35 jongfoster
371 * Automated function-comment nitpicking.
373 * Revision 1.75 2002/03/06 10:02:19 oes
374 * Fixed stupid bug when --user was not given
376 * Revision 1.74 2002/03/06 00:49:31 jongfoster
377 * Fixing warning on Windows
378 * Making #ifdefs that refer to the same variable consistently
379 * use #ifdef unix rather than mixing #ifdef unix & #ifndef OS2
381 * Revision 1.73 2002/03/05 23:57:30 hal9
382 * Stray character 's' on line 1618 was breaking build.
384 * Revision 1.72 2002/03/05 21:33:45 david__schmidt
385 * - Re-enable OS/2 building after new parms were added
386 * - Fix false out of memory report when resolving CGI templates when no IP
387 * address is available of failed attempt (a la no such domain)
389 * Revision 1.71 2002/03/05 18:13:56 oes
390 * Added --user option
392 * Revision 1.70 2002/03/05 04:52:42 oes
393 * Deleted non-errlog debugging code
395 * Revision 1.69 2002/03/04 23:50:00 jongfoster
396 * Splitting off bind_port() call into bind_port_helper(), with
399 * Revision 1.68 2002/03/04 20:17:32 oes
402 * Revision 1.67 2002/03/04 18:18:57 oes
403 * - Removed _DEBUG mode
404 * - Cleand up cmdline parsing
405 * - Introduced --no-daemon, --pidfile options
406 * - Cleaned up signal handling:
407 * - Terminate cleanly on INT, TERM and ABRT
408 * - Schedule logfile for re-opening on HUP
409 * - Ignore CHLD and PIPE
410 * - Leave the rest with their default handlers
411 * - Uniform handler registration
412 * - Added usage() function
413 * - Played styleguide police
415 * Revision 1.66 2002/03/03 15:06:55 oes
416 * Re-enabled automatic config reloading
418 * Revision 1.65 2002/03/03 14:49:11 oes
419 * Fixed CLF logging: Now uses client's original HTTP request
421 * Revision 1.64 2002/03/03 09:18:03 joergs
422 * Made jumbjuster work on AmigaOS again.
424 * Revision 1.63 2002/03/02 04:14:50 david__schmidt
425 * Clean up a little CRLF unpleasantness that suddenly appeared
427 * Revision 1.62 2002/02/20 23:17:23 jongfoster
428 * Detecting some out-of memory conditions and exiting with a log message.
430 * Revision 1.61 2002/01/17 21:01:52 jongfoster
431 * Moving all our URL and URL pattern parsing code to urlmatch.c.
433 * Revision 1.60 2001/12/30 14:07:32 steudten
434 * - Add signal handling (unix)
435 * - Add SIGHUP handler (unix)
436 * - Add creation of pidfile (unix)
437 * - Add action 'top' in rc file (RH)
438 * - Add entry 'SIGNALS' to manpage
439 * - Add exit message to logfile (unix)
441 * Revision 1.59 2001/12/13 14:07:18 oes
442 * Fixed Bug: 503 error page now sent OK
444 * Revision 1.58 2001/11/30 23:37:24 jongfoster
445 * Renaming the Win32 config file to config.txt - this is almost the
446 * same as the corresponding UNIX name "config"
448 * Revision 1.57 2001/11/16 00:47:43 jongfoster
449 * Changing the tty-disconnection code to use setsid().
451 * Revision 1.56 2001/11/13 20:20:54 jongfoster
452 * Tabs->spaces, fixing a bug with missing {} around an if()
454 * Revision 1.55 2001/11/13 20:14:53 jongfoster
455 * Patch for FreeBSD setpgrp() as suggested by Alexander Lazic
457 * Revision 1.54 2001/11/07 00:03:14 steudten
458 * Give reliable return value if an error
459 * occurs not just 0 with new daemon mode.
461 * Revision 1.53 2001/11/05 21:41:43 steudten
462 * Add changes to be a real daemon just for unix os.
463 * (change cwd to /, detach from controlling tty, set
464 * process group and session leader to the own process.
466 * Add some fatal-error log message for failed malloc().
467 * Add '-d' if compiled with 'configure --with-debug' to
468 * enable debug output.
470 * Revision 1.52 2001/10/26 20:11:20 jongfoster
471 * Fixing type mismatch
473 * Revision 1.51 2001/10/26 17:38:28 oes
476 * Revision 1.50 2001/10/25 03:40:48 david__schmidt
477 * Change in porting tactics: OS/2's EMX porting layer doesn't allow multiple
478 * threads to call select() simultaneously. So, it's time to do a real, live,
479 * native OS/2 port. See defines for __EMX__ (the porting layer) vs. __OS2__
480 * (native). Both versions will work, but using __OS2__ offers multi-threading.
482 * Revision 1.49 2001/10/23 21:41:35 jongfoster
483 * Added call to initialize the (statically-allocated of course)
484 * "out of memory" CGI response.
486 * Revision 1.48 2001/10/10 19:56:46 jongfoster
487 * Moving some code that wasn't cookie-related out of an #ifdef
490 * Revision 1.47 2001/10/10 16:44:36 oes
491 * Added CONNECT destination port limitation check
493 * Revision 1.46 2001/10/08 15:17:41 oes
494 * Re-enabled SSL forwarding
496 * Revision 1.45 2001/10/07 15:42:11 oes
497 * Replaced 6 boolean members of csp with one bitmap (csp->flags)
499 * Moved downgrading of the HTTP version from parse_http_request to
500 * chat(), since we can't decide if it is necessary before we have
501 * determined the actions for the URL. The HTTP command is now
502 * *always* re-built so the repairs need no longer be special-cased.
504 * filter_popups now gets a csp pointer so it can raise the new
505 * CSP_FLAG_MODIFIED flag.
509 * Added configurable size limit for the IOB. If the IOB grows so
510 * large that the next read would exceed the limit, the header
511 * is generated, and the header & unfiltered buffer are flushed
512 * to the client. Chat then continues in non-buffering,
513 * non-filtering body mode.
515 * Revision 1.44 2001/10/02 18:13:57 oes
518 * Revision 1.43 2001/10/02 15:32:13 oes
519 * Moved generation of hdr
521 * Revision 1.42 2001/09/21 23:02:02 david__schmidt
522 * Cleaning up 2 compiler warnings on OS/2.
524 * Revision 1.41 2001/09/16 17:05:14 jongfoster
525 * Removing unused #include showarg.h
527 * Revision 1.40 2001/09/16 15:41:45 jongfoster
528 * Fixing signed/unsigned comparison warning.
530 * Revision 1.39 2001/09/16 13:21:27 jongfoster
531 * Changes to use new list functions.
533 * Revision 1.38 2001/09/16 13:01:46 jongfoster
534 * Removing redundant function call that zeroed zalloc()'d memory.
536 * Revision 1.37 2001/09/10 11:12:24 oes
537 * Deleted unused variable
539 * Revision 1.36 2001/09/10 10:56:15 oes
540 * Silenced compiler warnings
542 * Revision 1.35 2001/07/31 14:44:22 oes
543 * Deleted unused size parameter from filter_popups()
545 * Revision 1.34 2001/07/30 22:08:36 jongfoster
546 * Tidying up #defines:
547 * - All feature #defines are now of the form FEATURE_xxx
548 * - Permanently turned off WIN_GUI_EDIT
549 * - Permanently turned on WEBDAV and SPLIT_PROXY_ARGS
551 * Revision 1.33 2001/07/29 19:32:00 jongfoster
552 * Renaming _main() [mingw32 only] to real_main(), for ANSI compliance.
554 * Revision 1.32 2001/07/29 18:47:05 jongfoster
555 * Adding missing #include "loadcfg.h"
557 * Revision 1.31 2001/07/29 12:17:48 oes
558 * Applied pthread fix by Paul Lieverse
560 * Revision 1.30 2001/07/25 22:57:13 jongfoster
561 * __BEOS__ no longer overrides FEATURE_PTHREAD.
562 * This is because FEATURE_PTHREAD will soon be widely used, so I
563 * want to keep it simple.
565 * Revision 1.29 2001/07/24 12:47:06 oes
566 * Applied BeOS support update by Eugenia
568 * Revision 1.28 2001/07/23 13:26:12 oes
569 * Fixed bug in popup-killing for the first read that caused binary garbage to be sent between headers and body
571 * Revision 1.27 2001/07/19 19:09:47 haroon
572 * - Added code to take care of the situation where while processing the first
573 * server response (which includes the server header), after finding the end
574 * of the headers we were not looking past the end of the headers for
575 * content modification. I enabled it for filter_popups.
576 * Someone else should look to see if other similar operations should be
577 * done to the discarded portion of the buffer.
579 * Note 2001/07/20: No, the other content modification mechanisms will process
580 * the whole iob later anyway. --oes
582 * Revision 1.26 2001/07/18 12:31:36 oes
585 * Revision 1.25 2001/07/15 19:43:49 jongfoster
586 * Supports POSIX threads.
587 * Also removed some unused #includes.
589 * Revision 1.24 2001/07/13 14:00:40 oes
590 * - Generic content modification scheme:
591 * Each feature has its own applicability flag that is set
592 * from csp->action->flags.
593 * Replaced the "filtering" int flag , by a function pointer
594 * "content_filter" to the function that will do the content
595 * modification. If it is != NULL, the document will be buffered
596 * and processed through *content_filter, which must set
597 * csp->content_length and return a modified copy of the body
598 * or return NULL (on failiure).
599 * - Changed csp->is_text to the more generic bitmap csp->content_type
600 * which can currently take the valued CT_TEXT or CT_GIF
602 * - Removed all #ifdef PCRS
604 * Revision 1.23 2001/07/02 02:28:25 iwanttokeepanon
605 * Added "#ifdef ACL_FILES" conditional compilation to line 1291 to exclude
606 * the `block_acl' call. This prevents a compilation error when the user
607 * does not wish to use the "ACL" feature.
609 * Revision 1.22 2001/06/29 21:45:41 oes
610 * Indentation, CRLF->LF, Tab-> Space
612 * Revision 1.21 2001/06/29 13:29:36 oes
613 * - Cleaned up, improved comments
614 * - Unified all possible interceptors (CGI,
615 * block, trust, fast_redirect) in one
616 * place, with one (CGI) answer generation
617 * mechansim. Much clearer now.
618 * - Removed the GIF image generation, which
619 * is now done in filters.c:block_url()
620 * - Made error conditions like domain lookup
621 * failiure or (various) problems while talking
622 * to the server use cgi.c:error_response()
623 * instead of generating HTML/HTTP in chat() (yuck!)
624 * - Removed logentry from cancelled commit
626 * Revision 1.20 2001/06/09 10:55:28 jongfoster
627 * Changing BUFSIZ ==> BUFFER_SIZE
629 * Revision 1.19 2001/06/07 23:12:52 jongfoster
630 * Replacing function pointer in struct gateway with a directly
631 * called function forwarded_connect().
632 * Replacing struct gateway with struct forward_spec
634 * Revision 1.18 2001/06/03 19:12:16 oes
635 * introduced new cgi handling
637 * Revision 1.17 2001/06/01 20:07:23 jongfoster
638 * Now uses action +image-blocker{} rather than config->tinygif
640 * Revision 1.16 2001/06/01 18:49:17 jongfoster
641 * Replaced "list_share" with "list" - the tiny memory gain was not
642 * worth the extra complexity.
644 * Revision 1.15 2001/05/31 21:24:47 jongfoster
645 * Changed "permission" to "action" throughout.
646 * Removed DEFAULT_USER_AGENT - it must now be specified manually.
647 * Moved vanilla wafer check into chat(), since we must now
648 * decide whether or not to add it based on the URL.
650 * Revision 1.14 2001/05/29 20:14:01 joergs
651 * AmigaOS bugfix: PCRS needs a lot of stack, stacksize for child threads
654 * Revision 1.13 2001/05/29 09:50:24 jongfoster
655 * Unified blocklist/imagelist/permissionslist.
656 * File format is still under discussion, but the internal changes
659 * Also modified interceptor behaviour:
660 * - We now intercept all URLs beginning with one of the following
661 * prefixes (and *only* these prefixes):
663 * * http://ijbswa.sf.net/config/
664 * * http://ijbswa.sourceforge.net/config/
665 * - New interceptors "home page" - go to http://i.j.b/ to see it.
666 * - Internal changes so that intercepted and fast redirect pages
667 * are not replaced with an image.
668 * - Interceptors now have the option to send a binary page direct
669 * to the client. (i.e. ijb-send-banner uses this)
670 * - Implemented show-url-info interceptor. (Which is why I needed
671 * the above interceptors changes - a typical URL is
672 * "http://i.j.b/show-url-info?url=www.somesite.com/banner.gif".
673 * The previous mechanism would not have intercepted that, and
674 * if it had been intercepted then it then it would have replaced
677 * Revision 1.12 2001/05/27 22:17:04 oes
679 * - re_process_buffer no longer writes the modified buffer
680 * to the client, which was very ugly. It now returns the
681 * buffer, which it is then written by chat.
683 * - content_length now adjusts the Content-Length: header
684 * for modified documents rather than crunch()ing it.
685 * (Length info in csp->content_length, which is 0 for
686 * unmodified documents)
688 * - For this to work, sed() is called twice when filtering.
690 * Revision 1.11 2001/05/26 17:27:53 jongfoster
691 * Added support for CLF and fixed LOG_LEVEL_LOG.
692 * Also did CRLF->LF fix of my previous patch.
694 * Revision 1.10 2001/05/26 15:26:15 jongfoster
695 * ACL feature now provides more security by immediately dropping
696 * connections from untrusted hosts.
698 * Revision 1.9 2001/05/26 00:28:36 jongfoster
699 * Automatic reloading of config file.
700 * Removed obsolete SIGHUP support (Unix) and Reload menu option (Win32).
701 * Most of the global variables have been moved to a new
702 * struct configuration_spec, accessed through csp->config->globalname
703 * Most of the globals remaining are used by the Win32 GUI.
705 * Revision 1.8 2001/05/25 22:43:18 jongfoster
706 * Fixing minor memory leak and buffer overflow.
708 * Revision 1.7 2001/05/25 22:34:30 jongfoster
711 * Revision 1.6 2001/05/23 00:13:58 joergs
712 * AmigaOS support fixed.
714 * Revision 1.5 2001/05/22 18:46:04 oes
716 * - Enabled filtering banners by size rather than URL
717 * by adding patterns that replace all standard banner
718 * sizes with the "Junkbuster" gif to the re_filterfile
720 * - Enabled filtering WebBugs by providing a pattern
721 * which kills all 1x1 images
723 * - Added support for PCRE_UNGREEDY behaviour to pcrs,
724 * which is selected by the (nonstandard and therefore
725 * capital) letter 'U' in the option string.
726 * It causes the quantifiers to be ungreedy by default.
727 * Appending a ? turns back to greedy (!).
729 * - Added a new interceptor ijb-send-banner, which
730 * sends back the "Junkbuster" gif. Without imagelist or
731 * MSIE detection support, or if tinygif = 1, or the
732 * URL isn't recognized as an imageurl, a lame HTML
733 * explanation is sent instead.
735 * - Added new feature, which permits blocking remote
736 * script redirects and firing back a local redirect
738 * The feature is conditionally compiled, i.e. it
739 * can be disabled with --disable-fast-redirects,
740 * plus it must be activated by a "fast-redirects"
741 * line in the config file, has its own log level
742 * and of course wants to be displayed by show-proxy-args
743 * Note: Boy, all the #ifdefs in 1001 locations and
744 * all the fumbling with configure.in and acconfig.h
745 * were *way* more work than the feature itself :-(
747 * - Because a generic redirect template was needed for
748 * this, tinygif = 3 now uses the same.
750 * - Moved GIFs, and other static HTTP response templates
755 * - Removed some >400 CRs again (Jon, you really worked
758 * Revision 1.4 2001/05/21 19:34:01 jongfoster
759 * Made failure to bind() a fatal error.
761 * Revision 1.3 2001/05/20 01:21:20 jongfoster
762 * Version 2.9.4 checkin.
763 * - Merged popupfile and cookiefile, and added control over PCRS
764 * filtering, in new "permissionsfile".
765 * - Implemented LOG_LEVEL_FATAL, so that if there is a configuration
766 * file error you now get a message box (in the Win32 GUI) rather
767 * than the program exiting with no explanation.
768 * - Made killpopup use the PCRS MIME-type checking and HTTP-header
770 * - Removed tabs from "config"
771 * - Moved duplicated url parsing code in "loaders.c" to a new funcition.
772 * - Bumped up version number.
774 * Revision 1.2 2001/05/17 22:34:44 oes
775 * - Added hint on GIF char array generation to jcc.c
776 * - Cleaned CRLF's from the sources and related files
777 * - Repaired logging for REF and FRC
779 * Revision 1.1.1.1 2001/05/15 13:58:56 oes
780 * Initial import of version 2.9.3 source tree
783 *********************************************************************/
789 #include <sys/types.h>
798 # ifndef FEATURE_PTHREAD
802 # include <windows.h>
803 # include <process.h>
804 # endif /* ndef FEATURE_PTHREAD */
807 # ifndef _WIN_CONSOLE
809 # endif /* ndef _WIN_CONSOLE */
810 # include "w32svrapi.h"
812 #else /* ifndef _WIN32 */
814 # if !defined (__OS2__)
816 # include <sys/wait.h>
817 # endif /* ndef __OS2__ */
818 # include <sys/time.h>
819 # include <sys/stat.h>
820 # include <sys/ioctl.h>
823 #include <sys/termios.h>
834 # include <socket.h> /* BeOS has select() for sockets only. */
835 # include <OS.h> /* declarations for threads and stuff. */
838 # if defined(__EMX__) || defined(__OS2__)
839 # include <sys/select.h> /* OS/2/EMX needs a little help with select */
844 #define bzero(B,N) memset(B,0x00,n)
859 #include "killpopup.h"
860 #include "miscutil.h"
862 #include "jbsockets.h"
867 #include "urlmatch.h"
869 const char jcc_h_rcs[] = JCC_H_VERSION;
870 const char project_h_rcs[] = PROJECT_H_VERSION;
873 struct client_state clients[1];
874 struct file_list files[1];
876 #ifdef FEATURE_STATISTICS
877 int urls_read = 0; /* total nr of urls read inc rejected */
878 int urls_rejected = 0; /* total nr of urls rejected */
879 #endif /* def FEATURE_STATISTICS */
881 #ifdef FEATURE_GRACEFUL_TERMINATION
885 static void listen_loop(void);
886 static void chat(struct client_state *csp);
888 void serve(struct client_state *csp);
889 #else /* ifndef AMIGA */
890 static void serve(struct client_state *csp);
891 #endif /* def AMIGA */
894 static int32 server_thread(void *data);
895 #endif /* def __BEOS__ */
898 #define sleep(N) Sleep(((N) * 1000))
902 #define sleep(N) DosSleep(((N) * 100))
905 #ifdef FEATURE_PTHREAD
906 pthread_mutex_t log_mutex;
907 pthread_mutex_t log_init_mutex;
909 #ifndef HAVE_GMTIME_R
910 pthread_mutex_t gmtime_mutex;
911 #endif /* ndef HAVE_GMTIME_R */
913 #ifndef HAVE_LOCALTIME_R
914 pthread_mutex_t localtime_mutex;
915 #endif /* ndef HAVE_GMTIME_R */
917 #ifndef HAVE_GETHOSTBYADDR_R
918 pthread_mutex_t gethostbyaddr_mutex;
919 #endif /* ndef HAVE_GETHOSTBYADDR_R */
921 #ifndef HAVE_GETHOSTBYNAME_R
922 pthread_mutex_t gethostbyname_mutex;
923 #endif /* ndef HAVE_GETHOSTBYNAME_R */
926 pthread_mutex_t rand_mutex;
927 #endif /* ndef HAVE_RANDOM */
929 #endif /* FEATURE_PTHREAD */
931 #if defined(unix) || defined(__EMX__)
932 const char *basedir = NULL;
933 const char *pidfile = NULL;
934 int received_hup_signal = 0;
935 #endif /* defined unix */
937 /* The vanilla wafer. */
938 static const char VANILLA_WAFER[] =
939 "NOTICE=TO_WHOM_IT_MAY_CONCERN_"
940 "Do_not_send_me_any_copyrighted_information_other_than_the_"
941 "document_that_I_am_requesting_or_any_of_its_necessary_components._"
942 "In_particular_do_not_send_me_any_cookies_that_"
943 "are_subject_to_a_claim_of_copyright_by_anybody._"
944 "Take_notice_that_I_refuse_to_be_bound_by_any_license_condition_"
945 "(copyright_or_otherwise)_applying_to_any_cookie._";
947 /* HTTP snipplets. */
948 const char CSUCCEED[] =
949 "HTTP/1.0 200 Connection established\n"
950 "Proxy-Agent: Privoxy/" VERSION "\r\n\r\n";
952 const char CHEADER[] =
953 "HTTP/1.0 400 Invalid header received from browser\r\n"
954 "Connection: close\r\n\r\n"
955 "Invalid header received from browser.\r\n";
957 const char CFORBIDDEN[] =
958 "HTTP/1.0 403 Connection not allowable\r\n"
959 "Proxy-Agent: Privoxy " VERSION "\r\n"
960 "X-Hint: If you read this message interactively, then you know why this happens ,-)\r\n"
961 "Connection: close\r\n\r\n";
963 const char FTP_RESPONSE[] =
964 "HTTP/1.0 400 Invalid request received from browser\r\n"
965 "Connection: close\r\n\r\n"
966 "Invalid request. Privoxy doesn't support FTP.\r\n";
968 const char GOPHER_RESPONSE[] =
969 "HTTP/1.0 400 Invalid request received from browser\r\n"
970 "Connection: close\r\n\r\n"
971 "Invalid request. Privoxy doesn't support gopher.\r\n";
973 /* XXX: should be a template */
974 const char MISSING_DESTINATION_RESPONSE[] =
975 "HTTP/1.0 400 Bad request received from browser\r\n"
976 "Proxy-Agent: Privoxy " VERSION "\r\n"
977 "Connection: close\r\n\r\n"
978 "Bad request. Privoxy was unable to extract the destination.\r\n";
980 /* XXX: should be a template */
981 const char NO_SERVER_DATA_RESPONSE[] =
982 "HTTP/1.0 502 Server or forwarder response empty\r\n"
983 "Proxy-Agent: Privoxy " VERSION "\r\n"
984 "Connection: close\r\n\r\n"
985 "Empty server or forwarder response.\r\n"
986 "The connection was closed without sending any data.\r\n";
988 /* XXX: should be a template */
989 const char NULL_BYTE_RESPONSE[] =
990 "HTTP/1.0 400 Bad request received from browser\r\n"
991 "Proxy-Agent: Privoxy " VERSION "\r\n"
992 "Connection: close\r\n\r\n"
993 "Bad request. Null byte(s) before end of request.\r\n";
995 #if !defined(_WIN32) && !defined(__OS2__) && !defined(AMIGA)
996 /*********************************************************************
998 * Function : sig_handler
1000 * Description : Signal handler for different signals.
1001 * Exit gracefully on TERM and INT
1002 * or set a flag that will cause the errlog
1003 * to be reopened by the main thread on HUP.
1006 * 1 : the_signal = the signal cause this function to call
1010 *********************************************************************/
1011 static void sig_handler(int the_signal)
1017 log_error(LOG_LEVEL_INFO, "exiting by signal %d .. bye", the_signal);
1028 received_hup_signal = 1;
1033 * We shouldn't be here, unless we catch signals
1034 * in main() that we can't handle here!
1036 log_error(LOG_LEVEL_FATAL, "sig_handler: exiting on unexpected signal %d", the_signal);
1044 /*********************************************************************
1046 * Function : client_protocol_is_unsupported
1048 * Description : Checks if the client used a known unsupported
1049 * protocol and deals with it by sending an error
1053 * 1 : csp = Current client state (buffers, headers, etc...)
1054 * 2 : req = the first request line send by the client
1056 * Returns : TRUE if an error response has been generated, or
1057 * FALSE if the request doesn't look invalid.
1059 *********************************************************************/
1060 int client_protocol_is_unsupported(const struct client_state *csp, char *req)
1062 char buf[BUFFER_SIZE];
1065 * If it's a FTP or gopher request, we don't support it.
1067 * These checks are better than nothing, but they might
1068 * not work in all configurations and some clients might
1069 * have problems digesting the answer.
1071 * They should, however, never cause more problems than
1072 * Privoxy's old behaviour (returning the misleading HTML
1075 * "Could not resolve http://(ftp|gopher)://example.org").
1077 if (!strncmpic(req, "GET ftp://", 10) || !strncmpic(req, "GET gopher://", 13))
1079 if (!strncmpic(req, "GET ftp://", 10))
1081 strcpy(buf, FTP_RESPONSE);
1082 log_error(LOG_LEVEL_ERROR, "%s tried to use Privoxy as FTP proxy: %s",
1083 csp->ip_addr_str, req);
1087 strcpy(buf, GOPHER_RESPONSE);
1088 log_error(LOG_LEVEL_ERROR, "%s tried to use Privoxy as gopher proxy: %s",
1089 csp->ip_addr_str, req);
1091 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0", csp->ip_addr_str, req);
1093 write_socket(csp->cfd, buf, strlen(buf));
1102 /*********************************************************************
1104 * Function : get_request_destination_elsewhere
1106 * Description : If the client's request was redirected into
1107 * Privoxy without the client's knowledge,
1108 * the request line lacks the destination host.
1110 * This function tries to get it elsewhere,
1111 * provided accept-intercepted-requests is enabled.
1113 * "Elsewhere" currently only means "Host: header",
1114 * but in the future we may ask the redirecting
1115 * packet filter to look the destination up.
1117 * If the destination stays unknown, an error
1118 * response is send to the client and headers
1119 * are freed so that chat() can return directly.
1122 * 1 : csp = Current client state (buffers, headers, etc...)
1123 * 2 : headers = a header list
1125 * Returns : JB_ERR_OK if the destination is now known, or
1126 * JB_ERR_PARSE if it isn't.
1128 *********************************************************************/
1129 jb_err get_request_destination_elsewhere(struct client_state *csp, struct list *headers)
1131 char buf[BUFFER_SIZE];
1134 if (!(csp->config->feature_flags & RUNTIME_FEATURE_ACCEPT_INTERCEPTED_REQUESTS))
1136 log_error(LOG_LEVEL_ERROR, "%s's request: \'%s\' is invalid."
1137 " Privoxy isn't configured to accept intercepted requests.",
1138 csp->ip_addr_str, csp->http->cmd);
1139 /* XXX: Use correct size */
1140 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
1141 csp->ip_addr_str, csp->http->cmd);
1143 strcpy(buf, CHEADER);
1144 write_socket(csp->cfd, buf, strlen(buf));
1145 destroy_list(headers);
1147 return JB_ERR_PARSE;
1149 else if (JB_ERR_OK == get_destination_from_headers(headers, csp->http))
1151 /* Split the domain we just got for pattern matching */
1152 init_domain_components(csp->http);
1158 /* We can't work without destination. Go spread the news.*/
1160 req = list_to_text(headers);
1162 /* XXX: Use correct size */
1163 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
1164 csp->ip_addr_str, csp->http->cmd);
1165 log_error(LOG_LEVEL_ERROR,
1166 "Privoxy was unable to get the destination for %s's request:\n%s\n%s",
1167 csp->ip_addr_str, csp->http->cmd, req);
1170 strcpy(buf, MISSING_DESTINATION_RESPONSE);
1171 write_socket(csp->cfd, buf, strlen(buf));
1172 destroy_list(headers);
1174 return JB_ERR_PARSE;
1177 * TODO: If available, use PF's ioctl DIOCNATLOOK as last resort
1178 * to get the destination IP address, use it as host directly
1179 * or do a reverse DNS lookup first.
1184 /*********************************************************************
1186 * Function : get_server_headers
1188 * Description : Parses server headers in iob and fills them
1189 * into csp->headers so that they can later be
1193 * 1 : csp = Current client state (buffers, headers, etc...)
1195 * Returns : JB_ERR_OK if everything went fine, or
1196 * JB_ERR_PARSE if the headers were incomplete.
1198 *********************************************************************/
1199 jb_err get_server_headers(struct client_state *csp)
1201 int continue_hack_in_da_house = 0;
1204 while (((header = get_header(csp)) != NULL) || continue_hack_in_da_house)
1209 * continue hack in da house. Ignore the ending of
1210 * this head and continue enlisting header lines.
1211 * The reason is described below.
1213 enlist(csp->headers, "");
1214 continue_hack_in_da_house = 0;
1217 else if (0 == strncmpic(header, "HTTP/1.1 100", 12))
1220 * It's a bodyless continue response, don't
1221 * stop header parsing after reaching it's end.
1223 * As a result Privoxy will concatenate the
1224 * next response's head and parse and deliver
1225 * the headers as if they belonged to one request.
1227 * The client will separate them because of the
1228 * empty line between them.
1230 * XXX: What we're doing here is clearly against
1231 * the intended purpose of the continue header,
1232 * and under some conditions (HTTP/1.0 client request)
1233 * it's a standard violation.
1235 * Anyway, "sort of against the spec" is preferable
1236 * to "always getting confused by Continue responses"
1237 * (Privoxy's behaviour before this hack was added)
1239 log_error(LOG_LEVEL_HEADER, "Continue hack in da house.");
1240 continue_hack_in_da_house = 1;
1242 else if (*header == '\0')
1245 * If the header is empty, but the Continue hack
1246 * isn't active, we can assume that we reached the
1247 * end of the buffer before we hit the end of the
1250 * Inform the caller an let it decide how to handle it.
1252 return JB_ERR_PARSE;
1256 if (JB_ERR_MEMORY == enlist(csp->headers, header))
1259 * XXX: Should we quit the request and return a
1260 * out of memory error page instead?
1262 log_error(LOG_LEVEL_ERROR,
1263 "Out of memory while enlisting server headers. %s lost.",
1273 /*********************************************************************
1275 * Function : crunch_reason
1277 * Description : Translates the crunch reason code into a string.
1280 * 1 : rsp = a http_response
1282 * Returns : A string with the crunch reason or an error description.
1284 *********************************************************************/
1285 const char *crunch_reason(const struct http_response *rsp)
1287 char * reason = NULL;
1289 assert(rsp != NULL);
1292 return "Internal error while searching for crunch reason";
1295 switch (rsp->reason)
1297 case RSP_REASON_UNSUPPORTED:
1298 reason = "Unsupported HTTP feature";
1300 case RSP_REASON_BLOCKED:
1303 case RSP_REASON_UNTRUSTED:
1304 reason = "Untrusted";
1306 case RSP_REASON_REDIRECTED:
1307 reason = "Redirected";
1309 case RSP_REASON_CGI_CALL:
1310 reason = "CGI Call";
1312 case RSP_REASON_NO_SUCH_DOMAIN:
1313 reason = "DNS failure";
1315 case RSP_REASON_FORWARDING_FAILED:
1316 reason = "Forwarding failed";
1318 case RSP_REASON_CONNECT_FAILED:
1319 reason = "Connection failure";
1321 case RSP_REASON_OUT_OF_MEMORY:
1322 reason = "Out of memory (may mask other reasons)";
1325 reason = "No reason recorded";
1333 /*********************************************************************
1335 * Function : send_crunch_response
1337 * Description : Delivers already prepared response for
1338 * intercepted requests, logs the interception
1339 * and frees the response.
1342 * 1 : csp = Current client state (buffers, headers, etc...)
1343 * 1 : rsp = Fully prepared response. Will be freed on exit.
1345 * Returns : Nothing.
1347 *********************************************************************/
1348 void send_crunch_response(struct client_state *csp, struct http_response *rsp)
1350 const struct http_request *http = csp->http;
1351 char status_code[4];
1353 assert(rsp != NULL);
1354 assert(rsp->head != NULL);
1359 * Not supposed to happen. If it does
1360 * anyway, treat it as an unknown error.
1362 cgi_error_unknown(csp, rsp, RSP_REASON_INTERNAL_ERROR);
1363 /* return code doesn't matter */
1368 /* If rsp is still NULL, we have serious internal problems. */
1369 log_error(LOG_LEVEL_FATAL,
1370 "NULL response in send_crunch_response and cgi_error_unknown failed as well.");
1374 * Extract the status code from the actual head
1375 * that was send to the client. It is the only
1376 * way to get it right for all requests, including
1377 * the fixed ones for out-of-memory problems.
1379 * A head starts like this: 'HTTP/1.1 200...'
1383 status_code[0] = rsp->head[9];
1384 status_code[1] = rsp->head[10];
1385 status_code[2] = rsp->head[11];
1386 status_code[3] = '\0';
1388 /* Write the answer to the client */
1389 if (write_socket(csp->cfd, rsp->head, rsp->head_length)
1390 || write_socket(csp->cfd, rsp->body, rsp->content_length))
1392 /* There is nothing we can do about it. */
1393 log_error(LOG_LEVEL_ERROR, "write to: %s failed: %E", csp->http->host);
1396 /* Log that the request was crunched and why. */
1397 log_error(LOG_LEVEL_GPC, "%s%s crunch! (%s)",
1398 http->hostport, http->path, crunch_reason(rsp));
1399 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" %s %d",
1400 csp->ip_addr_str, http->ocmd, status_code, rsp->content_length);
1402 /* Clean up and return */
1403 if (cgi_error_memory() != rsp)
1405 free_http_response(rsp);
1411 /*********************************************************************
1413 * Function : request_contains_null_bytes
1415 * Description : Checks for NULL bytes in the request and sends
1416 * an error message to the client if any were found.
1419 * 1 : csp = Current client state (buffers, headers, etc...)
1420 * 2 : buf = Data from the client's request to check.
1421 * 3 : len = The data length.
1423 * Returns : TRUE if the request contained one or more NULL bytes, or
1426 *********************************************************************/
1427 int request_contains_null_bytes(const struct client_state *csp, char *buf, int len)
1429 size_t c_len; /* Request lenght when treated as C string */
1431 c_len = strlen(buf);
1436 * Null byte(s) found. Log the request,
1437 * return an error response and hang up.
1439 size_t tmp_len = c_len;
1444 * Replace NULL byte(s) with '°' characters
1445 * so the request can be logged as string.
1446 * XXX: Is there a better replacement character?
1449 tmp_len += strlen(buf+tmp_len);
1450 } while (tmp_len < len);
1452 log_error(LOG_LEVEL_ERROR, "%s\'s request contains at least one NULL byte "
1453 "(length=%d, strlen=%d).", csp->ip_addr_str, len, c_len);
1454 log_error(LOG_LEVEL_HEADER,
1455 "Offending request data with NULL bytes turned into \'°\' characters: %s", buf);
1457 strcpy(buf, NULL_BYTE_RESPONSE);
1458 write_socket(csp->cfd, buf, strlen(buf));
1460 /* XXX: Log correct size */
1461 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request\" 400 0", csp->ip_addr_str);
1470 /*********************************************************************
1474 * Description : Once a connection to the client has been accepted,
1475 * this function is called (via serve()) to handle the
1476 * main business of the communication. When this
1477 * function returns, the caller must close the client
1480 * FIXME: chat is nearly thousand lines long.
1484 * 1 : csp = Current client state (buffers, headers, etc...)
1486 * Returns : On success, the number of bytes written are returned (zero
1487 * indicates nothing was written). On error, -1 is returned,
1488 * and errno is set appropriately. If count is zero and the
1489 * file descriptor refers to a regular file, 0 will be
1490 * returned without causing any other effect. For a special
1491 * file, the results are not portable.
1493 *********************************************************************/
1494 static void chat(struct client_state *csp)
1497 * This next lines are a little ugly, but they simplifies the if statements
1498 * below. Basically if TOGGLE, then we want the if to test if the
1499 * CSP_FLAG_TOGGLED_ON flag ist set, else we don't. And if FEATURE_FORCE_LOAD,
1500 * then we want the if to test for CSP_FLAG_FORCED , else we don't
1502 #ifdef FEATURE_TOGGLE
1503 # define IS_TOGGLED_ON_AND (csp->flags & CSP_FLAG_TOGGLED_ON) &&
1504 #else /* ifndef FEATURE_TOGGLE */
1505 # define IS_TOGGLED_ON_AND
1506 #endif /* ndef FEATURE_TOGGLE */
1507 #ifdef FEATURE_FORCE_LOAD
1508 # define IS_NOT_FORCED_AND !(csp->flags & CSP_FLAG_FORCED) &&
1509 #else /* ifndef FEATURE_FORCE_LOAD */
1510 # define IS_NOT_FORCED_AND
1511 #endif /* def FEATURE_FORCE_LOAD */
1513 #define IS_ENABLED_AND IS_TOGGLED_ON_AND IS_NOT_FORCED_AND
1515 char buf[BUFFER_SIZE];
1523 int ms_iis5_hack = 0;
1524 size_t byte_count = 0;
1525 int forwarded_connect_retries = 0;
1526 int max_forwarded_connect_retries = csp->config->forwarded_connect_retries;
1527 const struct forward_spec * fwd;
1528 struct http_request *http;
1529 int len; /* for buffer sizes (and negative error codes) */
1530 #ifdef FEATURE_KILL_POPUPS
1531 int block_popups; /* bool, 1==will block popups */
1532 int block_popups_now = 0; /* bool, 1==currently blocking popups */
1533 #endif /* def FEATURE_KILL_POPUPS */
1535 int pcrs_filter; /* bool, 1==will filter through pcrs */
1536 int gif_deanimate; /* bool, 1==will deanimate gifs */
1537 int jpeg_inspect; /* bool, 1==will inspect jpegs */
1539 /* Function that does the content filtering for the current request */
1540 char *(*content_filter)() = NULL;
1542 /* Skeleton for HTTP response, if we should intercept the request */
1543 struct http_response *rsp;
1545 /* Temporary copy of the client's headers before they get enlisted in csp->headers */
1546 struct list header_list;
1547 struct list *headers = &header_list;
1551 memset(buf, 0, sizeof(buf));
1554 * Read the client's request. Note that since we're not using select() we
1555 * could get blocked here if a client connected, then didn't say anything!
1560 len = read_socket(csp->cfd, buf, sizeof(buf)-1);
1562 if (len <= 0) break; /* error! */
1564 if (request_contains_null_bytes(csp, buf, len))
1566 /* NULL bytes found and dealt with, just hang up. */
1571 * If there is no memory left for buffering the
1572 * request, there is nothing we can do but hang up
1574 if (add_to_iob(csp, buf, len))
1579 req = get_header(csp);
1583 break; /* no HTTP request! */
1588 continue; /* more to come! */
1591 /* Does the request line look invalid? */
1592 if (client_protocol_is_unsupported(csp, req))
1595 * Yes. The request has already been
1596 * answered with a error response, the buffers
1597 * were freed and we're done with chatting.
1602 #ifdef FEATURE_FORCE_LOAD
1604 * If this request contains the FORCE_PREFIX and blocks
1605 * aren't enforced, get rid of it and set the force flag.
1607 if (strstr(req, FORCE_PREFIX))
1609 if (csp->config->feature_flags & RUNTIME_FEATURE_ENFORCE_BLOCKS)
1611 log_error(LOG_LEVEL_FORCE,
1612 "Ignored force prefix in request: \"%s\".", req);
1616 strclean(req, FORCE_PREFIX);
1617 log_error(LOG_LEVEL_FORCE, "Enforcing request: \"%s\".", req);
1618 csp->flags |= CSP_FLAG_FORCED;
1622 #endif /* def FEATURE_FORCE_LOAD */
1624 switch( parse_http_request(req, http, csp) )
1627 log_error(LOG_LEVEL_ERROR, "Out of memory while parsing request.");
1630 log_error(LOG_LEVEL_ERROR, "Couldn't parse request: %s.", req);
1638 if (http->cmd == NULL)
1640 strcpy(buf, CHEADER);
1641 write_socket(csp->cfd, buf, strlen(buf));
1642 /* XXX: Use correct size */
1643 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request\" 400 0", csp->ip_addr_str);
1644 log_error(LOG_LEVEL_ERROR, "Invalid header received from %s.", csp->ip_addr_str);
1646 free_http_request(http);
1650 /* grab the rest of the client's headers */
1654 if ( ( ( p = get_header(csp) ) != NULL) && ( *p == '\0' ) )
1656 len = read_socket(csp->cfd, buf, sizeof(buf));
1659 log_error(LOG_LEVEL_ERROR, "read from client failed: %E");
1664 * If there is no memory left for buffering the
1665 * request, there is nothing we can do but hang up
1667 if (add_to_iob(csp, buf, len))
1674 if (p == NULL) break;
1681 if (http->host == NULL)
1684 * If we still don't know the request destination,
1685 * the request is invalid or the client uses
1686 * Privoxy without it's knowledge.
1688 if (JB_ERR_OK != get_request_destination_elsewhere(csp, headers))
1691 * Our attempts to get the request destination
1692 * elsewhere failed or Privoxy is configured
1693 * to only accept proxy requests.
1695 * An error response has already been send
1696 * and we're done here.
1702 /* decide how to route the HTTP request */
1704 if ((fwd = forward_url(http, csp)) == NULL)
1706 log_error(LOG_LEVEL_FATAL, "gateway spec is NULL!?!? This can't happen!");
1707 /* Never get here - LOG_LEVEL_FATAL causes program exit */
1710 /* build the http request to send to the server
1711 * we have to do one of the following:
1713 * create = use the original HTTP request to create a new
1714 * HTTP request that has either the path component
1715 * without the http://domainspec (w/path) or the
1716 * full orininal URL (w/url)
1717 * Note that the path and/or the HTTP version may
1718 * have been altered by now.
1720 * connect = Open a socket to the host:port of the server
1721 * and short-circuit server and client socket.
1723 * pass = Pass the request unchanged if forwarding a CONNECT
1724 * request to a parent proxy. Note that we'll be sending
1725 * the CFAIL message ourselves if connecting to the parent
1726 * fails, but we won't send a CSUCCEED message if it works,
1727 * since that would result in a double message (ours and the
1728 * parent's). After sending the request to the parent, we simply
1731 * here's the matrix:
1734 * +--------+--------+
1736 * 0 | create | connect|
1738 * Forwarding +--------+--------+
1740 * 1 | create | pass |
1742 * +--------+--------+
1747 * Determine the actions for this URL
1749 #ifdef FEATURE_TOGGLE
1750 if (!(csp->flags & CSP_FLAG_TOGGLED_ON))
1752 /* Most compatible set of actions (i.e. none) */
1753 init_current_action(csp->action);
1756 #endif /* ndef FEATURE_TOGGLE */
1758 url_actions(http, csp);
1763 * Check if a CONNECT request is allowable:
1764 * In the absence of a +limit-connect action, allow only port 443.
1765 * If there is an action, allow whatever matches the specificaton.
1769 if( ( !(csp->action->flags & ACTION_LIMIT_CONNECT) && csp->http->port != 443)
1770 || (csp->action->flags & ACTION_LIMIT_CONNECT
1771 && !match_portlist(csp->action->string[ACTION_STRING_LIMIT_CONNECT], csp->http->port)) )
1773 if (csp->action->flags & ACTION_TREAT_FORBIDDEN_CONNECTS_LIKE_BLOCKS)
1776 * The response may confuse some clients,
1777 * but makes unblocking easier.
1779 log_error(LOG_LEVEL_ERROR, "Marking suspicious CONNECT request from %s for blocking.",
1781 csp->action->flags |= ACTION_BLOCK;
1786 strcpy(buf, CFORBIDDEN);
1787 write_socket(csp->cfd, buf, strlen(buf));
1788 log_error(LOG_LEVEL_CONNECT, "Denying suspicious CONNECT request from %s", csp->ip_addr_str);
1789 log_error(LOG_LEVEL_CLF, "%s - - [%T] \" \" 403 0", csp->ip_addr_str);
1797 * Downgrade http version from 1.1 to 1.0 if +downgrade
1800 if ( (http->ssl == 0)
1801 && (!strcmpic(http->ver, "HTTP/1.1"))
1802 && (csp->action->flags & ACTION_DOWNGRADE))
1805 http->ver = strdup("HTTP/1.0");
1807 if (http->ver == NULL)
1809 log_error(LOG_LEVEL_FATAL, "Out of memory downgrading HTTP version");
1814 * Save a copy of the original request for logging
1816 http->ocmd = strdup(http->cmd);
1818 if (http->ocmd == NULL)
1820 log_error(LOG_LEVEL_FATAL, "Out of memory copying HTTP request line");
1824 * (Re)build the HTTP request for non-SSL requests.
1825 * If forwarding, use the whole URL, else, use only the path.
1831 http->cmd = strdup(http->gpc);
1832 string_append(&http->cmd, " ");
1834 if (fwd->forward_host)
1836 string_append(&http->cmd, http->url);
1840 string_append(&http->cmd, http->path);
1842 string_append(&http->cmd, " ");
1843 string_append(&http->cmd, http->ver);
1845 if (http->cmd == NULL)
1847 log_error(LOG_LEVEL_FATAL, "Out of memory writing HTTP command");
1849 log_error(LOG_LEVEL_HEADER, "New HTTP Request-Line: %s", http->cmd);
1851 enlist(csp->headers, http->cmd);
1853 /* Append the previously read headers */
1854 list_append_list_unique(csp->headers, headers);
1855 destroy_list(headers);
1858 * If the user has not supplied any wafers, and the user has not
1859 * told us to suppress the vanilla wafer, then send the vanilla wafer.
1861 if (list_is_empty(csp->action->multi[ACTION_MULTI_WAFER])
1862 && ((csp->action->flags & ACTION_VANILLA_WAFER) != 0))
1864 enlist(csp->action->multi[ACTION_MULTI_WAFER], VANILLA_WAFER);
1868 #ifdef FEATURE_KILL_POPUPS
1869 block_popups = ((csp->action->flags & ACTION_NO_POPUPS) != 0);
1870 #endif /* def FEATURE_KILL_POPUPS */
1872 pcrs_filter = (csp->rlist != NULL) && /* There are expressions to be used */
1873 (!list_is_empty(csp->action->multi[ACTION_MULTI_FILTER]));
1875 gif_deanimate = ((csp->action->flags & ACTION_DEANIMATE) != 0);
1877 jpeg_inspect = ((csp->action->flags & ACTION_JPEG_INSPECT) != 0);
1880 * We have a request. Now, check to see if we need to
1881 * intercept it, i.e. If ..
1885 /* We may not forward the request by rfc2616 sect 14.31 */
1886 (NULL != (rsp = direct_response(csp)))
1888 /* or we are enabled and... */
1889 || (IS_ENABLED_AND (
1891 /* ..the request was blocked */
1892 ( NULL != (rsp = block_url(csp)))
1894 /* ..or untrusted */
1895 #ifdef FEATURE_TRUST
1896 || ( NULL != (rsp = trust_url(csp)))
1897 #endif /* def FEATURE_TRUST */
1899 /* ..or a redirect kicked in */
1900 || ( NULL != (rsp = redirect_url(csp)))
1904 * .. or a CGI call was detected and answered.
1906 * This check comes last to give the user the power
1907 * to deny acces to some (or all) of the cgi pages.
1909 || (NULL != (rsp = dispatch_cgi(csp)))
1914 * Deliver, log and free the interception
1915 * response. Afterwards we're done here.
1917 send_crunch_response(csp, rsp);
1918 #ifdef FEATURE_STATISTICS
1919 /* Count as a rejected request */
1920 csp->flags |= CSP_FLAG_REJECTED;
1921 #endif /* def FEATURE_STATISTICS */
1926 hdr = sed(client_patterns, add_client_headers, csp);
1929 /* FIXME Should handle error properly */
1930 log_error(LOG_LEVEL_FATAL, "Out of memory parsing client header");
1933 list_remove_all(csp->headers);
1935 log_error(LOG_LEVEL_GPC, "%s%s", http->hostport, http->path);
1937 if (fwd->forward_host)
1939 log_error(LOG_LEVEL_CONNECT, "via %s:%d to: %s",
1940 fwd->forward_host, fwd->forward_port, http->hostport);
1944 log_error(LOG_LEVEL_CONNECT, "to %s", http->hostport);
1947 /* here we connect to the server, gateway, or the forwarder */
1949 while ( (csp->sfd = forwarded_connect(fwd, http, csp))
1950 && (errno == EINVAL) && (forwarded_connect_retries++ < max_forwarded_connect_retries))
1952 log_error(LOG_LEVEL_ERROR, "failed request #%u to connect to %s. Trying again.",
1953 forwarded_connect_retries, http->hostport);
1956 if (csp->sfd == JB_INVALID_SOCKET)
1958 if (fwd->type != SOCKS_NONE)
1961 rsp = error_response(csp, "forwarding-failed", errno);
1963 else if (errno == EINVAL)
1965 rsp = error_response(csp, "no-such-domain", errno);
1969 rsp = error_response(csp, "connect-failed", errno);
1970 log_error(LOG_LEVEL_CONNECT, "connect to: %s failed: %E",
1975 /* Write the answer to the client */
1978 send_crunch_response(csp, rsp);
1985 if (fwd->forward_host || (http->ssl == 0))
1987 /* write the client's (modified) header to the server
1988 * (along with anything else that may be in the buffer)
1991 if (write_socket(csp->sfd, hdr, strlen(hdr))
1992 || (flush_socket(csp->sfd, csp) < 0))
1994 log_error(LOG_LEVEL_CONNECT, "write header to: %s failed: %E",
1997 rsp = error_response(csp, "connect-failed", errno);
2001 send_crunch_response(csp, rsp);
2011 * We're running an SSL tunnel and we're not forwarding,
2012 * so just send the "connect succeeded" message to the
2013 * client, flush the rest, and get out of the way.
2015 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 0",
2016 csp->ip_addr_str, http->ocmd);
2018 if (write_socket(csp->cfd, CSUCCEED, sizeof(CSUCCEED)-1))
2026 log_error(LOG_LEVEL_CONNECT, "to %s successful", http->hostport);
2028 /* we're finished with the client's header */
2031 maxfd = ( csp->cfd > csp->sfd ) ? csp->cfd : csp->sfd;
2033 /* pass data between the client and server
2034 * until one or the other shuts down the connection.
2043 * FD_ZERO here seems to point to an errant macro which crashes.
2044 * So do this by hand for now...
2046 memset(&rfds,0x00,sizeof(fd_set));
2050 FD_SET(csp->cfd, &rfds);
2051 FD_SET(csp->sfd, &rfds);
2053 n = select((int)maxfd+1, &rfds, NULL, NULL, NULL);
2057 log_error(LOG_LEVEL_ERROR, "select() failed!: %E");
2061 /* this is the body of the browser's request
2062 * just read it and write it.
2065 if (FD_ISSET(csp->cfd, &rfds))
2067 len = read_socket(csp->cfd, buf, sizeof(buf));
2071 break; /* "game over, man" */
2074 if (write_socket(csp->sfd, buf, (size_t)len))
2076 log_error(LOG_LEVEL_ERROR, "write to: %s failed: %E", http->host);
2083 * The server wants to talk. It could be the header or the body.
2084 * If `hdr' is null, then it's the header otherwise it's the body.
2085 * FIXME: Does `hdr' really mean `host'? No.
2089 if (FD_ISSET(csp->sfd, &rfds))
2092 len = read_socket(csp->sfd, buf, sizeof(buf) - 1);
2096 log_error(LOG_LEVEL_ERROR, "read from: %s failed: %E", http->host);
2098 if (http->ssl && (fwd->forward_host == NULL))
2101 * Just hang up. We already confirmed the client's CONNECT
2102 * request with status code 200 and unencrypted content is
2103 * no longer welcome.
2105 log_error(LOG_LEVEL_ERROR,
2106 "CONNECT already confirmed. Unable to tell the client about the problem.");
2110 rsp = error_response(csp, "connect-failed", errno);
2114 send_crunch_response(csp, rsp);
2120 /* Add a trailing zero. This lets filter_popups
2121 * use string operations.
2125 #ifdef FEATURE_KILL_POPUPS
2126 /* Filter the popups on this read. */
2127 if (block_popups_now)
2129 filter_popups(buf, csp);
2131 #endif /* def FEATURE_KILL_POPUPS */
2133 /* Normally, this would indicate that we've read
2134 * as much as the server has sent us and we can
2135 * close the client connection. However, Microsoft
2136 * in its wisdom has released IIS/5 with a bug that
2137 * prevents it from sending the trailing \r\n in
2138 * a 302 redirect header (and possibly other headers).
2139 * To work around this if we've haven't parsed
2140 * a full header we'll append a trailing \r\n
2141 * and see if this now generates a valid one.
2143 * This hack shouldn't have any impacts. If we've
2144 * already transmitted the header or if this is a
2145 * SSL connection, then we won't bother with this
2146 * hack. So we only work on partially received
2147 * headers. If we append a \r\n and this still
2148 * doesn't generate a valid header, then we won't
2149 * transmit anything to the client.
2154 if (server_body || http->ssl)
2157 * If we have been buffering up the document,
2158 * now is the time to apply content modification
2159 * and send the result to the client.
2164 * If the content filter fails, use the original
2165 * buffer and length.
2166 * (see p != NULL ? p : csp->iob->cur below)
2168 if (NULL == (p = (*content_filter)(csp)))
2170 csp->content_length = (size_t)(csp->iob->eod - csp->iob->cur);
2173 hdr = sed(server_patterns_light, NULL, csp);
2177 /* FIXME Should handle error properly */
2178 log_error(LOG_LEVEL_FATAL, "Out of memory parsing server header");
2181 if (write_socket(csp->cfd, hdr, strlen(hdr))
2182 || write_socket(csp->cfd, p != NULL ? p : csp->iob->cur, csp->content_length))
2184 log_error(LOG_LEVEL_ERROR, "write modified content to client failed: %E");
2194 break; /* "game over, man" */
2198 * This is NOT the body, so
2199 * Let's pretend the server just sent us a blank line.
2201 snprintf(buf, sizeof(buf), "\r\n");
2202 len = (int)strlen(buf);
2205 * Now, let the normal header parsing algorithm below do its
2206 * job. If it fails, we'll exit instead of continuing.
2213 * If this is an SSL connection or we're in the body
2214 * of the server document, just write it to the client,
2215 * unless we need to buffer the body for later content-filtering
2218 if (server_body || http->ssl)
2223 * If there is no memory left for buffering the content, or the buffer limit
2224 * has been reached, switch to non-filtering mode, i.e. make & write the
2225 * header, flush the iob and buf, and get out of the way.
2227 if (add_to_iob(csp, buf, len))
2232 log_error(LOG_LEVEL_ERROR, "Flushing header and buffers. Stepping back from filtering.");
2234 hdr = sed(server_patterns, add_server_headers, csp);
2238 * Memory is too tight to even generate the header.
2239 * Send our static "Out-of-memory" page.
2241 log_error(LOG_LEVEL_ERROR, "Out of memory while trying to flush.");
2242 rsp = cgi_error_memory();
2243 send_crunch_response(csp, rsp);
2248 hdrlen = strlen(hdr);
2250 if (write_socket(csp->cfd, hdr, hdrlen)
2251 || ((flushed = flush_socket(csp->cfd, csp)) < 0)
2252 || (write_socket(csp->cfd, buf, (size_t)len)))
2254 log_error(LOG_LEVEL_CONNECT, "Flush header and buffers to client failed: %E");
2260 byte_count += hdrlen + (size_t)flushed + (size_t)len;
2262 content_filter = NULL;
2269 if (write_socket(csp->cfd, buf, (size_t)len))
2271 log_error(LOG_LEVEL_ERROR, "write to client failed: %E");
2275 byte_count += (size_t)len;
2280 /* we're still looking for the end of the
2281 * server's header ... (does that make header
2282 * parsing an "out of body experience" ?
2286 * buffer up the data we just read. If that fails,
2287 * there's little we can do but send our static
2288 * out-of-memory page.
2290 if (add_to_iob(csp, buf, len))
2292 log_error(LOG_LEVEL_ERROR, "Out of memory while looking for end of server headers.");
2293 rsp = cgi_error_memory();
2294 send_crunch_response(csp, rsp);
2299 /* Convert iob into something sed() can digest */
2300 if (JB_ERR_PARSE == get_server_headers(csp))
2304 /* Well, we tried our MS IIS/5
2305 * hack and it didn't work.
2306 * The header is incomplete
2307 * and there isn't anything
2308 * we can do about it.
2314 /* Since we have to wait for
2315 * more from the server before
2316 * we can parse the headers
2317 * we just continue here.
2323 /* Did we actually get anything? */
2324 if (NULL == csp->headers->first)
2326 log_error(LOG_LEVEL_ERROR, "Empty server or forwarder response.");
2327 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
2328 strcpy(buf, NO_SERVER_DATA_RESPONSE);
2329 write_socket(csp->cfd, buf, strlen(buf));
2330 free_http_request(http);
2334 /* we have now received the entire header.
2335 * filter it and send the result to the client
2338 hdr = sed(server_patterns, add_server_headers, csp);
2341 /* FIXME Should handle error properly */
2342 log_error(LOG_LEVEL_FATAL, "Out of memory parsing server header");
2345 #ifdef FEATURE_KILL_POPUPS
2346 /* Start blocking popups if appropriate. */
2348 if ((csp->content_type & CT_TEXT) && /* It's a text / * MIME-Type */
2349 !http->ssl && /* We talk plaintext */
2350 block_popups) /* Policy allows */
2352 block_popups_now = 1;
2354 * Filter the part of the body that came in the same read
2355 * as the last headers:
2357 filter_popups(csp->iob->cur, csp);
2360 #endif /* def FEATURE_KILL_POPUPS */
2362 /* Buffer and pcrs filter this if appropriate. */
2364 if ((csp->content_type & CT_TEXT) && /* It's a text / * MIME-Type */
2365 !http->ssl && /* We talk plaintext */
2366 pcrs_filter) /* Policy allows */
2368 content_filter = pcrs_filter_response;
2371 /* Buffer and gif_deanimate this if appropriate. */
2373 if ((csp->content_type & CT_GIF) && /* It's an image/gif MIME-Type */
2374 !http->ssl && /* We talk plaintext */
2375 gif_deanimate) /* Policy allows */
2377 content_filter = gif_deanimate_response;
2380 /* Buffer and jpg_inspect this if appropriate. */
2382 if ((csp->content_type & CT_JPEG) && /* It's an image/jpeg MIME-Type */
2383 !http->ssl && /* We talk plaintext */
2384 jpeg_inspect) /* Policy allows */
2386 content_filter = jpeg_inspect_response;
2390 * Only write if we're not buffering for content modification
2392 if (!content_filter)
2394 /* write the server's (modified) header to
2395 * the client (along with anything else that
2396 * may be in the buffer)
2399 if (write_socket(csp->cfd, hdr, strlen(hdr))
2400 || ((len = flush_socket(csp->cfd, csp)) < 0))
2402 log_error(LOG_LEVEL_CONNECT, "write header to client failed: %E");
2404 /* the write failed, so don't bother
2405 * mentioning it to the client...
2406 * it probably can't hear us anyway.
2412 byte_count += (size_t)len;
2415 /* we're finished with the server's header */
2420 /* If this was a MS IIS/5 hack then it means
2421 * the server has already closed the
2422 * connection. Nothing more to read. Time
2433 return; /* huh? we should never get here */
2436 if (csp->content_length == 0)
2439 * If Privoxy didn't recalculate the
2440 * Content-Lenght, byte_count is still
2443 csp->content_length = byte_count;
2446 log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 %d",
2447 csp->ip_addr_str, http->ocmd, csp->content_length);
2451 /*********************************************************************
2455 * Description : This is little more than chat. We only "serve" to
2456 * to close any socket that chat may have opened.
2459 * 1 : csp = Current client state (buffers, headers, etc...)
2463 *********************************************************************/
2465 void serve(struct client_state *csp)
2466 #else /* ifndef AMIGA */
2467 static void serve(struct client_state *csp)
2468 #endif /* def AMIGA */
2471 close_socket(csp->cfd);
2473 if (csp->sfd != JB_INVALID_SOCKET)
2475 close_socket(csp->sfd);
2478 csp->flags &= ~CSP_FLAG_ACTIVE;
2484 /*********************************************************************
2486 * Function : server_thread
2488 * Description : We only exist to call `serve' in a threaded environment.
2491 * 1 : data = Current client state (buffers, headers, etc...)
2493 * Returns : Always 0.
2495 *********************************************************************/
2496 static int32 server_thread(void *data)
2498 serve((struct client_state *) data);
2505 /*********************************************************************
2509 * Description : Print usage info & exit.
2511 * Parameters : Pointer to argv[0] for identifying ourselves
2515 *********************************************************************/
2516 void usage(const char *myname)
2518 printf("Privoxy version " VERSION " (" HOME_PAGE_URL ")\n"
2520 "Usage: %s [--help] [--version] [configfile]\n"
2522 "Usage: %s [--help] [--version] [--no-daemon] [--pidfile pidfile] [--user user[.group]] [configfile]\n"
2524 "Aborting.\n", myname);
2531 /*********************************************************************
2533 * Function : initialize_mutexes
2535 * Description : Prepares mutexes if mutex support is available.
2539 * Returns : Void, exits in case of errors.
2541 *********************************************************************/
2542 void initialize_mutexes()
2546 #ifdef FEATURE_PTHREAD
2548 * Prepare global mutex semaphores
2550 err = pthread_mutex_init(&log_mutex, 0);
2552 if (!err) err = pthread_mutex_init(&log_init_mutex, 0);
2555 * XXX: The assumptions below are a bit naive
2556 * and can cause locks that aren't necessary.
2558 * For example older FreeBSD versions (< 6.x?)
2559 * have no gethostbyname_r, but gethostbyname is
2562 #ifndef HAVE_GMTIME_R
2563 if (!err) err = pthread_mutex_init(&gmtime_mutex, 0);
2564 #endif /* ndef HAVE_GMTIME_R */
2566 #ifndef HAVE_LOCALTIME_R
2567 if (!err) err = pthread_mutex_init(&localtime_mutex, 0);
2568 #endif /* ndef HAVE_GMTIME_R */
2570 #ifndef HAVE_GETHOSTBYADDR_R
2571 if (!err) err = pthread_mutex_init(&gethostbyaddr_mutex, 0);
2572 #endif /* ndef HAVE_GETHOSTBYADDR_R */
2574 #ifndef HAVE_GETHOSTBYNAME_R
2575 if (!err) err = pthread_mutex_init(&gethostbyname_mutex, 0);
2576 #endif /* ndef HAVE_GETHOSTBYNAME_R */
2579 if (!err) err = pthread_mutex_init(&rand_mutex, 0);
2580 #endif /* ndef HAVE_RANDOM */
2581 #endif /* FEATURE_PTHREAD */
2584 * TODO: mutex support for mingw32 would be swell.
2589 printf("Fatal error. Mutex initialization failed: %s.\n",
2598 /*********************************************************************
2602 * Description : Load the config file and start the listen loop.
2603 * This function is a lot more *sane* with the `load_config'
2604 * and `listen_loop' functions; although it stills does
2605 * a *little* too much for my taste.
2608 * 1 : argc = Number of parameters (including $0).
2609 * 2 : argv = Array of (char *)'s to the parameters.
2611 * Returns : 1 if : can't open config file, unrecognized directive,
2612 * stats requested in multi-thread mode, can't open the
2613 * log file, can't open the jar file, listen port is invalid,
2614 * any load fails, and can't bind port.
2616 * Else main never returns, the process must be signaled
2617 * to terminate execution. Or, on Windows, use the
2618 * "File", "Exit" menu option.
2620 *********************************************************************/
2622 int real_main(int argc, const char *argv[])
2624 int main(int argc, const char *argv[])
2628 unsigned int random_seed;
2630 struct passwd *pw = NULL;
2631 struct group *grp = NULL;
2640 #if !defined(_WIN32)
2648 * Parse the command line arguments
2650 while (++argc_pos < argc)
2653 /* Check to see if the service must be installed or uninstalled */
2654 if (strncmp(argv[argc_pos], "--install", 9) == 0)
2656 const char *pName = argv[argc_pos] + 9;
2659 exit( (install_service(pName)) ? 0 : 1 );
2661 else if (strncmp(argv[argc_pos], "--uninstall", + 11) == 0)
2663 const char *pName = argv[argc_pos] + 11;
2666 exit((uninstall_service(pName)) ? 0 : 1);
2668 else if (strcmp(argv[argc_pos], "--service" ) == 0)
2670 bRunAsService = TRUE;
2671 w32_set_service_cwd();
2672 atexit(w32_service_exit_notify);
2675 #endif /* defined(_WIN32) */
2678 #if !defined(_WIN32) || defined(_WIN_CONSOLE)
2680 if (strcmp(argv[argc_pos], "--help") == 0)
2685 else if(strcmp(argv[argc_pos], "--version") == 0)
2687 printf("Privoxy version " VERSION " (" HOME_PAGE_URL ")\n");
2693 else if (strcmp(argv[argc_pos], "--no-daemon" ) == 0)
2698 else if (strcmp(argv[argc_pos], "--pidfile" ) == 0)
2700 if (++argc_pos == argc) usage(argv[0]);
2701 pidfile = strdup(argv[argc_pos]);
2704 else if (strcmp(argv[argc_pos], "--user" ) == 0)
2706 if (++argc_pos == argc) usage(argv[argc_pos]);
2708 if ((NULL != (p = strchr(argv[argc_pos], '.'))) && *(p + 1) != '0')
2711 if (NULL == (grp = getgrnam(p)))
2713 log_error(LOG_LEVEL_FATAL, "Group %s not found.", p);
2717 if (NULL == (pw = getpwnam(argv[argc_pos])))
2719 log_error(LOG_LEVEL_FATAL, "User %s not found.", argv[argc_pos]);
2722 if (p != NULL) *--p = '\0';
2725 else if (strcmp(argv[argc_pos], "--chroot" ) == 0)
2730 #endif /* defined(unix) */
2731 #endif /* defined(_WIN32) && !defined(_WIN_CONSOLE) */
2733 configfile = argv[argc_pos];
2736 } /* -END- while (more arguments) */
2739 if ( *configfile != '/' )
2741 char *abs_file, cwd[1024];
2743 /* make config-filename absolute here */
2744 if ( !(getcwd(cwd, sizeof(cwd))))
2746 perror("get working dir failed");
2750 if (!(basedir = strdup(cwd))
2751 || (!(abs_file = malloc( strlen( basedir ) + strlen( configfile ) + 5 ))))
2753 perror("malloc failed");
2756 strcpy( abs_file, basedir );
2757 strcat( abs_file, "/" );
2758 strcat( abs_file, configfile );
2759 configfile = abs_file;
2761 #endif /* defined unix */
2765 clients->next = NULL;
2769 #elif defined(_WIN32)
2773 /* Prepare mutexes if supported and necessary. */
2774 initialize_mutexes();
2776 random_seed = (unsigned int)time(NULL);
2778 srandom(random_seed);
2781 #endif /* ifdef HAVE_RANDOM */
2784 * Unix signal handling
2786 * Catch the abort, interrupt and terminate signals for a graceful exit
2787 * Catch the hangup signal so the errlog can be reopened.
2788 * Ignore the broken pipe signals (FIXME: Why?)
2790 #if !defined(_WIN32) && !defined(__OS2__) && !defined(AMIGA)
2793 const int catched_signals[] = { SIGTERM, SIGINT, SIGHUP, 0 };
2794 const int ignored_signals[] = { SIGPIPE, 0 };
2796 for (idx = 0; catched_signals[idx] != 0; idx++)
2798 #ifdef sun /* FIXME: Is it safe to check for HAVE_SIGSET instead? */
2799 if (sigset(catched_signals[idx], sig_handler) == SIG_ERR)
2801 if (signal(catched_signals[idx], sig_handler) == SIG_ERR)
2802 #endif /* ifdef sun */
2804 log_error(LOG_LEVEL_FATAL, "Can't set signal-handler for signal %d: %E", catched_signals[idx]);
2808 for (idx = 0; ignored_signals[idx] != 0; idx++)
2810 if (signal(ignored_signals[idx], SIG_IGN) == SIG_ERR)
2812 log_error(LOG_LEVEL_FATAL, "Can't set ignore-handler for signal %d: %E", ignored_signals[idx]);
2817 #else /* ifdef _WIN32 */
2818 # ifdef _WIN_CONSOLE
2820 * We *are* in a windows console app.
2821 * Print a verbose messages about FAQ's and such
2823 printf("%s", win32_blurb);
2824 # endif /* def _WIN_CONSOLE */
2825 #endif /* def _WIN32 */
2828 /* Initialize the CGI subsystem */
2829 cgi_init_error_messages();
2832 * If runnig on unix and without the --nodaemon
2833 * option, become a daemon. I.e. fork, detach
2834 * from tty and get process group leadership
2847 if ( pid < 0 ) /* error */
2852 else if ( pid != 0 ) /* parent */
2857 * must check for errors
2858 * child died due to missing files aso
2861 wpid = waitpid( pid, &status, WNOHANG );
2870 /* Should be more portable, but not as well tested */
2875 #else /* ndef __FreeBSD__ */
2877 #endif /* ndef __FreeBSD__ */
2878 fd = open("/dev/tty", O_RDONLY);
2881 /* no error check here */
2882 ioctl( fd, TIOCNOTTY,0 );
2886 /* FIXME: should close stderr (fd 2) here too, but the test
2888 * and load config file is done in listen_loop() and puts
2889 * some messages on stderr there.
2896 } /* -END- if (!no_daemon) */
2899 * As soon as we have written the PID file, we can switch
2900 * to the user and group ID indicated by the --user option
2906 if (setgid((NULL != grp) ? grp->gr_gid : pw->pw_gid))
2908 log_error(LOG_LEVEL_FATAL, "Cannot setgid(): Insufficient permissions.");
2914 log_error(LOG_LEVEL_FATAL, "Home directory for %s undefined", pw->pw_name);
2916 if (chroot(pw->pw_dir) < 0)
2918 log_error(LOG_LEVEL_FATAL, "Cannot chroot to %s", pw->pw_dir);
2922 log_error(LOG_LEVEL_FATAL, "Cannot chdir /");
2925 if (setuid(pw->pw_uid))
2927 log_error(LOG_LEVEL_FATAL, "Cannot setuid(): Insufficient permissions.");
2931 char putenv_dummy[64];
2933 strcpy(putenv_dummy, "HOME=/");
2934 if (putenv(putenv_dummy) != 0)
2936 log_error(LOG_LEVEL_FATAL, "Cannot putenv(): HOME");
2939 snprintf(putenv_dummy, 64, "USER=%s", pw->pw_name);
2940 if (putenv(putenv_dummy) != 0)
2942 log_error(LOG_LEVEL_FATAL, "Cannot putenv(): USER");
2948 log_error(LOG_LEVEL_FATAL, "Cannot chroot without --user argument.");
2951 #endif /* defined unix */
2954 /* This will be FALSE unless the command line specified --service
2958 /* Yup, so now we must attempt to establish a connection
2959 * with the service dispatcher. This will only work if this
2960 * process was launched by the service control manager to
2961 * actually run as a service. If this isn't the case, i've
2962 * known it take around 30 seconds or so for the call to return.
2965 /* The StartServiceCtrlDispatcher won't return until the service is stopping */
2966 if (w32_start_service_ctrl_dispatcher(w32ServiceDispatchTable))
2968 /* Service has run, and at this point is now being stopped, so just return */
2973 printf("Warning: Failed to connect to Service Control Dispatcher\nwhen starting as a service!\n");
2975 /* An error occurred. Usually it's because --service was wrongly specified
2976 * and we were unable to connect to the Service Control Dispatcher because
2977 * it wasn't expecting us and is therefore not listening.
2979 * For now, just continue below to call the listen_loop function.
2982 #endif /* def _WIN32 */
2992 /*********************************************************************
2994 * Function : bind_port_helper
2996 * Description : Bind the listen port. Handles logging, and aborts
3000 * 1 : config = Privoxy configuration. Specifies port
3003 * Returns : Port that was opened.
3005 *********************************************************************/
3006 static jb_socket bind_port_helper(struct configuration_spec * config)
3011 if ( (config->haddr != NULL)
3012 && (config->haddr[0] == '1')
3013 && (config->haddr[1] == '2')
3014 && (config->haddr[2] == '7')
3015 && (config->haddr[3] == '.') )
3017 log_error(LOG_LEVEL_INFO, "Listening on port %d for local connections only",
3020 else if (config->haddr == NULL)
3022 log_error(LOG_LEVEL_INFO, "Listening on port %d on all IP addresses",
3027 log_error(LOG_LEVEL_INFO, "Listening on port %d on IP address %s",
3028 config->hport, config->haddr);
3031 result = bind_port(config->haddr, config->hport, &bfd);
3038 log_error(LOG_LEVEL_FATAL, "can't bind to %s:%d: "
3039 "There may be another Privoxy or some other "
3040 "proxy running on port %d",
3041 (NULL != config->haddr) ? config->haddr : "INADDR_ANY",
3042 config->hport, config->hport);
3045 log_error(LOG_LEVEL_FATAL, "can't bind to %s:%d: "
3046 "The hostname is not resolvable",
3047 (NULL != config->haddr) ? config->haddr : "INADDR_ANY", config->hport);
3050 log_error(LOG_LEVEL_FATAL, "can't bind to %s:%d: because %E",
3051 (NULL != config->haddr) ? config->haddr : "INADDR_ANY", config->hport);
3054 /* shouldn't get here */
3055 return JB_INVALID_SOCKET;
3058 config->need_bind = 0;
3065 /* Without this simple workaround we get this compiler warning from _beginthread
3066 * warning C4028: formal parameter 1 different from declaration
3068 void w32_service_listen_loop(void *p)
3072 #endif /* def _WIN32 */
3075 /*********************************************************************
3077 * Function : listen_loop
3079 * Description : bind the listen port and enter a "FOREVER" listening loop.
3085 *********************************************************************/
3086 static void listen_loop(void)
3088 struct client_state *csp = NULL;
3090 struct configuration_spec * config;
3092 config = load_config();
3094 bfd = bind_port_helper(config);
3096 #ifdef FEATURE_GRACEFUL_TERMINATION
3097 while (!g_terminate)
3102 #if !defined(FEATURE_PTHREAD) && !defined(_WIN32) && !defined(__BEOS__) && !defined(AMIGA) && !defined(__OS2__)
3103 while (waitpid(-1, NULL, WNOHANG) > 0)
3105 /* zombie children */
3107 #endif /* !defined(FEATURE_PTHREAD) && !defined(_WIN32) && !defined(__BEOS__) && !defined(AMIGA) */
3110 * Free data that was used by died threads
3116 * Re-open the errlog after HUP signal
3118 if (received_hup_signal)
3120 init_error_log(Argv[0], config->logfile, config->debug);
3121 received_hup_signal = 0;
3126 #ifdef FEATURE_COOKIE_JAR
3128 * Need a workaround here: we have to fclose() the jarfile, or we die because it's
3129 * already open. I think unload_configfile() is not being run, which should do
3130 * this work. Until that can get resolved, we'll use this workaround.
3134 if (csp->config->jar)
3136 fclose(csp->config->jar);
3137 csp->config->jar = NULL;
3139 #endif /* FEATURE_COOKIE_JAR */
3140 #endif /* __OS2__ */
3142 if ( NULL == (csp = (struct client_state *) zalloc(sizeof(*csp))) )
3144 log_error(LOG_LEVEL_FATAL, "malloc(%d) for csp failed: %E", sizeof(*csp));
3148 csp->flags |= CSP_FLAG_ACTIVE;
3149 csp->sfd = JB_INVALID_SOCKET;
3151 csp->config = config = load_config();
3153 if ( config->need_bind )
3156 * Since we were listening to the "old port", we will not see
3157 * a "listen" param change until the next IJB request. So, at
3158 * least 1 more request must be made for us to find the new
3159 * setting. I am simply closing the old socket and binding the
3162 * Which-ever is correct, we will serve 1 more page via the
3163 * old settings. This should probably be a "show-proxy-args"
3164 * request. This should not be a so common of an operation
3165 * that this will hurt people's feelings.
3170 bfd = bind_port_helper(config);
3173 log_error(LOG_LEVEL_CONNECT, "Listening for new connections ... ");
3175 if (!accept_connection(csp, bfd))
3177 log_error(LOG_LEVEL_CONNECT, "accept failed: %E");
3190 log_error(LOG_LEVEL_CONNECT, "accepted connection from %s", csp->ip_addr_str);
3193 #ifdef FEATURE_TOGGLE
3194 if (global_toggle_state)
3196 csp->flags |= CSP_FLAG_TOGGLED_ON;
3198 #endif /* def FEATURE_TOGGLE */
3200 if (run_loader(csp))
3202 log_error(LOG_LEVEL_FATAL, "a loader failed - must exit");
3203 /* Never get here - LOG_LEVEL_FATAL causes program exit */
3207 if (block_acl(NULL,csp))
3209 log_error(LOG_LEVEL_CONNECT, "Connection from %s dropped due to ACL", csp->ip_addr_str);
3210 close_socket(csp->cfd);
3214 #endif /* def FEATURE_ACL */
3216 /* add it to the list of clients */
3217 csp->next = clients->next;
3218 clients->next = csp;
3220 if (config->multi_threaded)
3224 /* this is a switch () statment in the C preprocessor - ugh */
3225 #undef SELECTED_ONE_OPTION
3227 /* Use Pthreads in preference to native code */
3228 #if defined(FEATURE_PTHREAD) && !defined(SELECTED_ONE_OPTION)
3229 #define SELECTED_ONE_OPTION
3231 pthread_t the_thread;
3232 pthread_attr_t attrs;
3234 pthread_attr_init(&attrs);
3235 pthread_attr_setdetachstate(&attrs, PTHREAD_CREATE_DETACHED);
3236 errno = pthread_create(&the_thread, &attrs,
3237 (void * (*)(void *))serve, csp);
3238 child_id = errno ? -1 : 0;
3239 pthread_attr_destroy(&attrs);
3243 #if defined(_WIN32) && !defined(_CYGWIN) && !defined(SELECTED_ONE_OPTION)
3244 #define SELECTED_ONE_OPTION
3245 child_id = _beginthread(
3246 (void (*)(void *))serve,
3251 #if defined(__OS2__) && !defined(SELECTED_ONE_OPTION)
3252 #define SELECTED_ONE_OPTION
3253 child_id = _beginthread(
3254 (void(* _Optlink)(void*))serve,
3260 #if defined(__BEOS__) && !defined(SELECTED_ONE_OPTION)
3261 #define SELECTED_ONE_OPTION
3263 thread_id tid = spawn_thread
3264 (server_thread, "server", B_NORMAL_PRIORITY, csp);
3266 if ((tid >= 0) && (resume_thread(tid) == B_OK))
3268 child_id = (int) tid;
3277 #if defined(AMIGA) && !defined(SELECTED_ONE_OPTION)
3278 #define SELECTED_ONE_OPTION
3279 csp->cfd = ReleaseSocket(csp->cfd, -1);
3282 child_id = (int)CreateNewProcTags(NP_Entry, (ULONG)server_thread,
3283 NP_Output, Output(),
3284 NP_CloseOutput, FALSE,
3285 NP_Name, (ULONG)"privoxy child",
3289 child_id = (int)CreateNewProcTags(NP_Entry, (ULONG)server_thread,
3290 NP_Output, Output(),
3291 NP_CloseOutput, FALSE,
3292 NP_Name, (ULONG)"privoxy child",
3293 NP_StackSize, 200*1024,
3299 ((struct Task *)child_id)->tc_UserData = csp;
3300 Signal((struct Task *)child_id, SIGF_SINGLE);
3305 #if !defined(SELECTED_ONE_OPTION)
3308 /* This block is only needed when using fork().
3309 * When using threads, the server thread was
3310 * created and run by the call to _beginthread().
3312 if (child_id == 0) /* child */
3315 #ifdef FEATURE_TOGGLE
3316 int inherited_toggle_state = global_toggle_state;
3317 #endif /* def FEATURE_TOGGLE */
3322 * If we've been toggled or we've blocked the request, tell Mom
3325 #ifdef FEATURE_TOGGLE
3326 if (inherited_toggle_state != global_toggle_state)
3328 rc |= RC_FLAG_TOGGLED;
3330 #endif /* def FEATURE_TOGGLE */
3332 #ifdef FEATURE_STATISTICS
3333 if (csp->flags & CSP_FLAG_REJECTED)
3335 rc |= RC_FLAG_BLOCKED;
3337 #endif /* ndef FEATURE_STATISTICS */
3341 else if (child_id > 0) /* parent */
3343 /* in a fork()'d environment, the parent's
3344 * copy of the client socket and the CSP
3348 #if !defined(_WIN32) && !defined(__CYGWIN__)
3350 wait( &child_status );
3353 * Evaluate child's return code: If the child has
3354 * - been toggled, toggle ourselves
3355 * - blocked its request, bump up the stats counter
3358 #ifdef FEATURE_TOGGLE
3359 if (WIFEXITED(child_status) && (WEXITSTATUS(child_status) & RC_FLAG_TOGGLED))
3361 global_toggle_state = !global_toggle_state;
3363 #endif /* def FEATURE_TOGGLE */
3365 #ifdef FEATURE_STATISTICS
3367 if (WIFEXITED(child_status) && (WEXITSTATUS(child_status) & RC_FLAG_BLOCKED))
3371 #endif /* def FEATURE_STATISTICS */
3373 #endif /* !defined(_WIN32) && defined(__CYGWIN__) */
3374 close_socket(csp->cfd);
3375 csp->flags &= ~CSP_FLAG_ACTIVE;
3379 #undef SELECTED_ONE_OPTION
3380 /* end of cpp switch () */
3382 if (child_id < 0) /* failed */
3384 char buf[BUFFER_SIZE];
3386 log_error(LOG_LEVEL_ERROR, "can't fork: %E");
3388 snprintf(buf , sizeof(buf), "Privoxy: can't fork: errno = %d", errno);
3390 write_socket(csp->cfd, buf, strlen(buf));
3391 close_socket(csp->cfd);
3392 csp->flags &= ~CSP_FLAG_ACTIVE;
3403 /* NOTREACHED unless FEATURE_GRACEFUL_TERMINATION is defined */
3405 /* Clean up. Aim: free all memory (no leaks) */
3406 #ifdef FEATURE_GRACEFUL_TERMINATION
3408 log_error(LOG_LEVEL_ERROR, "Graceful termination requested");
3410 unload_current_config_file();
3411 unload_current_actions_file();
3412 unload_current_re_filterfile();
3413 #ifdef FEATURE_TRUST
3414 unload_current_trust_file();
3417 if (config->multi_threaded)
3424 } while ((clients->next != NULL) && (--i > 0));
3428 log_error(LOG_LEVEL_ERROR, "Graceful termination failed - still some live clients after 1 minute wait.");
3439 #ifdef FEATURE_COOKIE_JAR
3440 if (NULL != config->jar)
3442 fclose(config->jar);
3446 #if defined(_WIN32) && !defined(_WIN_CONSOLE)
3447 /* Cleanup - remove taskbar icon etc. */
3452 #endif /* FEATURE_GRACEFUL_TERMINATION */