Changeset 196 for trunk


Ignore:
Timestamp:
12/12/11 17:55:02 (13 years ago)
Author:
Kris Deugau
Message:

/trunk

Minor fix on SRV validation; accept uppercase in the domain part
of the hostname. Found when trying to add a default SRV record.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/DNSDB.pm

    r195 r196  
    13971397    # check for _service._protocol.  NB:  RFC2782 does not say "MUST"...  nor "SHOULD"...
    13981398    # it just says (paraphrased) "... is prepended with _ to prevent DNS collisions"
    1399     return ('FAIL',"SRV records must begin with _service._protocol")
    1400         if $host !~ /^_[A-Za-z]+\._[A-Za-z]+\.[a-z0-9-]+/;
     1399    return ('FAIL',"SRV records must begin with _service._protocol [$host]")
     1400        if $host !~ /^_[A-Za-z]+\._[A-Za-z]+\.[a-zA-Z0-9-]+/;
    14011401    $weight = shift;
    14021402    $port = shift;
Note: See TracChangeset for help on using the changeset viewer.