1 76193d7c 2003-09-30 devnull #include "threadimpl.h"
3 76193d7c 2003-09-30 devnull /* this will need work */
6 76193d7c 2003-09-30 devnull PTABHASH = 257,
9 76193d7c 2003-09-30 devnull static Lock ptablock;
10 76193d7c 2003-09-30 devnull Proc *ptab[PTABHASH];
13 76193d7c 2003-09-30 devnull _threadsetproc(Proc *p)
17 76193d7c 2003-09-30 devnull lock(&ptablock);
18 76193d7c 2003-09-30 devnull h = ((unsigned)p->pid)%PTABHASH;
19 76193d7c 2003-09-30 devnull p->link = ptab[h];
20 76193d7c 2003-09-30 devnull unlock(&ptablock);
21 76193d7c 2003-09-30 devnull ptab[h] = p;
24 76193d7c 2003-09-30 devnull static Proc*
25 76193d7c 2003-09-30 devnull __threadgetproc(int rm)
27 76193d7c 2003-09-30 devnull Proc **l, *p;
28 76193d7c 2003-09-30 devnull int h, pid;
30 76193d7c 2003-09-30 devnull pid = _threadgetpid();
32 76193d7c 2003-09-30 devnull lock(&ptablock);
33 76193d7c 2003-09-30 devnull h = ((unsigned)pid)%PTABHASH;
34 76193d7c 2003-09-30 devnull for(l=&ptab[h]; p=*l; l=&p->link){
35 76193d7c 2003-09-30 devnull if(p->pid == pid){
37 76193d7c 2003-09-30 devnull *l = p->link;
38 76193d7c 2003-09-30 devnull unlock(&ptablock);
39 76193d7c 2003-09-30 devnull return p;
42 76193d7c 2003-09-30 devnull unlock(&ptablock);
43 76193d7c 2003-09-30 devnull return nil;
47 76193d7c 2003-09-30 devnull _threadgetproc(void)
49 76193d7c 2003-09-30 devnull return __threadgetproc(0);
53 76193d7c 2003-09-30 devnull _threaddelproc(void)
55 76193d7c 2003-09-30 devnull return __threadgetproc(1);