Extension:Links/es

From MediaWiki.org

Jump to: navigation, search
MediaWiki Extension
Crystal Clear action run.png
Links

Estado release: stable

Links.png
Implementación Special page
Descripción Para crear Links al azar
Autor(es) Hidalgo Rionda (Hsilamot talk)
Versión 1.1.39 (06 Jul 2007)
MediaWiki 1.10.0
Descarga Desde el sitio del Autor
Parámetros $wgLinksTotal

$wgLinksRand $wgLinksRandMin $wgLinksRandMax $wgLinksTldRand $wgLinksTlds $wgLinksTld $wgLinksHTML $wgLinksHTMLs

Ejemplo aqui

[edit] ¿Qué hace esta extensión?

Genera una lista de Vinculos al azar, con opciones personalizables

[edit] Uso

Como cualquier otra página especial [[Especial:Links]]

[edit] Instalación

Solo extrae el contenido del Zip y añade la siguiente linea

 require_once( "{$IP}/extensions/Links/Links.php" );


a tu archivo LocalSettings.php.

[edit] Parametros

 $wgLinksTotal = 1024;

La cantidad total de links que se generarán

 $wgLinksRand = true;

La cantidad de caracteres de la URL será al azar? En caso negativo $wgLinksRandMin queda sin propósito y el numero de caracteres en la URL es fijo al valor de $wgLinksRandMax

 $wgLinksRandMin = 5;

Si $wgLinksRand es positivo entonces este es el minimo de caracteres en la URL

 $wgLinksRandMax = 12;

Este es el Máximo de caracteres en la URL, si $wgLinksRand es negativo este se convertira en el número de caracteres en la URL (No el máximo)

 $wgLinksTldRand = true;

El TLD del Dominio debe seleccionarse al azar?

En caso Positivo $wgLinksTld queda sin uso y $wgLinksTlds es la lista de TLD's de la cual se seleccionara un TLD al azar

En caso Negativo $wgLinksTlds queda sin uso y $wgLinksTld es el TLD que se usa para todas la URL Generadas

 $wgLinksTlds = array("com", "net", "org", "us", "co.uk", "com.mx", "org.mx",);

Un "Array" con la lista de TLD de los cuales se seleccionara uno al azar por cada URL generada si $wgLinksTldRand es positivo

 $wgLinksTld = "com";

Este TLD será utilizado si $wgLinksTldRand es negativo

 $wgLinksHTML = true;

La URL despues del / deberá incluir una página al azar? en caso Negativo $wgLinksHTMLs queda sin uso

 $wgLinksHTMLs = array("index.html", "web.html", "page.html", "index.asp",
 "read.html", "get.asp", "index.php", "get.php", "post.html", "reduce.html",);

Si $wgLinksHTML es Positivo entonces esta es la lista de páginas que pueden ir después del /

[edit] Cambios a LocalSettings.php

 require_once( "{$IP}/extensions/Links/Links.php" );

[edit] Código

En "Vinculos" hay tres archivos:

Links.php

<?php
if (!defined('MEDIAWIKI')) die();
# Not a valid entry point, skip unless MEDIAWIKI is defined
/**
 * Add random links to bother bots
 */
 
$wgExtensionCredits['specialpage'][] = array(
	'name' => 'Links (1.1.39)',
	'author' => 'Hidalgo Rionda',
	'url' => 'http://www.mediawiki.org/wiki/Extension:Links',
	'description' => 'Simple random links Generator, Those links are for Spam bots.',
);
 
$wgAutoloadClasses['Links'] = dirname(__FILE__) . '/Links_body.php';
$wgSpecialPages['Links'] = 'Links';
$wgExtensionFunctions[] = 'efLoadeaLinks';
 
function efLoadeaLinks() {
	global $wgLang, $wgMessageCache;
	$f= dirname( __FILE__ ) . '/Links.i18n.php';
	include( $f );
	foreach( efLinks() as $lang => $messagess ) {
		if ($wgLang->getCode() == $lang) {
			$wgMessageCache->addMessages( $messagess );
		}
	}
}
?>

Links.i18n.php

<?php
if (!defined('MEDIAWIKI')) die();
function efLinks() {
	$messages = array(
		'en' => array(
			'links' => 'Links',
			'links-welcome' => "Welcome, next a series of random [[Special:Links|Links]].\r\n\r\nIf you're human don't try to access these [[Special:Links|Links]], They're made for the spam bots that search [[Special:Links|Links]].\r\n\r\nVisit our friends!:",
			'links-goodbye' => "Thank you",
			'links-title' => "Friend Links",
			'links-startnow' => "Hope you enjoy",
		),
		'es' => array(
			'links' => 'Vinculos',
			'links-welcome' => "Bienvenido, a continuaci&oacute;n una serie [[Special:Links|v&iacute;nculos]] al azar.\r\n\r\nSi eres humano no intentes acceder a las siguientes [[Special:Links|ligas]], Estan hechas para robots que buscan [[Special:Links|p&aacute;ginas]] para SPAM.\r\n\r\nVisita a nuestros amigos:",
			'links-goodbye' => "Gracias",
			'links-title' => "Vinculos de Amigos",
			'links-startnow' => "Espero te gusten los vinculos",
		),
	);
	return $messages;
}
?>

Links_body.php

<?php
if (!defined('MEDIAWIKI')) die();
class Links extends SpecialPage {
	function __construct() {
		SpecialPage::SpecialPage("Links", '', true);
	}
	function execute( $par ) {
		global $wgRequest, $wgOut, $wgLinksTotal, $wgLinksRand, $wgLinksRandMin, $wgLinksRandMax, $wgLinksTldRand, $wgLinksTlds, $wgLinksTld, $wgLinksHTML, $wgLinksHTMLs;
		if (!$wgLinksTotal) { $wgLinksTotal = 1024; }
		if (!$wgLinksRand) { $wgLinksRand = true; }
		if (!$wgLinksRandMin) { $wgLinksRandMin = 5; }
		if (!$wgLinksRandMax) { $wgLinksRandMax = 12; }
		if (!$wgLinksTldRand) { $wgLinksTldRand = true; }
		if (!$wgLinksTlds) { $wgLinksTlds = array("com", "net", "org", "us", "co.uk", "com.mx", "org.mx",); }
		if (!$wgLinksTld) { $wgLinksTld = "com"; }
		if (!$wgLinksHTML) { $wgLinksHTML = true; }
		if (!$wgLinksHTMLs) { $wgLinksHTMLs = array("index.html", "web.html", "page.html", "index.asp", "read.html", "get.asp", "index.php", "get.php", "post.html", "reduce.html",); }
		$fname = "SpecialLinks::execute";
		$this->setHeaders();
		# Do stuff
		$wgOut->addWikiText( wfMsg( 'links-welcome' ) );
		$wgOut->addHTML( wfMsg( 'links-startnow' ) );
		$Actual = 0;
		while ($Actual < $wgLinksTotal) {
			$urrl = "";
			if ($wgLinksRand == true) {
				$Hechos = 0;
				$PorHacer = rand($wgLinksRandMin,$wgLinksRandMax);
				while ($Hechos < $PorHacer) {
					$urrl .= chr(rand(97,122));
					$Hechos = $Hechos + 1;
				}
			}
			else {
				$Hechos = 0;
				while ($Hechos < $wgLinksRandMax) {
					$urrl .= chr(rand(97,122));
					$Hechos = $Hechos + 1;
				}
			}
			if ($wgLinksTldRand == true) {
				$Totales = 0;
				foreach( $wgLinksTlds as $currenteado ) {
					$Totales = $Totales + 1;
					$TLDA[$Totales] = $currenteado;
				}
				$TLD = $TLDA[rand(1,$Totales)];
			}
			else {
				$TLF = $wgLinksTld;
			}
			if ($wgLinksHTML == true) {
				$Totales = 0;
				foreach( $wgLinksHTMLs as $currenteado ) {
					$Totales = $Totales + 1;
					$TLDA[$Totales] = $currenteado;
				}
				$Finalhtml = $TLDA[rand(1,$Totales)];
			}
			else {
				$Finalhtml = "";
			}
			$wgOut->addHTML(", <a href=\"http://www.".$urrl.".".$TLD."/".$Finalhtml."\">http://www.".$urrl.".".$TLD."/".$Finalhtml."</a>");
			$Actual = $Actual + 1;
		}
		$wgOut->addWikiText( wfMsg( 'links-goodbye' ) );
		# Output
		$wgOut->setPagetitle( wfMsg( "links-title" ) );
	}
}
?>

[edit] Véase También

También en versión de Correos electronicos