/* This file is part of the YAZ toolkit.
- * Copyright (C) 1995-2010 Index Data
+ * Copyright (C) 1995-2013 Index Data
* See the file LICENSE for details.
*/
#include <yaz/nmem.h>
#include <yaz/log.h>
#include <yaz/mutex.h>
-
+#include <yaz/gettimeofday.h>
#ifdef WIN32
#include <windows.h>
+#include <sys/timeb.h>
+#endif
+#include <time.h>
+
+#if HAVE_SYS_TIME_H
+#include <sys/time.h>
#endif
#if YAZ_POSIX_THREADS
#include <pthread.h>
#endif
-#if YAZ_GNU_THREADS
-#include <pth.h>
-#endif
+#include "mutex-p.h"
-#ifdef WIN32
-struct yaz_mutex {
- CRITICAL_SECTION m_handle;
-};
-#elif YAZ_POSIX_THREADS
-struct yaz_mutex {
- pthread_mutex_t m_handle;
-};
-#elif YAZ_GNU_THREADS
-struct yaz_mutex {
- pth_mutex_t m_handle;
-};
-#else
-struct yaz_mutex {
- int dummy;
-};
-#endif
-
-YAZ_EXPORT void yaz_mutex_create(YAZ_MUTEX *p)
+void yaz_mutex_create(YAZ_MUTEX *p)
{
if (!*p)
{
*p = (YAZ_MUTEX) malloc(sizeof(**p));
#ifdef WIN32
- InitializeCriticalSection(&(*p)->m_handle);
+ InitializeCriticalSection(&(*p)->handle);
#elif YAZ_POSIX_THREADS
- pthread_mutex_init(&(*p)->m_handle, 0);
-#elif YAZ_GNU_THREADS
- pth_mutex_init(&(*p)->m_handle);
+ pthread_mutex_init(&(*p)->handle, 0);
#endif
+ (*p)->name = 0;
+ (*p)->log_level = 0;
}
}
-YAZ_EXPORT void yaz_mutex_enter(YAZ_MUTEX p)
+void yaz_mutex_set_name(YAZ_MUTEX p, int log_level, const char *name)
+{
+ if (p->name)
+ free(p->name);
+ p->name = 0;
+ p->log_level = 0;
+ if (name)
+ {
+ p->name = strdup(name);
+ p->log_level = log_level;
+ }
+}
+
+void yaz_mutex_enter(YAZ_MUTEX p)
{
if (p)
{
#ifdef WIN32
- EnterCriticalSection(&p->m_handle);
+ EnterCriticalSection(&p->handle);
#elif YAZ_POSIX_THREADS
- pthread_mutex_lock(&p->m_handle);
+ int r = 1; /* signal : not locked (yet) */
+
+ if (p->log_level)
+ { /* debugging */
+ r = pthread_mutex_trylock(&p->handle);
+ if (r)
+ {
+#if HAVE_SYS_TIME_H
+ long long d;
+ struct timeval tv1, tv2;
+ gettimeofday(&tv1, 0);
+#endif
+ yaz_log(p->log_level,
+ "yaz_mutex_enter: %p tid=%p name=%s waiting",
+ p, (void *) pthread_self(), p->name);
+#if HAVE_SYS_TIME_H
+ r = pthread_mutex_lock(&p->handle);
+ gettimeofday(&tv2, 0);
+ d = 1000000LL * ((long long) tv2.tv_sec - tv1.tv_sec) +
+ tv2.tv_usec - tv1.tv_usec;
+ yaz_log(p->log_level, "yaz_mutex_enter: %p tid=%p name=%s "
+ "lock delay %lld",
+ p, (void *) pthread_self(), p->name, d);
+#endif
+ }
+ else
+ {
+ yaz_log(p->log_level, "yaz_mutex_enter: %p tid=%p name=%s lock",
+ p, (void *) pthread_self(), p->name);
+ }
+ }
+ if (r)
+ {
+ r = pthread_mutex_lock(&p->handle);
+ if (p->log_level)
+ {
+ yaz_log(p->log_level, "yaz_mutex_enter: %p tid=%p name=%s lock",
+ p, (void *) pthread_self(), p->name);
+ }
+ }
#endif
}
}
-YAZ_EXPORT void yaz_mutex_leave(YAZ_MUTEX p)
+void yaz_mutex_leave(YAZ_MUTEX p)
{
if (p)
{
#ifdef WIN32
- LeaveCriticalSection(&p->m_handle);
+ LeaveCriticalSection(&p->handle);
#elif YAZ_POSIX_THREADS
- pthread_mutex_unlock(&p->m_handle);
+ pthread_mutex_unlock(&p->handle);
+ if (p->log_level)
+ {
+ yaz_log(p->log_level,
+ "yaz_mutex_leave: %p tid=%p name=%s unlock",
+ p, (void *) pthread_self(), p->name);
+ }
#endif
}
}
-YAZ_EXPORT void yaz_mutex_destroy(YAZ_MUTEX *p)
+void yaz_mutex_destroy(YAZ_MUTEX *p)
{
if (*p)
{
#ifdef WIN32
- DeleteCriticalSection(&(*p)->m_handle);
+ DeleteCriticalSection(&(*p)->handle);
+#elif YAZ_POSIX_THREADS
+ pthread_mutex_destroy(&(*p)->handle);
#endif
+ if ((*p)->name)
+ free((*p)->name);
free(*p);
*p = 0;
}