Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
openSUSE
amavisd-new.7082
amavisd-new-bug1012969.diff
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File amavisd-new-bug1012969.diff of Package amavisd-new.7082
diff --git a/amavisd b/amavisd index 159e680..b0bf095 100755 --- a/amavisd +++ b/amavisd @@ -5604,7 +5604,7 @@ sub ip_to_vec($;$) { my(@d) = ($2,$3,$4,$5); !grep($_ > 255, @d) or die "Invalid decimal field value in IPv6 address: [$ip]\n"; - $ipa = $2 . sprintf('%02x%02x:%02x%02x', @d); + $ipa = $1 . sprintf('%02x%02x:%02x%02x', @d); } elsif (!$have_ipv6 && $ipa =~ m{^ \d{1,3} (?: \. \d{1,3}){0,3} \z}xs) { # IPv4 my(@d) = split(/\./,$ipa,-1); @@ -5642,7 +5642,7 @@ sub ip_to_vec($;$) { } @ip_fields >= 8 or die "IPv6 address [$ip] contains fewer than 8 fields\n"; @ip_fields <= 8 or die "IPv6 address [$ip] contains more than 8 fields\n"; - !grep(!/^[0-9a-zA-Z]{1,4}\z/, @ip_fields) # this is quite slow + !grep(!/^[0-9a-fA-F]{1,4}\z/, @ip_fields) # this is quite slow or die "Invalid syntax of IPv6 address: [$ip]\n"; my $vec = pack('n8', map(hex($_),@ip_fields)); if (!defined($ip_len)) {
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor
