Blame


1 76193d7c 2003-09-30 devnull #include <signal.h>
2 cd7ddc9b 2003-11-23 devnull #include "threadimpl.h"
3 76193d7c 2003-09-30 devnull
4 76193d7c 2003-09-30 devnull typedef struct Mainarg Mainarg;
5 76193d7c 2003-09-30 devnull struct Mainarg
6 76193d7c 2003-09-30 devnull {
7 76193d7c 2003-09-30 devnull int argc;
8 76193d7c 2003-09-30 devnull char **argv;
9 76193d7c 2003-09-30 devnull };
10 76193d7c 2003-09-30 devnull
11 76193d7c 2003-09-30 devnull int mainstacksize;
12 76193d7c 2003-09-30 devnull int _threadnotefd;
13 76193d7c 2003-09-30 devnull int _threadpasserpid;
14 76193d7c 2003-09-30 devnull static void mainlauncher(void*);
15 76193d7c 2003-09-30 devnull extern void (*_sysfatal)(char*, va_list);
16 76193d7c 2003-09-30 devnull
17 76193d7c 2003-09-30 devnull void
18 02a1a5c1 2004-03-05 devnull _threadstatus(int x)
19 02a1a5c1 2004-03-05 devnull {
20 02a1a5c1 2004-03-05 devnull USED(x);
21 02a1a5c1 2004-03-05 devnull threadstatus();
22 02a1a5c1 2004-03-05 devnull }
23 02a1a5c1 2004-03-05 devnull
24 02a1a5c1 2004-03-05 devnull void
25 76193d7c 2003-09-30 devnull _threaddie(int x)
26 76193d7c 2003-09-30 devnull {
27 76193d7c 2003-09-30 devnull extern char *_threadexitsallstatus;
28 76193d7c 2003-09-30 devnull USED(x);
29 76193d7c 2003-09-30 devnull
30 76193d7c 2003-09-30 devnull if(_threadexitsallstatus)
31 76193d7c 2003-09-30 devnull exit(_threadexitsallstatus[0] ? 1 : 0);
32 76193d7c 2003-09-30 devnull }
33 76193d7c 2003-09-30 devnull
34 5a8e63b2 2004-02-29 devnull static void
35 5a8e63b2 2004-02-29 devnull _nop(int x)
36 5a8e63b2 2004-02-29 devnull {
37 5a8e63b2 2004-02-29 devnull USED(x);
38 5a8e63b2 2004-02-29 devnull }
39 5a8e63b2 2004-02-29 devnull
40 76193d7c 2003-09-30 devnull int
41 76193d7c 2003-09-30 devnull main(int argc, char **argv)
42 76193d7c 2003-09-30 devnull {
43 76193d7c 2003-09-30 devnull Mainarg *a;
44 76193d7c 2003-09-30 devnull Proc *p;
45 76193d7c 2003-09-30 devnull
46 76193d7c 2003-09-30 devnull signal(SIGTERM, _threaddie);
47 5a8e63b2 2004-02-29 devnull signal(SIGCHLD, _nop);
48 15680d56 2004-03-05 devnull // signal(SIGINFO, _threadstatus);
49 76193d7c 2003-09-30 devnull // rfork(RFREND);
50 76193d7c 2003-09-30 devnull
51 76193d7c 2003-09-30 devnull //_threaddebuglevel = (DBGSCHED|DBGCHAN|DBGREND)^~0;
52 76193d7c 2003-09-30 devnull _systhreadinit();
53 76193d7c 2003-09-30 devnull _qlockinit(_threadrendezvous);
54 76193d7c 2003-09-30 devnull _sysfatal = _threadsysfatal;
55 32f69c36 2003-12-11 devnull notify(_threadnote);
56 76193d7c 2003-09-30 devnull if(mainstacksize == 0)
57 76193d7c 2003-09-30 devnull mainstacksize = 32*1024;
58 76193d7c 2003-09-30 devnull
59 76193d7c 2003-09-30 devnull a = _threadmalloc(sizeof *a, 1);
60 76193d7c 2003-09-30 devnull a->argc = argc;
61 76193d7c 2003-09-30 devnull a->argv = argv;
62 76193d7c 2003-09-30 devnull
63 76193d7c 2003-09-30 devnull p = _newproc(mainlauncher, a, mainstacksize, "threadmain", 0, 0);
64 76193d7c 2003-09-30 devnull _schedinit(p);
65 76193d7c 2003-09-30 devnull abort(); /* not reached */
66 76193d7c 2003-09-30 devnull return 0;
67 76193d7c 2003-09-30 devnull }
68 76193d7c 2003-09-30 devnull
69 76193d7c 2003-09-30 devnull static void
70 76193d7c 2003-09-30 devnull mainlauncher(void *arg)
71 76193d7c 2003-09-30 devnull {
72 76193d7c 2003-09-30 devnull Mainarg *a;
73 76193d7c 2003-09-30 devnull
74 76193d7c 2003-09-30 devnull a = arg;
75 76193d7c 2003-09-30 devnull threadmain(a->argc, a->argv);
76 76193d7c 2003-09-30 devnull threadexits("threadmain");
77 76193d7c 2003-09-30 devnull }
78 76193d7c 2003-09-30 devnull
79 76193d7c 2003-09-30 devnull void
80 76193d7c 2003-09-30 devnull _threadsignal(void)
81 76193d7c 2003-09-30 devnull {
82 76193d7c 2003-09-30 devnull }
83 76193d7c 2003-09-30 devnull
84 76193d7c 2003-09-30 devnull void
85 76193d7c 2003-09-30 devnull _threadsignalpasser(void)
86 76193d7c 2003-09-30 devnull {
87 76193d7c 2003-09-30 devnull }
88 76193d7c 2003-09-30 devnull
89 76193d7c 2003-09-30 devnull int
90 76193d7c 2003-09-30 devnull _schedfork(Proc *p)
91 76193d7c 2003-09-30 devnull {
92 cd7ddc9b 2003-11-23 devnull int pid;
93 cd7ddc9b 2003-11-23 devnull lock(&p->lock);
94 cd7ddc9b 2003-11-23 devnull pid = ffork(RFMEM|RFNOWAIT, _schedinit, p);
95 cd7ddc9b 2003-11-23 devnull p->pid = pid;
96 cd7ddc9b 2003-11-23 devnull unlock(&p->lock);
97 cd7ddc9b 2003-11-23 devnull return pid;
98 cd7ddc9b 2003-11-23 devnull
99 76193d7c 2003-09-30 devnull }
100 76193d7c 2003-09-30 devnull
101 76193d7c 2003-09-30 devnull void
102 76193d7c 2003-09-30 devnull _schedexit(Proc *p)
103 76193d7c 2003-09-30 devnull {
104 76193d7c 2003-09-30 devnull char ex[ERRMAX];
105 76193d7c 2003-09-30 devnull Proc **l;
106 76193d7c 2003-09-30 devnull
107 76193d7c 2003-09-30 devnull lock(&_threadpq.lock);
108 76193d7c 2003-09-30 devnull for(l=&_threadpq.head; *l; l=&(*l)->next){
109 76193d7c 2003-09-30 devnull if(*l == p){
110 76193d7c 2003-09-30 devnull *l = p->next;
111 76193d7c 2003-09-30 devnull if(*l == nil)
112 76193d7c 2003-09-30 devnull _threadpq.tail = l;
113 76193d7c 2003-09-30 devnull break;
114 76193d7c 2003-09-30 devnull }
115 76193d7c 2003-09-30 devnull }
116 32f69c36 2003-12-11 devnull _threadprocs--;
117 76193d7c 2003-09-30 devnull unlock(&_threadpq.lock);
118 76193d7c 2003-09-30 devnull
119 76193d7c 2003-09-30 devnull strncpy(ex, p->exitstr, sizeof ex);
120 76193d7c 2003-09-30 devnull ex[sizeof ex-1] = '\0';
121 76193d7c 2003-09-30 devnull free(p);
122 76193d7c 2003-09-30 devnull _exit(ex[0]);
123 76193d7c 2003-09-30 devnull }
124 76193d7c 2003-09-30 devnull
125 76193d7c 2003-09-30 devnull int
126 76193d7c 2003-09-30 devnull nrand(int n)
127 76193d7c 2003-09-30 devnull {
128 76193d7c 2003-09-30 devnull return random()%n;
129 76193d7c 2003-09-30 devnull }
130 76193d7c 2003-09-30 devnull
131 76193d7c 2003-09-30 devnull void
132 76193d7c 2003-09-30 devnull _systhreadinit(void)
133 76193d7c 2003-09-30 devnull {
134 76193d7c 2003-09-30 devnull }
135 76193d7c 2003-09-30 devnull
136 76193d7c 2003-09-30 devnull void
137 76193d7c 2003-09-30 devnull threadstats(void)
138 76193d7c 2003-09-30 devnull {
139 76193d7c 2003-09-30 devnull extern int _threadnrendez, _threadhighnrendez,
140 76193d7c 2003-09-30 devnull _threadnalt, _threadhighnentry;
141 76193d7c 2003-09-30 devnull fprint(2, "*** THREAD LIBRARY STATS ***\n");
142 76193d7c 2003-09-30 devnull fprint(2, "nrendez %d high simultaneous %d\n",
143 76193d7c 2003-09-30 devnull _threadnrendez, _threadhighnrendez);
144 76193d7c 2003-09-30 devnull fprint(2, "nalt %d high simultaneous entry %d\n",
145 76193d7c 2003-09-30 devnull _threadnalt, _threadhighnentry);
146 76193d7c 2003-09-30 devnull }