summaryrefslogtreecommitdiffstats
path: root/tdecore/klocale.cpp
diff options
context:
space:
mode:
authorTimothy Pearson <kb9vqf@pearsoncomputing.net>2011-11-06 15:56:40 -0600
committerTimothy Pearson <kb9vqf@pearsoncomputing.net>2011-11-06 15:56:40 -0600
commite16866e072f94410321d70daedbcb855ea878cac (patch)
treeee3f52eabde7da1a0e6ca845fb9c2813cf1558cf /tdecore/klocale.cpp
parenta58c20c1a7593631a1b50213c805507ebc16adaf (diff)
downloadtdelibs-e16866e072f94410321d70daedbcb855ea878cac.tar.gz
tdelibs-e16866e072f94410321d70daedbcb855ea878cac.zip
Actually move the kde files that were renamed in the last commit
Diffstat (limited to 'tdecore/klocale.cpp')
-rw-r--r--tdecore/klocale.cpp2474
1 files changed, 2474 insertions, 0 deletions
diff --git a/tdecore/klocale.cpp b/tdecore/klocale.cpp
new file mode 100644
index 000000000..1fae4fbab
--- /dev/null
+++ b/tdecore/klocale.cpp
@@ -0,0 +1,2474 @@
+// -*- c-basic-offset: 2 -*-
+/* This file is part of the KDE libraries
+ Copyright (c) 1997,2001 Stephan Kulow <coolo@kde.org>
+ Copyright (c) 1999 Preston Brown <pbrown@kde.org>
+ Copyright (c) 1999-2002 Hans Petter Bieker <bieker@kde.org>
+ Copyright (c) 2002 Lukas Tinkl <lukas@kde.org>
+
+ This library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Library General Public
+ License as published by the Free Software Foundation; either
+ version 2 of the License, or (at your option) any later version.
+
+ This library 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
+ Library General Public License for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; see the file COPYING.LIB. If not, write to
+ the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ Boston, MA 02110-1301, USA.
+*/
+
+#include <config.h>
+
+#include <stdlib.h> // getenv
+
+#include <tqtextcodec.h>
+#include <tqfile.h>
+#include <tqprinter.h>
+#include <tqdatetime.h>
+#include <tqfileinfo.h>
+#include <tqregexp.h>
+
+#include "kcatalogue.h"
+#include "kglobal.h"
+#include "kstandarddirs.h"
+#include "ksimpleconfig.h"
+#include "kinstance.h"
+#include "kconfig.h"
+#include "kdebug.h"
+#include "kcalendarsystem.h"
+#include "kcalendarsystemfactory.h"
+#include "klocale.h"
+
+#ifdef Q_WS_WIN
+#include <windows.h>
+#endif
+
+static const char * const SYSTEM_MESSAGES = "kdelibs";
+
+static const char *maincatalogue = 0;
+
+class KLocalePrivate
+{
+public:
+ int weekStartDay;
+ bool nounDeclension;
+ bool dateMonthNamePossessive;
+ TQStringList languageList;
+ TQStringList catalogNames; // list of all catalogs (regardless of language)
+ TQValueList<KCatalogue> catalogues; // list of all loaded catalogs, contains one instance per catalog name and language
+ TQString encoding;
+ TQTextCodec * codecForEncoding;
+ KConfig * config;
+ bool formatInited;
+ int /*TQPrinter::PageSize*/ pageSize;
+ KLocale::MeasureSystem measureSystem;
+ TQStringList langTwoAlpha;
+ KConfig *languages;
+
+ TQString calendarType;
+ KCalendarSystem * calendar;
+ bool utf8FileEncoding;
+ TQString appName;
+#ifdef Q_WS_WIN
+ char win32SystemEncoding[3+7]; //"cp " + lang ID
+#endif
+ bool useMainCatalogue;
+};
+
+static KLocale *this_klocale = 0;
+
+KLocale::KLocale( const TQString & catalog, KConfig * config )
+{
+ d = new KLocalePrivate;
+ d->config = config;
+ d->languages = 0;
+ d->calendar = 0;
+ d->formatInited = false;
+
+ initEncoding(0);
+ initFileNameEncoding(0);
+
+ KConfig *cfg = d->config;
+ this_klocale = this;
+ if (!cfg) cfg = KGlobal::instance()->config();
+ this_klocale = 0;
+ Q_ASSERT( cfg );
+
+ d->appName = catalog;
+ initLanguageList( cfg, config == 0);
+ initMainCatalogues(catalog);
+}
+
+TQString KLocale::_initLanguage(KConfigBase *config)
+{
+ if (this_klocale)
+ {
+ // ### HPB Why this cast??
+ this_klocale->initLanguageList((KConfig *) config, true);
+ // todo: adapt current catalog list: remove unused languages, insert main catalogs, if not already found
+ return this_klocale->language();
+ }
+ return TQString::null;
+}
+
+void KLocale::initMainCatalogues(const TQString & catalog)
+{
+ // Use the first non-null string.
+ TQString mainCatalogue = catalog;
+
+ // don't use main catalogue if we're looking up .desktop translations
+ if (mainCatalogue.contains("desktop") == 0 || mainCatalogue.contains("kdesktop") == 1) {
+ if (maincatalogue) {
+ mainCatalogue = TQString::tqfromLatin1(maincatalogue);
+ }
+ }
+
+ if (mainCatalogue.isEmpty()) {
+ kdDebug(173) << "KLocale instance created called without valid "
+ << "catalog! Give an argument or call setMainCatalogue "
+ << "before init" << endl;
+ }
+ else {
+ // do not use insertCatalogue here, that would already trigger updateCatalogs
+ d->catalogNames.append( mainCatalogue ); // application catalog
+ if (mainCatalogue.contains("desktop") == 0 || mainCatalogue.contains("kdesktop") == 1) { //don't bother if we're looking up desktop translations
+ d->catalogNames.append( SYSTEM_MESSAGES ); // always include kdelibs.mo
+ d->catalogNames.append( "kio" ); // always include kio.mo
+ d->catalogNames.append( "xdg-user-dirs" );
+ }
+ updateCatalogues(); // evaluate this for all languages
+ }
+}
+
+void KLocale::initLanguageList(KConfig * config, bool useEnv)
+{
+ KConfigGroupSaver saver(config, "Locale");
+
+ m_country = config->readEntry( "Country" );
+ if ( m_country.isEmpty() )
+ m_country = defaultCountry();
+
+ // Reset the list and add the new languages
+ TQStringList languageList;
+ if ( useEnv )
+ languageList += TQStringList::split
+ (':', TQFile::decodeName( ::getenv("KDE_LANG") ));
+
+ languageList += config->readListEntry("Language", ':');
+
+ // same order as setlocale use
+ if ( useEnv )
+ {
+ // HPB: Only run splitLocale on the environment variables..
+ TQStringList langs;
+
+ langs << TQFile::decodeName( ::getenv("LC_ALL") );
+ langs << TQFile::decodeName( ::getenv("LC_MESSAGES") );
+ langs << TQFile::decodeName( ::getenv("LANG") );
+
+ for ( TQStringList::Iterator it = langs.begin();
+ it != langs.end();
+ ++it )
+ {
+ TQString ln, ct, chrset;
+ splitLocale(*it, ln, ct, chrset);
+
+ if (!ct.isEmpty()) {
+ langs.insert(it, ln + '_' + ct);
+ if (!chrset.isEmpty())
+ langs.insert(it, ln + '_' + ct + '.' + chrset);
+ }
+
+ langs.insert(it, ln);
+ }
+
+ languageList += langs;
+ }
+
+ // now we have a language list -- let's use the first OK language
+ setLanguage( languageList );
+}
+
+void KLocale::initPluralTypes()
+{
+ for ( TQValueList<KCatalogue>::Iterator it = d->catalogues.begin();
+ it != d->catalogues.end();
+ ++it )
+ {
+ TQString language = (*it).language();
+ int pt = pluralType( language );
+ (*it).setPluralType( pt );
+ }
+}
+
+
+int KLocale::pluralType( const TQString & language )
+{
+ for ( TQValueList<KCatalogue>::ConstIterator it = d->catalogues.begin();
+ it != d->catalogues.end();
+ ++it )
+ {
+ if ( ((*it).name() == SYSTEM_MESSAGES ) && ((*it).language() == language )) {
+ return pluralType( *it );
+ }
+ }
+ // kdelibs.mo does not seem to exist for this language
+ return -1;
+}
+
+int KLocale::pluralType( const KCatalogue& catalog )
+{
+ const char* pluralFormString =
+ I18N_NOOP("_: Dear translator, please do not translate this string "
+ "in any form, but pick the _right_ value out of "
+ "NoPlural/TwoForms/French... If not sure what to do mail "
+ "thd@kde.org and coolo@kde.org, they will tell you. "
+ "Better leave that out if unsure, the programs will "
+ "crash!!\nDefinition of PluralForm - to be set by the "
+ "translator of kdelibs.po");
+ TQString pf (catalog.translate( pluralFormString));
+ if ( pf.isEmpty() ) {
+ return -1;
+ }
+ else if ( pf == "NoPlural" )
+ return 0;
+ else if ( pf == "TwoForms" )
+ return 1;
+ else if ( pf == "French" )
+ return 2;
+ else if ( pf == "OneTwoRest" )
+ return 3;
+ else if ( pf == "Russian" )
+ return 4;
+ else if ( pf == "Polish" )
+ return 5;
+ else if ( pf == "Slovenian" )
+ return 6;
+ else if ( pf == "Lithuanian" )
+ return 7;
+ else if ( pf == "Czech" )
+ return 8;
+ else if ( pf == "Slovak" )
+ return 9;
+ else if ( pf == "Maltese" )
+ return 10;
+ else if ( pf == "Arabic" )
+ return 11;
+ else if ( pf == "Balcan" )
+ return 12;
+ else if ( pf == "Macedonian" )
+ return 13;
+ else if ( pf == "Gaeilge" )
+ return 14;
+ else {
+ kdWarning(173) << "Definition of PluralForm is none of "
+ << "NoPlural/"
+ << "TwoForms/"
+ << "French/"
+ << "OneTwoRest/"
+ << "Russian/"
+ << "Polish/"
+ << "Slovenian/"
+ << "Lithuanian/"
+ << "Czech/"
+ << "Slovak/"
+ << "Arabic/"
+ << "Balcan/"
+ << "Macedonian/"
+ << "Gaeilge/"
+ << "Maltese: " << pf << endl;
+ exit(1);
+ }
+}
+
+void KLocale::doFormatInit() const
+{
+ if ( d->formatInited ) return;
+
+ KLocale * that = const_cast<KLocale *>(this);
+ that->initFormat();
+
+ d->formatInited = true;
+}
+
+void KLocale::initFormat()
+{
+ KConfig *config = d->config;
+ if (!config) config = KGlobal::instance()->config();
+ Q_ASSERT( config );
+
+ kdDebug(173) << "KLocale::initFormat" << endl;
+
+ // make sure the config files are read using the correct locale
+ // ### Why not add a KConfigBase::setLocale( const KLocale * )?
+ // ### Then we could remove this hack
+ KLocale *lsave = KGlobal::_locale;
+ KGlobal::_locale = this;
+
+ KConfigGroupSaver saver(config, "Locale");
+
+ KSimpleConfig entry(locate("locale",
+ TQString::tqfromLatin1("l10n/%1/entry.desktop")
+ .arg(m_country)), true);
+ entry.setGroup("KCM Locale");
+
+ // Numeric
+#define readConfigEntry(key, default, save) \
+ save = entry.readEntry(key, TQString::tqfromLatin1(default)); \
+ save = config->readEntry(key, save);
+
+#define readConfigNumEntry(key, default, save, type) \
+ save = (type)entry.readNumEntry(key, default); \
+ save = (type)config->readNumEntry(key, save);
+
+#define readConfigBoolEntry(key, default, save) \
+ save = entry.readBoolEntry(key, default); \
+ save = config->readBoolEntry(key, save);
+
+ readConfigEntry("DecimalSymbol", ".", m_decimalSymbol);
+ readConfigEntry("ThousandsSeparator", ",", m_thousandsSeparator);
+ m_thousandsSeparator.replace( TQString::tqfromLatin1("$0"), TQString() );
+ //kdDebug(173) << "m_thousandsSeparator=" << m_thousandsSeparator << endl;
+
+ readConfigEntry("PositiveSign", "", m_positiveSign);
+ readConfigEntry("NegativeSign", "-", m_negativeSign);
+
+ // Monetary
+ readConfigEntry("CurrencySymbol", "$", m_currencySymbol);
+ readConfigEntry("MonetaryDecimalSymbol", ".", m_monetaryDecimalSymbol);
+ readConfigEntry("MonetaryThousandsSeparator", ",",
+ m_monetaryThousandsSeparator);
+ m_monetaryThousandsSeparator.replace(TQString::tqfromLatin1("$0"), TQString());
+
+ readConfigNumEntry("FracDigits", 2, m_fracDigits, int);
+ readConfigBoolEntry("PositivePrefixCurrencySymbol", true,
+ m_positivePrefixCurrencySymbol);
+ readConfigBoolEntry("NegativePrefixCurrencySymbol", true,
+ m_negativePrefixCurrencySymbol);
+ readConfigNumEntry("PositiveMonetarySignPosition", (int)BeforeQuantityMoney,
+ m_positiveMonetarySignPosition, SignPosition);
+ readConfigNumEntry("NegativeMonetarySignPosition", (int)ParensAround,
+ m_negativeMonetarySignPosition, SignPosition);
+
+
+ // Date and time
+ readConfigEntry("TimeFormat", "%H:%M:%S", m_timeFormat);
+ readConfigEntry("DateFormat", "%A %d %B %Y", m_dateFormat);
+ readConfigEntry("DateFormatShort", "%Y-%m-%d", m_dateFormatShort);
+ readConfigNumEntry("WeekStartDay", 1, d->weekStartDay, int);
+
+ // other
+ readConfigNumEntry("PageSize", (int)TQPrinter::A4, d->pageSize, int);
+ readConfigNumEntry("MeasureSystem", (int)Metric, d->measureSystem,
+ MeasureSystem);
+ readConfigEntry("CalendarSystem", "gregorian", d->calendarType);
+ delete d->calendar;
+ d->calendar = 0; // ### HPB Is this the correct place?
+
+ //Grammatical
+ //Precedence here is l10n / i18n / config file
+ KSimpleConfig language(locate("locale",
+ TQString::tqfromLatin1("%1/entry.desktop")
+ .arg(m_language)), true);
+ language.setGroup("KCM Locale");
+#define read3ConfigBoolEntry(key, default, save) \
+ save = entry.readBoolEntry(key, default); \
+ save = language.readBoolEntry(key, save); \
+ save = config->readBoolEntry(key, save);
+
+ read3ConfigBoolEntry("NounDeclension", false, d->nounDeclension);
+ read3ConfigBoolEntry("DateMonthNamePossessive", false,
+ d->dateMonthNamePossessive);
+
+ // end of hack
+ KGlobal::_locale = lsave;
+}
+
+bool KLocale::setCountry(const TQString & country)
+{
+ // Check if the file exists too??
+ if ( country.isEmpty() )
+ return false;
+
+ m_country = country;
+
+ d->formatInited = false;
+
+ return true;
+}
+
+TQString KLocale::catalogueFileName(const TQString & language,
+ const KCatalogue & catalog)
+{
+ TQString path = TQString::tqfromLatin1("%1/LC_MESSAGES/%2.mo")
+ .arg( language )
+ .arg( catalog.name() );
+
+ TQString fileName = locate( "locale", path );
+ if (fileName.isEmpty())
+ fileName = locate( "locale-bundle", path );
+
+ return fileName;
+}
+
+bool KLocale::setLanguage(const TQString & language)
+{
+ if ( d->languageList.contains( language ) ) {
+ d->languageList.remove( language );
+ }
+ d->languageList.prepend( language ); // let us consider this language to be the most important one
+
+ m_language = language; // remember main language for shortcut evaluation
+
+ // important when called from the outside and harmless when called before populating the
+ // catalog name list
+ updateCatalogues();
+
+ d->formatInited = false;
+
+ return true; // Maybe the mo-files for this language are empty, but in principle we can speak all languages
+}
+
+bool KLocale::setLanguage(const TQStringList & languages)
+{
+ TQStringList languageList( languages );
+ // This list might contain
+ // 1) some empty strings that we have to eliminate
+ // 2) duplicate entries like in de:fr:de, where we have to keep the first occurrance of a language in order
+ // to preserve the order of precenence of the user => iterate backwards
+ // 3) languages into which the application is not translated. For those languages we should not even load kdelibs.mo or kio.po.
+ // these langugage have to be dropped. Otherwise we get strange side effects, e.g. with Hebrew:
+ // the right/left switch for languages that write from
+ // right to left (like Hebrew or Arabic) is set in kdelibs.mo. If you only have kdelibs.mo
+ // but nothing from appname.mo, you get a mostly English app with layout from right to left.
+ // That was considered to be a bug by the Hebrew translators.
+ for( TQStringList::Iterator it = languageList.fromLast();
+ it != languageList.begin(); --it )
+ {
+ // kdDebug() << "checking " << (*it) << endl;
+ bool bIsTranslated = isApplicationTranslatedInto( *it );
+ if ( languageList.contains(*it) > 1 || (*it).isEmpty() || (!bIsTranslated) ) {
+ // kdDebug() << "removing " << (*it) << endl;
+ it = languageList.remove( it );
+ }
+ }
+ // now this has left the first element of the list unchecked.
+ // The question why this is the case is left as an exercise for the reader...
+ // Besides the list might have been empty all the way, so check that too.
+ if ( languageList.begin() != languageList.end() ) {
+ TQStringList::Iterator it = languageList.begin(); // now pointing to the first element
+ // kdDebug() << "checking " << (*it) << endl;
+ if( (*it).isEmpty() || !(isApplicationTranslatedInto( *it )) ) {
+ // kdDebug() << "removing " << (*it) << endl;
+ languageList.remove( it ); // that's what the iterator was for...
+ }
+ }
+
+ if ( languageList.isEmpty() ) {
+ // user picked no language, so we assume he/she speaks English.
+ languageList.append( defaultLanguage() );
+ }
+ m_language = languageList.first(); // keep this for shortcut evaluations
+
+ d->languageList = languageList; // keep this new list of languages to use
+ d->langTwoAlpha.clear(); // Flush cache
+
+ // important when called from the outside and harmless when called before populating the
+ // catalog name list
+ updateCatalogues();
+
+ return true; // we found something. Maybe it's only English, but we found something
+}
+
+bool KLocale::isApplicationTranslatedInto( const TQString & language)
+{
+ if ( language.isEmpty() ) {
+ return false;
+ }
+
+ if ( language == defaultLanguage() ) {
+ // en_us is always "installed"
+ return true;
+ }
+
+ TQString appName = d->appName;
+ if (maincatalogue) {
+ appName = TQString::tqfromLatin1(maincatalogue);
+ }
+ // sorry, catalogueFileName requires catalog object,k which we do not have here
+ // path finding was supposed to be moved completely to KCatalogue. The interface cannot
+ // be changed that far during deep freeze. So in order to fix the bug now, we have
+ // duplicated code for file path evaluation. Cleanup will follow later. We could have e.g.
+ // a static method in KCataloge that can translate between these file names.
+ // a stat
+ TQString sFileName = TQString::tqfromLatin1("%1/LC_MESSAGES/%2.mo")
+ .arg( language )
+ .arg( appName );
+ // kdDebug() << "isApplicationTranslatedInto: filename " << sFileName << endl;
+
+ TQString sAbsFileName = locate( "locale", sFileName );
+ if (sAbsFileName.isEmpty())
+ sAbsFileName = locate( "locale-bundle", sFileName );
+
+ // kdDebug() << "isApplicationTranslatedInto: absname " << sAbsFileName << endl;
+ return ! sAbsFileName.isEmpty();
+}
+
+void KLocale::splitLocale(const TQString & aStr,
+ TQString & language,
+ TQString & country,
+ TQString & chrset)
+{
+ TQString str = aStr;
+
+ // just in case, there is another language appended
+ int f = str.find(':');
+ if (f >= 0)
+ str.truncate(f);
+
+ country = TQString::null;
+ chrset = TQString::null;
+ language = TQString::null;
+
+ f = str.find('.');
+ if (f >= 0)
+ {
+ chrset = str.mid(f + 1);
+ str.truncate(f);
+ }
+
+ f = str.find('_');
+ if (f >= 0)
+ {
+ country = str.mid(f + 1);
+ str.truncate(f);
+ }
+
+ language = str;
+}
+
+TQString KLocale::language() const
+{
+ return m_language;
+}
+
+TQString KLocale::country() const
+{
+ return m_country;
+}
+
+TQString KLocale::monthName(int i, bool shortName) const
+{
+ if ( shortName )
+ switch ( i )
+ {
+ case 1: return translate("January", "Jan");
+ case 2: return translate("February", "Feb");
+ case 3: return translate("March", "Mar");
+ case 4: return translate("April", "Apr");
+ case 5: return translate("May short", "May");
+ case 6: return translate("June", "Jun");
+ case 7: return translate("July", "Jul");
+ case 8: return translate("August", "Aug");
+ case 9: return translate("September", "Sep");
+ case 10: return translate("October", "Oct");
+ case 11: return translate("November", "Nov");
+ case 12: return translate("December", "Dec");
+ }
+ else
+ switch (i)
+ {
+ case 1: return translate("January");
+ case 2: return translate("February");
+ case 3: return translate("March");
+ case 4: return translate("April");
+ case 5: return translate("May long", "May");
+ case 6: return translate("June");
+ case 7: return translate("July");
+ case 8: return translate("August");
+ case 9: return translate("September");
+ case 10: return translate("October");
+ case 11: return translate("November");
+ case 12: return translate("December");
+ }
+
+ return TQString::null;
+}
+
+TQString KLocale::monthNamePossessive(int i, bool shortName) const
+{
+ if ( shortName )
+ switch ( i )
+ {
+ case 1: return translate("of January", "of Jan");
+ case 2: return translate("of February", "of Feb");
+ case 3: return translate("of March", "of Mar");
+ case 4: return translate("of April", "of Apr");
+ case 5: return translate("of May short", "of May");
+ case 6: return translate("of June", "of Jun");
+ case 7: return translate("of July", "of Jul");
+ case 8: return translate("of August", "of Aug");
+ case 9: return translate("of September", "of Sep");
+ case 10: return translate("of October", "of Oct");
+ case 11: return translate("of November", "of Nov");
+ case 12: return translate("of December", "of Dec");
+ }
+ else
+ switch (i)
+ {
+ case 1: return translate("of January");
+ case 2: return translate("of February");
+ case 3: return translate("of March");
+ case 4: return translate("of April");
+ case 5: return translate("of May long", "of May");
+ case 6: return translate("of June");
+ case 7: return translate("of July");
+ case 8: return translate("of August");
+ case 9: return translate("of September");
+ case 10: return translate("of October");
+ case 11: return translate("of November");
+ case 12: return translate("of December");
+ }
+
+ return TQString::null;
+}
+
+TQString KLocale::weekDayName (int i, bool shortName) const
+{
+ return calendar()->weekDayName(i, shortName);
+}
+
+void KLocale::insertCatalogue( const TQString & catalog )
+{
+ if ( !d->catalogNames.contains( catalog) ) {
+ d->catalogNames.append( catalog );
+ }
+ updateCatalogues( ); // evaluate the changed list and generate the neccessary KCatalog objects
+}
+
+void KLocale::updateCatalogues( )
+{
+ // some changes have occured. Maybe we have learned or forgotten some languages.
+ // Maybe the language precedence has changed.
+ // Maybe we have learned or forgotten some catalog names.
+ // Now examine the list of KCatalogue objects and change it according to the new circumstances.
+
+ // this could be optimized: try to reuse old KCatalog objects, but remember that the order of
+ // catalogs might have changed: e.g. in this fashion
+ // 1) move all catalogs into a temporary list
+ // 2) iterate over all languages and catalog names
+ // 3.1) pick the catalog from the saved list, if it already exists
+ // 3.2) else create a new catalog.
+ // but we will do this later.
+
+ for ( TQValueList<KCatalogue>::Iterator it = d->catalogues.begin();
+ it != d->catalogues.end(); )
+ {
+ it = d->catalogues.remove(it);
+ }
+
+ // now iterate over all languages and all wanted catalog names and append or create them in the right order
+ // the sequence must be e.g. nds/appname nds/kdelibs nds/kio de/appname de/kdelibs de/kio etc.
+ // and not nds/appname de/appname nds/kdelibs de/kdelibs etc. Otherwise we would be in trouble with a language
+ // sequende nds,en_US, de. In this case en_US must hide everything below in the language list.
+ for ( TQStringList::ConstIterator itLangs = d->languageList.begin();
+ itLangs != d->languageList.end(); ++itLangs)
+ {
+ for ( TQStringList::ConstIterator itNames = d->catalogNames.begin();
+ itNames != d->catalogNames.end(); ++itNames)
+ {
+ KCatalogue cat( *itNames, *itLangs ); // create Catalog for this name and this language
+ d->catalogues.append( cat );
+ }
+ }
+ initPluralTypes(); // evaluate the plural type for all languages and remember this in each KCatalogue
+}
+
+
+
+
+void KLocale::removeCatalogue(const TQString &catalog)
+{
+ if ( d->catalogNames.contains( catalog )) {
+ d->catalogNames.remove( catalog );
+ if (KGlobal::_instance)
+ updateCatalogues(); // walk through the KCatalogue instances and weed out everything we no longer need
+ }
+}
+
+void KLocale::setActiveCatalogue(const TQString &catalog)
+{
+ if ( d->catalogNames.contains( catalog ) ) {
+ d->catalogNames.remove( catalog );
+ d->catalogNames.prepend( catalog );
+ updateCatalogues(); // walk through the KCatalogue instances and adapt to the new order
+ }
+}
+
+KLocale::~KLocale()
+{
+ delete d->calendar;
+ delete d->languages;
+ delete d;
+ d = 0L;
+}
+
+TQString KLocale::translate_priv(const char *msgid,
+ const char *fallback,
+ const char **translated,
+ int* pluralType ) const
+{
+ if ( pluralType) {
+ *pluralType = -1; // unless we find something more precise
+ }
+ if (!msgid || !msgid[0])
+ {
+ kdWarning() << "KLocale: trying to look up \"\" in catalog. "
+ << "Fix the program" << endl;
+ return TQString::null;
+ }
+
+ if ( useDefaultLanguage() ) { // shortcut evaluation if en_US is main language: do not consult the catalogs
+ return TQString::fromUtf8( fallback );
+ }
+
+ for ( TQValueList<KCatalogue>::ConstIterator it = d->catalogues.begin();
+ it != d->catalogues.end();
+ ++it )
+ {
+ // shortcut evaluation: once we have arrived at en_US (default language) we cannot consult
+ // the catalog as it will not have an assiciated mo-file. For this default language we can
+ // immediately pick the fallback string.
+ if ( (*it).language() == defaultLanguage() ) {
+ return TQString::fromUtf8( fallback );
+ }
+
+ const char * text = (*it).translate( msgid );
+
+ if ( text )
+ {
+ // we found it
+ if (translated) {
+ *translated = text;
+ }
+ if ( pluralType) {
+ *pluralType = (*it).pluralType(); // remember the plural type information from the catalog that was used
+ }
+ return TQString::fromUtf8( text );
+ }
+ }
+
+ // Always use UTF-8 if the string was not found
+ return TQString::fromUtf8( fallback );
+}
+
+TQString KLocale::translate(const char* msgid) const
+{
+ return translate_priv(msgid, msgid);
+}
+
+TQString KLocale::translate( const char *index, const char *fallback) const
+{
+ if (!index || !index[0] || !fallback || !fallback[0])
+ {
+ kdDebug(173) << "KLocale: trying to look up \"\" in catalog. "
+ << "Fix the program" << endl;
+ return TQString::null;
+ }
+
+ if ( useDefaultLanguage() )
+ return TQString::fromUtf8( fallback );
+
+ char *newstring = new char[strlen(index) + strlen(fallback) + 5];
+ sprintf(newstring, "_: %s\n%s", index, fallback);
+ // as copying TQString is very fast, it looks slower as it is ;/
+ TQString r = translate_priv(newstring, fallback);
+ delete [] newstring;
+
+ return r;
+}
+
+static TQString put_n_in(const TQString &orig, unsigned long n)
+{
+ TQString ret = orig;
+ int index = ret.find("%n");
+ if (index == -1)
+ return ret;
+ ret.replace(index, 2, TQString::number(n));
+ return ret;
+}
+
+#define EXPECT_LENGTH(x) \
+ if (forms.count() != x) { \
+ kdError() << "translation of \"" << singular << "\" doesn't contain " << x << " different plural forms as expected\n"; \
+ return TQString( "BROKEN TRANSLATION %1" ).arg( singular ); }
+
+TQString KLocale::translate( const char *singular, const char *plural,
+ unsigned long n ) const
+{
+ if (!singular || !singular[0] || !plural || !plural[0])
+ {
+ kdWarning() << "KLocale: trying to look up \"\" in catalog. "
+ << "Fix the program" << endl;
+ return TQString::null;
+ }
+
+ char *newstring = new char[strlen(singular) + strlen(plural) + 6];
+ sprintf(newstring, "_n: %s\n%s", singular, plural);
+ // as copying TQString is very fast, it looks slower as it is ;/
+ int pluralType = -1;
+ TQString r = translate_priv(newstring, 0, 0, &pluralType);
+ delete [] newstring;
+
+ if ( r.isEmpty() || useDefaultLanguage() || pluralType == -1) {
+ if ( n == 1 ) {
+ return put_n_in( TQString::fromUtf8( singular ), n );
+ } else {
+ TQString tmp = TQString::fromUtf8( plural );
+#ifndef NDEBUG
+ if (tmp.find("%n") == -1) {
+ kdDebug() << "the message for i18n should contain a '%n'! " << plural << endl;
+ }
+#endif
+ return put_n_in( tmp, n );
+ }
+ }
+
+ TQStringList forms = TQStringList::split( "\n", r, false );
+ switch ( pluralType ) {
+ case 0: // NoPlural
+ EXPECT_LENGTH( 1 );
+ return put_n_in( forms[0], n);
+ case 1: // TwoForms
+ EXPECT_LENGTH( 2 );
+ if ( n == 1 )
+ return put_n_in( forms[0], n);
+ else
+ return put_n_in( forms[1], n);
+ case 2: // French
+ EXPECT_LENGTH( 2 );
+ if ( n == 1 || n == 0 )
+ return put_n_in( forms[0], n);
+ else
+ return put_n_in( forms[1], n);
+ case 3: // OneTwoRest
+ EXPECT_LENGTH( 3 );
+ if ( n == 1 )
+ return put_n_in( forms[0], n);
+ else if ( n == 2 )
+ return put_n_in( forms[1], n);
+ else
+ return put_n_in( forms[2], n);
+ case 4: // Russian, corrected by mok
+ EXPECT_LENGTH( 3 );
+ if ( n%10 == 1 && n%100 != 11)
+ return put_n_in( forms[0], n); // odin fail
+ else if (( n%10 >= 2 && n%10 <=4 ) && (n%100<10 || n%100>20))
+ return put_n_in( forms[1], n); // dva faila
+ else
+ return put_n_in( forms[2], n); // desyat' failov
+ case 5: // Polish
+ EXPECT_LENGTH( 3 );
+ if ( n == 1 )
+ return put_n_in( forms[0], n);
+ else if ( n%10 >= 2 && n%10 <=4 && (n%100<10 || n%100>=20) )
+ return put_n_in( forms[1], n);
+ else
+ return put_n_in( forms[2], n);
+ case 6: // Slovenian
+ EXPECT_LENGTH( 4 );
+ if ( n%100 == 1 )
+ return put_n_in( forms[1], n); // ena datoteka
+ else if ( n%100 == 2 )
+ return put_n_in( forms[2], n); // dve datoteki
+ else if ( n%100 == 3 || n%100 == 4 )
+ return put_n_in( forms[3], n); // tri datoteke
+ else
+ return put_n_in( forms[0], n); // sto datotek
+ case 7: // Lithuanian
+ EXPECT_LENGTH( 3 );
+ if ( n%10 == 0 || (n%100>=11 && n%100<=19) )
+ return put_n_in( forms[2], n);
+ else if ( n%10 == 1 )
+ return put_n_in( forms[0], n);
+ else
+ return put_n_in( forms[1], n);
+ case 8: // Czech - use modern form which is equivalent to Slovak
+ case 9: // Slovak
+ EXPECT_LENGTH( 3 );
+ if ( n == 1 )
+ return put_n_in( forms[0], n);
+ else if (( n >= 2 ) && ( n <= 4 ))
+ return put_n_in( forms[1], n);
+ else
+ return put_n_in( forms[2], n);
+ case 10: // Maltese
+ EXPECT_LENGTH( 4 );
+ if ( n == 1 )
+ return put_n_in( forms[0], n );
+ else if ( ( n == 0 ) || ( n%100 > 0 && n%100 <= 10 ) )
+ return put_n_in( forms[1], n );
+ else if ( n%100 > 10 && n%100 < 20 )
+ return put_n_in( forms[2], n );
+ else
+ return put_n_in( forms[3], n );
+ case 11: // Arabic
+ EXPECT_LENGTH( 4 );
+ if (n == 1)
+ return put_n_in(forms[0], n);
+ else if (n == 2)
+ return put_n_in(forms[1], n);
+ else if ( n < 11)
+ return put_n_in(forms[2], n);
+ else
+ return put_n_in(forms[3], n);
+ case 12: // Balcan
+ EXPECT_LENGTH( 3 );
+ if (n != 11 && n % 10 == 1)
+ return put_n_in(forms[0], n);
+ else if (n / 10 != 1 && n % 10 >= 2 && n % 10 <= 4)
+ return put_n_in(forms[1], n);
+ else
+ return put_n_in(forms[2], n);
+ case 13: // Macedonian
+ EXPECT_LENGTH(3);
+ if (n % 10 == 1)
+ return put_n_in(forms[0], n);
+ else if (n % 10 == 2)
+ return put_n_in(forms[1], n);
+ else
+ return put_n_in(forms[2], n);
+ case 14: // Gaeilge
+ EXPECT_LENGTH(5);
+ if (n == 1) // "ceann amhain"
+ return put_n_in(forms[0], n);
+ else if (n == 2) // "dha cheann"
+ return put_n_in(forms[1], n);
+ else if (n < 7) // "%n cinn"
+ return put_n_in(forms[2], n);
+ else if (n < 11) // "%n gcinn"
+ return put_n_in(forms[3], n);
+ else // "%n ceann"
+ return put_n_in(forms[4], n);
+ }
+ kdFatal() << "The function should have been returned in another way\n";
+
+ return TQString::null;
+}
+
+TQString KLocale::translateQt( const char *context, const char *source,
+ const char *message) const
+{
+ if (!source || !source[0]) {
+ kdWarning() << "KLocale: trying to look up \"\" in catalog. "
+ << "Fix the program" << endl;
+ return TQString::null;
+ }
+
+ if ( useDefaultLanguage() ) {
+ return TQString::null;
+ }
+
+ char *newstring = 0;
+ const char *translation = 0;
+ TQString r;
+
+ if ( message && message[0]) {
+ char *newstring = new char[strlen(source) + strlen(message) + 5];
+ sprintf(newstring, "_: %s\n%s", source, message);
+ const char *translation = 0;
+ // as copying TQString is very fast, it looks slower as it is ;/
+ r = translate_priv(newstring, source, &translation);
+ delete [] newstring;
+ if (translation)
+ return r;
+ }
+
+ if ( context && context[0] && message && message[0]) {
+ newstring = new char[strlen(context) + strlen(message) + 5];
+ sprintf(newstring, "_: %s\n%s", context, message);
+ // as copying TQString is very fast, it looks slower as it is ;/
+ r = translate_priv(newstring, source, &translation);
+ delete [] newstring;
+ if (translation)
+ return r;
+ }
+
+ r = translate_priv(source, source, &translation);
+ if (translation)
+ return r;
+ return TQString::null;
+}
+
+bool KLocale::nounDeclension() const
+{
+ doFormatInit();
+ return d->nounDeclension;
+}
+
+bool KLocale::dateMonthNamePossessive() const
+{
+ doFormatInit();
+ return d->dateMonthNamePossessive;
+}
+
+int KLocale::weekStartDay() const
+{
+ doFormatInit();
+ return d->weekStartDay;
+}
+
+bool KLocale::weekStartsMonday() const //deprecated
+{
+ doFormatInit();
+ return (d->weekStartDay==1);
+}
+
+TQString KLocale::decimalSymbol() const
+{
+ doFormatInit();
+ return m_decimalSymbol;
+}
+
+TQString KLocale::thousandsSeparator() const
+{
+ doFormatInit();
+ return m_thousandsSeparator;
+}
+
+TQString KLocale::currencySymbol() const
+{
+ doFormatInit();
+ return m_currencySymbol;
+}
+
+TQString KLocale::monetaryDecimalSymbol() const
+{
+ doFormatInit();
+ return m_monetaryDecimalSymbol;
+}
+
+TQString KLocale::monetaryThousandsSeparator() const
+{
+ doFormatInit();
+ return m_monetaryThousandsSeparator;
+}
+
+TQString KLocale::positiveSign() const
+{
+ doFormatInit();
+ return m_positiveSign;
+}
+
+TQString KLocale::negativeSign() const
+{
+ doFormatInit();
+ return m_negativeSign;
+}
+
+int KLocale::fracDigits() const
+{
+ doFormatInit();
+ return m_fracDigits;
+}
+
+bool KLocale::positivePrefixCurrencySymbol() const
+{
+ doFormatInit();
+ return m_positivePrefixCurrencySymbol;
+}
+
+bool KLocale::negativePrefixCurrencySymbol() const
+{
+ doFormatInit();
+ return m_negativePrefixCurrencySymbol;
+}
+
+KLocale::SignPosition KLocale::positiveMonetarySignPosition() const
+{
+ doFormatInit();
+ return m_positiveMonetarySignPosition;
+}
+
+KLocale::SignPosition KLocale::negativeMonetarySignPosition() const
+{
+ doFormatInit();
+ return m_negativeMonetarySignPosition;
+}
+
+static inline void put_it_in( TQChar *buffer, uint& index, const TQString &s )
+{
+ for ( uint l = 0; l < s.length(); l++ )
+ buffer[index++] = s.tqat( l );
+}
+
+static inline void put_it_in( TQChar *buffer, uint& index, int number )
+{
+ buffer[index++] = number / 10 + '0';
+ buffer[index++] = number % 10 + '0';
+}
+
+// insert (thousands)-"separator"s into the non-fractional part of str
+static void _insertSeparator(TQString &str, const TQString &separator,
+ const TQString &decimalSymbol)
+{
+ // leave fractional part untouched
+ TQString mainPart = str.section(decimalSymbol, 0, 0);
+ TQString fracPart = str.section(decimalSymbol, 1, 1,
+ TQString::SectionIncludeLeadingSep);
+
+ for (int pos = mainPart.length() - 3; pos > 0; pos -= 3)
+ mainPart.insert(pos, separator);
+
+ str = mainPart + fracPart;
+}
+
+TQString KLocale::formatMoney(double num,
+ const TQString & symbol,
+ int precision) const
+{
+ // some defaults
+ TQString currency = symbol.isNull()
+ ? currencySymbol()
+ : symbol;
+ if (precision < 0) precision = fracDigits();
+
+ // the number itself
+ bool neg = num < 0;
+ TQString res = TQString::number(neg?-num:num, 'f', precision);
+
+ // Replace dot with locale decimal separator
+ res.replace(TQChar('.'), monetaryDecimalSymbol());
+
+ // Insert the thousand separators
+ _insertSeparator(res, monetaryThousandsSeparator(), monetaryDecimalSymbol());
+
+ // set some variables we need later
+ int signpos = neg
+ ? negativeMonetarySignPosition()
+ : positiveMonetarySignPosition();
+ TQString sign = neg
+ ? negativeSign()
+ : positiveSign();
+
+ switch (signpos)
+ {
+ case ParensAround:
+ res.prepend('(');
+ res.append (')');
+ break;
+ case BeforeQuantityMoney:
+ res.prepend(sign);
+ break;
+ case AfterQuantityMoney:
+ res.append(sign);
+ break;
+ case BeforeMoney:
+ currency.prepend(sign);
+ break;
+ case AfterMoney:
+ currency.append(sign);
+ break;
+ }
+
+ if (neg?negativePrefixCurrencySymbol():
+ positivePrefixCurrencySymbol())
+ {
+ res.prepend(' ');
+ res.prepend(currency);
+ } else {
+ res.append (' ');
+ res.append (currency);
+ }
+
+ return res;
+}
+
+TQString KLocale::formatMoney(const TQString &numStr) const
+{
+ return formatMoney(numStr.toDouble());
+}
+
+TQString KLocale::formatNumber(double num, int precision) const
+{
+ if (precision == -1) precision = 2;
+ // no need to round since TQString::number does this for us
+ return formatNumber(TQString::number(num, 'f', precision), false, 0);
+}
+
+TQString KLocale::formatLong(long num) const
+{
+ return formatNumber((double)num, 0);
+}
+
+TQString KLocale::formatNumber(const TQString &numStr) const
+{
+ return formatNumber(numStr, true, 2);
+}
+
+// increase the digit at 'position' by one
+static void _inc_by_one(TQString &str, int position)
+{
+ for (int i = position; i >= 0; i--)
+ {
+ char last_char = str[i].latin1();
+ switch(last_char)
+ {
+ case '0':
+ str[i] = (QChar)'1';
+ break;
+ case '1':
+ str[i] = (QChar)'2';
+ break;
+ case '2':
+ str[i] = (QChar)'3';
+ break;
+ case '3':
+ str[i] = (QChar)'4';
+ break;
+ case '4':
+ str[i] = (QChar)'5';
+ break;
+ case '5':
+ str[i] = (QChar)'6';
+ break;
+ case '6':
+ str[i] = (QChar)'7';
+ break;
+ case '7':
+ str[i] = (QChar)'8';
+ break;
+ case '8':
+ str[i] = (QChar)'9';
+ break;
+ case '9':
+ str[i] = (QChar)'0';
+ if (i == 0) str.prepend('1');
+ continue;
+ case '.':
+ continue;
+ }
+ break;
+ }
+}
+
+// Cut off if more digits in fractional part than 'precision'
+static void _round(TQString &str, int precision)
+{
+ int decimalSymbolPos = str.find('.');
+
+ if (decimalSymbolPos == -1)
+ if (precision == 0) return;
+ else if (precision > 0) // add dot if missing (and needed)
+ {
+ str.append('.');
+ decimalSymbolPos = str.length() - 1;
+ }
+
+ // fill up with more than enough zeroes (in case fractional part too short)
+ str.append(TQString().fill('0', precision));
+
+ // Now decide whether to round up or down
+ char last_char = str[decimalSymbolPos + precision + 1].latin1();
+ switch (last_char)
+ {
+ case '0':
+ case '1':
+ case '2':
+ case '3':
+ case '4':
+ // nothing to do, rounding down
+ break;
+ case '5':
+ case '6':
+ case '7':
+ case '8':
+ case '9':
+ _inc_by_one(str, decimalSymbolPos + precision);
+ break;
+ default:
+ break;
+ }
+
+ decimalSymbolPos = str.find('.');
+ str.truncate(decimalSymbolPos + precision + 1);
+
+ // if precision == 0 delete also '.'
+ if (precision == 0) str = str.section('.', 0, 0);
+}
+
+TQString KLocale::formatNumber(const TQString &numStr, bool round,
+ int precision) const
+{
+ TQString tmpString = numStr;
+ if ((round && precision < 0) ||
+ ! TQRegExp("^[+-]?\\d+(\\.\\d+)*(e[+-]?\\d+)?$").exactMatch(tmpString))
+ return numStr;
+
+
+ // Skip the sign (for now)
+ bool neg = (tmpString[0] == (QChar)'-');
+ if (neg || tmpString[0] == (QChar)'+') tmpString.remove(0, 1);
+
+ // Split off exponential part (including 'e'-symbol)
+ TQString mantString = tmpString.section('e', 0, 0,
+ TQString::SectionCaseInsensitiveSeps);
+ TQString expString = tmpString.section('e', 1, 1,
+ TQString::SectionCaseInsensitiveSeps |
+ TQString::SectionIncludeLeadingSep);
+
+ if (round) _round(mantString, precision);
+
+ // Replace dot with locale decimal separator
+ mantString.replace(TQChar('.'), decimalSymbol());
+
+ // Insert the thousand separators
+ _insertSeparator(mantString, thousandsSeparator(), decimalSymbol());
+
+ // How can we know where we should put the sign?
+ mantString.prepend(neg?negativeSign():positiveSign());
+
+ return mantString + expString;
+}
+
+TQString KLocale::formatDate(const TQDate &pDate, bool shortFormat) const
+{
+ const TQString rst = shortFormat?dateFormatShort():dateFormat();
+
+ TQString buffer;
+
+ if ( ! pDate.isValid() ) return buffer;
+
+ bool escape = false;
+
+ int year = calendar()->year(pDate);
+ int month = calendar()->month(pDate);
+
+ for ( uint format_index = 0; format_index < rst.length(); ++format_index )
+ {
+ if ( !escape )
+ {
+ if ( (TQChar(rst.tqat( format_index )).tqunicode()) == '%' )
+ escape = true;
+ else
+ buffer.append(rst.tqat(format_index));
+ }
+ else
+ {
+ switch ( TQChar(rst.tqat( format_index )).tqunicode() )
+ {
+ case '%':
+ buffer.append('%');
+ break;
+ case 'Y':
+ buffer.append(calendar()->yearString(pDate, false));
+ break;
+ case 'y':
+ buffer.append(calendar()->yearString(pDate, true));
+ break;
+ case 'n':
+ buffer.append(calendar()->monthString(pDate, true));
+ break;
+ case 'e':
+ buffer.append(calendar()->dayString(pDate, true));
+ break;
+ case 'm':
+ buffer.append(calendar()->monthString(pDate, false));
+ break;
+ case 'b':
+ if (d->nounDeclension && d->dateMonthNamePossessive)
+ buffer.append(calendar()->monthNamePossessive(month, year, true));
+ else
+ buffer.append(calendar()->monthName(month, year, true));
+ break;
+ case 'B':
+ if (d->nounDeclension && d->dateMonthNamePossessive)
+ buffer.append(calendar()->monthNamePossessive(month, year, false));
+ else
+ buffer.append(calendar()->monthName(month, year, false));
+ break;
+ case 'd':
+ buffer.append(calendar()->dayString(pDate, false));
+ break;
+ case 'a':
+ buffer.append(calendar()->weekDayName(pDate, true));
+ break;
+ case 'A':
+ buffer.append(calendar()->weekDayName(pDate, false));
+ break;
+ default:
+ buffer.append(rst.tqat(format_index));
+ break;
+ }
+ escape = false;
+ }
+ }
+ return buffer;
+}
+
+void KLocale::setMainCatalogue(const char *catalog)
+{
+ maincatalogue = catalog;
+}
+
+double KLocale::readNumber(const TQString &_str, bool * ok) const
+{
+ TQString str = _str.stripWhiteSpace();
+ bool neg = str.find(negativeSign()) == 0;
+ if (neg)
+ str.remove( 0, negativeSign().length() );
+
+ /* will hold the scientific notation portion of the number.
+ Example, with 2.34E+23, exponentialPart == "E+23"
+ */
+ TQString exponentialPart;
+ int EPos;
+
+ EPos = str.find('E', 0, false);
+
+ if (EPos != -1)
+ {
+ exponentialPart = str.mid(EPos);
+ str = str.left(EPos);
+ }
+
+ int pos = str.find(decimalSymbol());
+ TQString major;
+ TQString minor;
+ if ( pos == -1 )
+ major = str;
+ else
+ {
+ major = str.left(pos);
+ minor = str.mid(pos + decimalSymbol().length());
+ }
+
+ // Remove thousand separators
+ int thlen = thousandsSeparator().length();
+ int lastpos = 0;
+ while ( ( pos = major.find( thousandsSeparator() ) ) > 0 )
+ {
+ // e.g. 12,,345,,678,,922 Acceptable positions (from the end) are 5, 10, 15... i.e. (3+thlen)*N
+ int fromEnd = major.length() - pos;
+ if ( fromEnd % (3+thlen) != 0 // Needs to be a multiple, otherwise it's an error
+ || pos - lastpos > 3 // More than 3 digits between two separators -> error
+ || pos == 0 // Can't start with a separator
+ || (lastpos>0 && pos-lastpos!=3)) // Must have exactly 3 digits between two separators
+ {
+ if (ok) *ok = false;
+ return 0.0;
+ }
+
+ lastpos = pos;
+ major.remove( pos, thlen );
+ }
+ if (lastpos>0 && major.length()-lastpos!=3) // Must have exactly 3 digits after the last separator
+ {
+ if (ok) *ok = false;
+ return 0.0;
+ }
+
+ TQString tot;
+ if (neg) tot = (QChar)'-';
+
+ tot += major + '.' + minor + exponentialPart;
+
+ return tot.toDouble(ok);
+}
+
+double KLocale::readMoney(const TQString &_str, bool * ok) const
+{
+ TQString str = _str.stripWhiteSpace();
+ bool neg = false;
+ bool currencyFound = false;
+ TQString symbol = currencySymbol();
+ // First try removing currency symbol from either end
+ int pos = str.find(symbol);
+ if ( pos == 0 || pos == (int) str.length()-symbol.length() )
+ {
+ str.remove(pos,symbol.length());
+ str = str.stripWhiteSpace();
+ currencyFound = true;
+ }
+ if (str.isEmpty())
+ {
+ if (ok) *ok = false;
+ return 0;
+ }
+ // Then try removing negative sign from either end
+ // (with a special case for parenthesis)
+ if (negativeMonetarySignPosition() == ParensAround)
+ {
+ if (str[0] == (QChar)'(' && str[str.length()-1] == (QChar)')')
+ {
+ neg = true;
+ str.remove(str.length()-1,1);
+ str.remove(0,1);
+ }
+ }
+ else
+ {
+ int i1 = str.find(negativeSign());
+ if ( i1 == 0 || i1 == (int) str.length()-1 )
+ {
+ neg = true;
+ str.remove(i1,negativeSign().length());
+ }
+ }
+ if (neg) str = str.stripWhiteSpace();
+
+ // Finally try again for the currency symbol, if we didn't find
+ // it already (because of the negative sign being in the way).
+ if ( !currencyFound )
+ {
+ pos = str.find(symbol);
+ if ( pos == 0 || pos == (int) str.length()-symbol.length() )
+ {
+ str.remove(pos,symbol.length());
+ str = str.stripWhiteSpace();
+ }
+ }
+
+ // And parse the rest as a number
+ pos = str.find(monetaryDecimalSymbol());
+ TQString major;
+ TQString minior;
+ if (pos == -1)
+ major = str;
+ else
+ {
+ major = str.left(pos);
+ minior = str.mid(pos + monetaryDecimalSymbol().length());
+ }
+
+ // Remove thousand separators
+ int thlen = monetaryThousandsSeparator().length();
+ int lastpos = 0;
+ while ( ( pos = major.find( monetaryThousandsSeparator() ) ) > 0 )
+ {
+ // e.g. 12,,345,,678,,922 Acceptable positions (from the end) are 5, 10, 15... i.e. (3+thlen)*N
+ int fromEnd = major.length() - pos;
+ if ( fromEnd % (3+thlen) != 0 // Needs to be a multiple, otherwise it's an error
+ || pos - lastpos > 3 // More than 3 digits between two separators -> error
+ || pos == 0 // Can't start with a separator
+ || (lastpos>0 && pos-lastpos!=3)) // Must have exactly 3 digits between two separators
+ {
+ if (ok) *ok = false;
+ return 0.0;
+ }
+ lastpos = pos;
+ major.remove( pos, thlen );
+ }
+ if (lastpos>0 && major.length()-lastpos!=3) // Must have exactly 3 digits after the last separator
+ {
+ if (ok) *ok = false;
+ return 0.0;
+ }
+
+ TQString tot;
+ if (neg) tot = (QChar)'-';
+ tot += major + '.' + minior;
+ return tot.toDouble(ok);
+}
+
+/**
+ * helper function to read integers
+ * @param str
+ * @param pos the position to start at. It will be updated when we parse it.
+ * @return the integer read in the string, or -1 if no string
+ */
+static int readInt(const TQString &str, uint &pos)
+{
+ if (!str.tqat(pos).isDigit()) return -1;
+ int result = 0;
+ for (; str.length() > pos && str.tqat(pos).isDigit(); pos++)
+ {
+ result *= 10;
+ result += str.tqat(pos).digitValue();
+ }
+
+ return result;
+}
+
+TQDate KLocale::readDate(const TQString &intstr, bool* ok) const
+{
+ TQDate date;
+ date = readDate(intstr, ShortFormat, ok);
+ if (date.isValid()) return date;
+ return readDate(intstr, NormalFormat, ok);
+}
+
+TQDate KLocale::readDate(const TQString &intstr, ReadDateFlags flags, bool* ok) const
+{
+ TQString fmt = ((flags & ShortFormat) ? dateFormatShort() : dateFormat()).simplifyWhiteSpace();
+ return readDate( intstr, fmt, ok );
+}
+
+TQDate KLocale::readDate(const TQString &intstr, const TQString &fmt, bool* ok) const
+{
+ //kdDebug() << "KLocale::readDate intstr=" << intstr << " fmt=" << fmt << endl;
+ TQString str = intstr.simplifyWhiteSpace().lower();
+ int day = -1, month = -1;
+ // allow the year to be omitted if not in the format
+ int year = calendar()->year(TQDate::currentDate());
+ uint strpos = 0;
+ uint fmtpos = 0;
+
+ int iLength; // Temporary variable used when reading input
+
+ bool error = false;
+
+ while (fmt.length() > fmtpos && str.length() > strpos && !error)
+ {
+
+ TQChar c = fmt.tqat(fmtpos++);
+
+ if (c != (QChar)'%') {
+ if (c.isSpace() && str.tqat(strpos).isSpace())
+ strpos++;
+ else if (c != str.tqat(strpos++))
+ error = true;
+ }
+ else
+ {
+ int j;
+ // remove space at the beginning
+ if (str.length() > strpos && str.tqat(strpos).isSpace())
+ strpos++;
+
+ c = fmt.tqat(fmtpos++);
+ switch (c)
+ {
+ case 'a':
+ case 'A':
+
+ error = true;
+ j = 1;
+ while (error && (j < 8)) {
+ TQString s = calendar()->weekDayName(j, c == (QChar)'a').lower();
+ int len = s.length();
+ if (str.mid(strpos, len) == s)
+ {
+ strpos += len;
+ error = false;
+ }
+ j++;
+ }
+ break;
+ case 'b':
+ case 'B':
+
+ error = true;
+ if (d->nounDeclension && d->dateMonthNamePossessive) {
+ j = 1;
+ while (error && (j < 13)) {
+ TQString s = calendar()->monthNamePossessive(j, year, c == (QChar)'b').lower();
+ int len = s.length();
+ if (str.mid(strpos, len) == s) {
+ month = j;
+ strpos += len;
+ error = false;
+ }
+ j++;
+ }
+ }
+ j = 1;
+ while (error && (j < 13)) {
+ TQString s = calendar()->monthName(j, year, c == (QChar)'b').lower();
+ int len = s.length();
+ if (str.mid(strpos, len) == s) {
+ month = j;
+ strpos += len;
+ error = false;
+ }
+ j++;
+ }
+ break;
+ case 'd':
+ case 'e':
+ day = calendar()->dayStringToInteger(str.mid(strpos), iLength);
+ strpos += iLength;
+
+ error = iLength <= 0;
+ break;
+
+ case 'n':
+ case 'm':
+ month = calendar()->monthStringToInteger(str.mid(strpos), iLength);
+ strpos += iLength;
+
+ error = iLength <= 0;
+ break;
+
+ case 'Y':
+ case 'y':
+ year = calendar()->yearStringToInteger(str.mid(strpos), iLength);
+ strpos += iLength;
+
+ error = iLength <= 0;
+ break;
+ }
+ }
+ }
+
+ /* for a match, we should reach the end of both strings, not just one of
+ them */
+ if ( fmt.length() > fmtpos || str.length() > strpos )
+ {
+ error = true;
+ }
+
+ //kdDebug(173) << "KLocale::readDate day=" << day << " month=" << month << " year=" << year << endl;
+ if ( year != -1 && month != -1 && day != -1 && !error)
+ {
+ if (ok) *ok = true;
+
+ TQDate result;
+ calendar()->setYMD(result, year, month, day);
+
+ return result;
+ }
+ else
+ {
+ if (ok) *ok = false;
+ return TQDate(); // invalid date
+ }
+}
+
+TQTime KLocale::readTime(const TQString &intstr, bool *ok) const
+{
+ TQTime _time;
+ _time = readTime(intstr, WithSeconds, ok);
+ if (_time.isValid()) return _time;
+ return readTime(intstr, WithoutSeconds, ok);
+}
+
+TQTime KLocale::readTime(const TQString &intstr, ReadTimeFlags flags, bool *ok) const
+{
+ TQString str = intstr.simplifyWhiteSpace().lower();
+ TQString Format = timeFormat().simplifyWhiteSpace();
+ if (flags & WithoutSeconds)
+ Format.remove(TQRegExp(".%S"));
+
+ int hour = -1, minute = -1;
+ int second = ( (flags & WithoutSeconds) == 0 ) ? -1 : 0; // don't require seconds
+ bool g_12h = false;
+ bool pm = false;
+ uint strpos = 0;
+ uint Formatpos = 0;
+
+ while (Format.length() > Formatpos || str.length() > strpos)
+ {
+ if ( !(Format.length() > Formatpos && str.length() > strpos) ) goto error;
+
+ TQChar c = Format.tqat(Formatpos++);
+
+ if (c != (QChar)'%')
+ {
+ if (c.isSpace())
+ strpos++;
+ else if (c != str.tqat(strpos++))
+ goto error;
+ continue;
+ }
+
+ // remove space at the beginning
+ if (str.length() > strpos && str.tqat(strpos).isSpace())
+ strpos++;
+
+ c = Format.tqat(Formatpos++);
+ switch (c)
+ {
+ case 'p':
+ {
+ TQString s;
+ s = translate("pm").lower();
+ int len = s.length();
+ if (str.mid(strpos, len) == s)
+ {
+ pm = true;
+ strpos += len;
+ }
+ else
+ {
+ s = translate("am").lower();
+ len = s.length();
+ if (str.mid(strpos, len) == s) {
+ pm = false;
+ strpos += len;
+ }
+ else
+ goto error;
+ }
+ }
+ break;
+
+ case 'k':
+ case 'H':
+ g_12h = false;
+ hour = readInt(str, strpos);
+ if (hour < 0 || hour > 23)
+ goto error;
+
+ break;
+
+ case 'l':
+ case 'I':
+ g_12h = true;
+ hour = readInt(str, strpos);
+ if (hour < 1 || hour > 12)
+ goto error;
+
+ break;
+
+ case 'M':
+ minute = readInt(str, strpos);
+ if (minute < 0 || minute > 59)
+ goto error;
+
+ break;
+
+ case 'S':
+ second = readInt(str, strpos);
+ if (second < 0 || second > 59)
+ goto error;
+
+ break;
+ }
+ }
+ if (g_12h) {
+ hour %= 12;
+ if (pm) hour += 12;
+ }
+
+ if (ok) *ok = true;
+ return TQTime(hour, minute, second);
+
+ error:
+ if (ok) *ok = false;
+ // ######## KDE4: remove this
+ return TQTime(-1, -1, -1); // return invalid date if it didn't work
+}
+
+//BIC: merge with below
+TQString KLocale::formatTime(const TQTime &pTime, bool includeSecs) const
+{
+ return formatTime( pTime, includeSecs, false );
+}
+
+TQString KLocale::formatTime(const TQTime &pTime, bool includeSecs, bool isDuration) const
+{
+ const TQString rst = timeFormat();
+
+ // only "pm/am" here can grow, the rest shrinks, but
+ // I'm rather safe than sorry
+ TQChar *buffer = new TQChar[rst.length() * 3 / 2 + 30];
+
+ uint index = 0;
+ bool escape = false;
+ int number = 0;
+
+ for ( uint format_index = 0; format_index < rst.length(); format_index++ )
+ {
+ if ( !escape )
+ {
+ if ( (TQChar(rst.tqat( format_index )).tqunicode()) == '%' )
+ escape = true;
+ else
+ buffer[index++] = rst.tqat( format_index );
+ }
+ else
+ {
+ switch ( TQChar(rst.tqat( format_index )).tqunicode() )
+ {
+ case '%':
+ buffer[index++] = (QChar)'%';
+ break;
+ case 'H':
+ put_it_in( buffer, index, pTime.hour() );
+ break;
+ case 'I':
+ if ( isDuration )
+ put_it_in( buffer, index, pTime.hour() );
+ else
+ put_it_in( buffer, index, ( pTime.hour() + 11) % 12 + 1 );
+ break;
+ case 'M':
+ put_it_in( buffer, index, pTime.minute() );
+ break;
+ case 'S':
+ if (includeSecs)
+ put_it_in( buffer, index, pTime.second() );
+ else if ( index > 0 )
+ {
+ // we remove the separator sign before the seconds and
+ // assume that works everywhere
+ --index;
+ break;
+ }
+ break;
+ case 'k':
+ number = pTime.hour();
+ case 'l':
+ // to share the code
+ if ( (TQChar(rst.tqat( format_index )).tqunicode()) == 'l' )
+ number = isDuration ? pTime.hour() : (pTime.hour() + 11) % 12 + 1;
+ if ( number / 10 )
+ buffer[index++] = number / 10 + '0';
+ buffer[index++] = number % 10 + '0';
+ break;
+ case 'p':
+ if ( !isDuration )
+ {
+ TQString s;
+ if ( pTime.hour() >= 12 )
+ put_it_in( buffer, index, translate("pm") );
+ else
+ put_it_in( buffer, index, translate("am") );
+ }
+ break;
+ default:
+ buffer[index++] = rst.tqat( format_index );
+ break;
+ }
+ escape = false;
+ }
+ }
+ TQString ret( buffer, index );
+ delete [] buffer;
+ if ( isDuration ) // eliminate trailing-space due to " %p"
+ return ret.stripWhiteSpace();
+ else
+ return ret;
+}
+
+bool KLocale::use12Clock() const
+{
+ if ((timeFormat().contains(TQString::tqfromLatin1("%I")) > 0) ||
+ (timeFormat().contains(TQString::tqfromLatin1("%l")) > 0))
+ return true;
+ else
+ return false;
+}
+
+TQString KLocale::languages() const
+{
+ return d->languageList.join( TQString::tqfromLatin1(":") );
+}
+
+TQStringList KLocale::languageList() const
+{
+ return d->languageList;
+}
+
+TQString KLocale::formatDateTime(const TQDateTime &pDateTime,
+ bool shortFormat,
+ bool includeSeconds) const
+{
+ return translate("concatenation of dates and time", "%1 %2")
+ .arg( formatDate( TQT_TQDATE_OBJECT(pDateTime.date()), shortFormat ) )
+ .arg( formatTime( TQT_TQTIME_OBJECT(pDateTime.time()), includeSeconds ) );
+}
+
+TQString i18n(const char* text)
+{
+ register KLocale *instance = KGlobal::locale();
+ if (instance)
+ return instance->translate(text);
+ return TQString::fromUtf8(text);
+}
+
+TQString i18n(const char* index, const char *text)
+{
+ register KLocale *instance = KGlobal::locale();
+ if (instance)
+ return instance->translate(index, text);
+ return TQString::fromUtf8(text);
+}
+
+TQString i18n(const char* singular, const char* plural, unsigned long n)
+{
+ register KLocale *instance = KGlobal::locale();
+ if (instance)
+ return instance->translate(singular, plural, n);
+ if (n == 1)
+ return put_n_in(TQString::fromUtf8(singular), n);
+ else
+ return put_n_in(TQString::fromUtf8(plural), n);
+}
+
+void KLocale::initInstance()
+{
+ if (KGlobal::_locale)
+ return;
+
+ KInstance *app = KGlobal::instance();
+ if (app) {
+ KGlobal::_locale = new KLocale(TQString::tqfromLatin1(app->instanceName()));
+
+ // only do this for the global instance
+ TQTextCodec::setCodecForLocale(KGlobal::_locale->codecForEncoding());
+ }
+ else
+ kdDebug(173) << "no app name available using KLocale - nothing to do\n";
+}
+
+TQString KLocale::langLookup(const TQString &fname, const char *rtype)
+{
+ TQStringList search;
+
+ // assemble the local search paths
+ const TQStringList localDoc = KGlobal::dirs()->resourceDirs(rtype);
+
+ // look up the different languages
+ for (int id=localDoc.count()-1; id >= 0; --id)
+ {
+ TQStringList langs = KGlobal::locale()->languageList();
+ langs.append( "en" );
+ langs.remove( defaultLanguage() );
+ TQStringList::ConstIterator lang;
+ for (lang = langs.begin(); lang != langs.end(); ++lang)
+ search.append(TQString("%1%2/%3").arg(localDoc[id]).arg(*lang).arg(fname));
+ }
+
+ // try to locate the file
+ TQStringList::Iterator it;
+ for (it = search.begin(); it != search.end(); ++it)
+ {
+ kdDebug(173) << "Looking for help in: " << *it << endl;
+
+ TQFileInfo info(*it);
+ if (info.exists() && info.isFile() && info.isReadable())
+ return *it;
+ }
+
+ return TQString::null;
+}
+
+bool KLocale::useDefaultLanguage() const
+{
+ return language() == defaultLanguage();
+}
+
+void KLocale::initEncoding(KConfig *)
+{
+ const int mibDefault = 4; // ISO 8859-1
+
+ // This all made more sense when we still had the EncodingEnum config key.
+ setEncoding( TQTextCodec::codecForLocale()->mibEnum() );
+
+ if ( !d->codecForEncoding )
+ {
+ kdWarning(173) << " Defaulting to ISO 8859-1 encoding." << endl;
+ setEncoding(mibDefault);
+ }
+
+ Q_ASSERT( d->codecForEncoding );
+}
+
+void KLocale::initFileNameEncoding(KConfig *)
+{
+ // If the following environment variable is set, assume all filenames
+ // are in UTF-8 regardless of the current C locale.
+ d->utf8FileEncoding = getenv("KDE_UTF8_FILENAMES") != 0;
+ if (d->utf8FileEncoding)
+ {
+ TQFile::setEncodingFunction(KLocale::encodeFileNameUTF8);
+ TQFile::setDecodingFunction(KLocale::decodeFileNameUTF8);
+ }
+ // Otherwise, stay with QFile's default filename encoding functions
+ // which, on Unix platforms, use the locale's codec.
+}
+
+#ifdef USE_QT3
+TQCString KLocale::encodeFileNameUTF8( const TQString & fileName )
+#endif // USE_QT3
+#ifdef USE_QT4
+QByteArray KLocale::encodeFileNameUTF8( const QString & fileName )
+#endif // USE_QT4
+{
+ return TQString(fileName).utf8();
+}
+
+#ifdef USE_QT3
+TQString KLocale::decodeFileNameUTF8( const TQCString & localFileName )
+#endif // USE_QT3
+#ifdef USE_QT4
+QString KLocale::decodeFileNameUTF8( const QByteArray & localFileName )
+#endif // USE_QT4
+{
+ return TQString::fromUtf8(localFileName);
+}
+
+void KLocale::setDateFormat(const TQString & format)
+{
+ doFormatInit();
+ m_dateFormat = format.stripWhiteSpace();
+}
+
+void KLocale::setDateFormatShort(const TQString & format)
+{
+ doFormatInit();
+ m_dateFormatShort = format.stripWhiteSpace();
+}
+
+void KLocale::setDateMonthNamePossessive(bool possessive)
+{
+ doFormatInit();
+ d->dateMonthNamePossessive = possessive;
+}
+
+void KLocale::setTimeFormat(const TQString & format)
+{
+ doFormatInit();
+ m_timeFormat = format.stripWhiteSpace();
+}
+
+void KLocale::setWeekStartsMonday(bool start) //deprecated
+{
+ doFormatInit();
+ if (start)
+ d->weekStartDay = 1;
+ else
+ d->weekStartDay = 7;
+}
+
+void KLocale::setWeekStartDay(int day)
+{
+ doFormatInit();
+ if (day>7 || day<1)
+ d->weekStartDay = 1; //Monday is default
+ else
+ d->weekStartDay = day;
+}
+
+TQString KLocale::dateFormat() const
+{
+ doFormatInit();
+ return m_dateFormat;
+}
+
+TQString KLocale::dateFormatShort() const
+{
+ doFormatInit();
+ return m_dateFormatShort;
+}
+
+TQString KLocale::timeFormat() const
+{
+ doFormatInit();
+ return m_timeFormat;
+}
+
+void KLocale::setDecimalSymbol(const TQString & symbol)
+{
+ doFormatInit();
+ m_decimalSymbol = symbol.stripWhiteSpace();
+}
+
+void KLocale::setThousandsSeparator(const TQString & separator)
+{
+ doFormatInit();
+ // allow spaces here
+ m_thousandsSeparator = separator;
+}
+
+void KLocale::setPositiveSign(const TQString & sign)
+{
+ doFormatInit();
+ m_positiveSign = sign.stripWhiteSpace();
+}
+
+void KLocale::setNegativeSign(const TQString & sign)
+{
+ doFormatInit();
+ m_negativeSign = sign.stripWhiteSpace();
+}
+
+void KLocale::setPositiveMonetarySignPosition(SignPosition signpos)
+{
+ doFormatInit();
+ m_positiveMonetarySignPosition = signpos;
+}
+
+void KLocale::setNegativeMonetarySignPosition(SignPosition signpos)
+{
+ doFormatInit();
+ m_negativeMonetarySignPosition = signpos;
+}
+
+void KLocale::setPositivePrefixCurrencySymbol(bool prefix)
+{
+ doFormatInit();
+ m_positivePrefixCurrencySymbol = prefix;
+}
+
+void KLocale::setNegativePrefixCurrencySymbol(bool prefix)
+{
+ doFormatInit();
+ m_negativePrefixCurrencySymbol = prefix;
+}
+
+void KLocale::setFracDigits(int digits)
+{
+ doFormatInit();
+ m_fracDigits = digits;
+}
+
+void KLocale::setMonetaryThousandsSeparator(const TQString & separator)
+{
+ doFormatInit();
+ // allow spaces here
+ m_monetaryThousandsSeparator = separator;
+}
+
+void KLocale::setMonetaryDecimalSymbol(const TQString & symbol)
+{
+ doFormatInit();
+ m_monetaryDecimalSymbol = symbol.stripWhiteSpace();
+}
+
+void KLocale::setCurrencySymbol(const TQString & symbol)
+{
+ doFormatInit();
+ m_currencySymbol = symbol.stripWhiteSpace();
+}
+
+int KLocale::pageSize() const
+{
+ doFormatInit();
+ return d->pageSize;
+}
+
+void KLocale::setPageSize(int pageSize)
+{
+ // #### check if it's in range??
+ doFormatInit();
+ d->pageSize = pageSize;
+}
+
+KLocale::MeasureSystem KLocale::measureSystem() const
+{
+ doFormatInit();
+ return d->measureSystem;
+}
+
+void KLocale::setMeasureSystem(MeasureSystem value)
+{
+ doFormatInit();
+ d->measureSystem = value;
+}
+
+TQString KLocale::defaultLanguage()
+{
+ return TQString::tqfromLatin1("en_US");
+}
+
+TQString KLocale::defaultCountry()
+{
+ return TQString::tqfromLatin1("C");
+}
+
+const char * KLocale::encoding() const
+{
+#ifdef Q_WS_WIN
+ if (0==qstrcmp("System", codecForEncoding()->name()))
+ {
+ //win32 returns "System" codec name here but KDE apps expect a real name:
+ strcpy(d->win32SystemEncoding, "cp ");
+ if (GetLocaleInfoA( MAKELCID(MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), SORT_DEFAULT),
+ LOCALE_IDEFAULTANSICODEPAGE, d->win32SystemEncoding+3, sizeof(d->win32SystemEncoding)-3-1 ))
+ {
+ return d->win32SystemEncoding;
+ }
+ }
+#endif
+ return codecForEncoding()->name();
+}
+
+int KLocale::encodingMib() const
+{
+ return codecForEncoding()->mibEnum();
+}
+
+int KLocale::fileEncodingMib() const
+{
+ if (d->utf8FileEncoding)
+ return 106;
+ return codecForEncoding()->mibEnum();
+}
+
+TQTextCodec * KLocale::codecForEncoding() const
+{
+ return d->codecForEncoding;
+}
+
+bool KLocale::setEncoding(int mibEnum)
+{
+ TQTextCodec * codec = TQTextCodec::codecForMib(mibEnum);
+ if (codec)
+ d->codecForEncoding = codec;
+
+ return codec != 0;
+}
+
+TQStringList KLocale::languagesTwoAlpha() const
+{
+ if (d->langTwoAlpha.count())
+ return d->langTwoAlpha;
+
+ const TQStringList &origList = languageList();
+
+ TQStringList result;
+
+ KConfig config(TQString::tqfromLatin1("language.codes"), true, false);
+ config.setGroup("TwoLetterCodes");
+
+ for ( TQStringList::ConstIterator it = origList.begin();
+ it != origList.end();
+ ++it )
+ {
+ TQString lang = *it;
+ TQStringList langLst;
+ if (config.hasKey( lang ))
+ langLst = config.readListEntry( lang );
+ else
+ {
+ int i = lang.find('_');
+ if (i >= 0)
+ lang.truncate(i);
+ langLst << lang;
+ }
+
+ for ( TQStringList::ConstIterator langIt = langLst.begin();
+ langIt != langLst.end();
+ ++langIt )
+ {
+ if ( !(*langIt).isEmpty() && !result.contains( *langIt ) )
+ result += *langIt;
+ }
+ }
+ d->langTwoAlpha = result;
+ return result;
+}
+
+TQStringList KLocale::allLanguagesTwoAlpha() const
+{
+ if (!d->languages)
+ d->languages = new KConfig("all_languages", true, false, "locale");
+
+ return d->languages->groupList();
+}
+
+TQString KLocale::twoAlphaToLanguageName(const TQString &code) const
+{
+ if (!d->languages)
+ d->languages = new KConfig("all_languages", true, false, "locale");
+
+ TQString groupName = code;
+ const int i = groupName.find('_');
+ groupName.replace(0, i, groupName.left(i).lower());
+
+ d->languages->setGroup(groupName);
+ return d->languages->readEntry("Name");
+}
+
+TQStringList KLocale::allCountriesTwoAlpha() const
+{
+ TQStringList countries;
+ TQStringList paths = KGlobal::dirs()->findAllResources("locale", "l10n/*/entry.desktop");
+ for(TQStringList::ConstIterator it = paths.begin();
+ it != paths.end(); ++it)
+ {
+ TQString code = (*it).mid((*it).length()-16, 2);
+ if (code != "/C")
+ countries.append(code);
+ }
+ return countries;
+}
+
+TQString KLocale::twoAlphaToCountryName(const TQString &code) const
+{
+ KConfig cfg("l10n/"+code.lower()+"/entry.desktop", true, false, "locale");
+ cfg.setGroup("KCM Locale");
+ return cfg.readEntry("Name");
+}
+
+void KLocale::setCalendar(const TQString & calType)
+{
+ doFormatInit();
+
+ d->calendarType = calType;
+
+ delete d->calendar;
+ d->calendar = 0;
+}
+
+TQString KLocale::calendarType() const
+{
+ doFormatInit();
+
+ return d->calendarType;
+}
+
+const KCalendarSystem * KLocale::calendar() const
+{
+ doFormatInit();
+
+ // Check if it's the correct calendar?!?
+ if ( !d->calendar )
+ d->calendar = KCalendarSystemFactory::create( d->calendarType, this );
+
+ return d->calendar;
+}
+
+KLocale::KLocale(const KLocale & rhs)
+{
+ d = new KLocalePrivate;
+
+ *this = rhs;
+}
+
+KLocale & KLocale::operator=(const KLocale & rhs)
+{
+ // Numbers and money
+ m_decimalSymbol = rhs.m_decimalSymbol;
+ m_thousandsSeparator = rhs.m_thousandsSeparator;
+ m_currencySymbol = rhs.m_currencySymbol;
+ m_monetaryDecimalSymbol = rhs.m_monetaryDecimalSymbol;
+ m_monetaryThousandsSeparator = rhs.m_monetaryThousandsSeparator;
+ m_positiveSign = rhs.m_positiveSign;
+ m_negativeSign = rhs.m_negativeSign;
+ m_fracDigits = rhs.m_fracDigits;
+ m_positivePrefixCurrencySymbol = rhs.m_positivePrefixCurrencySymbol;
+ m_negativePrefixCurrencySymbol = rhs.m_negativePrefixCurrencySymbol;
+ m_positiveMonetarySignPosition = rhs.m_positiveMonetarySignPosition;
+ m_negativeMonetarySignPosition = rhs.m_negativeMonetarySignPosition;
+
+ // Date and time
+ m_timeFormat = rhs.m_timeFormat;
+ m_dateFormat = rhs.m_dateFormat;
+ m_dateFormatShort = rhs.m_dateFormatShort;
+
+ m_language = rhs.m_language;
+ m_country = rhs.m_country;
+
+ // the assignment operator works here
+ *d = *rhs.d;
+ d->languages = 0; // Don't copy languages
+ d->calendar = 0; // Don't copy the calendar
+
+ return *this;
+}
+
+bool KLocale::setCharset(const TQString & ) { return true; }
+TQString KLocale::charset() const { return TQString::tqfromLatin1("UTF-8"); }
+
+// KDE4: remove
+#if 0
+void nothing() { i18n("&Next"); }
+#endif