Changes for AmigaOS added.
[privoxy.git] / jcc.c
diff --git a/jcc.c b/jcc.c
index 6b17d1f..0ee0e15 100644 (file)
--- a/jcc.c
+++ b/jcc.c
@@ -1,4 +1,4 @@
-const char jcc_rcs[] = "$Id: jcc.c,v 1.5 2001/05/22 18:46:04 oes Exp $";
+const char jcc_rcs[] = "$Id: jcc.c,v 1.12 2001/05/27 22:17:04 oes Exp $";
 /*********************************************************************
  *
  * File        :  $Source: /cvsroot/ijbswa/current/jcc.c,v $
@@ -33,6 +33,43 @@ const char jcc_rcs[] = "$Id: jcc.c,v 1.5 2001/05/22 18:46:04 oes Exp $";
  *
  * Revisions   :
  *    $Log: jcc.c,v $
+ *    Revision 1.12  2001/05/27 22:17:04  oes
+ *
+ *    - re_process_buffer no longer writes the modified buffer
+ *      to the client, which was very ugly. It now returns the
+ *      buffer, which it is then written by chat.
+ *
+ *    - content_length now adjusts the Content-Length: header
+ *      for modified documents rather than crunch()ing it.
+ *      (Length info in csp->content_length, which is 0 for
+ *      unmodified documents)
+ *
+ *    - For this to work, sed() is called twice when filtering.
+ *
+ *    Revision 1.11  2001/05/26 17:27:53  jongfoster
+ *    Added support for CLF and fixed LOG_LEVEL_LOG.
+ *    Also did CRLF->LF fix of my previous patch.
+ *
+ *    Revision 1.10  2001/05/26 15:26:15  jongfoster
+ *    ACL feature now provides more security by immediately dropping
+ *    connections from untrusted hosts.
+ *
+ *    Revision 1.9  2001/05/26 00:28:36  jongfoster
+ *    Automatic reloading of config file.
+ *    Removed obsolete SIGHUP support (Unix) and Reload menu option (Win32).
+ *    Most of the global variables have been moved to a new
+ *    struct configuration_spec, accessed through csp->config->globalname
+ *    Most of the globals remaining are used by the Win32 GUI.
+ *
+ *    Revision 1.8  2001/05/25 22:43:18  jongfoster
+ *    Fixing minor memory leak and buffer overflow.
+ *
+ *    Revision 1.7  2001/05/25 22:34:30  jongfoster
+ *    Hard tabs->Spaces
+ *
+ *    Revision 1.6  2001/05/23 00:13:58  joergs
+ *    AmigaOS support fixed.
+ *
  *    Revision 1.5  2001/05/22 18:46:04  oes
  *
  *    - Enabled filtering banners by size rather than URL
@@ -215,27 +252,31 @@ static int32 server_thread(void *data);
  *********************************************************************/
 static void chat(struct client_state *csp)
 {
-/* This next line is a little ugly, but it simplifies the if statement below. */
-/* Basically if TOGGLE, then we want the if to test "csp->toggled_on", else we don't */
+/*
+ * This next lines are a little ugly, but they simplifies the if statements below.
+ * Basically if TOGGLE, then we want the if to test "csp->toggled_on", else we don't
+ * And if FORCE_LOAD, then we want the if to test "csp->toggled_on", else we don't
+ */
 #ifdef TOGGLE
-#   define IS_TOGGLED_ON csp->toggled_on &&
+#   define IS_TOGGLED_ON_AND (csp->toggled_on) &&
 #else /* ifndef TOGGLE */
-#   define IS_TOGGLED_ON
+#   define IS_TOGGLED_ON_AND
 #endif /* ndef TOGGLE */
+#ifdef FORCE_LOAD
+#   define IS_NOT_FORCED_AND (!csp->force) && 
+#else /* ifndef TOGGLE */
+#   define IS_NOT_FORCED_AND
+#endif /* def FORCE_LOAD */
 
-/* This next line is a little ugly, but it simplifies the if statement below. */
-/* Basically if TRUST_FILES, then we want the if to call "trust_url", else we don't */
-#ifdef TRUST_FILES
-#   define IS_TRUSTED_URL (p = trust_url(http, csp)) ||
-#else /* ifndef TRUST_FILES */
-#   define IS_TRUSTED_URL
-#endif /* ndef TRUST_FILES */
+#define IS_ENABLED_AND IS_TOGGLED_ON_AND IS_NOT_FORCED_AND
 
    char buf[BUFSIZ], *hdr, *p, *req;
    char *err = NULL;
    char *eno;
    fd_set rfds;
-   int n, maxfd, server_body, ms_iis5_hack = 0;
+   int n, maxfd, server_body;
+   int ms_iis5_hack = 0;
+   int byte_count = 0;
    const struct gateway *gw;
    struct http_request *http;
 #ifdef KILLPOPUPS
@@ -276,19 +317,19 @@ static void chat(struct client_state *csp)
  
 #ifdef FORCE_LOAD
       /* If this request contains the FORCE_PREFIX,
-                * better get rid of it now and set the force flag --oes
+       * better get rid of it now and set the force flag --oes
        */
 
-               if(strstr(req, FORCE_PREFIX))
+      if (strstr(req, FORCE_PREFIX))
       {
-                  strclean(req, FORCE_PREFIX);
-                  log_error(LOG_LEVEL_FORCE, "Enforcing request \"%s\".\n", req);
-                  csp->force = 1;
-               
+         strclean(req, FORCE_PREFIX);
+         log_error(LOG_LEVEL_FORCE, "Enforcing request \"%s\".\n", req);
+         csp->force = 1;
+      } 
       else
       {
-                  csp->force = 0;
-               }
+         csp->force = 0;
+      }
 #endif /* def FORCE_LOAD */
   
       parse_http_request(req, http, csp);
@@ -300,6 +341,9 @@ static void chat(struct client_state *csp)
    {
       strcpy(buf, CHEADER);
       write_socket(csp->cfd, buf, strlen(buf));
+
+      log_error(LOG_LEVEL_CLF, "%s - - [%T] \" \" 400 0", csp->ip_addr_str);
+
       return;
    }
 
@@ -363,15 +407,13 @@ static void chat(struct client_state *csp)
    if (!csp->toggled_on)
    {
       /* Most compatible set of permissions */
-      csp->permissions = PERMIT_COOKIE_SET | PERMIT_COOKIE_READ | PERMIT_POPUPS;
+      csp->permissions = PERMIT_MOST_COMPATIBLE;
    }
    else
+#endif /* ndef TOGGLE */
    {
       csp->permissions = url_permissions(http, csp);
    }
-#else /* ifndef TOGGLE */
-   csp->permissions = url_permissions(http, csp);
-#endif /* ndef TOGGLE */
 
 #ifdef KILLPOPUPS
    block_popups               = ((csp->permissions & PERMIT_POPUPS) == 0);
@@ -410,65 +452,103 @@ static void chat(struct client_state *csp)
 
    destroy_list(csp->headers);
 
-       /* Check the request against all rules, unless
-        * we're toggled off or in force mode. 
+   /* Check the request against all rules, unless
+    * we're toggled off or in force mode. 
     */
  
-   if (IS_TOGGLED_ON
-#ifdef FORCE_LOAD
-       (!csp->force) && 
-#endif /* def FORCE_LOAD */
-       ( (p = intercept_url(http, csp)) ||
-         IS_TRUSTED_URL
-         (p = block_url(http, csp))
+   if (intercept_url(http, csp))
+   {
+      /*
+       * The interceptor will write out the data.
+       * We don't need to do anything else
+       */
+
+#ifdef STATISTICS
+      csp->rejected = 1;
+#endif /* def STATISTICS */
+
+      freez(hdr);
+      return;
+   }
+
 #ifdef FAST_REDIRECTS
-         || (fast_redirects && (p = redirect_url(http, csp))) 
+   else if (IS_ENABLED_AND
+            ((csp->permissions & PERMIT_FAST_REDIRECTS) != 0) && 
+            (p = redirect_url(http, csp))) 
+   {
+      /* This must be blocked as HTML */
+#ifdef STATISTICS
+      csp->rejected = 1;
+#endif /* def STATISTICS */
+
+      log_error(LOG_LEVEL_GPC, "%s%s crunch!", http->hostport, http->path);
+
+      log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 3", 
+                               csp->ip_addr_str, http->cmd); 
+
+      /* Send HTML redirection result */
+      write_socket(csp->cfd, p, strlen(p));
+
+      freez(p);
+      freez(hdr);
+      return;
+   }
 #endif /* def FAST_REDIRECTS */
-      ))
+
+   else if (IS_ENABLED_AND (
+#ifdef TRUST_FILES
+         (p = trust_url(http, csp)) ||
+#endif /* def TRUST_FILES */
+         (p = block_url(http, csp)) ))
    {
+      /* Block as HTML or image */
 #ifdef STATISTICS
       csp->rejected = 1;
 #endif /* def STATISTICS */
 
       log_error(LOG_LEVEL_GPC, "%s%s crunch!", http->hostport, http->path);
 
-#if defined(DETECT_MSIE_IMAGES) || defined(USE_IMAGE_LIST)
+      log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 1", 
+                               csp->ip_addr_str, http->cmd); 
+
+#ifdef IMAGE_BLOCKING
       /* Block as image?  */
-      if ( (tinygif > 0) && block_imageurl(http, csp) )
+      if ( (csp->config->tinygif > 0) && block_imageurl(http, csp) )
       {
          /* Send "blocked" image */
          log_error(LOG_LEVEL_GPC, "%s%s image crunch!",
                    http->hostport, http->path);
 
-         if ((tinygif == 2) || strstr(http->path, "ijb-send-banner"))
+         if (csp->config->tinygif == 1)
          {
-            write_socket(csp->cfd, JBGIF, sizeof(JBGIF)-1);
+            write_socket(csp->cfd, BLANKGIF, sizeof(BLANKGIF)-1);
          }
-         if (tinygif == 1)
+         else if (csp->config->tinygif == 2)
          {
-            write_socket(csp->cfd, BLANKGIF, sizeof(BLANKGIF)-1);
+            write_socket(csp->cfd, JBGIF, sizeof(JBGIF)-1);
          }
-         else if ((tinygif == 3) && (tinygifurl))
+         else if ((csp->config->tinygif == 3) && (csp->config->tinygifurl))
          {
-            p = (char *)malloc(strlen(HTTP_REDIRECT_TEMPLATE) + strlen(tinygifurl));
-                sprintf(p, HTTP_REDIRECT_TEMPLATE, tinygifurl);
+            freez(p);
+            p = (char *)malloc(sizeof(HTTP_REDIRECT_TEMPLATE) 
+              + strlen(csp->config->tinygifurl));
+            sprintf(p, HTTP_REDIRECT_TEMPLATE, csp->config->tinygifurl);
             write_socket(csp->cfd, p, strlen(p));
          }
          else
          {
+            /* Should never happen */
             write_socket(csp->cfd, JBGIF, sizeof(JBGIF)-1);
          }
       }
       else
-#endif /* defined(DETECT_MSIE_IMAGES) || defined(USE_IMAGE_LIST) */
+#endif /* def IMAGE_BLOCKING */
       /* Block as HTML */
       {
          /* Send HTML "blocked" message, interception, or redirection result */
          write_socket(csp->cfd, p, strlen(p));
       }
 
-      log_error(LOG_LEVEL_LOG, "%s", p);
-
       freez(p);
       freez(hdr);
       return;
@@ -499,18 +579,22 @@ static void chat(struct client_state *csp)
       {
          err = zalloc(strlen(CNXDOM) + strlen(http->host));
          sprintf(err, CNXDOM, http->host);
+
+         log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 404 0", 
+                   csp->ip_addr_str, http->cmd);
       }
       else
       {
          eno = safe_strerror(errno);
          err = zalloc(strlen(CFAIL) + strlen(http->hostport) + strlen(eno));
          sprintf(err, CFAIL, http->hostport, eno);
+
+         log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 503 0", 
+                   csp->ip_addr_str, http->cmd);
       }
 
       write_socket(csp->cfd, err, strlen(err));
 
-      log_error(LOG_LEVEL_LOG, err);
-
       freez(err);
       freez(hdr);
       return;
@@ -537,6 +621,9 @@ static void chat(struct client_state *csp)
          sprintf(err, CFAIL, http->hostport, eno);
          write_socket(csp->cfd, err, strlen(err));
 
+         log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 503 0", 
+                   csp->ip_addr_str, http->cmd); 
+
          freez(err);
          freez(hdr);
          return;
@@ -549,6 +636,9 @@ static void chat(struct client_state *csp)
        * so just send the "connect succeeded" message to the
        * client, flush the rest, and get out of the way.
        */
+      log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 2\n", 
+                csp->ip_addr_str, http->cmd); 
+
       if (write_socket(csp->cfd, CSUCCEED, sizeof(CSUCCEED)-1) < 0)
       {
          freez(hdr);
@@ -591,7 +681,10 @@ static void chat(struct client_state *csp)
       {
          n = read_socket(csp->cfd, buf, sizeof(buf));
 
-         if (n <= 0) break; /* "game over, man" */
+         if (n <= 0)
+         {
+            break; /* "game over, man" */
+         }
 
          if (write_socket(csp->sfd, buf, n) != n)
          {
@@ -620,6 +713,10 @@ static void chat(struct client_state *csp)
             eno = safe_strerror(errno);
             sprintf(buf, CFAIL, http->hostport, eno);
             freez(eno);
+
+            log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 503 0", 
+                      csp->ip_addr_str, http->cmd); 
+
             write_socket(csp->cfd, buf, strlen(buf));
             return;
          }
@@ -663,7 +760,17 @@ static void chat(struct client_state *csp)
 #ifdef PCRS
                if (filtering)
                {
-                  re_process_buffer(csp);
+                  p = re_process_buffer(csp);
+                  hdr = sed(server_patterns, add_server_headers, csp);
+                  n = strlen(hdr);
+                  if ((write_socket(csp->cfd, hdr, n) != n)
+                      || (write_socket(csp->cfd, p, csp->content_length) != csp->content_length))
+                  {
+                     log_error(LOG_LEVEL_CONNECT, "write modified content to client failed: %E");
+                     return;
+                  }
+               freez(hdr);
+               freez(p);
                }
 #endif /* def PCRS */
                break; /* "game over, man" */
@@ -702,6 +809,7 @@ static void chat(struct client_state *csp)
                   return;
                }
             }
+            byte_count += n;
             continue;
          }
          else
@@ -773,7 +881,7 @@ static void chat(struct client_state *csp)
 
             if (csp->is_text  &&  /* It's a text / * MIME-Type */
                 !http->ssl    &&  /* We talk plaintext */
-                block_popups)
+                block_popups)     /* Policy allows */
             {
                block_popups_now = 1;
             }
@@ -800,9 +908,8 @@ static void chat(struct client_state *csp)
 
 #endif /* def PCRS */
 
-
-            if ((write_socket(csp->cfd, hdr, n) != n)
-                || (NOT_FILTERING_AND (flush_socket(csp->cfd, csp) < 0)))
+            if (NOT_FILTERING_AND ((write_socket(csp->cfd, hdr, n) != n)
+                || (n = flush_socket(csp->cfd, csp) < 0)))
             {
                log_error(LOG_LEVEL_CONNECT, "write header to client failed: %E");
 
@@ -814,6 +921,8 @@ static void chat(struct client_state *csp)
                return;
             }
 
+            NOT_FILTERING_AND (byte_count += n);
+
             /* we're finished with the server's header */
 
             freez(hdr);
@@ -835,7 +944,8 @@ static void chat(struct client_state *csp)
       return; /* huh? we should never get here */
    }
 
-
+   log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 %d", 
+             csp->ip_addr_str, http->cmd, byte_count); 
 }
 
 
@@ -963,22 +1073,8 @@ int main(int argc, const char *argv[])
       configfile = argv[1];
    }
 
-   remove_all_loaders();
-   memset( proxy_args, 0, sizeof( proxy_args ) );
    files->next = NULL;
 
-   load_config( 0 );
-
-   /*
-    * Since load_config acts as a signal handler too, it returns
-    * its status in configret.  Check it for an error in loading.
-    */
-   if ( 0 != configret )
-   {
-      /* load config failed!  Exit with error. */
-      return( 1 );
-   }
-
 #ifdef _WIN32
    InitWin32();
 #endif
@@ -987,7 +1083,6 @@ int main(int argc, const char *argv[])
 #ifndef _WIN32
    signal(SIGPIPE, SIG_IGN);
    signal(SIGCHLD, SIG_IGN);
-   signal(SIGHUP, load_config);
 
 #else /* ifdef _WIN32 */
 # ifdef _WIN_CONSOLE
@@ -1023,24 +1118,29 @@ static void listen_loop(void)
 {
    struct client_state *csp = NULL;
    int bfd;
+   struct configuration_spec * config;
+
+   config = load_config();
 
    log_error(LOG_LEVEL_CONNECT, "bind (%s, %d)",
-             haddr ? haddr : "INADDR_ANY", hport);
+             config->haddr ? config->haddr : "INADDR_ANY", config->hport);
 
-   bfd = bind_port(haddr, hport);
-   config_changed = 0;
+   bfd = bind_port(config->haddr, config->hport);
 
    if (bfd < 0)
    {
       log_error(LOG_LEVEL_FATAL, "can't bind %s:%d: %E "
          "- There may be another junkbuster or some other "
          "proxy running on port %d", 
-         (NULL != haddr) ? haddr : "INADDR_ANY", hport, hport
+         (NULL != config->haddr) ? config->haddr : "INADDR_ANY", 
+         config->hport, config->hport
       );
       /* shouldn't get here */
       return;
    }
 
+   config->need_bind = 0;
+
 
    while (FOREVER)
    {
@@ -1052,9 +1152,9 @@ static void listen_loop(void)
 #endif /* !defined(_WIN32) && !defined(__BEOS__) && !defined(AMIGA) */
       sweep();
 
-      if ( NULL == (csp = (struct client_state *) malloc(sizeof(*csp))) )
+      if ( NULL == (csp = (struct client_state *) zalloc(sizeof(*csp))) )
       {
-         log_error(LOG_LEVEL_ERROR, "malloc(%d) for csp failed: %E", sizeof(*csp));
+         log_error(LOG_LEVEL_FATAL, "malloc(%d) for csp failed: %E", sizeof(*csp));
          continue;
       }
 
@@ -1063,7 +1163,9 @@ static void listen_loop(void)
       csp->active = 1;
       csp->sfd    = -1;
 
-      if ( config_changed )
+      csp->config = config = load_config();
+
+      if ( config->need_bind )
       {
          /*
           * Since we were listening to the "old port", we will not see
@@ -1077,13 +1179,26 @@ static void listen_loop(void)
           * request.  This should not be a so common of an operation
           * that this will hurt people's feelings.
           */
+
          close_socket(bfd);
 
          log_error(LOG_LEVEL_CONNECT, "bind (%s, %d)",
-                   haddr ? haddr : "INADDR_ANY", hport);
-         bfd = bind_port(haddr, hport);
+                   config->haddr ? config->haddr : "INADDR_ANY", config->hport);
+         bfd = bind_port(config->haddr, config->hport);
+
+         if (bfd < 0)
+         {
+            log_error(LOG_LEVEL_FATAL, "can't bind %s:%d: %E "
+               "- There may be another junkbuster or some other "
+               "proxy running on port %d", 
+               (NULL != config->haddr) ? config->haddr : "INADDR_ANY", 
+               config->hport, config->hport
+            );
+            /* shouldn't get here */
+            return;
+         }
 
-         config_changed = 0;
+         config->need_bind = 0;
       }
 
       log_error(LOG_LEVEL_CONNECT, "accept connection ... ");
@@ -1098,6 +1213,7 @@ static void listen_loop(void)
             exit(1); 
          }
 #endif
+         freez(csp);
          continue;
       }
       else
@@ -1110,17 +1226,25 @@ static void listen_loop(void)
       csp->toggled_on = g_bToggleIJB;
 #endif
 
-      /* add it to the list of clients */
-      csp->next = clients->next;
-      clients->next = csp;
-
       if (run_loader(csp))
       {
          log_error(LOG_LEVEL_FATAL, "a loader failed - must exit");
          /* Never get here - LOG_LEVEL_FATAL causes program exit */
       }
 
-      if (multi_threaded)
+      if (block_acl(NULL,csp))
+      {
+         log_error(LOG_LEVEL_CONNECT, "Connection dropped due to ACL");
+         close_socket(csp->cfd);
+         freez(csp);
+         continue;
+      }
+
+      /* add it to the list of clients */
+      csp->next = clients->next;
+      clients->next = csp;
+
+      if (config->multi_threaded)
       {
          int child_id;