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