Update translations updater script to use Pootle

scripts/update_translations.php

@@ -1,66 +1,81 @@
+#!/usr/bin/env php
 <?php
+/*
+ * Laconica - a distributed open-source microblogging tool
+ * Copyright (C) 2008, 2009, Control Yourself, Inc.
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+// Abort if called from a web server
+if (isset($_SERVER) && array_key_exists('REQUEST_METHOD', $_SERVER)) {
+    print "This script must be run from the command line\n";
+    exit();
+}
+
+define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));
+define('LACONICA', true);
+
+require_once(INSTALLDIR . '/lib/common.php');
+
+// Master Laconica .pot file location (created by update_pot.sh)
+$laconica_pot = INSTALLDIR . '/locale/laconica.po';
 
 set_time_limit(60);
-chdir(dirname(__FILE__) . '/..');
 
 /* Languages to pull */
-$languages = array(
+$languages = get_all_languages();
-	'da_DK' => 'http://laconi.ca/translate/download.php?file_id=93',
-	'nl_NL' => 'http://laconi.ca/translate/download.php?file_id=97',
-	'en_NZ' => 'http://laconi.ca/translate/download.php?file_id=87',
-	'eo'    => 'http://laconi.ca/translate/download.php?file_id=88',
-	'fr_FR' => 'http://laconi.ca/translate/download.php?file_id=99',
-	'de_DE' => 'http://laconi.ca/translate/download.php?file_id=100',
-	'it_IT' => 'http://laconi.ca/translate/download.php?file_id=101',
-	'ko'    => 'http://laconi.ca/translate/download.php?file_id=102',
-	'no_NB' => 'http://laconi.ca/translate/download.php?file_id=104',
-	'pt'    => 'http://laconi.ca/translate/download.php?file_id=106',
-	'pt_BR' => 'http://laconi.ca/translate/download.php?file_id=107',
-	'ru_RU' => 'http://laconi.ca/translate/download.php?file_id=109',
-	'es'    => 'http://laconi.ca/translate/download.php?file_id=110',
-	'tr_TR' => 'http://laconi.ca/translate/download.php?file_id=114',
-	'uk_UA' => 'http://laconi.ca/translate/download.php?file_id=115',
-	'he_IL' => 'http://laconi.ca/translate/download.php?file_id=116',
-	'mk_MK' => 'http://laconi.ca/translate/download.php?file_id=103',
-	'ja_JP' => 'http://laconi.ca/translate/download.php?file_id=117',
-	'cs_CZ' => 'http://laconi.ca/translate/download.php?file_id=96',
-	'ca_ES' => 'http://laconi.ca/translate/download.php?file_id=95',
-	'pl_PL' => 'http://laconi.ca/translate/download.php?file_id=105',
-	'sv_SE' => 'http://laconi.ca/translate/download.php?file_id=128'
-);
 
 /* Update the languages */
-foreach ($languages as $code => $file) {
 
-	$lcdir='locale/'.$code;
+foreach ($languages as $language) {
-	$msgdir=$lcdir.'/LC_MESSAGES';
-	$pofile=$msgdir.'/laconica.po';
-	$mofile=$msgdir.'/laconica.mo';
 
-	/* Check for an existing */
+    $code = $language['lang'];
-	if (!is_dir($msgdir)) {
+    $file = 'http://laconi.ca/pootle/' . $code .
-		mkdir($lcdir);
+        '/laconica/LC_MESSAGES/laconica.po';
-		mkdir($msgdir);
+    $lcdir = INSTALLDIR . '/locale/' . $code;
-		$existingSHA1 = '';
+    $msgdir = "$lcdir/LC_MESSAGES";
-	} else {
+    $pofile = "$msgdir/laconica.po";
-		$existingSHA1 = file_exists($pofile) ? sha1_file($pofile) : '';
+    $mofile = "$msgdir/laconica.mo";
-	}
 
-	/* Get the remote one */
+    /* Check for an existing */
-	$newFile = file_get_contents($file);
+    if (!is_dir($msgdir)) {
+        mkdir($lcdir);
+        mkdir($msgdir);
+        $existingSHA1 = '';
+    } else {
+        $existingSHA1 = file_exists($pofile) ? sha1_file($pofile) : '';
+    }
 
-	// Update if the local .po file is different to the one downloaded, or
+    /* Get the remote one */
-	// if the .mo file is not present.
+    $newFile = file_get_contents($file);
-	if(sha1($newFile)!=$existingSHA1 || !file_exists($mofile)) {
+
-		echo "Updating ".$code."\n";
+    if ($newfile === FALSE) {
-		file_put_contents($pofile, $newFile);
+        echo "Couldn't retrieve .po file for $code: $file\n";
-		$prevdir = getcwd();
+        continue;
-		chdir($msgdir);
+    }
-		system('msgmerge -U laconica.po ../../laconica.pot');
+
-		system('msgfmt -f -o laconica.mo laconica.po');
+    // Update if the local .po file is different to the one downloaded, or
-		chdir($prevdir);
+    // if the .mo file is not present.
-	} else {
+    if (sha1($newFile) != $existingSHA1 || !file_exists($mofile)) {
-		echo "Unchanged - ".$code."\n";
+        echo "Updating ".$code."\n";
-	}
+        file_put_contents($pofile, $newFile);
+        system(sprintf('msgmerge -U %s %s', $pofile, $laconica_pot));
+        system(sprintf('msgfmt -f -o %s %s', $mofile, $pofile));
+    } else {
+        echo "Unchanged - ".$code."\n";
+    }
 }
+
 echo "Finished\n";