165 lines
4.7 KiB
C
165 lines
4.7 KiB
C
/*
|
|
* Wine threading routines using the pthread library
|
|
*
|
|
* Copyright 2003 Alexandre Julliard
|
|
*
|
|
* 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include "config.h"
|
|
#include "wine/port.h"
|
|
|
|
#ifdef HAVE_PTHREAD_H
|
|
|
|
#include <assert.h>
|
|
#include <stdlib.h>
|
|
#include <signal.h>
|
|
#ifdef HAVE_UNISTD_H
|
|
# include <unistd.h>
|
|
#endif
|
|
#include <string.h>
|
|
#include <sys/types.h>
|
|
#ifdef HAVE_SYS_MMAN_H
|
|
#include <sys/mman.h>
|
|
#endif
|
|
|
|
#include "wine/library.h"
|
|
#include "wine/pthread.h"
|
|
|
|
static struct wine_pthread_functions funcs;
|
|
|
|
#ifndef __i386__
|
|
static pthread_key_t teb_key;
|
|
#endif
|
|
|
|
/***********************************************************************
|
|
* wine_pthread_init_process
|
|
*
|
|
* Initialization for a newly created process.
|
|
*/
|
|
void wine_pthread_init_process( const struct wine_pthread_functions *functions )
|
|
{
|
|
memcpy( &funcs, functions, min(functions->size,sizeof(funcs)) );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* wine_pthread_init_thread
|
|
*
|
|
* Initialization for a newly created thread.
|
|
*/
|
|
void wine_pthread_init_thread( struct wine_pthread_thread_info *info )
|
|
{
|
|
#ifdef __i386__
|
|
/* On the i386, the current thread is in the %fs register */
|
|
LDT_ENTRY fs_entry;
|
|
|
|
wine_ldt_set_base( &fs_entry, info->teb_base );
|
|
wine_ldt_set_limit( &fs_entry, info->teb_size - 1 );
|
|
wine_ldt_set_flags( &fs_entry, WINE_LDT_FLAGS_DATA|WINE_LDT_FLAGS_32BIT );
|
|
wine_ldt_init_fs( info->teb_sel, &fs_entry );
|
|
#else
|
|
if (!funcs.ptr_set_thread_data) /* first thread */
|
|
pthread_key_create( &teb_key, NULL );
|
|
pthread_setspecific( teb_key, info->teb_base );
|
|
#endif
|
|
|
|
/* retrieve the stack info (except for main thread) */
|
|
if (funcs.ptr_set_thread_data)
|
|
{
|
|
pthread_attr_t attr;
|
|
pthread_getattr_np( pthread_self(), &attr );
|
|
pthread_attr_getstack( &attr, &info->stack_base, &info->stack_size );
|
|
}
|
|
|
|
/* set pid and tid */
|
|
info->pid = getpid();
|
|
info->tid = gettid();
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* wine_pthread_create_thread
|
|
*/
|
|
int wine_pthread_create_thread( struct wine_pthread_thread_info *info )
|
|
{
|
|
pthread_t id;
|
|
pthread_attr_t attr;
|
|
int ret = 0;
|
|
|
|
pthread_attr_init( &attr );
|
|
pthread_attr_setstacksize( &attr, info->stack_size );
|
|
if (pthread_create( &id, &attr, (void * (*)(void *))info->entry, info )) ret = -1;
|
|
pthread_attr_destroy( &attr );
|
|
return ret;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* wine_pthread_get_current_teb
|
|
*/
|
|
void *wine_pthread_get_current_teb(void)
|
|
{
|
|
#ifdef __i386__
|
|
void *ret;
|
|
__asm__( ".byte 0x64\n\tmovl 0x18,%0" : "=r" (ret) );
|
|
return ret;
|
|
#else
|
|
return pthread_getspecific( teb_key );
|
|
#endif
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* wine_pthread_exit_thread
|
|
*/
|
|
void wine_pthread_exit_thread( struct wine_pthread_thread_info *info )
|
|
{
|
|
struct cleanup_info
|
|
{
|
|
pthread_t self;
|
|
struct wine_pthread_thread_info thread_info;
|
|
};
|
|
|
|
static struct cleanup_info *previous_info;
|
|
struct cleanup_info *cleanup_info, *free_info;
|
|
void *ptr;
|
|
|
|
/* store it at the end of the TEB structure */
|
|
cleanup_info = (struct cleanup_info *)((char *)info->teb_base + info->teb_size) - 1;
|
|
cleanup_info->self = pthread_self();
|
|
cleanup_info->thread_info = *info;
|
|
|
|
if ((free_info = interlocked_xchg_ptr( (void **)&previous_info, cleanup_info )) != NULL)
|
|
{
|
|
pthread_join( free_info->self, &ptr );
|
|
wine_ldt_free_fs( free_info->thread_info.teb_sel );
|
|
munmap( free_info->thread_info.teb_base, free_info->thread_info.teb_size );
|
|
}
|
|
pthread_exit( (void *)info->exit_status );
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* wine_pthread_abort_thread
|
|
*/
|
|
void wine_pthread_abort_thread( int status )
|
|
{
|
|
pthread_detach( pthread_self() ); /* no one will be joining with us */
|
|
pthread_exit( (void *)status );
|
|
}
|
|
|
|
#endif /* HAVE_PTHREAD_H */
|