source: libcf/trunk/src/cf_thread.c@ 4

/**
 * cf_thread.c
 */
#include "cf_thread.h"
#include "cf_local.h"

#include <stdlib.h>

#ifdef _WIN32
# include <windows.h>
# include <process.h>
# define THREAD_TYPE    HANDLE
# define MUTEX_TYPE     HANDLE
#else // #ifdef _WIN32
# include <pthread.h>
# define THREAD_TYPE    pthread_t
# define MUTEX_TYPE     pthread_mutex_t
#endif // #ifdef _WIN32

#define CHECK_INVALID_THREAD(__h)       \
    if (__h == NULL)                    \
        return CF_ERROR_THREAD_INVALID_ARGS

#define CHECK_INVALID_MUTEX(__h)        \
    if (__h == NULL)                    \
        return CF_ERROR_MUTEX_INVALID_ARGS

int
CF_CLOSE_CTX (void * ctx)
{
#ifdef _WIN32
    CloseHandle (ctx);
#else
    free (ctx);
#endif

    return CF_OK;
}

int
CF_Thread_Create (CF_Thread         * threadID,
                  CF_THREAD_RETURN  callback,
                  void              * arg)
{
    int result = 0;

    TRY
    {
#ifdef _WIN32
        *threadID = (THREAD_TYPE) _beginthreadex (0, 0, callback, arg, 0, 0);
        if (*threadID == NULL)
            result = -1;
#else
        *threadID = (THREAD_TYPE *) calloc (sizeof (THREAD_TYPE), 1);
        if (*threadID == NULL)
        {
            result = -2;
            TRY_BREAK;
        }

        result = pthread_create ((THREAD_TYPE *) *threadID, NULL, callback, arg);
#endif
    }
    CATCH_IF (result < 0)
    {
        return CF_ERROR_THREAD_CREATE;
    }

    return CF_OK;
}

int
CF_Thread_Release (CF_Thread * threadID)
{
    CHECK_INVALID_THREAD (*threadID);

    CF_CLOSE_CTX (*threadID);

    return CF_OK;
}

int
CF_Thread_Join (CF_Thread * threadID)
{
    CHECK_INVALID_THREAD (*threadID);

#ifdef _WIN32
    WaitForSingleObject ((THREAD_TYPE) *threaID, INFINITE);
#else
    int status;
    pthread_join (*((THREAD_TYPE *) *threadID), (void *)&status);
#endif

    return CF_OK;
}

int
CF_Mutex_Create (CF_Mutex * mutex)
{
    int result = 0;

    TRY
    {
#ifdef _WIN32
        *mutex = (MUTEX_TYPE) CreateMutexA (NULL, FALSE, NULL);
        if (*mutex == NULL)
        {
            result = -1;
            TRY_BREAK;
        }
#else
        *mutex = (MUTEX_TYPE *) calloc (sizeof (MUTEX_TYPE), 1);
        if (*mutex == NULL)
        {
            result = -2;
            TRY_BREAK;
        }

        result = pthread_mutex_init (*mutex, NULL);
#endif
    }
    CATCH_IF (result < 0)
    {
        return CF_ERROR_MUTEX_CREATE;
    }

    return CF_OK;
}

int
CF_Mutex_Destory (CF_Mutex * mutex)
{
    CHECK_INVALID_MUTEX (*mutex);

    CF_CLOSE_CTX (*mutex);

    return CF_OK;
}

int
CF_Mutex_Lock (CF_Mutex * mutex)
{
    CHECK_INVALID_MUTEX (*mutex);

#ifdef _WIN32
    WaitForSingleObject ((MUTEX_TYPE) *mutex, INFINITE);
#else
    pthread_mutex_lock ((MUTEX_TYPE *) *mutex);
#endif

    return CF_OK;
}

int
CF_Mutex_Unlock (CF_Mutex * mutex)
{
    CHECK_INVALID_MUTEX (*mutex);

#ifdef _WIN32
    ReleaseMutex (*mutex);
#else
    pthread_mutex_unlock ((MUTEX_TYPE *) *mutex);
#endif

    return CF_OK;
}