From: janw Date: Thu, 31 Jan 2008 08:47:59 +0000 (+0000) Subject: Added function generate_hw_digest. X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=5c0857b2be75f5d24cb93d9f3ce1565802142e08;p=gosa.git Added function generate_hw_digest. git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@8689 594d385d-05f5-0310-b6e9-bd551577e9d8 --- diff --git a/gosa-si/gosa-si-client b/gosa-si/gosa-si-client index fe07d32f4..9b4f2b31a 100755 --- a/gosa-si/gosa-si-client +++ b/gosa-si/gosa-si-client @@ -1265,7 +1265,13 @@ sub new_passwd { return; } - +sub genereate_hw_digest { + my $hw_data; + foreach my $line (split /\n/, `cat /proc/bus/pci/devices`) { + $hw_data.= sprintf "%s", $line =~ /[^\s]+\s([^\s]+)\s.*/; + } + return(md5_base64($hw_data)); +} #==== MAIN = main ==============================================================