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

Disassembly:
mov qword [rsp + 0x10], rbx
push rbp
push rsi
push rdi
push r12
push r13
push r14
push r15
sub rsp, 0x70
movaps xmmword [rsp + 0x60], xmm6
mov rax, qword [0x1402d4040]
xor rax, rsp
mov qword [rsp + 0x58], rax
mov qword [rsp + 0x30], r8
mov qword [rsp + 0x38], rdx
mov r12, rcx
movups xmm0, xmmword [rdx]
movups xmmword [rsp + 0x40], xmm0
mov qword [rsp + 0x50], rdx
movq r8, xmm0
mov rax, r8
psrldq xmm0, 8
movq r15, xmm0
sub rax, r15
mov qword [rsp + 0x28], rax
xorps xmm6, xmm6
xorps xmm1, xmm1
cmp byte [r8], 0x2d
jne 0x1401a0535
inc r8
mov qword [rsp + 0x40], r8
mov r9b, 1
jmp 0x1401a0538
xor r9b, r9b
mov byte [rsp + 0x20], r9b
xor ebx, ebx
mov edi, ebx
xor r13b, r13b
mov r11d, ebx
movsx ecx, byte [r8]
cmp cl, 0x30
jne 0x1401a0560
mov esi, ebx
lea rdx, [r8 + 1]
mov qword [rsp + 0x40], rdx
jmp 0x1401a0622
lea eax, [rcx - 0x31]
cmp al, 8
ja 0x1401a0c61
lea rdx, [r8 + 1]
mov qword [rsp + 0x40], rdx
lea esi, [rcx - 0x30]
movzx eax, byte [rdx]
test r9b, r9b
je 0x1401a05d1
cmp al, 0x30
jl 0x1401a0622
mov r8, rdx
mov rcx, rdx
nop dword [rax]
cmp al, 0x39
ja 0x1401a0622
cmp esi, 0xccccccc
jb 0x1401a05a9
jne 0x1401a061d
mov r8, rcx
cmp al, 0x38
ja 0x1401a061d
lea rdx, [r8 + 1]
mov qword [rsp + 0x40], rdx
lea ecx, [rsi - 6]
lea ecx, [rsi + rcx*4]
movsx eax, byte [r8]
lea esi, [rax + rcx*2]
inc r11d
movzx eax, byte [rdx]
mov r8, rdx
mov rcx, rdx
cmp al, 0x30
jge 0x1401a0590
jmp 0x1401a0622
cmp al, 0x30
jl 0x1401a0622
mov r8, rdx
mov rcx, rdx
nop dword [rax + rax]
cmp al, 0x39
jg 0x1401a0622
cmp esi, 0x19999999
jb 0x1401a05f5
jne 0x1401a061d
mov r8, rcx
cmp al, 0x35
jg 0x1401a061d
lea rdx, [r8 + 1]
mov qword [rsp + 0x40], rdx
lea ecx, [rsi - 6]
lea ecx, [rsi + rcx*4]
movsx eax, byte [r8]
lea esi, [rax + rcx*2]
inc r11d
movzx eax, byte [rdx]
mov r8, rdx
mov rcx, rdx
cmp al, 0x30
jge 0x1401a05e0
jmp 0x1401a0622
mov r13b, 1
mov edi, esi
xor r14b, r14b
movsd xmm2, qword [0x1402a5e60]
test r13b, r13b
je 0x1401a0770
test r9b, r9b
je 0x1401a06b2
movzx ecx, byte [rdx]
cmp cl, 0x30
jl 0x1401a0770
mov r8, rdx
mov r9, rdx
movabs r10, 0xccccccccccccccc
cmp cl, 0x39
ja 0x1401a0770
cmp rdi, r10
jb 0x1401a066f
jne 0x1401a069d
mov r8, r9
cmp cl, 0x38
ja 0x1401a069d
lea rdx, [r8 + 1]
mov qword [rsp + 0x40], rdx
movsx ecx, byte [r8]
sub ecx, 0x30
lea rax, [rdi + rdi*4]
lea rdi, [rcx + rax*2]
inc r11d
mov r8, rdx
mov r9, rdx
movzx ecx, byte [rdx]
cmp cl, 0x30
jge 0x1401a0657
jmp 0x1401a0770
mov rcx, rdi
mov r14b, 1
xorps xmm1, xmm1
test rcx, rcx
js 0x1401a071a
cvtsi2sd xmm1, rcx
jmp 0x1401a072f
movzx r8d, byte [rdx]
cmp r8b, 0x30
jl 0x1401a0770
mov r9, rdx
mov r10, rdx
movabs rbp, 0x1999999999999999
mov rcx, rdi
cmp r8b, 0x39
ja 0x1401a0770
cmp rdi, rbp
jb 0x1401a06ed
jne 0x1401a06a0
mov r9, r10
cmp r8b, 0x35
ja 0x1401a06a0
lea rdx, [r9 + 1]
mov qword [rsp + 0x40], rdx
movsx ecx, byte [r9]
sub ecx, 0x30
lea rax, [rdi + rdi*4]
lea rdi, [rcx + rax*2]
inc r11d
mov r9, rdx
mov r10, rdx
movzx r8d, byte [rdx]
cmp r8b, 0x30
jge 0x1401a06d0
jmp 0x1401a0770
mov rax, rcx
shr rax, 1
and ecx, 1
or rax, rcx
cvtsi2sd xmm1, rax
addsd xmm1, xmm1
movzx ecx, byte [rdx]
cmp cl, 0x30
jl 0x1401a0770
mov r8, rdx
nop word [rax + rax]
cmp cl, 0x39
ja 0x1401a0770
lea rdx, [r8 + 1]
mov qword [rsp + 0x40], rdx
movsx eax, byte [r8]
sub eax, 0x30
movd xmm0, eax
cvtdq2pd xmm0, xmm0
mulsd xmm1, xmm2
addsd xmm1, xmm0
mov r8, rdx
movzx ecx, byte [rdx]
cmp cl, 0x30
jge 0x1401a0740
mov ebp, ebx
cmp byte [rdx], 0x2e
jne 0x1401a089d
lea r8, [rdx + 1]
mov qword [rsp + 0x40], r8
movzx ecx, byte [r8]
lea eax, [rcx - 0x30]
cmp al, 9
ja 0x1401a08d1
mov rdx, r8
test r14b, r14b
jne 0x1401a082b
test r13b, r13b
jne 0x1401a07a6
mov edi, esi
mov rcx, r8
mov r9, r8
movzx eax, byte [r8]
movabs r10, 0x1fffffffffffff
nop word [rax + rax]
cmp al, 0x39
jg 0x1401a07fe
mov rdx, r9
cmp rdi, r10
ja 0x1401a07fe
lea r8, [rcx + 1]
mov rdx, r8
mov qword [rsp + 0x40], r8
movsx ecx, byte [rcx]
sub ecx, 0x30
lea rax, [rdi + rdi*4]
lea rdi, [rcx + rax*2]
dec ebp
test rdi, rdi
je 0x1401a07f0
inc r11d
movzx eax, byte [r8]
mov rcx, r8
mov r9, rdx
cmp al, 0x30
jge 0x1401a07c0
xorps xmm1, xmm1
test rdi, rdi
js 0x1401a080d
cvtsi2sd xmm1, rdi
jmp 0x1401a0825
mov rcx, rdi
shr rcx, 1
mov rax, rdi
and eax, 1
or rcx, rax
cvtsi2sd xmm1, rcx
addsd xmm1, xmm1
mov r14b, 1
movzx ecx, byte [rdx]
cmp cl, 0x30
jl 0x1401a089d
mov rax, rdx
mov r10, rdx
mov r9, rdx
movzx ecx, byte [r8]
nop dword [rax]
mov rdx, r9
cmp cl, 0x39
jg 0x1401a089d
cmp r11d, 0x11
jge 0x1401a0880
lea rdx, [rax + 1]
mov rcx, rdx
mov qword [rsp + 0x40], rdx
movsx eax, byte [rax]
sub eax, 0x30
movd xmm0, eax
cvtdq2pd xmm0, xmm0
mulsd xmm1, xmm2
addsd xmm0, xmm1
movaps xmm1, xmm0
dec ebp
comisd xmm0, xmm6
jbe 0x1401a088c
inc r11d
jmp 0x1401a088c
lea rdx, [r10 + 1]
mov rcx, rdx
mov qword [rsp + 0x40], rdx
mov rax, rdx
movzx ecx, byte [rcx]
mov r10, rdx
mov r9, rdx
cmp cl, 0x30
jge 0x1401a0840
cmp byte [rdx], 0x65
je 0x1401a08ab
cmp byte [rdx], 0x45
jne 0x1401a09b4
inc rdx
mov qword [rsp + 0x40], rdx
test r14b, r14b
jne 0x1401a08f3
test r13b, r13b
mov rcx, rdi
jne 0x1401a08c2
mov ecx, esi
xorps xmm1, xmm1
test rcx, rcx
js 0x1401a08db
cvtsi2sd xmm1, rcx
jmp 0x1401a08f0
mov edx, recv
jmp 0x1401a0c66
mov rax, rcx
shr rax, 1
and ecx, 1
or rax, rcx
cvtsi2sd xmm1, rax
addsd xmm1, xmm1
mov r14b, 1
xor r10b, r10b
movzx ecx, byte [rdx]
cmp cl, 0x2b
je 0x1401a0906
cmp cl, 0x2d
jne 0x1401a0911
mov r10b, 1
inc rdx
movzx ecx, byte [rdx]
mov qword [rsp + 0x40], rdx
lea eax, [rcx - 0x30]
cmp al, 9
ja 0x1401a0a62
lea r8, [rdx + 1]
mov qword [rsp + 0x40], r8
movsx ebx, cl
sub ebx, 0x30
movzx r9d, byte [r8]
test r10b, r10b
je 0x1401a0a23
lea ecx, [rbp + 0x7ffffff7]
mov eax, 0x66666667
imul ecx
mov r10d, edx
sar r10d, 2
mov eax, r10d
shr eax, 0x1f
add r10d, eax
cmp r9b, 0x30
jl 0x1401a09b2
movzx eax, r9b
nop
cmp al, 0x39
jg 0x1401a09b2
lea rdx, [r8 + 1]
mov qword [rsp + 0x40], rdx
lea ebx, [rbx + rbx*4]
movsx eax, byte [r8]
lea ebx, [rbx - 0x18]
lea ebx, [rax + rbx*2]
mov r8, rdx
cmp ebx, r10d
jle 0x1401a09ab
movzx eax, byte [rdx]
cmp al, 0x30
jl 0x1401a09ab
mov rcx, rdx
nop dword [rax]
cmp al, 0x39
ja 0x1401a09a6
lea r8, [rcx + 1]
mov rdx, r8
movzx eax, byte [r8]
mov rcx, r8
cmp al, 0x30
jge 0x1401a0990
mov qword [rsp + 0x40], rdx
movzx eax, byte [rdx]
cmp al, 0x30
jge 0x1401a0960
neg ebx
test r14b, r14b
je 0x1401a0aeb
lea ecx, [rbx + rbp]
cmp ecx, 0xfffffecc
jge 0x1401a0a78
divsd xmm1, qword [0x1402a5fe0]
lea eax, [rcx + 0x134]
cmp eax, 0xfffffecc
jl 0x1401a09fd
movsxd rax, ecx
lea rax, [rax*8 + 0x9a0]
lea rcx, [0x14028b3c0]
sub rcx, rax
movaps xmm6, xmm1
divsd xmm6, qword [rcx]
comisd xmm6, xmmword [0x1402a5fe8]
jbe 0x1401a0aa0
mov dword [r12 + 0x30], recv
mov rax, qword [rsp + 0x28]
mov qword [r12 + 0x38], rax
jmp 0x1401a0c7e
mov edx, 0x134
sub edx, ebp
cmp r9b, 0x30
jl 0x1401a09b4
movzx eax, r9b
cmp al, 0x39
jg 0x1401a09b4
movsx eax, byte [r8]
inc r8
mov qword [rsp + 0x40], r8
lea ebx, [rbx + rbx*4]
lea ebx, [rbx - 0x18]
lea ebx, [rax + rbx*2]
cmp ebx, edx
jg 0x1401a0a0b
movzx eax, byte [r8]
cmp al, 0x30
jge 0x1401a0a34
jmp 0x1401a09b4
sub rdx, r15
mov dword [r12 + 0x30], recv
mov qword [r12 + 0x38], rdx
jmp 0x1401a0c7e
movsxd rax, ecx
lea rax, [rax*8]
test ecx, ecx
js 0x1401a09ec
lea rcx, [0x14028b3c0]
movsd xmm6, qword [rax + rcx]
mulsd xmm6, xmm1
jmp 0x1401a09fd
cmp byte [rsp + 0x20], 0
je 0x1401a0aae
xorps xmm6, xmmword [0x1402a64d0]
mov rbx, qword [rsp + 0x30]
mov rax, qword [rbx + 0x40]
sub rax, qword [rbx + 0x38]
cmp rax, 0x10
jge 0x1401a0aca
lea rcx, [rbx + 0x20]
call fcn.14019af20
mov rcx, qword [rbx + 0x38]
lea rax, [rcx + 0x10]
mov qword [rbx + 0x38], rax
xorps xmm0, xmm0
movups xmmword [rcx], xmm0
movsd qword [rcx], xmm6
mov word [rcx + 0xe], 0x216
jmp 0x1401a0c7e
mov rbx, qword [rsp + 0x30]
add rbx, 0x20
mov rax, qword [rbx + 0x20]
sub rax, qword [rbx + 0x18]
test r13b, r13b
je 0x1401a0bdf
cmp byte [rsp + 0x20], 0
je 0x1401a0b74
neg rdi
cmp rax, 0x10
jge 0x1401a0b1d
mov rcx, rbx
call fcn.14019af20
mov rcx, qword [rbx + 0x18]
lea rax, [rcx + 0x10]
mov qword [rbx + 0x18], rax
xorps xmm0, xmm0
movups xmmword [rcx], xmm0
mov qword [rcx], rdi
mov word [rcx + 0xe], 0x96
test rdi, rdi
js 0x1401a0b5c
mov eax, 0x196
mov word [rcx + 0xe], ax
movabs rdx, 0xffffffff00000000
test rdx, rdi
jne 0x1401a0bc5
mov eax, 0x1d6
jmp 0x1401a0bc1
cmp rdi, 0xffffffff80000000
jl 0x1401a0c7e
mov word [rcx + 0xe], 0xb6
jmp 0x1401a0c7e
cmp rax, 0x10
jge 0x1401a0b82
mov rcx, rbx
call fcn.14019af20
mov rcx, qword [rbx + 0x18]
lea rax, [rcx + 0x10]
mov qword [rbx + 0x18], rax
xorps xmm0, xmm0
movups xmmword [rcx], xmm0
mov qword [rcx], rdi
mov eax, 0x116
mov word [rcx + 0xe], ax
test rdi, rdi
js 0x1401a0bae
mov eax, 0x196
mov word [rcx + 0xe], ax
movabs rdx, 0xffffffff00000000
test rdx, rdi
jne 0x1401a0bc5
or ax, 0x40
mov word [rcx + 0xe], ax
test rdi, 0xffffffff80000000
jne 0x1401a0c7e
or ax, 0x20
mov word [rcx + 0xe], ax
jmp 0x1401a0c7e
cmp byte [rsp + 0x20], 0
je 0x1401a0c24
neg esi
cmp rax, 0x10
jge 0x1401a0bf6
mov rcx, rbx
call fcn.14019af20
mov rcx, qword [rbx + 0x18]
lea rax, [rcx + 0x10]
mov qword [rbx + 0x18], rax
xorps xmm0, xmm0
movups xmmword [rcx], xmm0
movsxd rax, esi
mov qword [rcx], rax
mov eax, 0xb6
mov edx, 0x1f6
test esi, esi
cmovns ax, dx
mov word [rcx + 0xe], ax
jmp 0x1401a0c7e
cmp rax, 0x10
jge 0x1401a0c32
mov rcx, rbx
call fcn.14019af20
mov rcx, qword [rbx + 0x18]
lea rax, [rcx + 0x10]
mov qword [rbx + 0x18], rax
xorps xmm0, xmm0
movups xmmword [rcx], xmm0
mov eax, esi
mov qword [rcx], rax
shr esi, 0x1a
not si
and si, 0x20
mov eax, 0x1d6
or si, ax
mov word [rcx + 0xe], si
jmp 0x1401a0c7e
mov edx, 3
mov ecx, 0x30
mov eax, 0x38
mov r9, r12
sub r8, r15
mov dword [r12 + rcx], edx
mov qword [r12 + rax], r8
movups xmm0, xmmword [rsp + 0x40]
mov rax, qword [rsp + 0x38]
movups xmmword [rax], xmm0
mov rcx, qword [rsp + 0x58]
xor rcx, rsp
call fcn.140244f00
mov rbx, qword [rsp + 0xb8]
movaps xmm6, xmmword [rsp + 0x60]
add rsp, 0x70
pop r15
pop r14
pop r13
pop r12
pop rdi
pop rsi
pop rbp
ret