Correcciones en varias funciones; función en pruebas ogGetIpAddress.

git-svn-id: https://opengnsys.es/svn/trunk@406 a21b9725-9963-47de-94b9-378ad31fedc9

1 files changed, 9 insertions, 0 deletions

diff --git a/client/engine/System.lib b/client/engine/System.lib
index b4cd0e42..bc8e02d8 100755
--- a/client/engine/System.lib
+++ b/client/engine/System.lib
@@ -62,6 +62,15 @@ HOST="$HOSTNAME"
 echo $HOST
 }
 
+#         ogGetIpAddress
+function ogGetIpAddress () {
+local IP
+IP=$(awk '/fixed-address/ {gsub(/;/,""); host=$2}
+          END {print host}
+         ' /var/lib/dhcp3/dhclient.leases)
+echo $IP;
+}
+
 
 #/**
 #         ogRaiseError errcode ["errmessage" ...]