F R E E



       Src. language:  Pascal

       Author:         franco.brunetta@libero.it       Version  2.4-2

       Created:        29-MAR-1989

       Last revision:  11-MAY-1995  (FB)  (17)





                                  F R E E

 

Interesting program to display free and used disk space.



Using   a   logical   name   "FREE_DEVICES",  you  can  pass  to  FREE a

comma-separated list of disk devices to analyze; for example:  $  DEFINE

FREE_DEVICES  "DUA0,DUA1,DISK$2,DISK$USER".  If NO "FREE_DEVICES" lnm is

defined, FREE will use SYS$DEVICE_SCAN system service to find  any  disk

device  (DC$_Disk)  known  to  the cluster. SYS$DEVICE_SCAN is available

since VMS 5.2,  so  you  cannot  use  this  utility  with  previous  VMS

versions.



If  a  disk's  error  count  is  >0,  FREE sounds a "beep" to notify the

problem (and, on DECCRT terminals only, error count  is  displayed  with

BLINK and BOLD enabled).



A  disk device is considered NOT AVAILABLE when its host is down, and/or

when its cluster size id 0.



To invoke FREE you must define a foreign command:



               $ FREE == "$disk:[directory]FREE"



You can then use any of these qualifiers:



       /FULL                  for a FULL mode display



       /OUT=filename          to control where the output of the com-

                              mand is sent.



       /ALL                   to obtain infos about not available

                              devices (by default, output is suppressed

                              for "not ready" devices)



       /NODFS                 FREE supports DFS-served devices (DFS is

                              DEC's "distributed file service"). You

                              can omit informations about all DFS

                              devices.



       /SUMM                  to obtain extra informations about TOTAL

                              free and allocated space. NB: these ad-

                              ditional informations DON'T INCLUDE data

                              of DFS devices.



You  can  use  ^Z,  ^C  or  ^Y  control  sequences  to  interrupt FREE's

execution. On "DECCRT" video terminals, ^O is  inhibited.  SMG  routines

are  invoked  in  interactive  mode only; also, they're NOT invoked when

running FREE from a _RT device (via DECnet "set host").



DFS   DEVICES:   FREE   recognizes   DFS-served   devices.  When  a  DFS

pseudo-device is found, only pertinent informations are shown; free/busy

space  count  is  always omitted; when in /FULL mode, note that: tracks,

sectors, cylinders, max_files and cluster_size informations are relative

to  the  WHOLE  remote  disk-device (a DFS pseudo-device can be a single

directory-tree!).



You can then use any of these qualifiers:



       /FULL                  for a FULL mode display



       /OUT=filename          to control where the output of the com-

                              mand is sent.



       /ALL                   to obtain infos about not available

                              devices (by default, output is suppressed