From e25e40f1ef4e1ad703c55b13069461ee0d712eae Mon Sep 17 00:00:00 2001
From: Mike Macgirvin <mike@macgirvin.com>
Date: Wed, 29 Sep 2010 18:11:23 -0700
Subject: i18n string extraction util

---
 util/extract.php | 38 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)
 create mode 100644 util/extract.php

(limited to 'util/extract.php')

diff --git a/util/extract.php b/util/extract.php
new file mode 100644
index 000000000..bb16a47da
--- /dev/null
+++ b/util/extract.php
@@ -0,0 +1,38 @@
+<?php
+
+	$arr = array();
+
+	$files = array('index.php','boot.php');
+	$files = array_merge($files,glob('mod/*'),glob('include/*'));
+
+
+	foreach($files as $file) {
+		$str = file_get_contents($file);
+
+		$pat = '| t\(([^\)]*)\)|';
+
+		preg_match_all($pat,$str,$matches);
+
+		if(! count($matches))
+			continue;
+
+		foreach($matches[1] as $match) {
+			if(! in_array($match,$arr))
+				$arr[] = $match;
+		}
+
+	}
+
+	$s = '<?php' . "\n";
+	foreach($arr as $a) {
+		if(substr($a,0,1) == '$')
+			continue;
+
+		$s .= '$a->strings[' . $a . '] = ' . $a . ';' . "\n";
+	}
+
+	$zones = timezone_identifiers_list();
+	foreach($zones as $zone)
+		$s .= '$a->strings[\'' . $zone . '\'] = \'' . $zone . '\';' . "\n";
+	
+	echo $s;
\ No newline at end of file
-- 
cgit v1.2.3