source: branches/rsr.v5.1.1/web/app/mods/e_links.php

<?php

  function e_links($env)
  { $env->path = array("root", "links");
    $env->out["ariane"] = array();
    if($_GET[$env->param("path")])
    { $v_path = explode("/", $_GET[$env->param("path")]);
      foreach($v_path as $_path) if($_path)
      { $env->path[] = (int)$_path;
        $env->out["ariane"][$_path] = $env->data->links_categorie($_path);
      }
    }
    if(($env->out["current_categorie"] = $env->data->id_categorie($env->path)) !== false)
    { $env->a = "links";
      $function = "a_".$env->a;
      if(function_exists($function)) $function($env);
    }
    else $env->erreur = "Impossible de lire le lien courant";
  }

  # ------------------------------------------------------------------------------
  #                                                                        actions
  #

  function a_links($env)
  { if(($env->out["link"] = $env->data->links_categorie($env->out["current_categorie"])) !== false)
    { if(($env->out["links_categories"] = $env->data->links_categories($env->path)) !== false)
      {
      }
      else $env->erreur = "Impossible de lire les liens";
    }
    else $env->erreur = "Impossible de lire le lien courant";
  }

?>