Generate LICENSE DELETE commands for all expired licenses.

Problem: you need to dismount a disk that has an image installed /SHARED on it. When you attempt to de-install the image, VMS tells you that it can't because someone has the image open. However, in this situation, SHOW DEV/FILES only shows you that the image is installed, and not who has it open. This command procedure will find PIDs with open channels matching the specified filename and type.

This is a Dynamic DNS (http://www.dyndns.com/) client for OpenVMS. This client will obtain the external IP address for your site (e.g., your firewall's IP) and provides that to DynDNS for registration. This procedure honors the status returned by the DynDNS host; errors will generate an email (to any valid email address) and will hold the processing of further updates until the user rectifies the problem. This procedure can be run as frequently as desired; if the address has not changed since the last run, no update is done unless 25 days (user settable) has passed. The WGET program is an essential prerequisite for this script; either include it in your DCL$Path directory or define a foreign command in the appropriate LOGIN.COM.

Several variables at the beginning of the procedure are user configurable; these include items like your host name, your DynDNS username and password, etc. More information on these variables can be obtained from the DynDNS site (URL is included in the source code); the default variables set herein are safe to use for test purposes, but will NOT modify your DynDNS registration. Several logicals (see comments in the code), prefixed with DynDNS$... can be used to monitor and control the program. Finally, you can use any of a variety of tools to schedule the execution of this program, including the Resubmit procedures on this site or Kronos on the Freeware v4 CD, or any variety of other schedulers.

This is release 0.6, which includes fixes for case-sensitive usernames and passwords, as well as the ability to send emails to Internet addresses.

Please contact me directly with any bug reports or post questions here.

Is your system disk filling up with log files, security audit journals, accountng data files, and more? But you don't want to (or in some cases, can't) delete them? This procedure will allow you to specify the file name, and will zip up all previous versions of the file, retaining version numbers, and free up that disk space! Most of these files will compress by at least 80%, and oftentimes well in excess of 95%!

Pre-req: you've got to have a copy of Info-Zip's ZIP utility available on your system with the command ZIP accessible.

Usage:

$ ZipLogFile {file.ext}

This will create a file.zip file with your log or data files stored therein.

This procedure takes a pid as P1, searches in the opened files of the process, the ones ending with .LOG; followed by any number, and does for each a $ type/tail.

It may be convenient to see the last lines of the logfile of a process.

This procedure finds all the bg devices of a process, and displays the sent and received "I/O completed" and "Bytes transferred" of the BG devices.

This procedure searches for a specified file in a logical directory that can include wildcards.

Example:

FILE TO SEARCH : DAILY*.*
LOGICAL DIRECTORY NAME: C*

This searches for all the files with names that start with "DAILY" via any logical that starts with the letter "C".

This procedure lists all the files in the XFC cache that have a low hit rate, and may be excluded from XFC (with a $ set fil/nocaching xxx).

You pass the percentage as P1, so

$ @exclude_xfc 12

will show all files that have a hit rate of 0 to 11% in the XFC cache.