RepoMirrors/mars
1
0
Fork 0
mirror of https://github.com/schoebel/mars synced 2025-02-19 05:27:01 +00:00
Code Issues Packages Projects Releases Wiki Activity

marsadm: use first IP on eth0

Browse Source
This commit is contained in:
Ingvar Gilbert 2012-02-15 19:37:17 +01:00 committed by Thomas Schoebel-Theuer
parent 004b3bbe6a
commit 42ec65952d
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
userspace/marsadm
View File

@ -10,9 +10,7 @@ my $mars = "/mars";
my $host = `uname -n` or die "cannot determine my network node name\n";
chomp $host;
my $force = 0;
my $ip = `ip a` or die "cannot determine my IP address\n";
$ip =~ s/\A.*inet +(?!127\.0\.)([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+).*?\Z/$1/ms or die "cannot parse my IP address\n";
chomp $ip;
my $ip = _get_ip();
print "my IP is $ip\n";
umask 0077;
@ -321,6 +319,14 @@ sub _writable {
chmod($newmode, $path) == 1 or die "cannot chmod '$path'\n";
}
sub _get_ip {
chomp (my @info = `/sbin/ip addr show dev eth0`);
foreach (@info) {
m#\sinet\s(\d+\.\d+\.\d+\.\d+)# && return $1;
}
return undef;
}
##################################################################
# commands