Subir archivos a 'utils'

This commit is contained in:
bonobo 2024-08-21 20:54:10 +02:00
pare b404caa55b
commit 91bd3028b9

Veure arxiu

@ -21,7 +21,9 @@ $log = new Logging();
$log->lfile(''.$log_fitxer.'');
$log->lwrite("Arranque la benvinguda.");
if($control_memoria_utils == 1) {
$log -> lwrite ( mostra_us_memoria()." ".mostra_pic_memoria() );
}
$seg_bot = ConsultaSeguidors($base_url,$id_cmpt,$headers);
$seguidors = $seg_bot;
@ -44,7 +46,6 @@ $nseg_ant = fread($nseg_lle,filesize($lloc."/fitxers/seg_cont.txt"));
fclose($nseg_lle);
if($seguidors <> $nseg_ant) {
$voltes = ($seguidors/$limit);
// for per fer els fitxers de seguidors actual
@ -124,7 +125,7 @@ if($seguidors <> $nseg_ant) {
fclose($escriu_f);
//guarda la id i els detalls del novingut
$escriu_d = fopen($lloc."/fitxers/seguidors_detall_act.txt", "a") or die("No puc escriure al registre!");
fwrite($escriu_d, "".$usu."-".$usu_nom."-".$usu_act."\n");
fwrite($escriu_d, "".$usu."-|-".$usu_nom."-|-".$usu_act."\n");
fclose($escriu_d);
}
@ -137,7 +138,7 @@ if($seguidors <> $nseg_ant) {
//print_r($seguidors_matriu);
// guarda fitxer filtrat en format json
//$fes_json = json_encode($seguidors_matriu);
$fes_json = json_encode($seguidors_matriu, JSON_UNESCAPED_UNICODE|JSON_UNESCAPED_SLASHES);
$fes_json = json_encode($seguidors_matriu, JSON_UNESCAPED_UNICODE|JSON_UNESCAPED_SLASHES|JSON_PRETTY_PRINT);
$escriu_d_json = fopen($lloc."/fitxers/seguidors_detall_act.json", "a") or die("No puc escriure al registre!");
fwrite($escriu_d_json, $fes_json);
fclose($escriu_d_json);
@ -161,7 +162,7 @@ if($seguidors <> $nseg_ant) {
for ($s=0;$s<$reg_seg;$s++) {
// una altra opció: convertir en matriu cada linia del fitxer act
$usu_nou = $eixida_seg_nou[$s];
$usu_nou_m = explode("-",$usu_nou);
$usu_nou_m = explode("-|-",$usu_nou);
// triat a partir del fitxer
$usu = $usu_nou_m[0];
@ -179,21 +180,28 @@ if($seguidors <> $nseg_ant) {
// echo "NO escric al fitxer.\n";
} else {
// echo $s." usu: ". $usu." ".$usu_nom." NOU!! :: \n";
$log->lwrite("NOU SEGUIDOR: (".$seguidors.") ".$usu." ".$usu_nom."");
// $log->lwrite("NOU SEGUIDOR: (".$seguidors.") ".$usu." ".$usu_nom."");
$log->lwrite("NOU SEGUIDOR: (".($nseg_ant+1).") ".$usu." ".$usu_nom."");
// envie un missatge de benvinguda
$moment = strtotime("now");
if (is_int($moment/2)) {
if (is_int($moment/3)) {
if (is_int($seguidors/10)) {
$publicacio = "Gràcies per seguir-me @".$usu_act." :paisoscat:🌍. Ets el seguidor/a que fa ".$seguidors.". Sóc un compte automàtic. Confie en que gaudisques dels continguts.\n".$bot_nom." v".$bot_versio."";
$publicacio = "Xé que bò! @".$usu_act." :paisoscat:🌍. Ets la que fa ".$seguidors." de la llista de persones seguidores. Sóc un compte automàtic. Confie en que gaudisques dels continguts.\nPots enviar-me un tut amb la etiqueta #saludabot per conèixer més utilitats.\n".$bot_nom." v".$bot_versio."";
} else {
$publicacio = "Gràcies per seguir-me @".$usu_act." :paisoscat:🌍. Sóc un compte automàtic. Confie en que gaudisques dels continguts.\n".$bot_nom." v".$bot_versio."";
$publicacio = "Xé que bò! @".$usu_act." :paisoscat:🌍. Sóc un compte automàtic. Confie en que gaudisques dels continguts.\nPots enviar-me un tut amb la etiqueta #saludabot per conèixer més utilitats.\n".$bot_nom." v".$bot_versio."";
}
} elseif (is_int($moment/2)) {
if (is_int($seguidors/10)) {
$publicacio = "Gràcies per seguir-me @".$usu_act." :paisoscat:🌍. Ets la que fa ".$seguidors." de la llista de persones seguidores. Sóc un compte automàtic. Confie en que gaudisques dels continguts.\nSi vols saber més detalls, envia'm un tut amb #saludabot\n".$bot_nom." v".$bot_versio."";
} else {
$publicacio = "Gràcies per seguir-me @".$usu_act." :paisoscat:🌍. Sóc un compte automàtic. Confie en que gaudisques dels continguts.\nSi vols saber més detalls, envia'm un tut amb #saludabot\n".$bot_nom." v".$bot_versio."";
}
} else {
if (is_int($seguidors/10)) {
$publicacio = "Ei! @".$usu_act." Ets el seguidor/a que fa ".$seguidors.". Has arribat a un compte automàtic. \nPublique l'actualitat :paisoscat: 🌍 i m'alegra que ho compartisques.\n".$bot_nom." v".$bot_versio."";
$publicacio = "Ei! @".$usu_act." Ets la que fa ".$seguidors." de les persones seguidores. Has arribat a un compte automàtic. \nPublique l'actualitat :paisoscat: 🌍 i m'alegra que ho compartisques.\nPodràs saber més detalls quan m'envies un tut amb #saludabot\n".$bot_nom." v".$bot_versio."";
} else {
$publicacio = "Ei! @".$usu_act." Has arribat a un compte automàtic. \nPublique l'actualitat 🌍 :paisoscat: i m'alegra que ho compartisques.\n".$bot_nom." v".$bot_versio."";
$publicacio = "Ei! @".$usu_act." Has arribat a un compte automàtic. \nPublique l'actualitat 🌍 :paisoscat: i m'alegra que ho compartisques.\nPodràs saber més detalls quan m'envies un tut amb #saludabot\n".$bot_nom." v".$bot_versio."";
}
}
@ -205,6 +213,7 @@ if($seguidors <> $nseg_ant) {
PublicaMissatge($base_url,$headers,$tut_dades);
$nseg_ant++;
// guarda la id del novingut
$escriu_f = fopen($lloc."/fitxers/seguidors.txt", "a") or die("No puc escriure al registre!");
fwrite($escriu_f, $usu."\n");
@ -212,14 +221,12 @@ if($seguidors <> $nseg_ant) {
//guarda la id i els detalls del novingut
//(el desactive per mantindre els registres antics i contrastar amb els actuals al comiat)
$escriu_d = fopen($lloc."/fitxers/seguidors_detall.txt", "a") or die("No puc escriure al registre!");
fwrite($escriu_d, $usu."-".$usu_nom."-".$usu_act."\n");
fwrite($escriu_d, $usu."-|-".$usu_nom."-|-".$usu_act."\n");
fclose($escriu_d);
}
}
//final benvinguda
//}
//if($seguidors < $nseg_ant) {
// final benvinguda
// comparar fitxer registre amb actual per fer comiat
// es compara el fitxer existent amb l'actualitzat
@ -232,7 +239,7 @@ if($seguidors <> $nseg_ant) {
$maxim = count($eixida_seg_ant);
for($w=0;$w<$maxim;$w++) {
$seg_ant = $eixida_seg_ant[$w];
$seg_ant_m = explode("-",$seg_ant);
$seg_ant_m = explode("-|-",$seg_ant);
// print_r($seg_ant_m);
$seg_ant_v = $seg_ant_m[0];
$seg_ant_n = $seg_ant_m[1];
@ -320,4 +327,10 @@ $dur_bc = $tempsbcf - $tempsbc;
$log->lwrite("Temps de benvinguda i comiat: ". round($dur_bc,4)." segons.");
//echo "Temps de benvinguda i comiat: ". round($dur_bc,4)." segons.\n";
//echo "FIN \n";
if($mem_net == 1) {
$seg_bot = null; $seg_mat = null; $eixida_seg_ant = null;
unset($seg_bot,$seg_mat,$eixida_seg_ant);
}
if($control_memoria_utils == 1) { $log -> lwrite ( mostra_us_memoria()." ".mostra_pic_memoria() ); }
?>