From ce5dfe3501e27d13801b1499ad7ca674dfb3d243 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Sandro=20J=C3=A4ckel?= Date: Tue, 25 Oct 2022 15:46:07 +0200 Subject: [PATCH 1/7] README.md: don't use version number --- README.md | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/README.md b/README.md index c1f7b74..ddaffdd 100644 --- a/README.md +++ b/README.md @@ -1,4 +1,4 @@ -# DDCLIENT v3.10.0 +# DDCLIENT `ddclient` is a Perl client used to update dynamic DNS entries for accounts on many dynamic DNS services. @@ -78,8 +78,8 @@ ddclient package. the directory: ```shell - tar xvfa ddclient-3.10.0.tar.gz - cd ddclient-3.10.0 + tar xvfa ddclient-3.XX.X.tar.gz + cd ddclient-3.XX.X ``` (If you are installing from a clone of the Git repository, you From 36744e5b205c676b326e72de5cf81ed7ad437f64 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Sandro=20J=C3=A4ckel?= Date: Tue, 25 Oct 2022 15:46:33 +0200 Subject: [PATCH 2/7] set version number via autoconf --- ddclient.in | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ddclient.in b/ddclient.in index 5e4759e..05bafc3 100755 --- a/ddclient.in +++ b/ddclient.in @@ -30,8 +30,8 @@ use IO::Socket::INET; use Socket qw(AF_INET AF_INET6 PF_INET PF_INET6); use Sys::Hostname; -use version 0.77; our $VERSION = version->declare('v3.10.0'); -(my $version = $VERSION->stringify()) =~ s/^v//; +use version 0.77; our $VERSION = version->declare('@PACKAGE_VERSION@'); +my $version = $VERSION->stringify(); my $programd = $0; $programd =~ s%^.*/%%; my $program = $programd; From d13469fde532443ec98c24df99505e98cac3b5b7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Sandro=20J=C3=A4ckel?= Date: Tue, 25 Oct 2022 15:46:45 +0200 Subject: [PATCH 3/7] Bump version number in preparation for next release --- configure.ac | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/configure.ac b/configure.ac index 554ea6b..6c58b8f 100644 --- a/configure.ac +++ b/configure.ac @@ -1,5 +1,5 @@ AC_PREREQ([2.63]) -AC_INIT([ddclient], [3.10.0_2]) +AC_INIT([ddclient], [3.10.1]) AC_CONFIG_SRCDIR([ddclient.in]) AC_CONFIG_AUX_DIR([build-aux]) AC_CONFIG_MACRO_DIR([m4]) From e8cc636474443fec2886541ab643699bb48ec781 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Sandro=20J=C3=A4ckel?= Date: Mon, 31 Oct 2022 00:06:56 +0100 Subject: [PATCH 4/7] Use https in more places --- ddclient.in | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/ddclient.in b/ddclient.in index 05bafc3..6c60d5a 100755 --- a/ddclient.in +++ b/ddclient.in @@ -116,8 +116,8 @@ my %builtinweb = ( 'myonlineportal' => {'url' => 'https://myonlineportal.net/checkip'}, 'noip-ipv4' => {'url' => 'http://ip1.dynupdate.no-ip.com/'}, 'noip-ipv6' => {'url' => 'http://ip1.dynupdate6.no-ip.com/'}, - 'nsupdate.info-ipv4' => {'url' => 'http://ipv4.nsupdate.info/myip'}, - 'nsupdate.info-ipv6' => {'url' => 'http://ipv6.nsupdate.info/myip'}, + 'nsupdate.info-ipv4' => {'url' => 'https://ipv4.nsupdate.info/myip'}, + 'nsupdate.info-ipv6' => {'url' => 'https://ipv6.nsupdate.info/myip'}, 'zoneedit' => {'url' => 'https://dynamic.zoneedit.com/checkip.html'}, ); my %builtinfw = ( @@ -4263,8 +4263,8 @@ sub nic_noip_update { 'badagent' => 'Invalid user agent', 'nohost' => 'The hostname specified does not exist in the database', '!donator' => 'The offline setting was set, when the user is not a donator', - 'abuse', => 'The hostname specified is blocked for abuse; open a trouble ticket at http://www.no-ip.com', - 'numhost' => 'System error: Too many or too few hosts found. open a trouble ticket at http://www.no-ip.com', + 'abuse', => 'The hostname specified is blocked for abuse; open a trouble ticket at https://www.no-ip.com', + 'numhost' => 'System error: Too many or too few hosts found. open a trouble ticket at https://www.no-ip.com', 'dnserr' => 'System error: DNS error encountered. Contact support@dyndns.org', 'nochg' => 'No update required; unnecessary attempts to change to the current address are considered abusive', ); @@ -6402,7 +6402,7 @@ EoEXAMPLE ###################################################################### ## nic_freemyip_update ## by Cadence (reused code from nic_duckdns) -## http://freemyip.com/update?token=ec54b4b64db27fe8873c7f7&domain=myhost +## https://freemyip.com/update?token=ec54b4b64db27fe8873c7f7&domain=myhost ## response contains OK or ERROR ###################################################################### sub nic_freemyip_update { From 3dffe5372a4443bfd0bbadf2097ea8ea68e38b85 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Sandro=20J=C3=A4ckel?= Date: Mon, 31 Oct 2022 00:07:05 +0100 Subject: [PATCH 5/7] Format --- ddclient.in | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/ddclient.in b/ddclient.in index 6c60d5a..e5d0d0c 100755 --- a/ddclient.in +++ b/ddclient.in @@ -4280,10 +4280,7 @@ sub nic_noip_update { info("setting IP address to %s for %s", $ip, $hosts); verbose("UPDATE:", "updating %s", $hosts); - my $url = "https://$config{$h}{'server'}/nic/update?system="; - $url .= 'noip'; - $url .= "&hostname=$hosts"; - $url .= "&myip="; + my $url = "https://$config{$h}{'server'}/nic/update?system=noip&hostname=$hosts&myip="; $url .= $ip if $ip; my $reply = geturl( From f01110aedb013cc4918ba7f4f196e02a7ad63e4f Mon Sep 17 00:00:00 2001 From: gertfriend Date: Fri, 18 Nov 2022 08:43:47 +0100 Subject: [PATCH 6/7] Add regfish (#471) --- README.md | 1 + ddclient.conf.in | 7 +++++ ddclient.in | 74 ++++++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 82 insertions(+) diff --git a/README.md b/README.md index ddaffdd..926dce3 100644 --- a/README.md +++ b/README.md @@ -35,6 +35,7 @@ Dynamic DNS services currently supported include: dnsexit - See https://dnsexit.com/ for details 1984.is - See https://www.1984.is/product/freedns/ for details Njal.la - See https://njal.la/docs/ddns/ + regfish.de - See https://www.regfish.de/domains/dyndns/ for details `ddclient` now supports many cable and DSL broadband routers. diff --git a/ddclient.conf.in b/ddclient.conf.in index d6bf96c..97b6b59 100644 --- a/ddclient.conf.in +++ b/ddclient.conf.in @@ -315,3 +315,10 @@ ssl=yes # use ssl-support. Works with # password=mypassword # quietreply=no|yes # my-domain.com + +## +## regfish.de (www.regfish.de/) +## +# protocol=regfishde, +# password=mypassword +# my-domain.com diff --git a/ddclient.in b/ddclient.in index e5d0d0c..86f8602 100755 --- a/ddclient.in +++ b/ddclient.in @@ -533,6 +533,10 @@ my %variables = ( 'script' => setv(T_STRING, 0, 1, '/RemoteUpdate.sv', undef), 'min-error-interval' => setv(T_DELAY, 0, 0, interval('8m'), 0), }, + 'regfishde-common-defaults' => { + 'server' => setv(T_FQDNP, 1, 0, 'dyndns.regfish.de', undef), + 'login' => setv(T_LOGIN, 0, 0, 0, 'unused', undef), + }, ); my %services = ( '1984' => { @@ -895,6 +899,15 @@ my %services = ( $variables{'service-common-defaults'}, ), }, + 'regfishde' => { + 'updateable' => undef, + 'update' => \&nic_regfishde_update, + 'examples' => \&nic_regfishde_examples, + 'variables' => merge( + $variables{'regfishde-common-defaults'}, + $variables{'service-common-defaults'}, + ), + }, ); $variables{'merged'} = { map({ %{$services{$_}{'variables'}} } keys(%services)), @@ -7159,6 +7172,67 @@ sub nic_keysystems_update { } } +###################################################################### +## nic_regfishde_examples +###################################################################### +sub nic_regfishde_examples { + return < opt('proxy'), url => $url); + + # No response, give error + if (!defined($reply) || !$reply) { + failed("regfish.de updating %s: failed: %s.", $h, $config{$h}{'server'}); + last; + } + last if !header_ok($h, $reply); + + if ($reply =~ /success/) + { + $config{$h}{'ip'} = $ip; + $config{$h}{'mtime'} = $now; + $config{$h}{'status'} = 'good'; + success("updating %s: good: IP address set to %s", $h, $ip); + } + else + { + $config{$h}{'status'} = 'failed'; + failed("updating %s: Server said: '$reply'", $h); + } + } +} # Execute main() if this file is run as a script or run via PAR (https://metacpan.org/pod/PAR), # otherwise do nothing. This "modulino" pattern makes it possible to import this file as a module From 89e30d0aa8ccb99018f163228eed5f9519bbc543 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Luca=20Sch=C3=B6neberg?= Date: Mon, 21 Nov 2022 16:17:08 +0100 Subject: [PATCH 7/7] fix hetzner zone problem --- ddclient.in | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ddclient.in b/ddclient.in index 86f8602..3df624d 100755 --- a/ddclient.in +++ b/ddclient.in @@ -6127,7 +6127,7 @@ sub nic_hetzner_update { $config{$domain}{"status-ipv$ipv"} = 'failed'; # Get DNS 'A' or 'AAAA' record ID - $url = "https://$config{$key}{'server'}/records?$zone_id"; + $url = "https://$config{$key}{'server'}/records"; $reply = geturl(proxy => opt('proxy'), url => $url, headers => $headers @@ -6144,7 +6144,7 @@ sub nic_hetzner_update { next; } # Pull the ID out of the json, messy - my ($dns_rec_id) = map { ($_->{name} eq $hostname && $_->{type} eq $type) ? $_->{id} : ()} @{$response->{records}}; + my ($dns_rec_id) = map { ($_->{name} eq $hostname && $_->{type} eq $type && &zone_id eq $_{zone_id}) ? $_->{id} : ()} @{$response->{records}}; # Set domain my $http_method="";