1 files changed, 100 insertions, 0 deletions
diff --git a/tools/extract2lang.php b/tools/extract2lang.php
new file mode 100644
index 000000000..8d3a05188
--- /dev/null
+++ b/tools/extract2lang.php
@@ -0,0 +1,100 @@
+<?php
+/**
+ * Lookup for _e(), _t() and _h() in source code and build a 
+ *
+ * PHP 5.3
+ *
+ * @license MIT
+ * @author Romain d'Alverny, rdalverny, rda
+ * @copyright 2012/05
+*/
+
+if (php_sapi_name() !== 'cli') {
+    echo "CLI only.\n";
+    exit(1);
+}
+
+if (version_compare(PHP_VERSION, '5.3.0') < 0) {
+    echo "PHP 5.3 needed.\n";
+    exit(1);
+}
+
+define('APP_ROOT', realpath(__DIR__ . '/..'));
+
+$php_source = isset($argv[1]) ? $argv[1] : null;
+$var        = isset($argv[2]) ? $argv[2] : null;
+$domain     = isset($argv[3]) ? $argv[3] : null;
+
+/*
+if (is_null($php_source) || is_null($var) || is_null($domain)) {
+    echo <<<U
+Usage:
+    pa2lang.php path/to/source.php var_name domain_name
+
+
+U;
+    exit(1);
+}
+*/
+
+echo "ohai!\n";
+
+$path = 'en/2/download_index.php en/for-pc/index.php en/for-server/index.php en/2/index.php';
+//$path = realpath(APP_ROOT . '/' . $path);
+
+$domain = '2';
+
+$cmd = sprintf('grep -HrnEi "_(e|t|h)\((.*)\)" %s', $path);
+echo $cmd, "\n";
+exec($cmd, $out);
+
+$strings = array();
+
+foreach ($out as $str) {
+    $arr    = explode(':', $str);
+    $file   = array_shift($arr);
+    /*
+    $domain = trim(str_replace(array('/en/', APP_ROOT), '', dirname($file)));
+    if ($domain == '/en')
+        $domain = 'index';
+    */
+    $file   = str_replace(APP_ROOT, '', $file);
+    $line   = array_shift($arr);
+    $arr    = implode(':', $arr);
+
+    if (preg_match_all('/\_(e|t|h)\(\'(.+)\'/imU', $arr, $reg)) {
+        foreach ($reg[2] as $found) {
+            $strings[$domain][$found][] = $file . ' +' . $line;
+        }
+    }
+    else
+        echo "!!!! could not find for $file, $line: $str\n";
+}
+
+foreach ($strings as $domain => $strs) {
+    $f = array();
+    $f[] = sprintf('# Generated by extract2lang.php on %s', date('c'));
+    $f[] = sprintf('# Domain %s', $domain);
+
+    foreach ($strs as $str => $info) {
+        $str = str_replace(array("\'", "\""), array("'", '"'), $str);
+        $f[] = '';
+        $f[] = sprintf('# %s', $info[0]);
+        $f[] = ';' . $str;
+        $f[] = $str;
+        $f[] = '';
+    }
+    $f = implode("\n", $f);
+    $dest = sprintf('%s/langs/%s/%s.%s.lang', APP_ROOT, 'en', $domain, 'en');
+    $dir = dirname($dest);
+    
+    if (!is_dir($dir)) {
+        echo "making $dir\n";
+        mkdir($dir, 0755, true);
+    }
+    echo sprintf("saved %d strings in %s\n", count($strs), $dest);
+    if (FALSE === file_put_contents($dest, $f))
+        echo "Failed to write.\n";
+}
+echo "Done. kthxbye.\n";
+exit(0);