This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix C<@a = (%a = 1)> bizarreness
[perl5.git] / win32 / win32iop.h
CommitLineData
0a753a76 1#ifndef WIN32IOP_H
2#define WIN32IOP_H
3
326b05e3
GS
4#ifndef START_EXTERN_C
5#ifdef __cplusplus
6# define START_EXTERN_C extern "C" {
7# define END_EXTERN_C }
8# define EXTERN_C extern "C"
9#else
10# define START_EXTERN_C
11# define END_EXTERN_C
12# define EXTERN_C
13#endif
14#endif
15
3730b96e 16#if defined(_MSC_VER) || defined(__MINGW32__)
3b405fc5
GS
17# include <sys/utime.h>
18#else
19# include <utime.h>
20#endif
21
d55594ae
GS
22/*
23 * defines for flock emulation
24 */
25#define LOCK_SH 1
26#define LOCK_EX 2
27#define LOCK_NB 4
28#define LOCK_UN 8
29
0a753a76 30/*
31 * Make this as close to original stdio as possible.
32 */
68dc0745 33
34/*
35 * function prototypes for our own win32io layer
36 */
d55594ae
GS
37START_EXTERN_C
38
22239a37
NIS
39DllExport int * win32_errno(void);
40DllExport char *** win32_environ(void);
41DllExport FILE* win32_stdin(void);
42DllExport FILE* win32_stdout(void);
43DllExport FILE* win32_stderr(void);
44DllExport int win32_ferror(FILE *fp);
45DllExport int win32_feof(FILE *fp);
46DllExport char* win32_strerror(int e);
47
48DllExport int win32_fprintf(FILE *pf, const char *format, ...);
49DllExport int win32_printf(const char *format, ...);
50DllExport int win32_vfprintf(FILE *pf, const char *format, va_list arg);
51DllExport int win32_vprintf(const char *format, va_list arg);
52DllExport size_t win32_fread(void *buf, size_t size, size_t count, FILE *pf);
53DllExport size_t win32_fwrite(const void *buf, size_t size, size_t count, FILE *pf);
54DllExport FILE* win32_fopen(const char *path, const char *mode);
55DllExport FILE* win32_fdopen(int fh, const char *mode);
56DllExport FILE* win32_freopen(const char *path, const char *mode, FILE *pf);
57DllExport int win32_fclose(FILE *pf);
58DllExport int win32_fputs(const char *s,FILE *pf);
59DllExport int win32_fputc(int c,FILE *pf);
60DllExport int win32_ungetc(int c,FILE *pf);
61DllExport int win32_getc(FILE *pf);
62DllExport int win32_fileno(FILE *pf);
26618a56 63DllExport void win32_clearerr(FILE *pf);
22239a37 64DllExport int win32_fflush(FILE *pf);
26618a56 65DllExport long win32_ftell(FILE *pf);
22239a37
NIS
66DllExport int win32_fseek(FILE *pf,long offset,int origin);
67DllExport int win32_fgetpos(FILE *pf,fpos_t *p);
68DllExport int win32_fsetpos(FILE *pf,const fpos_t *p);
26618a56 69DllExport void win32_rewind(FILE *pf);
22239a37 70DllExport FILE* win32_tmpfile(void);
26618a56 71DllExport void win32_abort(void);
22239a37
NIS
72DllExport int win32_fstat(int fd,struct stat *sbufptr);
73DllExport int win32_stat(const char *name,struct stat *sbufptr);
74DllExport int win32_pipe( int *phandles, unsigned int psize, int textmode );
75DllExport FILE* win32_popen( const char *command, const char *mode );
76DllExport int win32_pclose( FILE *pf);
77DllExport int win32_setmode( int fd, int mode);
26618a56
GS
78DllExport long win32_lseek( int fd, long offset, int origin);
79DllExport long win32_tell( int fd);
22239a37
NIS
80DllExport int win32_dup( int fd);
81DllExport int win32_dup2(int h1, int h2);
82DllExport int win32_open(const char *path, int oflag,...);
83DllExport int win32_close(int fd);
84DllExport int win32_eof(int fd);
85DllExport int win32_read(int fd, void *buf, unsigned int cnt);
86DllExport int win32_write(int fd, const void *buf, unsigned int cnt);
87DllExport int win32_spawnvp(int mode, const char *cmdname,
3e3baf6d 88 const char *const *argv);
22239a37
NIS
89DllExport int win32_mkdir(const char *dir, int mode);
90DllExport int win32_rmdir(const char *dir);
91DllExport int win32_chdir(const char *dir);
92DllExport int win32_flock(int fd, int oper);
eb62e965 93DllExport int win32_execv(const char *cmdname, const char *const *argv);
22239a37 94DllExport int win32_execvp(const char *cmdname, const char *const *argv);
26618a56
GS
95DllExport void win32_perror(const char *str);
96DllExport void win32_setbuf(FILE *pf, char *buf);
22239a37
NIS
97DllExport int win32_setvbuf(FILE *pf, char *buf, int type, size_t size);
98DllExport int win32_flushall(void);
99DllExport int win32_fcloseall(void);
100DllExport char* win32_fgets(char *s, int n, FILE *pf);
101DllExport char* win32_gets(char *s);
102DllExport int win32_fgetc(FILE *pf);
103DllExport int win32_putc(int c, FILE *pf);
104DllExport int win32_puts(const char *s);
105DllExport int win32_getchar(void);
106DllExport int win32_putchar(int c);
107DllExport void* win32_malloc(size_t size);
108DllExport void* win32_calloc(size_t numitems, size_t size);
109DllExport void* win32_realloc(void *block, size_t size);
26618a56 110DllExport void win32_free(void *block);
22239a37
NIS
111
112DllExport int win32_open_osfhandle(long handle, int flags);
26618a56 113DllExport long win32_get_osfhandle(int fd);
0a753a76 114
f3986ebb 115#ifndef USE_WIN32_RTL_ENV
22239a37 116DllExport char* win32_getenv(const char *name);
f3986ebb
GS
117#endif
118
26618a56
GS
119DllExport unsigned win32_sleep(unsigned int);
120DllExport int win32_times(struct tms *timebuf);
121DllExport unsigned win32_alarm(unsigned int sec);
26618a56 122DllExport int win32_stat(const char *path, struct stat *buf);
f998180f 123DllExport int win32_ioctl(int i, unsigned int u, char *data);
3b405fc5 124DllExport int win32_utime(const char *f, struct utimbuf *t);
2d7a9237 125DllExport int win32_wait(int *status);
f55ee38a
GS
126DllExport int win32_waitpid(int pid, int *status, int flags);
127DllExport int win32_kill(int pid, int sig);
26618a56
GS
128
129#ifdef HAVE_DES_FCRYPT
130DllExport char * win32_crypt(const char *txt, const char *salt);
131#endif
0a753a76 132
d55594ae
GS
133END_EXTERN_C
134
68dc0745 135/*
136 * the following six(6) is #define in stdio.h
137 */
0a753a76 138#ifndef WIN32IO_IS_STDIO
139#undef errno
dcb2879a 140#undef environ
0a753a76 141#undef stderr
142#undef stdin
143#undef stdout
144#undef ferror
145#undef feof
390b85e7 146#undef fclose
f3986ebb
GS
147#undef pipe
148#undef pause
149#undef sleep
150#undef times
151#undef alarm
f998180f 152#undef ioctl
ad0751ec 153#undef utime
2d7a9237 154#undef wait
0a753a76 155
3e3baf6d
TB
156#ifdef __BORLANDC__
157#undef ungetc
158#undef getc
84902520
TB
159#undef putc
160#undef getchar
161#undef putchar
3e3baf6d
TB
162#undef fileno
163#endif
164
0a753a76 165#define stderr win32_stderr()
166#define stdout win32_stdout()
167#define stdin win32_stdin()
168#define feof(f) win32_feof(f)
169#define ferror(f) win32_ferror(f)
170#define errno (*win32_errno())
dcb2879a 171#define environ (*win32_environ())
0a753a76 172#define strerror win32_strerror
173
68dc0745 174/*
175 * redirect to our own version
176 */
76e3520e 177#undef fprintf
0a753a76 178#define fprintf win32_fprintf
179#define vfprintf win32_vfprintf
180#define printf win32_printf
96e4d5b1 181#define vprintf win32_vprintf
0a753a76 182#define fread(buf,size,count,f) win32_fread(buf,size,count,f)
183#define fwrite(buf,size,count,f) win32_fwrite(buf,size,count,f)
184#define fopen win32_fopen
a835ef8a 185#undef fdopen
0a753a76 186#define fdopen win32_fdopen
187#define freopen win32_freopen
188#define fclose(f) win32_fclose(f)
189#define fputs(s,f) win32_fputs(s,f)
190#define fputc(c,f) win32_fputc(c,f)
191#define ungetc(c,f) win32_ungetc(c,f)
76e3520e 192#undef getc
0a753a76 193#define getc(f) win32_getc(f)
194#define fileno(f) win32_fileno(f)
195#define clearerr(f) win32_clearerr(f)
196#define fflush(f) win32_fflush(f)
197#define ftell(f) win32_ftell(f)
198#define fseek(f,o,w) win32_fseek(f,o,w)
199#define fgetpos(f,p) win32_fgetpos(f,p)
200#define fsetpos(f,p) win32_fsetpos(f,p)
201#define rewind(f) win32_rewind(f)
202#define tmpfile() win32_tmpfile()
203#define abort() win32_abort()
204#define fstat(fd,bufptr) win32_fstat(fd,bufptr)
67fbe06e 205#define stat(pth,bufptr) win32_stat(pth,bufptr)
0a753a76 206#define setmode(fd,mode) win32_setmode(fd,mode)
207#define lseek(fd,offset,orig) win32_lseek(fd,offset,orig)
208#define tell(fd) win32_tell(fd)
209#define dup(fd) win32_dup(fd)
210#define dup2(fd1,fd2) win32_dup2(fd1,fd2)
211#define open win32_open
212#define close(fd) win32_close(fd)
213#define eof(fd) win32_eof(fd)
214#define read(fd,b,s) win32_read(fd,b,s)
215#define write(fd,b,s) win32_write(fd,b,s)
65e48ea9
GS
216#define _open_osfhandle win32_open_osfhandle
217#define _get_osfhandle win32_get_osfhandle
3e3baf6d 218#define spawnvp win32_spawnvp
5aabfad6 219#define mkdir win32_mkdir
220#define rmdir win32_rmdir
221#define chdir win32_chdir
c90c0ff4 222#define flock(fd,o) win32_flock(fd,o)
eb62e965 223#define execv win32_execv
6890e559 224#define execvp win32_execvp
84902520
TB
225#define perror win32_perror
226#define setbuf win32_setbuf
227#define setvbuf win32_setvbuf
5b0d9cbe 228#undef flushall
84902520 229#define flushall win32_flushall
5b0d9cbe 230#undef fcloseall
84902520
TB
231#define fcloseall win32_fcloseall
232#define fgets win32_fgets
233#define gets win32_gets
234#define fgetc win32_fgetc
76e3520e 235#undef putc
84902520
TB
236#define putc win32_putc
237#define puts win32_puts
76e3520e 238#undef getchar
84902520 239#define getchar win32_getchar
76e3520e 240#undef putchar
84902520 241#define putchar win32_putchar
bbc8f9de 242
c31fac66 243#if !defined(MYMALLOC) || !defined(PERL_CORE)
bbc8f9de
NIS
244#undef malloc
245#undef calloc
246#undef realloc
247#undef free
84902520
TB
248#define malloc win32_malloc
249#define calloc win32_calloc
250#define realloc win32_realloc
251#define free win32_free
bbc8f9de 252#endif
0a753a76 253
f3986ebb
GS
254#define pipe(fd) win32_pipe((fd), 512, O_BINARY)
255#define pause() win32_sleep((32767L << 16) + 32767)
256#define sleep win32_sleep
257#define times win32_times
258#define alarm win32_alarm
f998180f 259#define ioctl win32_ioctl
ad0751ec 260#define utime win32_utime
2d7a9237 261#define wait win32_wait
f55ee38a
GS
262#define waitpid win32_waitpid
263#define kill win32_kill
f3986ebb 264
26618a56
GS
265#ifdef HAVE_DES_FCRYPT
266#undef crypt
267#define crypt win32_crypt
268#endif
269
f3986ebb
GS
270#ifndef USE_WIN32_RTL_ENV
271#undef getenv
272#define getenv win32_getenv
273#endif
274
275#endif /* WIN32IO_IS_STDIO */
68dc0745 276#endif /* WIN32IOP_H */
22239a37 277