15821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 25821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * ptw32_tkAssocCreate.c 35821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 45821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Description: 55821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * This translation unit implements routines which are private to 65821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * the implementation and may be used throughout it. 75821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 85821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * -------------------------------------------------------------------------- 95821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Pthreads-win32 - POSIX Threads Library for Win32 115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Copyright(C) 1998 John E. Bossom 125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Copyright(C) 1999,2005 Pthreads-win32 contributors 135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Contact Email: rpj@callisto.canberra.edu.au 155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * The current list of contributors is contained 175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * in the file CONTRIBUTORS included with the source 185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * code distribution. The list can also be seen at the 195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * following World Wide Web location: 205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * http://sources.redhat.com/pthreads-win32/contributors.html 215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * This library is free software; you can redistribute it and/or 235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * modify it under the terms of the GNU Lesser General Public 245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * License as published by the Free Software Foundation; either 255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * version 2 of the License, or (at your option) any later version. 265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * This library is distributed in the hope that it will be useful, 285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * but WITHOUT ANY WARRANTY; without even the implied warranty of 295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Lesser General Public License for more details. 315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * You should have received a copy of the GNU Lesser General Public 335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * License along with this library in the file COPYING.LIB; 345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * if not, write to the Free Software Foundation, Inc., 355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA 365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include "pthread.h" 395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include "implement.h" 405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int 435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)ptw32_tkAssocCreate (ptw32_thread_t * sp, pthread_key_t key) 445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* 455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * ------------------------------------------------------------------- 465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * This routine creates an association that 475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * is unique for the given (thread,key) combination.The association 485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * is referenced by both the thread and the key. 495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * This association allows us to determine what keys the 505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * current thread references and what threads a given key 515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * references. 525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * See the detailed description 535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * at the beginning of this file for further details. 545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Notes: 565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 1) New associations are pushed to the beginning of the 575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * chain so that the internal ptw32_selfThreadKey association 585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * is always last, thus allowing selfThreadExit to 595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * be implicitly called last by pthread_exit. 605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 2) 615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Parameters: 635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * thread 645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * current running thread. 655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * key 665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * key on which to create an association. 675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Returns: 685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 0 - if successful, 695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * ENOMEM - not enough memory to create assoc or other object 705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * EINVAL - an internal error occurred 715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * ENOSYS - an internal error occurred 725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * ------------------------------------------------------------------- 735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles){ 755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ThreadKeyAssoc *assoc; 765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* 785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Have to create an association and add it 795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * to both the key and the thread. 805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * 815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Both key->keyLock and thread->threadLock are locked before 825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * entry to this routine. 835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc = (ThreadKeyAssoc *) calloc (1, sizeof (*assoc)); 855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (assoc == NULL) 875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return ENOMEM; 895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc->thread = sp; 925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc->key = key; 935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* 955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Register assoc with key 965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc->prevThread = NULL; 985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc->nextThread = (ThreadKeyAssoc *) key->threads; 995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (assoc->nextThread != NULL) 1005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 1015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc->nextThread->prevThread = assoc; 1025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) key->threads = (void *) assoc; 1045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* 1065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Register assoc with thread 1075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 1085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc->prevKey = NULL; 1095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc->nextKey = (ThreadKeyAssoc *) sp->keys; 1105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (assoc->nextKey != NULL) 1115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 1125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assoc->nextKey->prevKey = assoc; 1135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sp->keys = (void *) assoc; 1155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (0); 1175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} /* ptw32_tkAssocCreate */ 119