From ba81f6d873d23d22b3653764585c8e5786d9789e Mon Sep 17 00:00:00 2001 From: razvanm Date: Thu, 29 May 2008 20:08:03 +0000 Subject: [PATCH] Use md5 instead of sha1sum for Darwin. --- tools/tinyos/misc/tos-ident-flags.in | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/tools/tinyos/misc/tos-ident-flags.in b/tools/tinyos/misc/tos-ident-flags.in index b87ba96e..de8d4d8d 100644 --- a/tools/tinyos/misc/tos-ident-flags.in +++ b/tools/tinyos/misc/tos-ident-flags.in @@ -16,8 +16,14 @@ my $time = sprintf( "0x%08x", `date +%s` ); (my $whoami = `whoami`) =~ s/\s//g; (my $hostname = `hostname`) =~ s/\s//g; -my $uidhash = `echo "$name$time$whoami$hostname" | sha1sum`; -my $idhash = `echo "$whoami$hostname" | sha1sum`; +my ($uidhash, $idhash); +if( `uname` =~ /Darwin/ ) { + $uidhash = `echo "$name$time$whoami$hostname" | md5`; + $idhash = `echo "$whoami$hostname" | md5`; +} else { + $uidhash = `echo "$name$time$whoami$hostname" | sha1sum`; + $idhash = `echo "$whoami$hostname" | sha1sum`; +} my $uid = ($uidhash =~/^(.{8})/) ? "0x$1" : 0; my $id = ($idhash =~/^(.{8})/) ? "0x$1" : 0; -- 2.39.2