Don't provide get_header() with the whole client state
[privoxy.git] / jcc.c
1 const char jcc_rcs[] = "$Id: jcc.c,v 1.177 2008/05/10 11:51:12 fabiankeil Exp $";
2 /*********************************************************************
3  *
4  * File        :  $Source: /cvsroot/ijbswa/current/jcc.c,v $
5  *
6  * Purpose     :  Main file.  Contains main() method, main loop, and
7  *                the main connection-handling function.
8  *
9  * Copyright   :  Written by and Copyright (C) 2001-2008 the SourceForge
10  *                Privoxy team. http://www.privoxy.org/
11  *
12  *                Based on the Internet Junkbuster originally written
13  *                by and Copyright (C) 1997 Anonymous Coders and
14  *                Junkbusters Corporation.  http://www.junkbusters.com
15  *
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.
21  *
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.
27  *
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.
33  *
34  * Revisions   :
35  *    $Log: jcc.c,v $
36  *    Revision 1.177  2008/05/10 11:51:12  fabiankeil
37  *    Make the "read the rest of the headers" loop a bit more readable.
38  *
39  *    Revision 1.176  2008/05/10 11:37:57  fabiankeil
40  *    - Instead of logging when the IIS5 hack is enabled, log when it fails.
41  *    - Remove useless comment.
42  *
43  *    Revision 1.175  2008/05/09 18:53:59  fabiankeil
44  *    Fix comment grammar.
45  *
46  *    Revision 1.174  2008/05/07 18:05:53  fabiankeil
47  *    Remove the pointless buffer in client_protocol_is_unsupported().
48  *
49  *    Revision 1.173  2008/05/06 15:09:00  fabiankeil
50  *    Least-effort fix for bug #1821930 (reported by Lee):
51  *    If the response doesn't look like HTTP,
52  *    tell the client and log the problem.
53  *
54  *    Revision 1.172  2008/04/16 16:38:21  fabiankeil
55  *    Don't pass the whole csp structure to flush_socket()
56  *    when it only needs a file descriptor and a buffer.
57  *
58  *    Revision 1.171  2008/03/27 18:27:25  fabiankeil
59  *    Remove kill-popups action.
60  *
61  *    Revision 1.170  2008/03/06 16:33:46  fabiankeil
62  *    If limit-connect isn't used, don't limit CONNECT requests to port 443.
63  *
64  *    Revision 1.169  2008/03/04 18:30:39  fabiankeil
65  *    Remove the treat-forbidden-connects-like-blocks action. We now
66  *    use the "blocked" page for forbidden CONNECT requests by default.
67  *
68  *    Revision 1.168  2008/03/02 12:25:25  fabiankeil
69  *    Also use shiny new connect_port_is_forbidden() in jcc.c.
70  *
71  *    Revision 1.167  2008/02/23 16:57:12  fabiankeil
72  *    Rename url_actions() to get_url_actions() and let it
73  *    use the standard parameter ordering.
74  *
75  *    Revision 1.166  2008/02/23 16:33:43  fabiankeil
76  *    Let forward_url() use the standard parameter ordering
77  *    and mark its second parameter immutable.
78  *
79  *    Revision 1.165  2008/02/02 19:36:56  fabiankeil
80  *    Remove the "Listening ... for local connections only" log message.
81  *    Whether or not remote connections are able to reach Privoxy is up
82  *    to the operating system.
83  *
84  *    Revision 1.164  2007/12/16 18:32:46  fabiankeil
85  *    Prevent the log messages for CONNECT requests to unacceptable
86  *    ports from printing the limit-connect argument as [null] if
87  *    limit-connect hasn't been explicitly enabled.
88  *
89  *    Revision 1.163  2007/12/13 01:47:11  david__schmidt
90  *    Make sure all console-mode apps get a usage() instance
91  *
92  *    Revision 1.162  2007/12/06 17:54:57  fabiankeil
93  *    Reword NO_SERVER_DATA_RESPONSE to make it harder
94  *    to misunderstand what the message is all about.
95  *
96  *    Revision 1.161  2007/12/04 19:44:22  fabiankeil
97  *    Unbreak trustfile which previously didn't work without
98  *    FEATURE_TOGGLE. Fixes BR#1843585, reported by Lee.
99  *
100  *    Revision 1.160  2007/11/29 18:00:29  fabiankeil
101  *    Plug memory leak. Spotted by Valgrind, triggered by
102  *    Privoxy-Regression-Test feeding proxyfuzz.py.
103  *
104  *    Revision 1.159  2007/11/24 14:34:09  fabiankeil
105  *    In the HTTP snipplets, refer to the client as client.
106  *
107  *    Revision 1.158  2007/11/11 16:44:17  fabiankeil
108  *    Emit a log message when activating the MS IIS5 hack.
109  *
110  *    Revision 1.157  2007/11/03 17:34:49  fabiankeil
111  *    Log the "weak randomization factor" warning only
112  *    once for mingw32 and provide some more details.
113  *
114  *    Revision 1.156  2007/11/01 18:20:58  fabiankeil
115  *    Initialize log module after initializing mutexes, future
116  *    deadlocks in that code should now work cross-platform.
117  *
118  *    Revision 1.155  2007/10/23 20:12:45  fabiankeil
119  *    Fix first CSUCCEED line to end in \r\n as required by RFC1945.
120  *    Reported by Bert van Leeuwen in BR#1818808.
121  *
122  *    Revision 1.154  2007/10/19 17:00:08  fabiankeil
123  *    Downgrade "Flushing header and buffers" message to LOG_LEVEL_INFO.
124  *
125  *    Revision 1.153  2007/10/14 14:12:41  fabiankeil
126  *    When in daemon mode, close stderr after the configuration file has been
127  *    parsed the first time. If logfile isn't set, stop logging. Fixes BR#897436.
128  *
129  *    Revision 1.152  2007/10/04 18:03:34  fabiankeil
130  *    - Fix a crash when parsing invalid requests whose first header
131  *      is rejected by get_header(). Regression (re?)introduced
132  *      in r1.143 by yours truly.
133  *    - Move ACTION_VANILLA_WAFER handling into parsers.c's
134  *      client_cookie_adder() to make sure send-vanilla-wafer can be
135  *      controlled through tags (and thus regression-tested).
136  *
137  *    Revision 1.151  2007/09/29 10:21:16  fabiankeil
138  *    - Move get_filter_function() from jcc.c to filters.c
139  *      so the filter functions can be static.
140  *    - Don't bother filtering body-less responses.
141  *
142  *    Revision 1.150  2007/09/28 16:39:29  fabiankeil
143  *    Execute content filters through execute_content_filter().
144  *
145  *    Revision 1.149  2007/09/04 15:08:48  fabiankeil
146  *    Initialize req to NULL to make sure it's defined if the
147  *    first read_socket() call fails. Reported by icmp30.
148  *
149  *    Revision 1.148  2007/08/26 16:47:13  fabiankeil
150  *    Add Stephen Gildea's --pre-chroot-nslookup patch [#1276666],
151  *    extensive comments moved to user manual.
152  *
153  *    Revision 1.147  2007/08/25 14:42:40  fabiankeil
154  *    Don't crash if a broken header filter wiped out the request line.
155  *
156  *    Revision 1.146  2007/08/20 17:09:32  fabiankeil
157  *    Fix byte_count calculation in case of flushes
158  *    and don't parse the server headers a second time.
159  *
160  *    Revision 1.145  2007/08/19 13:13:31  fabiankeil
161  *    - If there's a connection problem after we already forwarded
162  *      parts of the original content, just hang up. Fixes BR#1776724.
163  *    - Fix warnings about unused code on mingw32.
164  *    - In case of flushes, calculate the byte count
165  *      less incorrectly (I think).
166  *
167  *    Revision 1.144  2007/08/11 14:43:22  fabiankeil
168  *    Add some more prototypes for static functions.
169  *
170  *    Revision 1.143  2007/08/05 13:58:19  fabiankeil
171  *    Comment out request_contains_null_bytes() until it's used again.
172  *
173  *    Revision 1.142  2007/08/05 13:50:26  fabiankeil
174  *    #1763173 from Stefan Huehner: s@const static@static const@
175  *    and declare some more functions static.
176  *
177  *    Revision 1.141  2007/08/04 09:56:23  fabiankeil
178  *    - Log rejected CONNECT requests with LOG_LEVEL_INFO
179  *      and explain why they were rejected in the first place.
180  *    - Fix the LOG_LEVEL_CLF message for crunches of unallowed
181  *      CONNECT requests. The request line was missing.
182  *    - Add two more XXX reminders as we don't have enough already.
183  *
184  *    Revision 1.140  2007/07/21 11:51:36  fabiankeil
185  *    As Hal noticed, checking dispatch_cgi() as the last cruncher
186  *    looks like a bug if CGI requests are blocked unintentionally,
187  *    so don't do it unless the user enabled the new config option
188  *    "allow-cgi-request-crunching".
189  *
190  *    Revision 1.139  2007/07/14 07:46:41  fabiankeil
191  *    - Allow to rewrite the request destination behind the client's back.
192  *    - Turn the weird-looking unconditional for loop that
193  *      reads the client request into a conditional while loop.
194  *      Move the stuff that only runs once out of the loop.
195  *    - Move parts of chat(), server_content_type() and the
196  *      necessary stuff to fix BR#1750917 into get_filter_function().
197  *
198  *    Revision 1.138  2007/06/03 18:45:18  fabiankeil
199  *    Temporary workaround for BR#1730105.
200  *
201  *    Revision 1.137  2007/06/01 18:16:36  fabiankeil
202  *    Use the same mutex for gethostbyname() and gethostbyaddr() to prevent
203  *    deadlocks and crashes on OpenBSD and possibly other OS with neither
204  *    gethostbyname_r() nor gethostaddr_r(). Closes BR#1729174.
205  *    Thanks to Ralf Horstmann for report and solution.
206  *
207  *    Revision 1.136  2007/06/01 16:41:11  fabiankeil
208  *    Add forward-override{} to change the forwarding settings through
209  *    action sections. This is mainly interesting to forward different
210  *    clients differently (for example based on User-Agent or request
211  *    origin).
212  *
213  *    Revision 1.135  2007/05/24 17:03:50  fabiankeil
214  *    - Let usage() mention the --chroot parameter.
215  *    - Use read_socket() consistently and always leave
216  *      the last buffer byte alone, even in cases where
217  *      null termination (currently) doesn't matter.
218  *
219  *    Revision 1.134  2007/05/16 14:59:46  fabiankeil
220  *    - Fix config file loading on Unix if no config file is specified.
221  *      Since r1.97 Privoxy would always interpret the last argument as
222  *      config file, even if it's a valid command line option.
223  *    - Abort in case of unrecognized command line options. Closes #1719696.
224  *    - Remove a bunch of unnecessary strcpy() calls (yay for c&p without thinking).
225  *    - Replace the remaining strcpy() and strcat() calls with strlcpy() and strcat().
226  *
227  *    Revision 1.133  2007/05/04 11:23:19  fabiankeil
228  *    - Don't rerun crunchers that only depend on the request URL.
229  *    - Don't count redirects and CGI requests as "blocked requests".
230  *
231  *    Revision 1.132  2007/04/25 15:15:17  fabiankeil
232  *    Support crunching based on tags created by server-header taggers.
233  *
234  *    Revision 1.131  2007/04/22 13:24:50  fabiankeil
235  *    Make HTTP snippets static (again). Add a Content-Type for those
236  *    with content so the browser doesn't guess it based on the URL.
237  *
238  *    Revision 1.130  2007/04/19 13:47:34  fabiankeil
239  *    Move crunching and request line rebuilding out of chat().
240  *
241  *    Revision 1.129  2007/04/15 16:39:20  fabiankeil
242  *    Introduce tags as alternative way to specify which
243  *    actions apply to a request. At the moment tags can be
244  *    created based on client and server headers.
245  *
246  *    Revision 1.128  2007/03/25 16:55:54  fabiankeil
247  *    Don't CLF-log CONNECT requests twice.
248  *
249  *    Revision 1.127  2007/03/20 13:53:17  fabiankeil
250  *    Log the source address for ACL-related connection drops.
251  *
252  *    Revision 1.126  2007/03/17 15:20:05  fabiankeil
253  *    New config option: enforce-blocks.
254  *
255  *    Revision 1.125  2007/03/09 14:12:00  fabiankeil
256  *    - Move null byte check into separate function.
257  *    - Don't confuse the client with error pages
258  *      if a CONNECT request was already confirmed.
259  *
260  *    Revision 1.124  2007/02/23 14:59:54  fabiankeil
261  *    Speed up NULL byte escaping and only log the complete
262  *    NULL byte requests with header debugging enabled.
263  *
264  *    Revision 1.123  2007/02/21 18:42:10  fabiankeil
265  *    Answer requests that contain NULL bytes with
266  *    a custom response instead of waiting for more
267  *    data until the client eventually hangs up.
268  *
269  *    Revision 1.122  2007/02/07 11:12:02  fabiankeil
270  *    - Move delivery and logging of crunched responses
271  *      from chat() into send_crunch_response().
272  *    - Display the reason for generating http_responses.
273  *    - Log the content length for LOG_LEVEL_CLF correctly
274  *      (still incorrect for some fixed responses).
275  *    - Reword an incorrect comment about
276  *      treat-forbidden-connects-like-blocks violating
277  *      the specs.
278  *    - Add some log messages.
279  *
280  *    Revision 1.121  2007/01/27 10:52:56  fabiankeil
281  *    Move mutex initialization into separate
282  *    function and exit in case of errors.
283  *
284  *    Revision 1.120  2007/01/26 14:18:42  fabiankeil
285  *    - Start to reduce chat()'s line count and move
286  *      parts of it into separate functions.
287  *    - Add "HTTP/1.1 100 Continue" hack for BR 756734.
288  *
289  *    Revision 1.119  2007/01/25 14:02:30  fabiankeil
290  *    - Add Proxy-Agent header to HTTP snippets that are
291  *      supposed to reach HTTP clients only.
292  *    - Made a few CONNECT log messages more descriptive.
293  *    - Catch completely empty server responses (as seen
294  *      with Tor's fake ".noconnect" top level domain).
295  *    - Use shiny new "forwarding-failed" template for socks errors.
296  *
297  *    Revision 1.118  2007/01/07 07:43:43  joergs
298  *    AmigaOS4 support added.
299  *
300  *    Revision 1.117  2006/12/31 17:56:37  fabiankeil
301  *    Added config option accept-intercepted-requests
302  *    and disabled it by default.
303  *
304  *    Revision 1.116  2006/12/29 19:08:22  fabiankeil
305  *    Reverted parts of my last commit
306  *    to keep error handling working.
307  *
308  *    Revision 1.115  2006/12/29 17:38:57  fabiankeil
309  *    Fixed gcc43 conversion warnings.
310  *
311  *    Revision 1.114  2006/12/27 18:52:02  fabiankeil
312  *    Fix -pedantic ISO C warning about converting
313  *    from function pointer to object pointer.
314  *
315  *    Revision 1.113  2006/12/26 17:38:50  fabiankeil
316  *    Silence compiler warning I introduced with my last commit.
317  *
318  *    Revision 1.112  2006/12/26 17:31:41  fabiankeil
319  *    Mutex protect rand() if POSIX threading
320  *    is used, warn the user if that's not possible
321  *    and stop using it on _WIN32 where it could
322  *    cause crashes.
323  *
324  *    Revision 1.111  2006/12/23 16:15:06  fabiankeil
325  *    Don't prevent core dumps by catching SIGABRT.
326  *    It's rude and makes debugging unreasonable painful.
327  *
328  *    Revision 1.110  2006/12/13 14:52:53  etresoft
329  *    Fix build failure on MacOS X. Global symbols can be either static or extern, but not both.
330  *
331  *    Revision 1.109  2006/12/06 19:41:40  fabiankeil
332  *    Privoxy is now able to run as intercepting
333  *    proxy in combination with any packet filter
334  *    that does the port redirection. The destination
335  *    is extracted from the "Host:" header which
336  *    should be available for nearly all requests.
337  *
338  *    Moved HTTP snipplets into jcc.c.
339  *    Added error message for gopher proxy requests.
340  *
341  *    Revision 1.108  2006/11/28 15:38:51  fabiankeil
342  *    Only unlink the pidfile if it's actually used.
343  *
344  *    Change order of interception checks to make
345  *    it possible to block or redirect requests for
346  *    the cgi pages.
347  *
348  *    Revision 1.107  2006/11/13 19:05:51  fabiankeil
349  *    Make pthread mutex locking more generic. Instead of
350  *    checking for OSX and OpenBSD, check for FEATURE_PTHREAD
351  *    and use mutex locking unless there is an _r function
352  *    available. Better safe than sorry.
353  *
354  *    Fixes "./configure --disable-pthread" and should result
355  *    in less threading-related problems on pthread-using platforms,
356  *    but it still doesn't fix BR#1122404.
357  *
358  *    Revision 1.106  2006/11/06 19:58:23  fabiankeil
359  *    Move pthread.h inclusion from jcc.c to jcc.h.
360  *    Fixes build on x86-freebsd1 (FreeBSD 5.4-RELEASE).
361  *
362  *    Revision 1.105  2006/11/06 14:26:02  fabiankeil
363  *    Don't exit after receiving the second SIGHUP on Solaris.
364  *
365  *    Fixes BR 1052235, but the same problem may exist on other
366  *    systems. Once 3.0.6 is out we should use sigset()
367  *    where available and see if it breaks anything.
368  *
369  *    Revision 1.104  2006/09/23 13:26:38  roro
370  *    Replace TABs by spaces in source code.
371  *
372  *    Revision 1.103  2006/09/21 12:54:43  fabiankeil
373  *    Fix +redirect{}. Didn't work with -fast-redirects.
374  *
375  *    Revision 1.102  2006/09/06 13:03:04  fabiankeil
376  *    Respond with 400 and a short text message
377  *    if the client tries to use Privoxy as FTP proxy.
378  *
379  *    Revision 1.101  2006/09/06 09:23:37  fabiankeil
380  *    Make number of retries in case of forwarded-connect problems
381  *    a config file option (forwarded-connect-retries) and use 0 as
382  *    default.
383  *
384  *    Revision 1.100  2006/09/03 19:42:59  fabiankeil
385  *    Set random(3) seed.
386  *
387  *    Revision 1.99  2006/09/02 15:36:42  fabiankeil
388  *    Follow the OpenBSD port's lead and protect the resolve
389  *    functions on OpenBSD as well.
390  *
391  *    Revision 1.98  2006/08/24 11:01:34  fabiankeil
392  *    --user fix. Only use the user as group if no group is specified.
393  *    Solves BR 1492612. Thanks to Spinor S. and David Laight.
394  *
395  *    Revision 1.97  2006/08/18 15:23:17  david__schmidt
396  *    Windows service (re-)integration
397  *
398  *    The new args are:
399  *
400  *    --install[:service_name]
401  *    --uninstall[:service_name]
402  *    --service
403  *
404  *    They work as follows:
405  *    --install will create a service for you and then terminate.
406  *    By default the service name will be "privoxy" (without the quotes).
407  *    However you can run multiple services if you wish, just by adding
408  *    a colon and then a name (no spaces).
409  *
410  *    --uninstall follows the exact same rules a --install.
411  *
412  *    --service is used when the program is executed by the service
413  *    control manager, and in normal circumstances would never be
414  *    used as a command line argument.
415  *
416  *    Revision 1.96  2006/08/15 20:12:36  david__schmidt
417  *    Windows service integration
418  *
419  *    Revision 1.95  2006/08/03 02:46:41  david__schmidt
420  *    Incorporate Fabian Keil's patch work:
421 http://www.fabiankeil.de/sourcecode/privoxy/
422  *
423  *    Revision 1.94  2006/07/18 14:48:46  david__schmidt
424  *    Reorganizing the repository: swapping out what was HEAD (the old 3.1 branch)
425  *    with what was really the latest development (the v_3_0_branch branch)
426  *
427  *    Revision 1.92.2.16  2005/04/03 20:10:50  david__schmidt
428  *    Thanks to Jindrich Makovicka for a race condition fix for the log
429  *    file.  The race condition remains for non-pthread implementations.
430  *    Reference patch #1175720.
431  *
432  *    Revision 1.92.2.15  2004/10/03 12:53:32  david__schmidt
433  *    Add the ability to check jpeg images for invalid
434  *    lengths of comment blocks.  Defensive strategy
435  *    against the exploit:
436  *       Microsoft Security Bulletin MS04-028
437  *       Buffer Overrun in JPEG Processing (GDI+) Could
438  *       Allow Code Execution (833987)
439  *    Enabled with +inspect-jpegs in actions files.
440  *
441  *    Revision 1.92.2.14  2003/12/12 12:52:53  oes
442  *    - Fixed usage info for non-unix platforms
443  *    - Fixed small cmdline parsing bug
444  *
445  *    Revision 1.92.2.13  2003/11/27 19:20:27  oes
446  *    Diagnostics: Now preserve the returncode of pthread_create
447  *    in errno. Closes BR #775721. Thanks to Geoffrey Hausheer.
448  *
449  *    Revision 1.92.2.12  2003/07/11 11:34:19  oes
450  *    No longer ignore SIGCHLD. Fixes bug #769381
451  *
452  *    Revision 1.92.2.11  2003/05/14 12:32:02  oes
453  *    Close jarfile on graceful exit, remove stray line
454  *
455  *    Revision 1.92.2.10  2003/05/08 15:13:46  oes
456  *    Cosmetics: Killed a warning, a typo and an allocation left at exit
457  *
458  *    Revision 1.92.2.9  2003/04/03 15:08:42  oes
459  *    No longer rely on non-POSIX.1 extensions of getcwd().
460  *    Fixes bug #711001
461  *
462  *    Revision 1.92.2.8  2003/03/31 13:12:32  oes
463  *    Replaced setenv() by posix-compliant putenv()
464  *    Thanks to Neil McCalden (nmcc AT users.sf.net).
465  *
466  *    Revision 1.92.2.7  2003/03/17 16:48:59  oes
467  *    Added chroot ability, thanks to patch by Sviatoslav Sviridov
468  *
469  *    Revision 1.92.2.6  2003/03/11 11:55:00  oes
470  *    Clean-up and extension of improvements for forked mode:
471  *     - Child's return code now consists of flags RC_FLAG_*
472  *     - Reporting toggle to parent now properly #ifdef'ed
473  *     - Children now report blocking to parent. This enables
474  *       statistics in forked mode
475  *
476  *    Revision 1.92.2.5  2003/03/10 23:45:32  oes
477  *    Fixed bug #700381: Non-Threaded version now capable of being toggled.
478  *    Children now report having been toggled through _exit(17), parents
479  *    watch for that code and toggle themselves if found.
480  *
481  *    Revision 1.92.2.4  2003/03/07 03:41:04  david__schmidt
482  *    Wrapping all *_r functions (the non-_r versions of them) with 
483  *    mutex semaphores for OSX.  Hopefully this will take care of all 
484  *    of those pesky crash reports.
485  *
486  *    Revision 1.92.2.3  2003/02/28 12:53:06  oes
487  *    Fixed two mostly harmless mem leaks
488  *
489  *    Revision 1.92.2.2  2002/11/20 14:37:47  oes
490  *    Fix: Head of global clients list now initialized to NULL
491  *
492  *    Revision 1.92.2.1  2002/09/25 14:52:24  oes
493  *    Added basic support for OPTIONS and TRACE HTTP methods:
494  *     - New interceptor direct_response() added in chat().
495  *     - sed() moved to earlier in the process, so that the
496  *       Host: header is evaluated before actions and forwarding
497  *       are decided on.
498  *
499  *    Revision 1.92  2002/05/08 16:00:46  oes
500  *    Chat's buffer handling:
501  *     - Fixed bug with unchecked out-of-mem conditions
502  *       while reading client request & server headers
503  *     - No longer predict if the buffer limit will be exceeded
504  *       in the next read -- check add_to_iob's new
505  *       return code. If buffer couldn't be extended
506  *       (policy or out-of-mem) while
507  *       - reading from client: abort
508  *       - reading server headers: send error page
509  *       - buffering server body for filter: flush,
510  *         and if that fails: send error page
511  *
512  *    Revision 1.91  2002/04/08 20:35:58  swa
513  *    fixed JB spelling
514  *
515  *    Revision 1.90  2002/04/02 14:57:28  oes
516  *    Made sending wafers independent of FEATURE_COOKIE_JAR
517  *
518  *    Revision 1.89  2002/03/31 17:18:59  jongfoster
519  *    Win32 only: Enabling STRICT to fix a VC++ compile warning.
520  *
521  *    Revision 1.88  2002/03/27 14:32:43  david__schmidt
522  *    More compiler warning message maintenance
523  *
524  *    Revision 1.87  2002/03/26 22:29:54  swa
525  *    we have a new homepage!
526  *
527  *    Revision 1.86  2002/03/25 17:04:55  david__schmidt
528  *    Workaround for closing the jarfile before load_config() comes around again
529  *
530  *    Revision 1.85  2002/03/24 15:23:33  jongfoster
531  *    Name changes
532  *
533  *    Revision 1.84  2002/03/24 13:25:43  swa
534  *    name change related issues
535  *
536  *    Revision 1.83  2002/03/16 23:54:06  jongfoster
537  *    Adding graceful termination feature, to help look for memory leaks.
538  *    If you enable this (which, by design, has to be done by hand
539  *    editing config.h) and then go to http://i.j.b/die, then the program
540  *    will exit cleanly after the *next* request.  It should free all the
541  *    memory that was used.
542  *
543  *    Revision 1.82  2002/03/13 00:27:05  jongfoster
544  *    Killing warnings
545  *
546  *    Revision 1.81  2002/03/12 01:42:50  oes
547  *    Introduced modular filters
548  *
549  *    Revision 1.80  2002/03/11 22:07:05  david__schmidt
550  *    OS/2 port maintenance:
551  *    - Fixed EMX build - it had decayed a little
552  *    - Fixed inexplicable crash during FD_ZERO - must be due to a bad macro.
553  *      substituted a memset for now.
554  *
555  *    Revision 1.79  2002/03/09 20:03:52  jongfoster
556  *    - Making various functions return int rather than size_t.
557  *      (Undoing a recent change).  Since size_t is unsigned on
558  *      Windows, functions like read_socket that return -1 on
559  *      error cannot return a size_t.
560  *
561  *      THIS WAS A MAJOR BUG - it caused frequent, unpredictable
562  *      crashes, and also frequently caused JB to jump to 100%
563  *      CPU and stay there.  (Because it thought it had just
564  *      read ((unsigned)-1) == 4Gb of data...)
565  *
566  *    - The signature of write_socket has changed, it now simply
567  *      returns success=0/failure=nonzero.
568  *
569  *    - Trying to get rid of a few warnings --with-debug on
570  *      Windows, I've introduced a new type "jb_socket".  This is
571  *      used for the socket file descriptors.  On Windows, this
572  *      is SOCKET (a typedef for unsigned).  Everywhere else, it's
573  *      an int.  The error value can't be -1 any more, so it's
574  *      now JB_INVALID_SOCKET (which is -1 on UNIX, and in
575  *      Windows it maps to the #define INVALID_SOCKET.)
576  *
577  *    - The signature of bind_port has changed.
578  *
579  *    Revision 1.78  2002/03/08 21:35:04  oes
580  *    Added optional group supplement to --user option. Will now use default group of user if no group given
581  *
582  *    Revision 1.77  2002/03/07 03:52:06  oes
583  *     - Fixed compiler warnings etc
584  *     - Improved handling of failed DNS lookups
585  *
586  *    Revision 1.76  2002/03/06 22:54:35  jongfoster
587  *    Automated function-comment nitpicking.
588  *
589  *    Revision 1.75  2002/03/06 10:02:19  oes
590  *    Fixed stupid bug when --user was not given
591  *
592  *    Revision 1.74  2002/03/06 00:49:31  jongfoster
593  *    Fixing warning on Windows
594  *    Making #ifdefs that refer to the same variable consistently
595  *    use #ifdef unix rather than mixing #ifdef unix & #ifndef OS2
596  *
597  *    Revision 1.73  2002/03/05 23:57:30  hal9
598  *    Stray character 's' on line 1618 was breaking build.
599  *
600  *    Revision 1.72  2002/03/05 21:33:45  david__schmidt
601  *    - Re-enable OS/2 building after new parms were added
602  *    - Fix false out of memory report when resolving CGI templates when no IP
603  *      address is available of failed attempt (a la no such domain)
604  *
605  *    Revision 1.71  2002/03/05 18:13:56  oes
606  *    Added --user option
607  *
608  *    Revision 1.70  2002/03/05 04:52:42  oes
609  *    Deleted non-errlog debugging code
610  *
611  *    Revision 1.69  2002/03/04 23:50:00  jongfoster
612  *    Splitting off bind_port() call into bind_port_helper(), with
613  *    improved logging.
614  *
615  *    Revision 1.68  2002/03/04 20:17:32  oes
616  *    Fixed usage info
617  *
618  *    Revision 1.67  2002/03/04 18:18:57  oes
619  *    - Removed _DEBUG mode
620  *    - Cleand up cmdline parsing
621  *    - Introduced --no-daemon, --pidfile options
622  *    - Cleaned up signal handling:
623  *      - Terminate cleanly on INT, TERM and ABRT
624  *      - Schedule logfile for re-opening on HUP
625  *      - Ignore CHLD and PIPE
626  *      - Leave the rest with their default handlers
627  *      - Uniform handler registration
628  *    - Added usage() function
629  *    - Played styleguide police
630  *
631  *    Revision 1.66  2002/03/03 15:06:55  oes
632  *    Re-enabled automatic config reloading
633  *
634  *    Revision 1.65  2002/03/03 14:49:11  oes
635  *    Fixed CLF logging: Now uses client's original HTTP request
636  *
637  *    Revision 1.64  2002/03/03 09:18:03  joergs
638  *    Made jumbjuster work on AmigaOS again.
639  *
640  *    Revision 1.63  2002/03/02 04:14:50  david__schmidt
641  *    Clean up a little CRLF unpleasantness that suddenly appeared
642  *
643  *    Revision 1.62  2002/02/20 23:17:23  jongfoster
644  *    Detecting some out-of memory conditions and exiting with a log message.
645  *
646  *    Revision 1.61  2002/01/17 21:01:52  jongfoster
647  *    Moving all our URL and URL pattern parsing code to urlmatch.c.
648  *
649  *    Revision 1.60  2001/12/30 14:07:32  steudten
650  *    - Add signal handling (unix)
651  *    - Add SIGHUP handler (unix)
652  *    - Add creation of pidfile (unix)
653  *    - Add action 'top' in rc file (RH)
654  *    - Add entry 'SIGNALS' to manpage
655  *    - Add exit message to logfile (unix)
656  *
657  *    Revision 1.59  2001/12/13 14:07:18  oes
658  *    Fixed Bug: 503 error page now sent OK
659  *
660  *    Revision 1.58  2001/11/30 23:37:24  jongfoster
661  *    Renaming the Win32 config file to config.txt - this is almost the
662  *    same as the corresponding UNIX name "config"
663  *
664  *    Revision 1.57  2001/11/16 00:47:43  jongfoster
665  *    Changing the tty-disconnection code to use setsid().
666  *
667  *    Revision 1.56  2001/11/13 20:20:54  jongfoster
668  *    Tabs->spaces, fixing a bug with missing {} around an if()
669  *
670  *    Revision 1.55  2001/11/13 20:14:53  jongfoster
671  *    Patch for FreeBSD setpgrp() as suggested by Alexander Lazic
672  *
673  *    Revision 1.54  2001/11/07 00:03:14  steudten
674  *    Give reliable return value if an error
675  *    occurs not just 0 with new daemon mode.
676  *
677  *    Revision 1.53  2001/11/05 21:41:43  steudten
678  *    Add changes to be a real daemon just for unix os.
679  *    (change cwd to /, detach from controlling tty, set
680  *    process group and session leader to the own process.
681  *    Add DBG() Macro.
682  *    Add some fatal-error log message for failed malloc().
683  *    Add '-d' if compiled with 'configure --with-debug' to
684  *    enable debug output.
685  *
686  *    Revision 1.52  2001/10/26 20:11:20  jongfoster
687  *    Fixing type mismatch
688  *
689  *    Revision 1.51  2001/10/26 17:38:28  oes
690  *    Cosmetics
691  *
692  *    Revision 1.50  2001/10/25 03:40:48  david__schmidt
693  *    Change in porting tactics: OS/2's EMX porting layer doesn't allow multiple
694  *    threads to call select() simultaneously.  So, it's time to do a real, live,
695  *    native OS/2 port.  See defines for __EMX__ (the porting layer) vs. __OS2__
696  *    (native). Both versions will work, but using __OS2__ offers multi-threading.
697  *
698  *    Revision 1.49  2001/10/23 21:41:35  jongfoster
699  *    Added call to initialize the (statically-allocated of course)
700  *    "out of memory" CGI response.
701  *
702  *    Revision 1.48  2001/10/10 19:56:46  jongfoster
703  *    Moving some code that wasn't cookie-related out of an #ifdef
704  *    FEATURE_COOKIE_JAR
705  *
706  *    Revision 1.47  2001/10/10 16:44:36  oes
707  *    Added CONNECT destination port limitation check
708  *
709  *    Revision 1.46  2001/10/08 15:17:41  oes
710  *    Re-enabled SSL forwarding
711  *
712  *    Revision 1.45  2001/10/07 15:42:11  oes
713  *    Replaced 6 boolean members of csp with one bitmap (csp->flags)
714  *
715  *    Moved downgrading of the HTTP version from parse_http_request to
716  *      chat(), since we can't decide if it is necessary before we have
717  *      determined the actions for the URL. The HTTP command is now
718  *      *always* re-built so the repairs need no longer be special-cased.
719  *
720  *    filter_popups now gets a csp pointer so it can raise the new
721  *      CSP_FLAG_MODIFIED flag.
722  *
723  *    Bugfix
724  *
725  *    Added configurable size limit for the IOB. If the IOB grows so
726  *      large that the next read would exceed the limit, the header
727  *      is generated, and the header & unfiltered buffer are flushed
728  *      to the client. Chat then continues in non-buffering,
729  *      non-filtering body mode.
730  *
731  *    Revision 1.44  2001/10/02 18:13:57  oes
732  *    Ooops
733  *
734  *    Revision 1.43  2001/10/02 15:32:13  oes
735  *    Moved generation of hdr
736  *
737  *    Revision 1.42  2001/09/21 23:02:02  david__schmidt
738  *    Cleaning up 2 compiler warnings on OS/2.
739  *
740  *    Revision 1.41  2001/09/16 17:05:14  jongfoster
741  *    Removing unused #include showarg.h
742  *
743  *    Revision 1.40  2001/09/16 15:41:45  jongfoster
744  *    Fixing signed/unsigned comparison warning.
745  *
746  *    Revision 1.39  2001/09/16 13:21:27  jongfoster
747  *    Changes to use new list functions.
748  *
749  *    Revision 1.38  2001/09/16 13:01:46  jongfoster
750  *    Removing redundant function call that zeroed zalloc()'d memory.
751  *
752  *    Revision 1.37  2001/09/10 11:12:24  oes
753  *    Deleted unused variable
754  *
755  *    Revision 1.36  2001/09/10 10:56:15  oes
756  *    Silenced compiler warnings
757  *
758  *    Revision 1.35  2001/07/31 14:44:22  oes
759  *    Deleted unused size parameter from filter_popups()
760  *
761  *    Revision 1.34  2001/07/30 22:08:36  jongfoster
762  *    Tidying up #defines:
763  *    - All feature #defines are now of the form FEATURE_xxx
764  *    - Permanently turned off WIN_GUI_EDIT
765  *    - Permanently turned on WEBDAV and SPLIT_PROXY_ARGS
766  *
767  *    Revision 1.33  2001/07/29 19:32:00  jongfoster
768  *    Renaming _main() [mingw32 only] to real_main(), for ANSI compliance.
769  *
770  *    Revision 1.32  2001/07/29 18:47:05  jongfoster
771  *    Adding missing #include "loadcfg.h"
772  *
773  *    Revision 1.31  2001/07/29 12:17:48  oes
774  *    Applied pthread fix by Paul Lieverse
775  *
776  *    Revision 1.30  2001/07/25 22:57:13  jongfoster
777  *    __BEOS__ no longer overrides FEATURE_PTHREAD.
778  *    This is because FEATURE_PTHREAD will soon be widely used, so I
779  *    want to keep it simple.
780  *
781  *    Revision 1.29  2001/07/24 12:47:06  oes
782  *    Applied BeOS support update by Eugenia
783  *
784  *    Revision 1.28  2001/07/23 13:26:12  oes
785  *    Fixed bug in popup-killing for the first read that caused binary garbage to be sent between headers and body
786  *
787  *    Revision 1.27  2001/07/19 19:09:47  haroon
788  *    - Added code to take care of the situation where while processing the first
789  *      server response (which includes the server header), after finding the end
790  *      of the headers we were not looking past the end of the headers for
791  *      content modification. I enabled it for filter_popups.
792  *      Someone else should look to see if other similar operations should be
793  *      done to the discarded portion of the buffer.
794  *
795  *      Note 2001/07/20: No, the other content modification mechanisms will process
796  *                       the whole iob later anyway. --oes
797  *
798  *    Revision 1.26  2001/07/18 12:31:36  oes
799  *    cosmetics
800  *
801  *    Revision 1.25  2001/07/15 19:43:49  jongfoster
802  *    Supports POSIX threads.
803  *    Also removed some unused #includes.
804  *
805  *    Revision 1.24  2001/07/13 14:00:40  oes
806  *     - Generic content modification scheme:
807  *       Each feature has its own applicability flag that is set
808  *       from csp->action->flags.
809  *       Replaced the "filtering" int flag , by a function pointer
810  *       "content_filter" to the function that will do the content
811  *       modification. If it is != NULL, the document will be buffered
812  *       and processed through *content_filter, which must set
813  *       csp->content_length and return a modified copy of the body
814  *       or return NULL (on failiure).
815  *     - Changed csp->is_text to the more generic bitmap csp->content_type
816  *       which can currently take the valued CT_TEXT or CT_GIF
817  *     - Reformatting etc
818  *     - Removed all #ifdef PCRS
819  *
820  *    Revision 1.23  2001/07/02 02:28:25  iwanttokeepanon
821  *    Added "#ifdef ACL_FILES" conditional compilation to line 1291 to exclude
822  *    the `block_acl' call.  This prevents a compilation error when the user
823  *    does not wish to use the "ACL" feature.
824  *
825  *    Revision 1.22  2001/06/29 21:45:41  oes
826  *    Indentation, CRLF->LF, Tab-> Space
827  *
828  *    Revision 1.21  2001/06/29 13:29:36  oes
829  *    - Cleaned up, improved comments
830  *    - Unified all possible interceptors (CGI,
831  *      block, trust, fast_redirect) in one
832  *      place, with one (CGI) answer generation
833  *      mechansim. Much clearer now.
834  *    - Removed the GIF image generation, which
835  *      is now done in filters.c:block_url()
836  *    - Made error conditions like domain lookup
837  *      failiure or (various) problems while talking
838  *      to the server use cgi.c:error_response()
839  *      instead of generating HTML/HTTP in chat() (yuck!)
840  *    - Removed logentry from cancelled commit
841  *
842  *    Revision 1.20  2001/06/09 10:55:28  jongfoster
843  *    Changing BUFSIZ ==> BUFFER_SIZE
844  *
845  *    Revision 1.19  2001/06/07 23:12:52  jongfoster
846  *    Replacing function pointer in struct gateway with a directly
847  *    called function forwarded_connect().
848  *    Replacing struct gateway with struct forward_spec
849  *
850  *    Revision 1.18  2001/06/03 19:12:16  oes
851  *    introduced new cgi handling
852  *
853  *    Revision 1.17  2001/06/01 20:07:23  jongfoster
854  *    Now uses action +image-blocker{} rather than config->tinygif
855  *
856  *    Revision 1.16  2001/06/01 18:49:17  jongfoster
857  *    Replaced "list_share" with "list" - the tiny memory gain was not
858  *    worth the extra complexity.
859  *
860  *    Revision 1.15  2001/05/31 21:24:47  jongfoster
861  *    Changed "permission" to "action" throughout.
862  *    Removed DEFAULT_USER_AGENT - it must now be specified manually.
863  *    Moved vanilla wafer check into chat(), since we must now
864  *    decide whether or not to add it based on the URL.
865  *
866  *    Revision 1.14  2001/05/29 20:14:01  joergs
867  *    AmigaOS bugfix: PCRS needs a lot of stack, stacksize for child threads
868  *    increased.
869  *
870  *    Revision 1.13  2001/05/29 09:50:24  jongfoster
871  *    Unified blocklist/imagelist/permissionslist.
872  *    File format is still under discussion, but the internal changes
873  *    are (mostly) done.
874  *
875  *    Also modified interceptor behaviour:
876  *    - We now intercept all URLs beginning with one of the following
877  *      prefixes (and *only* these prefixes):
878  *        * http://i.j.b/
879  *        * http://ijbswa.sf.net/config/
880  *        * http://ijbswa.sourceforge.net/config/
881  *    - New interceptors "home page" - go to http://i.j.b/ to see it.
882  *    - Internal changes so that intercepted and fast redirect pages
883  *      are not replaced with an image.
884  *    - Interceptors now have the option to send a binary page direct
885  *      to the client. (i.e. ijb-send-banner uses this)
886  *    - Implemented show-url-info interceptor.  (Which is why I needed
887  *      the above interceptors changes - a typical URL is
888  *      "http://i.j.b/show-url-info?url=www.somesite.com/banner.gif".
889  *      The previous mechanism would not have intercepted that, and
890  *      if it had been intercepted then it then it would have replaced
891  *      it with an image.)
892  *
893  *    Revision 1.12  2001/05/27 22:17:04  oes
894  *
895  *    - re_process_buffer no longer writes the modified buffer
896  *      to the client, which was very ugly. It now returns the
897  *      buffer, which it is then written by chat.
898  *
899  *    - content_length now adjusts the Content-Length: header
900  *      for modified documents rather than crunch()ing it.
901  *      (Length info in csp->content_length, which is 0 for
902  *      unmodified documents)
903  *
904  *    - For this to work, sed() is called twice when filtering.
905  *
906  *    Revision 1.11  2001/05/26 17:27:53  jongfoster
907  *    Added support for CLF and fixed LOG_LEVEL_LOG.
908  *    Also did CRLF->LF fix of my previous patch.
909  *
910  *    Revision 1.10  2001/05/26 15:26:15  jongfoster
911  *    ACL feature now provides more security by immediately dropping
912  *    connections from untrusted hosts.
913  *
914  *    Revision 1.9  2001/05/26 00:28:36  jongfoster
915  *    Automatic reloading of config file.
916  *    Removed obsolete SIGHUP support (Unix) and Reload menu option (Win32).
917  *    Most of the global variables have been moved to a new
918  *    struct configuration_spec, accessed through csp->config->globalname
919  *    Most of the globals remaining are used by the Win32 GUI.
920  *
921  *    Revision 1.8  2001/05/25 22:43:18  jongfoster
922  *    Fixing minor memory leak and buffer overflow.
923  *
924  *    Revision 1.7  2001/05/25 22:34:30  jongfoster
925  *    Hard tabs->Spaces
926  *
927  *    Revision 1.6  2001/05/23 00:13:58  joergs
928  *    AmigaOS support fixed.
929  *
930  *    Revision 1.5  2001/05/22 18:46:04  oes
931  *
932  *    - Enabled filtering banners by size rather than URL
933  *      by adding patterns that replace all standard banner
934  *      sizes with the "Junkbuster" gif to the re_filterfile
935  *
936  *    - Enabled filtering WebBugs by providing a pattern
937  *      which kills all 1x1 images
938  *
939  *    - Added support for PCRE_UNGREEDY behaviour to pcrs,
940  *      which is selected by the (nonstandard and therefore
941  *      capital) letter 'U' in the option string.
942  *      It causes the quantifiers to be ungreedy by default.
943  *      Appending a ? turns back to greedy (!).
944  *
945  *    - Added a new interceptor ijb-send-banner, which
946  *      sends back the "Junkbuster" gif. Without imagelist or
947  *      MSIE detection support, or if tinygif = 1, or the
948  *      URL isn't recognized as an imageurl, a lame HTML
949  *      explanation is sent instead.
950  *
951  *    - Added new feature, which permits blocking remote
952  *      script redirects and firing back a local redirect
953  *      to the browser.
954  *      The feature is conditionally compiled, i.e. it
955  *      can be disabled with --disable-fast-redirects,
956  *      plus it must be activated by a "fast-redirects"
957  *      line in the config file, has its own log level
958  *      and of course wants to be displayed by show-proxy-args
959  *      Note: Boy, all the #ifdefs in 1001 locations and
960  *      all the fumbling with configure.in and acconfig.h
961  *      were *way* more work than the feature itself :-(
962  *
963  *    - Because a generic redirect template was needed for
964  *      this, tinygif = 3 now uses the same.
965  *
966  *    - Moved GIFs, and other static HTTP response templates
967  *      to project.h
968  *
969  *    - Some minor fixes
970  *
971  *    - Removed some >400 CRs again (Jon, you really worked
972  *      a lot! ;-)
973  *
974  *    Revision 1.4  2001/05/21 19:34:01  jongfoster
975  *    Made failure to bind() a fatal error.
976  *
977  *    Revision 1.3  2001/05/20 01:21:20  jongfoster
978  *    Version 2.9.4 checkin.
979  *    - Merged popupfile and cookiefile, and added control over PCRS
980  *      filtering, in new "permissionsfile".
981  *    - Implemented LOG_LEVEL_FATAL, so that if there is a configuration
982  *      file error you now get a message box (in the Win32 GUI) rather
983  *      than the program exiting with no explanation.
984  *    - Made killpopup use the PCRS MIME-type checking and HTTP-header
985  *      skipping.
986  *    - Removed tabs from "config"
987  *    - Moved duplicated url parsing code in "loaders.c" to a new funcition.
988  *    - Bumped up version number.
989  *
990  *    Revision 1.2  2001/05/17 22:34:44  oes
991  *     - Added hint on GIF char array generation to jcc.c
992  *     - Cleaned CRLF's from the sources and related files
993  *     - Repaired logging for REF and FRC
994  *
995  *    Revision 1.1.1.1  2001/05/15 13:58:56  oes
996  *    Initial import of version 2.9.3 source tree
997  *
998  *
999  *********************************************************************/
1000 \f
1001
1002 #include "config.h"
1003
1004 #include <stdio.h>
1005 #include <sys/types.h>
1006 #include <stdlib.h>
1007 #include <string.h>
1008 #include <signal.h>
1009 #include <fcntl.h>
1010 #include <errno.h>
1011 #include <assert.h>
1012
1013 #ifdef _WIN32
1014 # ifndef FEATURE_PTHREAD
1015 #  ifndef STRICT
1016 #   define STRICT
1017 #  endif
1018 #  include <windows.h>
1019 #  include <process.h>
1020 # endif /* ndef FEATURE_PTHREAD */
1021
1022 # include "win32.h"
1023 # ifndef _WIN_CONSOLE
1024 #  include "w32log.h"
1025 # endif /* ndef _WIN_CONSOLE */
1026 # include "w32svrapi.h"
1027
1028 #else /* ifndef _WIN32 */
1029
1030 # if !defined (__OS2__)
1031 # include <unistd.h>
1032 # include <sys/wait.h>
1033 # endif /* ndef __OS2__ */
1034 # include <sys/time.h>
1035 # include <sys/stat.h>
1036 # include <sys/ioctl.h>
1037
1038 #ifdef sun
1039 #include <sys/termios.h>
1040 #endif /* sun */
1041
1042 #ifdef unix
1043 #include <pwd.h>
1044 #include <grp.h>
1045 #endif
1046
1047 # include <signal.h>
1048
1049 # ifdef __BEOS__
1050 #  include <socket.h>  /* BeOS has select() for sockets only. */
1051 #  include <OS.h>      /* declarations for threads and stuff. */
1052 # endif
1053
1054 # if defined(__EMX__) || defined(__OS2__)
1055 #  include <sys/select.h>  /* OS/2/EMX needs a little help with select */
1056 # endif
1057 # ifdef __OS2__
1058 #define INCL_DOS
1059 # include <os2.h>
1060 #define bzero(B,N) memset(B,0x00,n)
1061 # endif
1062
1063 # ifndef FD_ZERO
1064 #  include <select.h>
1065 # endif
1066
1067 #endif
1068
1069 #include "project.h"
1070 #include "list.h"
1071 #include "jcc.h"
1072 #include "filters.h"
1073 #include "loaders.h"
1074 #include "parsers.h"
1075 #include "miscutil.h"
1076 #include "errlog.h"
1077 #include "jbsockets.h"
1078 #include "gateway.h"
1079 #include "actions.h"
1080 #include "cgi.h"
1081 #include "loadcfg.h"
1082 #include "urlmatch.h"
1083
1084 const char jcc_h_rcs[] = JCC_H_VERSION;
1085 const char project_h_rcs[] = PROJECT_H_VERSION;
1086
1087 int no_daemon = 0;
1088 struct client_state  clients[1];
1089 struct file_list     files[1];
1090
1091 #ifdef FEATURE_STATISTICS
1092 int urls_read     = 0;     /* total nr of urls read inc rejected */
1093 int urls_rejected = 0;     /* total nr of urls rejected */
1094 #endif /* def FEATURE_STATISTICS */
1095
1096 #ifdef FEATURE_GRACEFUL_TERMINATION
1097 int g_terminate = 0;
1098 #endif
1099
1100 #if !defined(_WIN32) && !defined(__OS2__) && !defined(AMIGA)
1101 static void sig_handler(int the_signal);
1102 #endif
1103 static int client_protocol_is_unsupported(const struct client_state *csp, char *req);
1104 static jb_err get_request_destination_elsewhere(struct client_state *csp, struct list *headers);
1105 static jb_err get_server_headers(struct client_state *csp);
1106 static const char *crunch_reason(const struct http_response *rsp);
1107 static void send_crunch_response(struct client_state *csp, struct http_response *rsp);
1108 /*
1109  * static int request_contains_null_bytes(const struct client_state *csp, char *buf, int len);
1110  */
1111 static void build_request_line(struct client_state *csp, const struct forward_spec *fwd, char **request_line);
1112 static jb_err change_request_destination(struct client_state *csp);
1113 static void chat(struct client_state *csp);
1114 static void serve(struct client_state *csp);
1115 #if !defined(_WIN32) || defined(_WIN_CONSOLE)
1116 static void usage(const char *myname);
1117 #endif
1118 static void initialize_mutexes(void);
1119 static jb_socket bind_port_helper(struct configuration_spec *config);
1120 static void listen_loop(void);
1121
1122 #ifdef AMIGA
1123 void serve(struct client_state *csp);
1124 #else /* ifndef AMIGA */
1125 static void serve(struct client_state *csp);
1126 #endif /* def AMIGA */
1127
1128 #ifdef __BEOS__
1129 static int32 server_thread(void *data);
1130 #endif /* def __BEOS__ */
1131
1132 #ifdef _WIN32
1133 #define sleep(N)  Sleep(((N) * 1000))
1134 #endif
1135
1136 #ifdef __OS2__
1137 #define sleep(N)  DosSleep(((N) * 100))
1138 #endif
1139
1140 #ifdef FEATURE_PTHREAD
1141 pthread_mutex_t log_mutex;
1142 pthread_mutex_t log_init_mutex;
1143
1144 #if !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R)
1145 pthread_mutex_t resolver_mutex;
1146 #endif /* !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R) */
1147
1148 #ifndef HAVE_GMTIME_R
1149 pthread_mutex_t gmtime_mutex;
1150 #endif /* ndef HAVE_GMTIME_R */
1151
1152 #ifndef HAVE_LOCALTIME_R
1153 pthread_mutex_t localtime_mutex;
1154 #endif /* ndef HAVE_GMTIME_R */
1155
1156 #ifndef HAVE_RANDOM
1157 pthread_mutex_t rand_mutex;
1158 #endif /* ndef HAVE_RANDOM */
1159
1160 #endif /* FEATURE_PTHREAD */
1161
1162 #if defined(unix) || defined(__EMX__)
1163 const char *basedir = NULL;
1164 const char *pidfile = NULL;
1165 int received_hup_signal = 0;
1166 #endif /* defined unix */
1167
1168 /* HTTP snipplets. */
1169 static const char CSUCCEED[] =
1170    "HTTP/1.0 200 Connection established\r\n"
1171    "Proxy-Agent: Privoxy/" VERSION "\r\n\r\n";
1172
1173 static const char CHEADER[] =
1174    "HTTP/1.0 400 Invalid header received from client\r\n"
1175    "Proxy-Agent: Privoxy " VERSION "\r\n"
1176    "Content-Type: text/plain\r\n"
1177    "Connection: close\r\n\r\n"
1178    "Invalid header received from client.\r\n";
1179
1180 static const char FTP_RESPONSE[] =
1181    "HTTP/1.0 400 Invalid request received from client\r\n"
1182    "Content-Type: text/plain\r\n"
1183    "Connection: close\r\n\r\n"
1184    "Invalid request. Privoxy doesn't support FTP.\r\n";
1185
1186 static const char GOPHER_RESPONSE[] =
1187    "HTTP/1.0 400 Invalid request received from client\r\n"
1188    "Content-Type: text/plain\r\n"
1189    "Connection: close\r\n\r\n"
1190    "Invalid request. Privoxy doesn't support gopher.\r\n";
1191
1192 /* XXX: should be a template */
1193 static const char MISSING_DESTINATION_RESPONSE[] =
1194    "HTTP/1.0 400 Bad request received from client\r\n"
1195    "Proxy-Agent: Privoxy " VERSION "\r\n"
1196    "Content-Type: text/plain\r\n"
1197    "Connection: close\r\n\r\n"
1198    "Bad request. Privoxy was unable to extract the destination.\r\n";
1199
1200 /* XXX: should be a template */
1201 static const char NO_SERVER_DATA_RESPONSE[] =
1202    "HTTP/1.0 502 Server or forwarder response empty\r\n"
1203    "Proxy-Agent: Privoxy " VERSION "\r\n"
1204    "Content-Type: text/plain\r\n"
1205    "Connection: close\r\n\r\n"
1206    "Empty server or forwarder response.\r\n"
1207    "The connection has been closed but Privoxy didn't receive any data.\r\n";
1208
1209 /* XXX: should be a template */
1210 static const char INVALID_SERVER_HEADERS_RESPONSE[] =
1211    "HTTP/1.0 502 Server or forwarder response invalid\r\n"
1212    "Proxy-Agent: Privoxy " VERSION "\r\n"
1213    "Content-Type: text/plain\r\n"
1214    "Connection: close\r\n\r\n"
1215    "Bad response. The server or forwarder response doesn't look like HTTP.\r\n";
1216
1217 #if 0
1218 /* XXX: should be a template */
1219 static const char NULL_BYTE_RESPONSE[] =
1220    "HTTP/1.0 400 Bad request received from client\r\n"
1221    "Proxy-Agent: Privoxy " VERSION "\r\n"
1222    "Content-Type: text/plain\r\n"
1223    "Connection: close\r\n\r\n"
1224    "Bad request. Null byte(s) before end of request.\r\n";
1225 #endif
1226
1227 /* XXX: should be a template */
1228 static const char MESSED_UP_REQUEST_RESPONSE[] =
1229    "HTTP/1.0 400 Malformed request after rewriting\r\n"
1230    "Proxy-Agent: Privoxy " VERSION "\r\n"
1231    "Content-Type: text/plain\r\n"
1232    "Connection: close\r\n\r\n"
1233    "Bad request. Messed up with header filters.\r\n";
1234
1235 /* A function to crunch a response */
1236 typedef struct http_response *(*crunch_func_ptr)(struct client_state *);
1237
1238 /* Crunch function flags */
1239 #define CF_NO_FLAGS        0
1240 /* Cruncher applies to forced requests as well */
1241 #define CF_IGNORE_FORCE    1
1242 /* Crunched requests are counted for the block statistics */
1243 #define CF_COUNT_AS_REJECT 2
1244
1245 /* A crunch function and its flags */
1246 struct cruncher
1247 {
1248    const crunch_func_ptr cruncher;
1249    const int flags;
1250 };
1251
1252 static int crunch_response_triggered(struct client_state *csp, const struct cruncher crunchers[]);
1253
1254 /* Complete list of cruncher functions */
1255 static const struct cruncher crunchers_all[] = {
1256    { direct_response, CF_COUNT_AS_REJECT|CF_IGNORE_FORCE},
1257    { block_url,       CF_COUNT_AS_REJECT },
1258 #ifdef FEATURE_TRUST
1259    { trust_url,       CF_COUNT_AS_REJECT },
1260 #endif /* def FEATURE_TRUST */
1261    { redirect_url,    CF_NO_FLAGS  },
1262    { dispatch_cgi,    CF_IGNORE_FORCE},
1263    { NULL,            0 }
1264 };
1265
1266 /* Light version, used after tags are applied */
1267 static const struct cruncher crunchers_light[] = {
1268    { block_url,       CF_COUNT_AS_REJECT },
1269    { redirect_url,    CF_NO_FLAGS },
1270    { NULL,            0 }
1271 };
1272
1273
1274 #if !defined(_WIN32) && !defined(__OS2__) && !defined(AMIGA)
1275 /*********************************************************************
1276  *
1277  * Function    :  sig_handler 
1278  *
1279  * Description :  Signal handler for different signals.
1280  *                Exit gracefully on TERM and INT
1281  *                or set a flag that will cause the errlog
1282  *                to be reopened by the main thread on HUP.
1283  *
1284  * Parameters  :
1285  *          1  :  the_signal = the signal cause this function to call
1286  *
1287  * Returns     :  - 
1288  *
1289  *********************************************************************/
1290 static void sig_handler(int the_signal)
1291 {
1292    switch(the_signal)
1293    {
1294       case SIGTERM:
1295       case SIGINT:
1296          log_error(LOG_LEVEL_INFO, "exiting by signal %d .. bye", the_signal);
1297 #if defined(unix)
1298          if(pidfile)
1299          {
1300             unlink(pidfile);
1301          }
1302 #endif /* unix */
1303          exit(the_signal);
1304          break;
1305
1306       case SIGHUP:
1307          received_hup_signal = 1;
1308          break;         
1309
1310       default:
1311          /* 
1312           * We shouldn't be here, unless we catch signals
1313           * in main() that we can't handle here!
1314           */
1315          log_error(LOG_LEVEL_FATAL, "sig_handler: exiting on unexpected signal %d", the_signal);
1316    }
1317    return;
1318
1319 }
1320 #endif
1321
1322
1323 /*********************************************************************
1324  *
1325  * Function    :  client_protocol_is_unsupported
1326  *
1327  * Description :  Checks if the client used a known unsupported
1328  *                protocol and deals with it by sending an error
1329  *                response.
1330  *
1331  * Parameters  :
1332  *          1  :  csp = Current client state (buffers, headers, etc...)
1333  *          2  :  req = the first request line send by the client
1334  *
1335  * Returns     :  TRUE if an error response has been generated, or
1336  *                FALSE if the request doesn't look invalid.
1337  *
1338  *********************************************************************/
1339 static int client_protocol_is_unsupported(const struct client_state *csp, char *req)
1340 {
1341    /*
1342     * If it's a FTP or gopher request, we don't support it.
1343     *
1344     * These checks are better than nothing, but they might
1345     * not work in all configurations and some clients might
1346     * have problems digesting the answer.
1347     *
1348     * They should, however, never cause more problems than
1349     * Privoxy's old behaviour (returning the misleading HTML
1350     * error message:
1351     *
1352     * "Could not resolve http://(ftp|gopher)://example.org").
1353     */
1354    if (!strncmpic(req, "GET ftp://", 10) || !strncmpic(req, "GET gopher://", 13))
1355    {
1356       const char *response = NULL;
1357       const char *protocol = NULL;
1358
1359       if (!strncmpic(req, "GET ftp://", 10))
1360       {
1361          response = FTP_RESPONSE;
1362          protocol = "FTP";
1363       }
1364       else
1365       {
1366          response = GOPHER_RESPONSE;
1367          protocol = "GOPHER";
1368       }
1369       log_error(LOG_LEVEL_ERROR,
1370          "%s tried to use Privoxy as %s proxy: %s",
1371          csp->ip_addr_str, protocol, req);
1372       log_error(LOG_LEVEL_CLF,
1373          "%s - - [%T] \"%s\" 400 0", csp->ip_addr_str, req);
1374       freez(req);
1375       write_socket(csp->cfd, response, strlen(response));
1376
1377       return TRUE;
1378    }
1379
1380    return FALSE;
1381 }
1382
1383
1384 /*********************************************************************
1385  *
1386  * Function    :  get_request_destination_elsewhere
1387  *
1388  * Description :  If the client's request was redirected into
1389  *                Privoxy without the client's knowledge,
1390  *                the request line lacks the destination host.
1391  *
1392  *                This function tries to get it elsewhere,
1393  *                provided accept-intercepted-requests is enabled.
1394  *
1395  *                "Elsewhere" currently only means "Host: header",
1396  *                but in the future we may ask the redirecting
1397  *                packet filter to look the destination up.
1398  *
1399  *                If the destination stays unknown, an error
1400  *                response is send to the client and headers
1401  *                are freed so that chat() can return directly.
1402  *
1403  * Parameters  :
1404  *          1  :  csp = Current client state (buffers, headers, etc...)
1405  *          2  :  headers = a header list
1406  *
1407  * Returns     :  JB_ERR_OK if the destination is now known, or
1408  *                JB_ERR_PARSE if it isn't.
1409  *
1410  *********************************************************************/
1411 static jb_err get_request_destination_elsewhere(struct client_state *csp, struct list *headers)
1412 {
1413    char *req;
1414
1415    if (!(csp->config->feature_flags & RUNTIME_FEATURE_ACCEPT_INTERCEPTED_REQUESTS))
1416    {
1417       log_error(LOG_LEVEL_ERROR, "%s's request: \'%s\' is invalid."
1418          " Privoxy isn't configured to accept intercepted requests.",
1419          csp->ip_addr_str, csp->http->cmd);
1420       /* XXX: Use correct size */
1421       log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
1422          csp->ip_addr_str, csp->http->cmd);
1423
1424       write_socket(csp->cfd, CHEADER, strlen(CHEADER));
1425       destroy_list(headers);
1426
1427       return JB_ERR_PARSE;
1428    }
1429    else if (JB_ERR_OK == get_destination_from_headers(headers, csp->http))
1430    {
1431       /* Split the domain we just got for pattern matching */
1432       init_domain_components(csp->http);
1433
1434       return JB_ERR_OK;
1435    }
1436    else
1437    {
1438       /* We can't work without destination. Go spread the news.*/
1439
1440       req = list_to_text(headers);
1441       chomp(req);
1442       /* XXX: Use correct size */
1443       log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
1444          csp->ip_addr_str, csp->http->cmd);
1445       log_error(LOG_LEVEL_ERROR,
1446          "Privoxy was unable to get the destination for %s's request:\n%s\n%s",
1447          csp->ip_addr_str, csp->http->cmd, req);
1448       freez(req);
1449
1450       write_socket(csp->cfd, MISSING_DESTINATION_RESPONSE, strlen(MISSING_DESTINATION_RESPONSE));
1451       destroy_list(headers);
1452
1453       return JB_ERR_PARSE;
1454    }
1455    /*
1456     * TODO: If available, use PF's ioctl DIOCNATLOOK as last resort
1457     * to get the destination IP address, use it as host directly
1458     * or do a reverse DNS lookup first.
1459     */
1460 }
1461
1462
1463 /*********************************************************************
1464  *
1465  * Function    :  get_server_headers
1466  *
1467  * Description :  Parses server headers in iob and fills them
1468  *                into csp->headers so that they can later be
1469  *                handled by sed().
1470  *
1471  * Parameters  :
1472  *          1  :  csp = Current client state (buffers, headers, etc...)
1473  *
1474  * Returns     :  JB_ERR_OK if everything went fine, or
1475  *                JB_ERR_PARSE if the headers were incomplete.
1476  *
1477  *********************************************************************/
1478 static jb_err get_server_headers(struct client_state *csp)
1479 {
1480    int continue_hack_in_da_house = 0;
1481    char * header;
1482
1483    while (((header = get_header(csp->iob)) != NULL) || continue_hack_in_da_house)
1484    {
1485       if (header == NULL)
1486       {
1487          /*
1488           * continue hack in da house. Ignore the ending of
1489           * this head and continue enlisting header lines.
1490           * The reason is described below.
1491           */
1492          enlist(csp->headers, "");
1493          continue_hack_in_da_house = 0;
1494          continue;
1495       }
1496       else if (0 == strncmpic(header, "HTTP/1.1 100", 12))
1497       {
1498          /*
1499           * It's a bodyless continue response, don't
1500           * stop header parsing after reaching it's end.
1501           *
1502           * As a result Privoxy will concatenate the
1503           * next response's head and parse and deliver
1504           * the headers as if they belonged to one request.
1505           *
1506           * The client will separate them because of the
1507           * empty line between them.
1508           *
1509           * XXX: What we're doing here is clearly against
1510           * the intended purpose of the continue header,
1511           * and under some conditions (HTTP/1.0 client request)
1512           * it's a standard violation.
1513           *
1514           * Anyway, "sort of against the spec" is preferable
1515           * to "always getting confused by Continue responses"
1516           * (Privoxy's behaviour before this hack was added)
1517           */
1518          log_error(LOG_LEVEL_HEADER, "Continue hack in da house.");
1519          continue_hack_in_da_house = 1;
1520       }
1521       else if (*header == '\0') 
1522       {
1523          /*
1524           * If the header is empty, but the Continue hack
1525           * isn't active, we can assume that we reached the
1526           * end of the buffer before we hit the end of the
1527           * head.
1528           *
1529           * Inform the caller an let it decide how to handle it.
1530           */
1531          return JB_ERR_PARSE;
1532       }
1533
1534       if (JB_ERR_MEMORY == enlist(csp->headers, header))
1535       {
1536          /*
1537           * XXX: Should we quit the request and return a
1538           * out of memory error page instead?
1539           */
1540          log_error(LOG_LEVEL_ERROR,
1541             "Out of memory while enlisting server headers. %s lost.",
1542             header);
1543       }
1544       freez(header);
1545    }
1546
1547    return JB_ERR_OK;
1548 }
1549
1550
1551 /*********************************************************************
1552  *
1553  * Function    :  crunch_reason
1554  *
1555  * Description :  Translates the crunch reason code into a string.
1556  *
1557  * Parameters  :
1558  *          1  :  rsp = a http_response
1559  *
1560  * Returns     :  A string with the crunch reason or an error description.
1561  *
1562  *********************************************************************/
1563 static const char *crunch_reason(const struct http_response *rsp)
1564 {
1565    char * reason = NULL;
1566
1567    assert(rsp != NULL);
1568    if (rsp == NULL)
1569    {
1570       return "Internal error while searching for crunch reason";
1571    }
1572
1573    switch (rsp->reason)
1574    {
1575       case RSP_REASON_UNSUPPORTED:
1576          reason = "Unsupported HTTP feature";
1577          break;
1578       case RSP_REASON_BLOCKED:
1579          reason = "Blocked";
1580          break;
1581       case RSP_REASON_UNTRUSTED:
1582          reason = "Untrusted";
1583          break;
1584       case RSP_REASON_REDIRECTED:
1585          reason = "Redirected";
1586          break;
1587       case RSP_REASON_CGI_CALL:
1588          reason = "CGI Call";
1589          break;
1590       case RSP_REASON_NO_SUCH_DOMAIN:
1591          reason = "DNS failure";
1592          break;
1593       case RSP_REASON_FORWARDING_FAILED:
1594          reason = "Forwarding failed";
1595          break;
1596       case RSP_REASON_CONNECT_FAILED:
1597          reason = "Connection failure";
1598          break;
1599       case RSP_REASON_OUT_OF_MEMORY:
1600          reason = "Out of memory (may mask other reasons)";
1601          break;
1602       default:
1603          reason = "No reason recorded";
1604          break;
1605    }
1606
1607    return reason;
1608 }
1609
1610
1611 /*********************************************************************
1612  *
1613  * Function    :  send_crunch_response
1614  *
1615  * Description :  Delivers already prepared response for
1616  *                intercepted requests, logs the interception
1617  *                and frees the response.
1618  *
1619  * Parameters  :
1620  *          1  :  csp = Current client state (buffers, headers, etc...)
1621  *          1  :  rsp = Fully prepared response. Will be freed on exit.
1622  *
1623  * Returns     :  Nothing.
1624  *
1625  *********************************************************************/
1626 static void send_crunch_response(struct client_state *csp, struct http_response *rsp)
1627 {
1628       const struct http_request *http = csp->http;
1629       char status_code[4];
1630
1631       assert(rsp != NULL);
1632       assert(rsp->head != NULL);
1633
1634       if (rsp == NULL)
1635       {
1636          /*
1637           * Not supposed to happen. If it does
1638           * anyway, treat it as an unknown error.
1639           */
1640          cgi_error_unknown(csp, rsp, RSP_REASON_INTERNAL_ERROR);
1641          /* return code doesn't matter */
1642       }
1643
1644       if (rsp == NULL)
1645       {
1646          /* If rsp is still NULL, we have serious internal problems. */
1647          log_error(LOG_LEVEL_FATAL,
1648             "NULL response in send_crunch_response and cgi_error_unknown failed as well.");
1649       }
1650
1651       /*
1652        * Extract the status code from the actual head
1653        * that was send to the client. It is the only
1654        * way to get it right for all requests, including
1655        * the fixed ones for out-of-memory problems.
1656        *
1657        * A head starts like this: 'HTTP/1.1 200...'
1658        *                           0123456789|11
1659        *                                     10
1660        */
1661       status_code[0] = rsp->head[9];
1662       status_code[1] = rsp->head[10];
1663       status_code[2] = rsp->head[11];
1664       status_code[3] = '\0';
1665
1666       /* Write the answer to the client */
1667       if (write_socket(csp->cfd, rsp->head, rsp->head_length)
1668        || write_socket(csp->cfd, rsp->body, rsp->content_length))
1669       {
1670          /* There is nothing we can do about it. */
1671          log_error(LOG_LEVEL_ERROR, "write to: %s failed: %E", csp->http->host);
1672       }
1673
1674       /* Log that the request was crunched and why. */
1675       log_error(LOG_LEVEL_GPC, "%s%s crunch! (%s)",
1676          http->hostport, http->path, crunch_reason(rsp));
1677       log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" %s %d",
1678          csp->ip_addr_str, http->ocmd, status_code, rsp->content_length);
1679
1680       /* Clean up and return */
1681       if (cgi_error_memory() != rsp)
1682       {
1683          free_http_response(rsp);
1684       } 
1685       return;
1686 }
1687
1688
1689 #if 0
1690 /*********************************************************************
1691  *
1692  * Function    :  request_contains_null_bytes
1693  *
1694  * Description :  Checks for NULL bytes in the request and sends
1695  *                an error message to the client if any were found.
1696  *
1697  *                XXX: currently not used, see comment in chat().
1698  *
1699  * Parameters  :
1700  *          1  :  csp = Current client state (buffers, headers, etc...)
1701  *          2  :  buf = Data from the client's request to check.
1702  *          3  :  len = The data length.
1703  *
1704  * Returns     :  TRUE if the request contained one or more NULL bytes, or
1705  *                FALSE otherwise.
1706  *
1707  *********************************************************************/
1708 static int request_contains_null_bytes(const struct client_state *csp, char *buf, int len)
1709 {
1710    size_t c_len; /* Request lenght when treated as C string */
1711
1712    c_len = strlen(buf);
1713
1714    if (c_len < len)
1715    {
1716       /*
1717        * Null byte(s) found. Log the request,
1718        * return an error response and hang up.
1719        */
1720       size_t tmp_len = c_len;
1721
1722       do
1723       {
1724         /*
1725          * Replace NULL byte(s) with '°' characters
1726          * so the request can be logged as string.
1727          * XXX: Is there a better replacement character?
1728          */
1729          buf[tmp_len]='°';
1730          tmp_len += strlen(buf+tmp_len);
1731       } while (tmp_len < len);
1732
1733       log_error(LOG_LEVEL_ERROR, "%s\'s request contains at least one NULL byte "
1734          "(length=%d, strlen=%d).", csp->ip_addr_str, len, c_len);
1735       log_error(LOG_LEVEL_HEADER, 
1736          "Offending request data with NULL bytes turned into \'°\' characters: %s", buf);
1737
1738       write_socket(csp->cfd, NULL_BYTE_RESPONSE, strlen(NULL_BYTE_RESPONSE));
1739
1740       /* XXX: Log correct size */
1741       log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request\" 400 0", csp->ip_addr_str);
1742
1743       return TRUE;
1744    }
1745
1746    return FALSE;
1747 }
1748 #endif
1749
1750
1751 /*********************************************************************
1752  *
1753  * Function    :  crunch_response_triggered
1754  *
1755  * Description :  Checks if the request has to be crunched,
1756  *                and delivers the crunch response if necessary.
1757  *
1758  * Parameters  :
1759  *          1  :  csp = Current client state (buffers, headers, etc...)
1760  *          2  :  crunchers = list of cruncher functions to run
1761  *
1762  * Returns     :  TRUE if the request was answered with a crunch response
1763  *                FALSE otherwise.
1764  *
1765  *********************************************************************/
1766 static int crunch_response_triggered(struct client_state *csp, const struct cruncher crunchers[])
1767 {
1768    struct http_response *rsp = NULL;
1769    const struct cruncher *c;
1770
1771    /*
1772     * If CGI request crunching is disabled,
1773     * check the CGI dispatcher out of order to
1774     * prevent unintentional blocks or redirects. 
1775     */
1776    if (!(csp->config->feature_flags & RUNTIME_FEATURE_CGI_CRUNCHING)
1777        && (NULL != (rsp = dispatch_cgi(csp))))
1778    {
1779       /* Deliver, log and free the interception response. */
1780       send_crunch_response(csp, rsp);
1781       return TRUE;
1782    }
1783
1784    for (c = crunchers; c->cruncher != NULL; c++)
1785    {
1786       /*
1787        * Check the cruncher if either Privoxy is toggled
1788        * on and the request isn't forced, or if the cruncher
1789        * applies to forced requests as well.
1790        */
1791       if (((csp->flags & CSP_FLAG_TOGGLED_ON) &&
1792           !(csp->flags & CSP_FLAG_FORCED)) ||
1793           (c->flags & CF_IGNORE_FORCE))
1794       {
1795          rsp = c->cruncher(csp);
1796          if (NULL != rsp)
1797          {
1798             /* Deliver, log and free the interception response. */
1799             send_crunch_response(csp, rsp);
1800 #ifdef FEATURE_STATISTICS
1801             if (c->flags & CF_COUNT_AS_REJECT)
1802             {
1803                csp->flags |= CSP_FLAG_REJECTED;
1804             }
1805 #endif /* def FEATURE_STATISTICS */
1806
1807             return TRUE;
1808          }
1809       }
1810    }
1811
1812    return FALSE;
1813 }
1814
1815
1816 /*********************************************************************
1817  *
1818  * Function    :  build_request_line
1819  *
1820  * Description :  Builds the HTTP request line.
1821  *
1822  *                If a HTTP forwarder is used it expects the whole URL,
1823  *                web servers only get the path.
1824  *
1825  * Parameters  :
1826  *          1  :  csp = Current client state (buffers, headers, etc...)
1827  *          2  :  fwd = The forwarding spec used for the request
1828  *                XXX: Should use http->fwd instead.
1829  *          3  :  request_line = The old request line which will be replaced.
1830  *
1831  * Returns     :  Nothing. Terminates in case of memory problems.
1832  *
1833  *********************************************************************/
1834 static void build_request_line(struct client_state *csp, const struct forward_spec *fwd, char **request_line)
1835 {
1836    struct http_request *http = csp->http;
1837
1838    assert(http->ssl == 0);
1839
1840    /*
1841     * Downgrade http version from 1.1 to 1.0
1842     * if +downgrade action applies.
1843     */
1844    if ( (csp->action->flags & ACTION_DOWNGRADE)
1845      && (!strcmpic(http->ver, "HTTP/1.1")))
1846    {
1847       freez(http->ver);
1848       http->ver = strdup("HTTP/1.0");
1849
1850       if (http->ver == NULL)
1851       {
1852          log_error(LOG_LEVEL_FATAL, "Out of memory downgrading HTTP version");
1853       }
1854    }
1855
1856    /*
1857     * Rebuild the request line.
1858     */
1859    freez(*request_line);
1860    *request_line = strdup(http->gpc);
1861    string_append(request_line, " ");
1862
1863    if (fwd->forward_host)
1864    {
1865       string_append(request_line, http->url);
1866    }
1867    else
1868    {
1869       string_append(request_line, http->path);
1870    }
1871    string_append(request_line, " ");
1872    string_append(request_line, http->ver);
1873
1874    if (*request_line == NULL)
1875    {
1876       log_error(LOG_LEVEL_FATAL, "Out of memory writing HTTP command");
1877    }
1878    log_error(LOG_LEVEL_HEADER, "New HTTP Request-Line: %s", *request_line);
1879 }
1880
1881
1882 /*********************************************************************
1883  *
1884  * Function    :  change_request_destination
1885  *
1886  * Description :  Parse a (rewritten) request line and regenerate
1887  *                the http request data.
1888  *
1889  * Parameters  :
1890  *          1  :  csp = Current client state (buffers, headers, etc...)
1891  *
1892  * Returns     :  Forwards the parse_http_request() return code.
1893  *                Terminates in case of memory problems.
1894  *
1895  *********************************************************************/
1896 static jb_err change_request_destination(struct client_state *csp)
1897 {
1898    struct http_request *http = csp->http;
1899    jb_err err;
1900
1901    log_error(LOG_LEVEL_INFO, "Rewrite detected: %s", csp->headers->first->str);
1902    free_http_request(http);
1903    err = parse_http_request(csp->headers->first->str, http, csp);
1904    if (JB_ERR_OK != err)
1905    {
1906       log_error(LOG_LEVEL_ERROR, "Couldn't parse rewritten request: %s.",
1907          jb_err_to_string(err));
1908    }
1909    http->ocmd = strdup(http->cmd); /* XXX: ocmd is a misleading name */
1910    if (http->ocmd == NULL)
1911    {
1912       log_error(LOG_LEVEL_FATAL, "Out of memory copying rewritten HTTP request line");
1913    }
1914
1915    return err;
1916 }
1917
1918
1919 /*********************************************************************
1920  *
1921  * Function    :  chat
1922  *
1923  * Description :  Once a connection to the client has been accepted,
1924  *                this function is called (via serve()) to handle the
1925  *                main business of the communication.  When this
1926  *                function returns, the caller must close the client
1927  *                socket handle.
1928  *
1929  *                FIXME: chat is nearly thousand lines long.
1930  *                Ridiculous.
1931  *
1932  * Parameters  :
1933  *          1  :  csp = Current client state (buffers, headers, etc...)
1934  *
1935  * Returns     :  Nothing.
1936  *
1937  *********************************************************************/
1938 static void chat(struct client_state *csp)
1939 {
1940    char buf[BUFFER_SIZE];
1941    char *hdr;
1942    char *p;
1943    char *req = NULL;
1944    fd_set rfds;
1945    int n;
1946    jb_socket maxfd;
1947    int server_body;
1948    int ms_iis5_hack = 0;
1949    size_t byte_count = 0;
1950    int forwarded_connect_retries = 0;
1951    int max_forwarded_connect_retries = csp->config->forwarded_connect_retries;
1952    const struct forward_spec * fwd;
1953    struct http_request *http;
1954    int len; /* for buffer sizes (and negative error codes) */
1955    jb_err err;
1956
1957    /* Function that does the content filtering for the current request */
1958    filter_function_ptr content_filter = NULL;
1959
1960    /* Skeleton for HTTP response, if we should intercept the request */
1961    struct http_response *rsp;
1962
1963    /* Temporary copy of the client's headers before they get enlisted in csp->headers */
1964    struct list header_list;
1965    struct list *headers = &header_list;
1966
1967    http = csp->http;
1968
1969    memset(buf, 0, sizeof(buf));
1970
1971    /*
1972     * Read the client's request.  Note that since we're not using select() we
1973     * could get blocked here if a client connected, then didn't say anything!
1974     */
1975
1976    do
1977    {
1978       len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
1979
1980       if (len <= 0) break;      /* error! */
1981
1982       /*
1983        * If there is no memory left for buffering the
1984        * request, there is nothing we can do but hang up
1985        */
1986       if (add_to_iob(csp, buf, len))
1987       {
1988          return;
1989       }
1990
1991       req = get_header(csp->iob);
1992
1993    } while ((NULL != req) && ('\0' == *req));
1994
1995    if ((NULL != req) && ('\0' != *req))
1996    {
1997       /* Request received. Validate and parse it. */
1998
1999 #if 0
2000       /*
2001        * XXX: Temporary disabled to prevent problems
2002        * with POST requests whose bodies are allowed to
2003        * contain NULL bytes. BR#1730105.
2004        *
2005        * The main purpose of this check is to properly
2006        * log stuff like BitTorrent traffic and other junk
2007        * that hits public proxies. It's not required for
2008        * Privoxy to functions as those requests are discarded
2009        * later on anyway.
2010        *
2011        * It probably should be rewritten to only check
2012        * the head of the request. Another option would
2013        * be to let all POST requests pass, although that
2014        * may not be good enough.
2015        */
2016       if (request_contains_null_bytes(csp, buf, len))
2017       {
2018          /* NULL bytes found and dealt with, just hang up. */
2019          return;
2020       }
2021 #endif
2022
2023       /* Does the request line look invalid? */
2024       if (client_protocol_is_unsupported(csp, req))
2025       {
2026          /* 
2027           * Yes. The request has already been
2028           * answered with a error response, the buffers
2029           * were freed and we're done with chatting.
2030           */
2031          return;
2032       }
2033
2034 #ifdef FEATURE_FORCE_LOAD
2035       /*
2036        * If this request contains the FORCE_PREFIX and blocks
2037        * aren't enforced, get rid of it and set the force flag.
2038        */
2039       if (strstr(req, FORCE_PREFIX))
2040       {
2041          if (csp->config->feature_flags & RUNTIME_FEATURE_ENFORCE_BLOCKS)
2042          {
2043             log_error(LOG_LEVEL_FORCE,
2044                "Ignored force prefix in request: \"%s\".", req);
2045          }
2046          else
2047          {
2048             strclean(req, FORCE_PREFIX);
2049             log_error(LOG_LEVEL_FORCE, "Enforcing request: \"%s\".", req);
2050             csp->flags |= CSP_FLAG_FORCED;
2051          }
2052       }
2053
2054 #endif /* def FEATURE_FORCE_LOAD */
2055       err = parse_http_request(req, http, csp);
2056       if (JB_ERR_OK != err)
2057       {
2058          log_error(LOG_LEVEL_ERROR, "Couldn't parse request: %s.", jb_err_to_string(err));
2059       }
2060
2061       freez(req);
2062    }
2063
2064    if (http->cmd == NULL)
2065    {
2066       write_socket(csp->cfd, CHEADER, strlen(CHEADER));
2067       /* XXX: Use correct size */
2068       log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request\" 400 0", csp->ip_addr_str);
2069       log_error(LOG_LEVEL_ERROR, "Invalid header received from %s.", csp->ip_addr_str);
2070
2071       free_http_request(http);
2072       return;
2073    }
2074
2075    /* grab the rest of the client's headers */
2076    init_list(headers);
2077    for (;;)
2078    {
2079       p = get_header(csp->iob);
2080
2081       if (p == NULL)
2082       {
2083          /* There are no additional headers to read. */
2084          break;
2085       }
2086
2087       if (*p == '\0')
2088       {
2089          /*
2090           * We didn't receive a complete header
2091           * line yet, get the rest of it.
2092           */
2093          len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
2094          if (len <= 0)
2095          {
2096             log_error(LOG_LEVEL_ERROR, "read from client failed: %E");
2097             destroy_list(headers);
2098             return;
2099          }
2100          
2101          if (add_to_iob(csp, buf, len))
2102          {
2103             /*
2104              * If there is no memory left for buffering the
2105              * request, there is nothing we can do but hang up
2106              */
2107             destroy_list(headers);
2108             return;
2109          }
2110       }
2111       else
2112       {
2113          /*
2114           * We were able to read a complete
2115           * header and can finaly enlist it.
2116           */
2117          enlist(headers, p);
2118          freez(p);
2119       }
2120    }
2121
2122    if (http->host == NULL)
2123    {
2124       /*
2125        * If we still don't know the request destination,
2126        * the request is invalid or the client uses
2127        * Privoxy without its knowledge.
2128        */
2129       if (JB_ERR_OK != get_request_destination_elsewhere(csp, headers))
2130       {
2131          /*
2132           * Our attempts to get the request destination
2133           * elsewhere failed or Privoxy is configured
2134           * to only accept proxy requests.
2135           *
2136           * An error response has already been send
2137           * and we're done here.
2138           */
2139          return;
2140       }
2141    }
2142
2143    /*
2144     * Determine the actions for this URL
2145     */
2146 #ifdef FEATURE_TOGGLE
2147    if (!(csp->flags & CSP_FLAG_TOGGLED_ON))
2148    {
2149       /* Most compatible set of actions (i.e. none) */
2150       init_current_action(csp->action);
2151    }
2152    else
2153 #endif /* ndef FEATURE_TOGGLE */
2154    {
2155       get_url_actions(csp, http);
2156    }
2157
2158    /* 
2159     * Save a copy of the original request for logging
2160     */
2161    http->ocmd = strdup(http->cmd);
2162
2163    if (http->ocmd == NULL)
2164    {
2165       log_error(LOG_LEVEL_FATAL, "Out of memory copying HTTP request line");
2166    }
2167
2168    enlist(csp->headers, http->cmd);
2169
2170    /* Append the previously read headers */
2171    list_append_list_unique(csp->headers, headers);
2172    destroy_list(headers);
2173
2174    err = sed(client_patterns, add_client_headers, csp);
2175    if (JB_ERR_OK != err)
2176    {
2177       assert(err == JB_ERR_PARSE);
2178       log_error(LOG_LEVEL_FATAL, "Failed to parse client headers");
2179    }
2180    csp->flags |= CSP_FLAG_CLIENT_HEADER_PARSING_DONE;
2181
2182    /* Check request line for rewrites. */
2183    if ((NULL == csp->headers->first->str)
2184       || (strcmp(http->cmd, csp->headers->first->str) &&
2185          (JB_ERR_OK != change_request_destination(csp))))
2186    {
2187       /*
2188        * A header filter broke the request line - bail out.
2189        */
2190       write_socket(csp->cfd, MESSED_UP_REQUEST_RESPONSE, strlen(MESSED_UP_REQUEST_RESPONSE));
2191       /* XXX: Use correct size */
2192       log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request generated\" 500 0", csp->ip_addr_str);
2193       log_error(LOG_LEVEL_ERROR, "Invalid request line after applying header filters.");
2194
2195       free_http_request(http);
2196       return;
2197    }
2198
2199    /* decide how to route the HTTP request */
2200    fwd = forward_url(csp, http);
2201    if (NULL == fwd)
2202    {
2203       log_error(LOG_LEVEL_FATAL, "gateway spec is NULL!?!?  This can't happen!");
2204       /* Never get here - LOG_LEVEL_FATAL causes program exit */
2205    }
2206
2207    /*
2208     * build the http request to send to the server
2209     * we have to do one of the following:
2210     *
2211     * create = use the original HTTP request to create a new
2212     *          HTTP request that has either the path component
2213     *          without the http://domainspec (w/path) or the
2214     *          full orininal URL (w/url)
2215     *          Note that the path and/or the HTTP version may
2216     *          have been altered by now.
2217     *
2218     * connect = Open a socket to the host:port of the server
2219     *           and short-circuit server and client socket.
2220     *
2221     * pass =  Pass the request unchanged if forwarding a CONNECT
2222     *         request to a parent proxy. Note that we'll be sending
2223     *         the CFAIL message ourselves if connecting to the parent
2224     *         fails, but we won't send a CSUCCEED message if it works,
2225     *         since that would result in a double message (ours and the
2226     *         parent's). After sending the request to the parent, we simply
2227     *         tunnel.
2228     *
2229     * here's the matrix:
2230     *                        SSL
2231     *                    0        1
2232     *                +--------+--------+
2233     *                |        |        |
2234     *             0  | create | connect|
2235     *                | w/path |        |
2236     *  Forwarding    +--------+--------+
2237     *                |        |        |
2238     *             1  | create | pass   |
2239     *                | w/url  |        |
2240     *                +--------+--------+
2241     *
2242     */
2243
2244    if (http->ssl && connect_port_is_forbidden(csp))
2245    {
2246       const char *acceptable_connect_ports =
2247          csp->action->string[ACTION_STRING_LIMIT_CONNECT];
2248       assert(NULL != acceptable_connect_ports);
2249       log_error(LOG_LEVEL_INFO, "Request from %s marked for blocking. "
2250          "limit-connect{%s} doesn't allow CONNECT requests to port %d.",
2251          csp->ip_addr_str, acceptable_connect_ports, csp->http->port);
2252       csp->action->flags |= ACTION_BLOCK;
2253       http->ssl = 0;
2254    }
2255
2256    if (http->ssl == 0)
2257    {
2258       freez(csp->headers->first->str);
2259       build_request_line(csp, fwd, &csp->headers->first->str);
2260    }
2261
2262    hdr = list_to_text(csp->headers);
2263    if (hdr == NULL)
2264    {
2265       /* FIXME Should handle error properly */
2266       log_error(LOG_LEVEL_FATAL, "Out of memory parsing client header");
2267    }
2268
2269    /*
2270     * We have a request. Check if one of the crunchers wants it.
2271     */
2272    if (crunch_response_triggered(csp, crunchers_all))
2273    {
2274       /*
2275        * Yes. The client got the crunch response
2276        * and we are done here after cleaning up.
2277        */
2278       freez(hdr);
2279       list_remove_all(csp->headers);
2280
2281       return;
2282    }
2283
2284    /*
2285     * The headers can't be removed earlier because
2286     * they were still needed for the referrer check
2287     * in case of CGI crunches.
2288     *
2289     * XXX: Would it be worth to move the referrer check
2290     * into client_referrer() and set a flag if it's trusted?
2291     */
2292    list_remove_all(csp->headers);
2293
2294    log_error(LOG_LEVEL_GPC, "%s%s", http->hostport, http->path);
2295
2296    if (fwd->forward_host)
2297    {
2298       log_error(LOG_LEVEL_CONNECT, "via %s:%d to: %s",
2299                fwd->forward_host, fwd->forward_port, http->hostport);
2300    }
2301    else
2302    {
2303       log_error(LOG_LEVEL_CONNECT, "to %s", http->hostport);
2304    }
2305
2306    /* here we connect to the server, gateway, or the forwarder */
2307
2308    while ( (csp->sfd = forwarded_connect(fwd, http, csp))
2309          && (errno == EINVAL) && (forwarded_connect_retries++ < max_forwarded_connect_retries))
2310    {
2311       log_error(LOG_LEVEL_ERROR, "failed request #%u to connect to %s. Trying again.",
2312                 forwarded_connect_retries, http->hostport);
2313    }
2314
2315    if (csp->sfd == JB_INVALID_SOCKET)
2316    {
2317       if (fwd->type != SOCKS_NONE)
2318       {
2319          /* Socks error. */
2320          rsp = error_response(csp, "forwarding-failed", errno);
2321       }
2322       else if (errno == EINVAL)
2323       {
2324          rsp = error_response(csp, "no-such-domain", errno);
2325       }
2326       else
2327       {
2328          rsp = error_response(csp, "connect-failed", errno);
2329          log_error(LOG_LEVEL_CONNECT, "connect to: %s failed: %E",
2330                 http->hostport);
2331       }
2332
2333
2334       /* Write the answer to the client */
2335       if (rsp != NULL)
2336       {
2337          send_crunch_response(csp, rsp);
2338       }
2339
2340       freez(hdr);
2341       return;
2342    }
2343
2344    if (fwd->forward_host || (http->ssl == 0))
2345    {
2346       /* write the client's (modified) header to the server
2347        * (along with anything else that may be in the buffer)
2348        */
2349
2350       if (write_socket(csp->sfd, hdr, strlen(hdr))
2351        || (flush_socket(csp->sfd, csp->iob) <  0))
2352       {
2353          log_error(LOG_LEVEL_CONNECT, "write header to: %s failed: %E",
2354                     http->hostport);
2355
2356          rsp = error_response(csp, "connect-failed", errno);
2357
2358          if(rsp)
2359          {
2360             send_crunch_response(csp, rsp);
2361          }
2362
2363          freez(hdr);
2364          return;
2365       }
2366    }
2367    else
2368    {
2369       /*
2370        * We're running an SSL tunnel and we're not forwarding,
2371        * so just send the "connect succeeded" message to the
2372        * client, flush the rest, and get out of the way.
2373        */
2374       if (write_socket(csp->cfd, CSUCCEED, strlen(CSUCCEED)))
2375       {
2376          freez(hdr);
2377          return;
2378       }
2379       IOB_RESET(csp);
2380    }
2381
2382    log_error(LOG_LEVEL_CONNECT, "to %s successful", http->hostport);
2383
2384    /* we're finished with the client's header */
2385    freez(hdr);
2386
2387    maxfd = ( csp->cfd > csp->sfd ) ? csp->cfd : csp->sfd;
2388
2389    /* pass data between the client and server
2390     * until one or the other shuts down the connection.
2391     */
2392
2393    server_body = 0;
2394
2395    for (;;)
2396    {
2397 #ifdef __OS2__
2398       /*
2399        * FD_ZERO here seems to point to an errant macro which crashes.
2400        * So do this by hand for now...
2401        */
2402       memset(&rfds,0x00,sizeof(fd_set));
2403 #else
2404       FD_ZERO(&rfds);
2405 #endif
2406       FD_SET(csp->cfd, &rfds);
2407       FD_SET(csp->sfd, &rfds);
2408
2409       n = select((int)maxfd+1, &rfds, NULL, NULL, NULL);
2410
2411       if (n < 0)
2412       {
2413          log_error(LOG_LEVEL_ERROR, "select() failed!: %E");
2414          return;
2415       }
2416
2417       /* this is the body of the browser's request
2418        * just read it and write it.
2419        */
2420
2421       if (FD_ISSET(csp->cfd, &rfds))
2422       {
2423          len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
2424
2425          if (len <= 0)
2426          {
2427             break; /* "game over, man" */
2428          }
2429
2430          if (write_socket(csp->sfd, buf, (size_t)len))
2431          {
2432             log_error(LOG_LEVEL_ERROR, "write to: %s failed: %E", http->host);
2433             return;
2434          }
2435          continue;
2436       }
2437
2438       /*
2439        * The server wants to talk.  It could be the header or the body.
2440        * If `hdr' is null, then it's the header otherwise it's the body.
2441        * FIXME: Does `hdr' really mean `host'? No.
2442        */
2443
2444
2445       if (FD_ISSET(csp->sfd, &rfds))
2446       {
2447          fflush( 0 );
2448          len = read_socket(csp->sfd, buf, sizeof(buf) - 1);
2449
2450          if (len < 0)
2451          {
2452             log_error(LOG_LEVEL_ERROR, "read from: %s failed: %E", http->host);
2453
2454             if (http->ssl && (fwd->forward_host == NULL))
2455             {
2456                /*
2457                 * Just hang up. We already confirmed the client's CONNECT
2458                 * request with status code 200 and unencrypted content is
2459                 * no longer welcome.
2460                 */
2461                log_error(LOG_LEVEL_ERROR,
2462                   "CONNECT already confirmed. Unable to tell the client about the problem.");
2463                return;
2464             }
2465             else if (byte_count)
2466             {
2467                /*
2468                 * Just hang up. We already transmitted the original headers
2469                 * and parts of the original content and therefore missed the
2470                 * chance to send an error message (without risking data corruption).
2471                 *
2472                 * XXX: we could retry with a fancy range request here.
2473                 */
2474                log_error(LOG_LEVEL_ERROR, "Already forwarded the original headers. "
2475                   "Unable to tell the client about the problem.");
2476                return;
2477             }
2478
2479             rsp = error_response(csp, "connect-failed", errno);
2480
2481             if (rsp)
2482             {
2483                send_crunch_response(csp, rsp);
2484             }
2485
2486             return;
2487          }
2488
2489          /* Add a trailing zero.  This lets filter_popups
2490           * use string operations.
2491           */
2492          buf[len] = '\0';
2493
2494          /* Normally, this would indicate that we've read
2495           * as much as the server has sent us and we can
2496           * close the client connection.  However, Microsoft
2497           * in its wisdom has released IIS/5 with a bug that
2498           * prevents it from sending the trailing \r\n in
2499           * a 302 redirect header (and possibly other headers).
2500           * To work around this if we've haven't parsed
2501           * a full header we'll append a trailing \r\n
2502           * and see if this now generates a valid one.
2503           *
2504           * This hack shouldn't have any impacts.  If we've
2505           * already transmitted the header or if this is a
2506           * SSL connection, then we won't bother with this
2507           * hack.  So we only work on partially received
2508           * headers.  If we append a \r\n and this still
2509           * doesn't generate a valid header, then we won't
2510           * transmit anything to the client.
2511           */
2512          if (len == 0)
2513          {
2514
2515             if (server_body || http->ssl)
2516             {
2517                /*
2518                 * If we have been buffering up the document,
2519                 * now is the time to apply content modification
2520                 * and send the result to the client.
2521                 */
2522                if (content_filter)
2523                {
2524                   p = execute_content_filter(csp, content_filter);
2525                   /*
2526                    * If the content filter fails, use the original
2527                    * buffer and length.
2528                    * (see p != NULL ? p : csp->iob->cur below)
2529                    */
2530                   if (NULL == p)
2531                   {
2532                      csp->content_length = (size_t)(csp->iob->eod - csp->iob->cur);
2533                   }
2534
2535                   if (JB_ERR_OK != sed(server_patterns_light, NULL, csp))
2536                   {
2537                      log_error(LOG_LEVEL_FATAL, "Failed to parse server headers.");
2538                   }
2539
2540                   hdr = list_to_text(csp->headers);
2541                   if (hdr == NULL)
2542                   {
2543                      /* FIXME Should handle error properly */
2544                      log_error(LOG_LEVEL_FATAL, "Out of memory parsing server header");
2545                   }
2546
2547                   /*
2548                    * Shouldn't happen because this was the second sed run
2549                    * and tags are only created for the first one.
2550                    */
2551                   assert(!crunch_response_triggered(csp, crunchers_all));
2552
2553                   if (write_socket(csp->cfd, hdr, strlen(hdr))
2554                    || write_socket(csp->cfd, p != NULL ? p : csp->iob->cur, csp->content_length))
2555                   {
2556                      log_error(LOG_LEVEL_ERROR, "write modified content to client failed: %E");
2557                      freez(hdr);
2558                      freez(p);
2559                      return;
2560                   }
2561
2562                   freez(hdr);
2563                   freez(p);
2564                }
2565
2566                break; /* "game over, man" */
2567             }
2568
2569             /*
2570              * This is NOT the body, so
2571              * Let's pretend the server just sent us a blank line.
2572              */
2573             snprintf(buf, sizeof(buf), "\r\n");
2574             len = (int)strlen(buf);
2575
2576             /*
2577              * Now, let the normal header parsing algorithm below do its
2578              * job.  If it fails, we'll exit instead of continuing.
2579              */
2580
2581             ms_iis5_hack = 1;
2582          }
2583
2584          /*
2585           * If this is an SSL connection or we're in the body
2586           * of the server document, just write it to the client,
2587           * unless we need to buffer the body for later content-filtering
2588           */
2589
2590          if (server_body || http->ssl)
2591          {
2592             if (content_filter)
2593             {
2594                /*
2595                 * If there is no memory left for buffering the content, or the buffer limit
2596                 * has been reached, switch to non-filtering mode, i.e. make & write the
2597                 * header, flush the iob and buf, and get out of the way.
2598                 */
2599                if (add_to_iob(csp, buf, len))
2600                {
2601                   size_t hdrlen;
2602                   int flushed;
2603
2604                   log_error(LOG_LEVEL_INFO, "Flushing header and buffers. Stepping back from filtering.");
2605
2606                   hdr = list_to_text(csp->headers);
2607                   if (hdr == NULL)
2608                   {
2609                      /* 
2610                       * Memory is too tight to even generate the header.
2611                       * Send our static "Out-of-memory" page.
2612                       */
2613                      log_error(LOG_LEVEL_ERROR, "Out of memory while trying to flush.");
2614                      rsp = cgi_error_memory();
2615                      send_crunch_response(csp, rsp);
2616
2617                      return;
2618                   }
2619                   hdrlen = strlen(hdr);
2620
2621                   if (write_socket(csp->cfd, hdr, hdrlen)
2622                    || ((flushed = flush_socket(csp->cfd, csp->iob)) < 0)
2623                    || (write_socket(csp->cfd, buf, (size_t)len)))
2624                   {
2625                      log_error(LOG_LEVEL_CONNECT, "Flush header and buffers to client failed: %E");
2626
2627                      freez(hdr);
2628                      return;
2629                   }
2630
2631                   /*
2632                    * Reset the byte_count to the amount of bytes
2633                    * we just flushed. len will be added a few lines below,
2634                    * hdrlen doesn't matter for LOG_LEVEL_CLF.
2635                    */
2636                   byte_count = (size_t)flushed;
2637                   freez(hdr);
2638                   content_filter = NULL;
2639                   server_body = 1;
2640                }
2641             }
2642             else
2643             {
2644                if (write_socket(csp->cfd, buf, (size_t)len))
2645                {
2646                   log_error(LOG_LEVEL_ERROR, "write to client failed: %E");
2647                   return;
2648                }
2649             }
2650             byte_count += (size_t)len;
2651             continue;
2652          }
2653          else
2654          {
2655             /* we're still looking for the end of the
2656              * server's header ... (does that make header
2657              * parsing an "out of body experience" ?
2658              */
2659
2660             /* 
2661              * buffer up the data we just read.  If that fails, 
2662              * there's little we can do but send our static
2663              * out-of-memory page.
2664              */
2665             if (add_to_iob(csp, buf, len))
2666             {
2667                log_error(LOG_LEVEL_ERROR, "Out of memory while looking for end of server headers.");
2668                rsp = cgi_error_memory();
2669                send_crunch_response(csp, rsp);               
2670
2671                return;
2672             }
2673
2674             /* Convert iob into something sed() can digest */
2675             if (JB_ERR_PARSE == get_server_headers(csp))
2676             {
2677                if (ms_iis5_hack)
2678                {
2679                   /* Well, we tried our MS IIS/5
2680                    * hack and it didn't work.
2681                    * The header is incomplete
2682                    * and there isn't anything
2683                    * we can do about it.
2684                    */
2685                   log_error(LOG_LEVEL_INFO,
2686                      "MS IIS5 hack didn't produce valid headers.");
2687                   break;
2688                }
2689                else
2690                {
2691                   /* Since we have to wait for
2692                    * more from the server before
2693                    * we can parse the headers
2694                    * we just continue here.
2695                    */
2696                   continue;
2697                }
2698             }
2699
2700             /* Did we actually get anything? */
2701             if (NULL == csp->headers->first)
2702             {
2703                log_error(LOG_LEVEL_ERROR, "Empty server or forwarder response.");
2704                log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
2705                write_socket(csp->cfd, NO_SERVER_DATA_RESPONSE, strlen(NO_SERVER_DATA_RESPONSE));
2706                free_http_request(http);
2707                return;
2708             }
2709
2710             assert(csp->headers->first->str);
2711             assert(!http->ssl);
2712             if (strncmpic(csp->headers->first->str, "HTTP", 4))
2713             {
2714                /*
2715                 * It doesn't look like a HTTP response:
2716                 * tell the client and log the problem.
2717                 */
2718                if (strlen(csp->headers->first->str) > 30)
2719                {
2720                   csp->headers->first->str[30] = '\0';
2721                }
2722                log_error(LOG_LEVEL_ERROR,
2723                   "Invalid server or forwarder response. Starts with: %s",
2724                   csp->headers->first->str);
2725                log_error(LOG_LEVEL_CLF,
2726                   "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
2727                write_socket(csp->cfd, INVALID_SERVER_HEADERS_RESPONSE,
2728                   strlen(INVALID_SERVER_HEADERS_RESPONSE));
2729                free_http_request(http);
2730                return;
2731             }
2732
2733             /* we have now received the entire header.
2734              * filter it and send the result to the client
2735              */
2736             if (JB_ERR_OK != sed(server_patterns, add_server_headers, csp))
2737             {
2738                log_error(LOG_LEVEL_FATAL, "Failed to parse server headers.");
2739             }
2740             hdr = list_to_text(csp->headers);
2741             if (hdr == NULL)
2742             {
2743                /* FIXME Should handle error properly */
2744                log_error(LOG_LEVEL_FATAL, "Out of memory parsing server header");
2745             }
2746
2747             if (crunch_response_triggered(csp, crunchers_light))
2748             {
2749                /*
2750                 * One of the tags created by a server-header
2751                 * tagger triggered a crunch. We already
2752                 * delivered the crunch response to the client
2753                 * and are done here after cleaning up.
2754                 */
2755                 freez(hdr);
2756                 return;
2757             }
2758             /* Buffer and pcrs filter this if appropriate. */
2759
2760             if (!http->ssl) /* We talk plaintext */
2761             {
2762                content_filter = get_filter_function(csp);
2763             }
2764             /*
2765              * Only write if we're not buffering for content modification
2766              */
2767             if (!content_filter)
2768             {
2769                /* write the server's (modified) header to
2770                 * the client (along with anything else that
2771                 * may be in the buffer)
2772                 */
2773
2774                if (write_socket(csp->cfd, hdr, strlen(hdr))
2775                 || ((len = flush_socket(csp->cfd, csp->iob)) < 0))
2776                {
2777                   log_error(LOG_LEVEL_CONNECT, "write header to client failed: %E");
2778
2779                   /* the write failed, so don't bother
2780                    * mentioning it to the client...
2781                    * it probably can't hear us anyway.
2782                    */
2783                   freez(hdr);
2784                   return;
2785                }
2786
2787                byte_count += (size_t)len;
2788             }
2789
2790             /* we're finished with the server's header */
2791
2792             freez(hdr);
2793             server_body = 1;
2794
2795             /* If this was a MS IIS/5 hack then it means
2796              * the server has already closed the
2797              * connection.  Nothing more to read.  Time
2798              * to bail.
2799              */
2800             if (ms_iis5_hack)
2801             {
2802                log_error(LOG_LEVEL_INFO,
2803                   "Closed server connection detected with MS IIS5 hack enabled.");
2804                break;
2805             }
2806          }
2807          continue;
2808       }
2809
2810       return; /* huh? we should never get here */
2811    }
2812
2813    if (csp->content_length == 0)
2814    {
2815       /*
2816        * If Privoxy didn't recalculate the
2817        * Content-Lenght, byte_count is still
2818        * correct.
2819        */
2820       csp->content_length = byte_count;
2821    }
2822
2823    log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 %d",
2824       csp->ip_addr_str, http->ocmd, csp->content_length);
2825 }
2826
2827
2828 /*********************************************************************
2829  *
2830  * Function    :  serve
2831  *
2832  * Description :  This is little more than chat.  We only "serve" to
2833  *                to close any socket that chat may have opened.
2834  *
2835  * Parameters  :
2836  *          1  :  csp = Current client state (buffers, headers, etc...)
2837  *
2838  * Returns     :  N/A
2839  *
2840  *********************************************************************/
2841 #ifdef AMIGA
2842 void serve(struct client_state *csp)
2843 #else /* ifndef AMIGA */
2844 static void serve(struct client_state *csp)
2845 #endif /* def AMIGA */
2846 {
2847    chat(csp);
2848    close_socket(csp->cfd);
2849
2850    if (csp->sfd != JB_INVALID_SOCKET)
2851    {
2852       close_socket(csp->sfd);
2853    }
2854
2855    csp->flags &= ~CSP_FLAG_ACTIVE;
2856
2857 }
2858
2859
2860 #ifdef __BEOS__
2861 /*********************************************************************
2862  *
2863  * Function    :  server_thread
2864  *
2865  * Description :  We only exist to call `serve' in a threaded environment.
2866  *
2867  * Parameters  :
2868  *          1  :  data = Current client state (buffers, headers, etc...)
2869  *
2870  * Returns     :  Always 0.
2871  *
2872  *********************************************************************/
2873 static int32 server_thread(void *data)
2874 {
2875    serve((struct client_state *) data);
2876    return 0;
2877
2878 }
2879 #endif
2880
2881
2882 #if !defined(_WIN32) || defined(_WIN_CONSOLE)
2883 /*********************************************************************
2884  *
2885  * Function    :  usage
2886  *
2887  * Description :  Print usage info & exit.
2888  *
2889  * Parameters  :  Pointer to argv[0] for identifying ourselves
2890  *
2891  * Returns     :  No. ,-)
2892  *
2893  *********************************************************************/
2894 static void usage(const char *myname)
2895 {
2896    printf("Privoxy version " VERSION " (" HOME_PAGE_URL ")\n"
2897           "Usage: %s "
2898 #if defined(unix)
2899           "[--chroot] "
2900 #endif /* defined(unix) */
2901           "[--help] "
2902 #if defined(unix)
2903           "[--no-daemon] [--pidfile pidfile] [--pre-chroot-nslookup hostname] [--user user[.group]] "
2904 #endif /* defined(unix) */
2905           "[--version] [configfile]\n"
2906           "Aborting\n", myname);
2907
2908    exit(2);
2909
2910 }
2911 #endif /* #if !defined(_WIN32) || defined(_WIN_CONSOLE) */
2912
2913
2914 /*********************************************************************
2915  *
2916  * Function    :  initialize_mutexes
2917  *
2918  * Description :  Prepares mutexes if mutex support is available.
2919  *
2920  * Parameters  :  None
2921  *
2922  * Returns     :  Void, exits in case of errors.
2923  *
2924  *********************************************************************/
2925 static void initialize_mutexes(void)
2926 {
2927    int err = 0;
2928
2929 #ifdef FEATURE_PTHREAD
2930    /*
2931     * Prepare global mutex semaphores
2932     */
2933    err = pthread_mutex_init(&log_mutex, 0);
2934
2935    if (!err) err = pthread_mutex_init(&log_init_mutex, 0);
2936
2937    /*
2938     * XXX: The assumptions below are a bit naive
2939     * and can cause locks that aren't necessary.
2940     *
2941     * For example older FreeBSD versions (< 6.x?)
2942     * have no gethostbyname_r, but gethostbyname is
2943     * thread safe.
2944     */
2945 #if !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R)
2946    if (!err) err = pthread_mutex_init(&resolver_mutex, 0);
2947 #endif /* !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R) */
2948    /*
2949     * XXX: should we use a single mutex for
2950     * localtime() and gmtime() as well?
2951     */
2952 #ifndef HAVE_GMTIME_R
2953    if (!err) err = pthread_mutex_init(&gmtime_mutex, 0);
2954 #endif /* ndef HAVE_GMTIME_R */
2955
2956 #ifndef HAVE_LOCALTIME_R
2957    if (!err) err = pthread_mutex_init(&localtime_mutex, 0);
2958 #endif /* ndef HAVE_GMTIME_R */
2959
2960 #ifndef HAVE_RANDOM
2961    if (!err) err = pthread_mutex_init(&rand_mutex, 0);
2962 #endif /* ndef HAVE_RANDOM */
2963 #endif /* FEATURE_PTHREAD */
2964
2965    /*
2966     * TODO: mutex support for mingw32 would be swell.
2967     */
2968
2969    if (err)
2970    {
2971       printf("Fatal error. Mutex initialization failed: %s.\n",
2972          strerror(err));
2973       exit(1);
2974    }
2975
2976    return;
2977 }
2978
2979
2980 /*********************************************************************
2981  *
2982  * Function    :  main
2983  *
2984  * Description :  Load the config file and start the listen loop.
2985  *                This function is a lot more *sane* with the `load_config'
2986  *                and `listen_loop' functions; although it stills does
2987  *                a *little* too much for my taste.
2988  *
2989  * Parameters  :
2990  *          1  :  argc = Number of parameters (including $0).
2991  *          2  :  argv = Array of (char *)'s to the parameters.
2992  *
2993  * Returns     :  1 if : can't open config file, unrecognized directive,
2994  *                stats requested in multi-thread mode, can't open the
2995  *                log file, can't open the jar file, listen port is invalid,
2996  *                any load fails, and can't bind port.
2997  *
2998  *                Else main never returns, the process must be signaled
2999  *                to terminate execution.  Or, on Windows, use the
3000  *                "File", "Exit" menu option.
3001  *
3002  *********************************************************************/
3003 #ifdef __MINGW32__
3004 int real_main(int argc, const char *argv[])
3005 #else
3006 int main(int argc, const char *argv[])
3007 #endif
3008 {
3009    int argc_pos = 0;
3010    unsigned int random_seed;
3011 #ifdef unix
3012    struct passwd *pw = NULL;
3013    struct group *grp = NULL;
3014    char *p;
3015    int do_chroot = 0;
3016    char *pre_chroot_nslookup_to_load_resolver = NULL;
3017 #endif
3018
3019    Argc = argc;
3020    Argv = argv;
3021
3022    configfile =
3023 #if !defined(_WIN32)
3024    "config"
3025 #else
3026    "config.txt"
3027 #endif
3028       ;
3029
3030    /*
3031     * Parse the command line arguments
3032     *
3033     * XXX: simply printing usage information in case of
3034     * invalid arguments isn't particularly user friendly.
3035     */
3036    while (++argc_pos < argc)
3037    {
3038 #ifdef _WIN32
3039       /* Check to see if the service must be installed or uninstalled */
3040       if (strncmp(argv[argc_pos], "--install", 9) == 0)
3041       {
3042          const char *pName = argv[argc_pos] + 9;
3043          if (*pName == ':')
3044             pName++;
3045          exit( (install_service(pName)) ? 0 : 1 );
3046       }
3047       else if (strncmp(argv[argc_pos], "--uninstall", + 11) == 0)
3048       {
3049          const char *pName = argv[argc_pos] + 11;
3050          if (*pName == ':')
3051             pName++;
3052          exit((uninstall_service(pName)) ? 0 : 1);
3053       }
3054       else if (strcmp(argv[argc_pos], "--service" ) == 0)
3055       {
3056          bRunAsService = TRUE;
3057          w32_set_service_cwd();
3058          atexit(w32_service_exit_notify);
3059       }
3060       else
3061 #endif /* defined(_WIN32) */
3062
3063
3064 #if !defined(_WIN32) || defined(_WIN_CONSOLE)
3065
3066       if (strcmp(argv[argc_pos], "--help") == 0)
3067       {
3068          usage(argv[0]);
3069       }
3070
3071       else if(strcmp(argv[argc_pos], "--version") == 0)
3072       {
3073          printf("Privoxy version " VERSION " (" HOME_PAGE_URL ")\n");
3074          exit(0);
3075       }
3076
3077 #if defined(unix)
3078
3079       else if (strcmp(argv[argc_pos], "--no-daemon" ) == 0)
3080       {
3081          no_daemon = 1;
3082       }
3083
3084       else if (strcmp(argv[argc_pos], "--pidfile" ) == 0)
3085       {
3086          if (++argc_pos == argc) usage(argv[0]);
3087          pidfile = strdup(argv[argc_pos]);
3088       }
3089
3090       else if (strcmp(argv[argc_pos], "--user" ) == 0)
3091       {
3092          if (++argc_pos == argc) usage(argv[argc_pos]);
3093
3094          if ((NULL != (p = strchr(argv[argc_pos], '.'))) && *(p + 1) != '0')
3095          {
3096             *p++ = '\0';
3097             if (NULL == (grp = getgrnam(p)))
3098             {
3099                log_error(LOG_LEVEL_FATAL, "Group %s not found.", p);
3100             }
3101          }
3102
3103          if (NULL == (pw = getpwnam(argv[argc_pos])))
3104          {
3105             log_error(LOG_LEVEL_FATAL, "User %s not found.", argv[argc_pos]);
3106          }
3107
3108          if (p != NULL) *--p = '\0';
3109       }
3110
3111       else if (strcmp(argv[argc_pos], "--pre-chroot-nslookup" ) == 0)
3112       {
3113          if (++argc_pos == argc) usage(argv[0]);
3114          pre_chroot_nslookup_to_load_resolver = strdup(argv[argc_pos]);
3115       }
3116
3117       else if (strcmp(argv[argc_pos], "--chroot" ) == 0)
3118       {
3119          do_chroot = 1;
3120       }
3121 #endif /* defined(unix) */
3122
3123       else if (argc_pos + 1 != argc)
3124       {
3125          /*
3126           * This is neither the last command line
3127           * option, nor was it recognized before,
3128           * therefore it must be invalid.
3129           */
3130          usage(argv[0]);
3131       }
3132       else
3133
3134 #endif /* defined(_WIN32) && !defined(_WIN_CONSOLE) */
3135       {
3136          configfile = argv[argc_pos];
3137       }
3138
3139    } /* -END- while (more arguments) */
3140
3141 #if defined(unix)
3142    if ( *configfile != '/' )
3143    {
3144       char cwd[BUFFER_SIZE];
3145       char *abs_file;
3146       size_t abs_file_size; 
3147
3148       /* make config-filename absolute here */
3149       if (NULL == getcwd(cwd, sizeof(cwd)))
3150       {
3151          perror("failed to get current working directory");
3152          exit( 1 );
3153       }
3154
3155       /* XXX: why + 5? */
3156       abs_file_size = strlen(cwd) + strlen(configfile) + 5;
3157       basedir = strdup(cwd);
3158
3159       if (NULL == basedir ||
3160           NULL == (abs_file = malloc(abs_file_size)))
3161       {
3162          perror("malloc failed");
3163          exit( 1 );
3164       }
3165       strlcpy(abs_file, basedir, abs_file_size);
3166       strlcat(abs_file, "/", abs_file_size );
3167       strlcat(abs_file, configfile, abs_file_size);
3168       configfile = abs_file;
3169    }
3170 #endif /* defined unix */
3171
3172
3173    files->next = NULL;
3174    clients->next = NULL;
3175
3176    /* XXX: factor out initialising after the next stable release. */
3177 #ifdef AMIGA
3178    InitAmiga();
3179 #elif defined(_WIN32)
3180    InitWin32();
3181 #endif
3182
3183    /* Prepare mutexes if supported and necessary. */
3184    initialize_mutexes();
3185
3186    /* Enable logging until further notice. */
3187    init_log_module(Argv[0]);
3188
3189    random_seed = (unsigned int)time(NULL);
3190 #ifdef HAVE_RANDOM
3191    srandom(random_seed);
3192 #elif defined (_WIN32)
3193    /*
3194     * See pick_from_range() in miscutil.c for details.
3195     */
3196    log_error(LOG_LEVEL_INFO,
3197       "No thread-safe PRNG implemented for your platform. "
3198       "Using weak \'randomization\' factor which will "
3199       "limit the already questionable usefulness of "
3200       "header-time-randomizing actions (disabled by default).");
3201 #else
3202    srand(random_seed);
3203 #endif /* ifdef HAVE_RANDOM */
3204
3205    /*
3206     * Unix signal handling
3207     *
3208     * Catch the abort, interrupt and terminate signals for a graceful exit
3209     * Catch the hangup signal so the errlog can be reopened.
3210     * Ignore the broken pipe signals (FIXME: Why?)
3211     */
3212 #if !defined(_WIN32) && !defined(__OS2__) && !defined(AMIGA)
3213 {
3214    int idx;
3215    const int catched_signals[] = { SIGTERM, SIGINT, SIGHUP, 0 };
3216    const int ignored_signals[] = { SIGPIPE, 0 };
3217
3218    for (idx = 0; catched_signals[idx] != 0; idx++)
3219    {
3220 #ifdef sun /* FIXME: Is it safe to check for HAVE_SIGSET instead? */ 
3221       if (sigset(catched_signals[idx], sig_handler) == SIG_ERR)
3222 #else
3223       if (signal(catched_signals[idx], sig_handler) == SIG_ERR)
3224 #endif /* ifdef sun */
3225       {
3226          log_error(LOG_LEVEL_FATAL, "Can't set signal-handler for signal %d: %E", catched_signals[idx]);
3227       }
3228    }
3229
3230    for (idx = 0; ignored_signals[idx] != 0; idx++)
3231    {
3232       if (signal(ignored_signals[idx], SIG_IGN) == SIG_ERR)
3233       {
3234          log_error(LOG_LEVEL_FATAL, "Can't set ignore-handler for signal %d: %E", ignored_signals[idx]);
3235       }
3236    }
3237
3238 }
3239 #else /* ifdef _WIN32 */
3240 # ifdef _WIN_CONSOLE
3241    /*
3242     * We *are* in a windows console app.
3243     * Print a verbose messages about FAQ's and such
3244     */
3245    printf("%s", win32_blurb);
3246 # endif /* def _WIN_CONSOLE */
3247 #endif /* def _WIN32 */
3248
3249
3250    /* Initialize the CGI subsystem */
3251    cgi_init_error_messages();
3252
3253    /*
3254     * If runnig on unix and without the --nodaemon
3255     * option, become a daemon. I.e. fork, detach
3256     * from tty and get process group leadership
3257     */
3258 #if defined(unix)
3259 {
3260    pid_t pid = 0;
3261 #if 0
3262    int   fd;
3263 #endif
3264
3265    if (!no_daemon)
3266    {
3267       pid  = fork();
3268
3269       if ( pid < 0 ) /* error */
3270       {
3271          perror("fork");
3272          exit( 3 );
3273       }
3274       else if ( pid != 0 ) /* parent */
3275       {
3276          int status;
3277          pid_t wpid;
3278          /*
3279           * must check for errors
3280           * child died due to missing files aso
3281           */
3282          sleep( 1 );
3283          wpid = waitpid( pid, &status, WNOHANG );
3284          if ( wpid != 0 )
3285          {
3286             exit( 1 );
3287          }
3288          exit( 0 );
3289       }
3290       /* child */
3291 #if 1
3292       /* Should be more portable, but not as well tested */
3293       setsid();
3294 #else /* !1 */
3295 #ifdef __FreeBSD__
3296       setpgrp(0,0);
3297 #else /* ndef __FreeBSD__ */
3298       setpgrp();
3299 #endif /* ndef __FreeBSD__ */
3300       fd = open("/dev/tty", O_RDONLY);
3301       if ( fd )
3302       {
3303          /* no error check here */
3304          ioctl( fd, TIOCNOTTY,0 );
3305          close ( fd );
3306       }
3307 #endif /* 1 */
3308       /*
3309        * stderr (fd 2) will be closed later on, when the
3310        * log file has been parsed.
3311        */
3312
3313       close( 0 );
3314       close( 1 );
3315       chdir("/");
3316
3317    } /* -END- if (!no_daemon) */
3318
3319    /*
3320     * As soon as we have written the PID file, we can switch
3321     * to the user and group ID indicated by the --user option
3322     */
3323    write_pid_file();
3324
3325    if (NULL != pw)
3326    {
3327       if (setgid((NULL != grp) ? grp->gr_gid : pw->pw_gid))
3328       {
3329          log_error(LOG_LEVEL_FATAL, "Cannot setgid(): Insufficient permissions.");
3330       }
3331       if (do_chroot)
3332       {
3333          if (!pw->pw_dir)
3334          {
3335             log_error(LOG_LEVEL_FATAL, "Home directory for %s undefined", pw->pw_name);
3336          }
3337          /* Read the time zone file from /etc before doing chroot. */
3338          tzset();
3339          if (NULL != pre_chroot_nslookup_to_load_resolver
3340              && '\0' != pre_chroot_nslookup_to_load_resolver[0])
3341          {
3342             /* Initialize resolver library. */
3343             (void) resolve_hostname_to_ip(pre_chroot_nslookup_to_load_resolver);
3344          }
3345          if (chroot(pw->pw_dir) < 0)
3346          {
3347             log_error(LOG_LEVEL_FATAL, "Cannot chroot to %s", pw->pw_dir);
3348          }
3349          if (chdir ("/"))
3350          {
3351             log_error(LOG_LEVEL_FATAL, "Cannot chdir /");
3352          }
3353       }
3354       if (setuid(pw->pw_uid))
3355       {
3356          log_error(LOG_LEVEL_FATAL, "Cannot setuid(): Insufficient permissions.");
3357       }
3358       if (do_chroot)
3359       {
3360          char putenv_dummy[64];
3361
3362          strlcpy(putenv_dummy, "HOME=/", sizeof(putenv_dummy));
3363          if (putenv(putenv_dummy) != 0)
3364          {
3365             log_error(LOG_LEVEL_FATAL, "Cannot putenv(): HOME");
3366          }                
3367
3368          snprintf(putenv_dummy, sizeof(putenv_dummy), "USER=%s", pw->pw_name);
3369          if (putenv(putenv_dummy) != 0)
3370          {
3371             log_error(LOG_LEVEL_FATAL, "Cannot putenv(): USER");
3372          }
3373       }
3374    }
3375    else if (do_chroot)
3376    {
3377       log_error(LOG_LEVEL_FATAL, "Cannot chroot without --user argument.");
3378    }
3379 }
3380 #endif /* defined unix */
3381
3382 #ifdef _WIN32
3383    /* This will be FALSE unless the command line specified --service
3384     */
3385    if (bRunAsService)
3386    {
3387       /* Yup, so now we must attempt to establish a connection 
3388        * with the service dispatcher. This will only work if this
3389        * process was launched by the service control manager to
3390        * actually run as a service. If this isn't the case, i've
3391        * known it take around 30 seconds or so for the call to return.
3392        */
3393
3394       /* The StartServiceCtrlDispatcher won't return until the service is stopping */
3395       if (w32_start_service_ctrl_dispatcher(w32ServiceDispatchTable))
3396       {
3397          /* Service has run, and at this point is now being stopped, so just return */
3398          return 0;
3399       }
3400
3401 #ifdef _WIN_CONSOLE
3402       printf("Warning: Failed to connect to Service Control Dispatcher\nwhen starting as a service!\n");
3403 #endif
3404       /* An error occurred. Usually it's because --service was wrongly specified
3405        * and we were unable to connect to the Service Control Dispatcher because
3406        * it wasn't expecting us and is therefore not listening.
3407        *
3408        * For now, just continue below to call the listen_loop function.
3409        */
3410    }
3411 #endif /* def _WIN32 */
3412
3413    listen_loop();
3414
3415    /* NOTREACHED */
3416    return(-1);
3417
3418 }
3419
3420
3421 /*********************************************************************
3422  *
3423  * Function    :  bind_port_helper
3424  *
3425  * Description :  Bind the listen port.  Handles logging, and aborts
3426  *                on failure.
3427  *
3428  * Parameters  :
3429  *          1  :  config = Privoxy configuration.  Specifies port
3430  *                         to bind to.
3431  *
3432  * Returns     :  Port that was opened.
3433  *
3434  *********************************************************************/
3435 static jb_socket bind_port_helper(struct configuration_spec * config)
3436 {
3437    int result;
3438    jb_socket bfd;
3439
3440    if (config->haddr == NULL)
3441    {
3442       log_error(LOG_LEVEL_INFO, "Listening on port %d on all IP addresses",
3443                 config->hport);
3444    }
3445    else
3446    {
3447       log_error(LOG_LEVEL_INFO, "Listening on port %d on IP address %s",
3448                 config->hport, config->haddr);
3449    }
3450
3451    result = bind_port(config->haddr, config->hport, &bfd);
3452
3453    if (result < 0)
3454    {
3455       switch(result)
3456       {
3457          case -3 :
3458             log_error(LOG_LEVEL_FATAL, "can't bind to %s:%d: "
3459                "There may be another Privoxy or some other "
3460                "proxy running on port %d",
3461                (NULL != config->haddr) ? config->haddr : "INADDR_ANY",
3462                       config->hport, config->hport);
3463
3464          case -2 :
3465             log_error(LOG_LEVEL_FATAL, "can't bind to %s:%d: " 
3466                "The hostname is not resolvable",
3467                (NULL != config->haddr) ? config->haddr : "INADDR_ANY", config->hport);
3468
3469          default :
3470             log_error(LOG_LEVEL_FATAL, "can't bind to %s:%d: because %E",
3471                (NULL != config->haddr) ? config->haddr : "INADDR_ANY", config->hport);
3472       }
3473
3474       /* shouldn't get here */
3475       return JB_INVALID_SOCKET;
3476    }
3477
3478    config->need_bind = 0;
3479
3480    return bfd;
3481 }
3482
3483
3484 #ifdef _WIN32
3485 /* Without this simple workaround we get this compiler warning from _beginthread
3486  *     warning C4028: formal parameter 1 different from declaration
3487  */
3488 void w32_service_listen_loop(void *p)
3489 {
3490    listen_loop();
3491 }
3492 #endif /* def _WIN32 */
3493
3494
3495 /*********************************************************************
3496  *
3497  * Function    :  listen_loop
3498  *
3499  * Description :  bind the listen port and enter a "FOREVER" listening loop.
3500  *
3501  * Parameters  :  N/A
3502  *
3503  * Returns     :  Never.
3504  *
3505  *********************************************************************/
3506 static void listen_loop(void)
3507 {
3508    struct client_state *csp = NULL;
3509    jb_socket bfd;
3510    struct configuration_spec * config;
3511
3512    config = load_config();
3513
3514    bfd = bind_port_helper(config);
3515
3516 #ifdef FEATURE_GRACEFUL_TERMINATION
3517    while (!g_terminate)
3518 #else
3519    for (;;)
3520 #endif
3521    {
3522 #if !defined(FEATURE_PTHREAD) && !defined(_WIN32) && !defined(__BEOS__) && !defined(AMIGA) && !defined(__OS2__)
3523       while (waitpid(-1, NULL, WNOHANG) > 0)
3524       {
3525          /* zombie children */
3526       }
3527 #endif /* !defined(FEATURE_PTHREAD) && !defined(_WIN32) && !defined(__BEOS__) && !defined(AMIGA) */
3528
3529       /*
3530        * Free data that was used by died threads
3531        */
3532       sweep();
3533
3534 #if defined(unix)
3535       /*
3536        * Re-open the errlog after HUP signal
3537        */
3538       if (received_hup_signal)
3539       {
3540          init_error_log(Argv[0], config->logfile);
3541          received_hup_signal = 0;
3542       }
3543 #endif
3544
3545 #ifdef __OS2__
3546 #ifdef FEATURE_COOKIE_JAR
3547       /*
3548        * Need a workaround here: we have to fclose() the jarfile, or we die because it's
3549        * already open.  I think unload_configfile() is not being run, which should do
3550        * this work.  Until that can get resolved, we'll use this workaround.
3551        */
3552        if (csp)
3553          if(csp->config)
3554            if (csp->config->jar)
3555            {
3556              fclose(csp->config->jar);
3557              csp->config->jar = NULL;
3558            }
3559 #endif /* FEATURE_COOKIE_JAR */
3560 #endif /* __OS2__ */
3561
3562       if ( NULL == (csp = (struct client_state *) zalloc(sizeof(*csp))) )
3563       {
3564          log_error(LOG_LEVEL_FATAL, "malloc(%d) for csp failed: %E", sizeof(*csp));
3565          continue;
3566       }
3567
3568       csp->flags |= CSP_FLAG_ACTIVE;
3569       csp->sfd    = JB_INVALID_SOCKET;
3570
3571       csp->config = config = load_config();
3572
3573       if ( config->need_bind )
3574       {
3575          /*
3576           * Since we were listening to the "old port", we will not see
3577           * a "listen" param change until the next IJB request.  So, at
3578           * least 1 more request must be made for us to find the new
3579           * setting.  I am simply closing the old socket and binding the
3580           * new one.
3581           *
3582           * Which-ever is correct, we will serve 1 more page via the
3583           * old settings.  This should probably be a "show-proxy-args"
3584           * request.  This should not be a so common of an operation
3585           * that this will hurt people's feelings.
3586           */
3587
3588          close_socket(bfd);
3589
3590          bfd = bind_port_helper(config);
3591       }
3592
3593       log_error(LOG_LEVEL_CONNECT, "Listening for new connections ... ");
3594
3595       if (!accept_connection(csp, bfd))
3596       {
3597          log_error(LOG_LEVEL_CONNECT, "accept failed: %E");
3598
3599 #ifdef AMIGA
3600          if(!childs)
3601          {
3602             exit(1);
3603          }
3604 #endif
3605          freez(csp);
3606          continue;
3607       }
3608       else
3609       {
3610          log_error(LOG_LEVEL_CONNECT, "accepted connection from %s", csp->ip_addr_str);
3611       }
3612
3613 #ifdef FEATURE_TOGGLE
3614       if (global_toggle_state)
3615 #endif /* def FEATURE_TOGGLE */
3616       {
3617          csp->flags |= CSP_FLAG_TOGGLED_ON;
3618       }
3619
3620       if (run_loader(csp))
3621       {
3622          log_error(LOG_LEVEL_FATAL, "a loader failed - must exit");
3623          /* Never get here - LOG_LEVEL_FATAL causes program exit */
3624       }
3625
3626 #ifdef FEATURE_ACL
3627       if (block_acl(NULL,csp))
3628       {
3629          log_error(LOG_LEVEL_CONNECT, "Connection from %s dropped due to ACL", csp->ip_addr_str);
3630          close_socket(csp->cfd);
3631          freez(csp);
3632          continue;
3633       }
3634 #endif /* def FEATURE_ACL */
3635
3636       /* add it to the list of clients */
3637       csp->next = clients->next;
3638       clients->next = csp;
3639
3640       if (config->multi_threaded)
3641       {
3642          int child_id;
3643
3644 /* this is a switch () statment in the C preprocessor - ugh */
3645 #undef SELECTED_ONE_OPTION
3646
3647 /* Use Pthreads in preference to native code */
3648 #if defined(FEATURE_PTHREAD) && !defined(SELECTED_ONE_OPTION)
3649 #define SELECTED_ONE_OPTION
3650          {
3651             pthread_t the_thread;
3652             pthread_attr_t attrs;
3653
3654             pthread_attr_init(&attrs);
3655             pthread_attr_setdetachstate(&attrs, PTHREAD_CREATE_DETACHED);
3656             errno = pthread_create(&the_thread, &attrs,
3657                (void * (*)(void *))serve, csp);
3658             child_id = errno ? -1 : 0;
3659             pthread_attr_destroy(&attrs);
3660          }
3661 #endif
3662
3663 #if defined(_WIN32) && !defined(_CYGWIN) && !defined(SELECTED_ONE_OPTION)
3664 #define SELECTED_ONE_OPTION
3665          child_id = _beginthread(
3666             (void (*)(void *))serve,
3667             64 * 1024,
3668             csp);
3669 #endif
3670
3671 #if defined(__OS2__) && !defined(SELECTED_ONE_OPTION)
3672 #define SELECTED_ONE_OPTION
3673          child_id = _beginthread(
3674             (void(* _Optlink)(void*))serve,
3675             NULL,
3676             64 * 1024,
3677             csp);
3678 #endif
3679
3680 #if defined(__BEOS__) && !defined(SELECTED_ONE_OPTION)
3681 #define SELECTED_ONE_OPTION
3682          {
3683             thread_id tid = spawn_thread
3684                (server_thread, "server", B_NORMAL_PRIORITY, csp);
3685
3686             if ((tid >= 0) && (resume_thread(tid) == B_OK))
3687             {
3688                child_id = (int) tid;
3689             }
3690             else
3691             {
3692                child_id = -1;
3693             }
3694          }
3695 #endif
3696
3697 #if defined(AMIGA) && !defined(SELECTED_ONE_OPTION)
3698 #define SELECTED_ONE_OPTION
3699          csp->cfd = ReleaseSocket(csp->cfd, -1);
3700          
3701 #ifdef __amigaos4__
3702          child_id = (int)CreateNewProcTags(NP_Entry, (ULONG)server_thread,
3703                                            NP_Output, Output(),
3704                                            NP_CloseOutput, FALSE,
3705                                            NP_Name, (ULONG)"privoxy child",
3706                                            NP_Child, TRUE,
3707                                            TAG_DONE);
3708 #else
3709          child_id = (int)CreateNewProcTags(NP_Entry, (ULONG)server_thread,
3710                                            NP_Output, Output(),
3711                                            NP_CloseOutput, FALSE,
3712                                            NP_Name, (ULONG)"privoxy child",
3713                                            NP_StackSize, 200*1024,
3714                                            TAG_DONE);
3715 #endif
3716          if(0 != child_id)
3717          {
3718             childs++;
3719             ((struct Task *)child_id)->tc_UserData = csp;
3720             Signal((struct Task *)child_id, SIGF_SINGLE);
3721             Wait(SIGF_SINGLE);
3722          }
3723 #endif
3724
3725 #if !defined(SELECTED_ONE_OPTION)
3726          child_id = fork();
3727
3728          /* This block is only needed when using fork().
3729           * When using threads, the server thread was
3730           * created and run by the call to _beginthread().
3731           */
3732          if (child_id == 0)   /* child */
3733          {
3734             int rc = 0;
3735 #ifdef FEATURE_TOGGLE
3736             int inherited_toggle_state = global_toggle_state;
3737 #endif /* def FEATURE_TOGGLE */
3738
3739             serve(csp);
3740
3741             /* 
3742              * If we've been toggled or we've blocked the request, tell Mom
3743              */
3744
3745 #ifdef FEATURE_TOGGLE
3746             if (inherited_toggle_state != global_toggle_state)
3747             {
3748                rc |= RC_FLAG_TOGGLED;
3749             }
3750 #endif /* def FEATURE_TOGGLE */
3751
3752 #ifdef FEATURE_STATISTICS  
3753             if (csp->flags & CSP_FLAG_REJECTED)
3754             {
3755                rc |= RC_FLAG_BLOCKED;
3756             }
3757 #endif /* ndef FEATURE_STATISTICS */
3758
3759             _exit(rc);
3760          }
3761          else if (child_id > 0) /* parent */
3762          {
3763             /* in a fork()'d environment, the parent's
3764              * copy of the client socket and the CSP
3765              * are not used.
3766              */
3767             int child_status;
3768 #if !defined(_WIN32) && !defined(__CYGWIN__)
3769
3770             wait( &child_status );
3771
3772             /* 
3773              * Evaluate child's return code: If the child has
3774              *  - been toggled, toggle ourselves
3775              *  - blocked its request, bump up the stats counter
3776              */
3777
3778 #ifdef FEATURE_TOGGLE
3779             if (WIFEXITED(child_status) && (WEXITSTATUS(child_status) & RC_FLAG_TOGGLED))
3780             {
3781                global_toggle_state = !global_toggle_state;