• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /***
2   This file is part of PulseAudio.
3 
4   PulseAudio is free software; you can redistribute it and/or modify
5   it under the terms of the GNU Lesser General Public License as published
6   by the Free Software Foundation; either version 2.1 of the License,
7   or (at your option) any later version.
8 
9   PulseAudio is distributed in the hope that it will be useful, but
10   WITHOUT ANY WARRANTY; without even the implied warranty of
11   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12   General Public License for more details.
13 
14   You should have received a copy of the GNU Lesser General Public License
15   along with PulseAudio; if not, see <http://www.gnu.org/licenses/>.
16 ***/
17 
18 #ifdef HAVE_CONFIG_H
19 #include <config.h>
20 #endif
21 
22 #include <check.h>
23 
24 #include <pulse/xmalloc.h>
25 #include <pulsecore/thread.h>
26 #include <pulsecore/macro.h>
27 #include <pulsecore/mutex.h>
28 #include <pulsecore/once.h>
29 #include <pulsecore/log.h>
30 #include <pulsecore/core-util.h>
31 
32 static pa_mutex *mutex = NULL;
33 static pa_cond *cond1 = NULL, *cond2 = NULL;
34 static pa_tls *tls = NULL;
35 
36 static int magic_number = 0;
37 
38 #define THREADS_MAX 20
39 
once_func(void)40 static void once_func(void) {
41     pa_log("once!");
42 }
43 
44 static pa_once once = PA_ONCE_INIT;
45 
thread_func(void * data)46 static void thread_func(void *data) {
47     pa_tls_set(tls, data);
48 
49     pa_log_info("thread_func() for %s starting...", (char*) pa_tls_get(tls));
50 
51     pa_mutex_lock(mutex);
52 
53     for (;;) {
54         int k, n;
55 
56         pa_log_info("%s waiting ...", (char*) pa_tls_get(tls));
57 
58         for (;;) {
59 
60             if (magic_number < 0)
61                 goto quit;
62 
63             if (magic_number != 0)
64                 break;
65 
66             pa_cond_wait(cond1, mutex);
67         }
68 
69         k = magic_number;
70         magic_number = 0;
71 
72         pa_mutex_unlock(mutex);
73 
74         pa_run_once(&once, once_func);
75 
76         pa_cond_signal(cond2, 0);
77 
78         pa_log_info("%s got number %i", (char*) pa_tls_get(tls), k);
79 
80         /* Spin! */
81         for (n = 0; n < k; n++)
82             pa_thread_yield();
83 
84         pa_mutex_lock(mutex);
85     }
86 
87 quit:
88 
89     pa_mutex_unlock(mutex);
90 
91     pa_log_info("thread_func() for %s done...", (char*) pa_tls_get(tls));
92 }
93 
START_TEST(thread_test)94 START_TEST (thread_test) {
95     int i, k;
96     pa_thread* t[THREADS_MAX];
97 
98     if (!getenv("MAKE_CHECK"))
99         pa_log_set_level(PA_LOG_DEBUG);
100 
101     mutex = pa_mutex_new(false, false);
102     cond1 = pa_cond_new();
103     cond2 = pa_cond_new();
104     tls = pa_tls_new(pa_xfree);
105 
106     for (i = 0; i < THREADS_MAX; i++) {
107         t[i] = pa_thread_new("test", thread_func, pa_sprintf_malloc("Thread #%i", i+1));
108         fail_unless(t[i] != 0);
109     }
110 
111     pa_mutex_lock(mutex);
112 
113     pa_log("loop-init");
114 
115     for (k = 0; k < 100; k++) {
116         pa_assert(magic_number == 0);
117 
118         /* There's a thread waiting for us to change magic_number to a non-zero
119          * value. The "+ 1" part ensures that we don't accidentally set
120          * magic_number to zero here. */
121         magic_number = (int) rand() % 0x10000 + 1;
122 
123         pa_log_info("iteration %i (%i)", k, magic_number);
124 
125         pa_cond_signal(cond1, 0);
126 
127         pa_cond_wait(cond2, mutex);
128     }
129 
130     pa_log("loop-exit");
131 
132     magic_number = -1;
133     pa_cond_signal(cond1, 1);
134 
135     pa_mutex_unlock(mutex);
136 
137     for (i = 0; i < THREADS_MAX; i++)
138         pa_thread_free(t[i]);
139 
140     pa_mutex_free(mutex);
141     pa_cond_free(cond1);
142     pa_cond_free(cond2);
143     pa_tls_free(tls);
144 }
145 END_TEST
146 
main(int argc,char * argv[])147 int main(int argc, char *argv[]) {
148     int failed = 0;
149     Suite *s;
150     TCase *tc;
151     SRunner *sr;
152 
153     s = suite_create("Thread");
154     tc = tcase_create("thread");
155     tcase_add_test(tc, thread_test);
156     tcase_set_timeout(tc, 60 * 60);
157     suite_add_tcase(s, tc);
158 
159     sr = srunner_create(s);
160     srunner_run_all(sr, CK_NORMAL);
161     failed = srunner_ntests_failed(sr);
162     srunner_free(sr);
163 
164     return (failed == 0) ? EXIT_SUCCESS : EXIT_FAILURE;
165 }
166