[SPIP] +2.1.12
[velocampus/web/www.git] / www / plugins / auto / verifier / verifier / siren_siret.php
1 <?php
2
3 // Sécurité
4 if (!defined("_ECRIRE_INC_VERSION")) return;
5
6 /**
7 * Validation d'un SIREN ou d'un SIRET
8 *
9 * 1/ Un SIREN comporte STRICTEMENT 9 caractères
10 * 1b/ Un SIRET comporte strictement 14 caractères
11 * 2/ Un siren/siret utilise une clef de controle "1-2"
12 * Un siren/siret est donc valide si la somme des chiffres pairs
13 * + la somme du double de tous les chiffres impairs (16 = 1+6 = 7) est un multiple de 10
14 *
15 * @param string $valeur
16 * La valeur à vérifier.
17 * @param array $options
18 * Indique s'il faut tester le SIREN ou le SIRET.
19 * @return string
20 * Retourne une chaine vide si c'est valide, sinon une chaine expliquant l'erreur.
21 */
22 function verifier_siren_siret_dist($valeur, $options=array()){
23 if (!$options['mode'] or !in_array($options['mode'], array('siren', 'siret'))){
24 $mode = 'siren';
25 }
26 else{
27 $mode = $options['mode'];
28 }
29
30 // Test de SIREN
31 if ($mode == 'siren'){
32 $erreur = _T('verifier:erreur_siren');
33 if (!is_string($valeur))
34 return $erreur;
35
36 // Si pas 9 caractère, c'est déjà foiré !
37 if(!preg_match('/^[0-9]{9}$/',$valeur)) return $erreur;
38
39 // On vérifie la clef de controle "1-2"
40 $somme = 0;
41 $i = 0; // Les impaires
42 while($i < 9){ $somme += $valeur[$i]; $i+=2; }
43 $i = 1; // Les paires !
44 while($i < 9){ if((2*$valeur[$i])>9) $somme += (2*$valeur[$i])-9; else $somme += 2*$valeur[$i]; $i+=2; }
45
46 if ($somme % 10) return $erreur;
47 }
48 // Test de SIRET
49 else{
50 $erreur = _T('verifier:erreur_siret');
51 if (!is_string($valeur))
52 return $erreur;
53
54 // Si pas 14 caractère, c'est déjà foiré !
55 if(!preg_match('/^[0-9]{14}$/',$valeur)) return $erreur;
56 if(preg_match('/[0]{8}/',$valeur)) return $erreur;
57
58 // Pour le SIRET on vérifie la clef de controle "1-2" avec les impaires *2
59 // (vs pairs*2 pour SIREN, parce qu'on part de la fin)
60 $somme = 0;
61 $i = 1; // Les paires
62 while($i < 14){ $somme += $valeur[$i]; $i+=2; }
63 $i = 0; // Les impaires !
64 while($i < 14){ if((2*$valeur[$i])>9) $somme += (2*$valeur[$i])-9; else $somme += 2*$valeur[$i]; $i+=2; }
65
66 if($somme % 10) return $erreur;
67 }
68
69 return '';
70 }