Localisation updates for core messages from Betawiki (2008-05-05 23:21 CEST)

[lhc/web/wiklou.git] / maintenance / rebuildInterwiki.php

diff --git a/maintenance/rebuildInterwiki.php b/maintenance/rebuildInterwiki.php
index da00155..0896842 100644 (file)
--- a/maintenance/rebuildInterwiki.php
+++ b/maintenance/rebuildInterwiki.php
@@ -1,162 +1,26 @@
-<?
-
-# Rebuild interwiki table using the file on meta and the language list
-# Wikimedia specific!
+<?php
+/**
+ * Rebuild interwiki table using the file on meta and the language list
+ * Wikimedia specific!
+ * @todo document
+ * @addtogroup Maintenance
+ */
+
+/** */
 $oldCwd = getcwd();
 
-$optionsWithArgs = array( "o" );
-include( "commandLine.inc" );
-
-class Site {
-       var $suffix, $lateral, $url;
-
-       function Site( $s, $l, $u ) {
-               $this->suffix = $s;
-               $this->lateral = $l;
-               $this->url = $u;
-       }
-
-       function getURL( $lang ) {
-               return "http://$lang.{$this->url}/wiki/\$1";
-       }
-}
-
-$row = wfGetArray( "metawiki.cur", array( "cur_text" ), array( "cur_namespace" => 0, "cur_title" => "Interwiki_map" ) );
-
-if ( !$row ) {
-       die( "m:Interwiki_map not found" );
-}
-
-$lines = explode( "\n", $row->cur_text );
-$iwArray = array();
-
-foreach ( $lines as $line ) {
-       if ( preg_match( '/^\|\s*(.*?)\s*\|\|\s*(.*?)\s*$/', $line, $matches ) ) {
-               $prefix = $matches[1];
-               $url = $matches[2];
-               if ( preg_match( '/(wikipedia|wiktionary|wikisource|wikiquote|wikibooks)\.org/', $url ) ) {
-                       $local = 1;
-               } else {
-                       $local = 0;
-               }
-
-               $iwArray[] = array( "iw_prefix" => $prefix, "iw_url" => $url, "iw_local" => $local );
-       }
-}
-
-$langlist = array_map( "trim", file( "/home/wikipedia/common/langlist" ) );
-
-# Insert links into special wikis
-# No interlanguage links, that's the definition of a special wiki
-# Just intermap links
-
-$specials = array( 
-       'sourceswiki' => 'sources.wikipedia.org',
-       'quotewiki' => 'wikiquote.org',
-       'textbookwiki' => 'wikibooks.org',
-       'sep11wiki' => 'sep11.wikipedia.org',
-       'metawiki' => 'meta.wikipedia.org',
-);
-
-$sql = "-- Generated by rebuildInterwiki.php";
-
-foreach ( $specials as $db => $host ) {
-       $sql .= "\nUSE $db;\n" .
-                       "TRUNCATE TABLE interwiki;\n" . 
-                       "INSERT INTO interwiki (iw_prefix, iw_url, iw_local) VALUES \n";
-       $first = true;
-       
-       foreach ( $iwArray as $iwEntry ) {
-               # Suppress links to self
-               if ( strpos( $iwEntry['iw_url'], $host ) === false ) {
-                       # Add comma
-                       if ( $first ) {
-                               $first = false;
-                       } else {
-                               $sql .= ",\n";
-                       }
-                       $sql .= "(" . Database::makeList( $iwEntry ) . ")";
-               }
-       }
-       $sql .= ";\n";
-}
-$sql .= "\n";
-
-# Insert links into multilanguage sites
-
-$sites = array( 
-       new Site( 'wiki', 'w', 'wikipedia.org' ),
-       new Site( 'wiktionary.org', 'wikt', 'wiktionary.org' )
-);
-
-foreach ( $sites as $site ) {
-       $sql .= <<<EOS
-
----
---- {$site->suffix}
----
-
-EOS;
-       foreach ( $langlist as $lang ) {
-               $db = $lang . $site->suffix;
-               $db = str_replace( "-", "_", $db );
-
-               $sql .= "USE $db;\n" .
-                               "TRUNCATE TABLE interwiki;\n" .
-                               "INSERT INTO interwiki (iw_prefix,iw_url,iw_local) VALUES\n";
-               $first = true;
-
-               # Intermap links
-               foreach ( $iwArray as $iwEntry ) {
-                       # Suppress links to self
-                       if ( strpos( $iwEntry['iw_url'], $site->url ) === false ) {
-                               # Add comma
-                               if ( $first ) {
-                                       $first = false;
-                               } else {
-                                       $sql .= ",\n";
-                               }
-                               $sql .= "(" . Database::makeList( $iwEntry ) . ")";
-                       }
-               }
-
-               # Lateral links
-               foreach ( $sites as $targetSite ) {
-                       # Suppress link to self
-                       if ( $targetSite->suffix != $site->suffix ) {
-                               if ( $first ) {
-                                       $first = false;
-                               } else {
-                                       $sql .= ",\n";
-                               }
-                               $link = array( $targetSite->lateral, $targetSite->getURL( $lang ), 1 );
-                               $sql .= "(" . Database::makeList( $link ) . ")";
-                       }
-               }
-
-               # Interlanguage links
-               foreach ( $langlist as $targetLang ) {
-                       if ( $first ) {
-                               $first = false;
-                       } else {
-                               $sql .= ",\n";
-                       }
-                       $link = array( $targetLang, $site->getURL( $targetLang ), 1 );
-                       $sql .= "(" . Database::makeList( $link ) . ")";
-               }
-               $sql .= ";\n\n";
-       }
-}
+$optionsWithArgs = array( "d" );
+include_once( "commandLine.inc" );
+include_once( "rebuildInterwiki.inc" );
+chdir( $oldCwd );
 
 # Output
-if ( isset( $options['o'] ) ) {        
-       # To file specified with -o
-       chdir( $oldCwd );
-       $file = fopen( $options['o'], "w" );
-       fwrite( $file, $sql );
-       fclose( $file );
+if ( isset( $options['d'] ) ) {
+       $destDir = $options['d'];
 } else {
-       # To stdout
-       print $sql;
+       $destDir = '/home/wikipedia/conf/interwiki/sql';
 }
-?>
+
+echo "Making new interwiki SQL files in $destDir\n";
+makeInterwikiSQL( $destDir );
+