Thijs/wiki.techinc.nl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Quick hack to clear out brokenlinks to existing pages (doesn't yet add them to links)

Browse source
This commit is contained in:
Brion Vibber 2003-12-03 12:02:53 +00:00
parent 03d617d32d
commit c3fe335241
1 changed files with 71 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

71
maintenance/remove-brokenlinks.php Normal file
View file

@ -0,0 +1,71 @@
<?
# Remove spurious brokenlinks
if ( ! is_readable( "../LocalSettings.php" ) ) {
print "A copy of your installation's LocalSettings.php\n" .
"must exist in the source directory.\n";
exit();
}
$wgCommandLineMode = true;
$DP = "../includes";
include_once( "../LocalSettings.php" );
include_once( "../AdminSettings.php" );
$sep = strchr( $include_path = ini_get( "include_path" ), ";" ) ? ";" : ":";
ini_set( "include_path", "$IP$sep$include_path" );
include_once( "Setup.php" );
include_once( "./rebuildrecentchanges.inc" );
$wgTitle = Title::newFromText( "Rebuild brokenlinks script" );
set_time_limit(0);
$wgDBuser = $wgDBadminuser;
$wgDBpassword = $wgDBadminpassword;
# That above is common code and should be hidden away :(
$n = 0;
echo "Checking for broken brokenlinks...\n";
$sql = "SELECT cur_namespace,cur_title,cur_id FROM cur";
$res = wfQuery( $sql, DB_WRITE );
while( $s = wfFetchObject( $res ) ) {
$n++;
if(($n % 500) == 0) {
echo "$n\n";
}
$title = Title::makeTitle( $s->cur_namespace, $s->cur_title );
if($title) {
$t = $title->getPrefixedDBKey();
$tt = wfStrencode( $t );
$any = false;
$sql2 = "SELECT bl_from,cur_id,cur_namespace,cur_title FROM brokenlinks,cur WHERE bl_to='$tt' AND cur_id=bl_from";
$res2 = wfQuery( $sql2, DB_WRITE );
while( $s = wfFetchObject( $res2 ) ) {
$from = Title::makeTitle( $s->cur_namespace, $s->cur_title );
$xt = $from->getPrefixedText();
echo "Found bad brokenlink to [[$tt]] from page #$s->cur_id [[$xt]]!\n";
$any = true;
}
wfFreeResult( $res2 );
if($any) {
echo "Removing brokenlinks to [[$t]]...\n";
$sql3 = "DELETE FROM brokenlinks WHERE bl_to='$tt'";
#$res3 = wfQuery( $sql3, DB_WRITE );
echo "-- $sql3\n";
}
} else {
echo "Illegal title?! Namespace $s->cur_namespace, title '$s->cur_title'\n";
}
}
echo "Done at $n.\n\n";
echo "Clearing linkscc table...\n";
$sql4 = "DELETE FROM linkscc";
wfQuery( $sql4, DB_WRITE );
?>