This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
support POSIX::uname() via win32_uname()
[perl5.git] / win32 / win32iop.h
index 98627e4..a0649b1 100644 (file)
 #endif
 #endif
 
+#if defined(_MSC_VER) || defined(__MINGW32__)
+#  include <sys/utime.h>
+#else
+#  include <utime.h>
+#endif
+
 /*
  * defines for flock emulation
  */
@@ -68,6 +74,7 @@ DllExport  int        win32_stat(const char *name,struct stat *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  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);
@@ -84,6 +91,7 @@ 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);
@@ -107,6 +115,7 @@ DllExport  long             win32_get_osfhandle(int fd);
 
 #ifndef USE_WIN32_RTL_ENV
 DllExport  char*       win32_getenv(const char *name);
+DllExport  int         win32_putenv(const char *name);
 #endif
 
 DllExport  unsigned    win32_sleep(unsigned int);
@@ -114,9 +123,13 @@ 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  int         win32_ioctl(int i, unsigned int u, char *data);
+DllExport  int         win32_utime(const char *f, struct utimbuf *t);
+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);
 
-#ifdef HAVE_DES_FCRYPT
+#if defined(HAVE_DES_FCRYPT) || defined(PERL_OBJECT)
 DllExport char *       win32_crypt(const char *txt, const char *salt);
 #endif
 
@@ -140,6 +153,8 @@ END_EXTERN_C
 #undef times
 #undef alarm
 #undef ioctl
+#undef utime
+#undef uname
 #undef wait
 
 #ifdef __BORLANDC__
@@ -151,7 +166,6 @@ END_EXTERN_C
 #undef fileno
 #endif
 
-#ifndef PERL_OBJECT
 #define stderr                         win32_stderr()
 #define stdout                         win32_stdout()
 #define        stdin                           win32_stdin()
@@ -193,6 +207,7 @@ END_EXTERN_C
 #define abort()                        win32_abort()
 #define fstat(fd,bufptr)       win32_fstat(fd,bufptr)
 #define stat(pth,bufptr)       win32_stat(pth,bufptr)
+#define rename(old,new)                win32_rename(old,new)
 #define setmode(fd,mode)       win32_setmode(fd,mode)
 #define lseek(fd,offset,orig)  win32_lseek(fd,offset,orig)
 #define tell(fd)               win32_tell(fd)
@@ -210,6 +225,7 @@ END_EXTERN_C
 #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
@@ -246,8 +262,18 @@ END_EXTERN_C
 #define times                  win32_times
 #define alarm                  win32_alarm
 #define ioctl                  win32_ioctl
+#define utime                  win32_utime
+#define uname                  win32_uname
 #define wait                   win32_wait
-#endif  /* PERL_OBJECT */
+#define waitpid                        win32_waitpid
+#define kill                   win32_kill
+
+#define opendir                        win32_opendir
+#define readdir                        win32_readdir
+#define telldir                        win32_telldir
+#define seekdir                        win32_seekdir
+#define rewinddir              win32_rewinddir
+#define closedir               win32_closedir
 
 #ifdef HAVE_DES_FCRYPT
 #undef crypt
@@ -255,10 +281,10 @@ END_EXTERN_C
 #endif
 
 #ifndef USE_WIN32_RTL_ENV
-#ifndef PERL_OBJECT
 #undef getenv
 #define getenv win32_getenv
-#endif  /* PERL_OBJECT */
+#undef putenv
+#define putenv win32_putenv
 #endif
 
 #endif /* WIN32IO_IS_STDIO */