~ubuntu-branches/ubuntu/trusty/libf2c2/trusty

« back to all changes in this revision

Viewing changes to libI77/fio.h

  • Committer: Bazaar Package Importer
  • Author(s): Alan Bain
  • Date: 2008-05-19 22:50:54 UTC
  • mfrom: (2.1.4 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080519225054-jlymia0wdvvfq7dg
Tags: 20061008-4
Remove CVS directory left in source package

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
#ifndef SYSDEP_H_INCLUDED
2
 
#include "sysdep1.h"
3
 
#endif
4
 
#include "stdio.h"
5
 
#include "errno.h"
6
 
#ifndef NULL
7
 
/* ANSI C */
8
 
#include "stddef.h"
9
 
#endif
10
 
 
11
 
#ifndef SEEK_SET
12
 
#define SEEK_SET 0
13
 
#define SEEK_CUR 1
14
 
#define SEEK_END 2
15
 
#endif
16
 
 
17
 
#ifndef FOPEN
18
 
#define FOPEN fopen
19
 
#endif
20
 
 
21
 
#ifndef FREOPEN
22
 
#define FREOPEN freopen
23
 
#endif
24
 
 
25
 
#ifndef FSEEK
26
 
#define FSEEK fseek
27
 
#endif
28
 
 
29
 
#ifndef FSTAT
30
 
#define FSTAT fstat
31
 
#endif
32
 
 
33
 
#ifndef FTELL
34
 
#define FTELL ftell
35
 
#endif
36
 
 
37
 
#ifndef OFF_T
38
 
#define OFF_T long
39
 
#endif
40
 
 
41
 
#ifndef STAT_ST
42
 
#define STAT_ST stat
43
 
#endif
44
 
 
45
 
#ifndef STAT
46
 
#define STAT stat
47
 
#endif
48
 
 
49
 
#ifdef MSDOS
50
 
#ifndef NON_UNIX_STDIO
51
 
#define NON_UNIX_STDIO
52
 
#endif
53
 
#endif
54
 
 
55
 
#ifdef UIOLEN_int
56
 
typedef int uiolen;
57
 
#else
58
 
typedef long uiolen;
59
 
#endif
60
 
 
61
 
/*units*/
62
 
typedef struct
63
 
{       FILE *ufd;      /*0=unconnected*/
64
 
        char *ufnm;
65
 
#ifndef MSDOS
66
 
        long uinode;
67
 
        int udev;
68
 
#endif
69
 
        int url;        /*0=sequential*/
70
 
        flag useek;     /*true=can backspace, use dir, ...*/
71
 
        flag ufmt;
72
 
        flag urw;       /* (1 for can read) | (2 for can write) */
73
 
        flag ublnk;
74
 
        flag uend;
75
 
        flag uwrt;      /*last io was write*/
76
 
        flag uscrtch;
77
 
} unit;
78
 
 
79
 
extern flag f__init;
80
 
extern cilist *f__elist;        /*active external io list*/
81
 
extern flag f__reading,f__external,f__sequential,f__formatted;
82
 
#undef Void
83
 
#ifdef KR_headers
84
 
#define Void /*void*/
85
 
extern int (*f__getn)();        /* for formatted input */
86
 
extern void (*f__putn)();       /* for formatted output */
87
 
extern void x_putc();
88
 
extern long f__inode();
89
 
extern VOID sig_die();
90
 
extern int (*f__donewrec)(), t_putc(), x_wSL();
91
 
extern int c_sfe(), err__fl(), xrd_SL(), f__putbuf();
92
 
#else
93
 
#define Void void
94
 
#ifdef __cplusplus
95
 
extern "C" {
96
 
#endif
97
 
extern int (*f__getn)(void);    /* for formatted input */
98
 
extern void (*f__putn)(int);    /* for formatted output */
99
 
extern void x_putc(int);
100
 
extern long f__inode(char*,int*);
101
 
extern void sig_die(char*,int);
102
 
extern void f__fatal(int,char*);
103
 
extern int t_runc(alist*);
104
 
extern int f__nowreading(unit*), f__nowwriting(unit*);
105
 
extern int fk_open(int,int,ftnint);
106
 
extern int en_fio(void);
107
 
extern void f_init(void);
108
 
extern int (*f__donewrec)(void), t_putc(int), x_wSL(void);
109
 
extern void b_char(char*,char*,ftnlen), g_char(char*,ftnlen,char*);
110
 
extern int c_sfe(cilist*), z_rnew(void);
111
 
extern int isatty(int);
112
 
extern int err__fl(int,int,char*);
113
 
extern int xrd_SL(void);
114
 
extern int f__putbuf(int);
115
 
#ifdef __cplusplus
116
 
        }
117
 
#endif
118
 
#endif
119
 
extern int (*f__doend)(Void);
120
 
extern FILE *f__cf;     /*current file*/
121
 
extern unit *f__curunit;        /*current unit*/
122
 
extern unit f__units[];
123
 
#define err(f,m,s) {if(f) errno= m; else f__fatal(m,s); return(m);}
124
 
#define errfl(f,m,s) return err__fl((int)f,m,s)
125
 
 
126
 
/*Table sizes*/
127
 
#define MXUNIT 100
128
 
 
129
 
extern int f__recpos;   /*position in current record*/
130
 
extern OFF_T f__cursor; /* offset to move to */
131
 
extern OFF_T f__hiwater;        /* so TL doesn't confuse us */
132
 
 
133
 
#define WRITE   1
134
 
#define READ    2
135
 
#define SEQ     3
136
 
#define DIR     4
137
 
#define FMT     5
138
 
#define UNF     6
139
 
#define EXT     7
140
 
#define INT     8
141
 
 
142
 
#define buf_end(x) (x->_flag & _IONBF ? x->_ptr : x->_base + BUFSIZ)