I keep having to look this up… so here’s a perl script (click to DL below). Also prints out some other stuff I keep forgetting how to get.<\/p>\n
Also does it for the user logged in, so you can sudo and have it work. Will die if you can’t read the hash file. Sample run:<\/p>\n
# .\/get_hashpipe.pl\r\n Running Snow Leopard, version 10.6.8\r\n You is: zen\r\n Gen UID for zen = 70140C2C-0014-4759-A3CE-D7DC9EAA047C\r\n I got your hash pipe:\r\n E2DBDB9CE7C573B9CF242EE9B01AD4D4C9DDEFDDE74F9E4<\/pre>\n<\/p>\n
Etcetera. \u00a0Thought about options to specify users or get all user hashes, but I don’t really use this much :)<\/p>\n
#!\/usr\/bin\/perl<\/span>
\n
\n#<\/span>
\n# get a hash from the mysterious mac storage place<\/span>
\n#<\/span>
\n
\n#<\/span>
\n# get OS version<\/span>
\n#<\/span>
\n# looks like sw_vers came out in 10.3... at least that's<\/span>
\n# what the man page uses as an example<\/span>
\n#<\/span>
\n# outputs something like:<\/span>
\n#<\/span>
\n# \u00a0 \u00a0 \u00a0 ProductName: \u00a0 \u00a0Mac OS X<\/span>
\n# \u00a0 \u00a0 \u00a0 ProductVersion: 10.6.8<\/span>
\n# \u00a0 \u00a0 \u00a0 BuildVersion: \u00a0 10K549<\/span>
\n#<\/span>
\n# According to wiki:<\/span>
\n# \u00a0 \u00a0 \u00a0 Public Beta: "Kodiak"<\/span>
\n# \u00a0 \u00a0 \u00a0 Version 10.0: "Cheetah"<\/span>
\n# \u00a0 \u00a0 \u00a0 Version 10.1: "Puma"<\/span>
\n# \u00a0 \u00a0 \u00a0 Version 10.2: "Jaguar"<\/span>
\n# \u00a0 \u00a0 \u00a0 Version 10.3: "Panther"<\/span>
\n# \u00a0 \u00a0 \u00a0 Version 10.4: "Tiger"<\/span>
\n# \u00a0 \u00a0 \u00a0 Version 10.5: "Leopard"<\/span>
\n# \u00a0 \u00a0 \u00a0 Version 10.6: "Snow Leopard"<\/span>
\n# \u00a0 \u00a0 \u00a0 Version 10.7: "Lion"<\/span>
\n#<\/span>
\n# I was running kodiak at earthlink, back in the day, who knew?<\/span>
\n# Close enough to UNIX (but what is UNIX anymore, really?)<\/span>
\n# Schweet cinema display, too! That machine cost over 10k....<\/span>
\n#<\/span>
\n%OS_NAME<\/span> =<\/span> (<\/span>
\n"10.0"<\/span> =><\/span> "Cheetah"<\/span>,<\/span>
\n"10.1"<\/span> =><\/span> "Puma"<\/span>,<\/span>
\n"10.2"<\/span> =><\/span> "Jaguar"<\/span>,<\/span>
\n"10.3"<\/span> =><\/span> "Panther"<\/span>,<\/span>
\n"10.4"<\/span> =><\/span> "Tiger"<\/span>,<\/span>
\n"10.5"<\/span> =><\/span> "Leopard"<\/span>,<\/span>
\n"10.6"<\/span> =><\/span> "Snow Leopard"<\/span>,<\/span>
\n"10.7"<\/span> =><\/span> "Lion"<\/span>
\n)<\/span>;<\/span>
\n
\nopen<\/span><\/a>(<\/span>OS_VER,<\/span> "sw_vers |"<\/span>)<\/span> ||<\/span> die<\/span><\/a> "can't run sw_vers\\n<\/span>"<\/span>;<\/span>
\nwhile<\/span> (<\/span>)<\/span> {<\/span>
\nchomp<\/span><\/a>;<\/span>
\n(<\/span>$key<\/span>,<\/span> $value<\/span>)<\/span> =<\/span> split<\/span><\/a>(<\/span>\/:\\s*\/<\/span>)<\/span>;<\/span>
\nif<\/span> (<\/span>\/ProductVersion\/<\/span>)<\/span> {<\/span>
\n(<\/span>$maj<\/span>,<\/span> $min<\/span>,<\/span> $rev<\/span>)<\/span> =<\/span> split<\/span><\/a>(<\/span>\/\\.\/<\/span>,<\/span> $value<\/span>)<\/span>;<\/span>
\n# print "Maj: $maj, Min: $min, Rev: $rev ($maj.$min)\\n";<\/span>
\nprint<\/span><\/a> "Running "<\/span> .<\/span> $OS_NAME<\/span>{<\/span>"$maj.$min"<\/span>}<\/span> .<\/span> ", version $maj.$min.$rev\\n<\/span>"<\/span>;<\/span>
\nlast<\/span>;<\/span>
\n}<\/span>
\n}<\/span>
\nclose<\/span><\/a>(<\/span>OS_VER)<\/span>;<\/span>
\n
\n# who are you\/me\/etc?<\/span>
\n# started with whoami... but sudo fucks with it... getlogin should do the trick<\/span>
\n$i_is<\/span> =<\/span> getlogin<\/span><\/a>(<\/span>)<\/span>;<\/span>
\nprint<\/span><\/a> "You is: $i_is\\n<\/span>"<\/span>;<\/span>
\n
\n# get the Generated UID<\/span>
\n
\n# should work post tiger<\/span>
\nif<\/span> (<\/span>$min<\/span> ><\/span> 3<\/span>)<\/span> {<\/span>
\nopen<\/span><\/a>(<\/span>DSCL,<\/span> "dscl localhost -read \/Search\/Users\/$i_is |"<\/span>)<\/span> ||<\/span> die<\/span><\/a> "can't run dscl\\n<\/span>"<\/span>;<\/span>
\nwhile<\/span> (<\/span>)<\/span> {<\/span>
\nchomp<\/span><\/a>;<\/span>
\nif<\/span> (<\/span>\/GeneratedUID\/<\/span>)<\/span> {<\/span>
\n$guid<\/span> =<\/span> substr<\/span><\/a>(<\/span>$_<\/span>,<\/span> 14<\/span>)<\/span>;<\/span>
\nprint<\/span><\/a> "Gen UID for $i_is = $guid\\n<\/span>"<\/span>;<\/span>
\nlast<\/span>;<\/span>
\n}<\/span>
\n}<\/span> close<\/span><\/a>(<\/span>DSCL)<\/span>;<\/span>
\n}<\/span>
\n# on Tiger you might have to run... but does anyone really care? No idea if this works<\/span>
\nelsif<\/span> (<\/span>$min<\/span> ==<\/span> 3<\/span>)<\/span> {<\/span>
\nopen<\/span><\/a>(<\/span>NIUTIL,<\/span> "niutil -readprop . \/users\/$i_is generateduid|"<\/span>)<\/span> ||<\/span> die<\/span><\/a> "can't run niutil successfully\\n<\/span>"<\/span>;<\/span>
\n}<\/span>
\nelse<\/span> {<\/span>
\nprint<\/span><\/a> "Min = $min\\n<\/span>"<\/span>;<\/span>
\ndie<\/span><\/a> "come on loser, this was written in 2012. What does OS = $maj.$min.$min mean?\\n<\/span>"<\/span>;<\/span>
\n}<\/span>
\n
\n#<\/span>
\n# finally, pass the hash pipe (cue wheezer)<\/span>
\n#<\/span>
\n
\n$shadow_file<\/span>