Share-Permissions prüfen

Hallo,

ich habe die Aufgabe, in einer W2000/W2003 Domaine alle Shares zu prüfen und
festzustellen,
ob es welche gibt, bei denen die Permission "Everyone - Full Control"
gesetzt ist und diese
(zunächst mal nur) auszugeben. Ich bin Administrator in dieser Domaine. Ich
denke mal, dass
sich das mit Perl recht schön lösen lassen müsste.

Frage:

1) Kann mir jemand dafür Modul(e) empfehlen, mit denen er schon gearbeitet
hat? Oder
vielleicht sogar schon Codebeispiele?

2) Kann ich das auch von einer Linux-Kiste aus machen, und falls ja wie, und
was muss dort
laufen? Oder geht es nur von einem W2x Rechner in der betreffenden Domaine?

Danke für Eure Antworten, und schöne Grüße aus Wien,

Ferry

--
Ing. Ferry Bolhar
Municipality of Vienna, Department 14
A-1010 Vienna / AUSTRIA
E-mail: bol@adv.magwien.gv.at

Re: Share-Permissions prüfen

Hallo Ferry,

Ferry Bolhar wrote:
> Hallo,
>
> ich habe die Aufgabe, in einer W2000/W2003 Domaine alle Shares zu prüfen und
> festzustellen,
> ob es welche gibt, bei denen die Permission "Everyone - Full Control"
> gesetzt ist und diese
> (zunächst mal nur) auszugeben. Ich bin Administrator in dieser Domaine. Ich
> denke mal, dass
> sich das mit Perl recht schön lösen lassen müsste.
>
> Frage:
>
> 1) Kann mir jemand dafür Modul(e) empfehlen, mit denen er schon gearbeitet
> hat? Oder
> vielleicht sogar schon Codebeispiele?
Win32::NetResource, da ist auch ein Beispiel dabei:
use strict;
use Win32::NetResource qw(:DEFAULT GetSharedResources GetError);
my $resources = [];
unless(GetSharedResources($resources, RESOURCETYPE_ANY)) {
my $err;
GetError($err);
warn Win32::FormatMessage($err);
}

foreach my $href (@$resources) {
next if ($$href{DisplayType} != RESOURCEDISPLAYTYPE_SHARE);
print "-----\n";
foreach( keys %$href){
print "$_: $href->{$_}\n";
}
}

Das sollte schon mal ein Anfang sein.

>
> 2) Kann ich das auch von einer Linux-Kiste aus machen, und falls ja wie, und
> was muss dort
> laufen? Oder geht es nur von einem W2x Rechner in der betreffenden Domaine?
>
Hmm, da bin ich mir nicht sicher ob Linux das auch kann.

> Danke für Eure Antworten, und schöne Grüße aus Wien,

Gerne, Grüße aus Mödling :-),
Reinhard




--
PM replays nur an reinhard dot pagitsch at isis-papyrus dot com.
Die Adresse im From/Replay To wird nicht gelesen.