1 /*****************************************************************************
2 * pthread.c : pthread back-end for LibVLC
3 *****************************************************************************
4 * Copyright (C) 1999-2009 the VideoLAN team
6 * Authors: Jean-Marc Dressler <polux@via.ecp.fr>
7 * Samuel Hocevar <sam@zoy.org>
8 * Gildas Bazin <gbazin@netcourrier.com>
12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2 of the License, or
15 * (at your option) any later version.
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 * GNU General Public License for more details.
22 * You should have received a copy of the GNU General Public License
23 * along with this program; if not, write to the Free Software
24 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
25 *****************************************************************************/
31 #include <vlc_common.h>
36 #include <unistd.h> /* fsync() */
41 # include <sys/syscall.h> /* SYS_gettid */
44 #ifdef HAVE_EXECINFO_H
45 # include <execinfo.h>
49 # include <sys/time.h> /* gettimeofday in vlc_cond_timedwait */
53 * Print a backtrace to the standard error for debugging purpose.
55 void vlc_trace (const char *fn, const char *file, unsigned line)
57 fprintf (stderr, "at %s:%u in %s\n", file, line, fn);
58 fflush (stderr); /* needed before switch to low-level I/O */
61 int len = backtrace (stack, sizeof (stack) / sizeof (stack[0]));
62 backtrace_symbols_fd (stack, len, 2);
67 static inline unsigned long vlc_threadid (void)
69 #if defined (__linux__)
70 /* glibc does not provide a call for this */
71 return syscall (SYS_gettid);
74 union { pthread_t th; unsigned long int i; } v = { };
75 v.th = pthread_self ();
82 /*****************************************************************************
83 * vlc_thread_fatal: Report an error from the threading layer
84 *****************************************************************************
85 * This is mostly meant for debugging.
86 *****************************************************************************/
88 vlc_thread_fatal (const char *action, int error,
89 const char *function, const char *file, unsigned line)
91 fprintf (stderr, "LibVLC fatal error %s (%d) in thread %lu ",
92 action, error, vlc_threadid ());
93 vlc_trace (function, file, line);
95 /* Sometimes strerror_r() crashes too, so make sure we print an error
96 * message before we invoke it */
98 /* Avoid the strerror_r() prototype brain damage in glibc */
100 fprintf (stderr, " Error message: %m\n");
105 switch (strerror_r (error, buf, sizeof (buf)))
110 case ERANGE: /* should never happen */
111 msg = "unknwon (too big to display)";
114 msg = "unknown (invalid error number)";
117 fprintf (stderr, " Error message: %s\n", msg);
124 # define VLC_THREAD_ASSERT( action ) \
125 if (val) vlc_thread_fatal (action, val, __func__, __FILE__, __LINE__)
127 # define VLC_THREAD_ASSERT( action ) ((void)val)
130 #if defined (__GLIBC__) && (__GLIBC_MINOR__ < 6)
131 /* This is not prototyped under glibc, though it exists. */
132 int pthread_mutexattr_setkind_np( pthread_mutexattr_t *attr, int kind );
135 /*****************************************************************************
136 * vlc_mutex_init: initialize a mutex
137 *****************************************************************************/
138 void vlc_mutex_init( vlc_mutex_t *p_mutex )
140 pthread_mutexattr_t attr;
142 if( pthread_mutexattr_init( &attr ) )
145 /* Create error-checking mutex to detect problems more easily. */
146 # if defined (__GLIBC__) && (__GLIBC_MINOR__ < 6)
147 pthread_mutexattr_setkind_np( &attr, PTHREAD_MUTEX_ERRORCHECK_NP );
149 pthread_mutexattr_settype( &attr, PTHREAD_MUTEX_ERRORCHECK );
152 if( pthread_mutex_init( p_mutex, &attr ) )
154 pthread_mutexattr_destroy( &attr );
157 /*****************************************************************************
158 * vlc_mutex_init: initialize a recursive mutex (Do not use)
159 *****************************************************************************/
160 void vlc_mutex_init_recursive( vlc_mutex_t *p_mutex )
162 pthread_mutexattr_t attr;
164 pthread_mutexattr_init( &attr );
165 #if defined (__GLIBC__) && (__GLIBC_MINOR__ < 6)
166 pthread_mutexattr_setkind_np( &attr, PTHREAD_MUTEX_RECURSIVE_NP );
168 pthread_mutexattr_settype( &attr, PTHREAD_MUTEX_RECURSIVE );
170 if( pthread_mutex_init( p_mutex, &attr ) )
172 pthread_mutexattr_destroy( &attr );
177 * Destroys a mutex. The mutex must not be locked.
179 * @param p_mutex mutex to destroy
180 * @return always succeeds
182 void vlc_mutex_destroy (vlc_mutex_t *p_mutex)
184 int val = pthread_mutex_destroy( p_mutex );
185 VLC_THREAD_ASSERT ("destroying mutex");
189 # ifdef HAVE_VALGRIND_VALGRIND_H
190 # include <valgrind/valgrind.h>
192 # define RUNNING_ON_VALGRIND (0)
195 void vlc_assert_locked (vlc_mutex_t *p_mutex)
197 if (RUNNING_ON_VALGRIND > 0)
199 assert (pthread_mutex_lock (p_mutex) == EDEADLK);
204 * Acquires a mutex. If needed, waits for any other thread to release it.
205 * Beware of deadlocks when locking multiple mutexes at the same time,
206 * or when using mutexes from callbacks.
207 * This function is not a cancellation-point.
209 * @param p_mutex mutex initialized with vlc_mutex_init() or
210 * vlc_mutex_init_recursive()
212 void vlc_mutex_lock (vlc_mutex_t *p_mutex)
214 int val = pthread_mutex_lock( p_mutex );
215 VLC_THREAD_ASSERT ("locking mutex");
219 * Acquires a mutex if and only if it is not currently held by another thread.
220 * This function never sleeps and can be used in delay-critical code paths.
221 * This function is not a cancellation-point.
223 * <b>Beware</b>: If this function fails, then the mutex is held... by another
224 * thread. The calling thread must deal with the error appropriately. That
225 * typically implies postponing the operations that would have required the
226 * mutex. If the thread cannot defer those operations, then it must use
227 * vlc_mutex_lock(). If in doubt, use vlc_mutex_lock() instead.
229 * @param p_mutex mutex initialized with vlc_mutex_init() or
230 * vlc_mutex_init_recursive()
231 * @return 0 if the mutex could be acquired, an error code otherwise.
233 int vlc_mutex_trylock (vlc_mutex_t *p_mutex)
235 int val = pthread_mutex_trylock( p_mutex );
238 VLC_THREAD_ASSERT ("locking mutex");
243 * Releases a mutex (or crashes if the mutex is not locked by the caller).
244 * @param p_mutex mutex locked with vlc_mutex_lock().
246 void vlc_mutex_unlock (vlc_mutex_t *p_mutex)
248 int val = pthread_mutex_unlock( p_mutex );
249 VLC_THREAD_ASSERT ("unlocking mutex");
252 /*****************************************************************************
253 * vlc_cond_init: initialize a condition variable
254 *****************************************************************************/
255 void vlc_cond_init( vlc_cond_t *p_condvar )
257 pthread_condattr_t attr;
259 if (pthread_condattr_init (&attr))
261 #if !defined (_POSIX_CLOCK_SELECTION)
262 /* Fairly outdated POSIX support (that was defined in 2001) */
263 # define _POSIX_CLOCK_SELECTION (-1)
265 #if (_POSIX_CLOCK_SELECTION >= 0)
266 /* NOTE: This must be the same clock as the one in mtime.c */
267 pthread_condattr_setclock (&attr, CLOCK_MONOTONIC);
270 if (pthread_cond_init (p_condvar, &attr))
272 pthread_condattr_destroy (&attr);
276 * Destroys a condition variable. No threads shall be waiting or signaling the
278 * @param p_condvar condition variable to destroy
280 void vlc_cond_destroy (vlc_cond_t *p_condvar)
282 int val = pthread_cond_destroy( p_condvar );
283 VLC_THREAD_ASSERT ("destroying condition");
287 * Wakes up one thread waiting on a condition variable, if any.
288 * @param p_condvar condition variable
290 void vlc_cond_signal (vlc_cond_t *p_condvar)
292 int val = pthread_cond_signal( p_condvar );
293 VLC_THREAD_ASSERT ("signaling condition variable");
297 * Wakes up all threads (if any) waiting on a condition variable.
298 * @param p_cond condition variable
300 void vlc_cond_broadcast (vlc_cond_t *p_condvar)
302 pthread_cond_broadcast (p_condvar);
306 * Waits for a condition variable. The calling thread will be suspended until
307 * another thread calls vlc_cond_signal() or vlc_cond_broadcast() on the same
308 * condition variable, the thread is cancelled with vlc_cancel(), or the
309 * system causes a "spurious" unsolicited wake-up.
311 * A mutex is needed to wait on a condition variable. It must <b>not</b> be
312 * a recursive mutex. Although it is possible to use the same mutex for
313 * multiple condition, it is not valid to use different mutexes for the same
314 * condition variable at the same time from different threads.
316 * In case of thread cancellation, the mutex is always locked before
317 * cancellation proceeds.
319 * The canonical way to use a condition variable to wait for event foobar is:
321 vlc_mutex_lock (&lock);
322 mutex_cleanup_push (&lock); // release the mutex in case of cancellation
325 vlc_cond_wait (&wait, &lock);
327 --- foobar is now true, do something about it here --
329 vlc_cleanup_run (); // release the mutex
332 * @param p_condvar condition variable to wait on
333 * @param p_mutex mutex which is unlocked while waiting,
334 * then locked again when waking up.
335 * @param deadline <b>absolute</b> timeout
337 * @return 0 if the condition was signaled, an error code in case of timeout.
339 void vlc_cond_wait (vlc_cond_t *p_condvar, vlc_mutex_t *p_mutex)
341 int val = pthread_cond_wait( p_condvar, p_mutex );
342 VLC_THREAD_ASSERT ("waiting on condition");
346 * Waits for a condition variable up to a certain date.
347 * This works like vlc_cond_wait(), except for the additional timeout.
349 * @param p_condvar condition variable to wait on
350 * @param p_mutex mutex which is unlocked while waiting,
351 * then locked again when waking up.
352 * @param deadline <b>absolute</b> timeout
354 * @return 0 if the condition was signaled, an error code in case of timeout.
356 int vlc_cond_timedwait (vlc_cond_t *p_condvar, vlc_mutex_t *p_mutex,
359 #if defined(__APPLE__) && !defined(__powerpc__) && !defined( __ppc__ ) && !defined( __ppc64__ )
360 /* mdate() is mac_absolute_time on OSX, which we must convert to do
361 * the same base than gettimeofday() which pthread_cond_timedwait
363 mtime_t oldbase = mdate();
365 gettimeofday(&tv, NULL);
366 mtime_t newbase = (mtime_t)tv.tv_sec * 1000000 + (mtime_t) tv.tv_usec;
367 deadline = deadline - oldbase + newbase;
369 lldiv_t d = lldiv( deadline, CLOCK_FREQ );
370 struct timespec ts = { d.quot, d.rem * (1000000000 / CLOCK_FREQ) };
372 int val = pthread_cond_timedwait (p_condvar, p_mutex, &ts);
373 if (val != ETIMEDOUT)
374 VLC_THREAD_ASSERT ("timed-waiting on condition");
379 * Initializes a read/write lock.
381 void vlc_rwlock_init (vlc_rwlock_t *lock)
383 if (pthread_rwlock_init (lock, NULL))
388 * Destroys an initialized unused read/write lock.
390 void vlc_rwlock_destroy (vlc_rwlock_t *lock)
392 int val = pthread_rwlock_destroy (lock);
393 VLC_THREAD_ASSERT ("destroying R/W lock");
397 * Acquires a read/write lock for reading. Recursion is allowed.
399 void vlc_rwlock_rdlock (vlc_rwlock_t *lock)
401 int val = pthread_rwlock_rdlock (lock);
402 VLC_THREAD_ASSERT ("acquiring R/W lock for reading");
406 * Acquires a read/write lock for writing. Recursion is not allowed.
408 void vlc_rwlock_wrlock (vlc_rwlock_t *lock)
410 int val = pthread_rwlock_wrlock (lock);
411 VLC_THREAD_ASSERT ("acquiring R/W lock for writing");
415 * Releases a read/write lock.
417 void vlc_rwlock_unlock (vlc_rwlock_t *lock)
419 int val = pthread_rwlock_unlock (lock);
420 VLC_THREAD_ASSERT ("releasing R/W lock");
424 * Allocates a thread-specific variable.
425 * @param key where to store the thread-specific variable handle
426 * @param destr a destruction callback. It is called whenever a thread exits
427 * and the thread-specific variable has a non-NULL value.
428 * @return 0 on success, a system error code otherwise. This function can
429 * actually fail because there is a fixed limit on the number of
430 * thread-specific variable in a process on most systems.
432 int vlc_threadvar_create (vlc_threadvar_t *key, void (*destr) (void *))
434 return pthread_key_create (key, destr);
437 void vlc_threadvar_delete (vlc_threadvar_t *p_tls)
439 pthread_key_delete (*p_tls);
443 * Sets a thread-specific variable.
444 * @param key thread-local variable key (created with vlc_threadvar_create())
445 * @param value new value for the variable for the calling thread
446 * @return 0 on success, a system error code otherwise.
448 int vlc_threadvar_set (vlc_threadvar_t key, void *value)
450 return pthread_setspecific (key, value);
454 * Gets the value of a thread-local variable for the calling thread.
455 * This function cannot fail.
456 * @return the value associated with the given variable for the calling
457 * or NULL if there is no value.
459 void *vlc_threadvar_get (vlc_threadvar_t key)
461 return pthread_getspecific (key);
465 * Creates and starts new thread.
467 * @param p_handle [OUT] pointer to write the handle of the created thread to
468 * @param entry entry point for the thread
469 * @param data data parameter given to the entry point
470 * @param priority thread priority value
471 * @return 0 on success, a standard error code on error.
473 int vlc_clone (vlc_thread_t *p_handle, void * (*entry) (void *), void *data,
479 pthread_attr_init (&attr);
481 /* Block the signals that signals interface plugin handles.
482 * If the LibVLC caller wants to handle some signals by itself, it should
483 * block these before whenever invoking LibVLC. And it must obviously not
484 * start the VLC signals interface plugin.
486 * LibVLC will normally ignore any interruption caused by an asynchronous
487 * signal during a system call. But there may well be some buggy cases
488 * where it fails to handle EINTR (bug reports welcome). Some underlying
489 * libraries might also not handle EINTR properly.
495 sigdelset (&set, SIGHUP);
496 sigaddset (&set, SIGINT);
497 sigaddset (&set, SIGQUIT);
498 sigaddset (&set, SIGTERM);
500 sigaddset (&set, SIGPIPE); /* We don't want this one, really! */
501 pthread_sigmask (SIG_BLOCK, &set, &oldset);
504 #if defined (_POSIX_PRIORITY_SCHEDULING) && (_POSIX_PRIORITY_SCHEDULING >= 0) \
505 && defined (_POSIX_THREAD_PRIORITY_SCHEDULING) \
506 && (_POSIX_THREAD_PRIORITY_SCHEDULING >= 0)
508 struct sched_param sp = { .sched_priority = priority, };
511 if (sp.sched_priority <= 0)
512 sp.sched_priority += sched_get_priority_max (policy = SCHED_OTHER);
514 sp.sched_priority += sched_get_priority_min (policy = SCHED_RR);
516 pthread_attr_setschedpolicy (&attr, policy);
517 pthread_attr_setschedparam (&attr, &sp);
523 /* The thread stack size.
524 * The lower the value, the less address space per thread, the highest
525 * maximum simultaneous threads per process. Too low values will cause
526 * stack overflows and weird crashes. Set with caution. Also keep in mind
527 * that 64-bits platforms consume more stack than 32-bits one.
529 * Thanks to on-demand paging, thread stack size only affects address space
530 * consumption. In terms of memory, threads only use what they need
531 * (rounded up to the page boundary).
533 * For example, on Linux i386, the default is 2 mega-bytes, which supports
534 * about 320 threads per processes. */
535 #define VLC_STACKSIZE (128 * sizeof (void *) * 1024)
538 ret = pthread_attr_setstacksize (&attr, VLC_STACKSIZE);
539 assert (ret == 0); /* fails iif VLC_STACKSIZE is invalid */
542 ret = pthread_create (p_handle, &attr, entry, data);
543 pthread_sigmask (SIG_SETMASK, &oldset, NULL);
544 pthread_attr_destroy (&attr);
549 * Marks a thread as cancelled. Next time the target thread reaches a
550 * cancellation point (while not having disabled cancellation), it will
551 * run its cancellation cleanup handler, the thread variable destructors, and
552 * terminate. vlc_join() must be used afterward regardless of a thread being
555 void vlc_cancel (vlc_thread_t thread_id)
557 pthread_cancel (thread_id);
561 * Waits for a thread to complete (if needed), and destroys it.
562 * This is a cancellation point; in case of cancellation, the join does _not_
565 * @param handle thread handle
566 * @param p_result [OUT] pointer to write the thread return value or NULL
567 * @return 0 on success, a standard error code otherwise.
569 void vlc_join (vlc_thread_t handle, void **result)
571 int val = pthread_join (handle, result);
572 VLC_THREAD_ASSERT ("joining thread");
576 * Save the current cancellation state (enabled or disabled), then disable
577 * cancellation for the calling thread.
578 * This function must be called before entering a piece of code that is not
579 * cancellation-safe, unless it can be proven that the calling thread will not
581 * @return Previous cancellation state (opaque value for vlc_restorecancel()).
583 int vlc_savecancel (void)
586 int val = pthread_setcancelstate (PTHREAD_CANCEL_DISABLE, &state);
588 VLC_THREAD_ASSERT ("saving cancellation");
593 * Restore the cancellation state for the calling thread.
594 * @param state previous state as returned by vlc_savecancel().
595 * @return Nothing, always succeeds.
597 void vlc_restorecancel (int state)
602 val = pthread_setcancelstate (state, &oldstate);
603 /* This should fail if an invalid value for given for state */
604 VLC_THREAD_ASSERT ("restoring cancellation");
606 if (oldstate != PTHREAD_CANCEL_DISABLE)
607 vlc_thread_fatal ("restoring cancellation while not disabled", EINVAL,
608 __func__, __FILE__, __LINE__);
610 pthread_setcancelstate (state, NULL);
615 * Issues an explicit deferred cancellation point.
616 * This has no effect if thread cancellation is disabled.
617 * This can be called when there is a rather slow non-sleeping operation.
618 * This is also used to force a cancellation point in a function that would
619 * otherwise "not always" be a one (block_FifoGet() is an example).
621 void vlc_testcancel (void)
623 pthread_testcancel ();
626 void vlc_control_cancel (int cmd, ...)
632 #ifndef HAVE_POSIX_TIMER
633 /* We have no fallback currently. We'll just crash on timer API usage. */
634 static void timer_not_supported(void)
636 fprintf(stderr, "*** Error: Timer API is not supported on this platform.\n");
641 static void vlc_timer_do (union sigval val)
643 vlc_timer_t *id = val.sival_ptr;
648 * Initializes an asynchronous timer.
649 * @warning Asynchronous timers are processed from an unspecified thread, and
650 * a timer is only serialized against itself.
652 * @param id pointer to timer to be initialized
653 * @param func function that the timer will call
654 * @param data parameter for the timer function
655 * @return 0 on success, a system error code otherwise.
657 int vlc_timer_create (vlc_timer_t *id, void (*func) (void *), void *data)
659 #ifdef HAVE_POSIX_TIMER
662 memset (&ev, 0, sizeof (ev));
663 ev.sigev_notify = SIGEV_THREAD;
664 ev.sigev_value.sival_ptr = id;
665 ev.sigev_notify_function = vlc_timer_do;
666 ev.sigev_notify_attributes = NULL;
670 #if (_POSIX_CLOCK_SELECTION >= 0)
671 if (timer_create (CLOCK_MONOTONIC, &ev, &id->handle))
673 if (timer_create (CLOCK_REALTIME, &ev, &id->handle))
679 timer_not_supported();
685 * Destroys an initialized timer. If needed, the timer is first disarmed.
686 * This function is undefined if the specified timer is not initialized.
688 * @warning This function <b>must</b> be called before the timer data can be
689 * freed and before the timer callback function can be unloaded.
691 * @param timer to destroy
693 void vlc_timer_destroy (vlc_timer_t *id)
695 #ifdef HAVE_POSIX_TIMER
696 int val = timer_delete (id->handle);
697 VLC_THREAD_ASSERT ("deleting timer");
699 timer_not_supported();
704 * Arm or disarm an initialized timer.
705 * This functions overrides any previous call to itself.
707 * @note A timer can fire later than requested due to system scheduling
708 * limitations. An interval timer can fail to trigger sometimes, either because
709 * the system is busy or suspended, or because a previous iteration of the
710 * timer is still running. See also vlc_timer_getoverrun().
712 * @param id initialized timer pointer
713 * @param absolute the timer value origin is the same as mdate() if true,
714 * the timer value is relative to now if false.
715 * @param value zero to disarm the timer, otherwise the initial time to wait
716 * before firing the timer.
717 * @param interval zero to fire the timer just once, otherwise the timer
718 * repetition interval.
720 void vlc_timer_schedule (vlc_timer_t *id, bool absolute,
721 mtime_t value, mtime_t interval)
723 #ifdef HAVE_POSIX_TIMER
724 lldiv_t vad = lldiv (value, CLOCK_FREQ);
725 lldiv_t itd = lldiv (interval, CLOCK_FREQ);
726 struct itimerspec it = {
729 .tv_nsec = (1000000000 / CLOCK_FREQ) * itd.rem,
733 .tv_nsec = (1000000000 / CLOCK_FREQ) * vad.rem,
736 int flags = absolute ? TIMER_ABSTIME : 0;
738 int val = timer_settime (id->handle, flags, &it, NULL);
739 VLC_THREAD_ASSERT ("scheduling timer");
741 timer_not_supported();
746 * @param id initialized timer pointer
747 * @return the timer overrun counter, i.e. the number of times that the timer
748 * should have run but did not since the last actual run. If all is well, this
751 unsigned vlc_timer_getoverrun (const vlc_timer_t *id)
753 #ifdef HAVE_POSIX_TIMER
754 int val = timer_getoverrun (id->handle);
759 VLC_THREAD_ASSERT ("fetching timer overrun counter");
764 timer_not_supported();