e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun#include "mod_proxy.h"

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgunmodule AP_MODULE_DECLARE_DATA proxy_http_module;

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgunint ap_proxy_http_canon(request_rec *r, char *url);

e609c337f729875bc20e01096c7e610f45356f54nilgunint ap_proxy_http_handler(request_rec *r, proxy_server_conf *conf,

e609c337f729875bc20e01096c7e610f45356f54nilgun char *url, const char *proxyname,

91f378b5a10f2d83820902ed10ba7967a3920c18nilgun apr_port_t proxyport);

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilguntypedef struct {

e609c337f729875bc20e01096c7e610f45356f54nilgun const char *name;

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_port_t port;

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_sockaddr_t *addr;

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_socket_t *sock;

e609c337f729875bc20e01096c7e610f45356f54nilgun int close;

e609c337f729875bc20e01096c7e610f45356f54nilgun} proxy_http_conn_t;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgunstatic apr_status_t ap_proxy_http_cleanup(request_rec *r,

e609c337f729875bc20e01096c7e610f45356f54nilgun proxy_http_conn_t *p_conn,

e609c337f729875bc20e01096c7e610f45356f54nilgun proxy_conn_rec *backend);

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgunint ap_proxy_http_canon(request_rec *r, char *url)

e609c337f729875bc20e01096c7e610f45356f54nilgun{

e609c337f729875bc20e01096c7e610f45356f54nilgun char *host, *path, *search, sport[7];

e609c337f729875bc20e01096c7e610f45356f54nilgun const char *err;

e609c337f729875bc20e01096c7e610f45356f54nilgun const char *scheme;

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_port_t port, def_port;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* ap_default_port_for_scheme() */

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun if (strncasecmp(url, "http:", 5) == 0) {

e609c337f729875bc20e01096c7e610f45356f54nilgun url += 5;

e609c337f729875bc20e01096c7e610f45356f54nilgun scheme = "http";

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun else if (strncasecmp(url, "https:", 6) == 0) {

e609c337f729875bc20e01096c7e610f45356f54nilgun url += 6;

e609c337f729875bc20e01096c7e610f45356f54nilgun scheme = "https";

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun else {

e609c337f729875bc20e01096c7e610f45356f54nilgun return DECLINED;

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun def_port = apr_uri_default_port_for_scheme(scheme);

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

e609c337f729875bc20e01096c7e610f45356f54nilgun "proxy: HTTP: canonicalising URL %s", url);

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* do syntatic check.

e609c337f729875bc20e01096c7e610f45356f54nilgun port = def_port;

e609c337f729875bc20e01096c7e610f45356f54nilgun err = ap_proxy_canon_netloc(r->pool, &url, NULL, NULL, &host, &port);

e609c337f729875bc20e01096c7e610f45356f54nilgun if (err)

e609c337f729875bc20e01096c7e610f45356f54nilgun return HTTP_BAD_REQUEST;

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* now parse path/search args, according to rfc1738 */

e609c337f729875bc20e01096c7e610f45356f54nilgun /* N.B. if this isn't a true proxy request, then the URL _path_

e609c337f729875bc20e01096c7e610f45356f54nilgun if (r->uri == r->unparsed_uri) {

e609c337f729875bc20e01096c7e610f45356f54nilgun search = strchr(url, '?');

e609c337f729875bc20e01096c7e610f45356f54nilgun if (search != NULL)

e609c337f729875bc20e01096c7e610f45356f54nilgun *(search++) = '\0';

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun else

e609c337f729875bc20e01096c7e610f45356f54nilgun search = r->args;

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* process path */

e609c337f729875bc20e01096c7e610f45356f54nilgun path = ap_proxy_canonenc(r->pool, url, strlen(url), enc_path, r->proxyreq);

e609c337f729875bc20e01096c7e610f45356f54nilgun if (path == NULL)

e609c337f729875bc20e01096c7e610f45356f54nilgun return HTTP_BAD_REQUEST;

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun if (port != def_port)

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_snprintf(sport, sizeof(sport), ":%d", port);

e609c337f729875bc20e01096c7e610f45356f54nilgun else

e609c337f729875bc20e01096c7e610f45356f54nilgun sport[0] = '\0';

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun r->filename = apr_pstrcat(r->pool, "proxy:", scheme, "://", host, sport,

e609c337f729875bc20e01096c7e610f45356f54nilgun "/", path, (search) ? "?" : "", (search) ? search : "", NULL);

e609c337f729875bc20e01096c7e610f45356f54nilgun return OK;

e609c337f729875bc20e01096c7e610f45356f54nilgun}

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgunstatic const char *ap_proxy_location_reverse_map(request_rec *r, proxy_server_conf *conf, const char *url)

e609c337f729875bc20e01096c7e610f45356f54nilgun{

e609c337f729875bc20e01096c7e610f45356f54nilgun struct proxy_alias *ent;

e609c337f729875bc20e01096c7e610f45356f54nilgun int i, l1, l2;

e609c337f729875bc20e01096c7e610f45356f54nilgun char *u;

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* XXX FIXME: Make sure this handled the ambiguous case of the :80

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun l1 = strlen(url);

e609c337f729875bc20e01096c7e610f45356f54nilgun ent = (struct proxy_alias *)conf->raliases->elts;

e609c337f729875bc20e01096c7e610f45356f54nilgun for (i = 0; i < conf->raliases->nelts; i++) {

e609c337f729875bc20e01096c7e610f45356f54nilgun l2 = strlen(ent[i].real);

e609c337f729875bc20e01096c7e610f45356f54nilgun if (l1 >= l2 && strncmp(ent[i].real, url, l2) == 0) {

e609c337f729875bc20e01096c7e610f45356f54nilgun u = apr_pstrcat(r->pool, ent[i].fake, &url[l2], NULL);

e609c337f729875bc20e01096c7e610f45356f54nilgun return ap_construct_url(r->pool, u, r);

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun return url;

e609c337f729875bc20e01096c7e610f45356f54nilgun}

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgunstatic void ap_proxy_clear_connection(apr_pool_t *p, apr_table_t *headers)

e609c337f729875bc20e01096c7e610f45356f54nilgun{

e609c337f729875bc20e01096c7e610f45356f54nilgun const char *name;

e609c337f729875bc20e01096c7e610f45356f54nilgun char *next = apr_pstrdup(p, apr_table_get(headers, "Connection"));

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_table_unset(headers, "Proxy-Connection");

e609c337f729875bc20e01096c7e610f45356f54nilgun if (!next)

e609c337f729875bc20e01096c7e610f45356f54nilgun return;

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun while (*next) {

e609c337f729875bc20e01096c7e610f45356f54nilgun name = next;

e609c337f729875bc20e01096c7e610f45356f54nilgun while (*next && !apr_isspace(*next) && (*next != ',')) {

e609c337f729875bc20e01096c7e610f45356f54nilgun ++next;

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun while (*next && (apr_isspace(*next) || (*next == ','))) {

e609c337f729875bc20e01096c7e610f45356f54nilgun *next = '\0';

e609c337f729875bc20e01096c7e610f45356f54nilgun ++next;

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_table_unset(headers, name);

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_table_unset(headers, "Connection");

91f378b5a10f2d83820902ed10ba7967a3920c18nilgun}

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgunapr_status_t ap_proxy_http_determine_connection(apr_pool_t *p, request_rec *r,

e609c337f729875bc20e01096c7e610f45356f54nilgun proxy_http_conn_t *p_conn,

e609c337f729875bc20e01096c7e610f45356f54nilgun conn_rec *c,

e609c337f729875bc20e01096c7e610f45356f54nilgun proxy_server_conf *conf,

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_uri_t *uri,

e609c337f729875bc20e01096c7e610f45356f54nilgun char **url,

e609c337f729875bc20e01096c7e610f45356f54nilgun const char *proxyname,

91f378b5a10f2d83820902ed10ba7967a3920c18nilgun apr_port_t proxyport,

91f378b5a10f2d83820902ed10ba7967a3920c18nilgun char *server_portstr,

91f378b5a10f2d83820902ed10ba7967a3920c18nilgun int server_portstr_size) {

91f378b5a10f2d83820902ed10ba7967a3920c18nilgun int server_port;

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_status_t err;

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_sockaddr_t *uri_addr;

e609c337f729875bc20e01096c7e610f45356f54nilgun /*

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* we break the URL into host, port, uri */

e609c337f729875bc20e01096c7e610f45356f54nilgun if (APR_SUCCESS != apr_uri_parse(p, *url, uri)) {

e609c337f729875bc20e01096c7e610f45356f54nilgun return ap_proxyerror(r, HTTP_BAD_REQUEST,

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_pstrcat(p,"URI cannot be parsed: ", *url,

e609c337f729875bc20e01096c7e610f45356f54nilgun NULL));

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun if (!uri->port) {

e609c337f729875bc20e01096c7e610f45356f54nilgun uri->port = apr_uri_default_port_for_scheme(uri->scheme);

e609c337f729875bc20e01096c7e610f45356f54nilgun }

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

e609c337f729875bc20e01096c7e610f45356f54nilgun "proxy: HTTP connecting %s to %s:%d", *url, uri->hostname,

e609c337f729875bc20e01096c7e610f45356f54nilgun uri->port);

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* do a DNS lookup for the destination host */

e609c337f729875bc20e01096c7e610f45356f54nilgun /* see memory note above */

e609c337f729875bc20e01096c7e610f45356f54nilgun err = apr_sockaddr_info_get(&uri_addr, apr_pstrdup(c->pool, uri->hostname),

e609c337f729875bc20e01096c7e610f45356f54nilgun APR_UNSPEC, uri->port, 0, c->pool);

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* allocate these out of the connection pool - the check on

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* are we connecting directly, or via a proxy? */

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun if (proxyname) {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun p_conn->name = apr_pstrdup(c->pool, proxyname);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun p_conn->port = proxyport;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* see memory note above */

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun err = apr_sockaddr_info_get(&p_conn->addr, p_conn->name, APR_UNSPEC,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun p_conn->port, 0, c->pool);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun } else {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun p_conn->name = apr_pstrdup(c->pool, uri->hostname);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun p_conn->port = uri->port;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun p_conn->addr = uri_addr;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun *url = apr_pstrcat(p, uri->path, uri->query ? "?" : "",

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun uri->query ? uri->query : "",

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun uri->fragment ? "#" : "",

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun uri->fragment ? uri->fragment : "", NULL);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun }

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun if (err != APR_SUCCESS) {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun return ap_proxyerror(r, HTTP_BAD_GATEWAY,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun apr_pstrcat(p, "DNS lookup failure for: ",

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun p_conn->name, NULL));

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun }

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* Get the server port for the Via headers */

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun server_port = ap_get_server_port(r);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun if (ap_is_default_port(server_port, r)) {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun strcpy(server_portstr,"");

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun } else {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun apr_snprintf(server_portstr, server_portstr_size, ":%d",

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun server_port);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun }

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun }

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* check if ProxyBlock directive on this host */

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun if (OK != ap_proxy_checkproxyblock(r, conf, uri_addr)) {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun return ap_proxyerror(r, HTTP_FORBIDDEN,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun "Connect to remote machine blocked");

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun }

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun return OK;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun}

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgunapr_status_t ap_proxy_http_create_connection(apr_pool_t *p, request_rec *r,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun proxy_http_conn_t *p_conn,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun conn_rec *c, conn_rec **origin,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun proxy_conn_rec *backend,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun proxy_server_conf *conf,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun const char *proxyname) {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun int failed=0, new=0;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun apr_socket_t *client_socket = NULL;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* We have determined who to connect to. Now make the connection, supporting

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* get all the possible IP addresses for the destname and loop through them

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* if a keepalive socket is already open, check whether it must stay

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* see memory note above */

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun if (backend->connection) {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun client_socket = ap_get_module_config(backend->connection->conn_config, &core_module);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun if ((backend->connection->id == c->id) &&

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun (backend->port == p_conn->port) &&

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun (backend->hostname) &&

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun (!apr_strnatcasecmp(backend->hostname, p_conn->name))) {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun "proxy: keepalive address match (keep original socket)");

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun } else {

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun "proxy: keepalive address mismatch / connection has"

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun " changed (close old socket (%s/%s, %d/%d))",

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun p_conn->name, backend->hostname, p_conn->port,

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun backend->port);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun apr_socket_close(client_socket);

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun backend->connection = NULL;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun }

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun }

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun /* get a socket - either a keepalive one, or a new one */

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun new = 1;

b9bf3918f6eaf7747bcbfbd02792bcbe4a052784nilgun if ((backend->connection) && (backend->connection->id == c->id)) {

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_size_t buffer_len = 1;

e609c337f729875bc20e01096c7e610f45356f54nilgun char test_buffer[1];

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_status_t socket_status;

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_int32_t current_timeout;

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* use previous keepalive socket */

e609c337f729875bc20e01096c7e610f45356f54nilgun *origin = backend->connection;

e609c337f729875bc20e01096c7e610f45356f54nilgun p_conn->sock = client_socket;

e609c337f729875bc20e01096c7e610f45356f54nilgun new = 0;

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* reset the connection filters */

e609c337f729875bc20e01096c7e610f45356f54nilgun ap_proxy_reset_output_filters(*origin);

e609c337f729875bc20e01096c7e610f45356f54nilgun

e609c337f729875bc20e01096c7e610f45356f54nilgun /* save timeout */

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_getsocketopt(p_conn->sock, APR_SO_TIMEOUT, &current_timeout);

e609c337f729875bc20e01096c7e610f45356f54nilgun /* set no timeout */

e609c337f729875bc20e01096c7e610f45356f54nilgun apr_setsocketopt(p_conn->sock, APR_SO_TIMEOUT, 0);

e609c337f729875bc20e01096c7e610f45356f54nilgun socket_status = apr_recv(p_conn->sock, test_buffer, &buffer_len);

f086b4b402fa9a2fefc7dda85de2a3cc1cd0a654rjung /* put back old timeout */

727872d18412fc021f03969b8641810d8896820bhumbedooh apr_setsocketopt(p_conn->sock, APR_SO_TIMEOUT, current_timeout);

0d0ba3a410038e179b695446bb149cce6264e0abnd if ( APR_STATUS_IS_EOF(socket_status) ) {

727872d18412fc021f03969b8641810d8896820bhumbedooh ap_log_error(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, NULL,

cc7e1025de9ac63bd4db6fe7f71c158b2cf09fe4humbedooh "proxy: HTTP: previous connection is closed");

0d0ba3a410038e179b695446bb149cce6264e0abnd new = 1;

cc7e1025de9ac63bd4db6fe7f71c158b2cf09fe4humbedooh }

727872d18412fc021f03969b8641810d8896820bhumbedooh }

0d0ba3a410038e179b695446bb149cce6264e0abnd if (new) {

0d0ba3a410038e179b695446bb149cce6264e0abnd

0d0ba3a410038e179b695446bb149cce6264e0abnd /* create a new socket */

ac082aefa89416cbdc9a1836eaf3bed9698201c8humbedooh backend->connection = NULL;

0d0ba3a410038e179b695446bb149cce6264e0abnd

0d0ba3a410038e179b695446bb149cce6264e0abnd /*

7fec19672a491661b2fe4b29f685bc7f4efa64d4nd failed = ap_proxy_connect_to_backend(&p_conn->sock, "HTTP",

7fec19672a491661b2fe4b29f685bc7f4efa64d4nd p_conn->addr, p_conn->name,

e609c337f729875bc20e01096c7e610f45356f54nilgun conf, r->server, c->pool);

/* handle a permanent error on the connect */

if (failed) {

if (proxyname) {

return DECLINED;

} else {

return HTTP_BAD_GATEWAY;

}

}

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

"proxy: socket is connected");

/* the socket is now open, create a new backend server connection */

*origin = ap_run_create_connection(c->pool, r->server, p_conn->sock,

r->connection->id, r->connection->sbh);

if (!origin) {

/* the peer reset the connection already; ap_run_create_connection()

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0,

r->server, "proxy: an error occurred creating a "

"new connection to %pI (%s)", p_conn->addr,

p_conn->name);

apr_socket_close(p_conn->sock);

return HTTP_INTERNAL_SERVER_ERROR;

}

backend->connection = *origin;

backend->hostname = apr_pstrdup(c->pool, p_conn->name);

backend->port = p_conn->port;

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

"proxy: connection complete to %pI (%s)",

p_conn->addr, p_conn->name);

/* set up the connection filters */

ap_run_pre_connection(*origin, p_conn->sock);

}

return OK;

}

apr_status_t ap_proxy_http_request(apr_pool_t *p, request_rec *r,

proxy_http_conn_t *p_conn, conn_rec *origin,

proxy_server_conf *conf,

apr_uri_t *uri,

char *url, apr_bucket_brigade *bb,

char *server_portstr) {

char buffer[HUGE_STRING_LEN];

char *buf;

apr_bucket *e;

const apr_array_header_t *headers_in_array;

const apr_table_entry_t *headers_in;

int counter;

/*

/* strip connection listed hop-by-hop headers from the request */

/* even though in theory a connection: close coming from the client

p_conn->close += ap_proxy_liststr(apr_table_get(r->headers_in,

"Connection"), "close");

/* sub-requests never use keepalives */

if (r->main) {

p_conn->close++;

}

ap_proxy_clear_connection(p, r->headers_in);

if (p_conn->close) {

apr_table_setn(r->headers_in, "Connection", "close");

origin->keepalive = 0;

}

buf = apr_pstrcat(p, r->method, " ", url, " HTTP/1.1" CRLF, NULL);

e = apr_bucket_pool_create(buf, strlen(buf), p);

APR_BRIGADE_INSERT_TAIL(bb, e);

if ( conf->preserve_host == 0 ) {

if (uri->port_str && uri->port != DEFAULT_HTTP_PORT) {

buf = apr_pstrcat(p, "Host: ", uri->hostname, ":", uri->port_str, CRLF,

NULL);

} else {

buf = apr_pstrcat(p, "Host: ", uri->hostname, CRLF, NULL);

}

}

else {

/* don't want to use r->hostname, as the incoming header might have a

const char* hostname = apr_table_get(r->headers_in,"Host");

if (!hostname) {

hostname = r->server->server_hostname;

ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_WARNING, 0, r,

"proxy: no HTTP 0.9 request (with no host line) "

"on incoming request and preserve host set "

"forcing hostname to be %s for uri %s",

hostname,

r->uri );

}

buf = apr_pstrcat(p, "Host: ", hostname, CRLF, NULL);

}

e = apr_bucket_pool_create(buf, strlen(buf), p);

APR_BRIGADE_INSERT_TAIL(bb, e);

/* handle Via */

if (conf->viaopt == via_block) {

/* Block all outgoing Via: headers */

apr_table_unset(r->headers_in, "Via");

} else if (conf->viaopt != via_off) {

/* Create a "Via:" request header entry and merge it */

/* Generate outgoing Via: header with/without server comment: */

apr_table_mergen(r->headers_in, "Via",

(conf->viaopt == via_full)

? apr_psprintf(p, "%d.%d %s%s (%s)",

HTTP_VERSION_MAJOR(r->proto_num),

HTTP_VERSION_MINOR(r->proto_num),

ap_get_server_name(r), server_portstr,

AP_SERVER_BASEVERSION)

: apr_psprintf(p, "%d.%d %s%s",

HTTP_VERSION_MAJOR(r->proto_num),

HTTP_VERSION_MINOR(r->proto_num),

ap_get_server_name(r), server_portstr)

);

}

/* X-Forwarded-*: handling

if (PROXYREQ_REVERSE == r->proxyreq) {

const char *buf;

/* Add X-Forwarded-For: so that the upstream has a chance to

apr_table_mergen(r->headers_in, "X-Forwarded-For",

r->connection->remote_ip);

/* Add X-Forwarded-Host: so that upstream knows what the

if ((buf = apr_table_get(r->headers_in, "Host"))) {

apr_table_mergen(r->headers_in, "X-Forwarded-Host", buf);

}

/* Add X-Forwarded-Server: so that upstream knows what the

apr_table_mergen(r->headers_in, "X-Forwarded-Server",

r->server->server_hostname);

}

/* send request headers */

headers_in_array = apr_table_elts(r->headers_in);

headers_in = (const apr_table_entry_t *) headers_in_array->elts;

for (counter = 0; counter < headers_in_array->nelts; counter++) {

if (headers_in[counter].key == NULL || headers_in[counter].val == NULL

/* Clear out hop-by-hop request headers not to send

/* Already sent */

|| !apr_strnatcasecmp(headers_in[counter].key, "Host")

|| !apr_strnatcasecmp(headers_in[counter].key, "Keep-Alive")

|| !apr_strnatcasecmp(headers_in[counter].key, "TE")

|| !apr_strnatcasecmp(headers_in[counter].key, "Trailer")

|| !apr_strnatcasecmp(headers_in[counter].key, "Transfer-Encoding")

|| !apr_strnatcasecmp(headers_in[counter].key, "Upgrade")

/* XXX: @@@ FIXME: "Proxy-Authorization" should *only* be

|| !apr_strnatcasecmp(headers_in[counter].key,"Proxy-Authorization")

|| !apr_strnatcasecmp(headers_in[counter].key,"Proxy-Authenticate")) {

continue;

}

/* for sub-requests, ignore freshness/expiry headers */

if (r->main) {

if (headers_in[counter].key == NULL || headers_in[counter].val == NULL

|| !apr_strnatcasecmp(headers_in[counter].key, "If-Match")

|| !apr_strnatcasecmp(headers_in[counter].key, "If-Modified-Since")

|| !apr_strnatcasecmp(headers_in[counter].key, "If-Range")

|| !apr_strnatcasecmp(headers_in[counter].key, "If-Unmodified-Since")

|| !apr_strnatcasecmp(headers_in[counter].key, "If-None-Match")) {

continue;

}

}

buf = apr_pstrcat(p, headers_in[counter].key, ": ",

headers_in[counter].val, CRLF,

NULL);

e = apr_bucket_pool_create(buf, strlen(buf), p);

APR_BRIGADE_INSERT_TAIL(bb, e);

}

/* add empty line at the end of the headers */

e = apr_bucket_immortal_create(CRLF, sizeof(CRLF)-1);

APR_BRIGADE_INSERT_TAIL(bb, e);

e = apr_bucket_flush_create();

APR_BRIGADE_INSERT_TAIL(bb, e);

ap_pass_brigade(origin->output_filters, bb);

/* send the request data, if any. */

if (ap_should_client_block(r)) {

while ((counter = ap_get_client_block(r, buffer, sizeof(buffer))) > 0) {

e = apr_bucket_pool_create(buffer, counter, p);

APR_BRIGADE_INSERT_TAIL(bb, e);

e = apr_bucket_flush_create();

APR_BRIGADE_INSERT_TAIL(bb, e);

ap_pass_brigade(origin->output_filters, bb);

apr_brigade_cleanup(bb);

}

}

return OK;

}

apr_status_t ap_proxy_http_process_response(apr_pool_t * p, request_rec *r,

proxy_http_conn_t *p_conn,

conn_rec *origin,

proxy_conn_rec *backend,

proxy_server_conf *conf,

apr_bucket_brigade *bb,

char *server_portstr) {

char buffer[HUGE_STRING_LEN];

request_rec *rp;

apr_bucket *e;

int len, backasswards;

int received_continue = 1; /* flag to indicate if we should

/* Get response from the remote server, and pass it up the

rp = ap_proxy_make_fake_req(origin, r);

while (received_continue) {

apr_brigade_cleanup(bb);

len = ap_getline(buffer, sizeof(buffer), rp, 0);

if (len <= 0) {

apr_socket_close(p_conn->sock);

backend->connection = NULL;

ap_log_rerror(APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, 0, r,

"proxy: error reading status line from remote "

"server %s", p_conn->name);

return ap_proxyerror(r, HTTP_BAD_GATEWAY,

"Error reading from remote server");

}

/* Is it an HTTP/1 response?

if (apr_date_checkmask(buffer, "HTTP/#.# ###*")) {

int major, minor;

if (2 != sscanf(buffer, "HTTP/%u.%u", &major, &minor)) {

major = 1;

minor = 1;

}

/* If not an HTTP/1 message or

else if ((buffer[5] != '1') || (len >= sizeof(buffer)-1)) {

apr_socket_close(p_conn->sock);

backend->connection = NULL;

return ap_proxyerror(r, HTTP_BAD_GATEWAY,

apr_pstrcat(p, "Corrupt status line returned by remote "

"server: ", buffer, NULL));

}

backasswards = 0;

buffer[12] = '\0';

r->status = atoi(&buffer[9]);

buffer[12] = ' ';

r->status_line = apr_pstrdup(p, &buffer[9]);

/* read the headers. */

/* N.B. for HTTP/1.0 clients, we have to fold line-wrapped headers*/

/* Also, take care with headers with multiple occurences. */

r->headers_out = ap_proxy_read_headers(r, rp, buffer,

sizeof(buffer), origin);

if (r->headers_out == NULL) {

ap_log_error(APLOG_MARK, APLOG_WARNING|APLOG_NOERRNO, 0,

r->server, "proxy: bad HTTP/%d.%d header "

"returned by %s (%s)", major, minor, r->uri,

r->method);

p_conn->close += 1;

/*

r->headers_out = apr_table_make(r->pool,1);

r->status = HTTP_BAD_GATEWAY;

r->status_line = "bad gateway";

return r->status;

} else {

/* strip connection listed hop-by-hop headers from response */

const char *buf;

p_conn->close += ap_proxy_liststr(apr_table_get(r->headers_out,

"Connection"),

"close");

ap_proxy_clear_connection(p, r->headers_out);

if ((buf = apr_table_get(r->headers_out, "Content-Type"))) {

ap_set_content_type(r, apr_pstrdup(p, buf));

}

ap_proxy_pre_http_request(origin,rp);

}

/* handle Via header in response */

if (conf->viaopt != via_off && conf->viaopt != via_block) {

/* create a "Via:" response header entry and merge it */

ap_table_mergen(r->headers_out, "Via",

(conf->viaopt == via_full)

? apr_psprintf(p, "%d.%d %s%s (%s)",

HTTP_VERSION_MAJOR(r->proto_num),

HTTP_VERSION_MINOR(r->proto_num),

ap_get_server_name(r),

server_portstr,

AP_SERVER_BASEVERSION)

: apr_psprintf(p, "%d.%d %s%s",

HTTP_VERSION_MAJOR(r->proto_num),

HTTP_VERSION_MINOR(r->proto_num),

ap_get_server_name(r),

server_portstr)

);

}

/* cancel keepalive if HTTP/1.0 or less */

if ((major < 1) || (minor < 1)) {

p_conn->close += 1;

origin->keepalive = 0;

}

} else {

/* an http/0.9 response */

backasswards = 1;

r->status = 200;

r->status_line = "200 OK";

p_conn->close += 1;

}

if ( r->status != HTTP_CONTINUE ) {

received_continue = 0;

} else {

ap_log_error(APLOG_MARK, APLOG_NOERRNO|APLOG_DEBUG, 0, NULL,

"proxy: HTTP: received 100 CONTINUE");

}

/* we must accept 3 kinds of date, but generate only 1 kind of date */

{

const char *buf;

if ((buf = apr_table_get(r->headers_out, "Date")) != NULL) {

apr_table_set(r->headers_out, "Date",

ap_proxy_date_canon(p, buf));

}

if ((buf = apr_table_get(r->headers_out, "Expires")) != NULL) {

apr_table_set(r->headers_out, "Expires",

ap_proxy_date_canon(p, buf));

}

if ((buf = apr_table_get(r->headers_out, "Last-Modified")) != NULL) {

apr_table_set(r->headers_out, "Last-Modified",

ap_proxy_date_canon(p, buf));

}

}

/* munge the Location and URI response headers according to

{

const char *buf;

if ((buf = apr_table_get(r->headers_out, "Location")) != NULL) {

apr_table_set(r->headers_out, "Location",

ap_proxy_location_reverse_map(r, conf, buf));

}

if ((buf = apr_table_get(r->headers_out, "Content-Location")) != NULL) {

apr_table_set(r->headers_out, "Content-Location",

ap_proxy_location_reverse_map(r, conf, buf));

}

if ((buf = apr_table_get(r->headers_out, "URI")) != NULL) {

apr_table_set(r->headers_out, "URI",

ap_proxy_location_reverse_map(r, conf, buf));

}

}

r->sent_bodyct = 1;

/* Is it an HTTP/0.9 response? If so, send the extra data */

if (backasswards) {

apr_ssize_t cntr = len;

e = apr_bucket_heap_create(buffer, cntr, 1);

APR_BRIGADE_INSERT_TAIL(bb, e);

}

/* send body - but only if a body is expected */

if ((!r->header_only) && /* not HEAD request */

(r->status > 199) && /* not any 1xx response */

(r->status != HTTP_NO_CONTENT) && /* not 204 */

(r->status != HTTP_RESET_CONTENT) && /* not 205 */

(r->status != HTTP_NOT_MODIFIED)) { /* not 304 */

/* We need to copy the output headers and treat them as input

rp->headers_in = apr_table_copy(r->pool, r->headers_out);

/* In order for ap_set_keepalive to work properly, we can NOT

apr_table_unset(r->headers_out,"Transfer-Encoding");

apr_table_unset(r->headers_out,"Content-Length");

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

"proxy: start body send");

/*

if ( (conf->error_override ==0) || r->status < 400 ) {

/* read the body, pass it to the output filters */

apr_bucket *e;

int finish = FALSE;

while (ap_get_brigade(rp->input_filters,

bb,

AP_MODE_READBYTES,

APR_BLOCK_READ,

conf->io_buffer_size) == APR_SUCCESS) {

#if DEBUGGING

{

apr_off_t readbytes;

apr_brigade_length(bb, 0, &readbytes);

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0,

r->server, "proxy (PID %d): readbytes: %#x",

getpid(), readbytes);

}

#endif

/* sanity check */

if (APR_BRIGADE_EMPTY(bb)) {

apr_brigade_cleanup(bb);

break;

}

/* found the last brigade? */

if (APR_BUCKET_IS_EOS(APR_BRIGADE_LAST(bb))) {

/* if this is the last brigade, cleanup the

ap_proxy_http_cleanup(r, p_conn, backend);

/* signal that we must leave */

finish = TRUE;

}

/* if no EOS yet, then we must flush */

if (FALSE == finish) {

e = apr_bucket_flush_create();

APR_BRIGADE_INSERT_TAIL(bb, e);

}

/* try send what we read */

if (ap_pass_brigade(r->output_filters, bb) != APR_SUCCESS) {

/* Ack! Phbtt! Die! User aborted! */

p_conn->close = 1; /* this causes socket close below */

finish = TRUE;

}

/* make sure we always clean up after ourselves */

apr_brigade_cleanup(bb);

/* if we are done, leave */

if (TRUE == finish) {

break;

}

}

}

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

"proxy: end body send");

} else {

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

"proxy: header only");

}

}

if ( conf->error_override ) {

/* the code above this checks for 'OK' which is what the hook expects */

if ( r->status == HTTP_OK )

return OK;

else {

/* clear r->status for override error, otherwise ErrorDocument

int status = r->status;

r->status = HTTP_OK;

return status;

}

} else

return OK;

}

apr_status_t ap_proxy_http_cleanup(request_rec *r, proxy_http_conn_t *p_conn,

proxy_conn_rec *backend) {

/* If there are no KeepAlives, or if the connection has been signalled

/* if the connection is < HTTP/1.1, or Connection: close,

if (p_conn->close || (r->proto_num < HTTP_VERSION(1,1))) {

if (p_conn->sock) {

apr_socket_close(p_conn->sock);

p_conn->sock = NULL;

backend->connection = NULL;

}

}

return OK;

}

int ap_proxy_http_handler(request_rec *r, proxy_server_conf *conf,

char *url, const char *proxyname,

apr_port_t proxyport)

{

int status;

char server_portstr[32];

conn_rec *origin = NULL;

proxy_conn_rec *backend = NULL;

/* Note: Memory pool allocation.

apr_pool_t *p = r->connection->pool;

conn_rec *c = r->connection;

apr_bucket_brigade *bb = apr_brigade_create(p);

apr_uri_t *uri = apr_palloc(r->connection->pool, sizeof(*uri));

proxy_http_conn_t *p_conn = apr_pcalloc(r->connection->pool,

sizeof(*p_conn));

/* is it for us? */

if (strncasecmp(url, "http:", 5)) {

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

"proxy: HTTP: declining URL %s", url);

return DECLINED; /* only interested in HTTP */

}

ap_log_error(APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, 0, r->server,

"proxy: HTTP: serving URL %s", url);

/* only use stored info for top-level pages. Sub requests don't share

if (!r->main) {

backend = (proxy_conn_rec *) ap_get_module_config(c->conn_config,

&proxy_http_module);

}

/* create space for state information */

if (!backend) {

backend = ap_pcalloc(c->pool, sizeof(proxy_conn_rec));

backend->connection = NULL;

backend->hostname = NULL;

backend->port = 0;

if (!r->main) {

ap_set_module_config(c->conn_config, &proxy_http_module, backend);

}

}

/* Step One: Determine Who To Connect To */

status = ap_proxy_http_determine_connection(p, r, p_conn, c, conf, uri,

&url, proxyname, proxyport,

server_portstr,

sizeof(server_portstr));

if ( status != OK ) {

return status;

}

/* Step Two: Make the Connection */

status = ap_proxy_http_create_connection(p, r, p_conn, c, &origin, backend,

conf, proxyname);

if ( status != OK ) {

return status;

}

/* Step Three: Send the Request */

status = ap_proxy_http_request(p, r, p_conn, origin, conf, uri, url, bb,

server_portstr);

if ( status != OK ) {

return status;

}

/* Step Four: Receive the Response */

status = ap_proxy_http_process_response(p, r, p_conn, origin, backend, conf,

bb, server_portstr);

if ( status != OK ) {

/* clean up even if there is an error */

ap_proxy_http_cleanup(r, p_conn, backend);

return status;

}

/* Step Five: Clean Up */

status = ap_proxy_http_cleanup(r, p_conn, backend);

if ( status != OK ) {

return status;

}

return OK;

}

static void ap_proxy_http_register_hook(apr_pool_t *p)

{

proxy_hook_scheme_handler(ap_proxy_http_handler, NULL, NULL, APR_HOOK_FIRST);

proxy_hook_canon_handler(ap_proxy_http_canon, NULL, NULL, APR_HOOK_FIRST);

}

module AP_MODULE_DECLARE_DATA proxy_http_module = {

STANDARD20_MODULE_STUFF,

NULL, /* create per-directory config structure */

NULL, /* merge per-directory config structures */

NULL, /* create per-server config structure */

NULL, /* merge per-server config structures */

NULL, /* command apr_table_t */

ap_proxy_http_register_hook/* register hooks */

};