[Openoffice-svn] r523 - trunk

[svn at ikso.net]

Author: tmorley
Date: 2007-08-15 16:28:32 +0000 (Wed, 15 Aug 2007)
New Revision: 523

Modified:
   trunk/seniksigi
Log:
nova versio de 'seniksigi', kiu kreas novan arbaron anstataux modifi la aktualan


Modified: trunk/seniksigi
===================================================================
--- trunk/seniksigi	2007-08-15 16:08:22 UTC (rev 522)
+++ trunk/seniksigi	2007-08-15 16:28:32 UTC (rev 523)
@@ -8,11 +8,11 @@
 # devus esti sxangxitaj al `sxx', `cxx', ktp antaux ol ruli la
 # skripton. Tiuj cxenoj estos resxangxitaj al `sx', `cx' ktp.
 # 
-# La originaj dosieroj estas konservitaj kun la sufikso .kuniksoj
-# kaj la nova dosiero (kun cxapeloj) prenas la originan nomon.
+# Nenio sxangxas en la fontaj dosieroj. Nova kopio de la 
+# dosieraro estas kreita.
 # 
 # Sintakso:
-#   ~$ seniksigi [vojprefikso de .po-dosierara arbo]
+#   ~$ seniksigi FONTA_VOJPREFIKSO DESTINA_VOJPREFIKSO
 # 
 # ===============================================================
 # 
@@ -26,45 +26,53 @@
 # this script. Such occurrences will be changed back to `sx`,
 # `cx', etc.
 # 
-# The original files are kept with suffix .kuniksoj added, and
-# the new files (with Esperanto accents) take the original
-# filenames.
+# Nothing is changed in the source files. A new copy of the
+# tree is created.
 # 
 # Syntax:
-#   ~$ seniksigi [path to root of tree of .po files]
+#   ~$ seniksigi SOURCE_PATH DESTINATION_PATH
 # 
 # ===============================================================
 
-for f in `find $1 -name "*.po"`;
- do tempfile=`dirname $f`/temp.po;
- echo 'dauxras la seniksigado de '$f;
- msgfilter -i $f sed 's/C[Xx]/Ĉ/g' | \
-   msgfilter sed 's/G[Xx]/Ĝ/g' | \
-   msgfilter sed 's/H[Xx]/Ĥ/g' | \
-   msgfilter sed 's/J[Xx]/Ĵ/g' | \
-   msgfilter sed 's/S[Xx]/Ŝ/g' | \
-   msgfilter sed 's/U[Xx]/Ŭ/g' | \
 
-   msgfilter sed 's/c[Xx]/ĉ/g' | \
-   msgfilter sed 's/g[Xx]/ĝ/g' | \
-   msgfilter sed 's/h[Xx]/ĥ/g' | \
-   msgfilter sed 's/j[Xx]/ĵ/g' | \
-   msgfilter sed 's/s[Xx]/ŝ/g' | \
-   msgfilter sed 's/u[Xx]/ŭ/g' | \
+if [ $1 == $2 ]; then echo "source and dest are same; don't be silly"; exit 1; fi
 
-   msgfilter sed 's/Ĉ[Xx]/CX/g' | \
-   msgfilter sed 's/Ĝ[Xx]/GX/g' | \
-   msgfilter sed 's/Ĥ[Xx]/HX/g' | \
-   msgfilter sed 's/Ĵ[Xx]/JX/g' | \
-   msgfilter sed 's/Ŝ[Xx]/SX/g' | \
-   msgfilter sed 's/Ŭ[Xx]/UX/g' | \
+inporoot=${1%/};  # i.e. inporoot = 1st parameter, minus trailing slash (if any)
+outporoot=${2%/}; # i.e. outporoot = 2nd parameter, minus trailing slash (if any)
 
-   msgfilter sed 's/ĉ[Xx]/cx/g' | \
-   msgfilter sed 's/ĝ[Xx]/gx/g' | \
-   msgfilter sed 's/ĥ[Xx]/hx/g' | \
-   msgfilter sed 's/ĵ[Xx]/jx/g' | \
-   msgfilter sed 's/ŝ[Xx]/sx/g' | \
-   msgfilter sed 's/ŭ[Xx]/ux/g' > $tempfile;
- mv -f $f $f.kuniksoj;
- mv $tempfile $f;
- done
\ No newline at end of file
+for inporoot_inpofile in `find $inporoot -name "*.po"`;
+  do
+  pofile=${inporoot_inpofile#$inporoot/};  # remove $inporoot/ from beginning of $inporoot_inpofile
+      echo "creating $outporoot/$pofile from $inporoot/$pofile..."
+      mkdir -p `dirname $outporoot/$pofile`/;    # to create directory if necessary
+      msgfilter -i $inporoot_inpofile sed 's/C[Xx]/Ĉ/g' | \
+	  msgfilter sed 's/G[Xx]/Ĝ/g' | \
+	  msgfilter sed 's/H[Xx]/Ĥ/g' | \
+	  msgfilter sed 's/J[Xx]/Ĵ/g' | \
+	  msgfilter sed 's/S[Xx]/Ŝ/g' | \
+	  msgfilter sed 's/U[Xx]/Ŭ/g' | \
+
+	  msgfilter sed 's/c[Xx]/ĉ/g' | \
+	  msgfilter sed 's/g[Xx]/ĝ/g' | \
+	  msgfilter sed 's/h[Xx]/ĥ/g' | \
+	  msgfilter sed 's/j[Xx]/ĵ/g' | \
+	  msgfilter sed 's/s[Xx]/ŝ/g' | \
+	  msgfilter sed 's/u[Xx]/ŭ/g' | \
+
+	  msgfilter sed 's/Ĉ[Xx]/CX/g' | \
+	  msgfilter sed 's/Ĝ[Xx]/GX/g' | \
+	  msgfilter sed 's/Ĥ[Xx]/HX/g' | \
+	  msgfilter sed 's/Ĵ[Xx]/JX/g' | \
+	  msgfilter sed 's/Ŝ[Xx]/SX/g' | \
+	  msgfilter sed 's/Ŭ[Xx]/UX/g' | \
+
+	  msgfilter sed 's/ĉ[Xx]/cx/g' | \
+	  msgfilter sed 's/ĝ[Xx]/gx/g' | \
+	  msgfilter sed 's/ĥ[Xx]/hx/g' | \
+	  msgfilter sed 's/ĵ[Xx]/jx/g' | \
+	  msgfilter sed 's/ŝ[Xx]/sx/g' | \
+	  msgfilter sed 's/ŭ[Xx]/ux/g' > $outporoot/$pofile;
+done
+
+
+