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_remote_host(r->connection,
 173                                     r->per_dir_config,
 174                                     REMOTE_DOUBLE_REV,
 175                                     &remotehost_is_ip);
 176
 177     if ((remotehost == NULL) || remotehost_is_ip) {
 178         ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r, APLOGNO(01753)
 179                       "access check of '%s' to %s failed, reason: unable to get the "
 180                       "remote host name", require_line, r->uri);
 181     }
 182     else {
 183         const char *err = NULL;
 184         const ap_expr_info_t *expr = parsed_require_line;
 185         const char *require;
 186
 187         require = ap_expr_str_exec(r, expr, &err);
 188         if (err) {
 189             ap_log_rerror(APLOG_MARK, APLOG_ERR, 0, r, APLOGNO(02593)
 190                           "authz_host authorize: require host: Can't "
 191                           "evaluate require expression: %s", err);
 192             return AUTHZ_DENIED;
 193         }
 194
 195         /* The 'host' provider will allow the configuration to specify a list of
 196             host names to check rather than a single name.  This is different
 197             from the previous host based syntax. */
 198         t = require;
 199         while ((w = ap_getword_conf(r->pool, &t)) && w[0]) {
 200             /* '#' is not valid hostname character and admin could specify
 201              * 'Require host localhost# Add example.com later'. We should not
 202              * grant access to 'example.com' in that case. */
 203             if ((hash_ptr = ap_strchr(w, '#'))) {
 204                 if (hash_ptr == w) {
 205                     break;
 206                 }
 207                 *hash_ptr = '\0';
 208             }
 209             if (in_domain(w, remotehost)) {
 210                 return AUTHZ_GRANTED;
 211             }
 212             if (hash_ptr) {
 213                 break;
 214             }
 215         }
 216     }
 217
 218     /* authz_core will log the require line and the result at DEBUG */
 219     return AUTHZ_DENIED;
 220 }
 221
 222 static authz_status local_check_authorization(request_rec *r,
 223                                               const char *require_line,
 224                                               const void *parsed_require_line)
 225 {
 226      if (   apr_sockaddr_equal(r->connection->local_addr,
 227                                r->useragent_addr)
 228          || apr_ipsubnet_test(localhost_v4, r->useragent_addr)
 229 #if APR_HAVE_IPV6
 230          || apr_ipsubnet_test(localhost_v6, r->useragent_addr)
 231 #endif
 232         )
 233      {
 234         return AUTHZ_GRANTED;
 235      }
 236
 237      return AUTHZ_DENIED;
 238 }
 239
 240 static const char *host_parse_config(cmd_parms *cmd, const char *require_line,
 241                                      const void **parsed_require_line)
 242 {
 243     const char *expr_err = NULL;
 244     ap_expr_info_t *expr;
 245
 246     expr = ap_expr_parse_cmd(cmd, require_line, AP_EXPR_FLAG_STRING_RESULT,
 247             &expr_err, NULL);
 248
 249     if (expr_err)
 250         return apr_pstrcat(cmd->temp_pool,
 251                            "Cannot parse expression in require line: ",
 252                            expr_err, NULL);
 253
 254     *parsed_require_line = expr;
 255
 256     return NULL;
 257 }
 258
 259 static const authz_provider authz_ip_provider =
 260 {
 261     &ip_check_authorization,
 262     &ip_parse_config,
 263 };
 264
 265 static const authz_provider authz_host_provider =
 266 {
 267     &host_check_authorization,
 268     &host_parse_config,
 269 };
 270
 271 static const authz_provider authz_local_provider =
 272 {
 273     &local_check_authorization,
 274     NULL,
 275 };
 276
 277
 278 static int authz_host_pre_config(apr_pool_t *p, apr_pool_t *plog,
 279                                  apr_pool_t *ptemp)
 280 {
 281     /* we only use this hash in the parse config phase, ptemp is enough */
 282     parsed_subnets = apr_hash_make(ptemp);
 283
 284     apr_ipsubnet_create(&localhost_v4, "127.0.0.0", "8", p);
 285     apr_hash_set(parsed_subnets, "127.0.0.0/8", APR_HASH_KEY_STRING, localhost_v4);
 286
 287 #if APR_HAVE_IPV6
 288     apr_ipsubnet_create(&localhost_v6, "::1", NULL, p);
 289     apr_hash_set(parsed_subnets, "::1", APR_HASH_KEY_STRING, localhost_v6);
 290 #endif
 291
 292     return OK;
 293 }
 294
 295 static int authz_host_post_config(apr_pool_t *p, apr_pool_t *plog,
 296                                   apr_pool_t *ptemp, server_rec *s)
 297 {
 298     /* make sure we don't use this during .htaccess parsing */
 299     parsed_subnets = NULL;
 300
 301     return OK;
 302 }
 303
 304 static void register_hooks(apr_pool_t *p)
 305 {
 306     ap_hook_pre_config(authz_host_pre_config, NULL, NULL, APR_HOOK_MIDDLE);
 307     ap_hook_post_config(authz_host_post_config, NULL, NULL, APR_HOOK_MIDDLE);
 308
 309     ap_register_auth_provider(p, AUTHZ_PROVIDER_GROUP, "ip",
 310                               AUTHZ_PROVIDER_VERSION,
 311                               &authz_ip_provider, AP_AUTH_INTERNAL_PER_CONF);
 312     ap_register_auth_provider(p, AUTHZ_PROVIDER_GROUP, "host",
 313                               AUTHZ_PROVIDER_VERSION,
 314                               &authz_host_provider, AP_AUTH_INTERNAL_PER_CONF);
 315     ap_register_auth_provider(p, AUTHZ_PROVIDER_GROUP, "local",
 316                               AUTHZ_PROVIDER_VERSION,
 317                               &authz_local_provider, AP_AUTH_INTERNAL_PER_CONF);
 318 }
 319
 320 AP_DECLARE_MODULE(authz_host) =
 321 {
 322     STANDARD20_MODULE_STUFF,
 323     NULL,                           /* dir config creater */
 324     NULL,                           /* dir merger --- default is to override */
 325     NULL,                           /* server config */
 326     NULL,                           /* merge server config */
 327     NULL,
 328     register_hooks                  /* register hooks */
 329 };