Scripts from the book should be somewhere on Dave's website.

Rudif

Update: you can download scripts from the book from the publisher, Newriders.

I tried to run several scripts and they seem to work as advertized.
I can list domains, groups, machines, accounts, and more. To someone (me) who is not an admin, they look convincing.

Rudif

I'd suggest digging around the fringes of the Samba docs. There's a jolly but apparently authoritative guide to cifs, for example, which describes it as 'a recipe for protocol soup'.

Other than that, not much. If you're running on linux there are a couple of modules that wrap around samba libraries. I haven't seen anything that does the same on windows, apart from some modules in the activestate distribution which are only really relevant to interactions with a domain controller (eg Win32::NetAdmin).

Last resort: if you're on nt/2000 you can try reading the output of winfingerprint. or the source...

Also, Dave Roth's site has gobs and gobs of info, and his books are great resources, too, as was mentioned.

Here's a little Win32::OLE snippit from somewhere:

#!/usr/bin/perl -w

use strict;
use Win32::OLE;
use Win32::OLE::Enum qw(in);
my $dom;

$dom = Win32::OLE->GetObject ( "WinNT:" );

print "Domain\n\n-----------------------------------------------------
+--------------------------\n";

foreach ( in $dom ) { print "$_->{Name}\n";}
[download]

IMHO, the 'net' command was a great idea implemented horribly wrong by M$ and the raw, unadulterated POWER of perl is the best way to overcome this vast deficiency!

HTH
--
idnopheq
Apply yourself to new problems without preparation, develop confidence in your ability to to meet situations as they arrise.

~ Shunryu Suzuki

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker.
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;

Yuck. net command is nasty. Win32::NetAdmin does loads of what you want, maybe also Win32::NetResource if you are dealing with network shares etc - but for all the advanced stuff you'll need Win32::Lanman - not available on CPAN but a google search should reveal where it's hiding.

If it's just a one off, net command is ok, I suppose!

Error: Keyboard not attached. Press F1 to continue.