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