Function at 0x40a3d7
Capabilities:
Parse credit card information

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x20
push ebx
push edi
mov edi, dword [ebp + 8]
mov byte [ebp - 1], 0
test edi, edi
je 0x40a61f
cmp dword [ebp + 0xc], 0
je 0x40a61f
mov ecx, edi
call fcn.0042cc16
mov ebx, eax
mov dword [ebp - 8], ebx
test ebx, ebx
je 0x40a61f
push esi
lea esi, [ebx + 1]
mov eax, esi
call fcn.0042c055
mov edx, eax
mov dword [ebp - 0x14], edx
test edx, edx
je 0x40a4a9
push esi
push edx
call fcn.0042c126
xor esi, esi
test ebx, ebx
je 0x40a499
mov dword [ebp + 8], edx
mov bl, byte [esi + edi]
cmp bl, 0x25
jne 0x40a48b
mov al, byte [esi + edi + 1]
or cl, 0xff
or dl, 0xff
cmp al, 0x41
jl 0x40a451
cmp al, 0x46
jg 0x40a451
lea ecx, [eax - 0x37]
cmp al, 0x30
jl 0x40a45d
cmp al, 0x39
jg 0x40a45d
sub al, 0x30
mov cl, al
mov al, byte [esi + edi + 2]
cmp al, 0x41
jl 0x40a46c
cmp al, 0x46
jg 0x40a46c
lea edx, [eax - 0x37]
cmp al, 0x30
jl 0x40a477
cmp al, 0x39
jg 0x40a477
lea edx, [eax - 0x30]
cmp cl, 0xff
je 0x40a48b
cmp dl, 0xff
je 0x40a48b
shl cl, 4
or cl, dl
mov bl, cl
add esi, 2
mov eax, dword [ebp + 8]
inc dword [ebp + 8]
inc esi
mov byte [eax], bl
cmp esi, dword [ebp - 8]
jb 0x40a434
mov ecx, dword [ebp - 0x14]
mov dword [ebp + 8], ecx
call fcn.0042cc16
mov dword [ebp - 8], eax
mov edi, ecx
mov ebx, dword [ebp + 0xc]
push 0xc
push 0
push ebx
call fcn.0042c138
push edi
call fcn.0042cdb2
mov esi, eax
test esi, esi
je 0x40a4f0
inc esi
mov ecx, esi
call fcn.0042cc16
mov edi, eax
mov dl, 0x3f
mov eax, esi
mov dword [ebp + 8], esi
mov dword [ebp - 8], edi
call fcn.0042cd9e
test eax, eax
je 0x40a4e3
sub eax, esi
mov edi, eax
push esi
mov eax, edi
call fcn.0042c4e3
mov edi, dword [ebp + 8]
mov dword [ebx], eax
mov eax, dword [ebp - 8]
test eax, eax
je 0x40a60b
xor esi, esi
inc esi
mov edx, edi
sub esi, edi
mov dword [ebp - 0x18], edx
mov dword [ebp - 0x20], esi
mov dword [ebp - 0x1c], eax
jmp 0x40a510
mov esi, dword [ebp - 0x20]
mov al, byte [edx]
cmp al, 0x3f
je 0x40a51e
cmp al, 0x26
jne 0x40a5fb
xor ebx, ebx
and dword [ebp - 0x10], ebx
lea eax, [edx + esi]
xor edi, edi
mov dword [ebp - 0xc], ebx
cmp eax, dword [ebp - 8]
jae 0x40a5fb
inc edx
mov cl, byte [edx]
cmp cl, 0x3f
je 0x40a57a
cmp cl, 0x26
je 0x40a57a
cmp cl, 0x3d
jne 0x40a562
test edi, edi
je 0x40a5fb
cmp dword [ebp - 0xc], 0
je 0x40a57a
test ebx, ebx
jne 0x40a57a
cmp dword [ebp - 0x10], ebx
jne 0x40a57a
lea ebx, [esi + edx]
jmp 0x40a573
test edi, edi
cmove edi, eax
test ebx, ebx
jne 0x40a570
inc dword [ebp - 0xc]
jmp 0x40a573
inc dword [ebp - 0x10]
inc eax
inc edx
cmp eax, dword [ebp - 8]
jb 0x40a535
test edi, edi
je 0x40a5fb
cmp dword [ebp - 0xc], 0
je 0x40a5fb
mov esi, dword [ebp + 0xc]
inc dword [esi + 8]
mov eax, dword [esi + 8]
add esi, 4
shl eax, 3
call fcn.0042c000
test al, al
je 0x40a5fb
add edi, dword [ebp + 8]
mov eax, dword [ebp - 0xc]
push edi
call fcn.0042c4e3
mov ecx, dword [ebp + 0xc]
mov edx, dword [ecx + 8]
mov edi, dword [esi]
mov dword [edi + edx*8 - 8], eax
mov eax, dword [ecx + 8]
mov ecx, dword [esi]
lea eax, [ecx + eax*8]
cmp dword [eax - 8], 0
je 0x40a5fb
xor edi, edi
cmp ebx, edi
je 0x40a5f4
cmp dword [ebp - 0x10], edi
je 0x40a5f4
add ebx, dword [ebp + 8]
mov eax, dword [ebp - 0x10]
push ebx
call fcn.0042c4e3
mov ecx, dword [ebp + 0xc]
mov edx, dword [ecx + 8]
mov ebx, dword [esi]
mov dword [ebx + edx*8 - 4], eax
mov eax, dword [ecx + 8]
mov ecx, dword [esi]
cmp dword [ecx + eax*8 - 4], edi
setne byte [ebp - 1]
jmp 0x40a5fb
mov dword [eax - 4], edi
mov byte [ebp - 1], 1
mov edx, dword [ebp - 0x18]
inc edx
dec dword [ebp - 0x1c]
mov dword [ebp - 0x18], edx
jne 0x40a50d
cmp dword [ebp - 0x14], 0
pop esi
je 0x40a61a
push dword [ebp - 0x14]
call fcn.0042c085
mov al, byte [ebp - 1]
jmp 0x40a621
xor al, al
pop edi
pop ebx
leave
ret 8