Function at 0x140098990
Capabilities:
Validate payment card number using luhn algorithm

Disassembly:
mov qword [rsp + 0x18], r8
mov qword [rsp + 8], rcx
push rbx
push rbp
push rsi
push rdi
push r13
push r15
sub rsp, 0x78
mov rbx, rdx
movaps xmmword [rsp + 0x50], xmm6
mov rdx, qword [rdx + 0x28]
xorps xmm6, xmm6
movaps xmmword [rsp + 0x40], xmm7
movaps xmmword [rsp + 0x30], xmm8
xorps xmm8, xmm8
mov rax, qword [rbx + 0x38]
sub rax, qword [rbx + 0x10]
movzx edi, byte [rdx]
add rax, rdx
mov qword [rsp + 0x20], rax
cmp dil, 0x2d
jne 0x1400989f9
mov rcx, rbx
call fcn.140096e20
mov rdx, qword [rbx + 0x28]
mov r13b, 1
mov rcx, qword [rsp + 0xb0]
movzx edi, byte [rdx]
jmp 0x1400989fc
xor r13b, r13b
movsd xmm7, qword [0x1403ebfb0]
xor ebp, ebp
mov qword [rsp + 0x70], r12
mov esi, ebp
mov byte [rsp + 0xb8], sil
mov r15d, ebp
mov byte [rsp + 0xc8], r13b
mov qword [rsp + 0x68], r14
cmp dil, 0x30
jne 0x140098a42
mov rcx, rbx
mov r14d, ebp
call fcn.140096e20
mov rdx, qword [rbx + 0x28]
xor r12b, r12b
jmp 0x140098bd0
lea eax, [rdi - 0x31]
cmp al, 8
ja 0x140099049
mov rcx, rbx
call fcn.140096e20
mov rax, qword [rbx + 0x28]
movsx r14d, dil
sub r14d, 0x30
movzx edi, byte [rax]
test r13b, r13b
je 0x140098ab8
cmp dil, 0x30
jl 0x140098b0c
cmp dil, 0x39
jg 0x140098b0c
cmp r14d, 0xccccccc
jb 0x140098a8e
jne 0x140098b01
cmp dil, 0x38
jg 0x140098b01
mov rcx, rbx
call fcn.140096e20
movsx eax, dil
lea r14d, [r14 + r14*4]
lea r14d, [r14 - 0x18]
inc r15d
lea r14d, [rax + r14*2]
mov rax, qword [rbx + 0x28]
movzx edi, byte [rax]
cmp dil, 0x30
jge 0x140098a73
jmp 0x140098b0c
cmp dil, 0x30
jl 0x140098b0c
nop
cmp dil, 0x39
jg 0x140098b0c
cmp r14d, 0x19999999
jb 0x140098ad7
jne 0x140098b01
cmp dil, 0x35
jg 0x140098b01
mov rcx, rbx
call fcn.140096e20
movsx eax, dil
lea r14d, [r14 + r14*4]
lea r14d, [r14 - 0x18]
inc r15d
lea r14d, [rax + r14*2]
mov rax, qword [rbx + 0x28]
movzx edi, byte [rax]
cmp dil, 0x30
jge 0x140098ac0
jmp 0x140098b0c
mov byte [rsp + 0xb8], 1
mov esi, r14d
xor r12b, r12b
mov rdx, rax
cmp byte [rsp + 0xb8], bpl
je 0x140098b82
movzx ecx, byte [rax]
test r13b, r13b
je 0x140098cbe
cmp cl, 0x30
jl 0x140098b82
movzx edi, cl
movabs r13, 0xccccccccccccccc
nop word [rax + rax]
cmp dil, 0x39
jg 0x140098b82
cmp rsi, r13
jb 0x140098b5b
jne 0x140098c89
cmp dil, 0x38
jg 0x140098c89
mov rcx, rbx
call fcn.140096e20
mov rdx, qword [rbx + 0x28]
lea rax, [rsi + rsi*4]
movsx ecx, dil
inc r15d
sub ecx, 0x30
movzx edi, byte [rdx]
lea rsi, [rcx + rax*2]
cmp dil, 0x30
jge 0x140098b40
mov rax, rdx
test r12b, r12b
je 0x140098bd0
cmp byte [rax], 0x30
mov rdx, rax
jl 0x140098bd0
movzx edi, byte [rax]
mov rdx, rax
cmp dil, 0x39
jg 0x140098bd0
mov rcx, rbx
call fcn.140096e20
mov rdx, qword [rbx + 0x28]
movsx eax, dil
sub eax, 0x30
mulsd xmm6, xmm7
movzx edi, byte [rdx]
movd xmm0, eax
mov rax, rdx
cvtdq2pd xmm0, xmm0
addsd xmm0, xmm6
movaps xmm6, xmm0
cmp dil, 0x30
jge 0x140098b95
cmp byte [rdx], 0x2e
mov r13d, ebp
jne 0x140098d73
mov rcx, rbx
call fcn.140096e20
mov rcx, qword [rbx + 0x28]
movzx edi, byte [rcx]
lea eax, [rdi - 0x30]
cmp al, 9
ja 0x140098e0b
test r12b, r12b
jne 0x140098db5
cmp byte [rsp + 0xb8], bpl
mov r8, rcx
mov eax, r14d
movabs r12, 0x1fffffffffffff
cmovne rax, rsi
mov rsi, rax
nop
mov r9, rcx
mov rdx, r8
cmp dil, 0x39
jg 0x140098c6f
cmp rsi, r12
ja 0x140098c6f
mov rcx, rbx
call fcn.140096e20
movsx ecx, dil
lea rax, [rsi + rsi*4]
sub ecx, 0x30
dec r13d
lea rsi, [rcx + rax*2]
mov rcx, qword [rbx + 0x28]
test rsi, rsi
lea eax, [r15 + 1]
mov r8, rcx
mov r9, rcx
cmove eax, r15d
mov rdx, rcx
movzx edi, byte [rcx]
mov r15d, eax
cmp dil, 0x30
jge 0x140098c20
movzx edi, byte [r9]
xorps xmm6, xmm6
test rsi, rsi
js 0x140098d52
cvtsi2sd xmm6, rsi
jmp 0x140098d6a
xorps xmm6, xmm6
test rsi, rsi
js 0x140098c9e
cvtsi2sd xmm6, rsi
mov r12b, 1
jmp 0x140098b82
mov rax, rsi
mov rcx, rsi
shr rcx, 1
and eax, 1
or rcx, rax
mov r12b, 1
cvtsi2sd xmm6, rcx
addsd xmm6, xmm6
jmp 0x140098b82
cmp cl, 0x30
jl 0x140098b82
movzx edi, cl
movabs r13, 0x1999999999999999
cmp dil, 0x39
jg 0x140098b82
cmp rsi, r13
jb 0x140098ceb
jne 0x140098d17
cmp dil, 0x35
jg 0x140098d17
mov rcx, rbx
call fcn.140096e20
mov rdx, qword [rbx + 0x28]
lea rax, [rsi + rsi*4]
movsx ecx, dil
inc r15d
sub ecx, 0x30
movzx edi, byte [rdx]
lea rsi, [rcx + rax*2]
cmp dil, 0x30
jge 0x140098cd4
jmp 0x140098bd0
xorps xmm6, xmm6
test rsi, rsi
js 0x140098d2f
cvtsi2sd xmm6, rsi
mov r12b, 1
mov rax, rdx
jmp 0x140098b8a
mov rax, rsi
mov rcx, rsi
and eax, 1
shr rcx, 1
or rcx, rax
mov r12b, 1
mov rax, rdx
cvtsi2sd xmm6, rcx
addsd xmm6, xmm6
jmp 0x140098b8a
mov rax, rsi
mov rcx, rsi
shr rcx, 1
and eax, 1
or rcx, rax
cvtsi2sd xmm6, rcx
addsd xmm6, xmm6
mov r12b, 1
cmp dil, 0x30
jge 0x140098db8
movzx eax, byte [rdx]
sub al, 0x45
test al, 0xdf
jne 0x140098f18
mov rcx, rbx
call fcn.140096e20
test r12b, r12b
jne 0x140098e42
cmp byte [rsp + 0xb8], bpl
mov rcx, rsi
mov eax, r14d
xorps xmm6, xmm6
cmove rcx, rax
test rcx, rcx
js 0x140098e2a
cvtsi2sd xmm6, rcx
jmp 0x140098e3f
mov rdx, rcx
cmp dil, 0x39
jg 0x140098d73
cmp r15d, 0x11
jge 0x140098df1
mulsd xmm6, xmm7
dec r13d
movsx eax, dil
sub eax, 0x30
movd xmm0, eax
lea eax, [r15 + 1]
cvtdq2pd xmm0, xmm0
addsd xmm0, xmm6
comisd xmm0, xmm8
movaps xmm6, xmm0
cmovbe eax, r15d
mov r15d, eax
mov rcx, rbx
call fcn.140096e20
mov rdx, qword [rbx + 0x28]
movzx edi, byte [rdx]
cmp dil, 0x30
jge 0x140098db8
jmp 0x140098d73
mov rax, qword [rbx + 0x38]
sub rax, qword [rbx + 0x10]
add rax, rcx
mov rcx, qword [rsp + 0xb0]
mov dword [rcx + 0x30], 0xe
jmp 0x14009905b
mov rax, rcx
and ecx, 1
shr rax, 1
or rax, rcx
cvtsi2sd xmm6, rax
addsd xmm6, xmm6
mov r12b, 1
mov rcx, qword [rbx + 0x28]
xor r15b, r15b
movzx edi, byte [rcx]
cmp dil, 0x2b
jne 0x140098e5c
mov rcx, rbx
call fcn.140096e20
jmp 0x140098e6d
cmp dil, 0x2d
jne 0x140098e74
mov rcx, rbx
call fcn.140096e20
mov r15b, 1
mov rcx, qword [rbx + 0x28]
movzx edi, byte [rcx]
lea eax, [rdi - 0x30]
cmp al, 9
ja 0x140098fbc
mov rcx, rbx
call fcn.140096e20
mov rax, qword [rbx + 0x28]
movsx ebp, dil
sub ebp, 0x30
movzx edi, byte [rax]
test r15b, r15b
je 0x140098f5e
lea ecx, [r13 + 0x7ffffff7]
mov eax, 0x66666667
imul ecx
mov r15d, edx
sar r15d, 2
mov eax, r15d
shr eax, 0x1f
add r15d, eax
cmp dil, 0x30
jl 0x140098f16
cmp dil, 0x39
jg 0x140098f16
mov rcx, rbx
call fcn.140096e20
lea ebp, [rbp + rbp*4]
movsx eax, dil
lea ebp, [rbp - 0x18]
lea ebp, [rax + rbp*2]
cmp ebp, r15d
jle 0x140098f09
mov rax, qword [rbx + 0x28]
movzx ecx, byte [rax]
cmp cl, 0x30
jl 0x140098f09
nop
cmp cl, 0x39
jg 0x140098f09
mov rcx, rbx
call fcn.140096e20
mov rax, qword [rbx + 0x28]
movzx ecx, byte [rax]
cmp cl, 0x30
jge 0x140098ef0
mov rax, qword [rbx + 0x28]
movzx edi, byte [rax]
cmp dil, 0x30
jge 0x140098ec2
neg ebp
test r12b, r12b
je 0x140098fdb
mov edx, ebp
movaps xmm0, xmm6
add edx, r13d
call fcn.140010af0
comisd xmm0, xmmword [0x1403ec008]
ja 0x140098fa3
cmp byte [rsp + 0xc8], 0
je 0x140098f49
xorps xmm0, xmmword [0x1403ec1b0]
mov rcx, qword [rsp + 0xc0]
movaps xmm1, xmm0
call fcn.140014050
jmp 0x14009902f
mov r15d, 0x134
sub r15d, r13d
cmp dil, 0x30
jl 0x140098f18
nop dword [rax]
cmp dil, 0x39
jg 0x140098f18
mov rcx, rbx
call fcn.140096e20
lea ebp, [rbp + rbp*4]
movsx eax, dil
lea ebp, [rbp - 0x18]
lea ebp, [rax + rbp*2]
cmp ebp, r15d
jg 0x140098fa3
mov rax, qword [rbx + 0x28]
movzx edi, byte [rax]
cmp dil, 0x30
jge 0x140098f70
jmp 0x140098f18
mov rcx, qword [rsp + 0xb0]
mov rax, qword [rsp + 0x20]
mov dword [rcx + 0x30], 0xd
jmp 0x14009905b
mov rax, qword [rbx + 0x38]
sub rax, qword [rbx + 0x10]
add rax, rcx
mov rcx, qword [rsp + 0xb0]
mov dword [rcx + 0x30], 0xf
jmp 0x14009905b
cmp byte [rsp + 0xb8], 0
mov rcx, qword [rsp + 0xc0]
je 0x14009900f
cmp byte [rsp + 0xc8], 0
je 0x140099005
not rsi
lea rdx, [rsi + 1]
call fcn.140014140
jmp 0x14009902f
mov rdx, rsi
call fcn.1400140b0
jmp 0x14009902f
cmp byte [rsp + 0xc8], 0
je 0x140099027
not r14d
lea edx, [r14 + 1]
call fcn.140014200
jmp 0x14009902f
mov edx, r14d
call fcn.140014190
test al, al
jne 0x14009905f
mov rcx, qword [rsp + 0xb0]
mov rax, qword [rsp + 0x20]
mov dword [rcx + 0x30], 0x10
jmp 0x14009905b
mov rax, qword [rbx + 0x38]
sub rax, qword [rbx + 0x10]
add rax, rdx
mov dword [rcx + 0x30], 3
mov qword [rcx + 0x38], rax
mov r14, qword [rsp + 0x68]
mov r12, qword [rsp + 0x70]
movaps xmm6, xmmword [rsp + 0x50]
movaps xmm7, xmmword [rsp + 0x40]
movaps xmm8, xmmword [rsp + 0x30]
add rsp, 0x78
pop r15
pop r13
pop rdi
pop rsi
pop rbp
pop rbx
ret