This Perl script sets the creator, archiver, modifier, and metaDataModifier of a specified NSS file to an eDir user with the format .CN=user.O=organization.T=TREE_NAME. It uses the Virtual File Services (Originally called Virtual File Services for NetWare) which were ported over to Linux. The SDK for this API set can be downloaded from http://developer.novell.com/wiki/index.php/Virtual_File_Services_for_NetWare. The objective of the tool is to view user owner ids for an NSS file using XML as specified in the VFS for NetWare specification. It is intended to be used as a sample script for developers that may want to use the VFS API set to view and manage storage.
How to Use the file:
linuxSetFileIDs.pl is a Perl script. So Perl must be installed and running on the Linux server that this file is being loaded on. NSS must be installed to get the VFS support.
To run the perl script type:
perl linuxSetFileIDs.pl volume:path/file_name.ext <enter>
Where /path/file_name.ext is the fully qualified name
of an NSS file complete with leading slash and the path.
Example: perl linuxGetFileIDs.pl /media/nss/NSS1/file.txt .CN=user.O=organization.T=TREE_NAME.<enter>
grep57:/a # perl linuxSetFileIDs.pl /media/nss/NSS1/file.txt .CN=admin.O=sms.T=GREPTREE.
file is now open
File Name: +</_admin/Manage_NSS/files.cmd
Request Sent: <virtualIO><datastream name="command"/></virtualIO><fileRequest>
Disclaimer: As with everything else at Cool Solutions, this content is definitely not supported by Novell (so don't even think of calling Support if you try something and it blows up).
It was contributed by a community member and is published "as is." It seems to have worked for at least one person, and might work for you. But please be sure to test, test, test before you do anything drastic with it.