functions.php

<?php
/* ***************************************************************************** *
 *	Filename      :  function.php Version 1.1
 *	Author        :  erikosan / Savinien Cyrano (Univers 14)
 *	Contributor   :  Pitch314
 *	Mod OGSpy     :  Building & Techno HOF
 *  Modifications :
 *   - 11/02/2013 par Pitch314 : reformatage et correction erreur HTML.
 *   - 23/02/2013 par Pitch314 : Optimisation HOF production.
 *   - 10/11/2013 par Pitch314 : Ajout de la fonctionnalité de séparation des HOF
 *                      par groupe OGSpy. 
 *   - 13/06/2015 par Pitch314 : Normalisation utilisation BDD + UTF8
 *   - 17/07/2016 par Pitch314 : Ajout vérification traitement pour les cachettes, dépôt et dock spatial
 * **************************************************************************** */

/**
 * @file functions.php
 *
 * functions.php Défini les fonctions du mod
 *
 * @package [MOD] bt_hof
 * @author  erikosan / Savinien Cyrano (Univers 14)
 * @created 2007
 * @version 11-10-2013, v1.1
 * @modified 11/10/2013
 */

// ==============================================
// = Calcul du classement de production minière =
// ==============================================//
function Create_Mine_HOF()
{
    require_once("includes/ogame.php");

    if (!isset($production_metal)) {
        global $production_metal;
    }
    if (!isset($production_cristal)) {
        global $production_cristal;
    }
    if (!isset($production_deuterium)) {
        global $production_deuterium;
    }
    if (!isset($production_total)) {
        global $production_total;
    }
    if (!isset($production_joueur)) {
        global $production_joueur;
    }
    if (!isset($table_prefix)) {
        global $table_prefix;
    }
    if (!isset($db)) {
        global $db;
    }

    $planet = array(
        false, 'user_id' => '', 'planet_name' => '', 'coordinates' => '',
        'fields' => '', 'fields_used' => '', 'temperature_min' => '',
        'temperature_max' => '', 'Sat' => '', 'M' => 0, 'C' => 0,
        'D' => 0, 'CES' => 0, 'CEF' => 0, 'M_percentage' => 0,
        'C_percentage' => 0, 'D_percentage' => 0, 'CES_percentage' => 100,
        'CEF_percentage' => 100, 'Sat_percentage' => 100
    );
    global $pub_GroupBthof;
    //print_r("group2=$pub_GroupBthof\n");//////////////////////////////////////////////////////////////////TEST

    $sql = "SELECT DISTINCT a.user_id, user_name,`off_ingenieur`,`off_geologue`, `NRJ`, `Plasma` " .
        "FROM ";
    if ($pub_GroupBthof == 0) {
        $sql = $sql . TABLE_USER;
    } else {
        $sql = $sql . "(SELECT u.user_id, user_active, user_name, `off_ingenieur`,`off_geologue` " .
            "FROM " . TABLE_USER_GROUP . " g JOIN " . TABLE_USER . " u ON u.user_id = g.user_id " .
            "WHERE g.group_id = " . $pub_GroupBthof . ")";
    }
    $sql = $sql . " a JOIN " . TABLE_USER_TECHNOLOGY . " b ON a.user_id = b.user_id " .
        "WHERE user_active='1'";
    //print_r("SQL=$sql\n");//////////////////////////////////////////////////////////////////TEST
    // if ($pub_GroupBthof == 0) {
    // $sql = "SELECT DISTINCT u.user_id,user_name,`off_ingenieur`,`off_geologue`, `NRJ`, `Plasma` ".
    // "FROM ". TABLE_USER ." u JOIN ". TABLE_USER_TECHNOLOGY ." b ".
    // "ON u.user_id = b.user_id ".
    // "WHERE user_active='1'";
    // } else {
    // $sql = "SELECT DISTINCT a.user_id, user_name,`off_ingenieur`,`off_geologue`, `NRJ`, `Plasma` ".
    // "FROM (SELECT u.user_id, user_active, user_name, `off_ingenieur`,`off_geologue` ".
    // "FROM ".TABLE_USER_GROUP." g JOIN ". TABLE_USER ." u ON u.user_id = g.user_id ".
    // "WHERE g.group_id = ".$pub_GroupBthof.") a
    // JOIN ". TABLE_USER_TECHNOLOGY ." b ON a.user_id = b.user_id ".
    // "WHERE user_active='1'";
    // }
    $quet = NULL;
    $result = $db->sql_query($sql);
    $nplayer = 0;
    //Début boucle sur joueur
    while ($player = $db->sql_fetch_row($result)) {
        $metal_heure   = 0;
        $cristal_heure = 0;
        $deut_heure    = 0;

        list($user_id, $user_name, $off_ingenieur, $off_geologue, $NRJ, $plasma) = $player;
        $nb_planet = find_real_nb_planete_user($user_id);
        // echo $user_name.' ing '.$off_ingenieur.' geo '.$off_geologue.' nrj '.$NRJ.' plasma '.$plasma.'<br />';
        if ($nb_planet == 0) { //Si le joueur n'a pas de planète encore répertoriée
            continue;
        }

        // Récupération des informations sur les mines du joueur
        $sql = 'SELECT DISTINCT planet_id,planet_name,coordinates,`fields`,' .
            'temperature_min,temperature_max,Sat,M,C,D,CES,CEF,' .
            'M_percentage, C_percentage, D_percentage, ' .
            'CES_percentage, CEF_percentage, Sat_percentage ' .
            'FROM ' . TABLE_USER_BUILDING .
            ' WHERE user_id = ' . $user_id . ' and planet_id < 199 ' .
            'ORDER BY planet_id';
        $quet = $db->sql_query($sql);
        $user_building = array_fill(1, $nb_planet, $planet);

        // Boucle sur les systèmes d'un joueur
        while ($row = $db->sql_fetch_assoc($quet)) {
            $production_CES = ($row['CES_percentage'] / 100) * floor(production("CES", $row['CES'], $off_ingenieur));
            $production_CEF = ($row['CEF_percentage'] / 100) * floor(production("CEF", $row['CEF'], $off_ingenieur, $row['temperature_max'], $NRJ));
            $production_SAT = ($row['Sat_percentage'] / 100) * floor(production_sat($row['temperature_min'], $row['temperature_max'], $off_ingenieur)) * $row['Sat'];
            $prod_energie   = $production_CES + $production_CEF + $production_SAT;

            $consommation_M = ($row['M_percentage'] / 100) * ceil(consumption("M", $row['M']));
            $consommation_C = ($row['C_percentage'] / 100) * ceil(consumption("C", $row['C']));
            $consommation_D = ($row['D_percentage'] / 100) * ceil(consumption("D", $row['D']));
            $cons_energie   = $consommation_M + $consommation_C + $consommation_D;

            if ($cons_energie == 0) {
                $cons_energie = 1;
            }
            $ratio = floor(($prod_energie / $cons_energie) * 100) / 100;
            if ($ratio > 1) {
                $ratio = 1;
            }
            $metal_heure   = $metal_heure   + floor((production("M", $row['M'], $off_geologue, 0, 0, $plasma) * $ratio));
            $cristal_heure = $cristal_heure + floor((production("C", $row['C'], $off_geologue, 0, 0, $plasma) * $ratio));
            $deut_heure    = $deut_heure    + floor((production("D", $row['D'], $off_geologue, $row['temperature_max']) * $ratio));
            $deut_heure    = $deut_heure - (floor(consumption("CEF", $row['CEF']) * $row['CEF_percentage'] / 100));
        }
        $production_joueur[$nplayer] = $user_name;
        $production_metal[$nplayer]     = 24 * $metal_heure;
        $production_cristal[$nplayer]   = 24 * $cristal_heure;
        $production_deuterium[$nplayer] = 24 * $deut_heure;
        $production_total[$nplayer]     = 24 * ($metal_heure + $cristal_heure + $deut_heure);

        $nplayer++;
    } //Fin boucle joueur
    return $nplayer;
}

// ===========================================
// = Calcul du classement pour une catégorie =
// ===========================================//
function Create_HOF(
    $Table_name,
    $Table_label,
    $Table_icon,
    $Title,
    $OGSpy_Table,
    $NbItems,
    $affich
) {
    if (!isset($table_prefix)) {
        global $table_prefix;
    }
    if (!isset($db)) {
        global $db;
    }
    if (!isset($lien)) {
        global $lien;
    }
    if (!isset($depotEnable)) {
        global $depotEnable;
    }
    if (!isset($dockEnable)) {
        global $dockEnable;
    }

    // Contrôle de l'existance du mod flottes
    if ($OGSpy_Table == "bthof_flottes") {
        // Contrôle de l'existance du mod flottes et de son activation.
        $query = "SELECT active FROM `" . TABLE_MOD . "` WHERE `title`='flottes'";
        $result    = $db->sql_query($query);
        $modflotte = $db->sql_fetch_row($result);
        if ($modflotte[0] != "1") {
            // Le mod flotte n'est pas installé ou n'est pas actif 
            echo "Le mod Flottes doit être installé et actif pour permettre de faire des statistiques sur les flottes";
            return;
        } else {
            // Le mod flotte est installé, on met à jour la table TABLE_BTHOF_FLOTTES
            Update_Flotte();
        }
    }
    global $pub_GroupBthof;
    //print_r("group2=$pub_GroupBthof\n");//////////////////////////////////////////////////////////////////TEST
    print("<table align='center'>");
    print("<tr><th width='150px'><font color='#00F0F0'>" . $Title . "</font></th><th width='50px'><font color='#00F0F0'>Max</font></th><th width='300px'><font color='#00F0F0'>Joueur(s)</font></th>");
    if ($Title != "Flottes" and $Title != "Technologies") {
        print("<th width='50px'><font color='#00F0F0'>Cumul&nbsp;Total</font></th><th width='300px'><font color='#00F0F0'>Joueur(s)</font></th>");
    }
    print("</tr>");
    print("<tr> <td width=\"30px\">&nbsp;</td> </tr>");

    //Pour chaque Batiment/techno/flotte
    for ($NoBld = 0; $NoBld < $NbItems; $NoBld++) {
        //Cas non présence des cachettes dans la BDD
        if ($Title == "B&acirc;timents" && ($NoBld == 11 || $NoBld == 12 || $NoBld == 13)) {
            continue; // Pas de cachette = on saute au bâtiment suivant.
        }
        //Cas présence dépôt de ravitaillement
        if ($Title == "B&acirc;timents" && $NoBld == 20 && $depotEnable == 0) {
            continue; //Pas de dépôt de ravitaillement dans l'univers.
        }
        //Cas non présence du dock spatial
        if ($Title == "B&acirc;timents" && $NoBld == 21 && $dockEnable == 0) {
            continue; //Pas de dock spatial.
        }

        $sqlEnd = "($Table_name[$NoBld]), user_name FROM " . $table_prefix . $OGSpy_Table . " T JOIN ";
        if ($pub_GroupBthof == 0) {
            $sqlEnd = $sqlEnd . TABLE_USER;
        } else {
            $sqlEnd = $sqlEnd . "(SELECT u.user_id, user_active, user_name " .
                "FROM " . TABLE_USER_GROUP . " g JOIN " . TABLE_USER . " u ON u.user_id = g.user_id " .
                "WHERE g.group_id = " . $pub_GroupBthof . ")";
        }
        $sqlEnd = $sqlEnd . " a ON a.user_id = T.user_id WHERE a.user_active='1' GROUP BY user_name ORDER BY 1 DESC";

        $sql1 = "SELECT MAX" . $sqlEnd;
        $sql2 = "SELECT SUM" . $sqlEnd;

        //print_r("**SQL1=$sql1<br />**SQL2=$sql2<br /><br />\n");//////////////////////////////////////////////////////////////////TEST
        //Requête SQL pour récupérer la valeur Max de chaque type et le nom du joueur associé classé par ordre décroissant
        $result = $db->sql_query($sql1);
        //Requête SQL pour récupérer le total par joueur classé par ordre décroissant
        $result2 = $db->sql_query($sql2);

        // //Requète SQL pour récupérer la valeur Max de chaque type et le nom du joueur associé classé par ordre décroissant			
        // $sql = "SELECT MAX($Table_name[$NoBld]) ,user_name FROM ".$table_prefix.$OGSpy_Table." T JOIN ".TABLE_USER.
        // " U ON U.user_id = T.user_id WHERE U.user_active='1' GROUP BY user_name ORDER BY 1 DESC";
        // $result = $db->sql_query($sql);
        // //Requète SQL pour récupérer le total par joueur classé par ordre décroissant
        // $sql2 ="SELECT SUM($Table_name[$NoBld]) ,user_name FROM ".$table_prefix.$OGSpy_Table." T JOIN ".TABLE_USER.
        // " U ON U.user_id = T.user_id WHERE U.user_active='1' GROUP BY user_name ORDER BY 1 DESC";
        // $result2 = $db->sql_query($sql2);

        $val = -1;
        $premiere_fois = 0;
        $row = $db->sql_fetch_row($result);
        if ($row == false) {
            $row[0] = 0;
        }
        do {
            $val = $row[0];
            if ($val == 0) {
                $row[1] = '-';
            }
            // ce controle sert à afficher les ex aequo s'il y en a !!				
            if ($premiere_fois == 1) {
                //si la valeur est inférieur à la valeur max -> on sort
                if ($val_max > $val || $val_max == 0) {
                    break;
                }
                //sinon on affiche une virgule et le nom					
                if ($val != 0) {
                    printf(", %s", $row[1]);
                }
            } else {
                //on monte le flag comme quoi la boucle à tournée au moins une fois
                $premiere_fois = 1;
                //on enregistre la valeur max, les résultats étant classé par ordre décroissant, le premier est le plus élevé !!
                $val_max = $row[0];
                echo "\n\t\t\t <tr> \n\t\t\t\t" . "<td style='color : #FF00F0; background-color : #273234; text-align: center;'>";
                if ($affich) {
                    aff_img($Table_icon[$NoBld], $Table_label[$NoBld]);
                } else {
                    echo "&nbsp;";
                }
                echo $Table_label[$NoBld] . '</td>' . "\n\t\t\t\t";
                echo '<td style=\'color : #FF80F0; background-color : #273234; text-align: center; \'>' . number_format($row[0], 0, ',', ' ') . '</td>' . "\n\t\t\t\t";
                echo '<td style=\'color : #FFFFF0; background-color : #273234; text-align: center; \'>' . $row[1];
            }
        } while (($row = $db->sql_fetch_row($result)));

        if ($Title != "Flottes" and $Title != "Technologies") {
            print("</td>");
            $val = -1;
            $flag = 0;
            $row2 = $db->sql_fetch_row($result2);
            if ($row2 == false) {
                $row2[0] = 0;
            }
            do {
                $val = $row2[0];
                if ($val == 0) {
                    $row2[1] = '-';
                }
                // ce controle sert à afficher les ex aequo s'il y en a !!
                if ($flag == 1) {
                    //si la valeur est inférieur à la valeur max -> on sort 
                    if ($val_max > $val || $val_max == 0) {
                        break;
                    }
                    //sinon on affiche une virgule et le nom suivant
                    printf(", %s", $row2[1]);
                } else {
                    //on monte le flag comme quoi la boucle à tournée au moins une fois
                    $flag = 1;
                    //on enregistre la valeur max, les résultats étant classé par ordre décroissant, le premier est le plus élevé !!
                    $val_max = $row2[0];
                    echo '<td  width=\'50px\' style=\'color : #FF80F0; background-color : #273234; text-align: center; \'>';
                    printf("%s</td><td width=\"400px\" style=\"color : #FFFFF0; background-color : #273234; text-align: center; \">%s", number_format($row2[0], 0, ',', ' '), $row2[1]);
                }
            } while ($row2 = $db->sql_fetch_row($result2));
        }
        echo '</td>' . "\n\t\t\t" . '</tr>';
    }
    echo "\n\t\t" . '</table>';
    return 1;
}

// ================================
// = Création de la chaine BBcode =
// ================================//
function HOF_bbcode(
    $Table_name,
    $Table_label,
    $Title,
    $OGSpy_Table,
    $NbItems,
    $b1,
    $b2,
    $b3
) {
    if (!isset($table_prefix)) {
        global $table_prefix;
    }
    if (!isset($db)) {
        global $db;
    }
    if (!isset($lien)) {
        global $lien;
    }
    if (!isset($bbcode)) {
        global $bbcode;
    }
    if (!isset($depotEnable)) {
        global $depotEnable;
    }
    if (!isset($dockEnable)) {
        global $dockEnable;
    }
    if (!isset($pub_GroupBthof)) {
        global $pub_GroupBthof;
    }

    for ($NoBld = 0; $NoBld < $NbItems; $NoBld++) {
        //Cas non présence des cachettes dans la BDD
        if (($NoBld == 11 || $NoBld == 12 || $NoBld == 13)) {
            continue; // Pas de cachette = on saute au bâtiment suivant.
        }
        //Cas présence dépôt de ravitaillement
        if ($NoBld == 20 && $depotEnable == 0) {
            continue; //Pas de dépôt de ravitaillement dans l'univers.
        }
        //Cas non présence du dock spatial
        if ($NoBld == 21 && $dockEnable == 0) {
            continue; //Pas de dock spatial.
        }

        $sqlEnd = "($Table_name[$NoBld]), user_name FROM " . $table_prefix . $OGSpy_Table . " T JOIN ";
        if ($pub_GroupBthof == 0) {
            $sqlEnd = $sqlEnd . TABLE_USER;
        } else {
            $sqlEnd = $sqlEnd . "(SELECT u.user_id, user_active, user_name " .
                "FROM " . TABLE_USER_GROUP . " g JOIN " . TABLE_USER . " u ON u.user_id = g.user_id " .
                "WHERE g.group_id = " . $pub_GroupBthof . ")";
        }
        $sqlEnd = $sqlEnd . " a ON a.user_id = T.user_id WHERE a.user_active='1' GROUP BY user_name ORDER BY 1 DESC";

        $sql1 = "SELECT MAX" . $sqlEnd;
        $sql2 = "SELECT SUM" . $sqlEnd;

        //Requête SQL pour récupérer la valeur Max de chaque type et le nom du joueur associé classé par ordre décroissant
        $result = $db->sql_query($sql1);


        // $sql = "SELECT MAX($Table_name[$NoBld]) ,user_name FROM ".$table_prefix.$OGSpy_Table." T JOIN ".TABLE_USER.
        // " U ON U.user_id = T.user_id WHERE U.user_active='1' GROUP BY user_name ORDER BY 1 DESC";
        // //echo $NoBld .' : '.$sql.'<br />';
        $premiere_fois = 0;
        $bbcode .= "";

        $row = $db->sql_fetch_row($result);
        if ($row == NULL) {
            if ($b1 == '') {
                $bbcode .= " - " . $Table_label[$NoBld];
            } else {
                $bbcode .= " - [color=" . $b1 . "]" . $Table_label[$NoBld] . "[/color]";
            }
            $bbcode .= " : --\n";
            continue;
        }
        $val_max = $row[0];
        do {
            $val = $row[0];
            if ($val == 0) {
                $row[1] = '-';
            }
            if ($premiere_fois != 0) {
                if ($val_max > $val || $val_max == 0) {
                    break;
                }
                $bbcode .= ", " . $row[1]; //Nom des joueurs ex aequo
            } else {
                $premiere_fois++;
                $val_max = $row[0];
                if ($b1 == '') { //Label
                    $bbcode .= " - " . $Table_label[$NoBld];
                } else {
                    $bbcode .= " - [color=" . $b1 . "]" . $Table_label[$NoBld] . "[/color]";
                }
                if ($b2 == '') { //Nombre
                    $bbcode .= number_format($row[0], 0, ',', ' ');
                } else {
                    $bbcode .= " : [color=" . $b2 . "]" . number_format($row[0], 0, ',', ' ') . "[/color]";
                }
                if ($b3 == '') { //Nom du joueur
                    $bbcode .= $row[1];
                } else {
                    $bbcode .= " : [color=" . $b3 . "]" . $row[1];
                }
            }
        } while ($row = $db->sql_fetch_row($result));
        if ($b3 != '') {
            $bbcode .= "[/color]";
        }
        $bbcode .= "\n";

        if ($Title != "Flottes" && $Title != "Technologies" && $val != 0) {
            //Requête SQL pour récupérer le total par joueur classé par ordre décroissant
            $result2 = $db->sql_query($sql2);
            $premiere_fois = 0;
            $bbcode .= "";

            $row = $db->sql_fetch_row($result2);
            $val_max = $row[0];
            do {
                $val = $row[0];
                if ($val == 0) {
                    $row[1] = '-';
                }
                if ($premiere_fois != 0) {
                    if ($val_max > $val || $val_max == 0) {
                        break;
                    }
                    $bbcode .= ", " . $row[1];
                } else {
                    $premiere_fois++;
                    $val_max = $row[0];
                    $bbcode .= "[i]____[Cumul] ";
                    if ($b2 == '') {
                        $bbcode .= number_format($row[0], 0, ',', ' ');
                    } else {
                        $bbcode .= " : [color=" . $b2 . "]" . number_format($row[0], 0, ',', ' ') . "[/color]";
                    }
                    if ($b3 == '') {
                        $bbcode .= $row[1];
                    } else {
                        $bbcode .= " : [color=" . $b3 . "]" . $row[1];
                    }
                }
            } while ($row = $db->sql_fetch_row($result2));
            if ($b3 != '') {
                $bbcode .= "[/color]";
            }
            $bbcode .= "[/i]\n";
        }
    }
    return "";
}

function Mine_HOF_bbcode(
    $prod_metal,
    $prod_cristal,
    $prod_deuterium,
    $prod_total,
    $prod_joueur,
    $b1,
    $b2,
    $b3,
    $b4
) {
    if (!isset($bbcode)) {
        global $bbcode;
    }

    if (!is_array($prod_metal)) {
        return "";
    }

    $maxvalue = doublemax($prod_metal);
    if ($b1 == '') {
        $bbcode .= "- M&eacute;tal : ";
    } else {
        $bbcode .= "- [color=" . $b1 . "]M&eacute;tal : [/color]";
    }
    if ($b2 == '') {
        $bbcode .= number_format($maxvalue['m'], 0, ',', ' ') . " : ";
    } else {
        $bbcode .= "[color=" . $b2 . "]" . number_format($maxvalue['m'], 0, ',', ' ') . "[/color] : ";
    }
    if ($b3 == '') {
        $bbcode .= $prod_joueur[$maxvalue['i']] . "[/color]\n";
    } else {
        $bbcode .= "[color=" . $b3 . "]" . $prod_joueur[$maxvalue['i']] . "[/color]\n";
    }

    $maxvalue = doublemax($prod_cristal);
    if ($b1 == '') {
        $bbcode .= "- Cristal : ";
    } else {
        $bbcode .= "- [color=" . $b1 . "]Cristal : [/color]";
    }
    if ($b2 == '') {
        $bbcode .= number_format($maxvalue['m'], 0, ',', ' ') . " : ";
    } else {
        $bbcode .= "[color=" . $b2 . "]" . number_format($maxvalue['m'], 0, ',', ' ') . "[/color] : ";
    }
    if ($b3 == '') {
        $bbcode .= $prod_joueur[$maxvalue['i']] . "[/color]\n";
    } else {
        $bbcode .= "[color=" . $b3 . "]" . $prod_joueur[$maxvalue['i']] . "[/color]\n";
    }

    $maxvalue = doublemax($prod_deuterium);
    // arsort($prod_deuterium);
    // list($key,$val) = each($prod_deuterium);
    if ($b1 == '') {
        $bbcode .= "- Deut&eacute;rium : ";
    } else {
        $bbcode .= "- [color=" . $b1 . "]Deut&eacute;rium : [/color]";
    }
    if ($b2 == '') {
        $bbcode .= number_format($maxvalue['m'], 0, ',', ' ') . " : ";
    } else {
        $bbcode .= "[color=" . $b2 . "]" . number_format($maxvalue['m'], 0, ',', ' ') . "[/color] : ";
    }
    if ($b3 == '') {
        $bbcode .= $prod_joueur[$maxvalue['i']] . "[/color]\n";
    } else {
        $bbcode .= "[color=" . $b3 . "]" . $prod_joueur[$maxvalue['i']] . "[/color]\n";
    }

    arsort($prod_total);
    $bbcode .= "\n\n[b][color=" . $b4 . "]Classement production mini&egrave;re :[/color][/b]\n";

    $bbcode .= '[table cellspacing="2"]' . "\n";
    $bbcode .= '[tr][td colspan="2"][color=#ff00ff][b]Production par jour[/b][/color][/td]';
    $bbcode .= '[td][color=#00ffff][b]M&eacute;tal[/b][/color][/td]';
    $bbcode .= '[td][color=#00ffff][b]Cristal[/b][/color][/td]';
    $bbcode .= '[td][color=#00ffff][b]Deut&eacute;rium[/b][/color][/td]';
    $bbcode .= '[td align="center"][b]Total[/b][/td][/tr]' . "\n";

    $nb = 1;
    foreach ($prod_total as $key => $val) {
        $bbcode .= '[tr][td][color=white][b]' . $nb . '[/b][/color][/td]';
        $bbcode .= '[td]' . $prod_joueur[$key] . '[/td]';
        $bbcode .= '[td align="right"][color=red][b]' . number_format($prod_metal[$key], 0, ',', ' ') . '[/b][/color][/td]';
        $bbcode .= '[td align="right"][color=lightblue][b]' . number_format($prod_cristal[$key], 0, ',', ' ') . '[/b][/color][/td]';
        $bbcode .= '[td align="right"][color=green][b]' . number_format($prod_deuterium[$key], 0, ',', ' ') . '[/b][/color][/td]';
        $bbcode .= '[td align="right"][color=grey]' . number_format($prod_total[$key], 0, ',', ' ') . '[/color][/td][/tr]' . "\n";
        $nb++;
    }
    $bbcode .= "[/table]\n";
}

// =================================
// = Sauvegarde des valeurs BBCode =
// =================================
function Sauve_BBCode($bbcode_1, $bbcode_2, $bbcode_3, $bbcode_4, $bbcode_f)
{
    global $db;
    if (!isset($bbcode_t)) {
        global $bbcode_t;
    }
    if (!isset($bbcode_o)) {
        global $bbcode_o;
    }
    if (!isset($bbcode_r)) {
        global $bbcode_r;
    }
    if (!isset($bbcode_l)) {
        global $bbcode_l;
    }
    if (!isset($bbcode_format)) {
        global $bbcode_format;
    }

    $request = "UPDATE " . TABLE_BTHOF_CONF .
        " SET bbcode_t='$bbcode_1', bbcode_o='$bbcode_2', bbcode_r='$bbcode_3', bbcode_l='$bbcode_4', bbcode_format='$bbcode_f'";
    $result = $db->sql_query($request);

    $bbcode_t = $bbcode_1;
    $bbcode_o = $bbcode_2;
    $bbcode_r = $bbcode_3;
    $bbcode_l = $bbcode_4;
    $bbcode_format = $bbcode_f;
}

// ===================================
// = Récupère les valeurs de BBcode =
// ===================================//
function Get_BBCode()
{
    global $db;
    if (!isset($bbcode_t)) {
        global $bbcode_t;
    }
    if (!isset($bbcode_o)) {
        global $bbcode_o;
    }
    if (!isset($bbcode_r)) {
        global $bbcode_r;
    }
    if (!isset($bbcode_l)) {
        global $bbcode_l;
    }
    if (!isset($bbcode_format)) {
        global $bbcode_format;
    }

    $request = "SELECT bbcode_t,bbcode_o,bbcode_r,bbcode_l,bbcode_format FROM " . TABLE_BTHOF_CONF;
    $result  = $db->sql_query($request);
    $val     = $db->sql_fetch_row($result);
    $bbcode_t = $val[0];
    $bbcode_o = $val[1];
    $bbcode_r = $val[2];
    $bbcode_l = $val[3];
    $bbcode_format = $val[4];
}

// ==================================
// = Sauvegarde des valeurs d'Admin =
// ==================================
function Save_Adm($icon)
{
    global $db;
    if (!isset($icon_display)) {
        global $icon_display;
    }

    $request = "UPDATE " . TABLE_BTHOF_CONF . " SET icon_display_active='$icon'";
    $result  = $db->sql_query($request);
    $icon_display = $icon;
}

// =================================
// = Reccupere les valeurs d'Admin =
// =================================
function Get_Adm()
{
    global $db;
    if (!isset($icon_display)) {
        global $icon_display;
    }

    $request = "SELECT icon_display_active FROM " . TABLE_BTHOF_CONF;
    $result  = $db->sql_query($request);

    $val = $db->sql_fetch_row($result);
    $icon_display = $val[0];
}

//-----------------------------------		
//Update table bthof_flottes 
//-----------------------------------
function Update_Flotte()
{
    global $db;
    $sql = 'DELETE FROM ' . TABLE_BTHOF_FLOTTES . '';
    $resultat = $db->sql_query($sql);

    // Je suis quasiment sur qu'on peux faire sans cette table ... à voir !!
    // $req = mysql_query("SELECT SUM(PT) as PT, SUM(GT) AS GT, SUM(CLE) AS CLE, SUM(CLO) AS CLO, SUM(CR) AS CR, SUM(VB) AS VB, SUM(VC) AS VC, SUM(REC) AS REC, SUM(SE) AS SE, SUM(BMD) AS BMD, SUM(DST) AS DST, SUM(EDLM) AS EDLM, SUM(TRA) AS TRA, SUM(SAT) AS SAT,user_id FROM ".TABLE_FLOTTES." GROUP BY user_id");
    // while($resultat = mysql_fetch_array($req))
    $sql = "SELECT SUM(PT) as PT, SUM(GT) AS GT, SUM(CLE) AS CLE, SUM(CLO) AS CLO, SUM(CR) AS CR, SUM(VB) AS VB, SUM(VC) AS VC, SUM(REC) AS REC, SUM(SE) AS SE, SUM(BMD) AS BMD, SUM(DST) AS DST, SUM(EDLM) AS EDLM, SUM(TRA) AS TRA, SUM(SAT) AS SAT,user_id FROM " . TABLE_FLOTTES . " GROUP BY user_id";
    $req = $db->sql_query($sql);
    while ($resultat = $db->sql_fetch_assoc($req)) {
        $sql = "INSERT INTO " . TABLE_BTHOF_FLOTTES . " (user_id, PT, GT, CLE, CLO, CR, VB, VC, REC, SE, BMD, DST, EDLM, TRA, SAT) VALUES ('$resultat[user_id]', '$resultat[PT]', '$resultat[GT]', '$resultat[CLE]', '$resultat[CLO]', '$resultat[CR]', '$resultat[VB]', '$resultat[VC]', '$resultat[REC]', '$resultat[SE]', '$resultat[BMD]', '$resultat[DST]', '$resultat[EDLM]', '$resultat[TRA]', '$resultat[SAT]')";
        $resultat = $db->sql_query($sql);
    }
}

function url_exists($url)
{
    //url local :
    if (file_exists($url)) {
        return true;
    }

    //url distant :
    if (function_exists('curl_init')) {
        // Version php 4.x supported
        $handle   = curl_init($url);
        if (false == $handle) {
            return false;
        }
        curl_setopt($handle, CURLOPT_HEADER, false);
        curl_setopt($handle, CURLOPT_FAILONERROR, true);  // this works
        curl_setopt($handle, CURLOPT_NOBODY, true);
        curl_setopt($handle, CURLOPT_RETURNTRANSFER, false);
        $connectable = curl_exec($handle);
        curl_close($handle);
        return $connectable;
    } else {
        //version php 5
        $file_headers = get_headers($url);
        if (preg_match("|200|", $file_headers[0])) {
            return true;
        } else {
            return false;
        }
    }
}

function aff_img($imag, $labelimg)
{
    global $lien;
    if (url_exists($lien . $imag)) {
        // elle existe donc on l'affiche
        echo "<img src='" . $lien . $imag . "' alt='" . $labelimg . "' /><br />";
    } else {
        //affichage des images du mod par défaut
        echo "<img src='mod/bthof/pictures/" . $imag . "'/><br />";
    }
}

/**
 * Find the number of planet of an user.
 *
 * @param   user id in database
 * @return  the number of planet
 */
function find_real_nb_planete_user($user_id)
{
    global $db;

    $request  =  "SELECT count(planet_id) ";
    $request .= " FROM " . TABLE_USER_BUILDING;
    $request .= " WHERE user_id = " . $user_id;
    $request .= " AND planet_id < 199 ";
    $request .= " ORDER BY planet_id";

    $result = $db->sql_query($request);
    //result is alway an (1,1)array even if user_id doesn't exist
    $tmp = $db->sql_fetch_row();
    return $tmp[0];
}

/**
 * (Matlab max), find highest value of an array and return also the index.
 *
 * @param   associative array
 * @return  array ('m'=>highest_value, 'i'=>its index)
 */
function doublemax($mylist)
{
    if (!is_array($mylist)) {
        return NULL;
    }
    $maxvalue = max($mylist);
    $maxindex = array_search(max($mylist), $mylist);

    return array("m" => $maxvalue, "i" => $maxindex);
}

function downloadFile($url, $path)
{
    $newfname = $path;
    $file = fopen($url, "rb");
    if ($file) {
        $newf = fopen($newfname, "wb");
        if ($newf) {
            while (!feof($file)) {
                fwrite($newf, fread($file, 1024 * 8), 1024 * 8);
            }
            fclose($newf);
        }
        fclose($file);
    }
}

/**
 * Lit les n premiers octet/caractère d'un fichier.
 * @param string $url L'emplacement du fichier ou son adresse URL
 * @param int $lenght La longueur en octet lu. (Attention à un longueur trop grande (>8192 soit 4ko))
 * @return NULL si pas lu, sinon la caractère lu.
 */
function read_part_file($url, $lenght)
{
    $file = fopen($url, "rb");
    if ($file) {
        $result = fread($file, $lenght);
        fclose($file);
        return $result;
    }
    return NULL;
}