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

<?php

  function e_set_links($env)
  { if($env->data->is_admin($env->pun_user["id"]))
    { $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 = $_GET[$env->param("action")] ? $_GET[$env->param("action")] : "links";
        $function = "a_".$env->a;
        if(function_exists($function)) $function($env);
      }
      else $env->erreur = "Impossible de lire le lien courant";
    }
    else $env->erreur = "Vous devez &ecirc;tre administrateur pour acc&eacute;der &agrave; cette page";
  }

  # ------------------------------------------------------------------------------
  #                                                                        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)
      { if($_POST)
        { $OK = true;
          foreach($_POST as $key => $value)
          { if
            ( (substr($key, 0, 6) == "ordre_") &&
              ($id_menu = substr($key, 6)) &&
              $env->out["links_categories"]["list"][$id_menu]
            )
            { $OK = $env->data->set_links_categorie
              ( $id_menu,
                $env->out["links_categories"]["list"][$id_menu]["nom"],
                $env->out["links_categories"]["list"][$id_menu]["titre"],
                $env->out["links_categories"]["list"][$id_menu]["description"],
                $env->out["links_categories"]["list"][$id_menu]["contenu"],
                $value
              );
            }
            if(!$OK) break;
          }
          if($OK)
          { _redirect
            ( $env,
              $env->url(array("e" => "set_links", "path" => $_GET[$env->param("path")])),
              "L'ordre des liens a &eacute;t&eacute; enregistr&eacute;"
            );
          }
          else $env->erreur = "Impossible d'enregistrer l'ordre des liens";
        }
      }
      else $env->erreur = "Impossible de lire les liens";
    }
    else $env->erreur = "Impossible de lire le lien courant";
  }

  function a_add_links_categorie($env)
  { if($_POST)
    { if
      ( $env->data->add_links_categorie
        ( $_POST["nom"],
          $_POST["titre"],
          $_POST["description"],
          $_POST["url"],
          $env->out["current_categorie"]
        )
      )
      { _redirect
        ( $env,
          $env->url(array("e" => "set_links", "path" => $_GET[$env->param("path")])),
          "Le lien a &eacute;t&eacute; ajout&eacute;"
        );
      }
      else $env->erreur = "Impossible d'ajouter le lien";
    }
  }

  function a_set_links_categorie($env)
  { if($_POST)
    { if
      ( $env->data->set_links_categorie
        ( $_GET[$env->param("id")],
          $_POST["nom"],
          $_POST["titre"],
          $_POST["description"],
          $_POST["url"]
        )
      )
      { _redirect
        ( $env,
          $env->url(array("e" => "set_links", "path" => $_GET[$env->param("path")])),
          "Le lien a &eacute;t&eacute; enregistr&eacute;"
        );
      }
      else $env->erreur = "Impossible d'enregistrer le lien.";
    }
    else
    { if(($env->out["links_categorie"] = $env->data->links_categorie($_GET[$env->param("id")])) === false)
      { $env->erreur = "Impossible de lire le lien.";
      }
    }
  }

  function a_del_links_categorie($env)
  { if($env->data->del_links_categorie($_GET[$env->param("id")]) !== false)
    { _redirect
      ( $env,
        $env->url(array("e" => "set_links", "path" => $_GET[$env->param("path")])),
        "Le lien a &eacute;t&eacute; supprim&eacute;"
      );
    }
    else $env->erreur = "Impossible de supprimer le lien.";
  }

?>