Blame


1 76193d7c 2003-09-30 devnull #include "threadimpl.h"
2 a3785ca2 2004-04-21 devnull /*
3 a3785ca2 2004-04-21 devnull * To use this you need some patches to Valgrind that
4 a3785ca2 2004-04-21 devnull * let it help out with detecting stack overflow.
5 a3785ca2 2004-04-21 devnull */
6 a3785ca2 2004-04-21 devnull #define USEVALGRIND 0
7 a3785ca2 2004-04-21 devnull #ifdef USEVALGRIND
8 a3785ca2 2004-04-21 devnull #include <valgrind/memcheck.h>
9 a3785ca2 2004-04-21 devnull #endif
10 76193d7c 2003-09-30 devnull
11 76193d7c 2003-09-30 devnull static void
12 76193d7c 2003-09-30 devnull launcher386(void (*f)(void *arg), void *arg)
13 76193d7c 2003-09-30 devnull {
14 a3785ca2 2004-04-21 devnull Proc *p;
15 a3785ca2 2004-04-21 devnull Thread *t;
16 a3785ca2 2004-04-21 devnull
17 a3785ca2 2004-04-21 devnull p = _threadgetproc();
18 a3785ca2 2004-04-21 devnull t = p->thread;
19 a3785ca2 2004-04-21 devnull _threadstacklimit(t->stk);
20 a3785ca2 2004-04-21 devnull
21 76193d7c 2003-09-30 devnull (*f)(arg);
22 76193d7c 2003-09-30 devnull threadexits(nil);
23 76193d7c 2003-09-30 devnull }
24 76193d7c 2003-09-30 devnull
25 76193d7c 2003-09-30 devnull void
26 76193d7c 2003-09-30 devnull _threadinitstack(Thread *t, void (*f)(void*), void *arg)
27 76193d7c 2003-09-30 devnull {
28 76193d7c 2003-09-30 devnull ulong *tos;
29 76193d7c 2003-09-30 devnull
30 76193d7c 2003-09-30 devnull tos = (ulong*)&t->stk[t->stksize&~7];
31 76193d7c 2003-09-30 devnull *--tos = (ulong)arg;
32 76193d7c 2003-09-30 devnull *--tos = (ulong)f;
33 76193d7c 2003-09-30 devnull t->sched.pc = (ulong)launcher386;
34 76193d7c 2003-09-30 devnull t->sched.sp = (ulong)tos - 8; /* old PC and new PC */
35 76193d7c 2003-09-30 devnull }
36 76193d7c 2003-09-30 devnull
37 a3785ca2 2004-04-21 devnull void
38 a3785ca2 2004-04-21 devnull _threadinswitch(int enter)
39 a3785ca2 2004-04-21 devnull {
40 a3785ca2 2004-04-21 devnull USED(enter);
41 a3785ca2 2004-04-21 devnull #ifdef USEVALGRIND
42 a3785ca2 2004-04-21 devnull if(enter)
43 a3785ca2 2004-04-21 devnull VALGRIND_SET_STACK_LIMIT(0, 0, 1);
44 a3785ca2 2004-04-21 devnull else
45 a3785ca2 2004-04-21 devnull VALGRIND_SET_STACK_LIMIT(0, 0, 0);
46 a3785ca2 2004-04-21 devnull #endif
47 a3785ca2 2004-04-21 devnull }
48 a3785ca2 2004-04-21 devnull
49 a3785ca2 2004-04-21 devnull void
50 a3785ca2 2004-04-21 devnull _threadstacklimit(void *addr)
51 a3785ca2 2004-04-21 devnull {
52 a3785ca2 2004-04-21 devnull USED(addr);
53 a3785ca2 2004-04-21 devnull
54 a3785ca2 2004-04-21 devnull #ifdef USEVALGRIND
55 a3785ca2 2004-04-21 devnull VALGRIND_SET_STACK_LIMIT(1, addr, 0);
56 a3785ca2 2004-04-21 devnull #endif
57 a3785ca2 2004-04-21 devnull }