src/acl/DestinationDomain.cc

   1 /*
   2  * $Id$
   3  *
   4  * DEBUG: section 28    Access Control
   5  * AUTHOR: Duane Wessels
   6  *
   7  * SQUID Web Proxy Cache          http://www.squid-cache.org/
   8  * ----------------------------------------------------------
   9  *
  10  *  Squid is the result of efforts by numerous individuals from
  11  *  the Internet community; see the CONTRIBUTORS file for full
  12  *  details.   Many organizations have provided support for Squid's
  13  *  development; see the SPONSORS file for full details.  Squid is
  14  *  Copyrighted (C) 2001 by the Regents of the University of
  15  *  California; see the COPYRIGHT file for full details.  Squid
  16  *  incorporates software developed and/or copyrighted by other
  17  *  sources; see the CREDITS file for full details.
  18  *
  19  *  This program is free software; you can redistribute it and/or modify
  20  *  it under the terms of the GNU General Public License as published by
  21  *  the Free Software Foundation; either version 2 of the License, or
  22  *  (at your option) any later version.
  23  *
  24  *  This program is distributed in the hope that it will be useful,
  25  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  26  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  27  *  GNU General Public License for more details.
  28  *
  29  *  You should have received a copy of the GNU General Public License
  30  *  along with this program; if not, write to the Free Software
  31  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
  32  *
  33  *
  34  * Copyright (c) 2003, Robert Collins <robertc@squid-cache.org>
  35  */
  36
  37 #include "squid.h"
  38 #include "acl/DestinationDomain.h"
  39 #include "acl/Checklist.h"
  40 #include "acl/RegexData.h"
  41 #include "acl/DomainData.h"
  42 #include "HttpRequest.h"
  43
  44 DestinationDomainLookup DestinationDomainLookup::instance_;
  45
  46 DestinationDomainLookup *
  47 DestinationDomainLookup::Instance()
  48 {
  49     return &instance_;
  50 }
  51
  52 void
  53 DestinationDomainLookup::checkForAsync(ACLChecklist *cl) const
  54 {
  55     ACLFilledChecklist *checklist = Filled(cl);
  56     checklist->asyncInProgress(true);
  57     fqdncache_nbgethostbyaddr(checklist->dst_addr, LookupDone, checklist);
  58 }
  59
  60 void
  61 DestinationDomainLookup::LookupDone(const char *fqdn, const DnsLookupDetails &details, void *data)
  62 {
  63     ACLFilledChecklist *checklist = Filled((ACLChecklist*)data);
  64     assert (checklist->asyncState() == DestinationDomainLookup::Instance());
  65
  66     checklist->asyncInProgress(false);
  67     checklist->changeState (ACLChecklist::NullState::Instance());
  68     checklist->markDestinationDomainChecked();
  69     checklist->request->recordLookup(details);
  70     checklist->check();
  71 }
  72
  73
  74 int
  75 ACLDestinationDomainStrategy::match (ACLData<MatchType> * &data, ACLFilledChecklist *checklist)
  76 {
  77     assert(checklist != NULL && checklist->request != NULL);
  78
  79     if (data->match(checklist->request->GetHost())) {
  80         return 1;
  81     }
  82
  83     /* numeric IPA? no, trust the above result. */
  84     if (checklist->request->GetHostIsNumeric() == 0) {
  85         return 0;
  86     }
  87
  88     /* do we already have the rDNS? match on it if we do. */
  89     if (checklist->dst_rdns) {
  90         debugs(28, 3, "aclMatchAcl: '" << AclMatchedName << "' match with stored rDNS '" << checklist->dst_rdns << "' for '" << checklist->request->GetHost() << "'");
  91         return data->match(checklist->dst_rdns);
  92     }
  93
  94     /* raw IP without rDNS? look it up and wait for the result */
  95     const ipcache_addrs *ia = ipcacheCheckNumeric(checklist->request->GetHost());
  96     if (!ia) {
  97         /* not a valid IPA */
  98         checklist->dst_rdns = xstrdup("invalid");
  99         return 0;
 100     }
 101
 102     checklist->dst_addr = ia->in_addrs[0];
 103     const char *fqdn = fqdncache_gethostbyaddr(checklist->dst_addr, FQDN_LOOKUP_IF_MISS);
 104
 105     if (fqdn) {
 106         checklist->dst_rdns = xstrdup(fqdn);
 107         return data->match(fqdn);
 108     } else if (!checklist->destinationDomainChecked()) {
 109         /* FIXME: Using AclMatchedName here is not OO correct. Should find a way to the current acl */
 110         debugs(28, 3, "aclMatchAcl: Can't yet compare '" << AclMatchedName << "' ACL for '" << checklist->request->GetHost() << "'");
 111         checklist->changeState(DestinationDomainLookup::Instance());
 112         return 0;
 113     }
 114
 115     return data->match("none");
 116 }
 117
 118 ACLDestinationDomainStrategy *
 119 ACLDestinationDomainStrategy::Instance()
 120 {
 121     return &Instance_;
 122 }
 123
 124 ACLDestinationDomainStrategy ACLDestinationDomainStrategy::Instance_;