<?php
session_start();

/* [1] Refactor de la fonction :
 * - renommé en markallall
 * - code répété exporté dans une fonction markall
 */

/* [3b] Mark est modifié pour utiliser la direction et la position actuelle
 * au lieu de la nouvelle position. Le code chargé de calculer la destination
 * sera réutilisé dans le déplacement
 */

function mark($x,$y,$type,$dir) {
    global $laby; // $laby n'est pas défini dans la fonction

    /* [8] Suivre chemin :
     * Le calcul est mis dans un do-while (executé au moins une fois)
     * la nouvelle position est recopiée dans $x et $y pour être prêt pour le déplacement suivant
     * Selon la tuile où on est arrivé, on modifie la direction. sur les tuiles 4 il faudra remplacer les N par W,
     * les S par E, les W par N et les E par S. On fait une recherche dans une chaîne contenant les origines et on
     * l'utilise pour lire la destination dans une deuxième chaîne.
     * La boucle s'arrêtera quand on tombera sur une case différente d'un chemin.
     * Ne pas oublier que si on entre en allant vers le sud, on est du côté de la sortie nord de la case suivante et
     * on doit donc prendre la direction associée au nord (l'ouest pour une case 4).
     */
    do {
        switch ($dir) {
            case "N":
                $nx = $x;
                $ny = ($y + 5) % 6;
                break;
            case "S":
                $nx = $x;
                $ny = ($y + 1) % 6;
                break;
            case "W":
                $nx = ($x + 7) % 8;
                $ny = $y;
                break;
            case "E":
                $nx = ($x + 1) % 8;
                $ny = $y;
                break;
        }
        $x=$nx;
        $y=$ny;

        if ($laby[$ny][$nx] == 4) {
            $dir="WENS"[strpos("SNEW",$dir)];
        }

        if ($laby[$ny][$nx] == 5) { // pour les tuiles 5, on permute E et W
            $dir="EWNS"[strpos("SNWE",$dir)];
        }

    } while (($laby[$ny][$nx] == 4) || ($laby[$ny][$nx] == 5));

    /* [3c] $x et $y remplacés par $nx et $ny */
    if ($laby[$ny][$nx] < 4) {
        switch ($type) {
            case 0:
                $laby[$ny][$nx] |= 1;
                break;
            case 1:
                $laby[$ny][$nx] |= 2;
                break;
            case 2:
                $laby[$ny][$nx] |= 2;
                markall($nx,$ny,1);
                break;
        }
    }
}
function markall($x,$y,$type) {
    // Haut
    mark($x,$y,$type,"N");

    // Bas
    mark($x,$y,$type,"S");

    // Gauche
    mark($x,$y,$type,"W");

    // Droite
    mark($x,$y,$type,"E");
}

$diff=$_GET["diff"];

$npuit = ([ 1, 2, 2, 2]) [$diff];
$nturn = ([ 0, 4, 8, 12]) [$diff];
$nbat = ([ 1, 2, 2, 2]) [$diff];

/* [4a] Initialiser view à un tableau 6x8 */
$laby= [];
$view= [];

for($i=0;$i<6;$i++) {
    $laby[] = [];
    $view[] = [];
    for($j=0;$j<8;$j++) {
        $laby[$i][$j]=0;
        $view[$i][$j]=0;
    }
}

/* [7a] Ajout chemins tournant */
for($i=0;$i<$nturn;$i++) {
    $x=rand(0,7);
    $y=rand(0,5);

    while($laby[$y][$x] > 3) {
        $x=rand(0,7);
        $y=rand(0,5);
    }
    $laby[$y][$x] = rand(4,5);
}

for($i=0;$i<$npuit;$i++) {
    $x=rand(0,7);
    $y=rand(0,5);

    while($laby[$y][$x] > 3) {
        $x=rand(0,7);
        $y=rand(0,5);
    }

    $laby[$y][$x]= 6; // puit
    markall($x,$y,0);
}


$x=rand(0,7);
$y=rand(0,5);

while($laby[$y][$x] > 3) {
    $x=rand(0,7);
    $y=rand(0,5);
}

$laby[$y][$x]= 7; // Wumpus
markall($x,$y,2);

/* [2a] Calcul position chauve-souris
 * - boucle pour traiter toutes les chauves-souris
 * - coordonnées tirées au hasard
 * - la position ne doit pas être une case spéciale (couloir/puit/wumpus)
 */

$bat = [];
for($i=0;$i<$nbat;$i++) {
    $x=rand(0,7);
    $y=rand(0,5);

    while($laby[$y][$x] > 3) {
        $x=rand(0,7);
        $y=rand(0,5);
    }
    $b = [];
    $b["x"] = $x;
    $b["y"] = $y;
    $bat[] = $b;
}

$x=rand(0,7);
$y=rand(0,5);

while($laby[$y][$x] != 0) {
    $x=rand(0,7);
    $y=rand(0,5);
}
/* [4b] Rendre la case du joueur visible et sauver dans la session */
$view[$y][$x] = 1;
/* [2b] Sauver le tableau des chauve-souris */
/* [7b] Initialiser le côté à haut (0). */
/* [9] Message flash initialement vide */
$_SESSION["laby"]=$laby;
$_SESSION["x"]=$x;
$_SESSION["y"]=$y;
$_SESSION["view"]=$view;
$_SESSION["bat"]=$bat;
$_SESSION["side"]=0;
$_SESSION["flash"]="";

header("Location: display.php");