From 918b53841364a016eec0e2996640c471f738e93b Mon Sep 17 00:00:00 2001
From: Kim Hagen <kim.sidney@gmail.com>
Date: Tue, 9 Feb 2016 04:17:49 -0500
Subject: Use dhcp instead of dhcp3.

---
 scripts/dhcpv6-client-show-leases.pl | 4 ++--
 scripts/show-dhcp-leases.pl          | 2 +-
 scripts/vyatta-show-dhclient.pl      | 2 +-
 3 files changed, 4 insertions(+), 4 deletions(-)

(limited to 'scripts')

diff --git a/scripts/dhcpv6-client-show-leases.pl b/scripts/dhcpv6-client-show-leases.pl
index 44be689..761a3e6 100644
--- a/scripts/dhcpv6-client-show-leases.pl
+++ b/scripts/dhcpv6-client-show-leases.pl
@@ -55,7 +55,7 @@ sub log_msg {
 # Main section.
 #
 
-opendir (my $dir, "/var/lib/dhcp3");
+opendir (my $dir, "/var/lib/dhcp");
 my @lease_files;
 while (my $f = readdir $dir) {
     if ($f =~ /^dhclient_v6_(\w+).leases$/) {
@@ -74,7 +74,7 @@ my %ghash = ();
 foreach my $lease_filename (@lease_files) {
     my @lines=();
 
-    open(my $f, '<', "/var/lib/dhcp3/$lease_filename")
+    open(my $f, '<', "/var/lib/dhcp/$lease_filename")
 	or die "Can't open lease file for reading:  $lease_filename\n";
 
     @lines = <$f>;
diff --git a/scripts/show-dhcp-leases.pl b/scripts/show-dhcp-leases.pl
index a7a918a..431a13c 100755
--- a/scripts/show-dhcp-leases.pl
+++ b/scripts/show-dhcp-leases.pl
@@ -22,7 +22,7 @@
 
 use strict;
 
-opendir (my $dir, "/var/lib/dhcp3");
+opendir (my $dir, "/var/lib/dhcp");
 my @leases;
 while (my $f = readdir $dir) {
     ($f =~ /^dhclient_([\w.]+)_lease$/) && push @leases, $1;
diff --git a/scripts/vyatta-show-dhclient.pl b/scripts/vyatta-show-dhclient.pl
index 5064c1c..40e284b 100755
--- a/scripts/vyatta-show-dhclient.pl
+++ b/scripts/vyatta-show-dhclient.pl
@@ -28,7 +28,7 @@ use POSIX;
 use strict;
 use warnings;
 
-my $lease_dir = '/var/lib/dhcp3';
+my $lease_dir = '/var/lib/dhcp';
 
 sub dhclient_get_lease_files {
     my ($intf) = @_;
-- 
cgit v1.2.3