You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
431 lines
14 KiB
431 lines
14 KiB
15 years ago
|
/****************************************************************************
|
||
|
**
|
||
|
** Copyright (C) 2010 Nokia Corporation and/or its subsidiary(-ies).
|
||
|
** All rights reserved.
|
||
|
** Contact: Nokia Corporation (qt-info@nokia.com)
|
||
|
**
|
||
|
** This file is part of the QtCore module of the Qt Toolkit.
|
||
|
**
|
||
|
** $QT_BEGIN_LICENSE:LGPL$
|
||
|
** Commercial Usage
|
||
|
** Licensees holding valid Qt Commercial licenses may use this file in
|
||
|
** accordance with the Qt Commercial License Agreement provided with the
|
||
|
** Software or, alternatively, in accordance with the terms contained in
|
||
|
** a written agreement between you and Nokia.
|
||
|
**
|
||
|
** GNU Lesser General Public License Usage
|
||
|
** Alternatively, this file may be used under the terms of the GNU Lesser
|
||
|
** General Public License version 2.1 as published by the Free Software
|
||
|
** Foundation and appearing in the file LICENSE.LGPL included in the
|
||
|
** packaging of this file. Please review the following information to
|
||
|
** ensure the GNU Lesser General Public License version 2.1 requirements
|
||
|
** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
|
||
|
**
|
||
|
** In addition, as a special exception, Nokia gives you certain additional
|
||
|
** rights. These rights are described in the Nokia Qt LGPL Exception
|
||
|
** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
|
||
|
**
|
||
|
** GNU General Public License Usage
|
||
|
** Alternatively, this file may be used under the terms of the GNU
|
||
|
** General Public License version 3.0 as published by the Free Software
|
||
|
** Foundation and appearing in the file LICENSE.GPL included in the
|
||
|
** packaging of this file. Please review the following information to
|
||
|
** ensure the GNU General Public License version 3.0 requirements will be
|
||
|
** met: http://www.gnu.org/copyleft/gpl.html.
|
||
|
**
|
||
|
** If you have questions regarding the use of this file, please contact
|
||
|
** Nokia at qt-info@nokia.com.
|
||
|
** $QT_END_LICENSE$
|
||
|
**
|
||
|
****************************************************************************/
|
||
|
|
||
|
#ifndef QATOMIC_S390_H
|
||
|
#define QATOMIC_S390_H
|
||
|
|
||
|
QT_BEGIN_HEADER
|
||
|
|
||
|
QT_BEGIN_NAMESPACE
|
||
|
|
||
|
#define Q_ATOMIC_INT_REFERENCE_COUNTING_IS_ALWAYS_NATIVE
|
||
|
|
||
|
inline bool QBasicAtomicInt::isReferenceCountingNative()
|
||
|
{ return true; }
|
||
|
inline bool QBasicAtomicInt::isReferenceCountingWaitFree()
|
||
|
{ return false; }
|
||
|
|
||
|
#define Q_ATOMIC_INT_TEST_AND_SET_IS_ALWAYS_NATIVE
|
||
|
|
||
|
inline bool QBasicAtomicInt::isTestAndSetNative()
|
||
|
{ return true; }
|
||
|
inline bool QBasicAtomicInt::isTestAndSetWaitFree()
|
||
|
{ return false; }
|
||
|
|
||
|
#define Q_ATOMIC_INT_FETCH_AND_STORE_IS_ALWAYS_NATIVE
|
||
|
|
||
|
inline bool QBasicAtomicInt::isFetchAndStoreNative()
|
||
|
{ return true; }
|
||
|
inline bool QBasicAtomicInt::isFetchAndStoreWaitFree()
|
||
|
{ return false; }
|
||
|
|
||
|
#define Q_ATOMIC_INT_FETCH_AND_ADD_IS_ALWAYS_NATIVE
|
||
|
|
||
|
inline bool QBasicAtomicInt::isFetchAndAddNative()
|
||
|
{ return true; }
|
||
|
inline bool QBasicAtomicInt::isFetchAndAddWaitFree()
|
||
|
{ return false; }
|
||
|
|
||
|
#define Q_ATOMIC_POINTER_TEST_AND_SET_IS_ALWAYS_NATIVE
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::isTestAndSetNative()
|
||
|
{ return true; }
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::isTestAndSetWaitFree()
|
||
|
{ return false; }
|
||
|
|
||
|
#define Q_ATOMIC_POINTER_FETCH_AND_STORE_IS_ALWAYS_NATIVE
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::isFetchAndStoreNative()
|
||
|
{ return true; }
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::isFetchAndStoreWaitFree()
|
||
|
{ return false; }
|
||
|
|
||
|
#define Q_ATOMIC_POINTER_FETCH_AND_ADD_IS_ALWAYS_NATIVE
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::isFetchAndAddNative()
|
||
|
{ return true; }
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::isFetchAndAddWaitFree()
|
||
|
{ return false; }
|
||
|
|
||
|
#ifdef __GNUC__
|
||
|
#define __GNU_EXTENSION __extension__
|
||
|
#else
|
||
|
#define __GNU_EXTENSION
|
||
|
#endif
|
||
|
|
||
|
#define __CS_LOOP(ptr, op_val, op_string, pre, post) __GNU_EXTENSION ({ \
|
||
|
volatile int old_val, new_val; \
|
||
|
__asm__ __volatile__(pre \
|
||
|
" l %0,0(%3)\n" \
|
||
|
"0: lr %1,%0\n" \
|
||
|
op_string " %1,%4\n" \
|
||
|
" cs %0,%1,0(%3)\n" \
|
||
|
" jl 0b\n" \
|
||
|
post \
|
||
|
: "=&d" (old_val), "=&d" (new_val), \
|
||
|
"=m" (*ptr) \
|
||
|
: "a" (ptr), "d" (op_val), \
|
||
|
"m" (*ptr) \
|
||
|
: "cc", "memory" ); \
|
||
|
new_val; \
|
||
|
})
|
||
|
|
||
|
#define __CS_OLD_LOOP(ptr, op_val, op_string, pre, post ) __GNU_EXTENSION ({ \
|
||
|
volatile int old_val, new_val; \
|
||
|
__asm__ __volatile__(pre \
|
||
|
" l %0,0(%3)\n" \
|
||
|
"0: lr %1,%0\n" \
|
||
|
op_string " %1,%4\n" \
|
||
|
" cs %0,%1,0(%3)\n" \
|
||
|
" jl 0b\n" \
|
||
|
post \
|
||
|
: "=&d" (old_val), "=&d" (new_val), \
|
||
|
"=m" (*ptr) \
|
||
|
: "a" (ptr), "d" (op_val), \
|
||
|
"m" (*ptr) \
|
||
|
: "cc", "memory" ); \
|
||
|
old_val; \
|
||
|
})
|
||
|
|
||
|
#ifdef __s390x__
|
||
|
#define __CSG_OLD_LOOP(ptr, op_val, op_string, pre, post) __GNU_EXTENSION ({ \
|
||
|
long old_val, new_val; \
|
||
|
__asm__ __volatile__(pre \
|
||
|
" lg %0,0(%3)\n" \
|
||
|
"0: lgr %1,%0\n" \
|
||
|
op_string " %1,%4\n" \
|
||
|
" csg %0,%1,0(%3)\n" \
|
||
|
" jl 0b\n" \
|
||
|
post \
|
||
|
: "=&d" (old_val), "=&d" (new_val), \
|
||
|
"=m" (*ptr) \
|
||
|
: "a" (ptr), "d" (op_val), \
|
||
|
"m" (*ptr) \
|
||
|
: "cc", "memory" ); \
|
||
|
old_val; \
|
||
|
})
|
||
|
#endif
|
||
|
|
||
|
inline bool QBasicAtomicInt::ref()
|
||
|
{
|
||
|
return __CS_LOOP(&_q_value, 1, "ar", "", "") != 0;
|
||
|
}
|
||
|
|
||
|
inline bool QBasicAtomicInt::deref()
|
||
|
{
|
||
|
return __CS_LOOP(&_q_value, 1, "sr", "", "") != 0;
|
||
|
}
|
||
|
|
||
|
inline bool QBasicAtomicInt::testAndSetRelaxed(int expectedValue, int newValue)
|
||
|
{
|
||
|
int retval;
|
||
|
__asm__ __volatile__(
|
||
|
" lr %0,%3\n"
|
||
|
" cs %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
return retval == 0;
|
||
|
}
|
||
|
|
||
|
inline bool QBasicAtomicInt::testAndSetAcquire(int expectedValue, int newValue)
|
||
|
{
|
||
|
int retval;
|
||
|
__asm__ __volatile__(
|
||
|
" lr %0,%3\n"
|
||
|
" cs %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:\n"
|
||
|
" bcr 15,0\n"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
return retval == 0;
|
||
|
}
|
||
|
|
||
|
inline bool QBasicAtomicInt::testAndSetRelease(int expectedValue, int newValue)
|
||
|
{
|
||
|
int retval;
|
||
|
__asm__ __volatile__(
|
||
|
" bcr 15,0\n"
|
||
|
" lr %0,%3\n"
|
||
|
" cs %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
return retval == 0;
|
||
|
}
|
||
|
|
||
|
inline bool QBasicAtomicInt::testAndSetOrdered(int expectedValue, int newValue)
|
||
|
{
|
||
|
return testAndSetAcquire(expectedValue, newValue);
|
||
|
}
|
||
|
|
||
|
inline int QBasicAtomicInt::fetchAndStoreRelaxed(int newValue)
|
||
|
{
|
||
|
return __CS_OLD_LOOP(&_q_value, newValue, "lr", "", "");
|
||
|
}
|
||
|
|
||
|
inline int QBasicAtomicInt::fetchAndStoreAcquire(int newValue)
|
||
|
{
|
||
|
return __CS_OLD_LOOP(&_q_value, newValue, "lr", "", "bcr 15,0\n");
|
||
|
}
|
||
|
|
||
|
inline int QBasicAtomicInt::fetchAndStoreRelease(int newValue)
|
||
|
{
|
||
|
return __CS_OLD_LOOP(&_q_value, newValue, "lr", "bcr 15,0\n", "");
|
||
|
}
|
||
|
|
||
|
inline int QBasicAtomicInt::fetchAndStoreOrdered(int newValue)
|
||
|
{
|
||
|
return fetchAndStoreAcquire(newValue);
|
||
|
}
|
||
|
|
||
|
inline int QBasicAtomicInt::fetchAndAddRelaxed(int valueToAdd)
|
||
|
{
|
||
|
return fetchAndAddOrdered(valueToAdd);
|
||
|
}
|
||
|
|
||
|
inline int QBasicAtomicInt::fetchAndAddAcquire(int valueToAdd)
|
||
|
{
|
||
|
return fetchAndAddOrdered(valueToAdd);
|
||
|
}
|
||
|
|
||
|
inline int QBasicAtomicInt::fetchAndAddRelease(int valueToAdd)
|
||
|
{
|
||
|
return fetchAndAddOrdered(valueToAdd);
|
||
|
}
|
||
|
|
||
|
inline int QBasicAtomicInt::fetchAndAddOrdered(int valueToAdd)
|
||
|
{
|
||
|
return __CS_OLD_LOOP(&_q_value, valueToAdd, "ar", "", "bcr 15,0\n");
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::testAndSetRelaxed(T *expectedValue, T *newValue)
|
||
|
{
|
||
|
int retval;
|
||
|
|
||
|
#ifndef __s390x__
|
||
|
__asm__ __volatile__(
|
||
|
" lr %0,%3\n"
|
||
|
" cs %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
#else
|
||
|
__asm__ __volatile__(
|
||
|
" lgr %0,%3\n"
|
||
|
" csg %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
#endif
|
||
|
|
||
|
return retval == 0;
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::testAndSetAcquire(T *expectedValue, T *newValue)
|
||
|
{
|
||
|
int retval;
|
||
|
|
||
|
#ifndef __s390x__
|
||
|
__asm__ __volatile__(
|
||
|
" lr %0,%3\n"
|
||
|
" cs %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:\n"
|
||
|
" bcr 15,0\n"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
#else
|
||
|
__asm__ __volatile__(
|
||
|
" lgr %0,%3\n"
|
||
|
" csg %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:\n"
|
||
|
" bcr 15,0\n"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
#endif
|
||
|
|
||
|
return retval == 0;
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::testAndSetRelease(T *expectedValue, T *newValue)
|
||
|
{
|
||
|
int retval;
|
||
|
|
||
|
#ifndef __s390x__
|
||
|
__asm__ __volatile__(
|
||
|
" bcr 15,0\n"
|
||
|
" lr %0,%3\n"
|
||
|
" cs %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
#else
|
||
|
__asm__ __volatile__(
|
||
|
" bcr 15,0\n"
|
||
|
" lgr %0,%3\n"
|
||
|
" csg %0,%4,0(%2)\n"
|
||
|
" ipm %0\n"
|
||
|
" srl %0,28\n"
|
||
|
"0:"
|
||
|
: "=&d" (retval), "=m" (_q_value)
|
||
|
: "a" (&_q_value), "d" (expectedValue) , "d" (newValue),
|
||
|
"m" (_q_value) : "cc", "memory" );
|
||
|
#endif
|
||
|
|
||
|
return retval == 0;
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE bool QBasicAtomicPointer<T>::testAndSetOrdered(T *expectedValue, T *newValue)
|
||
|
{
|
||
|
return testAndSetAcquire(expectedValue, newValue);
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE T* QBasicAtomicPointer<T>::fetchAndStoreRelaxed(T *newValue)
|
||
|
{
|
||
|
#ifndef __s390x__
|
||
|
return (T*)__CS_OLD_LOOP(reinterpret_cast<volatile long*>(_q_value), (int)newValue, "lr",
|
||
|
"", "bcr 15,0\n");
|
||
|
#else
|
||
|
return (T*)__CSG_OLD_LOOP(reinterpret_cast<volatile long*>(_q_value), (long)newValue, "lgr",
|
||
|
"", "bcr 15,0\n");
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE T* QBasicAtomicPointer<T>::fetchAndStoreAcquire(T *newValue)
|
||
|
{
|
||
|
#ifndef __s390x__
|
||
|
return (T*)__CS_OLD_LOOP(reinterpret_cast<volatile long*>(_q_value), (int)newValue, "lr", "", "");
|
||
|
#else
|
||
|
return (T*)__CSG_OLD_LOOP(reinterpret_cast<volatile long*>(_q_value), (long)newValue, "lgr", "", "");
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE T* QBasicAtomicPointer<T>::fetchAndStoreRelease(T *newValue)
|
||
|
{
|
||
|
#ifndef __s390x__
|
||
|
return (T*)__CS_OLD_LOOP(reinterpret_cast<volatile long*>(_q_value), (int)newValue, "lr",
|
||
|
"bcr 15,0 \n", "");
|
||
|
#else
|
||
|
return (T*)__CSG_OLD_LOOP(reinterpret_cast<volatile long*>(_q_value), (long)newValue, "lgr",
|
||
|
"bcr 15,0\n", "");
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE T* QBasicAtomicPointer<T>::fetchAndStoreOrdered(T *newValue)
|
||
|
{
|
||
|
return fetchAndStoreAcquire(newValue);
|
||
|
}
|
||
|
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE T *QBasicAtomicPointer<T>::fetchAndAddRelaxed(qptrdiff valueToAdd)
|
||
|
{
|
||
|
return fetchAndAddOrdered(valueToAdd);
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE T *QBasicAtomicPointer<T>::fetchAndAddAcquire(qptrdiff valueToAdd)
|
||
|
{
|
||
|
return fetchAndAddOrdered(valueToAdd);
|
||
|
}
|
||
|
|
||
|
template <typename T>
|
||
|
Q_INLINE_TEMPLATE T *QBasicAtomicPointer<T>::fetchAndAddRelease(qptrdiff valueToAdd)
|
||
|
{
|
||
|
return fetchAndAddOrdered(valueToAdd);
|
||
|
}
|
||
|
|
||
|
#undef __GNU_EXTENSION
|
||
|
|
||
|
QT_END_NAMESPACE
|
||
|
|
||
|
QT_END_HEADER
|
||
|
|
||
|
#endif // QATOMIC_S390_H
|