freeswitch plugin: Copied all esl libs in libesl and modified Makefile
[collectd.git] / src / libesl / esl_threadmutex.c
diff --git a/src/libesl/esl_threadmutex.c b/src/libesl/esl_threadmutex.c
new file mode 100644 (file)
index 0000000..2aed18a
--- /dev/null
@@ -0,0 +1,237 @@
+/* 
+ * Cross Platform Thread/Mutex abstraction
+ * Copyright(C) 2007 Michael Jerris
+ *
+ * You may opt to use, copy, modify, merge, publish, distribute and/or sell
+ * copies of the Software, and permit persons to whom the Software is
+ * furnished to do so.
+ *
+ * This work is provided under this license on an "as is" basis, without warranty of any kind,
+ * either expressed or implied, including, without limitation, warranties that the covered code
+ * is free of defects, merchantable, fit for a particular purpose or non-infringing. The entire
+ * risk as to the quality and performance of the covered code is with you. Should any covered
+ * code prove defective in any respect, you (not the initial developer or any other contributor)
+ * assume the cost of any necessary servicing, repair or correction. This disclaimer of warranty
+ * constitutes an essential part of this license. No use of any covered code is authorized hereunder
+ * except under this disclaimer. 
+ *
+ */
+
+#ifdef WIN32
+/* required for TryEnterCriticalSection definition.  Must be defined before windows.h include */
+#define _WIN32_WINNT 0x0400
+#endif
+
+#include "esl.h"
+#include "esl_threadmutex.h"
+
+#ifdef WIN32
+#include <process.h>
+
+#define ESL_THREAD_CALLING_CONVENTION __stdcall
+
+struct esl_mutex {
+       CRITICAL_SECTION mutex;
+};
+
+#else
+
+#include <pthread.h>
+
+#define ESL_THREAD_CALLING_CONVENTION
+
+struct esl_mutex {
+       pthread_mutex_t mutex;
+};
+
+#endif
+
+struct esl_thread {
+#ifdef WIN32
+       void *handle;
+#else
+       pthread_t handle;
+#endif
+       void *private_data;
+       esl_thread_function_t function;
+       size_t stack_size;
+#ifndef WIN32
+       pthread_attr_t attribute;
+#endif
+};
+
+size_t thread_default_stacksize = 0;
+
+void esl_thread_override_default_stacksize(size_t size)
+{
+       thread_default_stacksize = size;
+}
+
+static void * ESL_THREAD_CALLING_CONVENTION thread_launch(void *args)
+{
+       void *exit_val;
+    esl_thread_t *thread = (esl_thread_t *)args;
+       exit_val = thread->function(thread, thread->private_data);
+#ifndef WIN32
+       pthread_attr_destroy(&thread->attribute);
+#endif
+       free(thread);
+
+       return exit_val;
+}
+
+ESL_DECLARE(esl_status_t) esl_thread_create_detached(esl_thread_function_t func, void *data)
+{
+       return esl_thread_create_detached_ex(func, data, thread_default_stacksize);
+}
+
+esl_status_t esl_thread_create_detached_ex(esl_thread_function_t func, void *data, size_t stack_size)
+{
+       esl_thread_t *thread = NULL;
+       esl_status_t status = ESL_FAIL;
+
+       if (!func || !(thread = (esl_thread_t *)malloc(sizeof(esl_thread_t)))) {
+               goto done;
+       }
+
+       thread->private_data = data;
+       thread->function = func;
+       thread->stack_size = stack_size;
+
+#if defined(WIN32)
+       thread->handle = (void *)_beginthreadex(NULL, (unsigned)thread->stack_size, (unsigned int (__stdcall *)(void *))thread_launch, thread, 0, NULL);
+       if (!thread->handle) {
+               goto fail;
+       }
+       CloseHandle(thread->handle);
+
+       status = ESL_SUCCESS;
+       goto done;
+#else
+       
+       if (pthread_attr_init(&thread->attribute) != 0) goto fail;
+
+       if (pthread_attr_setdetachstate(&thread->attribute, PTHREAD_CREATE_DETACHED) != 0) goto failpthread;
+
+       if (thread->stack_size && pthread_attr_setstacksize(&thread->attribute, thread->stack_size) != 0) goto failpthread;
+
+       if (pthread_create(&thread->handle, &thread->attribute, thread_launch, thread) != 0) goto failpthread;
+
+       status = ESL_SUCCESS;
+       goto done;
+ failpthread:
+       pthread_attr_destroy(&thread->attribute);
+#endif
+
+ fail:
+       if (thread) {
+               free(thread);
+       }
+ done:
+       return status;
+}
+
+
+ESL_DECLARE(esl_status_t) esl_mutex_create(esl_mutex_t **mutex)
+{
+       esl_status_t status = ESL_FAIL;
+#ifndef WIN32
+       pthread_mutexattr_t attr;
+#endif
+       esl_mutex_t *check = NULL;
+
+       check = (esl_mutex_t *)malloc(sizeof(**mutex));
+       if (!check)
+               goto done;
+#ifdef WIN32
+       InitializeCriticalSection(&check->mutex);
+#else
+       if (pthread_mutexattr_init(&attr))
+               goto done;
+
+       if (pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_RECURSIVE))
+               goto fail;
+
+       if (pthread_mutex_init(&check->mutex, &attr))
+               goto fail;
+
+       goto success;
+
+ fail:
+       pthread_mutexattr_destroy(&attr);
+       goto done;
+
+ success:
+#endif
+       *mutex = check;
+       status = ESL_SUCCESS;
+
+ done:
+       return status;
+}
+
+ESL_DECLARE(esl_status_t) esl_mutex_destroy(esl_mutex_t **mutex)
+{
+       esl_mutex_t *mp = *mutex;
+       *mutex = NULL;
+       if (!mp) {
+               return ESL_FAIL;
+       }
+#ifdef WIN32
+       DeleteCriticalSection(&mp->mutex);
+#else
+       if (pthread_mutex_destroy(&mp->mutex))
+               return ESL_FAIL;
+#endif
+       free(mp);
+       return ESL_SUCCESS;
+}
+
+ESL_DECLARE(esl_status_t) esl_mutex_lock(esl_mutex_t *mutex)
+{
+#ifdef WIN32
+       EnterCriticalSection(&mutex->mutex);
+#else
+       if (pthread_mutex_lock(&mutex->mutex))
+               return ESL_FAIL;
+#endif
+       return ESL_SUCCESS;
+}
+
+ESL_DECLARE(esl_status_t) esl_mutex_trylock(esl_mutex_t *mutex)
+{
+#ifdef WIN32
+       if (!TryEnterCriticalSection(&mutex->mutex))
+               return ESL_FAIL;
+#else
+       if (pthread_mutex_trylock(&mutex->mutex))
+               return ESL_FAIL;
+#endif
+       return ESL_SUCCESS;
+}
+
+ESL_DECLARE(esl_status_t) esl_mutex_unlock(esl_mutex_t *mutex)
+{
+#ifdef WIN32
+       LeaveCriticalSection(&mutex->mutex);
+#else
+       if (pthread_mutex_unlock(&mutex->mutex))
+               return ESL_FAIL;
+#endif
+       return ESL_SUCCESS;
+}
+
+
+
+
+
+/* For Emacs:
+ * Local Variables:
+ * mode:c
+ * indent-tabs-mode:t
+ * tab-width:4
+ * c-basic-offset:4
+ * End:
+ * For VIM:
+ * vim:set softtabstop=4 shiftwidth=4 tabstop=4 expandtab:
+ */