/*
    SDL - Simple DirectMedia Layer
    Copyright (C) 1997-2006 Sam Lantinga

    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Lesser General Public
    License as published by the Free Software Foundation; either
    version 2.1 of the License, or (at your option) any later version.

    This library 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
    Lesser General Public License for more details.

    You should have received a copy of the GNU Lesser General Public
    License along with this library; if not, write to the Free Software
    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

    Sam Lantinga
    slouken@libsdl.org
*/
#include "SDL_config.h"

/* BeOS thread management routines for SDL */

#include "SDL_mutex.h"
#include "SDL_thread.h"
#include "../SDL_thread_c.h"
#include "../SDL_systhread.h"
#include "mydebug.h"

typedef struct
{
    int (*func) (void *);
    void *data;
    SDL_Thread *info;
    struct Task *wait;
} thread_args;

#ifndef MORPHOS

#if defined(__SASC) && !defined(__PPC__)
__saveds __asm Uint32
RunThread(register __a0 char *args)
#elif defined(__PPC__)
Uint32
RunThread(char *args)
#else
Uint32 __saveds
RunThread(char *args __asm("a0"))
#endif
{
#ifdef STORMC4_WOS
    thread_args *data = (thread_args *) args;
#else
    thread_args *data = (thread_args *) atol(args);
#endif

    struct Task *Father;

    D(bug("Received data: %lx\n", data));
    Father = data->wait;

    SDL_RunThread(data);

    Signal(Father, SIGBREAKF_CTRL_F);
    D(bug("Thread with data %lx ended\n", data));
    return (0);
}

#else

#include <emul/emulinterface.h>

Uint32
RunTheThread(void)
{
    thread_args *data = (thread_args *) atol((char *) REG_A0);
    struct Task *Father;

    D(bug("Received data: %lx\n", data));
    Father = data->wait;

    SDL_RunThread(data);

    Signal(Father, SIGBREAKF_CTRL_F);
    D(bug("Thread with data %lx ended\n", data));
    return (0);
}

struct EmulLibEntry RunThreadStruct = {
    TRAP_LIB,
    0,
    (ULONG) RunTheThread
};

void *RunThread = &RunThreadStruct;
#endif


int
SDL_SYS_CreateThread(SDL_Thread * thread, void *args)
{
    /* Create the thread and go! */
    char buffer[20];

    D(bug("Sending %lx to the new thread...\n", args));

    if (args)
        SDL_snprintf(buffer, SDL_arraysize(buffer), "%ld", args);

#ifdef STORMC4_WOS
    thread->handle = CreateTaskPPCTags(TASKATTR_CODE, RunThread,
                                       TASKATTR_NAME, "SDL subtask",
                                       TASKATTR_STACKSIZE, 100000,
                                       (args ? TASKATTR_R3 : TAG_IGNORE),
                                       args, TASKATTR_INHERITR2, TRUE,
                                       TAG_DONE);
#else
    thread->handle = (struct Task *) CreateNewProcTags(NP_Output, Output(),
                                                       NP_Name,
                                                       (ULONG) "SDL subtask",
                                                       NP_CloseOutput, FALSE,
                                                       NP_StackSize, 20000,
                                                       NP_Entry,
                                                       (ULONG) RunThread,
                                                       args ? NP_Arguments :
                                                       TAG_IGNORE,
                                                       (ULONG) buffer,
                                                       TAG_DONE);
#endif

    if (!thread->handle) {
        SDL_SetError("Not enough resources to create thread");
        return (-1);
    }

    return (0);
}

void
SDL_SYS_SetupThread(void)
{
}

Uint32
SDL_ThreadID(void)
{
    return ((Uint32) FindTask(NULL));
}

void
SDL_SYS_WaitThread(SDL_Thread * thread)
{
    SetSignal(0L, SIGBREAKF_CTRL_F | SIGBREAKF_CTRL_C);
    Wait(SIGBREAKF_CTRL_F | SIGBREAKF_CTRL_C);
}

void
SDL_SYS_KillThread(SDL_Thread * thread)
{
    Signal((struct Task *) thread->handle, SIGBREAKF_CTRL_C);
}

/* vi: set ts=4 sw=4 expandtab: */