2 * This file is part of LyX, the document processor.
3 * Licence details can be found in the file COPYING.
5 * \author Lars Gullik Bjønnes
7 * Full author contact details are available in file CREDITS.
14 #include "support/filetools.h"
15 #include "support/environment.h"
16 #include "support/package.h"
17 #include "support/docstring.h"
18 #include "support/types.h"
20 #include <boost/current_function.hpp>
21 #include <boost/regex.hpp>
31 using support::package;
32 using support::getEnv;
33 using support::setEnv;
36 static boost::regex const reg("^([^\\[]*)\\[\\[[^\\]]*\\]\\]$");
46 // This version of the Pimpl utilizes the message capability of
47 // libstdc++ that is distributed with GNU G++.
48 class Messages::Pimpl {
50 typedef std::messages<char>::catalog catalog;
52 Pimpl(string const & l)
54 loc_gl(lang_.c_str()),
55 mssg_gl(std::use_facet<std::messages<char> >(loc_gl))
57 //lyxerr << "Messages: language(" << l
58 // << ") in dir(" << dir << ")" << endl;
60 cat_gl = mssg_gl.open(PACKAGE, loc_gl, package().locale_dir().c_str());
66 mssg_gl.close(cat_gl);
69 docstring const get(string const & msg) const
71 return mssg_gl.get(cat_gl, 0, 0, msg);
79 std::messages<char> const & mssg_gl;
90 # include <libintl.h> // use the header already in the system *EK*
92 # include "../intl/libintl.h"
95 // This is a more traditional variant.
96 class Messages::Pimpl {
98 Pimpl(string const & l)
101 if ( lang_.empty() ) {
102 char const * lc_msgs = 0;
103 #ifdef HAVE_LC_MESSAGES
104 lc_msgs = setlocale(LC_MESSAGES, NULL);
106 lang_ = lc_msgs ? lc_msgs : "";
108 // strip off any encoding suffix, i.e., assume 8-bit po files
109 string::size_type i = lang_.find(".");
110 lang_ = lang_.substr(0, i);
111 lyxerr[Debug::DEBUG] << BOOST_CURRENT_FUNCTION
112 << ": language(" << lang_ << ")" << endl;
117 docstring const & get(string const & m) const
120 dummy_string_.clear();
121 return dummy_string_;
124 // Look for the translated string in the cache.
125 TranslationCache::iterator it = cache_.find(m);
126 if (it != cache_.end())
128 // The string was not found, use gettext to generate it:
130 // In this order, see support/filetools.C:
131 string lang = getEnv("LC_ALL");
133 lang = getEnv("LC_MESSAGES");
135 lang = getEnv("LANG");
140 #ifdef HAVE_LC_MESSAGES
141 char const * lc_msgs = setlocale(LC_MESSAGES, lang_.c_str());
143 // setlocale fails (returns NULL) if the corresponding locale
145 // On windows (mingw and cygwin) it always returns NULL.
146 // Since this method gets called for every translatable
147 // buffer string like e.g. "Figure:" we warn only once.
148 #if !defined(_WIN32) && !defined(__CYGWIN__)
149 static bool warned = false;
150 if (!warned && !lc_msgs) {
152 lyxerr << "Locale " << lang_ << " could not be set" << endl;
155 // CTYPE controls what getmessage thinks what encoding the po file uses
156 char const * lc_ctype = setlocale(LC_CTYPE, NULL);
157 string oldCTYPE = lc_ctype ? lc_ctype : "";
159 setlocale(LC_CTYPE, lang_.c_str());
161 char const * c = bindtextdomain(PACKAGE, package().locale_dir().c_str());
165 << BOOST_CURRENT_FUNCTION << '\n'
166 << "Error code: " << errno << '\n'
167 << "Lang, mess: " << lang_ << " " << m << '\n'
168 << "Directory : " << package().locale_dir() << '\n'
169 << "Rtn value : " << c << endl;
171 #ifdef WORDS_BIGENDIAN
172 static const char * codeset = "UCS-4BE";
174 static const char * codeset = "UCS-4LE";
176 if (!bind_textdomain_codeset(PACKAGE, codeset)) {
178 << BOOST_CURRENT_FUNCTION << '\n'
179 << "Error code: " << errno << '\n'
180 << "Codeset : " << codeset << '\n'
185 char const * tmp = m.c_str();
186 char const * msg = gettext(tmp);
187 docstring translated;
188 if (!msg || msg == tmp) {
190 lyxerr << "Undefined result from gettext" << endl;
192 // lyxerr << "Same as entered returned" << endl;
193 // Some english words have different translations,
194 // depending on context. In these cases the original
195 // string is augmented by context information (e.g.
196 // "To:[[as in 'From page x to page y']]" and
197 // "To:[[as in 'From format x to format y']]".
198 // This means that we need to filter out everything
199 // in double square brackets at the end of the
200 // string, otherwise the user sees bogus messages.
201 // If we are unable to honour the request we just
202 // return what we got in.
204 if (regex_match(m, sub, reg))
205 translated = from_ascii(sub.str(1));
207 translated = from_ascii(tmp);
209 lyxerr[Debug::DEBUG] << "We got a translation" << endl;
210 char_type const * ucs4 = reinterpret_cast<char_type const *>(msg);
213 #ifdef HAVE_LC_MESSAGES
214 setlocale(LC_MESSAGES, lang.c_str());
216 setlocale(LC_CTYPE, oldCTYPE.c_str());
218 std::pair<TranslationCache::iterator, bool> result =
219 cache_.insert(std::make_pair(m, translated));
221 if (!result.second) {
222 lyxerr << "WARNING: cannot fill-in gettext cache in Messages::get()!" << endl;
223 dummy_string_ = translated;
224 return dummy_string_;
227 return result.first->second;
232 typedef std::map<string, docstring> TranslationCache;
233 /// Internal cache for gettext translated strings.
234 /// This is needed for performance reason within \c updateLabels()
236 mutable TranslationCache cache_;
237 /// Dummy string which serves as a storage place if something goes
238 /// wrong with the translation cache.
239 mutable docstring dummy_string_;
244 // This is the dummy variant.
245 class Messages::Pimpl {
247 Pimpl(string const &) {}
251 docstring const get(string const & m) const
255 if (regex_match(m, sub, reg))
256 return from_ascii(sub.str(1));
258 return from_ascii(m);
265 : pimpl_(new Pimpl(""))
269 Messages::Messages(string const & l)
270 : pimpl_(new Pimpl(l))
274 // We need this for the sake of scoped_ptr
275 Messages::~Messages()
279 docstring const & Messages::get(string const & msg) const
281 return pimpl_->get(msg);