Carpeta a explorar \";
//definimos rutas
$ruta_winamp = \"c:\\archiv~1\\winamp\\winamp.exe\";
//modo normal nos muestra los ficheros mp3
if($_GET[modo] == \'\'){
//llamamos a la funcion buscar mp3 q nos localiza los mp3 contenidos en una carpeta y sus subcarpetas
if($_SESSION[ruta] == \'\'){
echo\"Introduce una ruta para buscar mp3\";
}else{
$ruta = $_SESSION[ruta];
echo \"Mp3 encontrados en $ruta \";
buscar_mp3($ruta);
if(count($a[\"total\"]) != 0){
//ordenamos el resultado
//sort($a);
//y mostramos lista de canciones con sus checkbox para seleccionar las q reproduciremos
echo\"\";
echo \"Total: \".count($a[\"total\"]).\'\';
}else{
echo \" No se encontraron archivos mp3 en este directorio ni en sus subdirectorios\";
}
}
}
//definimos nueva ruta para buscar mas mp3s
else if ($_GET[modo] == \'nueva_ruta\'){
if($_SESSION[ruta] == \'\'){
$_SESSION[ruta] = $definir_ruta;
echo\"\";
}else{
$_SESSION[\"ruta\"] = $_POST[\"definir_ruta\"];
echo\"\";
}
}
//lanzamos reproductor y creamos playlist
else if ($_GET[modo] == \'play\'){
$f1=fopen(\"playlist.m3u\",\"w+\");
for($aa=0;$aa<=72;$aa++){
if($check_play[$aa] != \'\'){
fwrite($f1,$check_play[$aa].\"\\n\");
}
}
fclose($f1);
system(\"$ruta_winamp playlist.m3u\");
echo\"\";
}
function buscar_mp3($ruta){
$f = opendir($ruta);//abrimos el directorio asignado
while($fichero = readdir($f)){
$ruta_y_fichero = $ruta.\"/\".$fichero;
if(($fichero != \'.\') AND ($fichero != \'..\')){//nos saltamos los directorio . y ..
if(is_dir($ruta_y_fichero)){//si el fichero analizado es una carpeta seguiremos buscando mas mp3s
buscar_mp3($ruta_y_fichero);
}else{
$extension = substr($ruta_y_fichero , -3, 3);//obtenemos la extension
$extension = strtolower($extension);//bajamos a minus para q piyen todos
if($extension == \'mp3\'){
if(count($a) == 0){
saca_id3($ruta_y_fichero);
}else{
saca_id3($ruta_y_fichero);
}
}
}
}
}
closedir($f);
}
function saca_id3($ruta_y_fichero){//obtenemos los id3 leyendo los ultimos 128 bytes del fichero mp3
$f1=fopen($ruta_y_fichero,\"r\");
$tamaņo = filesize($ruta_y_fichero);//obtenemos total bytes
$lee_hasta_aki = $tamaņo-128;//le restamos al total 128 q necesitamos
fseek($f1,$lee_hasta_aki);//nos istuamos en el primer de los 128 ultimos bytes
$id3=fread($f1,128);//obtenemos id3 completo
fclose($f1);
//miramos is el array contiene valores y definimos $a como global para poder acceder a ella
if(count($a) == 0){
global $a;
}
//separamos id3 por nombre y artista
$a[\"total\"][] = $ruta_y_fichero;
$a[\"nombre_fichero\"][] = substr($id3,3,29);
$a[\"$artist_fichero\"][] = substr($id3,33,29);
}
?>