Classe pour fonction de luhn

Classe permettant de vérifier le Numéro de carte bancaire ainsi que les numéros siret.

Tous les codes

netphotos

Site de l'auteur voir

[2] sources en PHP voir

Code vu 4263 fois

Enregistré le 13 Juin 2008

téléchargement du zip

impression de la fiche

Code Source

01.
02.
03.
04.
05.
06.
07.
08.
09.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.

<?php
/******************************************************************************/
/*                                                                            */
/*                       __        ____                                       */
/*                 ___  / /  ___  / __/__  __ _____________ ___               */
/*                / _ \/ _ \/ _ \_\ \/ _ \/ // / __/ __/ -_|_-<               */
/*               / .__/_//_/ .__/___/\___/\_,_/_/  \__/\__/___/               */
/*              /_/       /_/                                                 */
/*                                                                            */
/*                                                                            */
/******************************************************************************/
/*                                                                            */
/* Titre          : Classe pour fonction de luhn                              */
/*                                                                            */
/* URL            : http://www.phpsources.org/scripts407-PHP.htm              */
/* Auteur         : netphotos                                                 */
/* Date édition   : 13 Juin 2008                                              */
/* Website auteur : http://www.casting.fr                                     */
/*                                                                            */
/******************************************************************************/
 

// Fontion de prévérification de la carte bancaire
function Luhn($numero,$longueur){ 
// On passe à la fonction la variable contenant le numéro à vérifier
                 // et la longueur qu'il doit impérativement avoir

    if ((strlen($numero)==$longueur) && ereg("[0-9]{".$longueur."}", $numero)){ 
// si la longueur est bonne et que l'on n'a que des chiffres

        /* on décompose le numéro dans un tableau  */
        for ($i=;$i<$longueur;$i++){
            $tableauChiffresNumero[$i]=substr($numero,$i,1);
        }

        /* on parcours le tableau pour additionner les chiffres */
        $luhn=; // clef de luhn à tester
        for ($i=;$i<$longueur;$i++){
            if ($i%2==){ // si le rang est pair (0,2,4 etc.)
                if(($tableauChiffresNumero[$i]*2) > 9){ 
// On regarde si son double est > à 9
                    $tableauChiffresNumero[$i]=($tableauChiffresNumero[$i]*2)-9;
 //si oui on lui retire 9
                    // et on remplace la valeur
                    // par ce double corrigé
                }
                else{

                    $tableauChiffresNumero[$i]=$tableauChiffresNumero[$i]*2; 
// si non on remplace la valeur
                    // par le double
                }
            }
            $luhn=$luhn+$tableauChiffresNumero[$i]; 
// on additionne le chiffre à la clef de luhn
        }

        /* test de la divition par 10 */
        if($luhn%10==){
            return true;
        }
        else{
            return false;
        }
    }
    else{
        return false; 
// la valeur fournie n'est pas conforme (caractère non numérique ou mauvaise
// longueur)
    }
}

?>