123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109 |
- /* Copyright (C) 2013-2015 Free Software Foundation, Inc.
- Contributed by Andreas Krebbel <krebbel@linux.vnet.ibm.com>
- This file is part of the GNU Transactional Memory Library (libitm).
- Libitm is free software; you can redistribute it and/or modify it
- under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 3 of the License, or
- (at your option) any later version.
- Libitm is distributed in the hope that it will be useful, but WITHOUT ANY
- WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
- FOR A PARTICULAR PURPOSE. See the GNU General Public License for
- more details.
- Under Section 7 of GPL version 3, you are granted additional
- permissions described in the GCC Runtime Library Exception, version
- 3.1, as published by the Free Software Foundation.
- You should have received a copy of the GNU General Public License and
- a copy of the GCC Runtime Library Exception along with this program;
- see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
- <http://www.gnu.org/licenses/>. */
- #include "asmcfi.h"
- .text
- .align 4
- .globl _ITM_beginTransaction
- .type _ITM_beginTransaction, @function
- /* _ITM_beginTransaction (int props); props -> r2 */
- _ITM_beginTransaction:
- cfi_startproc
- #ifdef __s390x__
- lgr %r3,%r15 /* backup stack pointer */
- aghi %r15,-304 /* jump buffer (144) + reg save area (160) */
- cfi_adjust_cfa_offset(304)
- stmg %r6,%r14,160(%r15)
- stg %r3,72+160(%r15) /* store the old stack pointer */
- std %f8,80+160(%r15)
- std %f9,88+160(%r15)
- std %f10,96+160(%r15)
- std %f11,104+160(%r15)
- std %f12,112+160(%r15)
- std %f13,120+160(%r15)
- std %f14,128+160(%r15)
- std %f15,136+160(%r15)
- la %r3,160(%r15) /* second argument to GTM_begin_transaction */
- brasl %r14,GTM_begin_transaction
- lg %r1,64+160(%r15)
- aghi %r15,304
- cfi_adjust_cfa_offset(-304)
- br %r1
- #else
- lr %r3,%r15 /* backup stack pointer */
- ahi %r15,-152 /* jump buffer (56) + reg save area (96) */
- cfi_adjust_cfa_offset(152)
- stm %r6,%r14,96(%r15)
- st %r3,36+96(%r15) /* store the old stack pointer */
- std %f4,40+96(%r15)
- std %f6,48+96(%r15)
- la %r3,96(%r15) /* second argument to GTM_begin_transaction */
- /* begin_transaction (uint32_t prop, const gtm_jmpbuf *jb) */
- brasl %r14,GTM_begin_transaction /* requires mzarch */
- l %r1,32+96(%r15)
- ahi %r15,152
- cfi_adjust_cfa_offset(-152)
- br %r1
- #endif
- cfi_endproc
- .size _ITM_beginTransaction, .-_ITM_beginTransaction
- .align 4
- .globl GTM_longjmp
- .type GTM_longjmp, @function
- .hidden GTM_longjmp
- /* uint32_t GTM_longjmp (uint32_t, const gtm_jmpbuf *, uint32_t) */
- GTM_longjmp:
- /* First parameter becomes the return value of
- _ITM_beginTransaction (r2).
- Third parameter is ignored for now. */
- cfi_startproc
- #ifdef __s390x__
- ld %f8,80(%r3)
- ld %f9,88(%r3)
- ld %f10,96(%r3)
- ld %f11,104(%r3)
- ld %f12,112(%r3)
- ld %f13,120(%r3)
- ld %f14,128(%r3)
- ld %f15,136(%r3)
- lmg %r6,%r15,0(%r3)
- br %r14
- #else
- ld %f4,40(%r3)
- ld %f6,48(%r3)
- lm %r6,%r15,0(%r3)
- br %r14
- #endif
- cfi_endproc
- .size GTM_longjmp, .-GTM_longjmp
- .section .note.GNU-stack, "", @progbits
|