-const char filters_rcs[] = "$Id: filters.c,v 1.36 2001/10/10 16:44:16 oes Exp $";
+const char filters_rcs[] = "$Id: filters.c,v 1.40 2001/10/26 17:37:55 oes Exp $";
/*********************************************************************
*
* File : $Source: /cvsroot/ijbswa/current/filters.c,v $
* IJBSWA team. http://ijbswa.sourceforge.net
*
* Based on the Internet Junkbuster originally written
- * by and Copyright (C) 1997 Anonymous Coders and
+ * by and Copyright (C) 1997 Anonymous Coders and
* Junkbusters Corporation. http://www.junkbusters.com
*
- * This program is free software; you can redistribute it
+ * This program is free software; you can redistribute it
* and/or modify it under the terms of the GNU General
* Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at
*
* Revisions :
* $Log: filters.c,v $
+ * Revision 1.40 2001/10/26 17:37:55 oes
+ * - Re-enabled Netscape 200/404 bug workaround in block_url():
+ * - Removed OS/2 special case
+ * - Made block_url() independant from sed() having been run
+ * - Made trust_url independant from sed() having been run
+ * - Made is_imageurl independant from sed() having been run.
+ * It now checks User-Agent: and Accept: by itself.
+ *
+ *
+ * Revision 1.39 2001/10/25 03:40:48 david__schmidt
+ * Change in porting tactics: OS/2's EMX porting layer doesn't allow multiple
+ * threads to call select() simultaneously. So, it's time to do a real, live,
+ * native OS/2 port. See defines for __EMX__ (the porting layer) vs. __OS2__
+ * (native). Both versions will work, but using __OS2__ offers multi-threading.
+ *
+ * Revision 1.38 2001/10/23 21:32:33 jongfoster
+ * Adding error-checking to selected functions
+ *
+ * Revision 1.37 2001/10/22 15:33:56 david__schmidt
+ * Special-cased OS/2 out of the Netscape-abort-on-404-in-js problem in
+ * filters.c. Added a FIXME in front of the offending code. I'll gladly
+ * put in a better/more robust fix for all parties if one is presented...
+ * It seems that just returning 200 instead of 404 would pretty much fix
+ * it for everyone, but I don't know all the history of the problem.
+ *
* Revision 1.36 2001/10/10 16:44:16 oes
* Added match_portlist function
*
#include <assert.h>
#ifndef _WIN32
+#ifndef __OS2__
#include <unistd.h>
+#endif /* ndef __OS2__ */
#include <netinet/in.h>
#else
#include <winsock2.h>
-#endif
+#endif /* ndef _WIN32 */
+
+#ifdef __OS2__
+#include <utils.h>
+#endif /* def __OS2__ */
#include "project.h"
#include "filters.h"
{
*next++ = '\0';
}
-
+
/*
* Loop through all items, checking for match
*/
free(portlist_copy);
return(1);
}
-
- }
+
+ }
/*
* Jump to next item
*next++ = '\0';
}
}
-
+
free(portlist_copy);
return 0;
#endif /* def FEATURE_IMAGE_BLOCKING */
struct http_response *rsp;
- /*
+ /*
* If it's not blocked, don't block it ;-)
*/
if ((csp->action->flags & ACTION_BLOCK) == 0)
{
- return(NULL);
+ return NULL;
}
- /*
+ /*
* Else, prepare a response
*/
if (NULL == (rsp = alloc_http_response()))
{
- return NULL;
+ return cgi_error_memory();
}
/*
if ((p == NULL) || (0 == strcmpic(p, "logo")))
{
rsp->body = bindup(image_junkbuster_gif_data, image_junkbuster_gif_length);
+ if (rsp->body == NULL)
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
rsp->content_length = image_junkbuster_gif_length;
- enlist_unique_header(rsp->headers, "Content-Type", "image/gif");
+
+ if (enlist_unique_header(rsp->headers, "Content-Type", "image/gif"))
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
}
else if (0 == strcmpic(p, "blank"))
{
rsp->body = bindup(image_blank_gif_data, image_blank_gif_length);
+ if (rsp->body == NULL)
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
rsp->content_length = image_blank_gif_length;
- enlist_unique_header(rsp->headers, "Content-Type", "image/gif");
+
+ if (enlist_unique_header(rsp->headers, "Content-Type", "image/gif"))
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
}
else
{
rsp->status = strdup("302 Local Redirect from Junkbuster");
- enlist_unique_header(rsp->headers, "Location", p);
+ if (rsp->status == NULL)
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
+
+ if (enlist_unique_header(rsp->headers, "Location", p))
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
}
- }
+ }
else
#endif /* def FEATURE_IMAGE_BLOCKING */
- /*
+ /*
* Else, generate an HTML "blocked" message:
*/
{
- struct map * exports = default_exports(csp, NULL);
-#ifdef FEATURE_FORCE_LOAD
- map(exports, "force-prefix", 1, FORCE_PREFIX, 1);
-#else /* ifndef FEATURE_FORCE_LOAD */
- map_block_killer(exports, "force-support");
-#endif /* ndef FEATURE_FORCE_LOAD */
-
- map(exports, "hostport", 1, csp->http->hostport, 1);
- map(exports, "hostport-html", 1, html_encode(csp->http->hostport), 0);
- map(exports, "path", 1, csp->http->path, 1);
- map(exports, "path-html", 1, html_encode(csp->http->path), 0);
+ jb_err err;
+ struct map * exports;
- rsp->body = template_load(csp, "blocked");
- template_fill(&rsp->body, exports);
- free_map(exports);
-
- /* FIXME */
-#ifdef __EMX__
- /*
- * The entire OS/2 community will hit the stupid Netscape bug
- * (all three of us! :-) so we'll just keep ourselves out
- * of this contentious debate and special-case ourselves.
- * The problem is... a this point in parsing, we don't know
- * what the csp->http->user_agent is (yet). So we can't use
- * it to decide if we should work around the NS bug or not.
- */
- rsp->status = strdup("200 Request for blocked URL");
-#else
/*
* Workaround for stupid Netscape bug which prevents
* pages from being displayed if loading a referenced
* JavaScript or style sheet fails. So make it appear
* as if it succeeded.
*/
- if (csp->http->user_agent
- && !strncmpic(csp->http->user_agent, "mozilla", 7)
- && !strstr(csp->http->user_agent, "compatible")
- && !strstr(csp->http->user_agent, "Opera"))
+ if ( NULL != (p = get_header_value(csp->headers, "User-Agent:"))
+ && !strncmpic(p, "mozilla", 7) /* Catch Netscape but */
+ && !strstr(p, "Gecko") /* save Mozilla, */
+ && !strstr(p, "compatible") /* MSIE */
+ && !strstr(p, "Opera")) /* and Opera. */
{
- rsp->status = strdup("200 Request for blocked URL");
+ rsp->status = strdup("200 Request for blocked URL");
}
else
{
- rsp->status = strdup("404 Request for blocked URL");
+ rsp->status = strdup("404 Request for blocked URL");
+ }
+
+ if (rsp->status == NULL)
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
+
+ exports = default_exports(csp, NULL);
+ if (exports == NULL)
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
+
+#ifdef FEATURE_FORCE_LOAD
+ err = map(exports, "force-prefix", 1, FORCE_PREFIX, 1);
+#else /* ifndef FEATURE_FORCE_LOAD */
+ err = map_block_killer(exports, "force-support");
+#endif /* ndef FEATURE_FORCE_LOAD */
+
+ if (!err) err = map(exports, "hostport", 1, csp->http->hostport, 1);
+ if (!err) err = map(exports, "hostport-html", 1, html_encode(csp->http->hostport), 0);
+ if (!err) err = map(exports, "path", 1, csp->http->path, 1);
+ if (!err) err = map(exports, "path-html", 1, html_encode(csp->http->path), 0);
+
+ if (err)
+ {
+ free_map(exports);
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
+
+ err = template_fill_for_cgi(csp, "blocked", exports, rsp);
+ if (err)
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
}
-#endif /* __EMX__ */
}
- return(finish_http_response(rsp));
+ return finish_http_response(rsp);
}
{
struct http_response *rsp;
struct map * exports;
- char buf[BUFFER_SIZE], *p = NULL;
- struct url_spec **tl, *t;
+ char buf[BUFFER_SIZE];
+ char *p;
+ struct url_spec **tl;
+ struct url_spec *t;
+ jb_err err;
/*
* Don't bother to work on trusted URLs
return NULL;
}
- /*
+ /*
* Else, prepare a response:
*/
if (NULL == (rsp = alloc_http_response()))
{
- return NULL;
+ return cgi_error_memory();
}
exports = default_exports(csp, NULL);
+ if (exports == NULL)
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
- /*
+ /*
* Export the host, port, and referrer information
*/
- map(exports, "hostport", 1, csp->http->hostport, 1);
- map(exports, "path", 1, csp->http->path, 1);
- map(exports, "hostport-html", 1, html_encode(csp->http->hostport), 0);
- map(exports, "path-html", 1, html_encode(csp->http->path), 0);
+ err = map(exports, "hostport", 1, csp->http->hostport, 1);
+ if (!err) err = map(exports, "path", 1, csp->http->path, 1);
+ if (!err) err = map(exports, "hostport-html", 1, html_encode(csp->http->hostport), 0);
+ if (!err) err = map(exports, "path-html", 1, html_encode(csp->http->path), 0);
- if (csp->referrer && strlen(csp->referrer) > 9)
+ if (NULL != (p = get_header_value(csp->headers, "Referer:")))
{
- map(exports, "referrer", 1, csp->referrer + 9, 1);
- map(exports, "referrer-html", 1, html_encode(csp->referrer + 9), 0);
+ if (!err) err = map(exports, "referrer", 1, p, 1);
+ if (!err) err = map(exports, "referrer-html", 1, html_encode(p), 0);
}
else
{
- map(exports, "referrer", 1, "unknown", 1);
- map(exports, "referrer-html", 1, "unknown", 1);
+ if (!err) err = map(exports, "referrer", 1, "unknown", 1);
+ if (!err) err = map(exports, "referrer-html", 1, "unknown", 1);
+ }
+
+ if (err)
+ {
+ free_map(exports);
+ free_http_response(rsp);
+ return cgi_error_memory();
}
/*
* Export the trust list
*/
+ p = strdup("");
for (tl = csp->config->trust_list; (t = *tl) ; tl++)
{
sprintf(buf, "<li>%s</li>\n", t->spec);
- p = strsav(p, buf);
+ string_append(&p, buf);
+ }
+ err = map(exports, "trusted-referrers", 1, p, 0);
+
+ if (err)
+ {
+ free_map(exports);
+ free_http_response(rsp);
+ return cgi_error_memory();
}
- map(exports, "trusted-referrers", 1, p, 0);
- p = NULL;
/*
* Export the trust info, if available
{
struct list_entry *l;
+ p = strdup("");
for (l = csp->config->trust_info->first; l ; l = l->next)
{
sprintf(buf, "<li> <a href=%s>%s</a><br>\n",l->str, l->str);
- p = strsav(p, buf);
+ string_append(&p, buf);
}
- map(exports, "trust-info", 1, p, 0);
+ err = map(exports, "trust-info", 1, p, 0);
}
else
{
- map_block_killer(exports, "have-trust-info");
+ err = map_block_killer(exports, "have-trust-info");
}
-
+
+ if (err)
+ {
+ free_map(exports);
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
+
/*
* Export the force prefix or the force conditional block killer
*/
#ifdef FEATURE_FORCE_LOAD
- map(exports, "force-prefix", 1, FORCE_PREFIX, 1);
+ err = map(exports, "force-prefix", 1, FORCE_PREFIX, 1);
#else /* ifndef FEATURE_FORCE_LOAD */
- map_block_killer(exports, "force-support");
+ err = map_block_killer(exports, "force-support");
#endif /* ndef FEATURE_FORCE_LOAD */
+ if (err)
+ {
+ free_map(exports);
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
+
/*
* Build the response
*/
- rsp->body = template_load(csp, "untrusted");
- template_fill(&rsp->body, exports);
- free_map(exports);
-
- return(finish_http_response(rsp));
+ err = template_fill_for_cgi(csp, "untrusted", exports, rsp);
+ if (err)
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
+ return finish_http_response(rsp);
}
#endif /* def FEATURE_TRUST */
p = q = csp->http->path;
log_error(LOG_LEVEL_REDIRECTS, "checking path for redirects: %s", p);
- /*
+ /*
* find the last URL encoded in the request
*/
while ((p = strstr(p, "http://")))
q = p++;
}
- /*
+ /*
* if there was any, generate and return a HTTP redirect
*/
if (q != csp->http->path)
if (NULL == (rsp = alloc_http_response()))
{
- return NULL;
+ return cgi_error_memory();
}
- rsp->status = strdup("302 Local Redirect from Junkbuster");
- enlist_unique_header(rsp->headers, "Location", q);
+ if ( enlist_unique_header(rsp->headers, "Location", q)
+ || (NULL == (rsp->status = strdup("302 Local Redirect from Junkbuster"))) )
+ {
+ free_http_response(rsp);
+ return cgi_error_memory();
+ }
- return(finish_http_response(rsp));
+ return finish_http_response(rsp);
}
else
{
- return(NULL);
+ return NULL;
}
}
* using either the info from a previous +image action
* or, #ifdef FEATURE_IMAGE_DETECT_MSIE, the info from
* the browser's accept header.
- *
+ *
* Parameters :
* 1 : csp = Current client state (buffers, headers, etc...)
*
int is_imageurl(struct client_state *csp)
{
#ifdef FEATURE_IMAGE_DETECT_MSIE
- if ((csp->accept_types
- & (ACCEPT_TYPE_IS_MSIE|ACCEPT_TYPE_MSIE_IMAGE|ACCEPT_TYPE_MSIE_HTML))
- == (ACCEPT_TYPE_IS_MSIE|ACCEPT_TYPE_MSIE_IMAGE))
- {
- return 1;
- }
- else if ((csp->accept_types
- & (ACCEPT_TYPE_IS_MSIE|ACCEPT_TYPE_MSIE_IMAGE|ACCEPT_TYPE_MSIE_HTML))
- == (ACCEPT_TYPE_IS_MSIE|ACCEPT_TYPE_MSIE_HTML))
+ char *tmp;
+
+ tmp = get_header_value(csp->headers, "User-Agent:");
+ if (tmp && strstr(tmp, "MSIE"))
{
- return 0;
+ tmp = get_header_value(csp->headers, "Accept:");
+ if (tmp && strstr(tmp, "image/gif"))
+ {
+ /* Client will accept HTML. If this seems counterintuitive,
+ * blame Microsoft.
+ */
+ return(0);
+ }
+ else
+ {
+ return(1);
+ }
}
#endif /* def FEATURE_IMAGE_DETECT_MSIE */
freez(url->dbuf);
freez(url->dvec);
- if ((csp->referrer == NULL)|| (strlen(csp->referrer) <= 9))
+ if (NULL == (h = get_header_value(csp->headers, "Referer:")))
{
/* no referrer was supplied */
return(1);
p = NULL;
p = strsav(p, "GET ");
- p = strsav(p, csp->referrer + 9); /* skip over "Referer: " */
+ p = strsav(p, h);
p = strsav(p, " HTTP/1.0");
parse_http_request(p, rhttp, csp);
* Function : pcrs_filter_response
*
* Description : Apply all the pcrs jobs from the joblist (re_filterfile)
- * to the text buffer that's been accumulated in
+ * to the text buffer that's been accumulated in
* csp->iob->buf and set csp->content_length to the modified
* size and raise the CSP_FLAG_MODIFIED flag if appropriate.
*
*
* Returns : a pointer to the (newly allocated) modified buffer.
* or NULL in case something went wrong
- *
+ *
*********************************************************************/
char *pcrs_filter_response(struct client_state *csp)
{
log_error(LOG_LEVEL_RE_FILTER, " produced %d hits (new size %d).", hits, size);
- /*
+ /*
* If there were no hits, destroy our copy and let
* chat() use the original in csp->iob
*/
*
* Function : gif_deanimate_response
*
- * Description : Deanimate the GIF image that has been accumulated in
+ * Description : Deanimate the GIF image that has been accumulated in
* csp->iob->buf, set csp->content_length to the modified
* size and raise the CSP_FLAG_MODIFIED flag.
*
*
* Returns : a pointer to the (newly allocated) modified buffer.
* or NULL in case something went wrong.
- *
+ *
*********************************************************************/
char *gif_deanimate_response(struct client_state *csp)
{
free(in);
free(out);
return(p);
- }
+ }
}
* Returns : The new size, i.e. the number of bytes from buffer which
* are occupied by the stripped body, or 0 in case something
* went wrong
- *
+ *
*********************************************************************/
int remove_chunked_transfer_coding(char *buffer, const size_t size)
{
}
newsize += chunksize;
from_p += 2;
-
+
memmove(to_p, from_p, (size_t) chunksize);
to_p = buffer + newsize;
from_p += chunksize + 2;
* Returns : N/A
*
*********************************************************************/
-void url_actions(struct http_request *http,
+void url_actions(struct http_request *http,
struct client_state *csp)
{
struct file_list *fl;
* Returns : N/A
*
*********************************************************************/
-void apply_url_actions(struct current_action_spec *action,
- struct http_request *http,
+void apply_url_actions(struct current_action_spec *action,
+ struct http_request *http,
struct url_actions *b)
{
struct url_spec url[1];
* 1 : domain = a URL address
*
* Returns : url_spec structure populated with dbuf, dcnt and dvec.
+ * On error, the dbuf field will be set to NULL. (As
+ * will all the others, but you don't need to check
+ * them).
+ *
+ * FIXME: Returning a structure is horribly inefficient, please can
+ * this structure take a (struct url_spec * dest)
+ * pointer instead?
*
*********************************************************************/
struct url_spec dsplit(char *domain)
}
ret->dbuf = strdup(domain);
+ if (NULL == ret->dbuf)
+ {
+ return *ret;
+ }
/* map to lower case */
- for (p = ret->dbuf; *p ; p++) *p = tolower(*p);
+ for (p = ret->dbuf; *p ; p++)
+ {
+ *p = tolower((int)(unsigned char)*p);
+ }
/* split the domain name into components */
ret->dcnt = ssplit(ret->dbuf, ".", v, SZ(v), 1, 1);
- if (ret->dcnt <= 0)
+ if (ret->dcnt < 0)
{
+ free(ret->dbuf);
memset(ret, '\0', sizeof(ret));
- return(*ret);
+ return *ret;
+ }
+ else if (ret->dcnt == 0)
+ {
+ return *ret;
}
/* save a copy of the pointers in dvec */
size = ret->dcnt * sizeof(*ret->dvec);
- if ((ret->dvec = (char **)malloc(size)))
+ ret->dvec = (char **)malloc(size);
+ if (NULL == ret->dvec)
{
- memcpy(ret->dvec, v, size);
+ free(ret->dbuf);
+ memset(ret, '\0', sizeof(ret));
+ return *ret;
}
- return(*ret);
+ memcpy(ret->dvec, v, size);
+
+ return *ret;
}
*
* Function : simple_domaincmp
*
- * Description : Domain-wise Compare fqdn's. The comparison is
+ * Description : Domain-wise Compare fqdn's. The comparison is
* both left- and right-anchored. The individual
* domain names are compared with simplematch().
* This is only used by domaincmp.