source: branches/rsr.v5.1/web/install/main.php @ 10

Last change on this file since 10 was 1, checked in by dj3c1t, 13 years ago

import initial

File size: 1.2 KB
Line 
1<?php
2
3  function default_e() { return "accueil"; }
4
5  $env->message = "";
6  $env->erreur = "";
7  $env->out = array();
8  $env->DEFAULT_ALLOW = true;
9
10  if($dh = opendir("app/"))
11  { $files = array();
12    while(($file = readdir($dh)) !== false) $files[] = $file;
13    closedir($dh);
14    if($files)
15    { sort($files);
16      foreach($files as $file)
17      { if(!is_dir("app/".$file) && strcmp(substr($file, -4), ".php") == 0) require "app/".$file;
18      }
19    }
20  }
21
22  if(!$env->erreur)
23  { do
24    { if($env->next_e)
25      { $_GET[$env->param("e")] = $env->next_e;
26        $env->next_e = "";
27      }
28      if($env->e !== "redirect")
29      { $env->e = isset($_GET[$env->param("e")]) ? $_GET[$env->param("e")] : default_e(); 
30        if($env->e)
31        { if($env->action_ok($env->e))
32          { if(file_exists("mods/".$env->prefix.$env->e.".php"))
33            { require_once "mods/".$env->prefix.$env->e.".php";
34            }
35            if(function_exists($env->prefix.$env->e)) eval($env->prefix.$env->e."(\$env);");
36          }
37               else $env->erreur = "Vous n'avez pas le statut necessaire pour effectuer cette op&eacute;ration.";
38        }
39      }
40    }
41    while(!$env->erreur && $env->e !== "redirect" && $env->next_e);
42  }
43
44  if($env->erreur) $env->e = "erreur";
45
46?>
Note: See TracBrowser for help on using the repository browser.