# $Id: openttd.desktop.translation.awk 24100 2012-04-08 14:29:31Z rubidium $ # This file is part of OpenTTD. # OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2. # OpenTTD 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 General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>. # # Awk script to extract translations for baseset descriptions # from lang files for insertion into .obg/obs/obm files. # If there is no translation, there is no output. # # The input file is scanned for the pattern # !! <ini-key> <STR_id> # # The lang files (passed as variable 'langfiles') are scanned for <STR_id> and # the translations are added to the output file: # <ini-key>.<iso-code> = <translation> # # Simple insertion sort since not all AWKs have a sort implementation function isort(A) { n = 0 for (val in A) { n++; } for (i = 2; i <= n; i++) { j = i; hold = A[j] while (A[j - 1] > hold) { j--; A[j + 1] = A[j] } A[j] = hold } return n } /^!!/ { ini_key = $2; str_id = $3; file = langfiles while ((getline < file) > 0) { if (match($0, "##isocode") > 0) { lang = $2; } else if (match($0, "^" str_id " *:") > 0) { sub("^[^:]*:", "", $0) i++; if (lang == "en_GB") { texts[i] = ini_key " = "$0; } else { texts[i] = ini_key "." lang " = "$0; } } } close(file); count = isort(texts); for (i = 1; i <= count; i++) { print texts[i] } next } { print }