config/linux/mutex.c

Go to the documentation of this file.
00001 /* Copyright (C) 2005, 2008, 2009 Free Software Foundation, Inc.
00002    Contributed by Richard Henderson <rth@redhat.com>.
00003 
00004    This file is part of the GNU OpenMP Library (libgomp).
00005 
00006    Libgomp is free software; you can redistribute it and/or modify it
00007    under the terms of the GNU General Public License as published by
00008    the Free Software Foundation; either version 3, or (at your option)
00009    any later version.
00010 
00011    Libgomp is distributed in the hope that it will be useful, but WITHOUT ANY
00012    WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
00013    FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
00014    more details.
00015 
00016    Under Section 7 of GPL version 3, you are granted additional
00017    permissions described in the GCC Runtime Library Exception, version
00018    3.1, as published by the Free Software Foundation.
00019 
00020    You should have received a copy of the GNU General Public License and
00021    a copy of the GCC Runtime Library Exception along with this program;
00022    see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
00023    <http://www.gnu.org/licenses/>.  */
00024 
00025 /* This is a Linux specific implementation of a mutex synchronization
00026    mechanism for libgomp.  This type is private to the library.  This
00027    implementation uses atomic instructions and the futex syscall.  */
00028 
00029 #include "wait.h"
00030 
00031 long int gomp_futex_wake = FUTEX_WAKE | FUTEX_PRIVATE_FLAG;
00032 long int gomp_futex_wait = FUTEX_WAIT | FUTEX_PRIVATE_FLAG;
00033 
00034 void
00035 gomp_mutex_lock_slow (gomp_mutex_t *mutex)
00036 {
00037   do
00038     {
00039       int oldval = __sync_val_compare_and_swap (mutex, 1, 2);
00040       if (oldval != 0)
00041     do_wait (mutex, 2);
00042     }
00043   while (!__sync_bool_compare_and_swap (mutex, 0, 2));
00044 }
00045 
00046 void
00047 gomp_mutex_unlock_slow (gomp_mutex_t *mutex)
00048 {
00049   futex_wake (mutex, 1);
00050 }

Generated on Fri Apr 5 05:38:09 2013 for Libgomp by  doxygen 1.4.7