/* This file is part of the YAZ toolkit.
- * Copyright (C) 1995-2010 Index Data
+ * Copyright (C) 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
-struct yaz_mutex {
-#ifdef WIN32
- CRITICAL_SECTION handle;
-#elif YAZ_POSIX_THREADS
- pthread_mutex_t handle;
-#endif
- char *name;
-};
+#include "mutex-p.h"
void yaz_mutex_create(YAZ_MUTEX *p)
{
pthread_mutex_init(&(*p)->handle, 0);
#endif
(*p)->name = 0;
+ (*p)->log_level = 0;
}
}
-void yaz_mutex_set_name(YAZ_MUTEX p, const char *name)
+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)
#ifdef WIN32
EnterCriticalSection(&p->handle);
#elif YAZ_POSIX_THREADS
- int r = 1;
- if (p->name)
+ int r = 1; /* signal : not locked (yet) */
+
+ if (p->log_level)
{ /* debugging */
r = pthread_mutex_trylock(&p->handle);
if (r)
{
- yaz_log(YLOG_WARN|YLOG_ERRNO,
- "yaz_mutex_enter: %p name=%s waiting", p, p->name);
+#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 && pthread_mutex_lock(&p->handle))
+ if (r)
{
- yaz_log(YLOG_WARN|YLOG_ERRNO, "yaz_mutex_enter: %p error", p);
+ 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
- if (p->name)
- {
- yaz_log(YLOG_LOG, "yaz_mutex_enter: %p name=%s lock", p, p->name);
- }
}
}
LeaveCriticalSection(&p->handle);
#elif YAZ_POSIX_THREADS
pthread_mutex_unlock(&p->handle);
-#endif
- if (p->name)
+ if (p->log_level)
{
- yaz_log(YLOG_LOG, "yaz_mutex_leave: %p name=%s unlock", p, p->name);
+ yaz_log(p->log_level,
+ "yaz_mutex_leave: %p tid=%p name=%s unlock",
+ p, (void *) pthread_self(), p->name);
}
+#endif
}
}