Fabio/ddclient
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Cloudflare Fix

Browse source 
Cloudflare was returning values not being matched properly by the regex expression.
Numbers that were not Headers.
This fix or patch should resolve that issue, by only collecting one match to JSON relevant data.
This commit is contained in:
Austin H 2021-08-17 11:44:37 -04:00
parent c44f446d34
commit 3e952e6892
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
ddclient.in
View file

@ -5561,8 +5561,8 @@ sub nic_cloudflare_update {
}
# Strip header
$reply =~ s/^.*?\n\n//s;
my $response = eval {decode_json($reply)};
$reply =~ qr/{(?:[^{}]*|(?R))*}/mp;
my $response = eval {decode_json(${^MATCH})};
unless ($response && $response->{result}) {
failed("updating %s: invalid json or result.", $domain);
next;
@ -5598,8 +5598,8 @@ sub nic_cloudflare_update {
next;
}
# Strip header
$reply =~ s/^.*?\n\n//s;
$response = eval {decode_json($reply)};
$reply =~ qr/{(?:[^{}]*|(?R))*}/mp;
$response = eval {decode_json(${^MATCH})};
unless ($response && $response->{result}) {
failed("updating %s: invalid json or result.", $domain);
next;
@ -5625,8 +5625,8 @@ sub nic_cloudflare_update {
next;
}
# Strip header
$reply =~ s/^.*?\n\n//s;
$response = eval {decode_json($reply)};
$reply =~ qr/{(?:[^{}]*|(?R))*}/mp;
$response = eval {decode_json(${^MATCH})};
if ($response && $response->{result}) {
success("updating %s: IPv$ipv address set to %s", $domain, $ip);
$config{$domain}{"ipv$ipv"} = $ip;