# define END_EXTERN_C }
# define EXTERN_C extern "C"
#else
-# define START_EXTERN_C
-# define END_EXTERN_C
+# define START_EXTERN_C
+# define END_EXTERN_C
# define EXTERN_C
#endif
#endif
-#if defined(_MSC_VER) || defined(__MINGW32__)
-# include <sys/utime.h>
-#else
-# include <utime.h>
-#endif
+#include <sys/utime.h>
/*
* defines for flock emulation
DllExport int win32_fileno(FILE *pf);
DllExport void win32_clearerr(FILE *pf);
DllExport int win32_fflush(FILE *pf);
-DllExport long win32_ftell(FILE *pf);
-DllExport int win32_fseek(FILE *pf,long offset,int origin);
+DllExport Off_t win32_ftell(FILE *pf);
+DllExport int win32_fseek(FILE *pf,Off_t offset,int origin);
DllExport int win32_fgetpos(FILE *pf,fpos_t *p);
DllExport int win32_fsetpos(FILE *pf,const fpos_t *p);
DllExport void win32_rewind(FILE *pf);
+DllExport int win32_tmpfd(void);
+DllExport int win32_tmpfd_mode(int mode);
DllExport FILE* win32_tmpfile(void);
DllExport void win32_abort(void);
-DllExport int win32_fstat(int fd,struct stat *sbufptr);
-DllExport int win32_stat(const char *name,struct stat *sbufptr);
+DllExport int win32_fstat(int fd,Stat_t *sbufptr);
+DllExport int win32_stat(const char *name,Stat_t *sbufptr);
+DllExport int win32_lstat(const char *name,Stat_t *sbufptr);
DllExport int win32_pipe( int *phandles, unsigned int psize, int textmode );
-DllExport FILE* win32_popen( const char *command, const char *mode );
-DllExport int win32_pclose( FILE *pf);
+DllExport PerlIO* win32_popen( const char *command, const char *mode );
+DllExport PerlIO* win32_popenlist(const char *mode, IV narg, SV **args);
+DllExport int win32_pclose( PerlIO *pf);
+DllExport int win32_rename( const char *oname, const char *newname);
DllExport int win32_setmode( int fd, int mode);
-DllExport long win32_lseek( int fd, long offset, int origin);
-DllExport long win32_tell( int fd);
+DllExport int win32_chsize(int fd, Off_t size);
+DllExport Off_t win32_lseek( int fd, Off_t offset, int origin);
+DllExport Off_t win32_tell( int fd);
DllExport int win32_dup( int fd);
DllExport int win32_dup2(int h1, int h2);
DllExport int win32_open(const char *path, int oflag,...);
DllExport int win32_close(int fd);
DllExport int win32_eof(int fd);
+DllExport int win32_isatty(int fd);
DllExport int win32_read(int fd, void *buf, unsigned int cnt);
DllExport int win32_write(int fd, const void *buf, unsigned int cnt);
DllExport int win32_spawnvp(int mode, const char *cmdname,
- const char *const *argv);
+ const char *const *argv);
DllExport int win32_mkdir(const char *dir, int mode);
DllExport int win32_rmdir(const char *dir);
DllExport int win32_chdir(const char *dir);
DllExport int win32_flock(int fd, int oper);
+DllExport int win32_execv(const char *cmdname, const char *const *argv);
DllExport int win32_execvp(const char *cmdname, const char *const *argv);
DllExport void win32_perror(const char *str);
DllExport void win32_setbuf(FILE *pf, char *buf);
DllExport void* win32_realloc(void *block, size_t size);
DllExport void win32_free(void *block);
-DllExport int win32_open_osfhandle(long handle, int flags);
-DllExport long win32_get_osfhandle(int fd);
+DllExport int win32_open_osfhandle(intptr_t handle, int flags);
+DllExport intptr_t win32_get_osfhandle(int fd);
+DllExport FILE* win32_fdupopen(FILE *pf);
-#ifndef USE_WIN32_RTL_ENV
+DllExport DIR* win32_opendir(const char *filename);
+DllExport struct direct* win32_readdir(DIR *dirp);
+DllExport long win32_telldir(DIR *dirp);
+DllExport void win32_seekdir(DIR *dirp, long loc);
+DllExport void win32_rewinddir(DIR *dirp);
+DllExport int win32_closedir(DIR *dirp);
+DllExport DIR* win32_dirp_dup(DIR *const dirp, CLONE_PARAMS *const param);
+
+DllExport char* win32_getenvironmentstrings(void);
+/* also see win32_freeenvironmentstrings macro */
DllExport char* win32_getenv(const char *name);
-#endif
+DllExport int win32_putenv(const char *name);
DllExport unsigned win32_sleep(unsigned int);
+DllExport int win32_pause(void);
DllExport int win32_times(struct tms *timebuf);
DllExport unsigned win32_alarm(unsigned int sec);
-DllExport int win32_stat(const char *path, struct stat *buf);
+DllExport char* win32_longpath(char *path);
+DllExport char* win32_ansipath(const WCHAR *path);
DllExport int win32_ioctl(int i, unsigned int u, char *data);
+DllExport int win32_link(const char *oldname, const char *newname);
+DllExport int win32_symlink(const char *oldname, const char *newname);
+DllExport int win32_readlink(const char *path, char *buf, size_t bufsiz);
+DllExport int win32_unlink(const char *f);
DllExport int win32_utime(const char *f, struct utimbuf *t);
+DllExport int win32_gettimeofday(struct timeval *tp, void *not_used);
+DllExport int win32_uname(struct utsname *n);
DllExport int win32_wait(int *status);
+DllExport int win32_waitpid(int pid, int *status, int flags);
+DllExport int win32_kill(int pid, int sig);
+DllExport unsigned long win32_os_id(void);
+DllExport void* win32_dynaload(const char*filename);
+DllExport int win32_access(const char *path, int mode);
+DllExport int win32_chmod(const char *path, int mode);
+DllExport int win32_getpid(void);
-#ifdef HAVE_DES_FCRYPT
DllExport char * win32_crypt(const char *txt, const char *salt);
-#endif
+
+DllExport void * win32_get_childenv(void);
+DllExport void win32_free_childenv(void* d);
+DllExport void win32_clearenv(void);
+DllExport char * win32_get_childdir(void);
+DllExport void win32_free_childdir(char* d);
+DllExport Sighandler_t win32_signal(int sig, Sighandler_t subcode);
+
END_EXTERN_C
+/* see comment in win32_getenvironmentstrings */
+#define win32_freeenvironmentstrings(x) win32_free(x)
+#undef alarm
+#define alarm win32_alarm
+#undef strerror
+#define strerror win32_strerror
+
/*
* the following six(6) is #define in stdio.h
*/
#undef pause
#undef sleep
#undef times
-#undef alarm
#undef ioctl
+#undef unlink
#undef utime
+#undef gettimeofday
+#undef uname
#undef wait
-#ifdef __BORLANDC__
-#undef ungetc
-#undef getc
-#undef putc
-#undef getchar
-#undef putchar
+#if defined(__MINGW32__)
#undef fileno
#endif
-#ifndef PERL_OBJECT
#define stderr win32_stderr()
#define stdout win32_stdout()
-#define stdin win32_stdin()
+#define stdin win32_stdin()
#define feof(f) win32_feof(f)
#define ferror(f) win32_ferror(f)
#define errno (*win32_errno())
#define environ (*win32_environ())
-#define strerror win32_strerror
/*
* redirect to our own version
*/
#undef fprintf
-#define fprintf win32_fprintf
-#define vfprintf win32_vfprintf
-#define printf win32_printf
-#define vprintf win32_vprintf
+#define fprintf win32_fprintf
+#define vfprintf win32_vfprintf
+#define printf win32_printf
+#define vprintf win32_vprintf
#define fread(buf,size,count,f) win32_fread(buf,size,count,f)
#define fwrite(buf,size,count,f) win32_fwrite(buf,size,count,f)
#define fopen win32_fopen
#undef fdopen
#define fdopen win32_fdopen
#define freopen win32_freopen
-#define fclose(f) win32_fclose(f)
+#define fclose(f) win32_fclose(f)
#define fputs(s,f) win32_fputs(s,f)
#define fputc(c,f) win32_fputc(c,f)
#define ungetc(c,f) win32_ungetc(c,f)
#define rewind(f) win32_rewind(f)
#define tmpfile() win32_tmpfile()
#define abort() win32_abort()
+#ifdef __MINGW32__
+# undef fstat
+#endif
#define fstat(fd,bufptr) win32_fstat(fd,bufptr)
+#ifdef __MINGW32__
+# undef stat
+#endif
#define stat(pth,bufptr) win32_stat(pth,bufptr)
+#define lstat(pth,bufptr) win32_lstat(pth,bufptr)
+#define longpath(pth) win32_longpath(pth)
+#define ansipath(pth) win32_ansipath(pth)
+#define rename(old,new) win32_rename(old,new)
#define setmode(fd,mode) win32_setmode(fd,mode)
+#define chsize(fd,sz) win32_chsize(fd,sz)
#define lseek(fd,offset,orig) win32_lseek(fd,offset,orig)
#define tell(fd) win32_tell(fd)
#define dup(fd) win32_dup(fd)
#define open win32_open
#define close(fd) win32_close(fd)
#define eof(fd) win32_eof(fd)
+#define isatty(fd) win32_isatty(fd)
#define read(fd,b,s) win32_read(fd,b,s)
#define write(fd,b,s) win32_write(fd,b,s)
#define _open_osfhandle win32_open_osfhandle
#define rmdir win32_rmdir
#define chdir win32_chdir
#define flock(fd,o) win32_flock(fd,o)
+#define execv win32_execv
#define execvp win32_execvp
#define perror win32_perror
#define setbuf win32_setbuf
#define getchar win32_getchar
#undef putchar
#define putchar win32_putchar
+#define access(p,m) win32_access(p,m)
+#define chmod(p,m) win32_chmod(p,m)
#if !defined(MYMALLOC) || !defined(PERL_CORE)
#undef malloc
#define free win32_free
#endif
+/* XXX Why are APIs like sleep(), times() etc. inside a block
+ * XXX guarded by "#ifndef WIN32IO_IS_STDIO"?
+ */
+
#define pipe(fd) win32_pipe((fd), 512, O_BINARY)
-#define pause() win32_sleep((32767L << 16) + 32767)
+#define pause win32_pause
#define sleep win32_sleep
#define times win32_times
-#define alarm win32_alarm
#define ioctl win32_ioctl
+#define link win32_link
+#define symlink win32_symlink
+#define readlink win32_readlink
+#define unlink win32_unlink
#define utime win32_utime
+#define gettimeofday win32_gettimeofday
+#define uname win32_uname
#define wait win32_wait
-#endif /* PERL_OBJECT */
+#define waitpid win32_waitpid
+#define kill win32_kill
+#define killpg(pid, sig) win32_kill(pid, -(sig))
+
+
+#define opendir win32_opendir
+#define readdir win32_readdir
+#define telldir win32_telldir
+#define seekdir win32_seekdir
+#define rewinddir win32_rewinddir
+#define closedir win32_closedir
+#define os_id win32_os_id
+#define getpid win32_getpid
-#ifdef HAVE_DES_FCRYPT
#undef crypt
-#define crypt win32_crypt
-#endif
+#define crypt(t,s) win32_crypt(t,s)
+
+#undef get_childenv
+#undef free_childenv
+#undef clearenv
+#undef get_childdir
+#undef free_childdir
+#define get_childenv() win32_get_childenv()
+#define free_childenv(d) win32_free_childenv(d)
+#define clearenv() win32_clearenv()
+#define get_childdir() win32_get_childdir()
+#define free_childdir(d) win32_free_childdir(d)
-#ifndef USE_WIN32_RTL_ENV
-#ifndef PERL_OBJECT
#undef getenv
#define getenv win32_getenv
-#endif /* PERL_OBJECT */
-#endif
+#undef putenv
+#define putenv win32_putenv
#endif /* WIN32IO_IS_STDIO */
#endif /* WIN32IOP_H */
-
https://perl5.git.perl.org / perl5.git / blobdiff