// VERSIONE 2.3
error_reporting(501);
$controllochk=false;
$notifypm=true;
//Path fisici e valori di default
$PATH_MEDIA="/media/fileroot";
// $PATH_LOG="/usr/local/apache-2.0.54/logs/logs_pm"; // mettere vuoto se non si vuole tenere un log
$PATH_DEL="/media/cancellati";
$URL_PMFOTO="http://172.24.1.4:8080/pm/multimediac6/setNumeroFoto.jsp"; // esercizio
$URL_PMAV="http://172.24.1.4:8080/pm/multimediac6/setAttributoAudioVideo.jsp"; // esercizio
//$URL_PMFOTO="http://212.216.113.109:8080/pm/multimediac6/setNumeroFoto.jsp"; // collaudo
//$URL_PMAV="http://212.216.113.109:8080/pm/multimediac6/setAttributoAudioVideo.jsp"; // collaudo
$community="mu";
$profilo="f00";
$valore="";
$nickname="";
$mustcomp=true;
global $NOME_HOST;
$NOME_HOST="multimediatlantide.alice.it";
global $nickname;
// ######### Classificazione degli errori #########
$NOERR="200 OK";
// Errori nei parametri del form
$ERR_NONICK="401 Il campo nickname è vuoto";
$ERR_NOVALIDNICK="402 Il nickname inviato è troppo corto";
$ERR_NOVALIDTYPE="403 l'attribute_name inviato non è in un formato valido";
$ERR_NOVALIDVALUE="404 il campo attribute_value inviato non è in un formato valido";
// Errori nel checksum
$ERR_CHK="411 Non è stato inviata la stringa per il controllo MD5";
$ERR_MD5="412 Errore nella verifica del checksum del nickname";
// Errori nella comunicazione con il Profile Manager
$ERR_PM1="501 Errore di collegamento con il Profile Manager";
$ERR_PM2="502 Errore di risposta dal Profile Manager";
$ERR_PM3="503 Errore nell'esecuzione delle query sul Profile Manager";
// Errori nella cancellazione dei files
$ERR_FSUSERDIR="511 il nickname specificato non possiede una directory per i contenuti multimediali";
$ERR_FSBKDIR="512 Errore nella creazione della directory di backup";
$ERR_FSDEL="513 Errore nella cancellazione di uno o più files";
$errore=$NOERR;
// numero di estensioni differenti ( 0,x = immagini, 1,x = audio , 2,x = video )
global $NUMEXT;
$NUMEXT[0]=3;
$NUMEXT[1]=12;
$NUMEXT[2]=10;
// Estensioni permesse per i vari files ( 0,x = immagini, 1,x = audio , 2,x = video )
global $ESTENSIONI;
$ESTENSIONI[0][0]="jpg";
$ESTENSIONI[0][1]="jpeg";
$ESTENSIONI[0][2]="gif";
$ESTENSIONI[1][0]="aif";
$ESTENSIONI[1][1]="aifc";
$ESTENSIONI[1][2]="aiff";
$ESTENSIONI[1][3]="au";
$ESTENSIONI[1][4]="ra";
$ESTENSIONI[1][5]="ram";
$ESTENSIONI[1][6]="snd";
$ESTENSIONI[1][7]="wav";
$ESTENSIONI[1][8]="mp3";
$ESTENSIONI[1][9]="m3u";
$ESTENSIONI[1][10]="rm";
$ESTENSIONI[1][11]="rmm";
$ESTENSIONI[2][0]="m1v";
$ESTENSIONI[2][1]="mp2";
$ESTENSIONI[2][2]="mpa";
$ESTENSIONI[2][3]="mpe";
$ESTENSIONI[2][4]="mpeg";
$ESTENSIONI[2][5]="mpg";
$ESTENSIONI[2][6]="mov";
$ESTENSIONI[2][7]="qt";
$ESTENSIONI[2][8]="avi";
$ESTENSIONI[2][9]="3gp";
// NON MODIFICARE NULLA DA QUESTO PUNTO IN POI !!!!!
$today = getdate();
$data = $today['year'] . "-" . substr( "0" . $today['mon'] , -2) . "-" . substr( "0" . $today['mday'] , -2);
$ora = substr( "0" . $today['hours'] , -2) . "-" . substr( "0" . $today['minutes'] , -2) . "-" . substr( "0" . $today['seconds'] , -2);
$chk = urldecode($HTTP_GET_VARS['chk']);
$nickname = urldecode($HTTP_GET_VARS[nickname]);
if ($HTTP_GET_VARS[community] != "") $community = strtolower(urldecode($HTTP_GET_VARS[community]));
if (strtolower(urldecode($HTTP_GET_VARS['mustcomp'] == "no"))) $mustcomp = false;
if (strtolower(urldecode($HTTP_GET_VARS['notifypm'] == "no"))) $notifypm = false;
if (urldecode($HTTP_GET_VARS['attribute_name']) != "") $profilo = strtolower(urldecode($HTTP_GET_VARS['attribute_name']));
if (urldecode($HTTP_GET_VARS['attribute_value']) != "") $valore = strtolower(urldecode($HTTP_GET_VARS['attribute_value']));
$path="";
$path2="";
// ########## Verifica dati inseriti ##########
// Nel caso sia stato popolato il campo attribute_valore lo uso per recuperare nickname e profilo
if ($valore != "") {
$filename = substr(strrchr($valore , "/") , 1);
$profilo = substr(strrchr($filename , ",") , 1 , 3);
$nickname = substr($filename , 0 , strpos($filename , ","));
if ($nickname == "" || $profilo == ""){
$errore = $ERR_NOVALIDVALUE;
}
}
// Verifica Nickname non nullo e di lunghezza >= 2
If ($errore == $NOERR){
if($nickname == ""){
$errore = $ERR_NONICK;
} elseif(strlen($nickname)<2){
$errore = $ERR_NOVALIDNICK;
}
}
// Verifica del campo attribute name
if ($errore == $NOERR) {
if(strlen($profilo)==3 && ($profilo=="all" || ((substr($profilo,0,1)=="f" || substr($profilo,0,1)=="a" || substr($profilo,0,1)=="v") && is_numeric(substr($profilo,-2))))){
// Profilo a posto
} else $errore = $ERR_NOVALIDTYPE;
}
// Controllo del checksum MD5 del nickname
if ($errore == $NOERR && $controllochk) {
if($chk == ""){
$errore=$ERR_CHK; // decommentare in seguito
}else{
$salt=substr($chk,0,8);
$contr= (md5($nickname.$salt,false));
if ($salt.$contr != $chk) $errore=$ERR_MD5;
}
}
// Controllo che il nickname indicato abbia una cartella di contenuti e creo la cartella di backup
if ($errore == $NOERR){
$path = $PATH_MEDIA . "/" . $community . "/" . $nickname{0} . "/" . substr($nickname , -2) . "/" . $nickname;
$path2 = "";
if (is_dir($path)) {
// Se richiesto preparo la cartella per il backup dei files
if($PATH_DEL != "") {
if(!is_dir("$PATH_DEL/$data")) mkdir("$PATH_DEL/$data", 0777);
if(!is_dir("$PATH_DEL/$data/$ora")) mkdir("$PATH_DEL/$data/$ora", 0777);
if(!is_dir("$PATH_DEL/$data/$ora/$nickname")) mkdir("$PATH_DEL/$data/$ora/$nickname", 0777);
if (!is_dir("$PATH_DEL/$data/$ora/$nickname")){
$errore = $ERR_FSBKDIR;
} else {
$path2 = "$PATH_DEL/$data/$ora/$nickname";
}
}
} else {
$errore = $ERR_FSUSERDIR;
}
}
// Procedo a spostare o cancellare i files
if ($errore == $NOERR){
$contatore = 0;
if ($profilo!="all"){
$contatore = $contatore + process_content($path , $path2 , "$nickname," . $profilo);
} else {
$contatore = $contatore + process_content($path , $path2 , "$nickname,f00");
$contatore = $contatore + process_content($path , $path2 , "$nickname,f01");
$contatore = $contatore + process_content($path , $path2 , "$nickname,f02");
$contatore = $contatore + process_content($path , $path2 , "$nickname,f03");
$contatore = $contatore + process_content($path , $path2 , "$nickname,f04");
$contatore = $contatore + process_content($path , $path2 , "$nickname,f05");
$contatore = $contatore + process_content($path , $path2 , "$nickname,a00");
$contatore = $contatore + process_content($path , $path2 , "$nickname,v00");
}
if ($contatore < 0) {
$errore = $ERR_FS;
} else {
rmdir($path); //cancello la directory vuota
if($mustcomp) compatta_foto("$path/$nickname,");
}
}
// comunicazione con il profile manager
if ($errore == $NOERR && $notifypm){
$tipofile= get_type(substr($profilo , -3 , 1 ));
$nick=urlencode($nickname);
$community=strtoupper($community);
if($tipofile == 0){ //foto
$numfoto=conta_foto("$path/$nickname,");
$sFile = file_get_contents("$URL_PMFOTO?nickname=$nick&comunita=$community&numerofoto=$numfoto");
error_log("$URL_PMFOTO?nickname=$nick&comunita=$community&numerofoto=$numfoto
");
}else{ //audio o video
$filename = urlencode("/contenuti/$nickname,$profilo.mp3");
if($tipofile == 1){
$nomeattributo="audio";
}else{
$nomeattributo="video";
}
$sFile = file_get_contents("$URL_PMAV?nickname=$nick&comunita=$community&nomeattributo=$nomeattributo&valoreattributo=$filename&cmd=delete");
error_log("$URL_PMAV?nickname=$nick&comunita=$community&nomeattributo=$nomeattributo&valoreattributo=$filename&cmd=delete
");
}
if($sFile){
if(strlen($sFile)>2){
if(substr($sFile,0,3)!="200") $errore = $ERR_PM3;
}else{
$errore = $ERR_PM2;
}
}else{
$errore = $ERR_PM1;
}
}
// Stampa a video del risultato dell'operazione
//if ($errore != $NOERR){
error_log("DELETE: ".$nickname." ".$errore);
// }
echo $errore;
exit;
// Funzione per lo spostamento di un contenuto
function process_content($path1 , $path2 , $fileprefix) {
global $NUMEXT;
global $ESTENSIONI;
$pcont = 0;
$tipofile= get_type(substr($fileprefix , -3 , 1 ));
$pcont = $pcont + process_file($path1 , $path2 , "$fileprefix.html");
for ($ne = 0; $ne < $NUMEXT[$tipofile]; $ne++ ) {
$pcont = $pcont + process_file($path1 , $path2 , "$fileprefix.". $ESTENSIONI[$tipofile][$ne]);
}
if ($tipofile==0){
$pcont = $pcont + process_file($path1 , $path2 , substr_replace($fileprefix , "i" , -3 , 1) . ".jpg");
$pcont = $pcont + process_file($path1 , $path2 , substr_replace($fileprefix , "t" , -3 , 1) . ".jpg");
$pcont = $pcont + process_file($path1 , $path2 , substr_replace($fileprefix , "c" , -3 , 1) . ".jpg");
$pcont = $pcont + process_file($path1 , $path2 , substr_replace($fileprefix , "n" , -3 , 1) . ".jpg");
}
return $pcont;
}
// Funzione per lo spostamento dei singoli files
function process_file($p1,$p2,$fn) {
if ( is_file( "$p1/$fn" )) {
if(is_dir($p2)) copy("$p1/$fn" , "$p2/$fn");
unlink( "$p1/$fn" );
if ( is_file( "$p1/$fn" )) {
return -999;
} else {
return 1;
}
}else {
return 0;
}
}
// funzione per la "compattazione" delle foto
function compatta_foto($uri) {
$maxfoto = 6;
$firstempty = 0;
global $NUMEXT;
global $ESTENSIONI;
global $NOME_HOST;
global $nickname;
for ($co=0; $co<($maxfoto); $co++) {
if (is_file($uri."f0".$co.".html")){
if ($firstempty < $co){ //sposta
unlink($uri."f0".$co.".html");
for ($ne = 0; $ne < $NUMEXT[0]; $ne++ ) {
if(is_file($uri."f0".$co.".".$ESTENSIONI[0][$ne])){
rename($uri."f0".$co.".".$ESTENSIONI[0][$ne],$uri."f0".$firstempty.".".$ESTENSIONI[0][$ne]);
make_html($uri."f0".$firstempty.".html","http://$NOME_HOST/contenuti/$nickname,f0$firstempty.".$ESTENSIONI[0][$ne]);
}
}
if(is_file($uri."i0".$co.".jpg")) rename($uri."i0".$co.".jpg",$uri."i0".$firstempty.".jpg");
if(is_file($uri."t0".$co.".jpg")) rename($uri."t0".$co.".jpg",$uri."t0".$firstempty.".jpg");
if(is_file($uri."c0".$co.".jpg")) rename($uri."c0".$co.".jpg",$uri."c0".$firstempty.".jpg");
if(is_file($uri."n0".$co.".jpg")) rename($uri."n0".$co.".jpg",$uri."n0".$firstempty.".jpg");
}
$firstempty++;
}
}
return true;
}
//funzione per creare i files html di reindirizzamento
function make_html($file,$url){
$fileout=fopen ($file ,"w");
if($fileout) {
fwrite($fileout,"\n");
fwrite($fileout,"