granicus.if.org Git - apache/blob - modules/aaa/mod_authz_host.c

   1 /* Licensed to the Apache Software Foundation (ASF) under one or more
   2  * contributor license agreements.  See the NOTICE file distributed with
   3  * this work for additional information regarding copyright ownership.
   4  * The ASF licenses this file to You under the Apache License, Version 2.0
   5  * (the "License"); you may not use this file except in compliance with
   6  * the License.  You may obtain a copy of the License at
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  */
  16
  17 /*
  18  * Security options etc.
  19  *
  20  * Module derived from code originally written by Rob McCool
  21  *
  22  */
  23
  24 #include "apr_strings.h"
  25 #include "apr_network_io.h"
  26 #include "apr_md5.h"
  27 #include "apr_hash.h"
  28
  29 #define APR_WANT_STRFUNC
  30 #define APR_WANT_BYTEFUNC
  31 #include "apr_want.h"
  32
  33 #include "ap_config.h"
  34 #include "ap_provider.h"
  35 #include "httpd.h"
  36 #include "http_core.h"
  37 #include "http_config.h"
  38 #include "http_log.h"
  39 #include "http_protocol.h"
  40 #include "http_request.h"
  41
  42 #include "mod_auth.h"
  43
  44 #if APR_HAVE_NETINET_IN_H
  45 #include <netinet/in.h>
  46 #endif
  47
  48 /*
  49  * To save memory if the same subnets are used in hundres of vhosts, we store
  50  * each subnet only once and use this temporary hash to find it again.
  51  */
  52 static apr_hash_t *parsed_subnets;
  53
  54 static apr_ipsubnet_t *localhost_v4;
  55 #if APR_HAVE_IPV6
  56 static apr_ipsubnet_t *localhost_v6;
  57 #endif
  58
  59 static int in_domain(const char *domain, const char *what)
  60 {
  61     int dl = strlen(domain);
  62     int wl = strlen(what);
  63
  64     if ((wl - dl) >= 0) {
  65         if (strcasecmp(domain, &what[wl - dl]) != 0) {
  66             return 0;
  67         }
  68
  69         /* Make sure we matched an *entire* subdomain --- if the user
  70          * said 'allow from good.com', we don't want people from nogood.com
  71          * to be able to get in.
  72          */
  73
  74         if (wl == dl) {
  75             return 1;                /* matched whole thing */
  76         }
  77         else {
  78             return (domain[0] == '.' || what[wl - dl - 1] == '.');
  79         }
  80     }
  81     else {
  82         return 0;
  83     }
  84 }
  85
  86 static const char *ip_parse_config(cmd_parms *cmd,
  87                                    const char *require_line,
  88                                    const void **parsed_require_line)
  89 {
  90     const char *t, *w;
  91     int count = 0;
  92     apr_ipsubnet_t **ip;
  93     apr_pool_t *ptemp = cmd->temp_pool;
  94     apr_pool_t *p = cmd->pool;
  95
  96     /* The 'ip' provider will allow the configuration to specify a list of
  97         ip addresses to check rather than a single address.  This is different
  98         from the previous host based syntax. */
  99
 100     t = require_line;
 101     while ((w = ap_getword_conf(ptemp, &t)) && w[0])
 102         count++;
 103
 104     if (count == 0)
 105         return "'require ip' requires an argument";
 106
 107     ip = apr_pcalloc(p, sizeof(apr_ipsubnet_t *) * (count + 1));
 108     *parsed_require_line = ip;
 109
 110     t = require_line;
 111     while ((w = ap_getword_conf(ptemp, &t)) && w[0]) {
 112         char *addr = apr_pstrdup(ptemp, w);
 113         char *mask;
 114         apr_status_t rv;
 115
 116         if (parsed_subnets &&
 117             (*ip = apr_hash_get(parsed_subnets, w, APR_HASH_KEY_STRING)) != NULL)
 118         {
 119             /* we already have parsed this subnet */
 120             ip++;
 121             continue;
 122         }
 123
 124         if ((mask = ap_strchr(addr, '/')))
 125             *mask++ = '\0';
 126
 127         rv = apr_ipsubnet_create(ip, addr, mask, p);
 128
 129         if(APR_STATUS_IS_EINVAL(rv)) {
 130             /* looked nothing like an IP address */
 131             return apr_psprintf(p, "ip address '%s' appears to be invalid", w);
 132         }
 133         else if (rv != APR_SUCCESS) {
 134             return apr_psprintf(p, "ip address '%s' appears to be invalid: %pm",
 135                                 w, &rv);
 136         }
 137
 138         if (parsed_subnets)
 139             apr_hash_set(parsed_subnets, w, APR_HASH_KEY_STRING, *ip);
 140         ip++;
 141     }
 142
 143     return NULL;
 144 }
 145
 146 static authz_status ip_check_authorization(request_rec *r,
 147                                            const char *require_line,
 148                                            const void *parsed_require_line)
 149 {
 150     /* apr_ipsubnet_test should accept const but doesn't */
 151     apr_ipsubnet_t **ip = (apr_ipsubnet_t **)parsed_require_line;
 152
 153     while (*ip) {
 154         if (apr_ipsubnet_test(*ip, r->useragent_addr))
 155             return AUTHZ_GRANTED;
 156         ip++;
 157     }
 158
 159     /* authz_core will log the require line and the result at DEBUG */
 160     return AUTHZ_DENIED;
 161 }
 162
 163 static authz_status host_check_authorization(request_rec *r,
 164                                              const char *require_line,
 165                                              const void *parsed_require_line)
 166 {
 167     const char *t;
 168     char *w, *hash_ptr;
 169     const char *remotehost = NULL;
 170     int remotehost_is_ip;
 171
 172     remotehost = ap_get_useragent_host(r, REMOTE_DOUBLE_REV, &remotehost_is_ip);
 173
 174     if ((remotehost == NULL) || remotehost_is_ip) {
 175         ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r, APLOGNO(01753)
 176                       "access check of '%s' to %s failed, reason: unable to get the "
 177                       "remote host name", require_line, r->uri);
 178     }
 179     else {
 180         const char *err = NULL;
 181         const ap_expr_info_t *expr = parsed_require_line;
 182         const char *require;
 183
 184         require = ap_expr_str_exec(r, expr, &err);
 185         if (err) {
 186             ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r, APLOGNO(02593)
 187                           "authz_host authorize: require host: Can't "
 188                           "evaluate require expression: %s", err);
 189             return AUTHZ_DENIED;
 190         }
 191
 192         /* The 'host' provider will allow the configuration to specify a list of
 193             host names to check rather than a single name.  This is different
 194             from the previous host based syntax. */
 195         t = require;
 196         while ((w = ap_getword_conf(r->pool, &t)) && w[0]) {
 197             /* '#' is not valid hostname character and admin could specify
 198              * 'Require host localhost# Add example.com later'. We should not
 199              * grant access to 'example.com' in that case. */
 200             if ((hash_ptr = ap_strchr(w, '#'))) {
 201                 if (hash_ptr == w) {
 202                     break;
 203                 }
 204                 *hash_ptr = '\0';
 205             }
 206             if (in_domain(w, remotehost)) {
 207                 return AUTHZ_GRANTED;
 208             }
 209             if (hash_ptr) {
 210                 break;
 211             }
 212         }
 213     }
 214
 215     /* authz_core will log the require line and the result at DEBUG */
 216     return AUTHZ_DENIED;
 217 }
 218
 219 static authz_status local_check_authorization(request_rec *r,
 220                                               const char *require_line,
 221                                               const void *parsed_require_line)
 222 {
 223      if (   apr_sockaddr_equal(r->connection->local_addr,
 224                                r->useragent_addr)
 225          || apr_ipsubnet_test(localhost_v4, r->useragent_addr)
 226 #if APR_HAVE_IPV6
 227          || apr_ipsubnet_test(localhost_v6, r->useragent_addr)
 228 #endif
 229         )
 230      {
 231         return AUTHZ_GRANTED;
 232      }
 233
 234      return AUTHZ_DENIED;
 235 }
 236
 237 static const char *host_parse_config(cmd_parms *cmd, const char *require_line,
 238                                      const void **parsed_require_line)
 239 {
 240     const char *expr_err = NULL;
 241     ap_expr_info_t *expr;
 242
 243     expr = ap_expr_parse_cmd(cmd, require_line, AP_EXPR_FLAG_STRING_RESULT,
 244             &expr_err, NULL);
 245
 246     if (expr_err)
 247         return apr_pstrcat(cmd->temp_pool,
 248                            "Cannot parse expression in require line: ",
 249                            expr_err, NULL);
 250
 251     *parsed_require_line = expr;
 252
 253     return NULL;
 254 }
 255
 256 static const authz_provider authz_ip_provider =
 257 {
 258     &ip_check_authorization,
 259     &ip_parse_config,
 260 };
 261
 262 static const authz_provider authz_host_provider =
 263 {
 264     &host_check_authorization,
 265     &host_parse_config,
 266 };
 267
 268 static const authz_provider authz_local_provider =
 269 {
 270     &local_check_authorization,
 271     NULL,
 272 };
 273
 274
 275 static int authz_host_pre_config(apr_pool_t *p, apr_pool_t *plog,
 276                                  apr_pool_t *ptemp)
 277 {
 278     /* we only use this hash in the parse config phase, ptemp is enough */
 279     parsed_subnets = apr_hash_make(ptemp);
 280
 281     apr_ipsubnet_create(&localhost_v4, "127.0.0.0", "8", p);
 282     apr_hash_set(parsed_subnets, "127.0.0.0/8", APR_HASH_KEY_STRING, localhost_v4);
 283
 284 #if APR_HAVE_IPV6
 285     apr_ipsubnet_create(&localhost_v6, "::1", NULL, p);
 286     apr_hash_set(parsed_subnets, "::1", APR_HASH_KEY_STRING, localhost_v6);
 287 #endif
 288
 289     return OK;
 290 }
 291
 292 static int authz_host_post_config(apr_pool_t *p, apr_pool_t *plog,
 293                                   apr_pool_t *ptemp, server_rec *s)
 294 {
 295     /* make sure we don't use this during .htaccess parsing */
 296     parsed_subnets = NULL;
 297
 298     return OK;
 299 }
 300
 301 static void register_hooks(apr_pool_t *p)
 302 {
 303     ap_hook_pre_config(authz_host_pre_config, NULL, NULL, APR_HOOK_MIDDLE);
 304     ap_hook_post_config(authz_host_post_config, NULL, NULL, APR_HOOK_MIDDLE);
 305
 306     ap_register_auth_provider(p, AUTHZ_PROVIDER_GROUP, "ip",
 307                               AUTHZ_PROVIDER_VERSION,
 308                               &authz_ip_provider, AP_AUTH_INTERNAL_PER_CONF);
 309     ap_register_auth_provider(p, AUTHZ_PROVIDER_GROUP, "host",
 310                               AUTHZ_PROVIDER_VERSION,
 311                               &authz_host_provider, AP_AUTH_INTERNAL_PER_CONF);
 312     ap_register_auth_provider(p, AUTHZ_PROVIDER_GROUP, "local",
 313                               AUTHZ_PROVIDER_VERSION,
 314                               &authz_local_provider, AP_AUTH_INTERNAL_PER_CONF);
 315 }
 316
 317 AP_DECLARE_MODULE(authz_host) =
 318 {
 319     STANDARD20_MODULE_STUFF,
 320     NULL,                           /* dir config creater */
 321     NULL,                           /* dir merger --- default is to override */
 322     NULL,                           /* server config */
 323     NULL,                           /* merge server config */
 324     NULL,
 325     register_hooks                  /* register hooks */
 326 };