# 2.11BSD#431 - /usr/src/usr.lib/libI77/fio.h

##### Macros

    GET               X
    LOCAL             X
    MAXINTLENGTH      X
    PUT               X
    VAL               X
    err               X
    lcase             X
    not_legal         X

       1: /*
       2:  * Copyright (c) 1980 Regents of the University of California.
       3:  * All rights reserved.  The Berkeley software License Agreement
       4:  * specifies the terms and conditions for redistribution.
       5:  *
       6:  *	@(#)fio.h	5.1.1 (2.11BSD) 1999/10/24
       7:  */
       8:
       9: /*
      10:  * f77 file i/o common definitions
      11:  */
      12:
      13: #include "fiodefs.h"
      14:
      15: #define LOCAL       static
      16: #define err(f,n,s)  {if(f) return(errno=n); else fatal(n,s);}
      17: #define not_legal(u)    (u>=MXUNIT || u<0)
      18: #define GET(x)      if((x=(*getn)())<0) return(x)
      19: #define VAL(x)      (x!='\n'?x:' ')
      20: #define PUT(x)      {if(n=(*putn)(x)) return(n);}
      21: #define lcase(s)    ((s >= 'A') && (s <= 'Z') ? s+('a'-'A') : s)
      22:
      23: #define MAXINTLENGTH    32  /* to accomodate binary format */
      24:
      25: extern ioflag init;
      26: extern flag reading,external,sequential,formatted;
      27: extern int (*getn)(),(*putn)(),(*ungetn)(); /*for formatted io*/
      28: extern FILE *cf;    /*current file structure*/
      29: extern unit *curunit;   /*current unit structure */
      30: extern int lunit;   /*current logical unit*/
      31: extern char *lfname;    /*current filename*/
      32: extern unit units[];    /*logical units table*/
      33: extern int recpos;      /*position in current record*/
      34: extern ftnint recnum;       /*current record number*/
      35: extern int reclen;      /* current record length */
      36: extern int (*doed)(), (*doned)();
      37: extern int (*dorevert)(), (*donewrec)(), (*doend)(), (*dotab)();
      38: extern ioflag cblank, cplus, tab, elist, signit, errflag, endflag;
      39: extern char *fmtbuf, *icptr, *icend, *fmtptr;
      40: extern int scale;
      41: extern int cursor;
      42: extern int radix;
      43: extern struct ioiflg    ioiflg_;

#### Defined macros

GET defined in line 18; used 5 times

- in /usr/src/usr.lib/libI77/rdfmt.c line 286-288(2), 295, 311, 331

LOCAL defined in line 15; used 115 times

- in /usr/src/usr.lib/libI77/c_iio.c line 16-17(2), 78
- in /usr/src/usr.lib/libI77/dofio.c line 20-21(2), 35-36(2), 156
- in /usr/src/usr.lib/libI77/douio.c line 15-18(3), 49
- in /usr/src/usr.lib/libI77/due.c line 15-16(2), 37
- in /usr/src/usr.lib/libI77/err.c line 97, 114, 125, 149
- in /usr/src/usr.lib/libI77/fmt.c line 32-34(2), 71, 90, 110, 129, 218, 326, 348, 366
- in /usr/src/usr.lib/libI77/lread.c line 31-37(5), 68, 175, 194, 213, 278, 295, 314, 348, 405, 422
- in /usr/src/usr.lib/libI77/lwrite.c line 17, 35, 110, 120, 127, 146, 166, 186, 200, 214
- in /usr/src/usr.lib/libI77/open.c line 25-26(2), 192, 210, 226, 233
- in /usr/src/usr.lib/libI77/rdfe.c line 18, 42, 78
- in /usr/src/usr.lib/libI77/rdfmt.c line 94, 103, 146, 164, 281, 304, 320
- in /usr/src/usr.lib/libI77/rfi.c line 18
- in /usr/src/usr.lib/libI77/rsfe.c line 18, 37, 51
- in /usr/src/usr.lib/libI77/rsnmle.c line 18-22(3), 43-48(4), 145, 223, 250, 272, 299, 405, 424, 487, 504, 526, 574
- in /usr/src/usr.lib/libI77/sue.c line 16-18(3), 49
- in /usr/src/usr.lib/libI77/util.c line 27
- in /usr/src/usr.lib/libI77/wdfe.c line 18, 43, 51
- in /usr/src/usr.lib/libI77/wfi.c line 18
- in /usr/src/usr.lib/libI77/wrtfmt.c line 87, 96, 127, 142, 163, 247
- in /usr/src/usr.lib/libI77/wsfe.c line 15-19(2), 42, 51, 69, 76
- in /usr/src/usr.lib/libI77/wsnmle.c line 19, 79

MAXINTLENGTH defined in line 23; used 3 times

- in /usr/src/usr.lib/libI77/fmtlib.c line 18, 29, 95

PUT defined in line 20; used 79 times

- in /usr/src/usr.lib/libI77/lwrite.c line 46, 60, 116, 133-141(6), 190-196(5), 204-210(5), 218
- in /usr/src/usr.lib/libI77/wrtfmt.c line 92, 105, 112, 119-123(5), 135-136(2), 147, 153-159(3), 168-171(2), 186-191(3), 206-219(8), 225-228(3), 234-243(6), 263, 289-302(11)
- in /usr/src/usr.lib/libI77/wsnmle.c line 42-45(4), 55-58(4), 72-75(3)

VAL defined in line 19; used 2 times

- in /usr/src/usr.lib/libI77/rdfmt.c line 289, 296

err defined in line 16; used 93 times

- in /usr/src/usr.lib/libI77/backspace.c line 30, 42
- in /usr/src/usr.lib/libI77/c_dfe.c line 29-37(4), 65
- in /usr/src/usr.lib/libI77/c_iio.c line 54-61(3), 73
- in /usr/src/usr.lib/libI77/c_sfe.c line 27-34(3)
- in /usr/src/usr.lib/libI77/close.c line 31, 84-86(2)
- in /usr/src/usr.lib/libI77/dofio.c line 16
- in /usr/src/usr.lib/libI77/dolio.c line 25-28(2), 34-35(2)
- in /usr/src/usr.lib/libI77/douio.c line 27, 54, 68-71(2)
- in /usr/src/usr.lib/libI77/due.c line 23, 33, 48-56(4)
- in /usr/src/usr.lib/libI77/endfile.c line 28-31(2)
- in /usr/src/usr.lib/libI77/lread.c line 64, 95, 129-134(3), 301, 309, 339, 369, 380
- in /usr/src/usr.lib/libI77/lwrite.c line 31, 106
- in /usr/src/usr.lib/libI77/open.c line 42, 50, 70, 92-97(3), 107, 117-121(3), 134, 162
- in /usr/src/usr.lib/libI77/rdfe.c line 25, 31, 58
- in /usr/src/usr.lib/libI77/rewind.c line 26-30(2)
- in /usr/src/usr.lib/libI77/rfi.c line 36, 47
- in /usr/src/usr.lib/libI77/rsfe.c line 25-26(2), 32
- in /usr/src/usr.lib/libI77/rsnmle.c line 75, 137-140(2), 508, 521, 561
- in /usr/src/usr.lib/libI77/sue.c line 25-33(3), 41, 59-68(5)
- in /usr/src/usr.lib/libI77/wdfe.c line 26, 32, 46
- in /usr/src/usr.lib/libI77/wfi.c line 36, 47
- in /usr/src/usr.lib/libI77/wsfe.c line 26-27(2), 37
- in /usr/src/usr.lib/libI77/wsnmle.c line 38, 69

lcase defined in line 21; used 8 times

- in /usr/src/usr.lib/libI77/close.c line 35
- in /usr/src/usr.lib/libI77/open.c line 44, 80-82(2), 128-138(3), 145

not_legal defined in line 17; used 12 times

- in /usr/src/usr.lib/libI77/backspace.c line 29
- in /usr/src/usr.lib/libI77/c_dfe.c line 29
- in /usr/src/usr.lib/libI77/c_sfe.c line 27
- in /usr/src/usr.lib/libI77/close.c line 29
- in /usr/src/usr.lib/libI77/dolio.c line 25
- in /usr/src/usr.lib/libI77/due.c line 48
- in /usr/src/usr.lib/libI77/endfile.c line 27
- in /usr/src/usr.lib/libI77/err.c line 168
- in /usr/src/usr.lib/libI77/inquire.c line 46
- in /usr/src/usr.lib/libI77/open.c line 42
- in /usr/src/usr.lib/libI77/rewind.c line 26
- in /usr/src/usr.lib/libI77/sue.c line 59

#### Usage of this include

fio.h used 33 times

- in /usr/src/usr.lib/libI77/backspace.c line 13
- in /usr/src/usr.lib/libI77/c_dfe.c line 13
- in /usr/src/usr.lib/libI77/c_iio.c line 13
- in /usr/src/usr.lib/libI77/c_sfe.c line 13
- in /usr/src/usr.lib/libI77/close.c line 15
- in /usr/src/usr.lib/libI77/dofio.c line 13
- in /usr/src/usr.lib/libI77/dolio.c line 13
- in /usr/src/usr.lib/libI77/douio.c line 13
- in /usr/src/usr.lib/libI77/due.c line 13
- in /usr/src/usr.lib/libI77/endfile.c line 13
- in /usr/src/usr.lib/libI77/err.c line 17
- in /usr/src/usr.lib/libI77/f77_abort.c line 15
- in /usr/src/usr.lib/libI77/fmt.c line 13
- in /usr/src/usr.lib/libI77/fmtlib.c line 15
- in /usr/src/usr.lib/libI77/inquire.c line 13
- in /usr/src/usr.lib/libI77/lread.c line 13
- in /usr/src/usr.lib/libI77/lwrite.c line 13
- in /usr/src/usr.lib/libI77/open.c line 16
- in /usr/src/usr.lib/libI77/rdfe.c line 13
- in /usr/src/usr.lib/libI77/rdfmt.c line 13
- in /usr/src/usr.lib/libI77/rewind.c line 13
- in /usr/src/usr.lib/libI77/rfi.c line 13
- in /usr/src/usr.lib/libI77/rsfe.c line 13
- in /usr/src/usr.lib/libI77/rsli.c line 13
- in /usr/src/usr.lib/libI77/rsnmle.c line 13
- in /usr/src/usr.lib/libI77/sue.c line 13
- in /usr/src/usr.lib/libI77/util.c line 13
- in /usr/src/usr.lib/libI77/wdfe.c line 13
- in /usr/src/usr.lib/libI77/wfi.c line 13
- in /usr/src/usr.lib/libI77/wrtfmt.c line 13
- in /usr/src/usr.lib/libI77/wsfe.c line 13
- in /usr/src/usr.lib/libI77/wsli.c line 13
- in /usr/src/usr.lib/libI77/wsnmle.c line 13

Last modified: 1999-10-24 Generated: 2016-12-26 | Generated by src2html V0.67 page hit count: 622 |