Commit 5837e90f authored by Andy Polyakov's avatar Andy Polyakov
Browse files

Add iOS-specific armv4cpud.S module. 



Normally it would be generated from a perlasm module, but doing so
would affect existing armv4cpuid.S, which in turn would formally void
previously validated platforms. Hense separate module is generated.

Reviewed-by: default avatarDr. Stephen Henson <steve@openssl.org>
parent 874faf2f

crypto/armv4cpuid_ios.S

0 → 100644
+210 −0
Original line number Diff line number Diff line 
#include "arm_arch.h"



.text

.code	32



.align	5

.globl	_OPENSSL_atomic_add



_OPENSSL_atomic_add:

#if __ARM_ARCH__>=6

Ladd:	ldrex	r2,[r0]

	add	r3,r2,r1

	strex	r2,r3,[r0]

	cmp	r2,#0

	bne	Ladd

	mov	r0,r3

	bx	lr

#else

	stmdb	sp!,{r4,r5,r6,lr}

	ldr	r2,Lspinlock

	adr	r3,Lspinlock

	mov	r4,r0

	mov	r5,r1

	add	r6,r3,r2	@ &spinlock

	b	.+8

Lspin:	bl	sched_yield

	mov	r0,#-1

	swp	r0,r0,[r6]

	cmp	r0,#0

	bne	Lspin



	ldr	r2,[r4]

	add	r2,r2,r5

	str	r2,[r4]

	str	r0,[r6]		@ release spinlock

	ldmia	sp!,{r4,r5,r6,lr}

	tst	lr,#1

	moveq	pc,lr

.word	0xe12fff1e	@ bx	lr

#endif





.globl	_OPENSSL_cleanse



_OPENSSL_cleanse:

	eor	ip,ip,ip

	cmp	r1,#7

	subhs	r1,r1,#4

	bhs	Lot

	cmp	r1,#0

	beq	Lcleanse_done

Little:

	strb	ip,[r0],#1

	subs	r1,r1,#1

	bhi	Little

	b	Lcleanse_done



Lot:	tst	r0,#3

	beq	Laligned

	strb	ip,[r0],#1

	sub	r1,r1,#1

	b	Lot

Laligned:

	str	ip,[r0],#4

	subs	r1,r1,#4

	bhs	Laligned

	adds	r1,r1,#4

	bne	Little

Lcleanse_done:

#if __ARM_ARCH__>=5

	bx	lr

#else

	tst	lr,#1

	moveq	pc,lr

.word	0xe12fff1e	@ bx	lr

#endif









.align	5

.globl	__armv7_neon_probe



__armv7_neon_probe:

	vorr	q0,q0,q0

	bx	lr





.globl	__armv7_tick



__armv7_tick:

#ifdef	__APPLE__

	mrrc	p15,0,r0,r1,c14		@ CNTPCT

#else

	mrrc	p15,1,r0,r1,c14		@ CNTVCT

#endif

	bx	lr





.globl	__armv8_aes_probe



__armv8_aes_probe:

.byte	0x00,0x03,0xb0,0xf3	@ aese.8	q0,q0

	bx	lr





.globl	__armv8_sha1_probe



__armv8_sha1_probe:

.byte	0x40,0x0c,0x00,0xf2	@ sha1c.32	q0,q0,q0

	bx	lr





.globl	__armv8_sha256_probe



__armv8_sha256_probe:

.byte	0x40,0x0c,0x00,0xf3	@ sha256h.32	q0,q0,q0

	bx	lr



.globl	__armv8_pmull_probe



__armv8_pmull_probe:

.byte	0x00,0x0e,0xa0,0xf2	@ vmull.p64	q0,d0,d0

	bx	lr



.globl	_OPENSSL_wipe_cpu



_OPENSSL_wipe_cpu:

	ldr	r0,LOPENSSL_armcap

	adr	r1,LOPENSSL_armcap

	ldr	r0,[r1,r0]

#ifdef	__APPLE__

	ldr	r0,[r0]

#endif

	eor	r2,r2,r2

	eor	r3,r3,r3

	eor	ip,ip,ip

	tst	r0,#1

	beq	Lwipe_done

	veor	q0, q0, q0

	veor	q1, q1, q1

	veor	q2, q2, q2

	veor	q3, q3, q3

	veor	q8, q8, q8

	veor	q9, q9, q9

	veor	q10, q10, q10

	veor	q11, q11, q11

	veor	q12, q12, q12

	veor	q13, q13, q13

	veor	q14, q14, q14

	veor	q15, q15, q15

Lwipe_done:

	mov	r0,sp

#if __ARM_ARCH__>=5

	bx	lr

#else

	tst	lr,#1

	moveq	pc,lr

.word	0xe12fff1e	@ bx	lr

#endif





.globl	_OPENSSL_instrument_bus



_OPENSSL_instrument_bus:

	eor	r0,r0,r0

#if __ARM_ARCH__>=5

	bx	lr

#else

	tst	lr,#1

	moveq	pc,lr

.word	0xe12fff1e	@ bx	lr

#endif





.globl	_OPENSSL_instrument_bus2



_OPENSSL_instrument_bus2:

	eor	r0,r0,r0

#if __ARM_ARCH__>=5

	bx	lr

#else

	tst	lr,#1

	moveq	pc,lr

.word	0xe12fff1e	@ bx	lr

#endif





.align	5

LOPENSSL_armcap:

.word	OPENSSL_armcap_P-.

#if __ARM_ARCH__>=6

.align	5

#else

Lspinlock:

.word	atomic_add_spinlock-Lspinlock

.align	5



.data

.align	2

atomic_add_spinlock:

.word

#endif



.comm	_OPENSSL_armcap_P,4

.non_lazy_symbol_pointer

OPENSSL_armcap_P:

.indirect_symbol	_OPENSSL_armcap_P

.long	0

.private_extern	_OPENSSL_armcap_P