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

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x30
and dword [ebp - 4], 0
push ebx
push esi
mov esi, dword [ebp + 0x10]
push edi
lea edi, [esi + 0x258]
mov dword [ebp - 0x1c], edi
mov ecx, dword [ebp - 4]
push 1
pop eax
shl eax, cl
test dword [ebp + 0x14], eax
je 0x6996d3
push 0
push 0
push ecx
push dword [ebp + 0xc]
call fcn.0069ae31
mov ebx, eax
test ebx, ebx
je 0x699795
cmp dword [edi + 0x88], ebx
je 0x699459
mov eax, dword [edi]
test eax, eax
je 0x699459
push eax
call dword [0x1001034]
and dword [edi + 0x88], 0
and dword [edi], 0
cmp dword [edi], 0
jne 0x699477
push ebx
push 0x40
call dword [0x1001004]
test eax, eax
mov dword [edi], eax
je 0x699795
mov dword [edi + 0x88], ebx
mov edi, dword [edi]
push ebx
push edi
push dword [ebp - 4]
push dword [ebp + 0xc]
call fcn.0069ae31
mov ecx, dword [edi + 8]
cmp ecx, 1
jbe 0x6994b8
mov edx, dword [edi + 0xc]
cmp edx, ebx
jae 0x6996e6
mov eax, dword [edi + 0x10]
cmp eax, ebx
jae 0x6996e6
cmp dword [edi + edx*4 + 0x18], ebx
jae 0x6996e6
cmp dword [edi + eax*4 + 0x18], ebx
jae 0x6996e6
movsx edx, word [esi + 8]
mov eax, 0x80
mov dword [ebp + 0x10], edx
cmp edx, eax
jbe 0x6994cb
mov dword [ebp + 0x10], eax
push 0xc
pop eax
cmp dword [ebp + 0x10], eax
jae 0x6994d6
mov dword [ebp + 0x10], eax
mov eax, dword [ebp + 0x10]
push 5
add eax, 0xfffffff9
xor edx, edx
pop ebx
div ebx
mov ebx, eax
cmp ebx, 9
jbe 0x6994ed
push 9
pop ebx
mov eax, ecx
xor edx, edx
div ebx
push 0x64
pop edx
add eax, 0xa
cmp eax, edx
mov dword [ebp - 0x10], eax
ja 0x699503
mov dword [ebp - 0x10], edx
cmp dword [edi + 4], 2
jne 0x6995c0
mov dword [ebp - 0x14], 1
mov dword [ebp - 0x18], 7
mov eax, dword [ebp - 0x10]
mov ecx, eax
shl ecx, 2
cmp dword [esi + 0x36c], ecx
mov dword [ebp - 0x10], ecx
je 0x699552
mov eax, dword [esi + 0x368]
lea ebx, [esi + 0x368]
test eax, eax
je 0x699552
push eax
call dword [0x1001034]
and dword [ebx], 0
and dword [esi + 0x36c], 0
mov ecx, dword [ebp - 0x10]
cmp dword [esi + 0x368], 0
jne 0x69957b
push ecx
push 0x40
call dword [0x1001004]
test eax, eax
mov dword [esi + 0x368], eax
je 0x699795
mov eax, dword [ebp - 0x10]
mov dword [esi + 0x36c], eax
xor eax, eax
cmp dword [ebp - 0x14], eax
je 0x6996f0
mov ecx, dword [esi + 0x368]
cmp dword [ebp + 0x18], eax
push 1
mov dword [ecx], eax
pop ecx
je 0x6995a6
mov eax, dword [edi + 0xc]
push 9
xor edx, edx
pop ebx
div ebx
mov dword [esi + 0x360], edx
mov ebx, dword [esi + 0x360]
cmp ebx, dword [edi + 8]
jae 0x6995e2
mov eax, dword [esi + 0x368]
mov dword [eax + ecx*4], ebx
inc ecx
add ebx, 9
jmp 0x6995ac
push 1
xor ebx, ebx
pop edx
mov dword [ebp - 0x14], ebx
cmp ecx, edx
jb 0x6995d6
lea edx, [edx + edx*4]
shl edx, 1
inc ebx
cmp edx, ecx
jbe 0x6995cc
lea eax, [ebx + ebx + 1]
mov dword [ebp - 0x18], eax
jmp 0x69951b
mov eax, dword [edi + 8]
cmp ebx, eax
jbe 0x6995eb
mov ebx, eax
mov eax, dword [esi + 0x368]
mov dword [eax + ecx*4], ebx
mov dword [esi + 0x364], ecx
mov ecx, dword [ebp + 0x10]
lea ebx, [ecx + ecx*2 + 4]
cmp dword [esi + 0x2dc], ebx
jae 0x699648
mov eax, dword [esi + 0x2d8]
test eax, eax
je 0x699628
push eax
call dword [0x1001034]
and dword [esi + 0x2d8], 0
and dword [esi + 0x2dc], 0
push ebx
push 0x40
call dword [0x1001004]
test eax, eax
mov dword [esi + 0x2d8], eax
je 0x699795
mov ecx, dword [ebp + 0x10]
mov dword [esi + 0x2dc], ebx
push dword [ebp - 0x14]
mov eax, dword [esi + 0x2d8]
lea edx, [ecx + ecx + 4]
push esi
mov dword [eax], edx
push dword [ebp - 0x18]
mov dword [ebp - 0x30], 0x4b425935
mov dword [ebp - 0x2c], ebx
mov dword [ebp - 0x28], eax
push ecx
mov ecx, eax
add ecx, dword [eax]
add eax, 4
push ecx
push eax
push edi
call fcn.006997c7
mov ebx, eax
mov eax, dword [esi + 0x368]
mov edi, ebx
mov dword [esi + 0x370], 1
shl edi, 2
push dword [eax + edi]
push dword [ebp - 4]
push 0x16
push dword [ebp + 0xc]
call fcn.0069ae2b
mov eax, dword [esi + 0x368]
mov ecx, dword [eax + ebx*4 + 4]
sub ecx, dword [edi + eax]
push ecx
push dword [ebp - 4]
push 0x17
push dword [ebp + 0xc]
call fcn.0069ae2b
lea eax, [ebp - 0x30]
and dword [esi + 0x370], 0
push eax
push dword [ebp + 8]
push dword [esi + 4]
call fcn.00696eb4
mov edi, dword [ebp - 0x1c]
inc dword [ebp - 4]
add edi, 4
cmp dword [ebp - 4], 0x20
mov dword [ebp - 0x1c], edi
jb 0x699412
push 1
pop eax
pop edi
pop esi
pop ebx
leave
ret 0x14
cmp dword [ebp + 0x18], eax
je 0x6996fb
mov dword [esi + 0x360], eax
mov eax, dword [esi + 0x368]
mov ecx, dword [esi + 0x360]
mov dword [ebp - 8], 1
mov dword [eax], ecx
mov eax, dword [edi + 0x18]
add eax, edi
push eax
call fcn.0069979c
push 1
add eax, 3
pop ebx
mov dword [ebp - 0xc], eax
cmp dword [edi + 8], ebx
jbe 0x69978d
mov eax, dword [ebp + 0x10]
sub eax, dword [ebp - 0x18]
mov dword [ebp - 0x20], eax
lea eax, [edi + 0x1c]
mov dword [ebp - 0x10], eax
mov ecx, dword [ebp - 0x10]
mov eax, edi
add eax, dword [ecx]
push eax
call fcn.0069979c
mov ecx, dword [ebp - 0xc]
mov dword [ebp - 0x24], eax
lea ecx, [ecx + eax + 3]
cmp ecx, dword [ebp - 0x20]
mov dword [ebp - 0xc], ecx
ja 0x69976e
mov eax, dword [esi + 0x368]
mov edx, dword [ebp - 8]
mov ecx, ebx
sub ecx, dword [eax + edx*4 - 4]
cmp ecx, 9
jb 0x699783
mov eax, dword [ebp - 0x24]
mov edx, dword [ebp - 8]
mov ecx, dword [esi + 0x368]
inc dword [ebp - 8]
add eax, 3
mov dword [ecx + edx*4], ebx
mov dword [ebp - 0xc], eax
add dword [ebp - 0x10], 4
inc ebx
cmp ebx, dword [edi + 8]
jb 0x699738
mov ecx, dword [ebp - 8]
jmp 0x6995eb
xor eax, eax
jmp 0x6996e9