Perl Script for getting the interval length that an inactive epoch will remain on the system before being removed.

An inactive epoch will only be kept for 1,209,600 seconds (two weeks), by default. Inactive epochs need to be pinged before that time expires, or they will be removed.

This script has been designed to be run on Linux.

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.

How to Use the file:

linuxGetInactiveEpochInterval.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 linuxChangeEventEpoch.pl VOLUME_NAME <enter>

Where VOLUME_NAME is the name of the NSS volume where the active EFL Epoch is to be stopped.

Sample output:

grep57:/a # perl linuxGetInactiveEpochInterval.pl NSS1
file is now open </_admin/Manage_NSS/Volume/NSS1/FileEvents.xml
<nssRequest><fileEventList><getInactiveEpochInterval/></fileEventList></nssRequest>
<nssReply>
<fileEventList>
<getInactiveEpochInterval>
<interval value="1209600"/>
<result value="0"><description>success</description></result>
</getInactiveEpochInterval>
</fileEventList>
</nssReply>

The specifications explain the XML tags.