/*
(C) Javier Montes <kalimocho@gmail.com> 

Twitter: @mooontes
Web: http://mooontes.com

Written for: http://www.furgovw.org

This code is licensed under GPL 2.0 http://www.gnu.org/licenses/gpl-2.0.html

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
THE SOFTWARE.
*/

//Set here forums you don't want to have topics shown on hottest topics
$notShowThisForumIDs = array(50, 46, 71, 29, 43, 136, 57, 58, 56, 49, 120, 133, 128, 122, 65, 85);

global $smcFunc;

$sql = '
	SELECT
		value
	FROM {db_prefix}settings
	WHERE variable = "furgovw_hottest_topics"';

$result = $smcFunc['db_query']('', $sql);

if ($row = $smcFunc['db_fetch_assoc']($result)) {

	$hottestTopics = unserialize($row['value']);

	if (($hottestTopics[0]['time'] + (60 * 15)) < time()) {
		$hottestTopics = getHottestTopics($smcFunc, $notShowThisForumIDs);
	}

} else {

	$hottestTopics = getHottestTopics($smcFunc, $notShowThisForumIDs);

}

showHottestTopicsTable($smcFunc, $hottestTopics);

function getHottestTopics($smcFunc, $notShowThisForumIDs)
{
	$hottestTopics = array();

	$sql = '
		SELECT
			COUNT(*) AS total,
			m.id_topic AS id_topic,
			t.id_first_msg AS id_first_msg
		FROM {db_prefix}messages AS m
		LEFT JOIN {db_prefix}topics AS t
		ON m.id_topic = t.id_topic
		WHERE
		t.id_board NOT IN (' . implode(',', $notShowThisForumIDs) . ')
		AND (FROM_UNIXTIME(m.poster_time) > DATE_SUB(DATE(NOW()), INTERVAL 24 HOUR))
		GROUP by m.id_topic
		ORDER BY total DESC
		LIMIT 10
		';

	$result = $smcFunc['db_query']('', $sql);

	while ($row = $smcFunc['db_fetch_assoc']($result)) {
		$hottestTopics[] = $row;
	}

	if (is_array($hottestTopics)) {
		$hottestTopics[0]['time'] = time();

		$smcFunc['db_insert']('replace',
            '{db_prefix}settings',
            array(
                'variable' => 'string', 'value' => 'string',
            ),
            array(
                'furgovw_hottest_topics', serialize($hottestTopics),
            ),
            array('variable')
        );

		return $hottestTopics;
	} else
		die('Error getting stats');
}

function showHottestTopicsTable($smcFunc, $hottestTopics)
{
	echo '<table style="clear:both;margin:0 auto;">';

	foreach ($hottestTopics as $hottestTopic) {

		$sql = '
			SELECT
				m.subject,
				m.poster_name,
				m.id_member,
				t.id_last_msg
			FROM {db_prefix}messages AS m
			LEFT JOIN {db_prefix}topics AS t
			ON m.id_topic = t.id_topic
			WHERE m.id_topic = ' . $hottestTopic['id_topic'];

		$result = $smcFunc['db_query']('', $sql);
		$row = $smcFunc['db_fetch_assoc']($result);

   		echo '
   			<tr>
   				<td align="right">
   					<h2> ['.$hottestTopic['total'].' resp. hoy] </h2>
   				</td>
   				<td>
   					<h2>
    					<a href="/index.php?topic='.
    						$hottestTopic['id_topic'].
    						'.msg'.$row['id_last_msg'].
    						';topicseen#new">'.$row['subject'].
    						'</a>
  					</h2>
  				</td>
  			</tr>';
	}

	echo '</table>';
}

En nuestro caso tenemos un foro con SMF2 y un movimiento de unos 1.200 mensajes diarios, con lo que realizar esta tarea manualmente (que es la única alternativa que queda) se hace bastante pesado.

La solución que he encontrado es escribir un pequeño programa en PHP que se ejecutará una vez al día gracias a cron y que realizará esta tarea por nosotros.

Lo que hace este script es comprobar el tamaño de las fotos de los mensajes que se han escrito durante las últimas 24 horas y en el caso de que el tamaño exceda los 800 pixels de ancho, sustituirá la etiqueta [IMG] por [IMG width=800], lo que evitará esas fotos gigantes que estropean la normal lectura del foro, además nos enviará un correo con la lista de mensajes que haya modificado.

Este es el script (bajo licencia CC como es habitual por aquí). Sólo ha sido testeado con SMF2, aunque no creo que haya mucho problema para hacerlo funcionar con SMF1.

Para hacerlo funcionar en vuestro servidor sólo tenéis que modificar la primera línea require_once con la ruta de vuestro Settings.php de SMF, la segunda línea asignando la variable $to al correo donde queréis recibir el resumen diario de mensajes modificados y la tercera línea asignando a $url_foro la dirección de vuestro foro. Y luego por supuesto añadir la tarea para que se ejecute diariamente.

	//***
	//Creado Junio 2009 por Montes http://mooontes.com
	//Bajo licencia http://creativecommons.org/licenses/by/3.0/es/deed.es
	//***
	require_once("/ruta/Settings.php");  //la configuracion de la BD la cogemos del archivo de configuracion de SMF
	$to = "correo@mail.com";
	$url_foro = "www.foro.com";

	$mysqli = new mysqli($db_server,$db_user,$db_passwd,$db_name);

	$mail = "Fotos modificadas hoy ".date("d/m/Y")."\n\n";

	//Comprobamos conexion
	if (mysqli_connect_errno())
	{
		printf("Connect failed: %s\n", mysqli_connect_error());
		exit();
	}	

	//Buscamos todos los mensajes con fotos de las ultimas 24 horas
	$sql = "SELECT id_msg,id_topic,body FROM smf_messages WHERE DATE(FROM_UNIXTIME(poster_time))".
			"> DATE_SUB(DATE(NOW()), INTERVAL 1 DAY) AND body LIKE '%[IMG]http%'";
	if ($result = $mysqli->query($sql))
	{
		while($row = $result->fetch_assoc())
		{
			$body = $row["body"];
			echo "\n****msg: ".$row["id_msg"]." topic: ".$row["id_topic"].", buscando imagenes...\n\n";

			//Comprobamos imagen x imagen
			preg_match_all("%\[img\]([^\[]*)\[/img\]%i", $row["body"], $encuentra, PREG_PATTERN_ORDER);
			for ($j = 0; $j < count($encuentra[1]); $j++)
			{
				echo "una foto: ".$encuentra[1][$j]."\n";
				if (list($ancho, $altura, $tipo, $atr) = getimagesize($encuentra[1][$j]))
				{
					echo "ancho: ".$ancho." alto: ".$altura."\n";
					if ($ancho > 800)
					{
						echo "Tamanyo mayor de 800, vamos a reemplazar...\n";
						//Mas ancha de 800 pixels? anyadimos width=800
						$body = str_ireplace("[img]".$encuentra[1][$j]."[/img]", "[img width=800]".$encuentra[1][$j]."[/img]", $body);
						//actualizamos en la bd
						$bodys = addslashes($body);
						$sql = "UPDATE smf_messages SET body = '".$bodys.
							"', modified_time=UNIX_TIMESTAMP(), modified_name='bot' WHERE id_msg = ".$row["id_msg"];
						$mysqli->query($sql);
						echo "Actualizada la BD\n";
						$mail .= "Modificada foto en: http://".$url_foro
						."/index.php?topic=".$row["id_topic"].".msg".
						$row["id_msg"]."#msg".$row["id_msg"]."\n";
					}
				}
				else
				{
					echo "Tamanyo desconocido\n";
				}
			}
		}
	}

    $result->close();
    unset($row);
    unset($sql);
    unset($query);

	if ($mail != "Fotos modificadas hoy ".date("d/m/Y")."\n\n")
	{
		$subject = "Fotos arregladas dimensiones ".date("d/m/Y");
		if (mail($to, $subject, $mail))
		{
			echo("Mensaje enviado\n");
		}
		else
		{
			echo("Fallo al enviar mensaje...\n");
		}
	}