ioinit(3f) [bsd man page]
IOINIT(3F) IOINIT(3F) NAME
ioinit - change f77 I/O initialization SYNOPSIS
logical function ioinit (cctl, bzro, apnd, prefix, vrbose) logical cctl, bzro, apnd, vrbose character*(*) prefix DESCRIPTION
This routine will initialize several global parameters in the f77 I/O system, and attach externally defined files to logical units at run time. The effect of the flag arguments applies to logical units opened after ioinit is called. The exception is the preassigned units, 5 and 6, to which cctl and bzro will apply at any time. Ioinit is written in Fortran-77. By default, carriage control is not recognized on any logical unit. If cctl is .true. then carriage control will be recognized on format- ted output to all logical units except unit 0, the diagnostic channel. Otherwise the default will be restored. By default, trailing and embedded blanks in input data fields are ignored. If bzro is .true. then such blanks will be treated as zeros. Otherwise the default will be restored. By default, all files opened for sequential access are positioned at their beginning. It is sometimes necessary or convenient to open at the END-OF-FILE so that a write will append to the existing data. If apnd is .true. then files opened subsequently on any logical unit will be positioned at their end upon opening. A value of .false. will restore the default behavior. Ioinit may be used to associate file names with Fortran logical unit numbers through environment variables (see "Introduction to the f77 I/O Library" for a more general way of doing this). If the argument prefix is a non-blank string, then names of the form prefixNN will be sought in the program environment. The value associated with each such name found will be used to open logical unit NN for formatted sequential access. For example, if f77 program myprogram included the call call ioinit (.true., .false., .false., 'FORT', .false.) then when the following sequence % setenv FORT01 mydata % setenv FORT12 myresults % myprogram would result in logical unit 1 opened to file mydata and logical unit 12 opened to file myresults. Both files would be positioned at their beginning. Any formatted output would have column 1 removed and interpreted as carriage control. Embedded and trailing blanks would be ignored on input. If the argument vrbose is .true. then ioinit will report on its activity. The effect of call ioinit (.true., .true., .false., '', .false.) can be achieved without the actual call by including ``-lI66'' on the f77 command line. This gives carriage control on all logical units except 0, causes files to be opened at their beginning, and causes blanks to be interpreted as zero's. The internal flags are stored in a labeled common block with the following definition: integer*2 ieof, ictl, ibzr common /ioiflg/ ieof, ictl, ibzr FILES
/usr/lib/libI77.a f77 I/O library /usr/lib/libI66.a sets older fortran I/O modes SEE ALSO
getarg(3F), getenv(3F), ``Introduction to the f77 I/O Library'' BUGS
Prefix can be no longer than 30 characters. A pathname associated with an environment name can be no longer than 255 characters. The ``+'' carriage control does not work. 4.2 Berkeley Distribution May 27, 1986 IOINIT(3F)
Check Out this Related Man Page
INTRO(3F) INTRO(3F) NAME
intro - introduction to FORTRAN library functions DESCRIPTION
This section describes those functions that are in the Fortran run time library. The functions listed here provide an interface from f77 programs to the system in the same manner as the C library does for C programs. They are automatically loaded as needed by the Fortran compiler f77(1), except for the graphics interface routines. Those must be explicitly requested, see plot(3f). The math intrinsics required by the 1977 Fortran standard are available, although not described here. In addition, the abs, sqrt, exp, log, sin, and cos intrinsics have been extended for double complex values. They may be referenced using the generic names listed above, or they may be referenced using their specific names that consist of the generic names preceded by either cd or z. For example, if zz is dou- ble complex, then sqrt(zz), zsqrt(zz), or cdsqrt(zz) compute the square root of zz. The dcmplx intrinsic forms a double complex value from two double precision variables or expressions, and the name of the specific function for the conjugate of a double complex value is dconjg. Most of these functions are in libU77.a. Some are in libF77.a or libI77.a. A few intrinsic functions are described for the sake of com- pleteness. For efficiency, the SCCS ID strings are not normally included in the a.out file. To include them, simply declare external f77lid in any f77 module. LIST OF FUNCTIONS
Name Appears on Page Description abort abort.3f abnormal termination access access.3f determine accessibility of a file alarm alarm.3f execute a subroutine after a specified time and bit.3f bitwise and arc plot.3f f77 interface to plot(3x) bessel bessel.3f bessel functions of two kinds for integer orders box plot.3f f77 interface to plot(3x) chdir chdir.3f change default directory chmod chmod.3f change mode of a file circle plot.3f f77 interface to plot(3x) clospl plot.3f f77 interface to plot(3x) cont plot.3f f77 interface to plot(3x) ctime time.3f return system time dffrac flmin.3f return extreme values dflmax flmin.3f return extreme values dflmin flmin.3f return extreme values drand rand.3f return random values drandm random.3f better random number generator dtime etime.3f return elapsed execution time erase plot.3f f77 interface to plot(3x) etime etime.3f return elapsed execution time exit exit.3f terminate process with status falloc malloc.3f memory allocator fdate fdate.3f return date and time in an ASCII string ffrac flmin.3f return extreme values fgetc getc.3f get a character from a logical unit flmax flmin.3f return extreme values flmin flmin.3f return extreme values flush flush.3f flush output to a logical unit fork fork.3f create a copy of this process fpecnt trpfpe.3f trap and repair floating point faults fputc putc.3f write a character to a fortran logical unit free malloc.3f memory allocator fseek fseek.3f reposition a file on a logical unit fstat stat.3f get file status ftell fseek.3f reposition a file on a logical unit gerror perror.3f get system error messages getarg getarg.3f return command line arguments getc getc.3f get a character from a logical unit getcwd getcwd.3f get pathname of current working directory getenv getenv.3f get value of environment variables getgid getuid.3f get user or group ID of the caller getlog getlog.3f get user's login name getpid getpid.3f get process id getuid getuid.3f get user or group ID of the caller gmtime time.3f return system time hostnm hostnm.3f get name of current host iargc getarg.3f return command line arguments idate idate.3f return date or time in numerical form ierrno perror.3f get system error messages index index.3f tell about character objects inmax flmin.3f return extreme values ioinit ioinit.3f change f77 I/O initialization irand rand.3f return random values irandm random.3f better random number generator isatty ttynam.3f find name of a terminal port itime idate.3f return date or time in numerical form kill kill.3f send a signal to a process label plot.3f f77 interface to plot(3x) len index.3f tell about character objects line plot.3f f77 interface to plot(3x) linemd plot.3f f77 interface to plot(3x) link link.3f make a link to an existing file lnblnk index.3f tell about character objects loc loc.3f return the address of an object long long.3f integer object conversion lshift bit.3f left shift lstat stat.3f get file status ltime time.3f return system time malloc malloc.3f memory allocator move plot.3f f77 interface to plot(3x) not bit.3f bitwise complement openpl plot.3f f77 interface to plot(3x) or bit.3f bitwise or perror perror.3f get system error messages point plot.3f f77 interface to plot(3x) putc putc.3f write a character to a fortran logical unit qsort qsort.3f quick sort rand rand.3f return random values random random.3f better random number generator rename rename.3f rename a file rindex index.3f tell about character objects rshift bit.3f right shift short long.3f integer object conversion signal signal.3f change the action for a signal sleep sleep.3f suspend execution for an interval space plot.3f f77 interface to plot(3x) stat stat.3f get file status symlnk symlnk.3f make a symbolic link system system.3f execute a UNIX command tclose topen.3f f77 tape I/O time time.3f return system time topen topen.3f f77 tape I/O traper traper.3f trap arithmetic errors trapov trapov.3f trap and repair floating point overflow tread topen.3f f77 tape I/O trewin topen.3f f77 tape I/O trpfpe trpfpe.3f trap and repair floating point faults tskipf topen.3f f77 tape I/O tstate topen.3f f77 tape I/O ttynam ttynam.3f find name of a terminal port twrite topen.3f f77 tape I/O unlink unlink.3f remove a directory entry wait wait.3f wait for a process to terminate xor bit.3f bitwise exclusive or 4.2 Berkeley Distribution May 27, 1986 INTRO(3F)