mono/io-layer/handles-private.h

   1 /*
   2  * handles-private.h:  Internal operations on handles
   3  *
   4  * Author:
   5  *      Dick Porter (dick@ximian.com)
   6  *
   7  * (C) 2002-2006 Novell, Inc.
   8  */
   9
  10 #ifndef _WAPI_HANDLES_PRIVATE_H_
  11 #define _WAPI_HANDLES_PRIVATE_H_
  12
  13 #include <config.h>
  14 #include <glib.h>
  15 #include <errno.h>
  16 #include <signal.h>
  17 #include <string.h>
  18 #include <sys/types.h>
  19
  20 #include <mono/io-layer/wapi-private.h>
  21 #include <mono/io-layer/misc-private.h>
  22 #include <mono/io-layer/collection.h>
  23 #include <mono/io-layer/shared.h>
  24
  25 #define _WAPI_PRIVATE_MAX_SLOTS         (1024 * 16)
  26 #define _WAPI_PRIVATE_HANDLES(x) (_wapi_private_handles [x / _WAPI_HANDLE_INITIAL_COUNT][x % _WAPI_HANDLE_INITIAL_COUNT])
  27 #define _WAPI_PRIVATE_HAVE_SLOT(x) ((GPOINTER_TO_UINT (x) / _WAPI_PRIVATE_MAX_SLOTS) < _WAPI_PRIVATE_MAX_SLOTS && \
  28                                         _wapi_private_handles [GPOINTER_TO_UINT (x) / _WAPI_HANDLE_INITIAL_COUNT] != NULL)
  29 #define _WAPI_PRIVATE_VALID_SLOT(x) (((x) / _WAPI_HANDLE_INITIAL_COUNT) < _WAPI_PRIVATE_MAX_SLOTS)
  30
  31 #undef DEBUG
  32
  33 extern struct _WapiHandleUnshared *_wapi_private_handles [];
  34 extern struct _WapiHandleSharedLayout *_wapi_shared_layout;
  35 extern struct _WapiFileShareLayout *_wapi_fileshare_layout;
  36
  37 extern guint32 _wapi_fd_reserve;
  38 extern mono_mutex_t *_wapi_global_signal_mutex;
  39 extern pthread_cond_t *_wapi_global_signal_cond;
  40 extern int _wapi_sem_id;
  41 extern gboolean _wapi_has_shut_down;
  42
  43 extern pid_t _wapi_getpid (void);
  44 extern gpointer _wapi_handle_new (WapiHandleType type,
  45                                   gpointer handle_specific);
  46 extern gpointer _wapi_handle_new_fd (WapiHandleType type, int fd,
  47                                      gpointer handle_specific);
  48 extern gpointer _wapi_handle_new_from_offset (WapiHandleType type,
  49                                               guint32 offset,
  50                                               gboolean timestamp);
  51 extern gboolean _wapi_lookup_handle (gpointer handle, WapiHandleType type,
  52                                      gpointer *handle_specific);
  53 extern gpointer _wapi_search_handle (WapiHandleType type,
  54                                      gboolean (*check)(gpointer, gpointer),
  55                                      gpointer user_data,
  56                                      gpointer *handle_specific,
  57                                      gboolean search_shared);
  58 extern gint32 _wapi_search_handle_namespace (WapiHandleType type,
  59                                              gchar *utf8_name);
  60 extern void _wapi_handle_ref (gpointer handle);
  61 extern void _wapi_handle_unref (gpointer handle);
  62 extern void _wapi_handle_register_capabilities (WapiHandleType type,
  63                                                 WapiHandleCapability caps);
  64 extern gboolean _wapi_handle_test_capabilities (gpointer handle,
  65                                                 WapiHandleCapability caps);
  66 extern void _wapi_handle_ops_close (gpointer handle, gpointer data);
  67 extern void _wapi_handle_ops_signal (gpointer handle);
  68 extern gboolean _wapi_handle_ops_own (gpointer handle);
  69 extern gboolean _wapi_handle_ops_isowned (gpointer handle);
  70 extern guint32 _wapi_handle_ops_special_wait (gpointer handle,
  71                                               guint32 timeout,
  72                                               gboolean alertable);
  73 extern void _wapi_handle_ops_prewait (gpointer handle);
  74
  75 extern gboolean _wapi_handle_count_signalled_handles (guint32 numhandles,
  76                                                       gpointer *handles,
  77                                                       gboolean waitall,
  78                                                       guint32 *retcount,
  79                                                       guint32 *lowest);
  80 extern void _wapi_handle_unlock_handles (guint32 numhandles,
  81                                          gpointer *handles);
  82 extern int _wapi_handle_wait_signal (gboolean poll);
  83 extern int _wapi_handle_timedwait_signal (struct timespec *timeout, gboolean poll);
  84 extern int _wapi_handle_wait_signal_handle (gpointer handle, gboolean alertable);
  85 extern int _wapi_handle_timedwait_signal_handle (gpointer handle,
  86                                                                                                  struct timespec *timeout, gboolean alertable, gboolean poll);
  87 extern gboolean _wapi_handle_get_or_set_share (dev_t device, ino_t inode,
  88                                                guint32 new_sharemode,
  89                                                guint32 new_access,
  90                                                guint32 *old_sharemode,
  91                                                guint32 *old_access,
  92                                                struct _WapiFileShare **info);
  93 extern void _wapi_handle_check_share (struct _WapiFileShare *share_info,
  94                                       int fd);
  95 extern void _wapi_handle_dump (void);
  96 extern void _wapi_handle_update_refs (void);
  97 extern void _wapi_handle_foreach (WapiHandleType type,
  98                                         gboolean (*on_each)(gpointer test, gpointer user),
  99                                         gpointer user_data);
 100 void _wapi_free_share_info (_WapiFileShare *share_info);
 101
 102 /* This is OK to use for atomic writes of individual struct members, as they
 103  * are independent
 104  */
 105 #define WAPI_SHARED_HANDLE_DATA(handle) _wapi_shared_layout->handles[_WAPI_PRIVATE_HANDLES(GPOINTER_TO_UINT((handle))).u.shared.offset]
 106
 107 #define WAPI_SHARED_HANDLE_TYPED_DATA(handle, type) _wapi_shared_layout->handles[_WAPI_PRIVATE_HANDLES(GPOINTER_TO_UINT((handle))).u.shared.offset].u.type
 108
 109 static inline WapiHandleType _wapi_handle_type (gpointer handle)
 110 {
 111         guint32 idx = GPOINTER_TO_UINT(handle);
 112
 113         if (!_WAPI_PRIVATE_VALID_SLOT (idx) || !_WAPI_PRIVATE_HAVE_SLOT (idx)) {
 114                 return(WAPI_HANDLE_UNUSED);     /* An impossible type */
 115         }
 116
 117         return(_WAPI_PRIVATE_HANDLES(idx).type);
 118 }
 119
 120 static inline void _wapi_handle_set_signal_state (gpointer handle,
 121                                                   gboolean state,
 122                                                   gboolean broadcast)
 123 {
 124         guint32 idx = GPOINTER_TO_UINT(handle);
 125         struct _WapiHandleUnshared *handle_data;
 126         int thr_ret;
 127
 128         if (!_WAPI_PRIVATE_VALID_SLOT (idx)) {
 129                 return;
 130         }
 131
 132         g_assert (!_WAPI_SHARED_HANDLE(_wapi_handle_type (handle)));
 133
 134         handle_data = &_WAPI_PRIVATE_HANDLES(idx);
 135
 136 #ifdef DEBUG
 137         g_message ("%s: setting state of %p to %s (broadcast %s)", __func__,
 138                    handle, state?"TRUE":"FALSE", broadcast?"TRUE":"FALSE");
 139 #endif
 140
 141         if (state == TRUE) {
 142                 /* Tell everyone blocking on a single handle */
 143
 144                 /* The condition the global signal cond is waiting on is the signalling of
 145                  * _any_ handle. So lock it before setting the signalled state.
 146                  */
 147                 pthread_cleanup_push ((void(*)(void *))mono_mutex_unlock_in_cleanup, (void *)_wapi_global_signal_mutex);
 148                 thr_ret = mono_mutex_lock (_wapi_global_signal_mutex);
 149                 if (thr_ret != 0)
 150                         g_warning ("Bad call to mono_mutex_lock result %d for global signal mutex", thr_ret);
 151                 g_assert (thr_ret == 0);
 152
 153                 /* This function _must_ be called with
 154                  * handle->signal_mutex locked
 155                  */
 156                 handle_data->signalled=state;
 157
 158                 if (broadcast == TRUE) {
 159                         thr_ret = pthread_cond_broadcast (&handle_data->signal_cond);
 160                         if (thr_ret != 0)
 161                                 g_warning ("Bad call to pthread_cond_broadcast result %d for handle %p", thr_ret, handle);
 162                         g_assert (thr_ret == 0);
 163                 } else {
 164                         thr_ret = pthread_cond_signal (&handle_data->signal_cond);
 165                         if (thr_ret != 0)
 166                                 g_warning ("Bad call to pthread_cond_signal result %d for handle %p", thr_ret, handle);
 167                         g_assert (thr_ret == 0);
 168                 }
 169
 170                 /* Tell everyone blocking on multiple handles that something
 171                  * was signalled
 172                  */
 173                 thr_ret = pthread_cond_broadcast (_wapi_global_signal_cond);
 174                 if (thr_ret != 0)
 175                         g_warning ("Bad call to pthread_cond_broadcast result %d for handle %p", thr_ret, handle);
 176                 g_assert (thr_ret == 0);
 177
 178                 thr_ret = mono_mutex_unlock (_wapi_global_signal_mutex);
 179                 if (thr_ret != 0)
 180                         g_warning ("Bad call to mono_mutex_unlock result %d for global signal mutex", thr_ret);
 181                 g_assert (thr_ret == 0);
 182
 183                 pthread_cleanup_pop (0);
 184         } else {
 185                 handle_data->signalled=state;
 186         }
 187 }
 188
 189 static inline void _wapi_shared_handle_set_signal_state (gpointer handle,
 190                                                          gboolean state)
 191 {
 192         guint32 idx = GPOINTER_TO_UINT(handle);
 193         struct _WapiHandleUnshared *handle_data;
 194         struct _WapiHandle_shared_ref *ref;
 195         struct _WapiHandleShared *shared_data;
 196
 197         if (!_WAPI_PRIVATE_VALID_SLOT (idx)) {
 198                 return;
 199         }
 200
 201         g_assert (_WAPI_SHARED_HANDLE(_wapi_handle_type (handle)));
 202
 203         handle_data = &_WAPI_PRIVATE_HANDLES(idx);
 204
 205         ref = &handle_data->u.shared;
 206         shared_data = &_wapi_shared_layout->handles[ref->offset];
 207         shared_data->signalled = state;
 208
 209 #ifdef DEBUG
 210         g_message ("%s: signalled shared handle offset 0x%x", __func__,
 211                    ref->offset);
 212 #endif
 213 }
 214
 215 static inline gboolean _wapi_handle_issignalled (gpointer handle)
 216 {
 217         guint32 idx = GPOINTER_TO_UINT(handle);
 218
 219         if (!_WAPI_PRIVATE_VALID_SLOT (idx)) {
 220                 return(FALSE);
 221         }
 222
 223         if (_WAPI_SHARED_HANDLE(_wapi_handle_type (handle))) {
 224                 return(WAPI_SHARED_HANDLE_DATA(handle).signalled);
 225         } else {
 226                 return(_WAPI_PRIVATE_HANDLES(idx).signalled);
 227         }
 228 }
 229
 230 static inline int _wapi_handle_lock_signal_mutex (void)
 231 {
 232 #ifdef DEBUG
 233         g_message ("%s: lock global signal mutex", __func__);
 234 #endif
 235
 236         return(mono_mutex_lock (_wapi_global_signal_mutex));
 237 }
 238
 239 /* the parameter makes it easier to call from a pthread cleanup handler */
 240 static inline int _wapi_handle_unlock_signal_mutex (void *unused)
 241 {
 242 #ifdef DEBUG
 243         g_message ("%s: unlock global signal mutex", __func__);
 244 #endif
 245
 246         return(mono_mutex_unlock (_wapi_global_signal_mutex));
 247 }
 248
 249 static inline int _wapi_handle_lock_handle (gpointer handle)
 250 {
 251         guint32 idx = GPOINTER_TO_UINT(handle);
 252
 253 #ifdef DEBUG
 254         g_message ("%s: locking handle %p", __func__, handle);
 255 #endif
 256
 257         if (!_WAPI_PRIVATE_VALID_SLOT (idx)) {
 258                 return(0);
 259         }
 260
 261         _wapi_handle_ref (handle);
 262
 263         if (_WAPI_SHARED_HANDLE (_wapi_handle_type (handle))) {
 264                 return(0);
 265         }
 266
 267         return(mono_mutex_lock (&_WAPI_PRIVATE_HANDLES(idx).signal_mutex));
 268 }
 269
 270 static inline int _wapi_handle_trylock_handle (gpointer handle)
 271 {
 272         guint32 idx = GPOINTER_TO_UINT(handle);
 273         int ret;
 274
 275 #ifdef DEBUG
 276         g_message ("%s: locking handle %p", __func__, handle);
 277 #endif
 278
 279         if (!_WAPI_PRIVATE_VALID_SLOT (idx)) {
 280                 return(0);
 281         }
 282
 283         _wapi_handle_ref (handle);
 284
 285         if (_WAPI_SHARED_HANDLE (_wapi_handle_type (handle))) {
 286                 return(0);
 287         }
 288
 289         ret = mono_mutex_trylock (&_WAPI_PRIVATE_HANDLES(idx).signal_mutex);
 290         if (ret != 0) {
 291                 _wapi_handle_unref (handle);
 292         }
 293
 294         return(ret);
 295 }
 296
 297 static inline int _wapi_handle_unlock_handle (gpointer handle)
 298 {
 299         guint32 idx = GPOINTER_TO_UINT(handle);
 300         int ret;
 301
 302 #ifdef DEBUG
 303         g_message ("%s: unlocking handle %p", __func__, handle);
 304 #endif
 305
 306         if (!_WAPI_PRIVATE_VALID_SLOT (idx)) {
 307                 return(0);
 308         }
 309
 310         if (_WAPI_SHARED_HANDLE (_wapi_handle_type (handle))) {
 311                 _wapi_handle_unref (handle);
 312                 return(0);
 313         }
 314
 315         ret = mono_mutex_unlock (&_WAPI_PRIVATE_HANDLES(idx).signal_mutex);
 316
 317         _wapi_handle_unref (handle);
 318
 319         return(ret);
 320 }
 321
 322 static inline void _wapi_handle_spin (guint32 ms)
 323 {
 324         struct timespec sleepytime;
 325
 326         g_assert (ms < 1000);
 327
 328         sleepytime.tv_sec = 0;
 329         sleepytime.tv_nsec = ms * 1000000;
 330
 331         nanosleep (&sleepytime, NULL);
 332 }
 333
 334 static inline int _wapi_handle_lock_shared_handles (void)
 335 {
 336         return(_wapi_shm_sem_lock (_WAPI_SHARED_SEM_SHARED_HANDLES));
 337 }
 338
 339 static inline int _wapi_handle_trylock_shared_handles (void)
 340 {
 341         return(_wapi_shm_sem_trylock (_WAPI_SHARED_SEM_SHARED_HANDLES));
 342 }
 343
 344 static inline int _wapi_handle_unlock_shared_handles (void)
 345 {
 346         return(_wapi_shm_sem_unlock (_WAPI_SHARED_SEM_SHARED_HANDLES));
 347 }
 348
 349 static inline int _wapi_namespace_lock (void)
 350 {
 351         return(_wapi_shm_sem_lock (_WAPI_SHARED_SEM_NAMESPACE));
 352 }
 353
 354 /* This signature makes it easier to use in pthread cleanup handlers */
 355 static inline int _wapi_namespace_unlock (gpointer data G_GNUC_UNUSED)
 356 {
 357         return(_wapi_shm_sem_unlock (_WAPI_SHARED_SEM_NAMESPACE));
 358 }
 359
 360 static inline void _wapi_handle_share_release (struct _WapiFileShare *info)
 361 {
 362         int thr_ret;
 363
 364         g_assert (info->handle_refs > 0);
 365
 366         /* Prevent new entries racing with us */
 367         thr_ret = _wapi_shm_sem_lock (_WAPI_SHARED_SEM_FILESHARE);
 368         g_assert(thr_ret == 0);
 369
 370         if (InterlockedDecrement ((gint32 *)&info->handle_refs) == 0) {
 371                 _wapi_free_share_info (info);
 372         }
 373
 374         thr_ret = _wapi_shm_sem_unlock (_WAPI_SHARED_SEM_FILESHARE);
 375 }
 376
 377 #endif /* _WAPI_HANDLES_PRIVATE_H_ */