Change File/Directory owner

Novell Cool Solutions: Cool Tool

Digg This - Slashdot This

In Brief

Perl-Script to change Direcrtory / File owner

Vitals

Posted:	22 Aug 2005
File Size:	1KB
License:	Free
Download:	/coolsolutions/tools/downloads/chngownr.zip
Publisher:	Koltogyan Sergey Rubenovich

Disclaimer

Please read the note from our friends in legal before using this file.

Details

What it does:

• Change File Directory owner for all Dir/files from current ant below.
• Can change from UNKNOWN OWNER.
• Can work with RUSSIAN File/Directory names.

Information about limitations:

1. This script uses VFS (virtual file system). As a result - this script will work only with NetWare, where supported VFS. (NW6. NW6.5)
2. This script tested only with NSS-volume
3. This script does not use UCS/UCX (maybe this is good. I use VFS for get directory quota.)

How to Step by Step:

1. unpack chngownr.zip to sys:\perl\scripts\chngownr.pl

Example-1:
If your need change File/Dir owner as:

from vol1:\wrk\deps and below from owner: .user1.org1.ogo to .owner .user3.ogo

run this script as:
(ATTANTION: in this example your tree has name: TESTREE)

perl sys:\perl\scripts\chngownr.pl vol1:wrk\deps .cn=user1.ou=org1.o=ogo.t=testtree. .cn=user3.o=ogo.t=testtree.

Example-2:
if you need LOG ALL FILES/DIR for changed OWNER, run as:

perl sys:\perl\scripts\chngownr.pl vol1:wrk\deps .cn=user1.ou=org1.o=ogo.t=testtree. .cn=user3.o=ogo.t=testtree. > sys:\result.txt

Example-3:
if you need change OWNER from UNKNOWN (old owner was deleted), run as:
perl sys:\perl\scripts\chngownr.pl volume:dir\dir1 "unknown user" .cn=user3.o=ogo.t=testtree.

Novell Cool Solutions (corporate web communities) are produced by WebWise Solutions. www.webwiseone.com