thr_seterrno.c revision 50476
113546Sjulian/* 213546Sjulian * Copyright (c) 1995 John Birrell <jb@cimlogic.com.au>. 313546Sjulian * All rights reserved. 413546Sjulian * 513546Sjulian * Redistribution and use in source and binary forms, with or without 613546Sjulian * modification, are permitted provided that the following conditions 713546Sjulian * are met: 813546Sjulian * 1. Redistributions of source code must retain the above copyright 913546Sjulian * notice, this list of conditions and the following disclaimer. 1013546Sjulian * 2. Redistributions in binary form must reproduce the above copyright 1113546Sjulian * notice, this list of conditions and the following disclaimer in the 1213546Sjulian * documentation and/or other materials provided with the distribution. 1313546Sjulian * 3. All advertising materials mentioning features or use of this software 1413546Sjulian * must display the following acknowledgement: 1513546Sjulian * This product includes software developed by John Birrell. 1613546Sjulian * 4. Neither the name of the author nor the names of any co-contributors 1713546Sjulian * may be used to endorse or promote products derived from this software 1813546Sjulian * without specific prior written permission. 1913546Sjulian * 2013546Sjulian * THIS SOFTWARE IS PROVIDED BY JOHN BIRRELL AND CONTRIBUTORS ``AS IS'' AND 2113546Sjulian * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 2213546Sjulian * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 2349439Sdeischen * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 2413546Sjulian * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 2513546Sjulian * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 2613546Sjulian * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 2713546Sjulian * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 2813546Sjulian * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 2913546Sjulian * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 3013546Sjulian * SUCH DAMAGE. 3113546Sjulian * 3250476Speter * $FreeBSD: head/lib/libkse/thread/thr_seterrno.c 50476 1999-08-28 00:22:10Z peter $ 3313546Sjulian */ 3413546Sjulian#ifdef _THREAD_SAFE 3513546Sjulian#include <pthread.h> 3613546Sjulian#include "pthread_private.h" 3713546Sjulian 3813546Sjulian/* 3913546Sjulian * This function needs to reference the global error variable which is 4013546Sjulian * normally hidden from the user. 4113546Sjulian */ 4213546Sjulian#ifdef errno 4313546Sjulian#undef errno; 4413546Sjulian#endif 4513546Sjulianextern int errno; 4613546Sjulian 4713546Sjulianvoid 4813546Sjulian_thread_seterrno(pthread_t thread, int error) 4913546Sjulian{ 5013546Sjulian /* Check for the initial thread: */ 5135509Sjb if (thread == _thread_initial) 5213546Sjulian /* The initial thread always uses the global error variable: */ 5313546Sjulian errno = error; 5435509Sjb else 5513546Sjulian /* 5613546Sjulian * Threads other than the initial thread always use the error 5713546Sjulian * field in the thread structureL 5813546Sjulian */ 5913546Sjulian thread->error = error; 6013546Sjulian} 6113546Sjulian#endif 62