DÉTERMINATION DU CHEMIN D'INDEXAGE MENANT À UNE VALEUR DANS UN TABLEAU MULTI-DIMENSIONNEL

<?php
function Trouve_indice($Tableau,$Val)
{
static $Drapeau=false;static $Compteur=false;static $Result=array(); static $Tbl_origine=array();
//Cette fonction sert à trouver tous les indices dans un tableau multidimentionnel pour localiser une valeur dans ce tableau

  if($Compteur==false)    //$Compteur permet d'assigner à $Tbl_origine le tableau passé en paramètre lors du premier appel de la fonction
  {                       //En effet, lorsque l'on trouve la valeur le tableau en cours est celui contenant cette valeur.
  $Tbl_origine=$Tableau;
  $Compteur=true;
  }

  if(in_array($Val,$Tableau))
  {
  $Drapeau=true;
  $Result[]=array_search($Val,$Tableau);
    /*On récupère le chemin d'indexation menat à la valeur
    Afin d'éviter Fatal error: Cannot use string offset as an array in..., on :

    - Inverse le tableau de résultats
    - Remonte l'arborescence jusqu'à trouver l'indice "racine" menant à la valeur
    - On renvoie la chaîne de caractères composée */
  
  $Result=array_reverse($Result);

       foreach($Result as $Check)
       {
        //Pour gérer les indices associatifs
         $Guillemets=gettype($Check)=="string" ? "'" : "";
         $Code="[".$Guillemets.$Check.$Guillemets."]".$Code;
  
         eval('$Test=$Tbl_origine'.$Code.';');
         if($Test==$Val) break;
      }
  return $Code;
  }

foreach($Tableau as $Cle=>$Valeur)
{
   if($Drapeau==true) break;//break; Pour remonter l'arborescence d'appel de la fonction en gardant le résultat

   if(is_array($Valeur))
   {
    $Result[]=$Cle; //$Result[]=$Cle: On rajoute l'indice parcouru dans le tableau de résultats
    $Result=Trouve_indice($Valeur,$Val);
   }
}
return $Result;
}
?>