'; if (strcmp($_POST['station0'],"choisir une station")) { // generer le fichier de configuration // retrouver le type de flux et la source // Formater la ligne resultat (freq,type,nom,source) // Ecrire les lignes dans le fichier de configuration // Dire a l'utilisateur que c'est sauvegarde $contenu_liste = '0,'.$_POST['nom_liste'].',0,0,0'."\n"; // Pour chaque ligne de la liste, recherche des infos "type de flux" et "source" // La recherche sur la clÃ© sera a optimiser pour stopper des que trouve if ($_POST['station0']) { sscanf ($_POST['frequence0'],"%ikHz%s",$freq,$poubelle); // foreach beurk : a optimiser avec un while pas_trouve foreach ($liste_stn as $Nom => $Infos) { if (!strcmp($Nom,$_POST['station0'])) { $Infos_Stn = $Infos;} } $contenu_liste .= $freq.','.$_POST['station0'].','.$Infos_Stn; } // station0 if ($_POST['station1']) { sscanf ($_POST['frequence1'],"%ikHz%s",$freq,$poubelle); // foreach beurk : a optimiser avec un while pas_trouve foreach ($liste_stn as $Nom => $Infos) { if (!strcmp($Nom,$_POST['station1'])) { $Infos_Stn = $Infos;} } $contenu_liste .= $freq.','.$_POST['station1'].','.$Infos_Stn; } // station1 if ($_POST['station2']) { sscanf ($_POST['frequence2'],"%ikHz%s",$freq,$poubelle); // foreach beurk : a optimiser avec un while pas_trouve foreach ($liste_stn as $Nom => $Infos) { if (!strcmp($Nom,$_POST['station2'])) { $Infos_Stn = $Infos;} } $contenu_liste .= $freq.','.$_POST['station2'].','.$Infos_Stn; } // station2 if ($_POST['station3']) { sscanf ($_POST['frequence3'],"%ikHz%s",$freq,$poubelle); // foreach beurk : a optimiser avec un while pas_trouve foreach ($liste_stn as $Nom => $Infos) { if (!strcmp($Nom,$_POST['station3'])) { $Infos_Stn = $Infos;} } $contenu_liste .= $freq.','.$_POST['station3'].','.$Infos_Stn; } // station3 if ($_POST['station4']) { sscanf ($_POST['frequence4'],"%ikHz%s",$freq,$poubelle); // foreach beurk : a optimiser avec un while pas_trouve foreach ($liste_stn as $Nom => $Infos) { if (!strcmp($Nom,$_POST['station4'])) { $Infos_Stn = $Infos;} } $contenu_liste .= $freq.','.$_POST['station4'].','.$Infos_Stn; } // station4 if ($_POST['station5']) { sscanf ($_POST['frequence5'],"%ikHz%s",$freq,$poubelle); // foreach beurk : a optimiser avec un while pas_trouve foreach ($liste_stn as $Nom => $Infos) { if (!strcmp($Nom,$_POST['station5'])) { $Infos_Stn = $Infos;} } $contenu_liste .= $freq.','.$_POST['station5'].','.$Infos_Stn; } // station5 if ($_POST['station6']) { sscanf ($_POST['frequence6'],"%ikHz%s",$freq,$poubelle); // foreach beurk : a optimiser avec un while pas_trouve foreach ($liste_stn as $Nom => $Infos) { if (!strcmp($Nom,$_POST['station6'])) { $Infos_Stn = $Infos;} } $contenu_liste .= $freq.','.$_POST['station6'].','.$Infos_Stn; } // station6 if ($_POST['station7']) { sscanf ($_POST['frequence7'],"%ikHz%s",$freq,$poubelle); // foreach beurk : a optimiser avec un while pas_trouve foreach ($liste_stn as $Nom => $Infos) { if (!strcmp($Nom,$_POST['station7'])) { $Infos_Stn = $Infos;} } $contenu_liste .= $freq.','.$_POST['station7'].','.$Infos_Stn; } // station7 $fichier_nouvelle_liste = $rep_listes.$_POST['nom_liste'].'.lst'; file_put_contents ($fichier_nouvelle_liste,$contenu_liste); } } // gestion_configurations_memorisees // // Fonction gestion_ajout_station // Pour ajouter un flux et un nom de station // Nom : champ texte en saisie libre // Type : web/mp3/ext (1/2/3) // Source : url / nom de fichier // function gestion_ajout_station ($nom_fichier_stations) { ?>

Sélection de la liste : '; echo '

'; if (isset($_POST['nom_fichier']) && ($_POST['nom_fichier'] != "0")) { echo '',str_replace(".lst","",str_replace($repertoire_fichiers, "", $_POST['nom_fichier'])),''; $lignes = file ($_POST['nom_fichier']); $liste_freq = []; $freq_actives = ""; foreach ($lignes as $ligne) { $champs= explode (",",$ligne); $liste_freq[$champs[0]] = $champs[1].','.$champs[2]; } ksort($liste_freq); foreach ($liste_freq as $freq_station => $desc_station) { $ligne_station = explode (",",$desc_station); if ($freq_station) $freq_actives .= $freq_station . ' kHz - ' . $ligne_station[0] . '
'; else $freq_actives = $lignes_station[0].'
'; } echo $freq_actives,"
"; // la nouvelle liste de diffusion vient remplacer la liste active copy ($_POST['nom_fichier'],$fichier_actif); } // if isset nom_fichier echo '

'; } // selection_diffusion // // Fonction suppression_liste // Pour sélectionner une liste à supprimer // P.S. Je maudis l'auteur original de ce script. Aérez vos programmes! // function suppression_liste($repertoire_fichiers, $fichier_actif) { // On commence par lister tous les fichiers mémorisés (*.lst dans /media) $filtre_fichiers = $repertoire_fichiers . "*.lst"; $nbr_fichiers = 0; foreach (glob($filtre_fichiers) as $fichier) { $liste_fichiers[$nbr_fichiers] = $fichier; $nbr_fichiers++; } ksort($liste_fichiers); unset($fichier); // Construction de la liste déroulante $numero = 0; echo '

'; } // // Fonction gestion_parms_systeme // Pour gérer les paramètres système // function gestion_parms_systeme ($nom_fichier_wifi,$num_version) { echo "
AM8 - Version $num_version" ?>