t_threads.m revision 1.1.12.1 1 1.1 jmmv /* $NetBSD: t_threads.m,v 1.1.12.1 2014/08/20 00:04:51 tls Exp $ */
2 1.1 jmmv
3 1.1 jmmv /*
4 1.1 jmmv * Copyright (c) 2010 The NetBSD Foundation, Inc.
5 1.1 jmmv * All rights reserved.
6 1.1 jmmv *
7 1.1 jmmv * Redistribution and use in source and binary forms, with or without
8 1.1 jmmv * modification, are permitted provided that the following conditions
9 1.1 jmmv * are met:
10 1.1 jmmv * 1. Redistributions of source code must retain the above copyright
11 1.1 jmmv * notice, this list of conditions and the following disclaimer.
12 1.1 jmmv * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 jmmv * notice, this list of conditions and the following disclaimer in the
14 1.1 jmmv * documentation and/or other materials provided with the distribution.
15 1.1 jmmv *
16 1.1 jmmv * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
17 1.1 jmmv * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
18 1.1 jmmv * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19 1.1 jmmv * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
20 1.1 jmmv * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 1.1 jmmv * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 1.1 jmmv * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 1.1 jmmv * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 1.1 jmmv * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 1.1 jmmv * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 1.1 jmmv * POSSIBILITY OF SUCH DAMAGE.
27 1.1 jmmv */
28 1.1 jmmv
29 1.1 jmmv /* Originally written by David Wetzel */
30 1.1 jmmv
31 1.1 jmmv #include <assert.h>
32 1.1 jmmv #include <stdio.h>
33 1.1 jmmv #include <unistd.h>
34 1.1 jmmv
35 1.1 jmmv #include <atf-c.h>
36 1.1 jmmv
37 1.1 jmmv #include <objc/objc.h>
38 1.1.12.1 tls #include <objc/thr.h>
39 1.1 jmmv #include <objc/Object.h>
40 1.1.12.1 tls #if __GNUC_PREREQ__(4,8)
41 1.1.12.1 tls #include <objc/runtime.h>
42 1.1.12.1 tls #endif
43 1.1 jmmv
44 1.1 jmmv static int IsMultithreaded = 0;
45 1.1 jmmv static objc_mutex_t Mutex;
46 1.1 jmmv static objc_condition_t Condition;
47 1.1 jmmv
48 1.1 jmmv @interface MyClass : Object
49 1.1 jmmv {
50 1.1 jmmv }
51 1.1 jmmv -(void)start;
52 1.1.12.1 tls #if __GNUC_PREREQ__(4,8)
53 1.1.12.1 tls -init;
54 1.1.12.1 tls +new;
55 1.1.12.1 tls +alloc;
56 1.1.12.1 tls -free;
57 1.1.12.1 tls #endif
58 1.1 jmmv @end
59 1.1 jmmv
60 1.1 jmmv @implementation MyClass
61 1.1 jmmv -(void)start
62 1.1 jmmv {
63 1.1 jmmv printf("detached thread started!\n");
64 1.1 jmmv
65 1.1 jmmv objc_condition_signal(Condition);
66 1.1 jmmv }
67 1.1.12.1 tls #if __GNUC_PREREQ__(4,8)
68 1.1.12.1 tls -init
69 1.1.12.1 tls {
70 1.1.12.1 tls return self;
71 1.1.12.1 tls }
72 1.1.12.1 tls
73 1.1.12.1 tls +new
74 1.1.12.1 tls {
75 1.1.12.1 tls return [[self alloc] init];
76 1.1.12.1 tls }
77 1.1.12.1 tls
78 1.1.12.1 tls +alloc
79 1.1.12.1 tls {
80 1.1.12.1 tls return class_createInstance(self, 0);
81 1.1.12.1 tls }
82 1.1.12.1 tls
83 1.1.12.1 tls -free
84 1.1.12.1 tls {
85 1.1.12.1 tls return object_dispose(self);
86 1.1.12.1 tls }
87 1.1.12.1 tls #endif
88 1.1 jmmv @end
89 1.1 jmmv
90 1.1 jmmv static void
91 1.1 jmmv becomeMultiThreaded(void)
92 1.1 jmmv {
93 1.1 jmmv printf("becoming multithreaded!\n");
94 1.1 jmmv IsMultithreaded++;
95 1.1 jmmv }
96 1.1 jmmv
97 1.1 jmmv ATF_TC(thread_callback);
98 1.1 jmmv ATF_TC_HEAD(thread_callback, tc)
99 1.1 jmmv {
100 1.1 jmmv atf_tc_set_md_var(tc, "descr", "Checks that the thread callback is only"
101 1.1 jmmv "called once");
102 1.1 jmmv }
103 1.1 jmmv ATF_TC_BODY(thread_callback, tc)
104 1.1 jmmv {
105 1.1 jmmv id o = [MyClass new];
106 1.1 jmmv objc_thread_callback cb;
107 1.1 jmmv objc_thread_t rv;
108 1.1 jmmv
109 1.1 jmmv cb = objc_set_thread_callback(becomeMultiThreaded);
110 1.1 jmmv printf("Old Callback: %p\n", cb);
111 1.1 jmmv ATF_CHECK(cb == 0);
112 1.1 jmmv
113 1.1 jmmv Mutex = objc_mutex_allocate();
114 1.1 jmmv Condition = objc_condition_allocate();
115 1.1 jmmv
116 1.1 jmmv ATF_CHECK_EQ(0, IsMultithreaded);
117 1.1 jmmv
118 1.1 jmmv rv = objc_thread_detach(@selector(start), o, nil);
119 1.1 jmmv printf("detach value: %p\n", rv);
120 1.1 jmmv assert(rv != NULL);
121 1.1 jmmv
122 1.1 jmmv objc_mutex_lock(Mutex);
123 1.1 jmmv objc_condition_wait(Condition, Mutex);
124 1.1 jmmv objc_mutex_unlock(Mutex);
125 1.1 jmmv
126 1.1 jmmv ATF_CHECK_EQ(1, IsMultithreaded);
127 1.1 jmmv printf("Shutting down\n");
128 1.1 jmmv }
129 1.1 jmmv
130 1.1 jmmv ATF_TP_ADD_TCS(tp)
131 1.1 jmmv {
132 1.1 jmmv
133 1.1 jmmv ATF_TP_ADD_TC(tp, thread_callback);
134 1.1 jmmv
135 1.1 jmmv return atf_no_error();
136 1.1 jmmv }
137