php - SMsoft - informatica e dintorni

Codice per validare le carte di credito

29 Aprile 2009 di admin

Riporto di seguito un script php, reperito dal sito sastgroup, utile per validare le carte di credito:

< ?
if( checkCreditCard ("40236007878787", "Visa", &$errornumber, &$errortext))
echo "OK";
else echo"MO";
function checkCreditCard ($cardnumber, $cardname, &$errornumber, &$errortext) {
$cards = array ( array ('name' => 'American Express',
'length' => '15',
'prefixes' => '34,37',
'checkdigit' => true
),
array ('name' => 'Carte Blanche',
'length' => '14',
'prefixes' => '300,301,302,303,304,305,36,38',
'checkdigit' => true
),
array ('name' => 'Diners Club',
'length' => '14',
'prefixes' => '300,301,302,303,304,305,36,38',
'checkdigit' => true
),
array ('name' => 'Discover',
'length' => '16',
'prefixes' => '6011',
'checkdigit' => true
),
array ('name' => 'Enroute',
'length' => '15',
'prefixes' => '2014,2149',
'checkdigit' => true
),
array ('name' => 'JCB',
'length' => '15,16',
'prefixes' => '3,1800,2131',
'checkdigit' => true
),
array ('name' => 'Maestro',
'length' => '16,18',
'prefixes' => '5020,6',
'checkdigit' => true
),
array ('name' => 'MasterCard',
'length' => '16',
'prefixes' => '51,52,53,54,55',
'checkdigit' => true
),
array ('name' => 'Solo',
'length' => '16,18,19',
'prefixes' => '6334,6767',
'checkdigit' => true
),
array ('name' => 'Switch',
'length' => '16,18,19',
'prefixes' => '4903,4905,4911,4936,564182,633110,6333,6759',
'checkdigit' => true
),
array ('name' => 'Visa',
'length' => '13,16',
'prefixes' => '4',
'checkdigit' => true
),
array ('name' => 'Visa Electron',
'length' => '16',
'prefixes' => '417500,4917,4913',
'checkdigit' => true
)
);
$ccErrorNo = 0;
$ccErrors [0] = "Unknown card type";
$ccErrors [1] = "No card number provided";
$ccErrors [2] = "Credit card number has invalid format";
$ccErrors [3] = "Credit card number is invalid";
$ccErrors [4] = "Credit card number is wrong length";
// Establish card type
$cardType = -1;
for ($i=0; $i
// See if it is this card (ignoring the case of the string)
if (strtolower($cardname) == strtolower($cards[$i]['name'])) {
$cardType = $i;
break;
}
}
// If card type not found, report an error
if ($cardType == -1) {
$errornumber = 0;
$errortext = $ccErrors [$errornumber];
return false;
}
// Ensure that the user has provided a credit card number
if (strlen($cardnumber) == 0) {
$errornumber = 1;
$errortext = $ccErrors [$errornumber];
return false;
}
// Remove any spaces from the credit card number
$cardNo = str_replace (' ', '', $cardnumber);
// Check that the number is numeric and of the right sort of length.
if (!eregi('^[0-9]{13,19}$',$cardNo)) {
$errornumber = 2;
$errortext = $ccErrors [$errornumber];
return false;
}
// Now check the modulus 10 check digit - if required
if ($cards[$cardType]['checkdigit']) {
$checksum = 0; // running checksum total
$mychar = ""; // next char to process
$j = 1; // takes value of 1 or 2
// Process each digit one by one starting at the right
for ($i = strlen($cardNo) - 1; $i >= 0; $i--) {
// Extract the next digit and multiply by 1 or 2 on alternative digits.
$calc = $cardNo{$i} * $j;
// If the result is in two digits add 1 to the checksum total
if ($calc > 9) {
$checksum = $checksum + 1;
$calc = $calc - 10;
}
// Add the units element to the checksum total
$checksum = $checksum + $calc;
// Switch the value of j
if ($j ==1) {$j = 2;} else {$j = 1;};
}
// All done - if checksum is divisible by 10, it is a valid modulus 10.
// If not, report an error.
if ($checksum % 10 != 0) {
$errornumber = 3;
$errortext = $ccErrors [$errornumber];
return false;
}
}
// The following are the card-specific checks we undertake.
// Load an array with the valid prefixes for this card
$prefix = split(',',$cards[$cardType]['prefixes']);
// Now see if any of them match what we have in the card number
$PrefixValid = false;
for ($i=0; $i
$exp = '^' . $prefix[$i];
if (ereg($exp,$cardNo)) {
$PrefixValid = true;
break;
}
}
// If it isn't a valid prefix there's no point at looking at the length
if (!$PrefixValid) {
$errornumber = 3;
$errortext = $ccErrors [$errornumber];
return false;
}
// See if the length is valid for this card
$LengthValid = false;
$lengths = split(',',$cards[$cardType]['length']);
for ($j=0; $j
if (strlen($cardNo) == $lengths[$j]) {
$LengthValid = true;
break;
}
}
// See if all is OK by seeing if the length was valid.
if (!$LengthValid) {
$errornumber = 4;
$errortext = $ccErrors [$errornumber];
return false;
};
// The credit card is in the required format.
return true;
}
?>

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

< ?

if( checkCreditCard ("40236007878787", "Visa", &$errornumber, &$errortext))

echo "OK";

else echo"MO";

function checkCreditCard ($cardnumber, $cardname, &$errornumber, &$errortext) {

$cards = array ( array ('name' => 'American Express',

'length' => '15',

'prefixes' => '34,37',

'checkdigit' => true

array ('name' => 'Carte Blanche',

'length' => '14',

'prefixes' => '300,301,302,303,304,305,36,38',

'checkdigit' => true

array ('name' => 'Diners Club',

'length' => '14',

'prefixes' => '300,301,302,303,304,305,36,38',

'checkdigit' => true

array ('name' => 'Discover',

'length' => '16',

'prefixes' => '6011',

'checkdigit' => true

array ('name' => 'Enroute',

'length' => '15',

'prefixes' => '2014,2149',

'checkdigit' => true

array ('name' => 'JCB',

'length' => '15,16',

'prefixes' => '3,1800,2131',

'checkdigit' => true

array ('name' => 'Maestro',

'length' => '16,18',

'prefixes' => '5020,6',

'checkdigit' => true

array ('name' => 'MasterCard',

'length' => '16',

'prefixes' => '51,52,53,54,55',

'checkdigit' => true

array ('name' => 'Solo',

'length' => '16,18,19',

'prefixes' => '6334,6767',

'checkdigit' => true

array ('name' => 'Switch',

'length' => '16,18,19',

'prefixes' => '4903,4905,4911,4936,564182,633110,6333,6759',

'checkdigit' => true

array ('name' => 'Visa',

'length' => '13,16',

'prefixes' => '4',

'checkdigit' => true

array ('name' => 'Visa Electron',

'length' => '16',

'prefixes' => '417500,4917,4913',

'checkdigit' => true

)

);

$ccErrorNo = 0;

$ccErrors [0] = "Unknown card type";

$ccErrors [1] = "No card number provided";

$ccErrors [2] = "Credit card number has invalid format";

$ccErrors [3] = "Credit card number is invalid";

$ccErrors [4] = "Credit card number is wrong length";

// Establish card type

$cardType = -1;

for ($i=0; $i

// See if it is this card (ignoring the case of the string)

if (strtolower($cardname) == strtolower($cards[$i]['name'])) {

$cardType = $i;

break;

}

// If card type not found, report an error

if ($cardType == -1) {

$errornumber = 0;

$errortext = $ccErrors [$errornumber];

return false;

}

// Ensure that the user has provided a credit card number

if (strlen($cardnumber) == 0) {

$errornumber = 1;

$errortext = $ccErrors [$errornumber];

return false;

}

// Remove any spaces from the credit card number

$cardNo = str_replace (' ', '', $cardnumber);

// Check that the number is numeric and of the right sort of length.

if (!eregi('^[0-9]{13,19}$',$cardNo)) {

$errornumber = 2;

$errortext = $ccErrors [$errornumber];

return false;

}

// Now check the modulus 10 check digit - if required

if ($cards[$cardType]['checkdigit']) {

$checksum = 0; // running checksum total

$mychar = ""; // next char to process

$j = 1; // takes value of 1 or 2

// Process each digit one by one starting at the right

for ($i = strlen($cardNo) - 1; $i >= 0; $i--) {

// Extract the next digit and multiply by 1 or 2 on alternative digits.

$calc = $cardNo{$i} * $j;

// If the result is in two digits add 1 to the checksum total

if ($calc > 9) {

$checksum = $checksum + 1;

$calc = $calc - 10;

}

// Add the units element to the checksum total

$checksum = $checksum + $calc;

// Switch the value of j

if ($j ==1) {$j = 2;} else {$j = 1;};

}

// All done - if checksum is divisible by 10, it is a valid modulus 10.

// If not, report an error.

if ($checksum % 10 != 0) {

$errornumber = 3;

$errortext = $ccErrors [$errornumber];

return false;

}

// The following are the card-specific checks we undertake.

// Load an array with the valid prefixes for this card

$prefix = split(',',$cards[$cardType]['prefixes']);

// Now see if any of them match what we have in the card number

$PrefixValid = false;

for ($i=0; $i

$exp = '^' . $prefix[$i];

if (ereg($exp,$cardNo)) {

$PrefixValid = true;

break;

}

// If it isn't a valid prefix there's no point at looking at the length

if (!$PrefixValid) {

$errornumber = 3;

$errortext = $ccErrors [$errornumber];

return false;

}

// See if the length is valid for this card

$LengthValid = false;

$lengths = split(',',$cards[$cardType]['length']);

for ($j=0; $j

if (strlen($cardNo) == $lengths[$j]) {

$LengthValid = true;

break;

}

// See if all is OK by seeing if the length was valid.

if (!$LengthValid) {

$errornumber = 4;

$errortext = $ccErrors [$errornumber];

return false;

};

// The credit card is in the required format.

return true;

}