Fallback to iproute if ifconfig doesn't work.
This fix applies the patch provided by Maccied Grela in [bugs:#26]
This commit is contained in:
parent
5eba4c6699
commit
5da848d93e
1 changed files with 3 additions and 2 deletions
5
ddclient
5
ddclient
|
@ -1,7 +1,7 @@
|
||||||
#!/usr/bin/perl -w
|
#!/usr/bin/perl -w
|
||||||
#!/usr/local/bin/perl -w
|
#!/usr/local/bin/perl -w
|
||||||
######################################################################
|
######################################################################
|
||||||
# $Id: ddclient 154 2013-10-28 21:37:16Z wimpunk $
|
# $Id: ddclient 155 2013-10-28 22:38:56Z wimpunk $
|
||||||
#
|
#
|
||||||
# DDCLIENT - a Perl client for updating DynDNS information
|
# DDCLIENT - a Perl client for updating DynDNS information
|
||||||
#
|
#
|
||||||
|
@ -20,7 +20,7 @@ use Getopt::Long;
|
||||||
use Sys::Hostname;
|
use Sys::Hostname;
|
||||||
use IO::Socket;
|
use IO::Socket;
|
||||||
|
|
||||||
my ($VERSION) = q$Revision: 154 $ =~ /(\d+)/;
|
my ($VERSION) = q$Revision: 155 $ =~ /(\d+)/;
|
||||||
|
|
||||||
my $version = "3.8.0-r". $VERSION;
|
my $version = "3.8.0-r". $VERSION;
|
||||||
my $programd = $0;
|
my $programd = $0;
|
||||||
|
@ -1958,6 +1958,7 @@ sub get_ip {
|
||||||
} elsif ($use eq 'if') {
|
} elsif ($use eq 'if') {
|
||||||
$skip = opt('if-skip', $h) || '';
|
$skip = opt('if-skip', $h) || '';
|
||||||
$reply = `ifconfig $arg 2> /dev/null`;
|
$reply = `ifconfig $arg 2> /dev/null`;
|
||||||
|
$reply = `ip addr list dev $arg 2> /dev/null` if $?;
|
||||||
$reply = '' if $?;
|
$reply = '' if $?;
|
||||||
|
|
||||||
} elsif ($use eq 'cmd') {
|
} elsif ($use eq 'cmd') {
|
||||||
|
|
Loading…
Reference in a new issue