Function at 0x140038c60
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 r8, xmm0
mov rax, r8
mov r12, qword [rbp - 0x20]
sub rax, r12
mov qword [rbp - 0x38], rax
xorps xmm3, xmm3
xorps xmm1, xmm1
cmp byte [r8], 0x2d
jne 0x140038cc9
inc r8
mov qword [rbp - 0x30], r8
mov r10b, 1
jmp 0x140038ccc
xor r10b, r10b
mov byte [rbp - 0x40], r10b
xor esi, esi
mov r9d, esi
xor r11b, r11b
mov byte [rbp + 0x58], r11b
mov ebx, esi
movsx ecx, byte [r8]
cmp cl, 0x30
jne 0x140038cf6
mov edi, esi
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
jmp 0x140038db5
lea eax, [rcx - 0x31]
cmp al, 8
ja 0x140039250
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
lea edi, [rcx - 0x30]
movzx eax, byte [rdx]
test r10b, r10b
je 0x140038d61
cmp al, 0x30
jl 0x140038db5
mov r8, rdx
mov rcx, rdx
cmp al, 0x39
ja 0x140038db5
cmp edi, 0xccccccc
jb 0x140038d3b
jne 0x140038dab
mov r8, rcx
cmp al, 0x38
ja 0x140038dab
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
lea ecx, [rdi - 6]
lea ecx, [rdi + rcx*4]
movsx eax, byte [r8]
lea edi, [rax + rcx*2]
inc ebx
movzx eax, byte [rdx]
mov r8, rdx
mov rcx, rdx
cmp al, 0x30
jge 0x140038d22
jmp 0x140038db5
cmp al, 0x30
jl 0x140038db5
mov r8, rdx
mov rcx, rdx
nop dword [rax + rax]
cmp al, 0x39
jg 0x140038db5
cmp edi, 0x19999999
jb 0x140038d85
jne 0x140038dab
mov r8, rcx
cmp al, 0x35
jg 0x140038dab
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
lea ecx, [rdi - 6]
lea ecx, [rdi + rcx*4]
movsx eax, byte [r8]
lea edi, [rax + rcx*2]
inc ebx
movzx eax, byte [rdx]
mov r8, rdx
mov rcx, rdx
cmp al, 0x30
jge 0x140038d70
jmp 0x140038db5
mov r11b, 1
mov byte [rbp + 0x58], r11b
mov r9d, edi
xor r15b, r15b
movsd xmm2, qword [0x1403f3768]
test r11b, r11b
je 0x140038f07
test r10b, r10b
je 0x140038e4c
movzx ecx, byte [rdx]
cmp cl, 0x30
jl 0x140038f07
mov r8, rdx
mov r10, rdx
movabs r11, 0xccccccccccccccc
nop word [rax + rax]
cmp cl, 0x39
ja 0x140038f07
cmp r9, r11
jb 0x140038e08
jne 0x140038e34
mov r8, r10
cmp cl, 0x38
ja 0x140038e34
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
movsx ecx, byte [r8]
sub ecx, 0x30
lea rax, [r9 + r9*4]
lea r9, [rcx + rax*2]
inc ebx
mov r8, rdx
mov r10, rdx
movzx ecx, byte [rdx]
cmp cl, 0x30
jge 0x140038df0
jmp 0x140038f07
mov rcx, r9
mov r15b, 1
xorps xmm1, xmm1
test rcx, rcx
js 0x140038eb8
cvtsi2sd xmm1, rcx
jmp 0x140038ecd
movzx r8d, byte [rdx]
cmp r8b, 0x30
jl 0x140038f07
mov r10, rdx
mov r11, rdx
movabs r14, 0x1999999999999999
nop word [rax + rax]
mov rcx, r9
cmp r8b, 0x39
ja 0x140038f07
cmp r9, r14
jb 0x140038e8d
jne 0x140038e37
mov r10, r11
cmp r8b, 0x35
ja 0x140038e37
lea rdx, [r10 + 1]
mov qword [rbp - 0x30], rdx
movsx ecx, byte [r10]
sub ecx, 0x30
lea rax, [r9 + r9*4]
lea r9, [rcx + rax*2]
inc ebx
mov r10, rdx
mov r11, rdx
movzx r8d, byte [rdx]
cmp r8b, 0x30
jge 0x140038e70
jmp 0x140038f07
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 0x140038f07
mov r8, rdx
cmp cl, 0x39
ja 0x140038f07
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], 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 0x140038ed8
mov r14d, esi
cmp byte [rdx], 0x2e
jne 0x14003902a
lea r8, [rdx + 1]
mov qword [rbp - 0x30], r8
movzx ecx, byte [r8]
lea eax, [rcx - 0x30]
cmp al, 9
ja 0x14003905e
mov rdx, r8
test r15b, r15b
jne 0x140038fbd
cmp byte [rbp + 0x58], sil
jne 0x140038f3f
mov r9d, edi
mov rcx, r8
mov r10, r8
movzx eax, byte [r8]
movabs r11, 0x1fffffffffffff
cmp al, 0x39
jg 0x140038f90
mov rdx, r10
cmp r9, r11
ja 0x140038f90
lea r8, [rcx + 1]
mov rdx, r8
mov qword [rbp - 0x30], r8
movsx ecx, byte [rcx]
sub ecx, 0x30
lea rax, [r9 + r9*4]
lea r9, [rcx + rax*2]
dec r14d
test r9, r9
je 0x140038f82
inc ebx
movzx eax, byte [r8]
mov rcx, r8
mov r10, rdx
cmp al, 0x30
jge 0x140038f53
xorps xmm1, xmm1
test r9, r9
js 0x140038f9f
cvtsi2sd xmm1, r9
jmp 0x140038fb7
mov rcx, r9
shr rcx, 1
mov rax, r9
and eax, 1
or rcx, rax
cvtsi2sd xmm1, rcx
addsd xmm1, xmm1
mov r15b, 1
movzx ecx, byte [rdx]
cmp cl, 0x30
jl 0x14003902a
mov rax, rdx
mov r11, rdx
mov r10, rdx
movzx ecx, byte [r8]
nop
mov rdx, r10
cmp cl, 0x39
jg 0x14003902a
cmp ebx, 0x11
jge 0x14003900e
lea rdx, [rax + 1]
mov rcx, rdx
mov qword [rbp - 0x30], rdx
movsx eax, byte [rax]
sub eax, 0x30
movd xmm0, eax
cvtdq2pd xmm0, xmm0
mulsd xmm1, xmm2
addsd xmm0, xmm1
movaps xmm1, xmm0
dec r14d
comisd xmm0, xmm3
jbe 0x140039019
inc ebx
jmp 0x140039019
lea rdx, [r11 + 1]
mov rcx, rdx
mov qword [rbp - 0x30], rdx
mov rax, rdx
movzx ecx, byte [rcx]
mov r11, rdx
mov r10, rdx
cmp cl, 0x30
jge 0x140038fd0
cmp byte [rdx], 0x65
je 0x140039038
cmp byte [rdx], 0x45
jne 0x140039143
inc rdx
mov qword [rbp - 0x30], rdx
test r15b, r15b
jne 0x140039080
cmp byte [rbp + 0x58], sil
mov rcx, r9
jne 0x14003904f
mov ecx, edi
xorps xmm1, xmm1
test rcx, rcx
js 0x140039068
cvtsi2sd xmm1, rcx
jmp 0x14003907d
mov ecx, recv
jmp 0x140039255
mov rax, rcx
shr rax, 1
and ecx, 1
or rax, rcx
cvtsi2sd xmm1, rax
addsd xmm1, xmm1
mov r15b, 1
xor r11b, r11b
movzx ecx, byte [rdx]
cmp cl, 0x2b
je 0x140039093
cmp cl, 0x2d
jne 0x14003909d
mov r11b, 1
inc rdx
movzx ecx, byte [rdx]
mov qword [rbp - 0x30], rdx
lea eax, [rcx - 0x30]
cmp al, 9
ja 0x1400391cc
lea r8, [rdx + 1]
mov qword [rbp - 0x30], r8
movsx esi, cl
sub esi, 0x30
movzx r10d, byte [r8]
test r11b, r11b
je 0x140039177
lea ecx, [r14 + 0x7ffffff7]
mov eax, 0x66666667
imul ecx
mov r11d, edx
sar r11d, 2
mov eax, r11d
shr eax, 0x1f
add r11d, eax
cmp r10b, 0x30
jl 0x140039141
movzx eax, r10b
nop dword [rax + rax]
cmp al, 0x39
jg 0x140039141
lea rdx, [r8 + 1]
mov qword [rbp - 0x30], rdx
lea esi, [rsi + rsi*4]
movsx eax, byte [r8]
lea esi, [rsi - 0x18]
lea esi, [rax + rsi*2]
mov r8, rdx
cmp esi, r11d
jle 0x14003913a
movzx eax, byte [rdx]
cmp al, 0x30
jl 0x14003913a
mov rcx, rdx
nop dword [rax + rax]
cmp al, 0x39
ja 0x140039136
lea r8, [rcx + 1]
mov rdx, r8
movzx eax, byte [r8]
mov rcx, r8
cmp al, 0x30
jge 0x140039120
mov qword [rbp - 0x30], rdx
movzx eax, byte [rdx]
cmp al, 0x30
jge 0x1400390f0
neg esi
test r15b, r15b
je 0x1400391fb
lea edx, [rsi + r14]
movaps xmm0, xmm1
call fcn.140020980
comisd xmm0, xmmword [0x1403f37b8]
jbe 0x1400391e0
mov dword [r13 + 0x30], recv
mov r8, qword [rbp - 0x38]
mov qword [r13 + 0x38], r8
jmp 0x14003926c
mov edx, 0x134
sub edx, r14d
cmp r10b, 0x30
jl 0x140039143
movzx eax, r10b
nop dword [rax]
cmp al, 0x39
jg 0x140039143
movsx eax, byte [r8]
inc r8
mov qword [rbp - 0x30], r8
lea esi, [rsi + rsi*4]
lea esi, [rsi - 0x18]
lea esi, [rax + rsi*2]
cmp esi, edx
jg 0x1400391b6
movzx eax, byte [r8]
cmp al, 0x30
jge 0x140039190
jmp 0x140039143
lea rax, [r13 + 0x30]
lea rdx, [rax + 8]
mov ecx, recv
mov r8, qword [rbp - 0x38]
jmp 0x140039267
sub rdx, r12
mov dword [r13 + 0x30], reloc.WS2_32.dll_ntohs
mov qword [r13 + 0x38], rdx
jmp 0x14003926c
cmp byte [rbp - 0x40], 0
je 0x1400391ed
xorps xmm0, xmmword [0x1403f39a0]
movaps xmm1, xmm0
mov rcx, qword [rbp + 0x50]
call fcn.140022e80
jmp 0x14003923a
mov rcx, qword [rbp + 0x50]
cmp byte [rbp + 0x58], 0
je 0x140039222
cmp byte [rbp - 0x40], 0
je 0x140039218
neg r9
mov rdx, r9
call fcn.140022f70
jmp 0x14003923a
mov rdx, r9
call fcn.140022ee0
jmp 0x14003923a
cmp byte [rbp - 0x40], 0
je 0x140039233
neg edi
mov edx, edi
call fcn.140023080
jmp 0x14003923a
mov edx, edi
call fcn.140023020
test al, al
jne 0x14003926c
mov dword [r13 + 0x30], reloc.WS2_32.dll_recv
mov r8, qword [rbp - 0x38]
mov qword [r13 + 0x38], r8
jmp 0x14003926c
mov ecx, 3
lea rax, [r13 + 0x30]
mov edx, 8
mov r9, rax
sub r8, r12
add rdx, rax
mov dword [rax], ecx
mov qword [rdx], r8
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