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

Add support for njal.la (#459)

Browse source 
Co-authored-by: Dimitris Paraskevopoulos <dpparaskevopoulos@gmail.com>
This commit is contained in:
satrapes 2022-09-30 15:49:57 +03:00 committed by GitHub
parent ca3be487f9
commit c9754a125c
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
3 changed files with 126 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
README.md
View file

@ -34,6 +34,7 @@ Dynamic DNS services currently supported include:
Gandi - See https://gandi.net
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/
`ddclient` now supports many cable and DSL broadband routers.

11
ddclient.conf.in
View file

@ -88,7 +88,6 @@ ssl=yes # use ssl-support. Works with
# protocol=dyndns2 \
# your-static-host.dyndns.org
##
##
## dyndns.org custom addresses
##
@ -154,7 +153,6 @@ ssl=yes # use ssl-support. Works with
# zone=example.com \
# example.com,subdomain.example.com
##
##
## Loopia (loopia.se)
##
@ -302,9 +300,18 @@ ssl=yes # use ssl-support. Works with
# password=mypassword \
# myhost.mydomain.com
##
## dnsexit (www.dnsexit.com)
##
#protocol=dnsexit, \
#login=myusername, \
#password=mypassword, \
#subdomain-1.domain.com,subdomain-2.domain.com
##
## Njal.la (http://njal.la/)
##
# protocol=njalla,
# password=mypassword
# quietreply=no|yes
# my-domain.com

110
ddclient.in
View file

@ -762,6 +762,17 @@ my %services = (
'zone' => setv(T_FQDN, 1, 0, undef, undef),
},
},
'njalla' => {
'updateable' => undef,
'update' => \&nic_njalla_update,
'examples' => \&nic_njalla_examples,
'variables' => {
%{$variables{'service-common-defaults'}},
'login' => setv(T_STRING, 0, 0, 'unused', undef),
'server' => setv(T_FQDNP, 1, 0, 'njal.la', undef),
'quietreply' => setv(T_BOOL, 0, 1, 0, undef)
},
},
'noip' => {
'updateable' => undef,
'update' => \&nic_noip_update,
@ -1706,7 +1717,7 @@ sub init_config {
$proto = opt('protocol') if !defined($proto);
load_sha1_support($proto) if (grep (/^$proto$/, ("freedns", "nfsn")));
load_json_support($proto) if (grep (/^$proto$/, ("1984", "cloudflare", "gandi", "godaddy", "hetzner", "yandex", "nfsn")));
load_json_support($proto) if (grep (/^$proto$/, ("1984", "cloudflare", "gandi", "godaddy", "hetzner", "yandex", "nfsn", "njalla")));
if (!exists($services{$proto})) {
warning("skipping host: %s: unrecognized protocol '%s'", $h, $proto);
@ -5041,6 +5052,103 @@ sub nic_nfsn_update {
######################################################################
######################################################################
## nic_njalla_examples
######################################################################
sub nic_njalla_examples {
return <<"EoEXAMPLE";
o 'njalla'
The 'njalla' protocol is used by DNS service offered by njal.la.
Configuration variables applicable to the 'njalla' protocol are:
protocol=njalla ##
password=service-password ## Generated password for your dynamic DNS record
quietreply=no|yes ## If yes return empty response on success with status 200 but print errors
domain ## subdomain to update, use @ for base domain name, * for catch all
Example ${program}.conf file entries:
## single host update
protocol=njalla \\
password=njal.la-key
quietreply=no
domain.com
EoEXAMPLE
}
######################################################################
## nic_njalla_update
##
## written by satrapes
##
## based on https://njal.la/docs/ddns/
## needs this url to update:
## https://njal.la/update?h=host_name&k=domain_password&a=your_ip
## response contains "code 200" on succesful completion
######################################################################
sub nic_njalla_update {
debug("\nnic_njalla_update -------------------");
foreach my $h (@_) {
# Read input params
my $ipv4 = delete $config{$h}{'wantipv4'};
my $ipv6 = delete $config{$h}{'wantipv6'};
my $quietreply = delete $config{$h}{'quietreply'};
my $ip_output = '';
# Build url
my $url = "https://$config{$h}{'server'}/update/?h=$h&k=$config{$h}{'password'}";
my $auto = 1;
foreach my $ip ($ipv4, $ipv6) {
next if (!$ip);
$auto = 0;
my $ipv = ($ip eq ($ipv6 // '')) ? '6' : '4';
my $type = ($ip eq ($ipv6 // '')) ? 'aaaa' : 'a';
$ip_output .= " IP v$ipv: $ip,";
$url .= "&$type=$ip";
}
$url .= (($auto eq 1)) ? '&auto' : '';
$url .= (($quietreply eq 1)) ? '&quiet' : '';
info("setting address to%s for %s", ($ip_output eq '') ? ' auto' : $ip_output, $h);
verbose("UPDATE:", "updating %s", $h);
debug("url: %s", $url);
# Try to get URL
my $reply = geturl(proxy => opt('proxy'), url => $url);
my $response = '';
if ($quietreply) {
$reply =~ qr/invalid host or key/mp;
$response = ${^MATCH};
if (!$response) {
success("updating %s: good: IP address set to %s", $h, $ip_output);
}
elsif ($response =~ /invalid host or key/) {
failed("Invalid host or key");
} else {
failed("Unknown response");
}
} else {
$reply =~ qr/{(?:[^{}]*|(?R))*}/mp;
$response = eval {decode_json(${^MATCH})};
# No response, declare as failed
if (!defined($reply) || !$reply) {
failed("updating %s: Could not connect to %s.", $h, $config{$h}{'server'});
} else {
# Strip header
if ($response->{status} == 401 && $response->{message} =~ /invalid host or key/) {
failed("Invalid host or key");
} elsif ($response->{status} == 200 && $response->{message} =~ /record updated/) {
success("updating %s: good: IP address set to %s", $h, $response->{value}->{A});
} else {
failed("Unknown response");
}
}
}
}
}
######################################################################
## nic_sitelutions_examples
######################################################################