/* mpn_add_n -- add (or subtract) bignums. Copyright (C) 2013-2016 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library 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 Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library. If not, see . */ #include #include .syntax unified .text #ifdef USE_AS_SUB_N # define INITC cmp r0, r0 # define OPC sbcs # define RETC sbc r0, r0, r0; neg r0, r0 # define FUNC __mpn_sub_n #else # define INITC cmn r0, #0 # define OPC adcs # define RETC mov r0, #0; adc r0, r0, r0 # define FUNC __mpn_add_n #endif /* mp_limb_t mpn_add_n(res_ptr, src1_ptr, src2_ptr, size) */ ENTRY (FUNC) push { r4, r5, r6, r7, r8, r10, lr } cfi_adjust_cfa_offset (28) cfi_rel_offset (r4, 0) cfi_rel_offset (r5, 4) cfi_rel_offset (r6, 8) cfi_rel_offset (r7, 12) cfi_rel_offset (r8, 16) cfi_rel_offset (r10, 20) cfi_rel_offset (lr, 24) INITC /* initialize carry flag */ tst r3, #1 /* count & 1 == 1? */ add lr, r1, r3, lsl #2 /* compute end src1 */ beq 1f sfi_breg r1, \ ldr r4, [\B], #4 /* do one to make count even */ sfi_breg r2, \ ldr r5, [\B], #4 OPC r4, r4, r5 teq r1, lr /* end of count? (preserve carry) */ sfi_breg r0, \ str r4, [\B], #4 beq 9f 1: tst r3, #2 /* count & 2 == 2? */ beq 2f sfi_breg r1, \ ldm \B!, { r4, r5 } /* do two to make count 0 mod 4 */ sfi_breg r2, \ ldm \B!, { r6, r7 } OPC r4, r4, r6 OPC r5, r5, r7 teq r1, lr /* end of count? */ sfi_breg r0, \ stm \B!, { r4, r5 } beq 9f 2: sfi_breg r1, \ ldm \B!, { r3, r5, r7, r10 } /* do four each loop */ sfi_breg r2, \ ldm \B!, { r4, r6, r8, ip } OPC r3, r3, r4 OPC r5, r5, r6 OPC r7, r7, r8 OPC r10, r10, ip teq r1, lr sfi_breg r0, \ stm \B!, { r3, r5, r7, r10 } bne 2b 9: RETC /* copy carry out */ #ifndef ARM_ALWAYS_BX pop { r4, r5, r6, r7, r8, r10, pc } #else pop { r4, r5, r6, r7, r8, r10, lr } bx lr #endif END (FUNC)