Home | History | Annotate | Line # | Download | only in libobjc
t_threads.m revision 1.1.6.1
      1  1.1.6.1  yamt /* $NetBSD: t_threads.m,v 1.1.6.1 2014/05/22 11:42:22 yamt 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.6.1  yamt #include <objc/thr.h>
     39      1.1  jmmv #include <objc/Object.h>
     40  1.1.6.1  yamt #if __GNUC_PREREQ__(4,8)
     41  1.1.6.1  yamt #include <objc/runtime.h>
     42  1.1.6.1  yamt #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.6.1  yamt #if __GNUC_PREREQ__(4,8)
     53  1.1.6.1  yamt -init;
     54  1.1.6.1  yamt +new;
     55  1.1.6.1  yamt +alloc;
     56  1.1.6.1  yamt -free;
     57  1.1.6.1  yamt #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.6.1  yamt #if __GNUC_PREREQ__(4,8)
     68  1.1.6.1  yamt -init
     69  1.1.6.1  yamt {
     70  1.1.6.1  yamt 	return self;
     71  1.1.6.1  yamt }
     72  1.1.6.1  yamt 
     73  1.1.6.1  yamt +new
     74  1.1.6.1  yamt {
     75  1.1.6.1  yamt 	return [[self alloc] init];
     76  1.1.6.1  yamt }
     77  1.1.6.1  yamt 
     78  1.1.6.1  yamt +alloc
     79  1.1.6.1  yamt {
     80  1.1.6.1  yamt 	return class_createInstance(self, 0);
     81  1.1.6.1  yamt }
     82  1.1.6.1  yamt 
     83  1.1.6.1  yamt -free
     84  1.1.6.1  yamt {
     85  1.1.6.1  yamt 	return object_dispose(self);
     86  1.1.6.1  yamt }
     87  1.1.6.1  yamt #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