Merge pull request #3373 from marek-safar/net-4.6.2

[mono.git] / support / stdio.c

diff --git a/support/stdio.c b/support/stdio.c
index 5973adb85a994a1d4667b5fdfdddde98e5e0ecea..e5b54da47b909f222d3664480c522d34d40ca1f8 100644 (file)
--- a/support/stdio.c
+++ b/support/stdio.c
@@ -4,18 +4,19 @@
  * Authors:
  *   Jonathan Pryor (jonpryor@vt.edu)
  *
- * Copyright (C) 2004-2005 Jonathan Pryor
+ * Copyright (C) 2004-2006 Jonathan Pryor
  */
 
 #include <stdarg.h>
 #include <stdio.h>
 #include <stdlib.h>
 
+#include "map.h"
 #include "mph.h"
 
 G_BEGIN_DECLS
 
-#ifndef PLATFORM_WIN32
+#ifndef HOST_WIN32
 gint32
 Mono_Posix_Syscall_L_ctermid (void)
 {
@@ -25,30 +26,36 @@ Mono_Posix_Syscall_L_ctermid (void)
 gint32
 Mono_Posix_Syscall_L_cuserid (void)
 {
+#if defined(__APPLE__) || defined (__OpenBSD__)
+       return -1;
+#else
        return L_cuserid;
+#endif
 }
-#endif /* ndef PLATFORM_WIN32 */
+#endif /* ndef HOST_WIN32 */
 
 mph_size_t
-Mono_Posix_Stdlib_fread (void *ptr, mph_size_t size, mph_size_t nmemb, FILE *stream)
+Mono_Posix_Stdlib_fread (unsigned char *ptr, mph_size_t size, mph_size_t nmemb, void *stream)
 {
        mph_return_if_size_t_overflow (size);
        mph_return_if_size_t_overflow (nmemb);
 
-       return fread (ptr, (size_t) size, (size_t) nmemb, stream);
+       return fread (ptr, (size_t) size, (size_t) nmemb, (FILE*) stream);
 }
 
 mph_size_t
-Mono_Posix_Stdlib_fwrite (const void *ptr, mph_size_t size, mph_size_t nmemb, FILE *stream)
+Mono_Posix_Stdlib_fwrite (unsigned char *ptr, mph_size_t size, mph_size_t nmemb, void *stream)
 {
        mph_return_if_size_t_overflow (size);
        mph_return_if_size_t_overflow (nmemb);
 
-       return fwrite (ptr, (size_t) size, (size_t) nmemb, stream);
+       return fwrite (ptr, (size_t) size, (size_t) nmemb, (FILE*) stream);
 }
 
 #ifdef HAVE_VSNPRINTF
 gint32
+Mono_Posix_Stdlib_snprintf (char *s, mph_size_t n, char *format, ...);
+gint32
 Mono_Posix_Stdlib_snprintf (char *s, mph_size_t n, char *format, ...)
 {
        va_list ap;
@@ -61,7 +68,7 @@ Mono_Posix_Stdlib_snprintf (char *s, mph_size_t n, char *format, ...)
 
        return r;
 }
-#endif /* def HAVE_SNPRINTF */
+#endif /* def HAVE_VSNPRINTF */
 
 gint32
 Mono_Posix_Stdlib__IOFBF (void)
@@ -111,19 +118,19 @@ Mono_Posix_Stdlib_L_tmpnam (void)
        return L_tmpnam;
 }
 
-FILE*
+void*
 Mono_Posix_Stdlib_stdin (void)
 {
        return stdin;
 }
 
-FILE*
+void*
 Mono_Posix_Stdlib_stdout (void)
 {
        return stdout;
 }
 
-FILE*
+void*
 Mono_Posix_Stdlib_stderr (void)
 {
        return stderr;
@@ -136,14 +143,21 @@ Mono_Posix_Stdlib_TMP_MAX (void)
 }
 
 gint32
-Mono_Posix_Stdlib_setvbuf (FILE *stream, char *buf, int mode, mph_size_t size)
+Mono_Posix_Stdlib_setvbuf (void* stream, void *buf, int mode, mph_size_t size)
 {
        mph_return_if_size_t_overflow (size);
-       return setvbuf (stream, buf, mode, (size_t) size);
+       return setvbuf (stream, (char *) buf, mode, (size_t) size);
+}
+
+int 
+Mono_Posix_Stdlib_setbuf (void* stream, void* buf)
+{
+       setbuf (stream, buf);
+       return 0;
 }
 
 gint32
-Mono_Posix_Stdlib_fseek (FILE* stream, gint64 offset, int origin)
+Mono_Posix_Stdlib_fseek (void* stream, gint64 offset, int origin)
 {
        mph_return_if_long_overflow (offset);
 
@@ -151,12 +165,12 @@ Mono_Posix_Stdlib_fseek (FILE* stream, gint64 offset, int origin)
 }
 
 gint64
-Mono_Posix_Stdlib_ftell (FILE* stream)
+Mono_Posix_Stdlib_ftell (void* stream)
 {
        return ftell (stream);
 }
 
-fpos_t*
+void*
 Mono_Posix_Stdlib_CreateFilePosition (void)
 {
        fpos_t* pos = malloc (sizeof(fpos_t));
@@ -164,15 +178,71 @@ Mono_Posix_Stdlib_CreateFilePosition (void)
 }
 
 gint32
-Mono_Posix_Stdlib_fgetpos (FILE* stream, fpos_t *pos)
+Mono_Posix_Stdlib_fgetpos (void* stream, void *pos)
 {
-       return fgetpos (stream, pos);
+       return fgetpos (stream, (fpos_t*) pos);
 }
 
 gint32
-Mono_Posix_Stdlib_fsetpos (FILE* stream, fpos_t *pos)
+Mono_Posix_Stdlib_fsetpos (void* stream, void *pos)
+{
+       return fsetpos (stream, (fpos_t*) pos);
+}
+
+int
+Mono_Posix_Stdlib_rewind (void* stream)
+{
+       do {
+               rewind (stream);
+       } while (errno == EINTR);
+       mph_return_if_val_in_list5(errno, EAGAIN, EBADF, EFBIG, EINVAL, EIO);
+       mph_return_if_val_in_list5(errno, ENOSPC, ENXIO, EOVERFLOW, EPIPE, ESPIPE);
+       return 0;
+}
+
+int
+Mono_Posix_Stdlib_clearerr (void* stream)
 {
-       return fsetpos (stream, pos);
+       clearerr (((FILE*) stream));
+       return 0;
+}
+
+int
+Mono_Posix_Stdlib_perror (const char* s, int err)
+{
+       errno = err;
+       perror (s);
+       return 0;
+}
+
+#define MPH_FPOS_LENGTH (sizeof(fpos_t)*2)
+
+int
+Mono_Posix_Stdlib_DumpFilePosition (char *dest, void *pos, gint32 len)
+{
+       char *destp;
+       unsigned char *posp, *pose;
+
+       if (dest == NULL)
+               return MPH_FPOS_LENGTH;
+
+       if (pos == NULL || len <= 0) {
+               errno = EINVAL;
+               return -1;
+       }
+
+       posp = (unsigned char*) pos;
+       pose = posp + sizeof(fpos_t);
+       destp = dest;
+
+       for ( ; posp < pose && len > 1; destp += 2, ++posp, len -= 2) {
+               sprintf (destp, "%02X", *posp);
+       }
+
+       if (len)
+               dest[MPH_FPOS_LENGTH] = '\0';
+
+       return destp - dest;
 }
 
 G_END_DECLS