5.1 The vos library

Use the subject list in the previous page, or the quick alphabetic index here below to locate the routine of interest.

Note that the zc_* routines are C jacket routines in the lower layer, and will generally not exist for VMS. The code pointers will indicate the different versions for the various operating systems :

• Unix indicates a common version for all Unix and Linux flavours
• Linux indicates something specific of Linux (tested with the Intel compiler)
• DEC indicates a common version for Ultrix and Alpha (OSF1 aka DU aka Tru64)
• Ultrix indicates the Ultrix version
• OSF indicates the Alpha (OSF1 aka DU aka Tru64) version
• Sun indicates a common version for SunOS and Solaris on Suns
• SunOS indicates SunOS specific routines
• Solaris indicates Solaris specific routines
• HP-UX is supported via code produced at ITESRE, but not available to the author of this document, and therefore is not listed here (where different from the common Unix set)
• VMS indicates code tested and used under an old release of VAX VMS (there is no support to OpenVMS)

this first family is made almost exclusively of Fortran code, and represents the layer of routines callable by the user (except where otherwise stated)

• blkxrcommon

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	EXTERNAL BLKXRCOMMON

  This BLOCK DATA routine is implicitly called by x_read and defines in a COMMON block the information concerning the logical units associated to stdin, stdout and stderr, the largest logical unit number, and the FORMAT to be used for echoing a prompt.

  ---

• checkerr

  Library	vos	C code Unix
  Calling sequence	INTEGER ERRNO=CHECKERR()

  A debugging aid (unofficial) dto make the C errno available to Fortran programs.

  ---

• cpuclk

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL CPUCLK('START') CALL CPUCLK('any text')

  A debugging aid (unofficial) which prints the CPU time spent since last call i.e. during a phase of the program indicated by a label 'any text' (the routine must be initialized once by a START call)

  ---

• z_alloc

  Library	vos	Fortran code Unix [Linux] [VMS]
  Calling sequence	CALL Z_ALLOC(nelem,elsize,array,address,offset)
  Arguments	INTEGER	NELEM
  	INTEGER	ELSIZE
  	any	ARRAY
  	INTEGER	ADDRESS
  	INTEGER	OFFSET

  This routine is the dynamic memory allocation interface. One formally requests an extension of NELEM elements of size ELSIZE (in bytes, 1 for characters, 2 for INTEGER*2, 4 for INTEGER or REAL, 8 for DOUBLE PRECISION) to the ARRAY handle (it is usually enough to declare it ARRAY(1) in the caller). The routine returns the ADDRESS of the allocated area (which is unused except by the z_dealloc call, and the OFFSET (in units of ELSIZE) which allows to access the extension elements as ARRAY(i+OFFSET).
  On all operating systems it uses an underlying zc_alloc call to do the actual job.
  Note that addresses are assumed to be 32-bit quantities, hence on 64-bit systems like Alpha OSF all code must be compiled with the -taso (Truncated Address Space Option).
  
  See elsewhere for the idioms about usage of this routine.

  ---

• z_aux_envfile

  Library	vos	Fortran code Unix
  Calling sequence	CALL Z_AUX_ENVFILE(FILE)
  Arguments	CHARACTER*(*)	FILE

  This routine is not intended for public use and must no be called. It is used on Unix by the z_get_global and z_set_global calls (actually by z_initenv) to build the name of a file used to save a copy of the XAS environment.
  This is necessary only in Unix to allow back-inheritance (child to parent) of changes to the environment done by children processes.
  The name of the file (residing in the user home directory) is of the form ttypn_hostname.environment. The content of the file is not intended to survive a login session. If you wish to preserve the XAS environment of the last login session, do a touch of such file as first operation after login before issuing any XAS command.

  ---

• z_break

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	IF( Z_BREAK() )THEN ...

  This logical function allows to detect if an interrupt of the current program has been requested (pressing the control-C key) and allows the program to jump to a dedicated piece of code (usually intended as a "gracious" way of interrupting prematurely a long loop).

  The Unix version uses signal handling via zc_break while the VMS version handles an AST internally.

  ---

• z_channel

  This routine is used to manage communication channels and has two entry points.

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_CHANNEL(pipename,myop)
  Arguments	CHARACTER*(*)	PIPENAME
  	CHARACTER*(*)	MYOP ('CREATE'|'TEST'|'DELETE')

  The generic call above allows to perform on the named channel PIPENAME the operation specified by MYOP :

  • 'CREATE' : creation of the channel
  • 'TEST' : testing channel existence
  • 'DELETE' : deleting the channel
  In Unix communication channels are named pipes on /tmp created by zc_mknod, tested and deleted as normal files (using zc_stat and z_delete_file).
  In VMS communication channels are mailboxes in the job table created and tested via system services and automatically deleted when unused.
  

  Calling sequence	CALL Z_CHANNEL_OPEN(lu,pipename,'OPEN')
  Arguments	INTEGER	LU

  The open entry point above allows to perform on the named channel PIPENAME the opening operation MYOP='OPEN' which connects the channel to the Fortran logical unit LU.
  For all operating systems opening is dealt with by z_open_stream

  ---

• z_close_stream

  Library	vos	Fortran code Unix [Sun, HP-UX] [VMS]
  Calling sequence	CALL Z_CLOSE_STREAM(lu)
  Arguments	INTEGER	LU

  Closes a stream communication channel on logical unit LU. According to OS, it is either just a wrapper to a Fortran CLOSE or to the zc_fclose C jacket routine. See z_open_stream for details.

  ---

• z_dealloc

  Library	vos	Fortran code Unix [Linux] [VMS]
  Calling sequence	CALL Z_DEALLOC(address)
  Arguments	INTEGER	ADDRESS

  Deallocates the memory block at ADDRESS allocated by z_alloc. Used seldom (memory is deallocated anyhow at exit) unless one wants to reallocate with a different size.
  On all operating systems it uses an underlying call to zc_free do the actual job, except on Linux where it calls zc_alloc with the extra last argument set to 1.

  ---

• z_delete_file

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	Z_DELETE_FILE(vosname)
  Arguments	CHARACTER*(*)	VOSNAME

  Deletes a file with VOS file name VOSNAME using a call to zc_unlink(Unix) or a library function (VMS)

  ---

• z_dieee_to_vms

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_DIEEE_TO_VMS(DATA,N)
  Arguments	DOUBLE PRECISION	DATA(N)
  	INTEGER	N

  Category: data type conversion
  Converts an array DATA of N double precision values from IEEE format to VMS D-format. On Unix is not implemented (no-op), on VMS calls the NOAO assembler routines IEEUPD or IEEVUD.

  ---

• z_dvms_to_ieee

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_DVMS_TO_IEEE(DATA,N)
  Arguments	DOUBLE PRECISION	DATA(N)
  	INTEGER	N

  Category: data type conversion
  Converts an array DATA of N double precision values from VMS D-format to IEEE format. On VMS is not implemented (no-op), on Unix is currently not implemented (but should be ! see ideas in the code !).

  ---

• z_exit

  Library	vos	Fortran code Unix [Sun] [VMS]
  Calling sequence	CALL Z_EXIT(RETCODE)
  Arguments	INTEGER	RETCODE

  Replacement for Fortran statement STOP retcode, used to terminate a program passing back a return code or status code (use RETCODE=0 for normal termination, use a positive return code for errors, use a negative retcode only for graphics servers for which saving the environment to disk is not desired).

  VMS version just handles appropriately the return code, while the Unix version actually passes control to (z_runs) an auxiliary C program savenv which saves the XAS environment to disk (via z_aux_envfile).
  There is a difference among Unix flavours concerning the fact whether logical units must be closed unconditionally or only if open, and whether stdin, stdout, stderr must be closed. On Sun this might interfere with i/o redirection.

  ---

• z_fullname

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_FULLNAME(USER,FULL)
  Arguments	CHARACTER*(*)	USER
  	CHARACTER*(*)	FULL

  Category: Query calls
  This routine returns the full user name (GECOS field) FULL given the account username USER. Uses zc_pwnam in Unix and system services in VMS.

  ---

• z_get_command

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_GET_COMMAND(runstring)
  Arguments	CHARACTER*(*)	RUNSTRING

  Category: User interface
  Returns the entire RUNSTRING used to invoke the program. In Unix this is done by repeating IARGC() calls to GETARG and reassembling invidual arguments together. in VMS a single LIB$GETFOREIGN call suffices (the run string is then massaged a bit).

  ---

• z_get_global

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_GET_GLOBAL(NAME,VALUE)
  Arguments	CHARACTER*(*)	NAME
  	CHARACTER*(*)	VALUE

  Category: Environment access
  Returns the VALUE of the XAS environment variable of given NAME (if missing, tries a system environment variable of same name, and if missing returns a blank string).
  The VMS version uses global symbols, while the Unix version uses environment variables (however initialized from a disk saved environment via z_initenv

  ---

• z_hostname

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_HOSTNAME(HOST,DOMAIN)
  Arguments	CHARACTER*(*)	HOST
  	CHARACTER*(*)	DOMAIN

  Category: Query calls
  This routine returns the current hostname HOST and also the Internet domain name DOMAIN. Uses zc_gethostname and zc_getdomainname in Unix while in VMS accesses UCX logicals or, if undefined, gets the SYS$NODE logical and assigns .decnet as domain.

  ---

• z_ieee_to_vms

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_IEEE_TO_VMS(DATA,N)
  Arguments	REAL	DATA(N)
  	INTEGER	N

  Category: data type conversion
  Converts an array DATA of N REAL values from IEEE format to VMS format. On Unix is not implemented (no-op), on VMS calls the NOAO assembler routines IEEUPR or IEEVUR.

  ---

• z_initenv

  Library	vos	Fortran code Unix
  Calling sequence	CALL Z_INITENV

  This routine is not intended for public use and must no be called. It is used on Unix by the z_get_global and z_set_global calls. It builds the name of a file used to save a copy of the XAS environment via z_aux_envfile, then, if the file is older than the beginning of the current login session, deletes it and creates an empty one, otherwise it restores the current process environment from the list of variables stored in the disk file. The above operations are done only in the first call in a given program
  This is necessary only in Unix to allow back-inheritance (child to parent) of changes to the environment done by children processes.

  This routine contains imbedded system-dependent code to handle the different Fortran conventions about record lengths in file opening (this is the only routine which must use a Fortran OPEN instead of a call to z_open

  ---

• z_inquire

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_INQUIRE(vosname,query,return,creturn)
  Arguments	CHARACTER*(*)	VOSNAME
  	CHARACTER*(*)	QUERY
  	INTEGER or LOGICAL	RETURN
  	CHARACTER*(*)	CRETURN

  Replacement for the Fortran INQUIRE statement. Issues a query about a file with VOS file name VOSNAME and returns the appropriate value. Types of QUERY are :
  • 'EXIST' tests file existence and returns a LOGICAL value in RETURN
  • 'RECL' returns an INTEGER value in RETURN, the record length in bytes. For unopened file this information is unavailable in Unix, however for XAS files it can be derived from the mini-header, while for other files is emulated asking the user. The information is native in VMS.
  • 'OPENED' tests if file is open and returns a LOGICAL value in RETURN
  • 'PROTECT' returns in CRETURN the file protections in the form 'RWXRWXRWX' (user, group and other, ignore VMS system protection) or e.g. 'RWXR--R--' where a dash indicates a protection is unset.
  • 'CDATE' returns the creation date in RETURN as an Unix time
  • 'MDATE' returns the modification date in RETURN as an Unix time
  • 'SIZE' returns an INTEGER value in RETURN, the file size in bytes
  The Unix version uses in general the zc_stat call to get information, while the VMS version either "normalizes" the output of an INQUIRE statement or uses auxiliary RMS calls.

  ---

• z_logintime

  Library	vos	Fortran code [Linux] [Alpha] [Ultrix] [SunOS] [Solaris] [VMS]
  Calling sequence	CALL Z_LOGINTIME(TIME)
  Arguments	INTEGER	TIME

  Category: Query calls
  This routine returns the Unix TIME of the beginning of the current login session. This information for Unix is read in Fortran from /etc/utmp (however each Unix flavour has itw own peculiarities about such file), while for VMS is obtained via a system service.

  ---

• z_op_sys

  Library	vos	Fortran code [Linux] [Alpha] [Ultrix] [SunOS] [Solaris] [VMS]
  Calling sequence	CALL Z_OP_SYS(system)
  Arguments	CHARACTER*3	SYSTEM

  Category: Query calls
  This routine returns an hardwired three-character code SYSTEM identifying the operating system. By definition a different version of this routine is necessary for each operating system.

  ---

• z_open

  Library	vos	Fortran code Unix [Sun] [VMS]
  Calling sequence	CALL Z_OPEN(lu,vosname,access,status,recl)
  Arguments	INTEGER	LU
  	CHARACTER*(*)	VOSNAME
  	CHARACTER	ACCESS ('Seq'|'Dir')
  	CHARACTER*2	STATUS ('New'|'OLd'|'Unknown'|'OVerwrite',|'Append')
  	INTEGER	RECL

  This routine is the replacement for the Fortran OPEN statement and associates a file with VOS file name VOSNAME with the logical unit LU.

  Only two types of ACCESS are supported : sequential on formatted files and direct on binary files (in the latter case a record length (in byte for all systems) RECL must be supplied, use 0 for sequential files), specified by a (at least one-letter) code.

  The opening STATUS is normalized as follows for all systems :

  • an 'OLD' file shall exist already
  • a 'NEW' file shall not exist already
  • an 'OVERWRITE' file will be deleted and recreated as new
  • an 'UNKNOWN' file covers any other case
  • opening for 'APPEND' is foreseen but not implemented

  The routine is written entirely in Fortran (does not call any underlying routine) and takes care of system-dependent peculiarities, like : for Unix (except Sun) and VMS systems, the fact the record length in OPEN statements are in longwords (4 bytes) ; for DEC and VMS systems opening unwritable files in the allowed READONLY mode ; for VMS systems comparing the uer supplied record length with the one native of the system ; for VMS new sequential files, forcing them to STREAM_LF format.

  ---

• z_open_stream

  Library	vos	Fortran code Unix [Sun, HP] [VMS]
  Calling sequence	CALL Z_OPEN_STREAM(lu,pipename,access,status)
  Arguments	INTEGER	LU
  	CHARACTER*(*)	PIPENAME
  	CHARACTER	ACCESS ('Binary'| 'Pipe'| 'Text')
  	CHARACTER*2	STATUS ('New'| 'OLd'| 'Unknown'| 'OVerwrite',| 'Append')

  Opens a stream communication channel on logical unit LU. The channel name PIPENAME is passed by z_channel_open, which is the only publicly supported way to call this routine using ACCESS='Pipe' and STATUS='OLd'

  The remaining values of ACCESS and STATUS (mimicked on z_open) are presently not supported by the basic version of this routine (like the Unix bases or VMS versions), which use plain Fortran sequential unformatted i/o (this is the only case in which this inherently unportable i/o is used, since no disk files are created (no exchange of data across machines), but just inter-process communication on the same machine.
  The Sun and HP version, where Fortran sequential unformatted i/o cannot be used, is based on a wrapper zc_fopen to C stream i/o. This can in principle support also disk files but this is not used nor supported in any XAS program.

  ---

• z_print_file

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_PRINT_FILE(file)

  This private routine is not part of XAS but has been used by other programs using the VOS library to programmatically print a file in a site dependent way.

  ---

• z_read_stream

  Library	vos	Fortran code Unix [Sun, HP] [VMS]
  Calling sequence	CALL Z_READ_STREAM(lu,buffer,recl)
  Arguments	INTEGER	LU
  	CHARACTER*(RECL)	BUFFER
  	INTEGER	RECL

  This routine performs input on the communication channel opened on logical unit LU, namely reads a byte BUFFER of RECL bytes.
  As explained for z_open_stream the basic implementation of channel input uses Fortran unformatted READ. On those Unix systems where this is not possible, C stream i/o via zc_fread is used.

  ---

• z_rename_file

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL SUBROUTINE Z_RENAME_FILE(vosnameold,vosnamenew)
  Arguments	CHARACTER*(*)	VOSNAMEOLD, VOSNAMENEW

  This routine performs programmatically renaming of files using VOS file names VOSNAMEOLD and VOSNAMENEW. In Unix it calls zc_rename, and in VMS a system library call.

  ---

• z_run

  A family of three routines dealing with process scheduling and control.

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_RUN(PROGRAMSTRING)
  Arguments	CHARACTER*(*)	PROGRAMSTRING

  This routine overlays the current process with (passes control to) a new command (this implicilty terminates the current program, the new one continues in the same process space). PROGRAMSTRING can be another program or a shell script, followed by a list of arguments. Typically used by dispatchers, or multi-stage processes.
  It is invoked in Unix via zc_execvp and in VMS via LIB$DO_COMMAND.

• z_schedule

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_SCHEDULE(PROGRAM,RETCODE)
  Arguments	CHARACTER*(*)	PROGRAMSTRING
  	INTEGER	RETCODE

  This routine schedules another process with wait (returns when finished with the status return code RETCODE of the child). PROGRAM can be another program or a shell script, followed by a list of arguments. Currently not used by any XAS program
  It is invoked in Unix via zc_system and in VMS via a system process creation call.

• z_spawn

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_SPAWN(PROGRAM)
  Arguments	CHARACTER*(*)	PROGRAM

  This routine schedules another process without wait (in background). PROGRAM can be another program (or perhaps a shell script), followed by a list of arguments. Typically used to start a (graphics) server.
  It is invoked in Unix via zc_fork and in VMS via LIB$SPAWN.

  ---

• z_seek_stream

  Library	vos	Fortran code Unix
  Calling sequence	CALL Z_SEEK_STREAM(lu,n,recl)

  This routine is not supported nor used by any XAS program. It can be used in conjunction with the C variant of the communication channel stream i/o (explained with z_open_stream) to support random access to stream disk files (using zc_fseek).

  ---

• z_set_global

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_SET_GLOBAL(NAME,VALUE)
  Arguments	CHARACTER*(*)	NAME
  	CHARACTER*(*)	VALUE

  Category: Environment access
  Sets the VALUE of the XAS environment variable of given NAME (use a blank VALUE=' ' to effectively delete the variable).
  The VMS version uses global symbols, while the Unix version uses environment variables (however initialized from a disk saved environment via z_initenv

  ---

• z_sys_name

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_SYS_NAME(VOSNAME,SYSNAME)
  Arguments	CHARACTER*(*)	VOSNAME
  	CHARACTER*(*)	SYSNAME

  This routine is not normally called publicly, but is called by any routine operating on files to convert a VOS file name VOSNAME to a system dependent filename SYSNAME to be passed to lower level calls.
  A VOS file name is system independent, and assumes one of the following forms (most of them are Unix resemblant, but all work on all systems) :
  • ~/dir/dir/file.typ
    expanded as $HOME/dir/dir/file.typ (in VMS $HOME is equated to logical SYS$LOGIN)
  • $VARIABLE/dir/dir/file.typ :
    the XAS or system environment variable is resolved by z_get_global before proceeding to further expansion
  • -/dir --/dir ---/dir
    expanded as ../dir ../../dir ../../../dir
  • /DIR/dir/dir/file.typ
    interpreted as in Unix (in VMS this includes recognizing whether the first /DIR is a logical device name)
  • ./dir/dir/dir/file.typ
    interpreted as in Unix

  ---

• z_syserror

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	IF (Z_SYSERROR (ierr,ivoserr,isyserr)) THEN ...
  Arguments	INTEGER	IERR
  	INTEGER	IVOSERR
  	INTEGER	ISYSERR

  This logical function shall be called after each Fortran (i/o) statement which returns a status code IERR, and should take care to convert it to a standard VOS error code. VOS error codes can be looked at in the error code listings (but at present all Fortran errors are converted to a single VE_FORIOERR code).
  It is used to branch to an error message or handler in case of error (returns .TRUE. if error occurred). It also returns the standard (VOS) error code IVOSERR and the corresponding system-dependent code ISYSERR.
  

  ---

• z_tape_open

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_TAPE_OPEN(TAPE,IERR)

  This private routine is not part of XAS but has been used by other programs using the VOS library to programmatically handle tapes in a site dependent way.

  ---

• z_terminal

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_TERMINAL(ROWS,COLUMNS)
  Arguments	INTEGER	ROWS,COLUMNS

  Category: Query calls
  This routine returns the number of ROWS and COLUMNS for the current terminal device. Uses zc_terminal in Unix and LIB$GETDVI in VMS.

  ---

• z_ttyname

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_TTYNAME(TTY)
  Arguments	CHARACTER*(*)	TTY

  Category: Query calls
  This routine returns the identifier of the current terminal TTY. Uses zc_ttyname in Unix (stripping the /dev/ prefix) and LIB$GETJPI in VMS.

  ---

• z_username

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_USERNAME(USER)
  Arguments	CHARACTER*(*)	USER

  Category: Query calls
  This routine returns the current account name USER. Uses zc_cuserid in Unix and LIB$GETJPI in VMS.

  ---

• z_vms_to_ieee

  Library	vos	Fortran code Unix [VMS]
  Calling sequence	CALL Z_VMS_TO_IEEE(DATA,N)
  Arguments	REAL	DATA(N)
  	INTEGER	N

  Category: data type conversion
  Converts an array DATA of N REAL values from VMS format to IEEE format. On VMS is not implemented (no-op), on Unix it does trivial byte handling. Note that this routine converts big endian IEEE floating point (i.e. Sun, HP-UX), for little endian IEEE (i.e. DEC) a previous call to swapi4 is necessary care of the caller.

  ---

• z_write_stream

  Library	vos	Fortran code Unix [Sun, HP] [VMS]
  Calling sequence	CALL Z_WRITE_STREAM(lu,buffer,recl)
  Arguments	INTEGER	LU
  	CHARACTER*(RECL)	BUFFER
  	INTEGER	RECL

  This routine performs output on the communication channel opened on logical unit LU, namely writes a byte BUFFER of RECL bytes.
  As explained for z_open_stream the basic implementation of channel input uses Fortran unformatted WRITE. On those Unix systems where this is not possible, C stream i/o via zc_fwrite is used.

  ---

  this second family is made mainly of C code, and represents a layer of routines not intended to be called by the user (except where otherwise stated)

  They are usually defined only for the various Unix flavours (VMS, except where stated, has routines directly callable by Fortran) as C jacket calls to system libraries (often not directly Fortran callable because of the underscore convention used by the loader, or inconveniently called because of awkward argument types).

• zc_alloc

  Library	vos	C codeUnix [Linux] [VMS]
  Calling sequence	IERR=ZC_ALLOC(nelem,elsize,array,address,offset [,mode])

  Back end of z_alloc, jacket to calloc. On Linux it is also back end to z_dealloc, jacket to free. This is supported by the extra argument mode (0 allocates, 1 deallocates), present only on Linux.

  ---

• zc_break

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_BREAK(1,Z_AUX_INTERRUPT_HANDLER)

  Back end of z_break, jacket to signal, enables the Z_AUX_INTERRUPT_HANDLER defined in z_break.

  ---

• zc_cuserid

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_CUSERID(name,length)

  Back end of z_username, jacket to cuserid.

  ---

• zc_dtime

  Library	vos	C codeUnix [Ultrix, HP]
  Calling sequence	DOUBLE TIME=DTIME(TIMES)
  Arguments	REAL	TIMES(2)

  Back end of cpuclk, jacket to times.

  ---

• zc_execvp

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_EXECVP(command,runstring)

  Back end of z_run, jacket to execvp, inclusive of extensive reparsing of the runstring parameters.

  ---

• zc_fclose

  Library	vos	C codeUnix [Sun,HP]
  Calling sequence	unsupported

  Back end of z_close_stream, is dummy on systems using Fortran unformatted stream i/o, while the the Sun-HP variant used to support stream i/o in C is not officially supported.

  ---

• zc_fopen

  Library	vos	C codeUnix [Sun]
  Calling sequence	unsupported

  Back end of z_open_stream, is dummy on systems using Fortran unformatted stream i/o, while the the Sun-HP variant used to support stream i/o in C is not officially supported.

  ---

• zc_fork

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_FORK(command,runstring)

  Back end of z_spawn, jacket to fork and execvp, inclusive of extensive reparsing of the runstring parameters.

  ---

• zc_fread

  Library	vos	C codeUnix [Sun, HP]
  Calling sequence	unsupported

  Back end of z_read_stream, is dummy on systems using Fortran unformatted stream i/o, while the the Sun-HP variant used to support stream i/o in C is not officially supported.

  ---

• zc_free

  Library	vos	C codeUnix [Linux] [VMS]
  Calling sequence	IERR=ZC_FREE(address)

  Back end of z_dealloc, jacket to free. On Linux it is unused (untested ?) since free is jacketed in zc_alloc

  ---

• zc_fseek

  Library	vos	C codeUnix [Solaris]
  Calling sequence	unsupported

  Back end of z_seek_stream, is not officially supported.

  ---

• zc_fwrite

  Library	vos	C codeUnix [Sun, HP]
  Calling sequence	unsupported

  Back end of z_write_stream, is dummy on systems using Fortran unformatted stream i/o, while the the Sun-HP variant used to support stream i/o in C is not officially supported.

  ---

• zc_getdomainname

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_GETDOMAINNAME(name,length)

  One of the back ends of z_hostname, jacket to getdomainname

  ---

• zc_getenv

  Library	vos	C codeUnix [Solaris]
  Calling sequence	IERR=ZC_GETENV(variable,value)

  Back end of z_get_global, jacket to getenv

  ---

• zc_gethostname

  Library	vos	C codeUnix [Solaris]
  Calling sequence	IERR=ZC_GETHOSTNAME(name,length)

  One of the back ends of z_hostname, jacket to gethostname (or uname for Solaris)

  ---

• zc_memcpy

  Library	vos	C codeUnix [VMS]
  Calling sequence	CALL ZC_MEMCPY(BUFIN,BUFOUT,LOC,NBYTE)
  Arguments	any	BUFIN
  	any	BUFOUT
  	INTEGER	LOC
  	INTEGER	MBYTE

  Copies MBYTE bytes from the input area BUFIN to location BUFOUT(LOC:) (using a character notation). This routine is currently used for (also misaligned) memory copies by read_bin and by write_bin
  It is a jacket to memcpy.

  ---

• zc_mknod

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_MKNOD(path)

  Back end of z_channel, jacket to mknod

  ---

• zc_putenv

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_PUTENV(variable,value)

  Back end of z_set_global, jacket to putenv

  ---

• zc_pwnam

  Library	vos	C codeUnix [Solaris]
  Calling sequence

  Back end of z_fullname, jacket to getpwnam

  ---

• zc_rename

  Library	vos	C codeUnix [Solaris]
  Calling sequence	IERR=ZC_RENAME(oldpath,newpath)

  Back end of z_rename_file, jacket to rename

  ---

• zc_stat

  Library	vos	C codeUnix [Sun,Ultrix]
  Calling sequence	IERR = ZC_STAT(file,buffer)

  Back end of z_inquire (and others), jacket to stat

  ---

• zc_system

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_SYSTEM(command,runstring)

  Back end of z_schedule, jacket to fork, execvp and signal. The code has been derived by (and is closely resemblant to) a Sun listing of the system call, except that it runs a command directly, without any intermediate shell.

  ---

• zc_terminal

  Library	vos	C codeUnix [Solaris]
  Calling sequence	IERR=ZC_TERMINAL(ROWS,COLUMNS)

  Back end of z_terminal, jacket to isatty and an ioctl

  ---

• zc_time

  Library	vos	C codeUnix [Solaris] [VMS]
  Calling sequence	INTEGER TIME=ZC_TIME()

  Callable directly by Fortran, returns the current system TIME as an Unix time.
  The Unix version is a C jacket to time, while the VMS version is written in Fortran and uses SYS$GETTIM and SYS$NUMTIM.

  ---

• zc_ttyname

  Library	vos	C codeUnix [Solaris]
  Calling sequence	IERR=ZC_TTYNAME(name,length)

  Back end of z_ttyname, jacket to ttyname

  ---

• zc_unlink

  Library	vos	C codeUnix
  Calling sequence	IERR=ZC_UNLINK(path)

  Back end of z_delete_file, jacket to unlink

[Previous][Next] [Up][Down]