/* Copyright 2000-2004 The Apache Software Foundation * * Licensed under the Apache License, Version 2.0 (the "License"); * you may not use this file except in compliance with the License. * You may obtain a copy of the License at * * http://www.apache.org/licenses/LICENSE-2.0 * * Unless required by applicable law or agreed to in writing, software * distributed under the License is distributed on an "AS IS" BASIS, * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. * See the License for the specific language governing permissions and * limitations under the License. */ #include "apr.h" #include "apr_portable.h" #include "apr_arch_threadproc.h" #if APR_HAS_THREADS /* XXX: missing a cleanup, pthread_attr_destroy is never called! */ #if APR_HAVE_PTHREAD_H APR_DECLARE(apr_status_t) apr_threadattr_create(apr_threadattr_t **new, apr_pool_t *pool) ###### { ###### apr_status_t stat; ###### (*new) = apr_palloc(pool, sizeof(apr_threadattr_t)); ###### (*new)->pool = pool; ###### stat = pthread_attr_init(&(*new)->attr); ###### if (stat == 0) { ###### return APR_SUCCESS; } #ifdef PTHREAD_SETS_ERRNO stat = errno; #endif ###### return stat; } APR_DECLARE(apr_status_t) apr_threadattr_detach_set(apr_threadattr_t *attr, apr_int32_t on) ###### { ###### apr_status_t stat; #ifdef PTHREAD_ATTR_SETDETACHSTATE_ARG2_ADDR int arg = on; if ((stat = pthread_attr_setdetachstate(&attr->attr, &arg)) == 0) { #else ###### if ((stat = pthread_attr_setdetachstate(&attr->attr, on)) == 0) { #endif ###### return APR_SUCCESS; } else { #ifdef PTHREAD_SETS_ERRNO stat = errno; #endif ###### return stat; } } APR_DECLARE(apr_status_t) apr_threadattr_detach_get(apr_threadattr_t *attr) ###### { ###### int state; #ifdef PTHREAD_ATTR_GETDETACHSTATE_TAKES_ONE_ARG state = pthread_attr_getdetachstate(&attr->attr); #else ###### pthread_attr_getdetachstate(&attr->attr, &state); #endif ###### if (state == 1) ###### return APR_DETACH; ###### return APR_NOTDETACH; } APR_DECLARE(apr_status_t) apr_threadattr_stacksize_set(apr_threadattr_t *attr, apr_size_t stacksize) ###### { ###### int stat; ###### stat = pthread_attr_setstacksize(&attr->attr, stacksize); ###### if (stat == 0) { ###### return APR_SUCCESS; } #ifdef PTHREAD_SETS_ERRNO stat = errno; #endif ###### return stat; } static void *dummy_worker(void *opaque) 137 { 137 apr_thread_t *thread = (apr_thread_t*)opaque; 137 return thread->func(thread, thread->data); } APR_DECLARE(apr_status_t) apr_thread_create(apr_thread_t **new, apr_threadattr_t *attr, apr_thread_start_t func, void *data, apr_pool_t *pool) 137 { 137 apr_status_t stat; 137 pthread_attr_t *temp; 137 (*new) = (apr_thread_t *)apr_pcalloc(pool, sizeof(apr_thread_t)); 137 if ((*new) == NULL) { ###### return APR_ENOMEM; } 137 (*new)->td = (pthread_t *)apr_pcalloc(pool, sizeof(pthread_t)); 137 if ((*new)->td == NULL) { ###### return APR_ENOMEM; } 137 (*new)->pool = pool; 137 (*new)->data = data; 137 (*new)->func = func; 137 if (attr) ###### temp = &attr->attr; else 137 temp = NULL; 137 stat = apr_pool_create(&(*new)->pool, pool); 137 if (stat != APR_SUCCESS) { ###### return stat; } 137 if ((stat = pthread_create((*new)->td, temp, dummy_worker, (*new))) == 0) { 137 return APR_SUCCESS; } else { #ifdef PTHREAD_SETS_ERRNO stat = errno; #endif ###### return stat; } } APR_DECLARE(apr_os_thread_t) apr_os_thread_current(void) ###### { ###### return pthread_self(); } APR_DECLARE(int) apr_os_thread_equal(apr_os_thread_t tid1, apr_os_thread_t tid2) ###### { ###### return pthread_equal(tid1, tid2); } APR_DECLARE(apr_status_t) apr_thread_exit(apr_thread_t *thd, apr_status_t retval) 124 { 124 thd->exitval = retval; 124 apr_pool_destroy(thd->pool); 124 pthread_exit(NULL); return APR_SUCCESS; } APR_DECLARE(apr_status_t) apr_thread_join(apr_status_t *retval, apr_thread_t *thd) 137 { 137 apr_status_t stat; 137 apr_status_t *thread_stat; 137 if ((stat = pthread_join(*thd->td,(void *)&thread_stat)) == 0) { 137 *retval = thd->exitval; 137 return APR_SUCCESS; } else { #ifdef PTHREAD_SETS_ERRNO stat = errno; #endif ###### return stat; } } APR_DECLARE(apr_status_t) apr_thread_detach(apr_thread_t *thd) ###### { ###### apr_status_t stat; #ifdef PTHREAD_DETACH_ARG1_ADDR if ((stat = pthread_detach(thd->td)) == 0) { #else ###### if ((stat = pthread_detach(*thd->td)) == 0) { #endif ###### return APR_SUCCESS; } else { #ifdef PTHREAD_SETS_ERRNO stat = errno; #endif ###### return stat; } } void apr_thread_yield() ###### { } APR_DECLARE(apr_status_t) apr_thread_data_get(void **data, const char *key, apr_thread_t *thread) ###### { ###### return apr_pool_userdata_get(data, key, thread->pool); } APR_DECLARE(apr_status_t) apr_thread_data_set(void *data, const char *key, apr_status_t (*cleanup)(void *), apr_thread_t *thread) ###### { ###### return apr_pool_userdata_set(data, key, cleanup, thread->pool); } APR_DECLARE(apr_status_t) apr_os_thread_get(apr_os_thread_t **thethd, apr_thread_t *thd) ###### { ###### *thethd = thd->td; ###### return APR_SUCCESS; } APR_DECLARE(apr_status_t) apr_os_thread_put(apr_thread_t **thd, apr_os_thread_t *thethd, apr_pool_t *pool) ###### { ###### if (pool == NULL) { ###### return APR_ENOPOOL; } ###### if ((*thd) == NULL) { ###### (*thd) = (apr_thread_t *)apr_pcalloc(pool, sizeof(apr_thread_t)); ###### (*thd)->pool = pool; } ###### (*thd)->td = thethd; ###### return APR_SUCCESS; } APR_DECLARE(apr_status_t) apr_thread_once_init(apr_thread_once_t **control, apr_pool_t *p) 1 { 1 static const pthread_once_t once_init = PTHREAD_ONCE_INIT; 1 *control = apr_palloc(p, sizeof(**control)); 1 (*control)->once = once_init; 1 return APR_SUCCESS; } APR_DECLARE(apr_status_t) apr_thread_once(apr_thread_once_t *control, void (*func)(void)) 4 { 4 return pthread_once(&control->once, func); } ###### APR_POOL_IMPLEMENT_ACCESSOR(thread) #endif /* HAVE_PTHREAD_H */ #endif /* APR_HAS_THREADS */ #if !APR_HAS_THREADS /* avoid warning for no prototype */ APR_DECLARE(apr_status_t) apr_os_thread_get(void); APR_DECLARE(apr_status_t) apr_os_thread_get(void) { return APR_ENOTIMPL; } #endif