lfile("".$log_fitxer.""); $comp_info = strpos($input,"infobot"); if($comp_info === false) { $log -> lwrite("Comentari sense etiqueta #infobot"); } else { // INFORME $titol = "INFORME ".date('d/m/y H:i:s',strtotime('now'))." 馃摎"; //versi贸 $entra = "Nom: ".$bot_nom." versi贸: ".$bot_versio."\n". "Registre: 1/12/2022."; //tuts publicats //publicaci贸 noticies $n_pub = shell_exec("cat ".$lloc."/fitxers/compte_pub.txt"); $s_pub = shell_exec("cat ".$lloc."/fitxers/compte_setm.txt"); $tuts_setm = ($n_pub - $s_pub); $d_pub = shell_exec("cat ".$lloc."/fitxers/data_pub.txt"); $publs = "Tuts publicats: ".$n_pub." de not铆cies.\n". "Esta setmana: ".$tuts_setm."\n". "El darrer el ".date("d/m/Y",$d_pub)." a les ".date("H:i:s",$d_pub).""; //connexi贸 web font $fitxer = $lloc."/fitxers/compte_vis.txt"; $conns = "Darrera connexi贸: ".date("d/m/Y H:i:s",(filemtime($fitxer))).""; $errada = shell_exec("cat ".$lloc."/fitxers/errada_cont.txt"); $errades = "Errades de connexi贸: ".($errada - 1); //estadistiques rebudes $imps_rg = shell_exec("wc -l ".$lloc."/fitxers/impulsos.txt"); $imps_rgm = explode(" ",$imps_rg); $nimp = $imps_rgm[0]; $menc_rg = shell_exec("wc -l ".$lloc."/fitxers/mencions.txt"); $menc_rgm = explode(" ",$menc_rg); $nmen = $menc_rgm[0]; $estad_reb = "Impulsos rebut: ".$nimp." (favorits i reblocs)\nMencions: ".$nmen." registrades."; //data properes estadistiques $espera_ob = fopen($lloc . "/fitxers/impulsos_temps.txt", "r") or die("No puc obrir la darrera data!"); $espera_ll = fread($espera_ob,filesize($lloc . "/fitxers/impulsos_temps.txt")); $espera_imp = $espera_ll; fclose($espera_ob); //echo "".$espera_imp." | ".date("r",($espera_imp))."\n"; setlocale(LC_ALL, 'ca_ES.UTF-8'); //$estads = "Estad铆stiques: propera publicaci贸 ".date("d/m/y H:i:s",$espera_imp)."."; $estads = "Estad铆stiques: propera publicaci贸 ".(strftime("%A %d/%m/%Y a les %H:%M:%S", $espera_imp))."."; //seguidors (ara i cent) $seguid = shell_exec("cat ".$lloc."/fitxers/seg_cont.txt"); $seguidc = shell_exec("cat ".$lloc."/fitxers/cents_cont.txt"); $segds = "Seguidors: ".$seguid." actuals.\n". (($seguid == $seguidc)?"脡s el m脿xim que n'he tingut.":"N'he tingut un m脿xim de ".$seguidc.""); // darrer seguidor // darrer comiat(?) //$com_tut = "#SocUnBot #InfoBot 馃摑"; $com_tut = "#SocUnBot 馃摑"; $men_resp = "@".$usuari."\n". $titol."\n". $entra."\n". $publs."\n". $conns." ". $errades."\n". $estad_reb."\n". $estads."\n". $segds."\n". $com_tut.""; // Publica a Mastodon $dades_tut = array( "status" => $men_resp, "language" => $llengua, "visibility" => $mis_vis, "in_reply_to_id" => $en_resposta ); PublicaMissatge($base_url,$headers,$dades_tut); } ?>