1// -*- C++ -*-
2//===--------------------------- thread -----------------------------------===//
3//
4// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
5// See https://llvm.org/LICENSE.txt for license information.
6// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
7//
8//===----------------------------------------------------------------------===//
9
10#ifndef _LIBCPP_THREAD
11#define _LIBCPP_THREAD
12
13/*
14
15    thread synopsis
16
17namespace std
18{
19
20class thread
21{
22public:
23    class id;
24    typedef pthread_t native_handle_type;
25
26    thread() noexcept;
27    template <class F, class ...Args> explicit thread(F&& f, Args&&... args);
28    ~thread();
29
30    thread(const thread&) = delete;
31    thread(thread&& t) noexcept;
32
33    thread& operator=(const thread&) = delete;
34    thread& operator=(thread&& t) noexcept;
35
36    void swap(thread& t) noexcept;
37
38    bool joinable() const noexcept;
39    void join();
40    void detach();
41    id get_id() const noexcept;
42    native_handle_type native_handle();
43
44    static unsigned hardware_concurrency() noexcept;
45};
46
47void swap(thread& x, thread& y) noexcept;
48
49class thread::id
50{
51public:
52    id() noexcept;
53};
54
55bool operator==(thread::id x, thread::id y) noexcept;
56bool operator!=(thread::id x, thread::id y) noexcept;
57bool operator< (thread::id x, thread::id y) noexcept;
58bool operator<=(thread::id x, thread::id y) noexcept;
59bool operator> (thread::id x, thread::id y) noexcept;
60bool operator>=(thread::id x, thread::id y) noexcept;
61
62template<class charT, class traits>
63basic_ostream<charT, traits>&
64operator<<(basic_ostream<charT, traits>& out, thread::id id);
65
66namespace this_thread
67{
68
69thread::id get_id() noexcept;
70
71void yield() noexcept;
72
73template <class Clock, class Duration>
74void sleep_until(const chrono::time_point<Clock, Duration>& abs_time);
75
76template <class Rep, class Period>
77void sleep_for(const chrono::duration<Rep, Period>& rel_time);
78
79}  // this_thread
80
81}  // std
82
83*/
84
85#include <__config>
86#include <iosfwd>
87#include <__functional_base>
88#include <type_traits>
89#include <cstddef>
90#include <functional>
91#include <memory>
92#include <system_error>
93#include <chrono>
94#include <__mutex_base>
95#ifndef _LIBCPP_CXX03_LANG
96#include <tuple>
97#endif
98#include <__threading_support>
99#include <__debug>
100
101#if !defined(_LIBCPP_HAS_NO_PRAGMA_SYSTEM_HEADER)
102#pragma GCC system_header
103#endif
104
105_LIBCPP_PUSH_MACROS
106#include <__undef_macros>
107
108#ifdef _LIBCPP_HAS_NO_THREADS
109#error <thread> is not supported on this single threaded system
110#else // !_LIBCPP_HAS_NO_THREADS
111
112_LIBCPP_BEGIN_NAMESPACE_STD
113
114template <class _Tp> class __thread_specific_ptr;
115class _LIBCPP_TYPE_VIS __thread_struct;
116class _LIBCPP_HIDDEN __thread_struct_imp;
117class __assoc_sub_state;
118
119_LIBCPP_FUNC_VIS __thread_specific_ptr<__thread_struct>& __thread_local_data();
120
121class _LIBCPP_TYPE_VIS __thread_struct
122{
123    __thread_struct_imp* __p_;
124
125    __thread_struct(const __thread_struct&);
126    __thread_struct& operator=(const __thread_struct&);
127public:
128    __thread_struct();
129    ~__thread_struct();
130
131    void notify_all_at_thread_exit(condition_variable*, mutex*);
132    void __make_ready_at_thread_exit(__assoc_sub_state*);
133};
134
135template <class _Tp>
136class __thread_specific_ptr
137{
138    __libcpp_tls_key __key_;
139
140     // Only __thread_local_data() may construct a __thread_specific_ptr
141     // and only with _Tp == __thread_struct.
142    static_assert((is_same<_Tp, __thread_struct>::value), "");
143    __thread_specific_ptr();
144    friend _LIBCPP_FUNC_VIS __thread_specific_ptr<__thread_struct>& __thread_local_data();
145
146    __thread_specific_ptr(const __thread_specific_ptr&);
147    __thread_specific_ptr& operator=(const __thread_specific_ptr&);
148
149    _LIBCPP_HIDDEN static void _LIBCPP_TLS_DESTRUCTOR_CC __at_thread_exit(void*);
150
151public:
152    typedef _Tp* pointer;
153
154    ~__thread_specific_ptr();
155
156    _LIBCPP_INLINE_VISIBILITY
157    pointer get() const {return static_cast<_Tp*>(__libcpp_tls_get(__key_));}
158    _LIBCPP_INLINE_VISIBILITY
159    pointer operator*() const {return *get();}
160    _LIBCPP_INLINE_VISIBILITY
161    pointer operator->() const {return get();}
162    void set_pointer(pointer __p);
163};
164
165template <class _Tp>
166void _LIBCPP_TLS_DESTRUCTOR_CC
167__thread_specific_ptr<_Tp>::__at_thread_exit(void* __p)
168{
169    delete static_cast<pointer>(__p);
170}
171
172template <class _Tp>
173__thread_specific_ptr<_Tp>::__thread_specific_ptr()
174{
175  int __ec =
176      __libcpp_tls_create(&__key_, &__thread_specific_ptr::__at_thread_exit);
177  if (__ec)
178    __throw_system_error(__ec, "__thread_specific_ptr construction failed");
179}
180
181template <class _Tp>
182__thread_specific_ptr<_Tp>::~__thread_specific_ptr()
183{
184    // __thread_specific_ptr is only created with a static storage duration
185    // so this destructor is only invoked during program termination. Invoking
186    // pthread_key_delete(__key_) may prevent other threads from deleting their
187    // thread local data. For this reason we leak the key.
188}
189
190template <class _Tp>
191void
192__thread_specific_ptr<_Tp>::set_pointer(pointer __p)
193{
194    _LIBCPP_ASSERT(get() == nullptr,
195                   "Attempting to overwrite thread local data");
196    __libcpp_tls_set(__key_, __p);
197}
198
199template<>
200struct _LIBCPP_TEMPLATE_VIS hash<__thread_id>
201    : public unary_function<__thread_id, size_t>
202{
203    _LIBCPP_INLINE_VISIBILITY
204    size_t operator()(__thread_id __v) const _NOEXCEPT
205    {
206        return hash<__libcpp_thread_id>()(__v.__id_);
207    }
208};
209
210template<class _CharT, class _Traits>
211_LIBCPP_INLINE_VISIBILITY
212basic_ostream<_CharT, _Traits>&
213operator<<(basic_ostream<_CharT, _Traits>& __os, __thread_id __id)
214{return __os << __id.__id_;}
215
216class _LIBCPP_TYPE_VIS thread
217{
218    __libcpp_thread_t __t_;
219
220    thread(const thread&);
221    thread& operator=(const thread&);
222public:
223    typedef __thread_id id;
224    typedef __libcpp_thread_t native_handle_type;
225
226    _LIBCPP_INLINE_VISIBILITY
227    thread() _NOEXCEPT : __t_(_LIBCPP_NULL_THREAD) {}
228#ifndef _LIBCPP_CXX03_LANG
229    template <class _Fp, class ..._Args,
230              class = typename enable_if
231              <
232                   !is_same<typename __uncvref<_Fp>::type, thread>::value
233              >::type
234             >
235        _LIBCPP_METHOD_TEMPLATE_IMPLICIT_INSTANTIATION_VIS
236        explicit thread(_Fp&& __f, _Args&&... __args);
237#else  // _LIBCPP_CXX03_LANG
238    template <class _Fp>
239    _LIBCPP_METHOD_TEMPLATE_IMPLICIT_INSTANTIATION_VIS
240    explicit thread(_Fp __f);
241#endif
242    ~thread();
243
244    _LIBCPP_INLINE_VISIBILITY
245    thread(thread&& __t) _NOEXCEPT : __t_(__t.__t_) {
246        __t.__t_ = _LIBCPP_NULL_THREAD;
247    }
248
249    _LIBCPP_INLINE_VISIBILITY
250    thread& operator=(thread&& __t) _NOEXCEPT {
251        if (!__libcpp_thread_isnull(&__t_))
252            terminate();
253        __t_ = __t.__t_;
254        __t.__t_ = _LIBCPP_NULL_THREAD;
255        return *this;
256    }
257
258    _LIBCPP_INLINE_VISIBILITY
259    void swap(thread& __t) _NOEXCEPT {_VSTD::swap(__t_, __t.__t_);}
260
261    _LIBCPP_INLINE_VISIBILITY
262    bool joinable() const _NOEXCEPT {return !__libcpp_thread_isnull(&__t_);}
263    void join();
264    void detach();
265    _LIBCPP_INLINE_VISIBILITY
266    id get_id() const _NOEXCEPT {return __libcpp_thread_get_id(&__t_);}
267    _LIBCPP_INLINE_VISIBILITY
268    native_handle_type native_handle() _NOEXCEPT {return __t_;}
269
270    static unsigned hardware_concurrency() _NOEXCEPT;
271};
272
273#ifndef _LIBCPP_CXX03_LANG
274
275template <class _TSp, class _Fp, class ..._Args, size_t ..._Indices>
276inline _LIBCPP_INLINE_VISIBILITY
277void
278__thread_execute(tuple<_TSp, _Fp, _Args...>& __t, __tuple_indices<_Indices...>)
279{
280    _VSTD::__invoke(_VSTD::move(_VSTD::get<1>(__t)), _VSTD::move(_VSTD::get<_Indices>(__t))...);
281}
282
283template <class _Fp>
284_LIBCPP_INLINE_VISIBILITY
285void* __thread_proxy(void* __vp)
286{
287    // _Fp = tuple< unique_ptr<__thread_struct>, Functor, Args...>
288    unique_ptr<_Fp> __p(static_cast<_Fp*>(__vp));
289    __thread_local_data().set_pointer(_VSTD::get<0>(*__p.get()).release());
290    typedef typename __make_tuple_indices<tuple_size<_Fp>::value, 2>::type _Index;
291    _VSTD::__thread_execute(*__p.get(), _Index());
292    return nullptr;
293}
294
295template <class _Fp, class ..._Args,
296          class
297         >
298thread::thread(_Fp&& __f, _Args&&... __args)
299{
300    typedef unique_ptr<__thread_struct> _TSPtr;
301    _TSPtr __tsp(new __thread_struct);
302    typedef tuple<_TSPtr, typename decay<_Fp>::type, typename decay<_Args>::type...> _Gp;
303    unique_ptr<_Gp> __p(
304            new _Gp(_VSTD::move(__tsp),
305                    _VSTD::__decay_copy(_VSTD::forward<_Fp>(__f)),
306                    _VSTD::__decay_copy(_VSTD::forward<_Args>(__args))...));
307    int __ec = _VSTD::__libcpp_thread_create(&__t_, &__thread_proxy<_Gp>, __p.get());
308    if (__ec == 0)
309        __p.release();
310    else
311        __throw_system_error(__ec, "thread constructor failed");
312}
313
314#else  // _LIBCPP_CXX03_LANG
315
316template <class _Fp>
317struct __thread_invoke_pair {
318    // This type is used to pass memory for thread local storage and a functor
319    // to a newly created thread because std::pair doesn't work with
320    // std::unique_ptr in C++03.
321    __thread_invoke_pair(_Fp& __f) : __tsp_(new __thread_struct), __fn_(__f) {}
322    unique_ptr<__thread_struct> __tsp_;
323    _Fp __fn_;
324};
325
326template <class _Fp>
327void* __thread_proxy_cxx03(void* __vp)
328{
329    unique_ptr<_Fp> __p(static_cast<_Fp*>(__vp));
330    __thread_local_data().set_pointer(__p->__tsp_.release());
331    (__p->__fn_)();
332    return nullptr;
333}
334
335template <class _Fp>
336thread::thread(_Fp __f)
337{
338
339    typedef __thread_invoke_pair<_Fp> _InvokePair;
340    typedef unique_ptr<_InvokePair> _PairPtr;
341    _PairPtr __pp(new _InvokePair(__f));
342    int __ec = _VSTD::__libcpp_thread_create(&__t_, &__thread_proxy_cxx03<_InvokePair>, __pp.get());
343    if (__ec == 0)
344        __pp.release();
345    else
346        __throw_system_error(__ec, "thread constructor failed");
347}
348
349#endif  // _LIBCPP_CXX03_LANG
350
351inline _LIBCPP_INLINE_VISIBILITY
352void swap(thread& __x, thread& __y) _NOEXCEPT {__x.swap(__y);}
353
354namespace this_thread
355{
356
357_LIBCPP_FUNC_VIS void sleep_for(const chrono::nanoseconds& __ns);
358
359template <class _Rep, class _Period>
360void
361sleep_for(const chrono::duration<_Rep, _Period>& __d)
362{
363    if (__d > chrono::duration<_Rep, _Period>::zero())
364    {
365#if defined(_LIBCPP_COMPILER_GCC) && (__powerpc__ || __POWERPC__)
366    //  GCC's long double const folding is incomplete for IBM128 long doubles.
367        _LIBCPP_CONSTEXPR chrono::duration<long double> _Max = chrono::duration<long double>(ULLONG_MAX/1000000000ULL) ;
368#else
369        _LIBCPP_CONSTEXPR chrono::duration<long double> _Max = chrono::nanoseconds::max();
370#endif
371        chrono::nanoseconds __ns;
372        if (__d < _Max)
373        {
374            __ns = chrono::duration_cast<chrono::nanoseconds>(__d);
375            if (__ns < __d)
376                ++__ns;
377        }
378        else
379            __ns = chrono::nanoseconds::max();
380        this_thread::sleep_for(__ns);
381    }
382}
383
384template <class _Clock, class _Duration>
385void
386sleep_until(const chrono::time_point<_Clock, _Duration>& __t)
387{
388    mutex __mut;
389    condition_variable __cv;
390    unique_lock<mutex> __lk(__mut);
391    while (_Clock::now() < __t)
392        __cv.wait_until(__lk, __t);
393}
394
395template <class _Duration>
396inline _LIBCPP_INLINE_VISIBILITY
397void
398sleep_until(const chrono::time_point<chrono::steady_clock, _Duration>& __t)
399{
400    this_thread::sleep_for(__t - chrono::steady_clock::now());
401}
402
403inline _LIBCPP_INLINE_VISIBILITY
404void yield() _NOEXCEPT {__libcpp_thread_yield();}
405
406}  // this_thread
407
408_LIBCPP_END_NAMESPACE_STD
409
410#endif // !_LIBCPP_HAS_NO_THREADS
411
412_LIBCPP_POP_MACROS
413
414#endif  // _LIBCPP_THREAD
415