SWGWebLinks
From SWGANH Wiki
Revision as of 01:55, 5 February 2007 by Snow (Talk | contribs) (→KetuSringa's Miracle Perl Link Generation Script)
Contents
SWG Official Forum Archive
Professions
KetuSringa's Miracle WGET Script
wget -o log.boardname.$$ -l 1 -i boardname.list \ -R 'users_online,board.id=[A-Za-z],view_profile,category.id,tracker,rss' \ -X 'users_online,board.id=[A-Za-z],view_profile,category.id,tracker,rss' \ --html-extension --restrict-file-names="unix" \ --base="file:///var/swg/boardname/soe.lithium.com/" \ -k -r -N \ --no-remove-listing -p -np -F \ --retry-connrefused \ --limit-rate=120k \ --timeout=15 \ --force-directories -U "Mozilla/4.5 (compatible; Snafu 5.4x; Windows 98)" &
KetuSringa's Miracle Perl Link Generation Script
perl -nle 'foreach $i (1..999) { print "<a href=\"$_$i\">\n";}'
TMR's Uber Super Automated Version
<?php
$url = $_SERVER['argv'][1];
$basepath = $_SERVER['argv'][2];
$fp = fopen($url,'r');
$index = '';
while (!feof($fp))
$index .= fread($fp,0x1FFFF);
fclose($fp);
echo "downloaded.. $url\n";
$y = strpos($index,"9</a> · <a href=\"");
$index = substr($index,$y+21,0x1FFFF);
$y = strpos($index,'&page=')+6;
$page = substr($index,$y,0x1FFFF);
$index = '';
$page = substr($page,0,strpos($page,'"'));
echo "pages:$page\n";
list($null,$boardname) = explode("=",$url);
$fp = fopen($boardname,'w');
fwrite($fp,"<A href=\"$url\">\n");
for ($x=1;$x<=$page;$x++)
fwrite($fp,"<A href=\"$url&page=$x\">\n");
fclose($fp);
$url = $boardname;
echo "to mirror pages type ./go &\n";
$patternl = '';
$patternu = '';
for ($x=ord('a');$x<=ord('z');$x++) {
if (ord($boardname[0]) <> $x)
$patternl .= chr($x);
if (ord($boardname[0]) <> ($x-0x20))
$patternu .= chr($x-0x20);
}
$commandstr =
"#!/bin/sh
wget -o log.$url -l 1 -i $url \\
-R 'users_online,board.id=[$patternu$patternl],view_profile,category.id,tracker,rss' \\
-X 'users_online,board.id=[$patternu$patternl],view_profile,category.id,tracker,rss' \\
--html-extension --restrict-file-names=\"unix\" \\
--base=\"$basepath\" \\
-k -r -N \\
--no-remove-listing -np -F \\
--retry-connrefused \\
--limit-rate=120k \\
--force-directories -U \"Mozilla/4.5 (compatible; Snafu 5.4x; Windows 98)\"\n";
$fixcommand =
"egrep -B2 \"Internal\" log.$url | egrep \"message|page\" | \\
sed -e 's/.*soe/<a href=\"http:\\/\\/soe/' -e 's/.\$/\">/' > relist
wc -l relist\n";
$reget =
"wget -o log.$url.reget -i relist \\
--html-extension --restrict-file-names=\"unix\" \\
--base=\"$basepath\" \\
-k -N \\
--no-remove-listing -p -np -F \\
--retry-connrefused \\
--limit-rate=120k \\
--force-directories -U \"Mozilla/4.5 (compatible; Snafu 5.4x; Windows 98)\"\n";
$fp = fopen('go','w');
fwrite($fp,$commandstr);
fwrite($fp,$fixcommand);
fwrite($fp,$reget);
fclose($fp);
$runperm = `chmod 775 go`;
?>
Combat
Creatures
General Info
[SWG Wiki]
[SWG Maps]
Loot Related
[Loot Revamp Tables / Assembly Tables]
Profession Dedicated
[Doctor]
