atomicops.il
上传用户:zhongxx05
上传日期:2007-06-06
资源大小:33641k
文件大小:5k
源码类别:

Symbian

开发平台:

C/C++

  1. /* ***** BEGIN LICENSE BLOCK *****  
  2.  * Source last modified: $Id: atomicops.il,v 1.1 2003/10/30 18:37:01 nhart Exp $ 
  3.  *   
  4.  * Portions Copyright (c) 1995-2003 RealNetworks, Inc. All Rights Reserved.  
  5.  *       
  6.  * The contents of this file, and the files included with this file, 
  7.  * are subject to the current version of the RealNetworks Public 
  8.  * Source License (the "RPSL") available at 
  9.  * http://www.helixcommunity.org/content/rpsl unless you have licensed 
  10.  * the file under the current version of the RealNetworks Community 
  11.  * Source License (the "RCSL") available at 
  12.  * http://www.helixcommunity.org/content/rcsl, in which case the RCSL 
  13.  * will apply. You may also obtain the license terms directly from 
  14.  * RealNetworks.  You may not use this file except in compliance with 
  15.  * the RPSL or, if you have a valid RCSL with RealNetworks applicable 
  16.  * to this file, the RCSL.  Please see the applicable RPSL or RCSL for 
  17.  * the rights, obligations and limitations governing use of the 
  18.  * contents of the file. 
  19.  *   
  20.  * This file is part of the Helix DNA Technology. RealNetworks is the 
  21.  * developer of the Original Code and owns the copyrights in the 
  22.  * portions it created. 
  23.  *   
  24.  * This file, and the files included with this file, is distributed 
  25.  * and made available on an 'AS IS' basis, WITHOUT WARRANTY OF ANY 
  26.  * KIND, EITHER EXPRESS OR IMPLIED, AND REALNETWORKS HEREBY DISCLAIMS 
  27.  * ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES 
  28.  * OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET 
  29.  * ENJOYMENT OR NON-INFRINGEMENT. 
  30.  *  
  31.  * Technology Compatibility Kit Test Suite(s) Location:  
  32.  *    http://www.helixcommunity.org/content/tck  
  33.  *  
  34.  * Contributor(s):  
  35.  *   
  36.  * ***** END LICENSE BLOCK ***** */  
  37. /*
  38.  *  atomicops.il
  39.  *
  40.  *  defines several atomic operations for Sun/SPARC
  41.  *
  42.  ***********************************************************************
  43.  *
  44.  *  This is the Solaris inline-assembly version for use with Sun's
  45.  *  native compiler on SPARC processors.  See atomicbase.h for more
  46.  *  info and for the gcc implementaiton.
  47.  *
  48.  */
  49. /***********************************************************************
  50.  *
  51.  *  _HXAtomicAddRetUINT32 -- Atomically increment by n and return new value
  52.  *
  53.  *  Interface:
  54.  *    extern "C" UINT32 _HXAtomicAddRetUINT32(UINT32* pNum,     %o0
  55.  *                                            UINT32 ulNum);    %o1
  56.  *
  57.  *  Inputs:
  58.  *    Paramaters:
  59.  *      %o0 :  UINT32* pNum - pointer to integer to modify
  60.  *      %o1 :  UINT32 ulNum - amount to increment *pNum by
  61.  *
  62.  *  Outputs:
  63.  *    Modifies memory at *pNum:
  64.  *      *pNum = *pNum + ulNum
  65.  *
  66.  *    Return value:
  67.  *      %o0 :  UINT32 - new value of *pNum
  68.  *
  69.  * This is implemented using the SPARC leaf procedure optimization.
  70.  * This is implemented using CAS which is not available on older processors.
  71.  */ 
  72. .inline _HXAtomicAddRetUINT32,8
  73.     ld      [%o0], %o2          /* Set %o2 to *pNum */
  74. 1:  add     %o2, %o1, %o3       /* Set %o3 to *pNum + ulNum */
  75.     mov     %o3, %o4            /* Save new value for later */
  76.     cas     [%o0], %o2, %o3     /* Set *pNum if *pNum is unchanged */
  77.     cmp     %o2, %o3            /* Did we succeed in saving the value?*/
  78.     bne,a   1b                  /* Retry if we didn't. */
  79.     ld      [%o0], %o2          /* <<only executes if we branch>> */
  80.     mov     %o4, %o0            /* Save return value */
  81. .end
  82. /***********************************************************************
  83.  *
  84.  *  _HXAtomicSubRetUINT32 -- Atomically decrement by n and return new value
  85.  *
  86.  *  Interface:
  87.  *    extern "C" UINT32 _HXAtomicSubRetUINT32(UINT32* pNum,      %o0
  88.  *                                            UINT32 ulNum);     %o1
  89.  *
  90.  *  Inputs:
  91.  *    Paramaters:
  92.  *      %o0 :  UINT32* pNum - pointer to integer to modify
  93.  *      %o1 :  UINT32 ulNum - amount to decrement *pNum by
  94.  *
  95.  *  Outputs:
  96.  *    Modifies memory at *pNum:
  97.  *      *pNum = *pNum - ulNum
  98.  *
  99.  *    Return value:
  100.  *      %o0 :  UINT32 - new value of *pNum
  101.  *
  102.  *  This is implemented using the SPARC leaf procedure optimization.
  103.  *  This is implemented using CAS which is not available on older processors.
  104.  */ 
  105. .inline _HXAtomicSubRetUINT32,8
  106.     ld      [%o0], %o2          /* Set %o2 to *pNum */
  107. 1:  sub     %o2, %o1, %o3       /* Set %o3 to *pNum - ulNum */
  108.     mov     %o3, %o4            /* Save new value for later */
  109.     cas     [%o0], %o2, %o3     /* Set *pNum if *pNum is unchanged */
  110.     cmp     %o2, %o3            /* Did we succeed in saving the value?*/
  111.     bne,a   1b                  /* Retry if we didn't. */
  112.     ld      [%o0], %o2          /* <<only executes if we branch>> */
  113.     mov     %o4, %o0            /* Save return value */
  114. .end