2 * error.c: Error reporting
5 * Dick Porter (dick@ximian.com)
7 * (C) 2002 Ximian, Inc.
16 #include "mono/io-layer/wapi.h"
18 static pthread_key_t error_key
;
19 static mono_once_t error_key_once
=MONO_ONCE_INIT
;
21 static void error_init(void)
25 ret
= pthread_key_create(&error_key
, NULL
);
29 void _wapi_error_cleanup (void)
33 ret
= pthread_key_delete (error_key
);
40 * Retrieves the last error that occurred in the calling thread.
42 * Return value: The error code for the last error that happened on
45 guint32
GetLastError(void)
50 mono_once(&error_key_once
, error_init
);
51 errptr
=pthread_getspecific(error_key
);
52 err
=GPOINTER_TO_UINT(errptr
);
59 * @code: The error code.
61 * Sets the error code in the calling thread.
63 void SetLastError(guint32 code
)
67 /* Set the thread-local error code */
68 mono_once(&error_key_once
, error_init
);
69 ret
= pthread_setspecific(error_key
, GUINT_TO_POINTER(code
));
74 errno_to_WSA (guint32 code
, const gchar
*function_name
)
81 case 0: result
= ERROR_SUCCESS
; break;
82 case EACCES
: result
= WSAEACCES
; break;
83 case EADDRINUSE
: result
= WSAEADDRINUSE
; break;
84 case EAFNOSUPPORT
: result
= WSAEAFNOSUPPORT
; break;
85 #if EAGAIN != EWOULDBLOCK
86 case EAGAIN
: result
= WSAEWOULDBLOCK
; break;
88 case EALREADY
: result
= WSAEALREADY
; break;
89 case EBADF
: result
= WSAENOTSOCK
; break;
90 case ECONNABORTED
: result
= WSAENETDOWN
; break;
91 case ECONNREFUSED
: result
= WSAECONNREFUSED
; break;
92 case ECONNRESET
: result
= WSAECONNRESET
; break;
93 case EFAULT
: result
= WSAEFAULT
; break;
94 case EHOSTUNREACH
: result
= WSAEHOSTUNREACH
; break;
95 case EINPROGRESS
: result
= WSAEINPROGRESS
; break;
96 case EINTR
: result
= WSAEINTR
; break;
97 case EINVAL
: result
= WSAEINVAL
; break;
98 /*FIXME: case EIO: result = WSAE????; break; */
99 case EISCONN
: result
= WSAEISCONN
; break;
100 /* FIXME: case ELOOP: result = WSA????; break; */
101 case EMFILE
: result
= WSAEMFILE
; break;
102 case EMSGSIZE
: result
= WSAEMSGSIZE
; break;
103 /* FIXME: case ENAMETOOLONG: result = WSAEACCES; break; */
104 case ENETUNREACH
: result
= WSAENETUNREACH
; break;
105 case ENOBUFS
: result
= WSAENOBUFS
; break; /* not documented */
106 /* case ENOENT: result = WSAE????; break; */
107 case ENOMEM
: result
= WSAENOBUFS
; break;
108 case ENOPROTOOPT
: result
= WSAENOPROTOOPT
; break;
110 case ENOSR
: result
= WSAENETDOWN
; break;
112 case ENOTCONN
: result
= WSAENOTCONN
; break;
113 /*FIXME: case ENOTDIR: result = WSAE????; break; */
114 case ENOTSOCK
: result
= WSAENOTSOCK
; break;
115 case ENOTTY
: result
= WSAENOTSOCK
; break;
116 case EOPNOTSUPP
: result
= WSAEOPNOTSUPP
; break;
117 case EPERM
: result
= WSAEACCES
; break;
118 case EPIPE
: result
= WSAESHUTDOWN
; break;
119 case EPROTONOSUPPORT
: result
= WSAEPROTONOSUPPORT
; break;
121 case ERESTARTSYS
: result
= WSAENETDOWN
; break;
123 /*FIXME: case EROFS: result = WSAE????; break; */
124 case ESOCKTNOSUPPORT
: result
= WSAESOCKTNOSUPPORT
; break;
125 case ETIMEDOUT
: result
= WSAETIMEDOUT
; break;
126 case EWOULDBLOCK
: result
= WSAEWOULDBLOCK
; break;
127 case EADDRNOTAVAIL
: result
= WSAEADDRNOTAVAIL
; break;
128 /* This might happen with unix sockets */
129 case ENOENT
: result
= WSAECONNREFUSED
; break;
130 case EDESTADDRREQ
: result
= WSAEDESTADDRREQ
; break;
132 sys_error
= strerror (code
);
133 msg
= g_locale_to_utf8 (sys_error
, strlen (sys_error
), NULL
, NULL
, NULL
);
134 if (function_name
== NULL
)
135 function_name
= __func__
;
137 g_warning ("%s: Need to translate %d [%s] into winsock error",
138 function_name
, code
, msg
);
141 result
= WSASYSCALLFAILURE
;
148 _wapi_get_win32_file_error (gint err
)
151 /* mapping ideas borrowed from wine. they may need some work */
154 case EACCES
: case EPERM
: case EROFS
:
155 ret
= ERROR_ACCESS_DENIED
;
159 ret
= ERROR_SHARING_VIOLATION
;
163 ret
= ERROR_LOCK_VIOLATION
;
167 ret
= ERROR_FILE_EXISTS
;
170 case EINVAL
: case ESPIPE
:
175 ret
= ERROR_CANNOT_MAKE
;
178 case ENFILE
: case EMFILE
:
179 ret
= ERROR_TOO_MANY_OPEN_FILES
;
182 case ENOENT
: case ENOTDIR
:
183 ret
= ERROR_FILE_NOT_FOUND
;
187 ret
= ERROR_HANDLE_DISK_FULL
;
191 ret
= ERROR_DIR_NOT_EMPTY
;
195 ret
= ERROR_BAD_FORMAT
;
199 ret
= ERROR_FILENAME_EXCED_RANGE
;
203 ret
= ERROR_IO_PENDING
;
207 ret
= ERROR_NOT_SUPPORTED
;
211 ret
= ERROR_INVALID_HANDLE
;
215 ret
= ERROR_INVALID_HANDLE
;
219 ret
= ERROR_IO_PENDING
; /* best match I could find */
223 ret
= ERROR_WRITE_FAULT
;
227 g_message ("Unknown errno: %s\n", g_strerror (err
));
228 ret
= ERROR_GEN_FAILURE
;