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