-/*\r
-\r
- silcsymbianthread.cpp\r
-\r
- Author: Pekka Riikonen <priikone@silcnet.org>\r
-\r
- Copyright (C) 2006 Pekka Riikonen\r
-\r
- This program is free software; you can redistribute it and/or modify\r
- it under the terms of the GNU General Public License as published by\r
- the Free Software Foundation; version 2 of the License.\r
-\r
- This program is distributed in the hope that it will be useful,\r
- but WITHOUT ANY WARRANTY; without even the implied warranty of\r
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
- GNU General Public License for more details.\r
-\r
-*/\r
-\r
-#include "silc.h"\r
-#include <e32std.h>\r
-\r
-/**************************** SILC Thread API *******************************/\r
-\r
-/* Thread structure for Symbian */\r
-typedef struct {\r
-#ifdef SILC_THREADS\r
- RThread *thread;\r
- SilcThreadStart start_func;\r
- void *context;\r
- bool waitable;\r
-#else\r
- void *tmp;\r
-#endif\r
-} *SilcSymbianThread;\r
-\r
-/* The actual thread function */\r
-\r
-TInt silc_thread_epoc_start(TAny *context)\r
-{\r
-#ifdef SILC_THREADS\r
- SilcSymbianThread thread = (SilcSymbianThread)context;\r
- void *ret;\r
-\r
- ret = thread->start_func(thread->context);\r
- silc_thread_exit(ret);\r
-\r
-#endif\r
- return 0;\r
-}\r
-\r
-SilcThread silc_thread_create(SilcThreadStart start_func, void *context,\r
- bool waitable)\r
-{\r
-#ifdef SILC_THREADS\r
- SilcSymbianThread thread;\r
- TInt ret;\r
- TBuf<32> name;\r
-\r
- SILC_LOG_DEBUG(("Creating new thread"));\r
-\r
- thread = (SilcSymbianThread)silc_calloc(1, sizeof(*thread));\r
- if (!thread)\r
- return NULL;\r
- thread->start_func = start_func;\r
- thread->context = context;\r
- thread->waitable = waitable;\r
-\r
- /* Create the thread */\r
- /* XXX Unique name should be given for the thread */\r
- thread->thread = new RThread();\r
- if (!thread->thread) {\r
- silc_free(thread);\r
- return NULL;\r
- }\r
-\r
- name = (TText *)"silc" + time(NULL);\r
- ret = thread->thread->Create(name, silc_thread_epoc_start,\r
- 8192, 4096, 1024 * 1024, (TAny *)thread);\r
- if (ret != KErrNone) {\r
- SILC_LOG_ERROR(("Could not create new thread"));\r
- delete thread->thread;\r
- silc_free(thread);\r
- return NULL;\r
- }\r
- thread->thread->Resume();\r
-\r
- return (SilcThread)thread;\r
-#else\r
- /* Call thread callback immediately */\r
- (*start_func)(context);\r
- return NULL;\r
-#endif\r
-}\r
-\r
-void silc_thread_exit(void *exit_value)\r
-{\r
-#ifdef SILC_THREADS\r
- /* XXX */\r
-#endif\r
-}\r
-\r
-SilcThread silc_thread_self(void)\r
-{\r
-#ifdef SILC_THREADS\r
- /* XXX */\r
- return NULL;\r
-#else\r
- return NULL;\r
-#endif\r
-}\r
-\r
-SilcBool silc_thread_wait(SilcThread thread, void **exit_value)\r
-{\r
-#ifdef SILC_THREADS\r
- /* XXX */\r
- return TRUE;\r
-#else\r
- return FALSE;\r
-#endif\r
-}\r
-\r
-/***************************** SILC Mutex API *******************************/\r
-\r
-/* SILC Mutex structure */\r
-struct SilcMutexStruct {\r
-#ifdef SILC_THREADS\r
- RMutex *mutex;\r
-#endif /* SILC_THREADS */\r
- unsigned int locked : 1;\r
-};\r
-\r
-SilcBool silc_mutex_alloc(SilcMutex *mutex)\r
-{\r
-#ifdef SILC_THREADS\r
- *mutex = (SilcMutex)silc_calloc(1, sizeof(**mutex));\r
- if (*mutex == NULL)\r
- return FALSE;\r
- (*mutex)->mutex = new RMutex();\r
- if (!(*mutex)->mutex) {\r
- silc_free(*mutex);\r
- return FALSE;\r
- }\r
- if ((*mutex)->mutex->CreateLocal() != KErrNone) {\r
- delete (*mutex)->mutex;\r
- silc_free(*mutex);\r
- return FALSE;\r
- }\r
- (*mutex)->locked = FALSE;\r
- return TRUE;\r
-#else\r
- return FALSE;\r
-#endif /* SILC_THREADS */\r
-}\r
-\r
-void silc_mutex_free(SilcMutex mutex)\r
-{\r
-#ifdef SILC_THREADS\r
- if (mutex) {\r
- mutex->mutex->Close();\r
- delete mutex->mutex;\r
- silc_free(mutex);\r
- }\r
-#endif /* SILC_THREADS */\r
-}\r
-\r
-void silc_mutex_lock(SilcMutex mutex)\r
-{\r
-#ifdef SILC_THREADS\r
- if (mutex) {\r
- mutex->mutex->Wait();\r
- mutex->locked = TRUE;\r
- }\r
-#endif /* SILC_THREADS */\r
-}\r
-\r
-void silc_mutex_unlock(SilcMutex mutex)\r
-{\r
-#ifdef SILC_THREADS\r
- if (mutex) {\r
- mutex->mutex->Signal();\r
- mutex->locked = FALSE;\r
- }\r
-#endif /* SILC_THREADS */\r
-}\r
-\r
-void silc_mutex_assert_locked(SilcMutex mutex)\r
-{\r
-#ifdef SILC_THREADS\r
- if (mutex)\r
- SILC_ASSERT(mutex->locked);\r
-#endif /* SILC_THREADS */\r
-}\r
-\r
-\r
-/****************************** SILC Cond API *******************************/\r
-\r
-/* SILC Conditional Variable context */\r
-struct SilcCondStruct {\r
-#ifdef SILC_THREADS\r
- RCondVar *cond;\r
-#else\r
- void *tmp;\r
-#endif /* SILC_THREADS*/\r
-};\r
-\r
-SilcBool silc_cond_alloc(SilcCond *cond)\r
-{\r
-#ifdef SILC_THREADS\r
- *cond = (SilcCond)silc_calloc(1, sizeof(**cond));\r
- if (*cond == NULL)\r
- return FALSE;\r
- (*cond)->cond = new RCondVar();\r
- if (!(*cond)->cond) {\r
- silc_free(*cond);\r
- return FALSE;\r
- }\r
- if ((*cond)->cond->CreateLocal() != KErrNone) {\r
- delete (*cond)->cond;\r
- silc_free(*cond);\r
- return FALSE;\r
- }\r
- return TRUE;\r
-#else\r
- return FALSE;\r
-#endif /* SILC_THREADS*/\r
-}\r
-\r
-void silc_cond_free(SilcCond cond)\r
-{\r
-#ifdef SILC_THREADS\r
- cond->cond->Close();\r
- delete cond->cond;\r
- silc_free(cond);\r
-#endif /* SILC_THREADS*/\r
-}\r
-\r
-void silc_cond_signal(SilcCond cond)\r
-{\r
-#ifdef SILC_THREADS\r
- cond->cond->Signal();\r
-#endif /* SILC_THREADS*/\r
-}\r
-\r
-void silc_cond_broadcast(SilcCond cond)\r
-{\r
-#ifdef SILC_THREADS\r
- cond->cond->Broadcast();\r
-#endif /* SILC_THREADS*/\r
-}\r
-\r
-void silc_cond_wait(SilcCond cond, SilcMutex mutex)\r
-{\r
-#ifdef SILC_THREADS\r
- cond->cond->Wait(*mutex->mutex);\r
-#endif /* SILC_THREADS*/\r
-}\r
-\r
-SilcBool silc_cond_timedwait(SilcCond cond, SilcMutex mutex,\r
- int timeout)\r
-{\r
-#ifdef SILC_THREADS\r
- if (timeout)\r
- return (cond->cond->TimedWait(*mutex->mutex, (TInt)timeout * 1000) ==\r
- KErrNone);\r
- return (cond->cond->Wait(*mutex->mutex) == KErrNone);\r
-#else\r
- return FALSE;\r
-#endif /* SILC_THREADS*/\r
-}\r
+/*
+
+ silcsymbianthread.cpp
+
+ Author: Pekka Riikonen <priikone@silcnet.org>
+
+ Copyright (C) 2006 - 2007 Pekka Riikonen
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; version 2 of the License.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+*/
+
+#include "silc.h"
+#include <e32base.h>
+#include <e32std.h>
+
+/**************************** SILC Thread API *******************************/
+
+extern "C" {
+
+/* Thread structure for Symbian */
+struct SilcSymbianThread {
+#ifdef SILC_THREADS
+ SilcThreadStart start_func;
+ void *context;
+ SilcBool waitable;
+#else
+ void *tmp;
+#endif
+};
+
+/* The actual thread function */
+
+static TInt silc_thread_start(TAny *context)
+{
+#ifdef SILC_THREADS
+ SilcSymbianThread *tc = (SilcSymbianThread *)context;
+ SilcThreadStart start_func = tc->start_func;
+ void *user_context = tc->context;
+ SilcBool waitable = tc->waitable;
+ void *ret = NULL;
+
+ silc_free(tc);
+
+ CTrapCleanup *cs = CTrapCleanup::New();
+ if (cs) {
+ CActiveScheduler *s = new CActiveScheduler;
+ if(s) {
+ CActiveScheduler::Install(s);
+
+ /* Call the thread function */
+ TRAPD(ret_val, ret = start_func(user_context));
+
+ delete s;
+ }
+ delete cs;
+ }
+
+ silc_thread_exit(ret);
+
+#endif
+ return KErrNone;
+}
+
+/* Executed new thread */
+
+SilcThread silc_thread_create(SilcThreadStart start_func, void *context,
+ SilcBool waitable)
+{
+#ifdef SILC_THREADS
+ SilcSymbianThread *tc;
+ RThread *thread;
+ TInt ret;
+ char tmp[24];
+ SilcUInt16 wname[24];
+
+ SILC_LOG_DEBUG(("Creating new thread"));
+
+ tc = (SilcSymbianThread *)silc_calloc(1, sizeof(*tc));
+ if (!tc)
+ return NULL;
+ tc->start_func = start_func;
+ tc->context = context;
+ tc->waitable = waitable;
+
+ /* Allocate thread */
+ thread = new RThread;
+ if (!thread) {
+ silc_free(tc);
+ return NULL;
+ }
+
+ /* Create the thread */
+ silc_snprintf(tmp, sizeof(tmp), "thread-%p", tc);
+ silc_utf8_c2w((const unsigned char *)tmp, strlen(tmp), wname,
+ sizeof(wname) / sizeof(wname[0]));
+ TBuf<24> name((unsigned short *)wname);
+ name.PtrZ();
+ ret = thread->Create(name, silc_thread_start, 8192, NULL, tc);
+ if (ret != KErrNone) {
+ SILC_LOG_ERROR(("Could not create new thread, error %d", ret));
+ delete thread;
+ silc_free(tc);
+ return NULL;
+ }
+
+ /* Start the thread */
+ thread->Resume();
+
+ /* Close our instance to the thread */
+ thread->Close();
+
+ return (SilcThread)thread;
+#else
+ /* Call thread callback immediately */
+ (*start_func)(context);
+ return NULL;
+#endif
+}
+
+/* Exits current thread */
+
+void silc_thread_exit(void *exit_value)
+{
+#ifdef SILC_THREADS
+ RThread().Kill((TInt)exit_value);
+#endif
+}
+
+/* Returns current thread context */
+
+SilcThread silc_thread_self(void)
+{
+#ifdef SILC_THREADS
+ RThread thread = RThread();
+ return (SilcThread)&thread;
+#else
+ return NULL;
+#endif
+}
+
+/* Blocks calling thread to wait for `thread' to finish. */
+
+SilcBool silc_thread_wait(SilcThread thread, void **exit_value)
+{
+#ifdef SILC_THREADS
+ TRequestStatus req;
+ RThread *t = (RThread *)thread;
+ t->Logon(req);
+ User::WaitForAnyRequest();
+ return TRUE;
+#else
+ return FALSE;
+#endif
+}
+
+/* Yield processor */
+
+void silc_thread_yield(void)
+{
+#ifdef SILC_THREADS
+ User::After(1);
+#endif /* SILC_THREADS */
+}
+
+/***************************** SILC Mutex API *******************************/
+
+/* SILC Mutex structure */
+struct SilcMutexStruct {
+#ifdef SILC_THREADS
+ RMutex *mutex;
+#endif /* SILC_THREADS */
+ unsigned int locked : 1;
+};
+
+SilcBool silc_mutex_alloc(SilcMutex *mutex)
+{
+#ifdef SILC_THREADS
+ *mutex = (SilcMutex)silc_calloc(1, sizeof(**mutex));
+ if (*mutex == NULL)
+ return FALSE;
+ (*mutex)->mutex = new RMutex();
+ if (!(*mutex)->mutex) {
+ silc_free(*mutex);
+ return FALSE;
+ }
+ if ((*mutex)->mutex->CreateLocal() != KErrNone) {
+ delete (*mutex)->mutex;
+ silc_free(*mutex);
+ return FALSE;
+ }
+ (*mutex)->locked = FALSE;
+ return TRUE;
+#else
+ return FALSE;
+#endif /* SILC_THREADS */
+}
+
+void silc_mutex_free(SilcMutex mutex)
+{
+#ifdef SILC_THREADS
+ if (mutex) {
+ mutex->mutex->Close();
+ delete mutex->mutex;
+ silc_free(mutex);
+ }
+#endif /* SILC_THREADS */
+}
+
+void silc_mutex_lock(SilcMutex mutex)
+{
+#ifdef SILC_THREADS
+ if (mutex) {
+ mutex->mutex->Wait();
+ mutex->locked = TRUE;
+ }
+#endif /* SILC_THREADS */
+}
+
+void silc_mutex_unlock(SilcMutex mutex)
+{
+#ifdef SILC_THREADS
+ if (mutex) {
+ mutex->mutex->Signal();
+ mutex->locked = FALSE;
+ }
+#endif /* SILC_THREADS */
+}
+
+void silc_mutex_assert_locked(SilcMutex mutex)
+{
+#ifdef SILC_THREADS
+ if (mutex)
+ SILC_ASSERT(mutex->locked);
+#endif /* SILC_THREADS */
+}
+
+/***************************** SILC Rwlock API *****************************/
+
+/* SILC read/write lock structure */
+struct SilcRwLockStruct {
+#ifdef SILC_THREADS
+ SilcMutex mutex;
+ SilcCond cond;
+#endif /* SILC_THREADS */
+ unsigned int readers : 31;
+ unsigned int locked : 1;
+};
+
+SilcBool silc_rwlock_alloc(SilcRwLock *rwlock)
+{
+#ifdef SILC_THREADS
+ *rwlock = (SilcRwLock)silc_calloc(1, sizeof(**rwlock));
+ if (!(*rwlock))
+ return FALSE;
+ if (!silc_mutex_alloc(&(*rwlock)->mutex)) {
+ silc_free(*rwlock);
+ return FALSE;
+ }
+ if (!silc_cond_alloc(&(*rwlock)->cond)) {
+ silc_mutex_free((*rwlock)->mutex);
+ silc_free(*rwlock);
+ return FALSE;
+ }
+ return TRUE;
+#else
+ return FALSE;
+#endif /* SILC_THREADS */
+}
+
+void silc_rwlock_free(SilcRwLock rwlock)
+{
+#ifdef SILC_THREADS
+ if (rwlock) {
+ silc_mutex_free(rwlock->mutex);
+ silc_cond_free(rwlock->cond);
+ silc_free(rwlock);
+ }
+#endif /* SILC_THREADS */
+}
+
+void silc_rwlock_rdlock(SilcRwLock rwlock)
+{
+#ifdef SILC_THREADS
+ if (rwlock) {
+ silc_mutex_lock(rwlock->mutex);
+ rwlock->readers++;
+ silc_mutex_unlock(rwlock->mutex);
+ }
+#endif /* SILC_THREADS */
+}
+
+void silc_rwlock_wrlock(SilcRwLock rwlock)
+{
+#ifdef SILC_THREADS
+ if (rwlock) {
+ silc_mutex_lock(rwlock->mutex);
+ while (rwlock->readers > 0)
+ silc_cond_wait(rwlock->cond, rwlock->mutex);
+ rwlock->locked = TRUE;
+ }
+#endif /* SILC_THREADS */
+}
+
+void silc_rwlock_unlock(SilcRwLock rwlock)
+{
+#ifdef SILC_THREADS
+ if (rwlock) {
+ if (rwlock->locked) {
+ /* Unlock writer */
+ rwlock->locked = FALSE;
+ silc_mutex_unlock(rwlock->mutex);
+ return;
+ }
+
+ /* Unlock reader */
+ silc_mutex_lock(rwlock->mutex);
+ rwlock->readers--;
+ silc_cond_broadcast(rwlock->cond);
+ silc_mutex_unlock(rwlock->mutex);
+ }
+#endif /* SILC_THREADS */
+}
+
+/****************************** SILC Cond API *******************************/
+
+/* SILC Conditional Variable context */
+struct SilcCondStruct {
+#ifdef SILC_THREADS
+ RCondVar *cond;
+#else
+ void *tmp;
+#endif /* SILC_THREADS*/
+};
+
+SilcBool silc_cond_alloc(SilcCond *cond)
+{
+#ifdef SILC_THREADS
+ *cond = (SilcCond)silc_calloc(1, sizeof(**cond));
+ if (*cond == NULL)
+ return FALSE;
+ (*cond)->cond = new RCondVar();
+ if (!(*cond)->cond) {
+ silc_free(*cond);
+ return FALSE;
+ }
+ if ((*cond)->cond->CreateLocal() != KErrNone) {
+ delete (*cond)->cond;
+ silc_free(*cond);
+ return FALSE;
+ }
+ return TRUE;
+#else
+ return FALSE;
+#endif /* SILC_THREADS*/
+}
+
+void silc_cond_free(SilcCond cond)
+{
+#ifdef SILC_THREADS
+ cond->cond->Close();
+ delete cond->cond;
+ silc_free(cond);
+#endif /* SILC_THREADS*/
+}
+
+void silc_cond_signal(SilcCond cond)
+{
+#ifdef SILC_THREADS
+ cond->cond->Signal();
+#endif /* SILC_THREADS*/
+}
+
+void silc_cond_broadcast(SilcCond cond)
+{
+#ifdef SILC_THREADS
+ cond->cond->Broadcast();
+#endif /* SILC_THREADS*/
+}
+
+void silc_cond_wait(SilcCond cond, SilcMutex mutex)
+{
+#ifdef SILC_THREADS
+ cond->cond->Wait(*mutex->mutex);
+#endif /* SILC_THREADS*/
+}
+
+SilcBool silc_cond_timedwait(SilcCond cond, SilcMutex mutex,
+ int timeout)
+{
+#ifdef SILC_THREADS
+ TInt ret;
+ if (timeout) {
+ ret = cond->cond->TimedWait(*mutex->mutex, (TInt)timeout * 1000);
+ if (ret != KErrNone)
+ SILC_LOG_DEBUG(("TimedWait returned %d", ret));
+ return ret != KErrTimedOut;
+ }
+ return (cond->cond->Wait(*mutex->mutex) == KErrNone);
+#else
+ return FALSE;
+#endif /* SILC_THREADS*/
+}
+
+} /* extern "C" */