summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--web/html/.htaccess1
-rw-r--r--web/html/index.php3
-rw-r--r--web/lib/translator.inc55
-rwxr-xr-xweb/utils/genpopo135
4 files changed, 194 insertions, 0 deletions
diff --git a/web/html/.htaccess b/web/html/.htaccess
new file mode 100644
index 00000000..1bf1488b
--- /dev/null
+++ b/web/html/.htaccess
@@ -0,0 +1 @@
+php_value include_path ".:../lib:../lang"
diff --git a/web/html/index.php b/web/html/index.php
new file mode 100644
index 00000000..ec2808a2
--- /dev/null
+++ b/web/html/index.php
@@ -0,0 +1,3 @@
+<?
+print "Hello, world!<br/>\n";
+?>
diff --git a/web/lib/translator.inc b/web/lib/translator.inc
new file mode 100644
index 00000000..2d45f2ab
--- /dev/null
+++ b/web/lib/translator.inc
@@ -0,0 +1,55 @@
+<?
+# this include file provides support for i18n
+#
+
+# usage:
+# use the _() function for returning translated strings of
+# text. The string can contain escape codes %h for HTML
+# and %s for regular text.
+#
+# supporting scripts:
+# there is a supporting script, web/utils/genpopo, that will
+# parse the PHP files and create PHP include files that contain
+# a mapping for each translated language. The include files
+# have the form,
+#
+# $_t["en"]["My cat is large."] = "My cat is large.";
+# $_t["es"]["My cat is large."] = "Mi gato esta grande.";
+#
+# examples:
+# print _("%s has %s apples.", array("Bill", "5"));
+# print _("This is a %h%s%h problem!", array("<b>","major","</b>"));
+
+include_once("common_po.inc");
+
+function _($tag, $args=array()) {
+ global $_t;
+ global $LANG;
+
+ # default to English if the lang hasn't been provided
+ #
+ if (!$LANG) {
+ $lang = "en";
+ } else {
+ $lang = $LANG;
+ }
+
+ # create the translation, if it doesn't exist, highlight it
+ #
+ $translated = $_t[$lang][$tag];
+ if (!$translated) {
+ $translated = "<blink><b>_" . $tag . "_</b></blink>";
+ }
+
+ # replace escape substitutions
+ #
+ if (!empty($args)) {
+ while (list($k, $v) = each($args)) {
+ $translated = preg_replace("/\%[sh]/", $v, $translated, 1);
+ }
+ }
+ return $translated;
+}
+
+# vim: ts=2 sw=2 noet ft=php
+?>
diff --git a/web/utils/genpopo b/web/utils/genpopo
new file mode 100755
index 00000000..97cb1546
--- /dev/null
+++ b/web/utils/genpopo
@@ -0,0 +1,135 @@
+#! /usr/bin/python -O
+# -*- coding: iso-8859-1 -*-
+
+# this script iterates through the 'html' and 'lib' directories
+# looking for php scripts that contain a include_once("xxx_po.inc")
+# line and _() functions. It creates/appends to the corresponding
+# "xxx_po.inc" file in the 'lang' subdirectory and places the
+# i18n strings into the file in the proper format.
+#
+
+import sys
+print_dupes = '-v' in sys.argv
+
+import re, os
+up = re.compile('_\(\s*"(([^"]|(?<=\\\\)["])+)"')
+
+lang = { 'common_po.po': {} }
+
+current_dir = os.getcwd()
+
+# Find the common_po.po file.
+#
+common = {}
+for dir in ['../lang', 'lang']:
+ if os.path.exists(dir):
+ os.chdir(dir)
+ if os.path.exists('common_po.list'):
+ f = open('common_po.list','r')
+ lines = f.readlines()
+ f.close()
+ for line in lines:
+ common[line[:-1]] = 0
+ lang['common_po.po'][line[:-1]] = 1
+ os.chdir(current_dir)
+ break
+ os.chdir(current_dir)
+else:
+ print "Can't find common_po.list file."
+ raise SystemExit
+
+# Find the lang directory.
+#
+for dir in ['../lang', 'lang']:
+ if os.path.exists(dir):
+ lang_dir = dir
+ break
+else:
+ print "Can't find the lang directory."
+ raise SystemExit
+
+# Iterate through various places where the php files might be.
+#
+for dir in ['../html', '../lib', 'html', 'lib']:
+
+ if os.path.exists(dir):
+ # Find all the PHP files in the current directory.
+ #
+ files = [x for x in os.listdir(dir)
+ if (x[-4:] == '.inc' and x[-7:] != '_po.inc')
+ or x[-6:] == '.class'
+ or x[-4:] == '.php'
+ or x[-6:] == '.phtml'
+ ]
+ os.chdir(dir)
+
+ for file in files:
+ f = open(file,'r')
+ lines = f.readlines()
+ f.close()
+
+ # Is this file one we need to parse for internationalized strings?
+ #
+ parse_file = 0
+ for line in lines:
+ match = re.search("include(_once|)\s*\(\s*[\"']([A-Za-z_]+_po.inc)[\"']\s*\);",line)
+ if match and match.group(2) != "common_po.inc":
+ po = match.group(2).replace(".inc",".po")
+ if not lang.has_key(po):
+ lang[po] = {}
+ parse_file = 1
+ break
+
+ # If we need to parse the file, do so.
+ #
+ if parse_file:
+ print "Parsing %s..." % file
+ for line in lines:
+ match = up.search(line)
+ while match:
+ term = match.group(1).replace('\\"','"')
+ if common.has_key(term):
+ common[term] += 1
+ else:
+ if print_dupes:
+ for key in lang.keys():
+ if key != po and lang[key].has_key(term):
+ print "...Duplicate term: \"%s\" is also in %s." % (term,key)
+ lang[po][term] = 1
+ line = line[match.end(1):]
+ match = up.search(line)
+
+ os.chdir(current_dir)
+
+# TODO Now generate all the .inc files if they don't already exist.
+# if they do exist, only append new stuff to the end. If the 'force'
+# option is passed, just overwrite the entire thing.
+#
+os.chdir(lang_dir)
+for po in lang.keys():
+ print "Generating %s..." % po
+ f = open(po,'w')
+ f.write("""# INSTRUCTIONS TO TRANSLATORS:
+# blah blah blah....
+""")
+
+ for term in lang[po].keys():
+ f.write("\n");
+ f.write('_$t["en"]["%s"] = "%s";\n' % (term, term))
+ f.write('# _$t["es"]["%s"] = "--> Spanish translation here. <--";\n' % term)
+ f.write('# _$t["fr"]["%s"] = "--> French translation here. <--";\n' % term)
+ f.write('# _$t["de"]["%s"] = "--> German translation here. <--";\n' % term)
+
+ f.write("\n");
+ f.close()
+
+# Print out warnings for unused and little-used common entries.
+#
+for key in common.keys():
+ if common[key] == 1:
+ print "Warning: common entry '%s' is only used once." % key
+for key in common.keys():
+ if common[key] == 0:
+ print "Warning: unused common entry '%s'." % key
+
+# vim: ts=2 sw=2 noet ft=python