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

Revert "Merge branch 'github'"

Browse source 
This reverts commit 38f9762e2c, reversing
changes made to 5bea1a58f7.
This commit is contained in:
wimpunk 2015-12-04 11:54:18 +01:00
parent 38f9762e2c
commit eafb707437
2 changed files with 31 additions and 34 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
README.md
View file

@ -1,5 +1,5 @@
===============================================================================
# DDCLIENT v3.8.3
# DDCLIENT v3.8.2
ddclient is a Perl client used to update dynamic DNS entries for accounts
on many dynamic DNS services.

11
ddclient
View file

@ -3704,7 +3704,10 @@ EoEXAMPLE
##
######################################################################
sub nic_freedns_update {
debug("\nnic_freedns_update -------------------");
## First get the list of updatable hosts
my $url;
$url = "http://$config{$_[0]}{'server'}/api/?action=getdyndns&sha=".&sha1_hex("$config{$_[0]}{'login'}|$config{$_[0]}{'password'}");
@ -3746,17 +3749,11 @@ sub nic_freedns_update {
last;
}
if ($reply =~ /Updated.*$h.*to.*$ip/) {
if($reply =~ /Updated.*$h.*to.*$ip/) {
$config{$h}{'ip'} = $ip;
$config{$h}{'mtime'} = $now;
$config{$h}{'status'} = 'good';
success("updating %s: good: IP address set to %s", $h, $ip);
} elsif ($reply =~ /Address (\d+\.\d+\.\d+\.\d+) has not changed/) {
$ip = $1;
$config{$h}{'mtime'} = $now;
$config{$h}{'status'} = 'good';
$config{$h}{'ip'} = $ip;
success("updating %s: good: IP address %s has not changed", $h, $ip);
} else {
$config{$h}{'status'} = 'failed';
warning("SENT: %s", $freedns_hosts{$h}->[2]) unless opt('verbose');