diff options
Diffstat (limited to 'i18npool/source/localedata/data/list-locales.awk')
-rw-r--r-- | i18npool/source/localedata/data/list-locales.awk | 75 |
1 files changed, 0 insertions, 75 deletions
diff --git a/i18npool/source/localedata/data/list-locales.awk b/i18npool/source/localedata/data/list-locales.awk deleted file mode 100644 index 9921e7f92c..0000000000 --- a/i18npool/source/localedata/data/list-locales.awk +++ /dev/null @@ -1,75 +0,0 @@ -#!/usr/bin/gawk -f -#// Usage: gawk -f list-locales.awk *.xml -#// Simply create a verbose list of known locales as stated in XML files. -#// Author: Eike Rathke <erack@sun.com> - -BEGIN { - file = "" - count = 0 -} - -function init_locale() { - lcinfo = 0 - inlang = 0 - incoun = 0 - language = "" - country = "" -} - -FILENAME != file { - printEntry() - file = FILENAME - ++count - init_locale() -} - -{ - if ( !lcinfo ) - { - if ( /<LC_INFO>/ ) - lcinfo = 1 - next - } - if ( /<\/LC_INFO>/ ) - { - lcinfo = 0 - next - } - if ( /<Language>/ ) - inlang = 1 - if ( inlang && /<DefaultName>/ ) - { - split( $0, x, /<|>/ ) - language = x[3] - } - if ( /<\/Language>/ ) - inlang = 0 - if ( /<Country>/ ) - incoun = 1 - if ( incoun && /<DefaultName>/ ) - { - split( $0, x, /<|>/ ) - country = x[3] - } - if ( /<\/Country>/ ) - incoun = 0 -} - -END { - printEntry() - print "\n" count " locales" -} - -function printEntry() { - if ( file ) - { - tmp = file - gsub( /.*\//, "", tmp ) - gsub( /\.xml/, "", tmp ) - split( tmp, iso, /_/ ) - if ( iso[2] ) - printf( "%3s_%2s: %s - %s\n", iso[1], iso[2], language, country ) - else - printf( "%3s %2s: %s %s\n", iso[1], iso[2], language, country ) - } -} |