summaryrefslogtreecommitdiff
path: root/regress/lib/libpthread/stack/stack.c
blob: f7d4fb2d0369664b9666e1aa2a4793e56fa6648f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138

#include <sys/types.h>
#include <sys/mman.h>
#include <inttypes.h>
#include <limits.h>
#include <pthread.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "test.h"

#define LARGE_SIZE	(1024 * 1024)

/* thread main for testing a large buffer on the stack */
void *
tmain1(void *arg)
{
	char buf[LARGE_SIZE];

	memset(buf, 0xd0, sizeof(buf));
	return (buf + LARGE_SIZE/2);
}

/*
 * struct and thread main for testing that a thread's stack is where
 * we put it
 */
struct st
{
	char *addr;
	size_t size;
};
void *
tmain2(void *arg)
{
	struct st *s = arg;

	ASSERT((char *)&s >= s->addr && (char *)&s - s->addr < s->size);
	return (NULL);
}

int
main(void)
{
	pthread_attr_t attr;
	pthread_t t;
	struct st thread_stack;
	void *addr, *addr2;
	size_t size, size2, pagesize;
	int err;

	pagesize = (size_t)sysconf(_SC_PAGESIZE);

	CHECKr(pthread_attr_init(&attr));

	/* verify that the initial values are what we expect */
	size = 1;
	CHECKr(pthread_attr_getguardsize(&attr, &size));
	ASSERT(size != 1);		/* must have changed */
	ASSERT(size != 0);		/* we default to having a guardpage */

	size = 1;
	CHECKr(pthread_attr_getstacksize(&attr, &size));
	ASSERT(size >= PTHREAD_STACK_MIN);

	addr = &addr;
	CHECKr(pthread_attr_getstackaddr(&attr, &addr));
	ASSERT(addr == NULL);		/* default must be NULL */

	addr2 = &addr;
	size2 = 1;
	CHECKr(pthread_attr_getstack(&attr, &addr2, &size2));
	ASSERT(addr2 == addr);		/* must match the other calls */
	ASSERT(size2 == size);

	/* verify that too small a size is rejected */
	err = pthread_attr_setstacksize(&attr, PTHREAD_STACK_MIN - 1);
	ASSERT(err == EINVAL);
	CHECKr(pthread_attr_getstacksize(&attr, &size2));
	ASSERT(size2 == size);


	/*
	 * increase the stacksize, then verify that the change sticks,
	 * and that a large buffer fits on the resulting thread's stack
	 */
	size2 += LARGE_SIZE;
	CHECKr(pthread_attr_setstacksize(&attr, size2));
	CHECKr(pthread_attr_getstacksize(&attr, &size));
	ASSERT(size == size2);

	CHECKr(pthread_create(&t, &attr, &tmain1, NULL));
	sleep(1);
	CHECKr(pthread_join(t, &addr));

	/* test whether the stack has been freed */
	/* XXX yow, this is grossly unportable, as it depends on the stack
	 * not being cached, the thread being marked freeable before
	 * pthread_join() calls the gc routine (thus the sleep), and this
	 * being testable by mquery */
	addr = (void *)((uintptr_t)addr & ~(pagesize - 1));
	ASSERT(mquery(addr, pagesize, PROT_READ, MAP_FIXED|MAP_ANON, -1, 0)
	    == addr);

	/* the attr wasn't modified by pthread_create, right? */
	size = 1;
	CHECKr(pthread_attr_getstacksize(&attr, &size));
	ASSERT(size == size2);


	/* allocate our own stack and verify the thread uses it */
	size = pagesize * 4;
	addr = mmap(NULL, size, PROT_READ|PROT_WRITE, MAP_ANON|MAP_PRIVATE,
	    -1, 0);
	ASSERT(addr != MAP_FAILED);
	memset(addr, 0xd0, size);
	CHECKr(pthread_attr_setstack(&attr, addr, size));

	CHECKr(pthread_attr_getstacksize(&attr, &size2));
	ASSERT(size2 == size);
	CHECKr(pthread_attr_getstackaddr(&attr, &addr2));
	ASSERT(addr2 == addr);
	CHECKr(pthread_attr_getstack(&attr, &addr2, &size2));
	ASSERT(addr2 == addr);
	ASSERT(size2 == size);

	thread_stack.addr = addr;
	thread_stack.size = size;
	CHECKr(pthread_create(&t, &attr, &tmain2, &thread_stack));
	sleep(1);
	CHECKr(pthread_join(t, NULL));

	/* verify that the stack we allocated was *not* freed */
	memset(addr, 0xd0, size);

	return (0);
}