Function at 0x18009fd60
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 0x18009fdc9
mov rcx, rbx
call fcn.18009e360
mov rdx, qword [rbx + 0x28]
mov r13b, 1
mov rcx, qword [rsp + 0xb0]
movzx edi, byte [rdx]
jmp 0x18009fdcc
xor r13b, r13b
movsd xmm7, qword [0x1804876c8]
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 0x18009fe12
mov rcx, rbx
mov r14d, ebp
call fcn.18009e360
mov rdx, qword [rbx + 0x28]
xor r12b, r12b
jmp 0x18009ff9d
lea eax, [rdi - 0x31]
cmp al, 8
ja 0x1800a0427
mov rcx, rbx
call fcn.18009e360
mov rax, qword [rbx + 0x28]
movsx r14d, dil
sub r14d, 0x30
movzx edi, byte [rax]
test r13b, r13b
je 0x18009fe88
cmp dil, 0x30
jl 0x18009fedc
cmp dil, 0x39
ja 0x18009fedc
cmp r14d, 0xccccccc
jb 0x18009fe5e
jne 0x18009fed1
cmp dil, 0x38
ja 0x18009fed1
mov rcx, rbx
call fcn.18009e360
movzx 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 0x18009fe43
jmp 0x18009fedc
cmp dil, 0x30
jl 0x18009fedc
nop
cmp dil, 0x39
ja 0x18009fedc
cmp r14d, 0x19999999
jb 0x18009fea7
jne 0x18009fed1
cmp dil, 0x35
ja 0x18009fed1
mov rcx, rbx
call fcn.18009e360
movzx 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 0x18009fe90
jmp 0x18009fedc
mov byte [rsp + 0xb8], 1
mov esi, r14d
xor r12b, r12b
mov rdx, rax
cmp byte [rsp + 0xb8], bpl
je 0x18009ff52
movzx ecx, byte [rax]
test r13b, r13b
je 0x1800a008e
cmp cl, 0x30
jl 0x18009ff52
movzx edi, cl
movabs r13, 0xccccccccccccccc
nop word [rax + rax]
cmp dil, 0x39
ja 0x18009ff52
cmp rsi, r13
jb 0x18009ff2b
jne 0x1800a0059
cmp dil, 0x38
ja 0x1800a0059
mov rcx, rbx
call fcn.18009e360
mov rdx, qword [rbx + 0x28]
lea rax, [rsi + rsi*4]
movzx ecx, dil
inc r15d
sub ecx, 0x30
movzx edi, byte [rdx]
lea rsi, [rcx + rax*2]
cmp dil, 0x30
jge 0x18009ff10
mov rax, rdx
test r12b, r12b
je 0x18009ff9d
cmp byte [rax], 0x30
mov rdx, rax
jl 0x18009ff9d
movzx edi, byte [rax]
mov rdx, rax
cmp dil, 0x39
ja 0x18009ff9d
mov rcx, rbx
call fcn.18009e360
mov rdx, qword [rbx + 0x28]
movzx eax, dil
sub eax, 0x30
mulsd xmm6, xmm7
movzx edi, byte [rdx]
movd xmm0, eax
mov rax, rdx
cvtdq2pd xmm0, xmm0
addsd xmm6, xmm0
cmp dil, 0x30
jge 0x18009ff65
cmp byte [rdx], 0x2e
mov r13d, ebp
jne 0x1800a0143
mov rcx, rbx
call fcn.18009e360
mov rcx, qword [rbx + 0x28]
movzx edi, byte [rcx]
lea eax, [rdi - 0x30]
cmp al, 9
ja 0x1800a01e3
test r12b, r12b
jne 0x1800a0189
cmp byte [rsp + 0xb8], bpl
mov r8, rcx
mov eax, r14d
movabs r12, 0x1fffffffffffff
cmovne rax, rsi
mov rsi, rax
nop dword [rax + rax]
mov r9, rcx
mov rdx, r8
cmp dil, 0x39
ja 0x1800a003f
cmp rsi, r12
ja 0x1800a003f
mov rcx, rbx
call fcn.18009e360
movzx 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 0x18009fff0
movzx edi, byte [r9]
xorps xmm6, xmm6
test rsi, rsi
js 0x1800a0122
cvtsi2sd xmm6, rsi
jmp 0x1800a013a
xorps xmm6, xmm6
test rsi, rsi
js 0x1800a006e
cvtsi2sd xmm6, rsi
mov r12b, 1
jmp 0x18009ff52
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 0x18009ff52
cmp cl, 0x30
jl 0x18009ff52
movzx edi, cl
movabs r13, 0x1999999999999999
cmp dil, 0x39
jg 0x18009ff52
cmp rsi, r13
jb 0x1800a00bb
jne 0x1800a00e7
cmp dil, 0x35
jg 0x1800a00e7
mov rcx, rbx
call fcn.18009e360
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 0x1800a00a4
jmp 0x18009ff9d
xorps xmm6, xmm6
test rsi, rsi
js 0x1800a00ff
cvtsi2sd xmm6, rsi
mov r12b, 1
mov rax, rdx
jmp 0x18009ff5a
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 0x18009ff5a
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 0x1800a0190
movzx eax, byte [rdx]
sub al, 0x45
test al, 0xdf
jne 0x1800a02f8
mov rcx, rbx
call fcn.18009e360
test r12b, r12b
jne 0x1800a021e
cmp byte [rsp + 0xb8], bpl
mov rcx, rsi
mov eax, r14d
xorps xmm6, xmm6
cmove rcx, rax
test rcx, rcx
js 0x1800a0206
cvtsi2sd xmm6, rcx
jmp 0x1800a021b
mov rdx, rcx
nop dword [rax]
cmp dil, 0x39
jg 0x1800a0143
cmp r15d, 0x11
jge 0x1800a01c9
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.18009e360
mov rdx, qword [rbx + 0x28]
movzx edi, byte [rdx]
cmp dil, 0x30
jge 0x1800a0190
jmp 0x1800a0143
mov rax, qword [rbx + 0x38]
sub rax, qword [rbx + 0x10]
mov rdx, qword [rsp + 0xb0]
add rax, rcx
mov qword [rdx + 0x38], rax
mov dword [rdx + 0x30], send
jmp 0x1800a043a
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 0x1800a0238
mov rcx, rbx
call fcn.18009e360
jmp 0x1800a0249
cmp dil, 0x2d
jne 0x1800a0250
mov rcx, rbx
call fcn.18009e360
mov r15b, 1
mov rcx, qword [rbx + 0x28]
movzx edi, byte [rcx]
lea eax, [rdi - 0x30]
cmp al, 9
ja 0x1800a0374
mov rcx, rbx
call fcn.18009e360
mov rax, qword [rbx + 0x28]
movsx ebp, dil
sub ebp, 0x30
movzx edi, byte [rax]
test r15b, r15b
je 0x1800a0335
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 0x1800a02f6
nop
cmp dil, 0x39
ja 0x1800a02f6
mov rcx, rbx
call fcn.18009e360
lea ebp, [rbp + rbp*4]
movzx eax, dil
lea ebp, [rbp - 0x18]
lea ebp, [rax + rbp*2]
cmp ebp, r15d
jle 0x1800a02e9
mov rax, qword [rbx + 0x28]
movzx ecx, byte [rax]
cmp cl, 0x30
jl 0x1800a02e9
nop dword [rax]
cmp cl, 0x39
ja 0x1800a02e9
mov rcx, rbx
call fcn.18009e360
mov rax, qword [rbx + 0x28]
movzx ecx, byte [rax]
cmp cl, 0x30
jge 0x1800a02d0
mov rax, qword [rbx + 0x28]
movzx edi, byte [rax]
cmp dil, 0x30
jge 0x1800a02a0
neg ebp
test r12b, r12b
je 0x1800a03b7
mov edx, ebp
movaps xmm0, xmm6
add edx, r13d
call fcn.180020cb0
comisd xmm0, xmmword [0x180487750]
jbe 0x1800a0394
mov rdx, qword [rsp + 0xb0]
mov rax, qword [rsp + 0x20]
mov dword [rdx + 0x30], send
mov qword [rdx + 0x38], rax
jmp 0x1800a043a
mov r15d, 0x134
sub r15d, r13d
cmp dil, 0x30
jl 0x1800a02f8
cmp dil, 0x39
ja 0x1800a02f8
mov rcx, rbx
call fcn.18009e360
lea ebp, [rbp + rbp*4]
movzx eax, dil
lea ebp, [rbp - 0x18]
lea ebp, [rax + rbp*2]
cmp ebp, r15d
jg 0x1800a0318
mov rax, qword [rbx + 0x28]
movzx edi, byte [rax]
cmp dil, 0x30
jge 0x1800a0344
jmp 0x1800a02f8
sub rcx, qword [rbx + 0x10]
mov rdx, qword [rsp + 0xb0]
add rcx, qword [rbx + 0x38]
mov dword [rdx + 0x30], send
mov qword [rdx + 0x38], rcx
jmp 0x1800a043a
cmp byte [rsp + 0xc8], 0
je 0x1800a03a5
xorps xmm0, xmmword [0x180487990]
mov rcx, qword [rsp + 0xc0]
movaps xmm1, xmm0
call fcn.180024840
jmp 0x1800a0409
cmp byte [rsp + 0xb8], 0
mov rcx, qword [rsp + 0xc0]
je 0x1800a03ea
cmp byte [rsp + 0xc8], 0
je 0x1800a03e0
neg rsi
mov rdx, rsi
call fcn.180024930
jmp 0x1800a0409
mov rdx, rsi
call fcn.1800248a0
jmp 0x1800a0409
cmp byte [rsp + 0xc8], 0
je 0x1800a0401
neg r14d
mov edx, r14d
call fcn.1800249f0
jmp 0x1800a0409
mov edx, r14d
call fcn.180024980
test al, al
jne 0x1800a043a
mov rdx, qword [rsp + 0xb0]
mov rax, qword [rsp + 0x20]
mov dword [rdx + 0x30], reloc.WS2_32.dll_recv
mov qword [rdx + 0x38], rax
jmp 0x1800a043a
sub rdx, qword [rbx + 0x10]
add rdx, qword [rbx + 0x38]
mov qword [rcx + 0x38], rdx
mov dword [rcx + 0x30], 3
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