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