Archipelago » qemu

#include "qemu.h"

#include "qemu-common.h"

#define CLONE_NPTL_FLAGS2 (CLONE_SETTLS | \

    CLONE_PARENT_SETTID | CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)

#else

#if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)

_syscall1(int,set_tid_address,int *,tidptr)

#endif

#if defined(TARGET_NR_futex) && defined(__NR_futex)

_syscall6(int,sys_futex,int *,uaddr,int,op,int,val,

          const struct timespec *,timeout,int *,uaddr2,int,val3)

#endif /* defined(TARGET_I386) */

#define NEW_STACK_SIZE PTHREAD_STACK_MIN

    TaskState *ts;

    uint8_t *new_stack;

    CPUState *new_env;

    unsigned int nptl_flags;

    sigset_t sigmask;

#endif

    if (flags & CLONE_VM) {

        TaskState *parent_ts = (TaskState *)env->opaque;

        new_thread_info info;

        pthread_attr_t attr;

#endif

        new_env->opaque = ts;

        ts->bprm = parent_ts->bprm;

        ts->info = parent_ts->info;

        nptl_flags = flags;

        flags &= ~CLONE_NPTL_FLAGS2;

            /* Child Process.  */

            cpu_clone_regs(env, newsp);

            fork_end(1);

            /* There is a race condition here.  The parent process could

               theoretically read the TID in the child process before the child

               tid is set.  This would require using either ptrace

}

#endif

/* ??? Using host futex calls even when target atomic operations

   are not really atomic probably breaks things.  However implementing

   futexes locally would make futexes shared between multiple processes

    switch(num) {

    case TARGET_NR_exit:

      /* In old applications this may be used to implement _exit(2).

         However in threaded applictions it is used for thread termination,

         and _exit_group is used for application termination.

        }

	break;

#endif

    case TARGET_NR_futex:

        ret = do_futex(arg1, arg2, arg3, arg4, arg5, arg6);

        break;