This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Call FETCH once for $tied_ref =~ y/a/b/
[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
3fadfdf1
NIS
10# define START_EXTERN_C
11# define END_EXTERN_C
326b05e3
GS
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);
c623ac67
GS
65DllExport Off_t win32_ftell(FILE *pf);
66DllExport int win32_fseek(FILE *pf,Off_t offset,int origin);
22239a37
NIS
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);
2941a2e1 70DllExport int win32_tmpfd(void);
22239a37 71DllExport FILE* win32_tmpfile(void);
26618a56 72DllExport void win32_abort(void);
c623ac67
GS
73DllExport int win32_fstat(int fd,Stat_t *sbufptr);
74DllExport int win32_stat(const char *name,Stat_t *sbufptr);
22239a37 75DllExport int win32_pipe( int *phandles, unsigned int psize, int textmode );
adb71456 76DllExport PerlIO* win32_popen( const char *command, const char *mode );
8c0134a8 77DllExport PerlIO* win32_popenlist(const char *mode, IV narg, SV **args);
adb71456 78DllExport int win32_pclose( PerlIO *pf);
8d9b2e3c 79DllExport int win32_rename( const char *oname, const char *newname);
22239a37 80DllExport int win32_setmode( int fd, int mode);
4a9d6100 81DllExport int win32_chsize(int fd, Off_t size);
c623ac67
GS
82DllExport Off_t win32_lseek( int fd, Off_t offset, int origin);
83DllExport Off_t win32_tell( int fd);
22239a37
NIS
84DllExport int win32_dup( int fd);
85DllExport int win32_dup2(int h1, int h2);
86DllExport int win32_open(const char *path, int oflag,...);
87DllExport int win32_close(int fd);
88DllExport int win32_eof(int fd);
4342f4d6 89DllExport int win32_isatty(int fd);
22239a37
NIS
90DllExport int win32_read(int fd, void *buf, unsigned int cnt);
91DllExport int win32_write(int fd, const void *buf, unsigned int cnt);
92DllExport int win32_spawnvp(int mode, const char *cmdname,
3e3baf6d 93 const char *const *argv);
22239a37
NIS
94DllExport int win32_mkdir(const char *dir, int mode);
95DllExport int win32_rmdir(const char *dir);
96DllExport int win32_chdir(const char *dir);
97DllExport int win32_flock(int fd, int oper);
eb62e965 98DllExport int win32_execv(const char *cmdname, const char *const *argv);
22239a37 99DllExport int win32_execvp(const char *cmdname, const char *const *argv);
26618a56
GS
100DllExport void win32_perror(const char *str);
101DllExport void win32_setbuf(FILE *pf, char *buf);
22239a37
NIS
102DllExport int win32_setvbuf(FILE *pf, char *buf, int type, size_t size);
103DllExport int win32_flushall(void);
104DllExport int win32_fcloseall(void);
105DllExport char* win32_fgets(char *s, int n, FILE *pf);
106DllExport char* win32_gets(char *s);
107DllExport int win32_fgetc(FILE *pf);
108DllExport int win32_putc(int c, FILE *pf);
109DllExport int win32_puts(const char *s);
110DllExport int win32_getchar(void);
111DllExport int win32_putchar(int c);
112DllExport void* win32_malloc(size_t size);
113DllExport void* win32_calloc(size_t numitems, size_t size);
114DllExport void* win32_realloc(void *block, size_t size);
26618a56 115DllExport void win32_free(void *block);
22239a37 116
c623ac67
GS
117DllExport int win32_open_osfhandle(intptr_t handle, int flags);
118DllExport intptr_t win32_get_osfhandle(int fd);
6e21dc91 119DllExport FILE* win32_fdupopen(FILE *pf);
0a753a76 120
0e06f75d 121DllExport DIR* win32_opendir(const char *filename);
c5be433b
GS
122DllExport struct direct* win32_readdir(DIR *dirp);
123DllExport long win32_telldir(DIR *dirp);
124DllExport void win32_seekdir(DIR *dirp, long loc);
125DllExport void win32_rewinddir(DIR *dirp);
126DllExport int win32_closedir(DIR *dirp);
60b22aca 127DllExport DIR* win32_dirp_dup(DIR *const dirp, CLONE_PARAMS *const param);
c5be433b 128
22239a37 129DllExport char* win32_getenv(const char *name);
ac5c734f 130DllExport int win32_putenv(const char *name);
f3986ebb 131
26618a56
GS
132DllExport unsigned win32_sleep(unsigned int);
133DllExport int win32_times(struct tms *timebuf);
134DllExport unsigned win32_alarm(unsigned int sec);
c623ac67 135DllExport int win32_stat(const char *path, Stat_t *buf);
8ac9c18d 136DllExport char* win32_longpath(char *path);
aa2b96ec 137DllExport char* win32_ansipath(const WCHAR *path);
f998180f 138DllExport int win32_ioctl(int i, unsigned int u, char *data);
6b980173 139DllExport int win32_link(const char *oldname, const char *newname);
7766f137 140DllExport int win32_unlink(const char *f);
3b405fc5 141DllExport int win32_utime(const char *f, struct utimbuf *t);
57ab3dfe 142DllExport int win32_gettimeofday(struct timeval *tp, void *not_used);
b2af26b1 143DllExport int win32_uname(struct utsname *n);
2d7a9237 144DllExport int win32_wait(int *status);
f55ee38a
GS
145DllExport int win32_waitpid(int pid, int *status, int flags);
146DllExport int win32_kill(int pid, int sig);
0cb96387
GS
147DllExport unsigned long win32_os_id(void);
148DllExport void* win32_dynaload(const char*filename);
7766f137
GS
149DllExport int win32_access(const char *path, int mode);
150DllExport int win32_chmod(const char *path, int mode);
151DllExport int win32_getpid(void);
26618a56 152
26618a56 153DllExport char * win32_crypt(const char *txt, const char *salt);
0a753a76 154
df3728a2
JH
155DllExport void * win32_get_childenv(void);
156DllExport void win32_free_childenv(void* d);
157DllExport void win32_clearenv(void);
158DllExport char * win32_get_childdir(void);
159DllExport void win32_free_childdir(char* d);
3fadfdf1
NIS
160DllExport Sighandler_t win32_signal(int sig, Sighandler_t subcode);
161
df3728a2 162
d55594ae
GS
163END_EXTERN_C
164
8fb3fcfb 165#undef alarm
364d54ba
JD
166#define alarm win32_alarm
167#undef strerror
168#define strerror win32_strerror
8fb3fcfb 169
68dc0745 170/*
171 * the following six(6) is #define in stdio.h
172 */
0a753a76 173#ifndef WIN32IO_IS_STDIO
174#undef errno
dcb2879a 175#undef environ
0a753a76 176#undef stderr
177#undef stdin
178#undef stdout
179#undef ferror
180#undef feof
390b85e7 181#undef fclose
f3986ebb
GS
182#undef pipe
183#undef pause
184#undef sleep
185#undef times
f998180f 186#undef ioctl
7766f137 187#undef unlink
ad0751ec 188#undef utime
57ab3dfe 189#undef gettimeofday
b2af26b1 190#undef uname
2d7a9237 191#undef wait
0a753a76 192
378eeda7 193#if defined(__MINGW32__)
3e3baf6d
TB
194#undef fileno
195#endif
196
0a753a76 197#define stderr win32_stderr()
198#define stdout win32_stdout()
199#define stdin win32_stdin()
c15fa9d5
GS
200#define feof(f) win32_feof(f)
201#define ferror(f) win32_ferror(f)
0a753a76 202#define errno (*win32_errno())
dcb2879a 203#define environ (*win32_environ())
0a753a76 204
68dc0745 205/*
206 * redirect to our own version
207 */
76e3520e 208#undef fprintf
0a753a76 209#define fprintf win32_fprintf
210#define vfprintf win32_vfprintf
211#define printf win32_printf
96e4d5b1 212#define vprintf win32_vprintf
c15fa9d5
GS
213#define fread(buf,size,count,f) win32_fread(buf,size,count,f)
214#define fwrite(buf,size,count,f) win32_fwrite(buf,size,count,f)
0a753a76 215#define fopen win32_fopen
a835ef8a 216#undef fdopen
0a753a76 217#define fdopen win32_fdopen
218#define freopen win32_freopen
c15fa9d5
GS
219#define fclose(f) win32_fclose(f)
220#define fputs(s,f) win32_fputs(s,f)
221#define fputc(c,f) win32_fputc(c,f)
222#define ungetc(c,f) win32_ungetc(c,f)
76e3520e 223#undef getc
c15fa9d5
GS
224#define getc(f) win32_getc(f)
225#define fileno(f) win32_fileno(f)
226#define clearerr(f) win32_clearerr(f)
227#define fflush(f) win32_fflush(f)
228#define ftell(f) win32_ftell(f)
229#define fseek(f,o,w) win32_fseek(f,o,w)
230#define fgetpos(f,p) win32_fgetpos(f,p)
231#define fsetpos(f,p) win32_fsetpos(f,p)
232#define rewind(f) win32_rewind(f)
233#define tmpfile() win32_tmpfile()
234#define abort() win32_abort()
235#define fstat(fd,bufptr) win32_fstat(fd,bufptr)
236#define stat(pth,bufptr) win32_stat(pth,bufptr)
8ac9c18d 237#define longpath(pth) win32_longpath(pth)
aa2b96ec 238#define ansipath(pth) win32_ansipath(pth)
e24c7c18 239#define rename(old,new) win32_rename(old,new)
c15fa9d5 240#define setmode(fd,mode) win32_setmode(fd,mode)
4a9d6100 241#define chsize(fd,sz) win32_chsize(fd,sz)
c15fa9d5
GS
242#define lseek(fd,offset,orig) win32_lseek(fd,offset,orig)
243#define tell(fd) win32_tell(fd)
244#define dup(fd) win32_dup(fd)
245#define dup2(fd1,fd2) win32_dup2(fd1,fd2)
0a753a76 246#define open win32_open
c15fa9d5
GS
247#define close(fd) win32_close(fd)
248#define eof(fd) win32_eof(fd)
4342f4d6 249#define isatty(fd) win32_isatty(fd)
c15fa9d5
GS
250#define read(fd,b,s) win32_read(fd,b,s)
251#define write(fd,b,s) win32_write(fd,b,s)
65e48ea9
GS
252#define _open_osfhandle win32_open_osfhandle
253#define _get_osfhandle win32_get_osfhandle
3e3baf6d 254#define spawnvp win32_spawnvp
5aabfad6 255#define mkdir win32_mkdir
256#define rmdir win32_rmdir
257#define chdir win32_chdir
c15fa9d5 258#define flock(fd,o) win32_flock(fd,o)
eb62e965 259#define execv win32_execv
6890e559 260#define execvp win32_execvp
84902520
TB
261#define perror win32_perror
262#define setbuf win32_setbuf
263#define setvbuf win32_setvbuf
5b0d9cbe 264#undef flushall
84902520 265#define flushall win32_flushall
5b0d9cbe 266#undef fcloseall
84902520
TB
267#define fcloseall win32_fcloseall
268#define fgets win32_fgets
269#define gets win32_gets
270#define fgetc win32_fgetc
76e3520e 271#undef putc
84902520
TB
272#define putc win32_putc
273#define puts win32_puts
76e3520e 274#undef getchar
84902520 275#define getchar win32_getchar
76e3520e 276#undef putchar
84902520 277#define putchar win32_putchar
7766f137
GS
278#define access(p,m) win32_access(p,m)
279#define chmod(p,m) win32_chmod(p,m)
280
bbc8f9de 281
c31fac66 282#if !defined(MYMALLOC) || !defined(PERL_CORE)
bbc8f9de
NIS
283#undef malloc
284#undef calloc
285#undef realloc
286#undef free
84902520
TB
287#define malloc win32_malloc
288#define calloc win32_calloc
289#define realloc win32_realloc
290#define free win32_free
bbc8f9de 291#endif
0a753a76 292
364d54ba
JD
293/* XXX Why are APIs like sleep(), times() etc. inside a block
294 * XXX guarded by "#ifndef WIN32IO_IS_STDIO"?
295 */
296
f3986ebb
GS
297#define pipe(fd) win32_pipe((fd), 512, O_BINARY)
298#define pause() win32_sleep((32767L << 16) + 32767)
299#define sleep win32_sleep
300#define times win32_times
f998180f 301#define ioctl win32_ioctl
6b980173 302#define link win32_link
7766f137 303#define unlink win32_unlink
ad0751ec 304#define utime win32_utime
57ab3dfe 305#define gettimeofday win32_gettimeofday
b2af26b1 306#define uname win32_uname
2d7a9237 307#define wait win32_wait
f55ee38a
GS
308#define waitpid win32_waitpid
309#define kill win32_kill
f3986ebb 310
ce2e26e5
GS
311#define opendir win32_opendir
312#define readdir win32_readdir
313#define telldir win32_telldir
314#define seekdir win32_seekdir
315#define rewinddir win32_rewinddir
316#define closedir win32_closedir
0cb96387 317#define os_id win32_os_id
7766f137 318#define getpid win32_getpid
ce2e26e5 319
26618a56 320#undef crypt
25dbdbbc 321#define crypt(t,s) win32_crypt(t,s)
26618a56 322
df3728a2
JH
323#undef get_childenv
324#undef free_childenv
325#undef clearenv
326#undef get_childdir
327#undef free_childdir
328#define get_childenv() win32_get_childenv()
329#define free_childenv(d) win32_free_childenv(d)
330#define clearenv() win32_clearenv()
331#define get_childdir() win32_get_childdir()
332#define free_childdir(d) win32_free_childdir(d)
333
f3986ebb
GS
334#undef getenv
335#define getenv win32_getenv
ac5c734f
GS
336#undef putenv
337#define putenv win32_putenv
f3986ebb
GS
338
339#endif /* WIN32IO_IS_STDIO */
68dc0745 340#endif /* WIN32IOP_H */