libstdc++-v3/config/cpu/hppa/atomicity.h

   1 // Low-level functions for atomic operations: PA-RISC version  -*- C++ -*-
   2
   3 // Copyright (C) 2002, 2004 Free Software Foundation, Inc.
   4 //
   5 // This file is part of the GNU ISO C++ Library.  This library is free
   6 // software; you can redistribute it and/or modify it under the
   7 // terms of the GNU General Public License as published by the
   8 // Free Software Foundation; either version 2, or (at your option)
   9 // any later version.
  10
  11 // This library is distributed in the hope that it will be useful,
  12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 // GNU General Public License for more details.
  15
  16 // You should have received a copy of the GNU General Public License along
  17 // with this library; see the file COPYING.  If not, write to the Free
  18 // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
  19 // USA.
  20
  21 // As a special exception, you may use this file as part of a free software
  22 // library without restriction.  Specifically, if other files instantiate
  23 // templates or use macros or inline functions from this file, or you compile
  24 // this file and link it with other files to produce an executable, this
  25 // file does not by itself cause the resulting executable to be covered by
  26 // the GNU General Public License.  This exception does not however
  27 // invalidate any other reasons why the executable file might be covered by
  28 // the GNU General Public License.
  29
  30 #include <bits/atomicity.h>
  31
  32 namespace __gnu_cxx
  33 {
  34   template<int __inst>
  35     struct __Atomicity_lock
  36     {
  37       static volatile int _S_atomicity_lock;
  38     };
  39
  40   template<int __inst>
  41   volatile int
  42   __Atomicity_lock<__inst>::_S_atomicity_lock __attribute__ ((aligned (16))) = 1;
  43
  44   /* Because of the lack of weak support when using the hpux
  45      som linker, we explicitly instantiate the atomicity lock
  46      in src/misc-inst.cc when _GLIBCXX_INST_ATOMICITY_LOCK
  47      is defined.  */
  48 #ifndef _GLIBCXX_INST_ATOMICITY_LOCK
  49   template volatile int __Atomicity_lock<0>::_S_atomicity_lock;
  50 #endif
  51
  52   int
  53   __attribute__ ((__unused__))
  54   __exchange_and_add(volatile _Atomic_word* __mem, int __val)
  55   {
  56     _Atomic_word result;
  57     int tmp;
  58     volatile int& lock = __Atomicity_lock<0>::_S_atomicity_lock;
  59
  60     __asm__ __volatile__ ("ldcw 0(%1),%0\n\t"
  61                           "cmpib,<>,n 0,%0,.+20\n\t"
  62                           "ldw 0(%1),%0\n\t"
  63                           "cmpib,= 0,%0,.-4\n\t"
  64                           "nop\n\t"
  65                           "b,n .-20"
  66                           : "=&r" (tmp)
  67                           : "r" (&lock));
  68
  69     result = *__mem;
  70     *__mem = result + __val;
  71     /* Reset lock with PA 2.0 "ordered" store.  */
  72     __asm__ __volatile__ ("stw,ma %1,0(%0)"
  73                           : : "r" (&lock), "r" (tmp) : "memory");
  74     return result;
  75   }
  76
  77   void
  78   __attribute__ ((__unused__))
  79   __atomic_add(_Atomic_word* __mem, int __val)
  80   {
  81     int tmp;
  82     volatile int& lock = __Atomicity_lock<0>::_S_atomicity_lock;
  83
  84     __asm__ __volatile__ ("ldcw 0(%1),%0\n\t"
  85                           "cmpib,<>,n 0,%0,.+20\n\t"
  86                           "ldw 0(%1),%0\n\t"
  87                           "cmpib,= 0,%0,.-4\n\t"
  88                           "nop\n\t"
  89                           "b,n .-20"
  90                           : "=&r" (tmp)
  91                           : "r" (&lock));
  92
  93     *__mem += __val;
  94     /* Reset lock with PA 2.0 "ordered" store.  */
  95     __asm__ __volatile__ ("stw,ma %1,0(%0)"
  96                           : : "r" (&lock), "r" (tmp) : "memory");
  97   }
  98 } // namespace __gnu_cxx