sal/osl/unx/interlck.c

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: interlck.c,v $
  10  * $Revision: 1.14 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31
  32 #include "system.h"
  33
  34 #include <osl/interlck.h>
  35 #include <osl/diagnose.h>
  36
  37 #if  ( defined ( SOLARIS ) || defined ( NETBSD ) ) && defined ( SPARC )
  38 #error please use asm/interlck_sparc.s
  39 #elif defined ( SOLARIS) && defined ( X86 )
  40 #error please use asm/interlck_x86.s
  41 #elif defined ( GCC ) && ( defined ( X86 ) || defined ( X86_64 ) )
  42 /* That's possible on x86-64 too since oslInterlockedCount is a sal_Int32 */
  43
  44 extern int osl_isSingleCPU;
  45
  46 /*****************************************************************************/
  47 /* osl_incrementInterlockedCount */
  48 /*****************************************************************************/
  49 oslInterlockedCount SAL_CALL osl_incrementInterlockedCount(oslInterlockedCount* pCount)
  50 {
  51     register oslInterlockedCount nCount asm("%eax");
  52
  53     nCount = 1;
  54
  55     if ( osl_isSingleCPU ) {
  56         __asm__ __volatile__ (
  57             "xaddl %0, %1\n\t"
  58         :   "+r" (nCount), "+m" (*pCount)
  59         :   /* nothing */
  60         :   "memory");
  61     }
  62     else {
  63         __asm__ __volatile__ (
  64             "lock\n\t"
  65             "xaddl %0, %1\n\t"
  66         :   "+r" (nCount), "+m" (*pCount)
  67         :   /* nothing */
  68         :   "memory");
  69     }
  70
  71     return ++nCount;
  72 }
  73
  74 oslInterlockedCount SAL_CALL osl_decrementInterlockedCount(oslInterlockedCount* pCount)
  75 {
  76     register oslInterlockedCount nCount asm("%eax");
  77
  78     nCount = -1;
  79
  80     if ( osl_isSingleCPU ) {
  81         __asm__ __volatile__ (
  82             "xaddl %0, %1\n\t"
  83         :   "+r" (nCount), "+m" (*pCount)
  84         :   /* nothing */
  85         :   "memory");
  86     }
  87     else {
  88         __asm__ __volatile__ (
  89             "lock\n\t"
  90             "xaddl %0, %1\n\t"
  91         :   "+r" (nCount), "+m" (*pCount)
  92         :   /* nothing */
  93         :   "memory");
  94     }
  95
  96     return --nCount;
  97 }
  98
  99 #elif defined ( GCC ) && defined ( POWERPC )
 100
 101 /*****************************************************************************/
 102 /* osl_incrementInterlockedCount */
 103 /*****************************************************************************/
 104 oslInterlockedCount SAL_CALL osl_incrementInterlockedCount(oslInterlockedCount* pCount)
 105 {
 106     /* "addi" doesn't work with r0 as second parameter */
 107     register oslInterlockedCount nCount __asm__ ("r4");
 108
 109     __asm__ __volatile__ (
 110         "1: lwarx   %0,0,%2\n\t"
 111         "   addi    %0,%0,1\n\t"
 112         "   stwcx.  %0,0,%2\n\t"
 113         "   bne-    1b\n\t"
 114         "   isync"
 115         : "=&r" (nCount), "=m" (*pCount)
 116         : "r" (pCount)
 117         : "memory");
 118
 119     return nCount;
 120 }
 121
 122 oslInterlockedCount SAL_CALL osl_decrementInterlockedCount(oslInterlockedCount* pCount)
 123 {
 124     /* "subi" doesn't work with r0 as second parameter */
 125     register oslInterlockedCount nCount __asm__ ("r4");
 126
 127     __asm__ __volatile__ (
 128         "1: lwarx   %0,0,%2\n\t"
 129         "   subi    %0,%0,1\n\t"
 130         "   stwcx.  %0,0,%2\n\t"
 131         "   bne-    1b\n\t"
 132         "   isync"
 133         : "=&r" (nCount), "=m" (*pCount)
 134         : "r" (pCount)
 135         : "memory");
 136
 137     return nCount;
 138 }
 139
 140 #else
 141 /* use only if nothing else works, expensive due to single mutex for all reference counts */
 142
 143 static pthread_mutex_t InterLock = PTHREAD_MUTEX_INITIALIZER;
 144
 145 /*****************************************************************************/
 146 /* osl_incrementInterlockedCount */
 147 /*****************************************************************************/
 148 oslInterlockedCount SAL_CALL osl_incrementInterlockedCount(oslInterlockedCount* pCount)
 149 {
 150     oslInterlockedCount Count;
 151
 152     pthread_mutex_lock(&InterLock);
 153     Count = ++(*pCount);
 154     pthread_mutex_unlock(&InterLock);
 155
 156     return (Count);
 157 }
 158
 159 /*****************************************************************************/
 160 /* osl_decrementInterlockedCount */
 161 /*****************************************************************************/
 162 oslInterlockedCount SAL_CALL osl_decrementInterlockedCount(oslInterlockedCount* pCount)
 163 {
 164     oslInterlockedCount Count;
 165
 166     pthread_mutex_lock(&InterLock);
 167     Count = --(*pCount);
 168     pthread_mutex_unlock(&InterLock);
 169
 170     return (Count);
 171 }
 172
 173 #endif /* default */