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

Disassembly:
push ebp
mov ebp, esp
push edi
push esi
push ebx
sub esp, 0x24c
mov esi, dword [ebp + 8]
mov edi, dword [ebp + 0xc]
test esi, esi
jle 0x41dec9
mov al, byte [edi + 4]
lea edx, [eax - 0x2b]
and dl, 0xfd
jne 0x41dec9
fld1
cmp al, 0x2d
mov byte [ebp - 0x231], 1
mov ebx, 1
fchs
fld1
fcmove st(0), st(1)
fstp st(1)
jmp 0x41ded4
mov byte [ebp - 0x231], 0
fld1
xor ebx, ebx
lea edx, [ebx + 2]
cmp esi, edx
jle 0x41df69
mov al, byte [ebx + edi + 4]
and eax, 0xffffffdf
cmp al, 0x4e
je 0x41def7
cmp al, 0x49
jne 0x41dfd0
jmp 0x41df79
fstp st(0)
mov al, byte [ebx + edi + 5]
and eax, 0xffffffdf
cmp al, 0x41
jne 0x41e46d
mov al, byte [edx + edi + 4]
and eax, 0xffffffdf
cmp al, 0x4e
jne 0x41e46d
add ebx, 3
cmp esi, ebx
jle 0x41df47
mov al, byte [ebx + edi + 4]
mov edx, eax
and edx, 0xffffffdf
sub edx, 0x41
cmp dl, 0x19
jbe 0x41e46d
lea edx, [eax - 0x30]
cmp dl, 9
jbe 0x41e46d
cmp al, 0x5f
je 0x41e46d
fld qword [0x438410]
mov eax, dword [ebp + 0x10]
fmul st(0)
fstp dword [ebp - 0x220]
fld dword [ebp - 0x220]
fldz
fmulp st(1)
fstp qword [eax]
jmp 0x41e485
mov dword [ebp - 0x224], 0xffffffff
cmp esi, ebx
jg 0x41dfd0
jmp 0x41dff0
mov al, byte [ebx + edi + 5]
and eax, 0xffffffdf
cmp al, 0x4e
jne 0x41e453
mov al, byte [edx + edi + 4]
and eax, 0xffffffdf
cmp al, 0x46
jne 0x41e457
add ebx, 3
cmp esi, ebx
jle 0x41dfc7
mov al, byte [ebx + edi + 4]
mov edx, eax
and edx, 0xffffffdf
sub edx, 0x41
cmp dl, 0x19
jbe 0x41e45b
lea edx, [eax - 0x30]
cmp dl, 9
jbe 0x41e45f
cmp al, 0x5f
je 0x41e463
fld1
fldz
jmp 0x41e296
mov dword [ebp - 0x224], 0xffffffff
movzx eax, byte [ebx + edi + 4]
lea edx, [eax - 0x30]
cmp dl, 9
ja 0x41dff0
sub eax, 0x30
mov dword [ebp - 0x224], eax
mov dword [ebp - 0x230], 0
mov dword [ebp - 0x220], 0
mov dword [ebp - 0x21c], 0
cmp esi, ebx
jle 0x41e197
mov cl, byte [edi + ebx + 4]
lea eax, [ecx - 0x30]
cmp al, 9
ja 0x41e084
imul eax, dword [ebp - 0x21c], 0xa
inc dword [ebp - 0x230]
mov dword [ebp - 0x228], eax
mov eax, 0xa
mul dword [ebp - 0x220]
mov dword [ebp - 0x21c], edx
mov dword [ebp - 0x220], eax
mov eax, dword [ebp - 0x228]
add dword [ebp - 0x21c], eax
movzx eax, cl
sub eax, 0x30
cdq
add eax, dword [ebp - 0x220]
adc edx, dword [ebp - 0x21c]
mov dword [ebp - 0x220], eax
mov dword [ebp - 0x21c], edx
inc ebx
cmp esi, ebx
je 0x41e00e
cmp byte [edi + ebx + 4], 0x5f
je 0x41e076
jmp 0x41e00e
cmp cl, 0x2e
jne 0x41e197
inc ebx
cmp dword [ebp - 0x230], 0
jne 0x41e0b9
xor edx, edx
mov eax, edx
cmp esi, ebx
jle 0x41e0bb
cmp byte [edi + ebx + 4], 0x30
jne 0x41e471
inc edx
inc ebx
cmp esi, ebx
je 0x41e099
cmp byte [edi + ebx + 4], 0x5f
je 0x41e0ab
jmp 0x41e099
xor eax, eax
cmp dword [ebp - 0x224], 0xffffffff
jne 0x41e0e8
cmp esi, ebx
jle 0x41e0e8
mov dword [ebp - 0x224], 0xffffffff
movzx edx, byte [ebx + edi + 4]
lea ecx, [edx - 0x30]
cmp cl, 9
ja 0x41e0e8
lea ecx, [edx - 0x30]
mov dword [ebp - 0x224], ecx
mov dword [ebp - 0x238], eax
mov dword [ebp - 0x23c], 0
mov eax, dword [ebp - 0x238]
mov dword [ebp - 0x228], eax
mov eax, dword [ebp - 0x23c]
mov dword [ebp - 0x22c], eax
cmp esi, ebx
jle 0x41e1ab
mov cl, byte [edi + ebx + 4]
lea eax, [ecx - 0x30]
cmp al, 9
ja 0x41e1ab
imul eax, dword [ebp - 0x21c], 0xa
inc dword [ebp - 0x23c]
inc dword [ebp - 0x238]
mov dword [ebp - 0x228], eax
mov eax, 0xa
mul dword [ebp - 0x220]
mov dword [ebp - 0x21c], edx
mov dword [ebp - 0x220], eax
mov eax, dword [ebp - 0x228]
add dword [ebp - 0x21c], eax
movzx eax, cl
sub eax, 0x30
cdq
add eax, dword [ebp - 0x220]
adc edx, dword [ebp - 0x21c]
mov dword [ebp - 0x220], eax
mov dword [ebp - 0x21c], edx
inc ebx
cmp esi, ebx
je 0x41e0f8
cmp byte [edi + ebx + 4], 0x5f
je 0x41e182
jmp 0x41e0f8
mov dword [ebp - 0x228], 0
mov dword [ebp - 0x22c], 0
mov eax, dword [ebp - 0x230]
add eax, dword [ebp - 0x22c]
mov dword [ebp - 0x238], eax
jne 0x41e1d9
test ebx, ebx
je 0x41e483
cmp ebx, 1
jne 0x41e1d9
cmp byte [ebp - 0x231], 0
jne 0x41e467
lea edx, [ebx + 1]
cmp esi, edx
jle 0x41e250
mov al, byte [ebx + edi + 4]
and eax, 0xffffffdf
cmp al, 0x45
jne 0x41e250
mov al, byte [edx + edi + 4]
cmp al, 0x2b
je 0x41e1fc
cmp al, 0x2d
jne 0x41e206
or edx, 0xffffffff
jmp 0x41e201
mov edx, 1
add ebx, 2
jmp 0x41e20d
mov ebx, edx
mov edx, 1
mov al, byte [ebx + edi + 4]
sub eax, 0x30
cmp al, 9
ja 0x41e46b
xor eax, eax
cmp esi, ebx
jle 0x41e257
mov cl, byte [edi + ebx + 4]
mov byte [ebp - 0x231], cl
sub ecx, 0x30
cmp cl, 9
ja 0x41e257
imul eax, eax, 0xa
movzx ecx, byte [ebp - 0x231]
lea eax, [eax + ecx - 0x30]
inc ebx
cmp esi, ebx
je 0x41e21e
cmp byte [edi + ebx + 4], 0x5f
je 0x41e242
jmp 0x41e21e
mov edx, 1
xor eax, eax
imul eax, edx
sub eax, dword [ebp - 0x228]
mov esi, eax
sar eax, 0x1f
mov ecx, eax
xor ecx, esi
mov dword [ebp - 0x228], ecx
sub dword [ebp - 0x228], eax
cmp dword [ebp - 0x228], 0x3e7
jg 0x41e28c
cmp dword [ebp - 0x238], 0xf
jg 0x41e2a4
jmp 0x41e2be
test esi, esi
fldz
js 0x41e29d
fld1
fxch st(1)
fdivp st(1)
jmp 0x41e31e
fmulp st(1)
jmp 0x41e41a
cmp dword [ebp - 0x238], 0x10
jne 0x41e36e
cmp dword [ebp - 0x224], 9
je 0x41e372
cmp dword [ebp - 0x228], 0x16
jle 0x41e2ea
mov edx, 0xf
sub edx, dword [ebp - 0x230]
sub edx, dword [ebp - 0x22c]
lea eax, [edx + 0x16]
cmp dword [ebp - 0x228], eax
jle 0x41e32c
fstp st(0)
jmp 0x41e378
fild qword [ebp - 0x220]
cmp dword [ebp - 0x21c], 0
jns 0x41e2ff
fadd dword [0x438418]
fstp qword [ebp - 0x220]
fld qword [ebp - 0x220]
mov eax, dword [ebp - 0x228]
fmulp st(1)
fld qword [eax*8 + 0x4380c0]
test esi, esi
js 0x41e325
fmulp st(1)
jmp 0x41e41a
fdivp st(1)
jmp 0x41e41a
test esi, esi
js 0x41e376
fild qword [ebp - 0x220]
cmp dword [ebp - 0x21c], 0
jns 0x41e345
fadd dword [0x438418]
mov eax, dword [ebp - 0x228]
fstp qword [ebp - 0x220]
fld qword [ebp - 0x220]
sub eax, edx
fmulp st(1)
fmul qword [edx*8 + 0x4380c0]
fmul qword [eax*8 + 0x4380c0]
jmp 0x41e41a
fstp st(0)
jmp 0x41e378
fstp st(0)
jmp 0x41e378
fstp st(0)
mov edx, 0x1f4
lea eax, [ebp - 0x20c]
call fcn.00401950
xor ecx, ecx
test ebx, ebx
je 0x41e3bb
xor eax, eax
cmp byte [edi + 4], 0x2e
sete al
cmp ebx, eax
jle 0x41e3bb
mov dl, byte [edi + eax + 4]
mov byte [ebp - 0x220], dl
sub edx, 0x2b
and dl, 0xfd
je 0x41e421
mov dl, byte [ebp - 0x220]
sub edx, 0x30
cmp dl, 9
jbe 0x41e421
mov eax, esi
mov esi, 0xa
mov dword [esp + 4], 0
sar eax, 0x1f
mov byte [ebp + ecx - 0x20c], 0x45
and eax, 2
add eax, 0x2b
mov byte [ebp + ecx - 0x20b], al
mov eax, dword [ebp - 0x228]
cdq
idiv esi
add edx, 0x30
mov byte [ebp + ecx - 0x208], dl
cdq
idiv esi
add eax, 0x30
add edx, 0x30
mov byte [ebp + ecx - 0x20a], al
lea eax, [ebp - 0x20c]
mov dword [esp], eax
mov byte [ebp + ecx - 0x209], dl
call fcn.00422a60
mov eax, dword [ebp + 0x10]
fstp qword [eax]
jmp 0x41e485
cmp ecx, 0x1ed
jg 0x41e437
mov dl, byte [ebp - 0x220]
mov byte [ebp + ecx - 0x20c], dl
inc ecx
inc eax
cmp ebx, eax
je 0x41e397
mov dl, byte [edi + eax + 4]
cmp dl, 0x2e
je 0x41e437
cmp dl, 0x5f
je 0x41e437
jmp 0x41e397
fstp st(0)
jmp 0x41e46d
fstp st(0)
jmp 0x41e46d
fstp st(0)
jmp 0x41e46d
fstp st(0)
jmp 0x41e46d
fstp st(0)
jmp 0x41e46d
fstp st(0)
jmp 0x41e46d
fstp st(0)
xor ebx, ebx
jmp 0x41e485
cmp dword [ebp - 0x224], 0xffffffff
jne 0x41e0e8
jmp 0x41e0c8
fstp st(0)
add esp, 0x24c
mov eax, ebx
pop ebx
pop esi
pop edi
pop ebp
ret 0x10