Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
add unit tests for credit cards
  • Loading branch information
Josh Lavin committed Jul 20, 2016
1 parent 0b33817 commit 46d36ed
Showing 1 changed file with 58 additions and 0 deletions.
58 changes: 58 additions & 0 deletions t/credit_cards.t
@@ -0,0 +1,58 @@
use strict;
use warnings;
use lib 'lib';
use Test::More;
use Vend::Order;

is( Vend::Order::guess_cc_type(''), '', 'credit card: blank' );

is( Vend::Order::guess_cc_type('4123456789012'), 'visa', 'credit card: visa 12' );
is( Vend::Order::guess_cc_type('4123456789012345'), 'visa', 'credit card: visa 15' );

is( Vend::Order::guess_cc_type('5123456789012345'), 'mc', 'credit card: mc, 1 then 14' );
is( Vend::Order::guess_cc_type('2221001234567890'), 'mc', 'credit card: mc BIN 2, 5 then 10 #1' );
is( Vend::Order::guess_cc_type('2720991234567890'), 'mc', 'credit card: mc BIN 2, 5 then 10 #2' );
is( Vend::Order::guess_cc_type('2700991234567890'), 'mc', 'credit card: mc BIN 2, 5 then 10 #3' );

is( Vend::Order::guess_cc_type('3001234567890112'), 'discover', 'credit card: discover diners club 300' );
is( Vend::Order::guess_cc_type('3095123456789012'), 'discover', 'credit card: discover diners club 3095' );
is( Vend::Order::guess_cc_type('3612345678901212'), 'discover', 'credit card: discover diners club 36' );
is( Vend::Order::guess_cc_type('6011123456789012'), 'discover', 'credit card: discover 6011' );
is( Vend::Order::guess_cc_type('6441234567890123'), 'discover', 'credit card: discover 644' );
is( Vend::Order::guess_cc_type('6512345678901234'), 'discover', 'credit card: discover 65' );
is( Vend::Order::guess_cc_type('6221234567890123'), 'discover', 'credit card: discover chinaunionpay 622, no country' );
is( Vend::Order::guess_cc_type('6251234567890123'), 'discover', 'credit card: discover chinaunionpay 625, no country' );
# not setting Values to test country

is( Vend::Order::guess_cc_type('341234567890123'), 'amex', 'credit card: amex 34' );
is( Vend::Order::guess_cc_type('371234567890123'), 'amex', 'credit card: amex 37' );

# defunct
#is( Vend::Order::guess_cc_type('36123456789012'), 'dinersclub', 'credit card: dinersclub 36' );
#is( Vend::Order::guess_cc_type('30012345678901'), 'dinersclub', 'credit card: dinersclub 300' );
#is( Vend::Order::guess_cc_type('38123456789012'), 'carteblanche', 'credit card: carteblanche' );

is( Vend::Order::guess_cc_type('201412345678901'), 'enroute', 'credit card: enroute 2014' );
is( Vend::Order::guess_cc_type('214912345678901'), 'enroute', 'credit card: enroute 2149' );

is( Vend::Order::guess_cc_type('3123456789012345'), 'jcb', 'credit card: jcb' );
is( Vend::Order::guess_cc_type('3213112345678901'), 'jcb', 'credit card: jcb 32131' );
is( Vend::Order::guess_cc_type('3180012345678901'), 'jcb', 'credit card: jcb 31800' );

is( Vend::Order::guess_cc_type('4903020123456789012'), 'switch', 'credit card: switch' );
is( Vend::Order::guess_cc_type('564182123456789012'), 'switch', 'credit card: switch 564182' );
is( Vend::Order::guess_cc_type('633300123456789012'), 'switch', 'credit card: switch 63300' );
is( Vend::Order::guess_cc_type('675900123456789012'), 'switch', 'credit card: switch 675900' );

is( Vend::Order::guess_cc_type('5610001234567890'), 'bankcard', 'credit card: bankcard 5610' );
is( Vend::Order::guess_cc_type('5602211234567890'), 'bankcard', 'credit card: bankcard 56022' );

is( Vend::Order::guess_cc_type('633450123456789012'), 'solo', 'credit card: solo 633450' );
is( Vend::Order::guess_cc_type('676700123456789012'), 'solo', 'credit card: solo 676700' );

is( Vend::Order::guess_cc_type('630409123456789012'), 'laser', 'credit card: laser 630409' );
is( Vend::Order::guess_cc_type('6771123456789012'), 'laser', 'credit card: laser 6771' );

is( Vend::Order::guess_cc_type('123'), 'other', 'credit card: other' );

done_testing();

0 comments on commit 46d36ed

Please sign in to comment.