+#!/usr/bin/env php
<?php
+/*
+ * StatusNet - the distributed open-source microblogging tool
+ * Copyright (C) 2008, 2009, StatusNet, 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('GNUSOCIAL', true);
+define('STATUSNET', true); // compatibility
+
+require_once(INSTALLDIR . '/lib/common.php');
+
+// Master StatusNet .pot file location (created by update_pot.sh)
+$statusnet_pot = INSTALLDIR . '/locale/statusnet.pot';
set_time_limit(60);
-chdir(dirname(__FILE__) . '/..');
/* Languages to pull */
-$languages = array(
- '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'
-);
+$languages = get_all_languages();
/* Update the languages */
-foreach ($languages as $code => $file) {
-
- $lcdir='locale/'.$code;
- $msgdir=$lcdir.'/LC_MESSAGES';
- $pofile=$msgdir.'/laconica.po';
- $mofile=$msgdir.'/laconica.mo';
-
- /* Check for an existing */
- if (!is_dir($msgdir)) {
- mkdir($lcdir);
- mkdir($msgdir);
- $existingSHA1 = '';
+// Language code conversion for translatewiki.net (these are MediaWiki codes)
+$codeMap = array(
+ 'nb' => 'no',
+ 'pt_BR' => 'pt-br',
+ 'zh_CN' => 'zh-hans',
+ 'zh_TW' => 'zh-hant'
+);
+
+$doneCodes = array();
+
+foreach ($languages as $language) {
+ $code = $language['lang'];
+
+ // Skip export of source language
+ // and duplicates
+ if( $code == 'en' || $code == 'no' ) {
+ continue;
+ }
+
+ // Do not export codes twice (happens for 'nb')
+ if( in_array( $code, $doneCodes ) ) {
+ continue;
} else {
- $existingSHA1 = file_exists($pofile) ? sha1_file($pofile) : '';
+ $doneCodes[] = $code;
}
- /* Get the remote one */
- $newFile = file_get_contents($file);
-
- // Update if the local .po file is different to the one downloaded, or
- // if the .mo file is not present.
- if(sha1($newFile)!=$existingSHA1 || !file_exists($mofile)) {
- echo "Updating ".$code."\n";
- file_put_contents($pofile, $newFile);
- $prevdir = getcwd();
- chdir($msgdir);
- system('msgmerge -U laconica.po ../../laconica.pot');
- system('msgfmt -f -o laconica.mo laconica.po');
- chdir($prevdir);
+ // Convert code if needed
+ if( isset( $codeMap[$code] ) ) {
+ $twnCode = $codeMap[$code];
} else {
- echo "Unchanged - ".$code."\n";
+ $twnCode = str_replace('_', '-', strtolower($code)); // pt_BR -> pt-br
}
+
+ // Fetch updates from translatewiki.net...
+ $file_url = 'http://translatewiki.net/w/i.php?' .
+ http_build_query(array(
+ 'title' => 'Special:Translate',
+ 'task' => 'export-to-file',
+ 'group' => 'out-statusnet-core',
+ 'language' => $twnCode));
+
+ $lcdir = INSTALLDIR . '/locale/' . $code;
+ $msgdir = "$lcdir/LC_MESSAGES";
+ $pofile = "$msgdir/statusnet.po";
+ $mofile = "$msgdir/statusnet.mo";
+
+ /* Check for an existing */
+ if (!is_dir($msgdir)) {
+ mkdir($lcdir);
+ mkdir($msgdir);
+ $existingSHA1 = '';
+ } else {
+ $existingSHA1 = file_exists($pofile) ? sha1_file($pofile) : '';
+ }
+
+ /* Get the remote one */
+ $new_file = curl_get_file($file_url);
+
+ if ($new_file === FALSE) {
+ echo "Could not retrieve .po file for $code: $file_url\n";
+ continue;
+ }
+
+ // Update if the local .po file is different to the one downloaded, or
+ // if the .mo file is not present.
+ if (sha1($new_file) != $existingSHA1 || !file_exists($mofile)) {
+ echo "Updating ".$code."\n";
+ file_put_contents($pofile, $new_file);
+ // --backup=off is workaround for Mac OS X fail
+ system(sprintf('msgmerge -U --backup=off %s %s', $pofile, $statusnet_pot));
+ /* Do not rebuild/add .mo files by default
+ * FIXME: should be made a command line parameter.
+ system(sprintf('msgfmt -o %s %s', $mofile, $pofile));
+ */
+ } else {
+ echo "Unchanged - ".$code."\n";
+ }
}
+
echo "Finished\n";
+
+
+function curl_get_file($url)
+{
+ $c = curl_init();
+ curl_setopt($c, CURLOPT_RETURNTRANSFER, 1);
+ curl_setopt($c, CURLOPT_URL, $url);
+ $contents = curl_exec($c);
+ curl_close($c);
+
+ if (!empty($contents)) {
+ return $contents;
+ }
+
+ return FALSE;
+}