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

Disassembly:
mov qword [rsp + 8], rbx
mov qword [rsp + 0x18], r8
mov qword [rsp + 0x10], rdx
push rbp
push rsi
push rdi
push r12
push r13
push r14
push r15
mov rbp, rsp
sub rsp, 0x60
movaps xmmword [rsp + 0x50], xmm6
mov r13, rcx
movups xmm0, xmmword [rdx]
movups xmmword [rbp - 0x30], xmm0
movsd xmm6, qword [rdx + 0x10]
movsd qword [rbp - 0x20], xmm6
mov qword [rbp - 0x18], rdx
movq rdx, xmm0
mov rax, rdx
mov r12, qword [rbp - 0x20]
sub rax, r12
mov qword [rbp - 0x38], rax
xorps xmm3, xmm3
xorps xmm1, xmm1
cmp byte [rdx], 0x2d
jne 0x139a15d08
inc rdx
mov qword [rbp - 0x30], rdx
mov r9b, 1
jmp 0x139a15d0b
xor r9b, r9b
mov byte [rbp - 0x40], r9b
xor r14d, r14d
mov ebx, r14d
xor r10b, r10b
mov byte [rbp + 0x58], r10b
mov r11d, r14d
movsx ecx, byte [rdx]
cmp cl, 0x30
jne 0x139a15d36
mov edi, r14d
inc rdx
mov qword [rbp - 0x30], rdx
jmp 0x139a15e05
lea eax, [rcx - 0x31]
cmp al, 8
ja 0x139a1628e
inc rdx
mov qword [rbp - 0x30], rdx
lea edi, [rcx - 0x30]
movzx eax, byte [rdx]
test r9b, r9b
je 0x139a15db0
cmp al, 0x30
jl 0x139a15e05
mov rcx, rdx
mov r8, rdx
cmp al, 0x39
ja 0x139a15e05
nop dword [rax]
cmp edi, 0xccccccc
jb 0x139a15d85
jne 0x139a15dfc
mov r8, rcx
cmp al, 0x38
ja 0x139a15dfc
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
lea edi, [rdi + rdi*4]
movsx eax, byte [r8]
lea edi, [rdi - 0x18]
lea edi, [rax + rdi*2]
inc r11d
movzx eax, byte [rdx]
cmp al, 0x30
jl 0x139a15e05
mov rcx, rdx
mov r8, rdx
cmp al, 0x39
jle 0x139a15d70
jmp 0x139a15e05
cmp al, 0x30
jl 0x139a15e05
mov rcx, rdx
mov r8, rdx
cmp al, 0x39
jg 0x139a15e05
nop
cmp edi, 0x19999999
jb 0x139a15dd1
jne 0x139a15dfc
mov r8, rcx
cmp al, 0x35
jg 0x139a15dfc
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
lea edi, [rdi + rdi*4]
movsx eax, byte [r8]
lea edi, [rdi - 0x18]
lea edi, [rax + rdi*2]
inc r11d
movzx eax, byte [rdx]
cmp al, 0x30
jl 0x139a15e05
mov rcx, rdx
mov r8, rdx
cmp al, 0x39
jle 0x139a15dc0
jmp 0x139a15e05
mov r10b, 1
mov byte [rbp + 0x58], r10b
mov ebx, edi
xor r15b, r15b
movsd xmm2, qword [0x1399d6bb8]
test r10b, r10b
je 0x139a15f40
movzx eax, byte [rdx]
test r9b, r9b
je 0x139a15e97
cmp al, 0x30
jl 0x139a15f40
mov r8, rdx
cmp al, 0x39
jg 0x139a15f40
mov rcx, rdx
movabs r9, 0xccccccccccccccc
cmp rbx, r9
jb 0x139a15e4f
jne 0x139a15e82
mov rcx, r8
cmp al, 0x38
ja 0x139a15e82
lea rdx, [rcx + 1]
mov qword [rbp - 0x30], rdx
movsx ecx, byte [rcx]
sub ecx, 0x30
lea rax, [rbx + rbx*4]
lea rbx, [rcx + rax*2]
inc r11d
movzx eax, byte [rdx]
cmp al, 0x30
jl 0x139a15f40
mov r8, rdx
mov rcx, rdx
cmp al, 0x39
jle 0x139a15e41
jmp 0x139a15f40
mov rcx, rbx
mov r15b, 1
xorps xmm1, xmm1
test rcx, rcx
js 0x139a15ef5
cvtsi2sd xmm1, rcx
jmp 0x139a15f0a
cmp al, 0x30
jl 0x139a15f40
mov r9, rdx
cmp al, 0x39
jg 0x139a15f40
mov r8, rdx
movabs rsi, 0x1999999999999999
mov rcx, rbx
cmp rbx, rsi
jb 0x139a15ec8
jne 0x139a15e85
mov r8, r9
cmp al, 0x35
ja 0x139a15e85
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
movsx ecx, byte [r8]
sub ecx, 0x30
lea rax, [rbx + rbx*4]
lea rbx, [rcx + rax*2]
inc r11d
movzx eax, byte [rdx]
cmp al, 0x30
jl 0x139a15f40
mov r9, rdx
mov r8, rdx
cmp al, 0x39
jle 0x139a15eb7
jmp 0x139a15f40
mov rax, rcx
shr rax, 1
and ecx, 1
or rax, rcx
cvtsi2sd xmm1, rax
addsd xmm1, xmm1
movzx eax, byte [rdx]
cmp al, 0x30
jl 0x139a15f40
mov rcx, rdx
cmp al, 0x39
ja 0x139a15f40
lea rdx, [rcx + 1]
mov qword [rbp - 0x30], rdx
movsx eax, byte [rcx]
sub eax, 0x30
movd xmm0, eax
cvtdq2pd xmm0, xmm0
mulsd xmm1, xmm2
addsd xmm1, xmm0
movzx eax, byte [rdx]
mov rcx, rdx
cmp al, 0x30
jge 0x139a15f14
mov esi, r14d
movzx eax, byte [rdx]
cmp al, 0x2e
jne 0x139a15f51
inc rdx
mov qword [rbp - 0x30], rdx
mov rcx, rdx
cmp al, 0x2e
jne 0x139a1606f
movzx r9d, byte [rdx]
lea eax, [r9 - 0x30]
cmp al, 9
ja 0x139a160a2
mov r8, rdx
test r15b, r15b
jne 0x139a15ffa
test r10b, r10b
jne 0x139a15f7f
mov ebx, edi
mov r9, rcx
movzx eax, byte [rdx]
movabs r15, 0x1fffffffffffff
nop
cmp al, 0x39
jg 0x139a15fcc
mov r8, r9
cmp rbx, r15
ja 0x139a15fcc
lea rdx, [rcx + 1]
mov r8, rdx
mov qword [rbp - 0x30], rdx
movsx ecx, byte [rcx]
sub ecx, 0x30
lea rax, [rbx + rbx*4]
lea rbx, [rcx + rax*2]
dec esi
test rbx, rbx
je 0x139a15fbf
inc r11d
movzx eax, byte [rdx]
mov rcx, rdx
mov r9, rdx
cmp al, 0x30
jge 0x139a15f90
xorps xmm1, xmm1
test rbx, rbx
js 0x139a15fdb
cvtsi2sd xmm1, rbx
jmp 0x139a15ff3
mov rcx, rbx
shr rcx, 1
mov rax, rbx
and eax, 1
or rcx, rax
cvtsi2sd xmm1, rcx
addsd xmm1, xmm1
mov r15b, 1
movzx r9d, byte [r8]
mov rcx, r8
cmp r9b, 0x30
jl 0x139a1606f
mov r10, r8
mov r9, r8
movzx eax, byte [rdx]
nop dword [rax]
mov rcx, r9
cmp al, 0x39
jg 0x139a1606a
cmp r11d, 0x11
jge 0x139a1604f
lea rcx, [r8 + 1]
mov rdx, rcx
mov qword [rbp - 0x30], rcx
movsx eax, byte [r8]
sub eax, 0x30
movd xmm0, eax
cvtdq2pd xmm0, xmm0
mulsd xmm1, xmm2
addsd xmm0, xmm1
movaps xmm1, xmm0
dec esi
comisd xmm0, xmm3
jbe 0x139a1605a
inc r11d
jmp 0x139a1605a
lea rcx, [r10 + 1]
mov rdx, rcx
mov qword [rbp - 0x30], rcx
mov r8, rcx
movzx eax, byte [rdx]
mov r10, rcx
mov r9, rcx
cmp al, 0x30
jge 0x139a16010
movzx r10d, byte [rbp + 0x58]
cmp byte [rcx], 0x65
je 0x139a1607d
cmp byte [rcx], 0x45
jne 0x139a16194
inc rcx
mov qword [rbp - 0x30], rcx
test r15b, r15b
jne 0x139a160ce
test r10b, r10b
mov rdx, rbx
jne 0x139a16093
mov edx, edi
xorps xmm1, xmm1
test rdx, rdx
js 0x139a160b6
cvtsi2sd xmm1, rdx
jmp 0x139a160cb
mov dword [r13 + 0x30], recv
sub rcx, r12
mov qword [r13 + 0x38], rcx
jmp 0x139a1629d
mov rax, rdx
shr rax, 1
and edx, 1
or rax, rdx
cvtsi2sd xmm1, rax
addsd xmm1, xmm1
mov r15b, 1
xor r9b, r9b
movzx edx, byte [rcx]
cmp dl, 0x2b
je 0x139a160e1
cmp dl, 0x2d
jne 0x139a160eb
mov r9b, 1
inc rcx
movzx edx, byte [rcx]
mov qword [rbp - 0x30], rcx
lea eax, [rdx - 0x30]
cmp al, 9
ja 0x139a1620d
lea r8, [rcx + 1]
mov qword [rbp - 0x30], r8
movsx r14d, dl
sub r14d, 0x30
movzx r10d, byte [r8]
test r9b, r9b
je 0x139a161c8
lea ecx, [rsi + 0x7ffffff7]
mov eax, 0x66666667
imul ecx
mov r9d, edx
sar r9d, 2
mov eax, r9d
shr eax, 0x1f
add r9d, eax
cmp r10b, 0x30
jl 0x139a16191
movzx eax, r10b
nop word [rax + rax]
cmp al, 0x39
jg 0x139a16191
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
lea r14d, [r14 + r14*4]
movsx eax, byte [r8]
lea r14d, [r14 - 0x18]
lea r14d, [rax + r14*2]
mov r8, rdx
cmp r14d, r9d
jle 0x139a1618a
movzx eax, byte [rdx]
cmp al, 0x30
jl 0x139a1618a
mov rcx, rdx
nop
cmp al, 0x39
ja 0x139a16186
lea r8, [rcx + 1]
mov rdx, r8
movzx eax, byte [r8]
mov rcx, r8
cmp al, 0x30
jge 0x139a16170
mov qword [rbp - 0x30], rdx
movzx eax, byte [rdx]
cmp al, 0x30
jge 0x139a16140
neg r14d
test r15b, r15b
je 0x139a16239
lea edx, [r14 + rsi]
movaps xmm0, xmm1
call fcn.1399fef00
comisd xmm0, xmmword [0x1399d6c10]
jbe 0x139a1621e
mov dword [r13 + 0x30], reloc.WS2_32.dll_listen
mov rax, qword [rbp - 0x38]
mov qword [r13 + 0x38], rax
jmp 0x139a1629d
mov r9d, 0x134
sub r9d, esi
cmp r10b, 0x30
jl 0x139a16194
movzx eax, r10b
nop dword [rax + rax]
cmp al, 0x39
jg 0x139a16194
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
lea r14d, [r14 + r14*4]
movsx eax, byte [r8]
lea r14d, [r14 - 0x18]
lea r14d, [rax + r14*2]
cmp r14d, r9d
jg 0x139a161b3
movzx eax, byte [rdx]
mov r8, rdx
cmp al, 0x30
jge 0x139a161e0
jmp 0x139a16194
sub rcx, r12
mov dword [r13 + 0x30], reloc.WS2_32.dll_ntohs
mov qword [r13 + 0x38], rcx
jmp 0x139a1629d
cmp byte [rbp - 0x40], 0
je 0x139a1622b
xorps xmm0, xmmword [0x1399d6e70]
movaps xmm1, xmm0
mov rcx, qword [rbp + 0x50]
call fcn.139a02d70
jmp 0x139a16278
mov rcx, qword [rbp + 0x50]
cmp byte [rbp + 0x58], 0
je 0x139a16260
cmp byte [rbp - 0x40], 0
je 0x139a16256
neg rbx
mov rdx, rbx
call fcn.139a02e60
jmp 0x139a16278
mov rdx, rbx
call fcn.139a02dd0
jmp 0x139a16278
cmp byte [rbp - 0x40], 0
je 0x139a16271
neg edi
mov edx, edi
call fcn.139a02f70
jmp 0x139a16278
mov edx, edi
call fcn.139a02f10
test al, al
jne 0x139a1629d
mov dword [r13 + 0x30], reloc.WS2_32.dll_recv
mov rax, qword [rbp - 0x38]
mov qword [r13 + 0x38], rax
jmp 0x139a1629d
mov dword [r13 + 0x30], 3
sub rdx, r12
mov qword [r13 + 0x38], rdx
movups xmm0, xmmword [rbp - 0x30]
mov rax, qword [rbp + 0x48]
movups xmmword [rax], xmm0
movsd qword [rax + 0x10], xmm6
mov rbx, qword [rsp + 0xa0]
movaps xmm6, xmmword [rsp + 0x50]
add rsp, 0x60
pop r15
pop r14
pop r13
pop r12
pop rdi
pop rsi
pop rbp
ret