From 07219b06b85cf401a661075f289df5d01421b5c7 Mon Sep 17 00:00:00 2001
From: Stig Thormodsrud <stig@vyatta.com>
Date: Sun, 1 Nov 2009 09:55:20 -0800
Subject: Add method to retrieve carrier value.

---
 lib/Vyatta/Interface.pm | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'lib')

diff --git a/lib/Vyatta/Interface.pm b/lib/Vyatta/Interface.pm
index 97ef7f7..8107eff 100755
--- a/lib/Vyatta/Interface.pm
+++ b/lib/Vyatta/Interface.pm
@@ -222,6 +222,17 @@ sub flags {
     return hex($val);
 }
 
+sub carrier {
+    my $self = shift;
+    open my $carrier, '<', "/sys/class/net/$self->{name}/carrier"
+	or return;
+
+    my $val = <$carrier>;
+    chomp $val;
+    close $carrier;
+    return $carrier;
+}
+
 sub hw_address {
     my $self = shift;
 
-- 
cgit v1.2.3