lfile(''.$log_fitxer.''); // per quan trasllade aqui la decisió de fer el comentari des de bot_plus $log->lwrite("Estan activats els comentaris."); $arrancat = 0; //$log->lwrite("lloc rebut: ".$lloc.""); //$log->lwrite("data_ina: ".$data_ina." - data_dif: ".$data_dif.""); if ( $data_ina >= $data_dif) { $log -> lwrite("Arranque comentaris: ".$data_ina." (".gmdate("H:i:s", ($data_ina))." h)"); $arrancat = 1; // obtindre els perfils dels seguidors cal curl // GET https://mastodon.example/api/v1/accounts/:id/followers HTTP/1.1 $instancia = "mastodont.cat"; $creador = "https://mastodont.cat/@bonobo"; $inscrit = "1/12/2022"; // activar comentari (private) als seguidors d'inactivitat // llegir data de la darrera publicació $com_lle = fopen($lloc."/fitxers/com_pub.txt", "r") or die("No puc obrir la darrera data!"); $com_ant = fread($com_lle,filesize($lloc."/fitxers/com_pub.txt")); fclose($com_lle); $espera_coment2 = strtotime($espera_coment2); $com_ara2 = strtotime("now"); $com_ara3 = ($com_ara2 + rand(-3,3)); // echo "com_ant: ".$com_ant."\n"; // echo "com_com: ".$espera_coment."\n"; // echo "com_ara: ".$com_ara."\n"; $com_dif = ($espera_coment2 - $com_ara2); // echo "com_dif: ".$com_dif."\n"; $com_ina = ($com_ara2 - $com_ant); // echo "Inactiu el comentari: ".$com_ina." | ".date("H:i:s",($com_ina-3600))." h | ".$com_dif." \n"; // echo "data_ina: ".$data_ina."\n"; // $inact_pub = $com_ina + 28800; // echo "inact_pub: ".$inact_pub."\n"; if ($com_ina > $com_dif) { // echo "Active - temps superat = ".($com_ina > $com_dif)."\n"; // publique sequencialment un missatge per inactivitat //cal triar un nombre pel divisor. Només si la divisió dona numero sencer es publicarà. (1 tots, 2 la meitat, 3 un de cada tres, ...) $data_ina_mod = $data_ina + (rand(-300,300)); $publicacio = null; if ( is_int($com_ara3/7)) { // $dic = "Soc ".$bot_nom.". Continue actiu, :cli_user: amb la versió ".$bot_versio." i vaig registrar-me el ".$inscrit.".\nAra fa ".date("H:i:s",($data_ina_mod-HoraGmt()))." hores que no hi han novetats per publicar de ".$web_of." 🖥️ .\n#SocUnBot 🤖"; $directori = $lloc."/fitxers/"; $compta_fitxers = count(glob($directori . "*")); $fitxers = shell_exec("du -h -s ".$directori); $fit_mat = str_split($fitxers, 4); //echo "There were $compta_fitxers"; $dic = "Fa ".gmdate("H:i:s",$data_ina_mod)." hores que no publique tuts d'actualitat de ".$web_of.".\n". "Als meus fitxers, ".$compta_fitxers." en tinc, guarde ".$fit_mat[0]." de dades.\n". "#SocUnBot\n". $bot_nom." v".$bot_versio."\n"; } elseif ( is_int($com_ara3/5)) { $dic = ":cli_user: Continue actiu des del ".$inscrit.".\nAra fa ".gmdate("H:i:s",($data_ina_mod))." hores que no hi ha novetats per publicar. 🖥️ ".$bot_nom." v".$bot_versio." \n#SocUnBot 🤖"; } elseif ( is_int($com_ara3/3)) { // $dic = "La darrera publicació la vaig fer fa ".date("H:i:s",($data_ina_mod-HoraGmt()))."\n".$bot_nom." ".$bot_versio." :cli_user:.\n#SocUnBot 🤖"; $sensors = shell_exec("sensors"); $faig_ma = explode("\n",$sensors); $dic = "La darrera publicació la vaig fer fa ".gmdate("H:i:s",($data_ina_mod))."\n". "Esta és la temperatura dels meus processadors :cli_user:.\n". $faig_ma[3]."\n". $faig_ma[4]."\n". "#SocUnBot\n". $bot_nom." v".$bot_versio."\n"; } elseif ( is_int($com_ara3/2)) { // $dic = " ".$bot_nom." ".$bot_versio."\n".date("H:i:s",($data_ina_mod-HoraGmt()))." sense publicar novetats de ".$web_of." 🖥️ .\n#SocUnBot 🤖"; $prev_oratge = shell_exec("ansiweather_mst -a false -l Aigües,ES -H true -s true -d true"); $faig_m = explode("-",$prev_oratge); $dic = "Fa ".gmdate("H:i:s",($data_ina_mod))." que no he publicat cap tut.\n". "Esta és la previsió de l'oratge ara mateix a la localitat on està el meu servidor. :cli_user:\n". $faig_m[0]."\n". $faig_m[1]."\n". $faig_m[2]."\n". $faig_m[3]."\n". $faig_m[4]."\n". $faig_m[5]."\n". $faig_m[6]."\n". $faig_m[7]."\n". // $faig_m[8]."\n". "#SocUnBot #Oratge\n". $bot_nom." v".$bot_versio."\n"; } else { // $dic = "ping 🖥️ .\nTemps d'inactivitat:".date("H:i",$data_ina)."\n #SocUnBot "; $dic = "ping 🖥️ .\n ".$bot_nom." v".$bot_versio."\n#SocUnBot"; } $publicacio = $dic; // echo "publicació: ".$publicacio."\n"; if ($publicacio != null) { // echo "Entre a publicar es cert - ".($publicacio != null)."\n"; // $log->lwrite("Entre a publicar ".($publicacio != null).""); // publicar (copiat de bot.php) // Publica a Mastodon // $headers = [ // 'Authorization: Bearer ' . $token // ]; $dades_tut = array( "status" => $publicacio, "language" => $llengua, "visibility" => $visib_com ); // echo print_r($status_data); // $log->lwrite(print_r($status_data)); PublicaMissatge($base_url,$headers,$dades_tut); // echo "matriu resposta: \n"; // echo print_r($comentari_resposta)."\n"; // guarde la data de publicació de comentari // actualitze strtotime del comentari publicat $com_t = fopen("".$lloc."/fitxers/com_pub.txt", "w") or die("No puc obrir la darrera data!"); // $com_tem = fread($com_t,filesize("".$lloc."/fitxers/com_pub.txt")); $nou_tem = strtotime("now"); // echo "nou_tem: ".$nou_tem."\n"; fwrite($com_t, $nou_tem); fclose($com_t); // echo "comentari (bis): ".$publicacio.""; $log->lwrite($publicacio); } else { // echo "No active "; // echo "No publique per pausa interna."; $log->lwrite("No publique per pausa interna."); // no fer res } } else { //echo "Inactiu el comentari: ".$com_ina." | ".date("H:i:s",($com_ina-3600))." h | ".$com_dif." \n"; // llegir el temps de publicació de comentari i calcular el que resta per pausa interna if($arrancat == 1) { $log->lwrite("Inactiu el comentari: ".$com_ina." (".gmdate("H:i:s",($com_ina))." h) | ".$com_dif." (".gmdate("H:i:s",($com_dif) ).")"); } } // final condició temps inactivitat } //if ( (($data_dif - $data_ina) <= 3900)&&(($data_dif - $data_ina) < $espera_coment2) ) { if ( (($data_dif - $data_ina) <= 3840) ) { // diferenciar entre pausa de publicació (externa) i el temps d'espera entre comentaris. (PER FER) // $log->lwrite("A ".date("H:i:s",($data_dif-$data_ina)-HoraGmt())." hores d'arrancar els comentaris."); if($arrancat == 0) { $log->lwrite("A ".gmdate("H:i:s",($data_dif-$data_ina))." hores d'arrancar els comentaris."); } } $tcf = microtime(true); $dc = $tcf - $tc; //echo "\nTemps comentari dins: ".round($dc,4)." "; $log->lwrite("Temps comentari: ".round($dc,4).""); ?>