libdispatch-913.30.4.tar.gz

[apple/libdispatch.git] / src / trace.h

diff --git a/src/trace.h b/src/trace.h
index 9a0f1528931287a9e42bde8d02cb12b580afb857..c670f60b7944e1ee4593b29a4203d0f45c6a632b 100644 (file)
--- a/src/trace.h
+++ b/src/trace.h
@@ -27,16 +27,9 @@
 #ifndef __DISPATCH_TRACE__
 #define __DISPATCH_TRACE__
 
 #ifndef __DISPATCH_TRACE__
 #define __DISPATCH_TRACE__
 

-#if DISPATCH_USE_DTRACE && !__OBJC2__
-
-typedef struct dispatch_trace_timer_params_s {
-       int64_t deadline, interval, leeway;
-} *dispatch_trace_timer_params_t;
-
-#include "provider.h"
+#if DISPATCH_PURE_C

 
 #if DISPATCH_USE_DTRACE_INTROSPECTION
 
 #if DISPATCH_USE_DTRACE_INTROSPECTION

-

 #define _dispatch_trace_callout(_c, _f, _dcc) do { \
                if (slowpath(DISPATCH_CALLOUT_ENTRY_ENABLED()) || \
                                slowpath(DISPATCH_CALLOUT_RETURN_ENABLED())) { \
 #define _dispatch_trace_callout(_c, _f, _dcc) do { \
                if (slowpath(DISPATCH_CALLOUT_ENTRY_ENABLED()) || \
                                slowpath(DISPATCH_CALLOUT_RETURN_ENABLED())) { \


@@ -51,7 +44,12 @@ typedef struct dispatch_trace_timer_params_s {
                        _dcc; \
                } \
        } while (0)
                        _dcc; \
                } \
        } while (0)

+#elif DISPATCH_INTROSPECTION
+#define _dispatch_trace_callout(_c, _f, _dcc) \
+               do { (void)(_c); (void)(_f); _dcc; } while (0)
+#endif // DISPATCH_USE_DTRACE_INTROSPECTION || DISPATCH_INTROSPECTION

 
 

+#if DISPATCH_USE_DTRACE_INTROSPECTION || DISPATCH_INTROSPECTION

 DISPATCH_ALWAYS_INLINE
 static inline void
 _dispatch_trace_client_callout(void *ctxt, dispatch_function_t f)
 DISPATCH_ALWAYS_INLINE
 static inline void
 _dispatch_trace_client_callout(void *ctxt, dispatch_function_t f)


@@ -73,45 +71,39 @@ _dispatch_trace_client_callout2(void *ctxt, size_t i, void (*f)(void *, size_t))
        _dispatch_introspection_callout_return(ctxt, func);
 }
 
        _dispatch_introspection_callout_return(ctxt, func);
 }
 

-#ifdef __BLOCKS__
-DISPATCH_ALWAYS_INLINE
-static inline void
-_dispatch_trace_client_callout_block(dispatch_block_t b)
-{
-       dispatch_function_t func = _dispatch_Block_invoke(b);
-       _dispatch_introspection_callout_entry(b, func);
-       _dispatch_trace_callout(b, func, _dispatch_client_callout(b, func));
-       _dispatch_introspection_callout_return(b, func);
-}
-#endif
-

 #define _dispatch_client_callout               _dispatch_trace_client_callout
 #define _dispatch_client_callout2              _dispatch_trace_client_callout2
 #define _dispatch_client_callout               _dispatch_trace_client_callout
 #define _dispatch_client_callout2              _dispatch_trace_client_callout2

-#define _dispatch_client_callout_block _dispatch_trace_client_callout_block
+#endif // DISPATCH_USE_DTRACE_INTROSPECTION || DISPATCH_INTROSPECTION

 
 

+#if DISPATCH_USE_DTRACE_INTROSPECTION

 #define _dispatch_trace_continuation(_q, _o, _t) do { \
                dispatch_queue_t _dq = (_q); \
                const char *_label = _dq && _dq->dq_label ? _dq->dq_label : ""; \
                struct dispatch_object_s *_do = (_o); \
 #define _dispatch_trace_continuation(_q, _o, _t) do { \
                dispatch_queue_t _dq = (_q); \
                const char *_label = _dq && _dq->dq_label ? _dq->dq_label : ""; \
                struct dispatch_object_s *_do = (_o); \

+               dispatch_continuation_t _dc; \

                char *_kind; \
                dispatch_function_t _func; \
                void *_ctxt; \
                char *_kind; \
                dispatch_function_t _func; \
                void *_ctxt; \

-               if (DISPATCH_OBJ_IS_VTABLE(_do)) { \
-                       _ctxt = _do->do_ctxt; \
+               if (_dispatch_object_has_vtable(_do)) { \

                        _kind = (char*)dx_kind(_do); \
                        if ((dx_type(_do) & _DISPATCH_META_TYPE_MASK) == \
                                        _DISPATCH_SOURCE_TYPE && (_dq) != &_dispatch_mgr_q) { \
                        _kind = (char*)dx_kind(_do); \
                        if ((dx_type(_do) & _DISPATCH_META_TYPE_MASK) == \
                                        _DISPATCH_SOURCE_TYPE && (_dq) != &_dispatch_mgr_q) { \

-                               _func = ((dispatch_source_t)_do)->ds_refs->ds_handler_func; \
+                               dispatch_source_t _ds = (dispatch_source_t)_do; \
+                               _dc = os_atomic_load(&_ds->ds_refs->ds_handler[ \
+                                               DS_EVENT_HANDLER], relaxed); \
+                               _func = _dc ? _dc->dc_func : NULL; \
+                               _ctxt = _dc ? _dc->dc_ctxt : NULL; \

                        } else { \
                                _func = (dispatch_function_t)_dispatch_queue_invoke; \
                        } else { \
                                _func = (dispatch_function_t)_dispatch_queue_invoke; \

+                               _ctxt = _do->do_ctxt; \

                        } \
                } else { \
                        } \
                } else { \

-                       struct dispatch_continuation_s *_dc = (void*)(_do); \
+                       _dc = (void*)_do; \

                        _ctxt = _dc->dc_ctxt; \
                        _ctxt = _dc->dc_ctxt; \

-                       if ((long)_dc->do_vtable & DISPATCH_OBJ_SYNC_SLOW_BIT) { \
+                       if (_dc->dc_flags & DISPATCH_OBJ_SYNC_WAITER_BIT) { \

                                _kind = "semaphore"; \
                                _func = (dispatch_function_t)dispatch_semaphore_signal; \
                                _kind = "semaphore"; \
                                _func = (dispatch_function_t)dispatch_semaphore_signal; \

-                       } else if (_dc->dc_func == _dispatch_call_block_and_release) { \
+                       } else if (_dc->dc_flags & DISPATCH_OBJ_BLOCK_BIT) { \

                                _kind = "block"; \
                                _func = _dispatch_Block_invoke(_dc->dc_ctxt); \
                        } else { \
                                _kind = "block"; \
                                _func = _dispatch_Block_invoke(_dc->dc_ctxt); \
                        } else { \


@@ -121,11 +113,18 @@ _dispatch_trace_client_callout_block(dispatch_block_t b)
                } \
                _t(_dq, _label, _do, _kind, _func, _ctxt); \
        } while (0)
                } \
                _t(_dq, _label, _do, _kind, _func, _ctxt); \
        } while (0)

-
+#elif DISPATCH_INTROSPECTION
+#define _dispatch_trace_continuation(_q, _o, _t) \
+               do { (void)(_q); (void)(_o); } while(0)
+#define DISPATCH_QUEUE_PUSH_ENABLED() 0
+#define DISPATCH_QUEUE_POP_ENABLED() 0
+#endif // DISPATCH_USE_DTRACE_INTROSPECTION || DISPATCH_INTROSPECTION
+
+#if DISPATCH_USE_DTRACE_INTROSPECTION || DISPATCH_INTROSPECTION

 DISPATCH_ALWAYS_INLINE
 static inline void
 DISPATCH_ALWAYS_INLINE
 static inline void

-_dispatch_trace_queue_push_list(dispatch_queue_t dq, dispatch_object_t _head,
-               dispatch_object_t _tail, unsigned int n)
+_dispatch_trace_root_queue_push_list(dispatch_queue_t dq,
+               dispatch_object_t _head, dispatch_object_t _tail, int n)

 {
        if (slowpath(DISPATCH_QUEUE_PUSH_ENABLED())) {
                struct dispatch_object_s *dou = _head._do;
 {
        if (slowpath(DISPATCH_QUEUE_PUSH_ENABLED())) {
                struct dispatch_object_s *dou = _head._do;


@@ -134,78 +133,69 @@ _dispatch_trace_queue_push_list(dispatch_queue_t dq, dispatch_object_t _head,
                } while (dou != _tail._do && (dou = dou->do_next));
        }
        _dispatch_introspection_queue_push_list(dq, _head, _tail);
                } while (dou != _tail._do && (dou = dou->do_next));
        }
        _dispatch_introspection_queue_push_list(dq, _head, _tail);

-       _dispatch_queue_push_list(dq, _head, _tail, n);
+       _dispatch_root_queue_push_inline(dq, _head, _tail, n);

 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void
 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void

-_dispatch_trace_queue_push(dispatch_queue_t dq, dispatch_object_t _tail)
+_dispatch_trace_queue_push_inline(dispatch_queue_t dq, dispatch_object_t _tail,
+               dispatch_qos_t qos)

 {
        if (slowpath(DISPATCH_QUEUE_PUSH_ENABLED())) {
                struct dispatch_object_s *dou = _tail._do;
                _dispatch_trace_continuation(dq, dou, DISPATCH_QUEUE_PUSH);
        }
        _dispatch_introspection_queue_push(dq, _tail);
 {
        if (slowpath(DISPATCH_QUEUE_PUSH_ENABLED())) {
                struct dispatch_object_s *dou = _tail._do;
                _dispatch_trace_continuation(dq, dou, DISPATCH_QUEUE_PUSH);
        }
        _dispatch_introspection_queue_push(dq, _tail);

-       _dispatch_queue_push(dq, _tail);
+       _dispatch_queue_push_inline(dq, _tail, qos);

 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void
 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void

-_dispatch_trace_queue_push_wakeup(dispatch_queue_t dq, dispatch_object_t _tail,
-               bool wakeup)
+_dispatch_trace_continuation_push(dispatch_queue_t dq, dispatch_object_t _tail)

 {
        if (slowpath(DISPATCH_QUEUE_PUSH_ENABLED())) {
                struct dispatch_object_s *dou = _tail._do;
                _dispatch_trace_continuation(dq, dou, DISPATCH_QUEUE_PUSH);
        }
        _dispatch_introspection_queue_push(dq, _tail);
 {
        if (slowpath(DISPATCH_QUEUE_PUSH_ENABLED())) {
                struct dispatch_object_s *dou = _tail._do;
                _dispatch_trace_continuation(dq, dou, DISPATCH_QUEUE_PUSH);
        }
        _dispatch_introspection_queue_push(dq, _tail);

-       _dispatch_queue_push_wakeup(dq, _tail, wakeup);

 }
 
 }
 

-DISPATCH_ALWAYS_INLINE
-static inline void
-_dispatch_queue_push_notrace(dispatch_queue_t dq, dispatch_object_t dou)
-{
-       _dispatch_queue_push(dq, dou);
-}
-
-#define _dispatch_queue_push_list _dispatch_trace_queue_push_list
-#define _dispatch_queue_push _dispatch_trace_queue_push
-#define _dispatch_queue_push_wakeup _dispatch_trace_queue_push_wakeup
+#define _dispatch_root_queue_push_inline _dispatch_trace_root_queue_push_list
+#define _dispatch_queue_push_inline _dispatch_trace_queue_push_inline

 
 DISPATCH_ALWAYS_INLINE
 static inline void
 
 DISPATCH_ALWAYS_INLINE
 static inline void

-_dispatch_trace_continuation_pop(dispatch_queue_t dq,
-               dispatch_object_t dou)
+_dispatch_trace_continuation_pop(dispatch_queue_t dq, dispatch_object_t dou)

 {
        if (slowpath(DISPATCH_QUEUE_POP_ENABLED())) {
                _dispatch_trace_continuation(dq, dou._do, DISPATCH_QUEUE_POP);
        }
        _dispatch_introspection_queue_pop(dq, dou);
 }
 {
        if (slowpath(DISPATCH_QUEUE_POP_ENABLED())) {
                _dispatch_trace_continuation(dq, dou._do, DISPATCH_QUEUE_POP);
        }
        _dispatch_introspection_queue_pop(dq, dou);
 }

+#else
+#define _dispatch_trace_continuation_push(dq, dou) \
+               do { (void)(dq); (void)(dou); } while(0)
+#define _dispatch_trace_continuation_pop(dq, dou) \
+               do { (void)(dq); (void)(dou); } while(0)
+#endif // DISPATCH_USE_DTRACE_INTROSPECTION || DISPATCH_INTROSPECTION

 
 

-#endif // DISPATCH_USE_DTRACE_INTROSPECTION
-
+#if DISPATCH_USE_DTRACE

 static inline dispatch_function_t
 static inline dispatch_function_t

-_dispatch_trace_timer_function(dispatch_source_t ds, dispatch_source_refs_t dr)
+_dispatch_trace_timer_function(dispatch_timer_source_refs_t dr)

 {
 {

-       dispatch_function_t func = dr->ds_handler_func;
-       if (func == _dispatch_after_timer_callback) {
-               dispatch_continuation_t dc = ds->do_ctxt;
-               func = dc->dc_func != _dispatch_call_block_and_release ? dc->dc_func :
-                               dc->dc_ctxt ? _dispatch_Block_invoke(dc->dc_ctxt) : NULL;
-       }
-       return func;
+       dispatch_continuation_t dc;
+       dc = os_atomic_load(&dr->ds_handler[DS_EVENT_HANDLER], relaxed);
+       return dc ? dc->dc_func : NULL;

 }
 
 DISPATCH_ALWAYS_INLINE
 static inline dispatch_trace_timer_params_t
 }
 
 DISPATCH_ALWAYS_INLINE
 static inline dispatch_trace_timer_params_t

-_dispatch_trace_timer_params(uintptr_t ident,
+_dispatch_trace_timer_params(dispatch_clock_t clock,

                struct dispatch_timer_source_s *values, uint64_t deadline,
                dispatch_trace_timer_params_t params)
 {
                struct dispatch_timer_source_s *values, uint64_t deadline,
                dispatch_trace_timer_params_t params)
 {

-       #define _dispatch_trace_time2nano3(t) (DISPATCH_TIMER_KIND(ident) \
-                       == DISPATCH_TIMER_KIND_MACH ? _dispatch_time_mach2nano(t) : (t))
+       #define _dispatch_trace_time2nano3(t) \
+                       (clock == DISPATCH_CLOCK_MACH ? _dispatch_time_mach2nano(t) : (t))

        #define _dispatch_trace_time2nano2(v, t) ({ uint64_t _t = (t); \
                        (v) >= INT64_MAX ? -1ll : (int64_t)_dispatch_trace_time2nano3(_t);})
        #define _dispatch_trace_time2nano(v) ({ uint64_t _t; \
        #define _dispatch_trace_time2nano2(v, t) ({ uint64_t _t = (t); \
                        (v) >= INT64_MAX ? -1ll : (int64_t)_dispatch_trace_time2nano3(_t);})
        #define _dispatch_trace_time2nano(v) ({ uint64_t _t; \


@@ -214,14 +204,13 @@ _dispatch_trace_timer_params(uintptr_t ident,
        if (deadline) {
                params->deadline = (int64_t)deadline;
        } else {
        if (deadline) {
                params->deadline = (int64_t)deadline;
        } else {

-               uint64_t now = (DISPATCH_TIMER_KIND(ident) ==
-                               DISPATCH_TIMER_KIND_MACH ? _dispatch_absolute_time() :
-                                _dispatch_get_nanoseconds());
+               uint64_t now = _dispatch_time_now(clock);

                params->deadline = _dispatch_trace_time2nano2(values->target,
                                values->target < now ? 0 : values->target - now);
        }
                params->deadline = _dispatch_trace_time2nano2(values->target,
                                values->target < now ? 0 : values->target - now);
        }

+       uint64_t leeway = values->deadline - values->target;

        params->interval = _dispatch_trace_time2nano(values->interval);
        params->interval = _dispatch_trace_time2nano(values->interval);

-       params->leeway = _dispatch_trace_time2nano(values->leeway);
+       params->leeway = _dispatch_trace_time2nano(leeway);

        return params;
 }
 
        return params;
 }
 


@@ -234,51 +223,52 @@ _dispatch_trace_timer_configure_enabled(void)
 
 DISPATCH_ALWAYS_INLINE
 static inline void
 
 DISPATCH_ALWAYS_INLINE
 static inline void

-_dispatch_trace_timer_configure(dispatch_source_t ds, uintptr_t ident,
+_dispatch_trace_timer_configure(dispatch_source_t ds, dispatch_clock_t clock,

                struct dispatch_timer_source_s *values)
 {
                struct dispatch_timer_source_s *values)
 {

+       dispatch_timer_source_refs_t dr = ds->ds_timer_refs;

        struct dispatch_trace_timer_params_s params;
        struct dispatch_trace_timer_params_s params;

-       DISPATCH_TIMER_CONFIGURE(ds, _dispatch_trace_timer_function(ds,
-                       ds->ds_refs), _dispatch_trace_timer_params(ident, values, 0,
-                       &params));
+       DISPATCH_TIMER_CONFIGURE(ds, _dispatch_trace_timer_function(dr),
+                       _dispatch_trace_timer_params(clock, values, 0, &params));

 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void
 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void

-_dispatch_trace_timer_program(dispatch_source_refs_t dr, uint64_t deadline)
+_dispatch_trace_timer_program(dispatch_timer_source_refs_t dr, uint64_t deadline)

 {
        if (slowpath(DISPATCH_TIMER_PROGRAM_ENABLED())) {
                if (deadline && dr) {
                        dispatch_source_t ds = _dispatch_source_from_refs(dr);
 {
        if (slowpath(DISPATCH_TIMER_PROGRAM_ENABLED())) {
                if (deadline && dr) {
                        dispatch_source_t ds = _dispatch_source_from_refs(dr);

+                       dispatch_clock_t clock = DISPATCH_TIMER_CLOCK(dr->du_ident);

                        struct dispatch_trace_timer_params_s params;
                        struct dispatch_trace_timer_params_s params;

-                       DISPATCH_TIMER_PROGRAM(ds, _dispatch_trace_timer_function(ds, dr),
-                                       _dispatch_trace_timer_params(ds->ds_ident_hack,
-                                       &ds_timer(dr), deadline, &params));
+                       DISPATCH_TIMER_PROGRAM(ds, _dispatch_trace_timer_function(dr),
+                                       _dispatch_trace_timer_params(clock, &dr->dt_timer,
+                                       deadline, &params));

                }
        }
 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void
                }
        }
 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void

-_dispatch_trace_timer_wake(dispatch_source_refs_t dr)
+_dispatch_trace_timer_wake(dispatch_timer_source_refs_t dr)

 {
        if (slowpath(DISPATCH_TIMER_WAKE_ENABLED())) {
                if (dr) {
                        dispatch_source_t ds = _dispatch_source_from_refs(dr);
 {
        if (slowpath(DISPATCH_TIMER_WAKE_ENABLED())) {
                if (dr) {
                        dispatch_source_t ds = _dispatch_source_from_refs(dr);

-                       DISPATCH_TIMER_WAKE(ds, _dispatch_trace_timer_function(ds, dr));
+                       DISPATCH_TIMER_WAKE(ds, _dispatch_trace_timer_function(dr));

                }
        }
 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void
                }
        }
 }
 
 DISPATCH_ALWAYS_INLINE
 static inline void

-_dispatch_trace_timer_fire(dispatch_source_refs_t dr, unsigned long data,
-               unsigned long missed)
+_dispatch_trace_timer_fire(dispatch_timer_source_refs_t dr, uint64_t data,
+               uint64_t missed)

 {
        if (slowpath(DISPATCH_TIMER_FIRE_ENABLED())) {
                if (!(data - missed) && dr) {
                        dispatch_source_t ds = _dispatch_source_from_refs(dr);
 {
        if (slowpath(DISPATCH_TIMER_FIRE_ENABLED())) {
                if (!(data - missed) && dr) {
                        dispatch_source_t ds = _dispatch_source_from_refs(dr);

-                       DISPATCH_TIMER_FIRE(ds, _dispatch_trace_timer_function(ds, dr));
+                       DISPATCH_TIMER_FIRE(ds, _dispatch_trace_timer_function(dr));

                }
        }
 }
                }
        }
 }


@@ -286,8 +276,8 @@ _dispatch_trace_timer_fire(dispatch_source_refs_t dr, unsigned long data,
 #else
 
 #define _dispatch_trace_timer_configure_enabled() false
 #else
 
 #define _dispatch_trace_timer_configure_enabled() false

-#define _dispatch_trace_timer_configure(ds, ident, values) \
-               do { (void)(ds); (void)(ident); (void)(values); } while(0)
+#define _dispatch_trace_timer_configure(ds, clock, values) \
+               do { (void)(ds); (void)(clock); (void)(values); } while(0)

 #define _dispatch_trace_timer_program(dr, deadline) \
                do { (void)(dr); (void)(deadline); } while(0)
 #define _dispatch_trace_timer_wake(dr) \
 #define _dispatch_trace_timer_program(dr, deadline) \
                do { (void)(dr); (void)(deadline); } while(0)
 #define _dispatch_trace_timer_wake(dr) \


@@ -295,14 +285,8 @@ _dispatch_trace_timer_fire(dispatch_source_refs_t dr, unsigned long data,
 #define _dispatch_trace_timer_fire(dr, data, missed) \
                do { (void)(dr); (void)(data); (void)(missed); } while(0)
 
 #define _dispatch_trace_timer_fire(dr, data, missed) \
                do { (void)(dr); (void)(data); (void)(missed); } while(0)
 

-#endif // DISPATCH_USE_DTRACE && !__OBJC2__
-
-#if !DISPATCH_USE_DTRACE_INTROSPECTION
-
-#define _dispatch_queue_push_notrace _dispatch_queue_push
-#define _dispatch_trace_continuation_pop(dq, dou) \
-               do { (void)(dq); (void)(dou); } while(0)
+#endif // DISPATCH_USE_DTRACE

 
 

-#endif // !DISPATCH_USE_DTRACE_INTROSPECTION
+#endif // DISPATCH_PURE_C

 
 #endif // __DISPATCH_TRACE__
 
 #endif // __DISPATCH_TRACE__