//C- -*- C++ -*- //C- ------------------------------------------------------------------- //C- DjVuLibre-3.5 //C- Copyright (c) 2002 Leon Bottou and Yann Le Cun. //C- Copyright (c) 2001 AT&T //C- //C- This software is subject to, and may be distributed under, the //C- GNU General Public License, either Version 2 of the license, //C- or (at your option) any later version. The license should have //C- accompanied the software or you may obtain a copy of the license //C- from the Free Software Foundation at http://www.fsf.org . //C- //C- This program is distributed in the hope that it will be useful, //C- but WITHOUT ANY WARRANTY; without even the implied warranty of //C- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //C- GNU General Public License for more details. //C- //C- DjVuLibre-3.5 is derived from the DjVu(r) Reference Library from //C- Lizardtech Software. Lizardtech Software has authorized us to //C- replace the original DjVu(r) Reference Library notice by the following //C- text (see doc/lizard2002.djvu and doc/lizardtech2007.djvu): //C- //C- ------------------------------------------------------------------ //C- | DjVu (r) Reference Library (v. 3.5) //C- | Copyright (c) 1999-2001 LizardTech, Inc. All Rights Reserved. //C- | The DjVu Reference Library is protected by U.S. Pat. No. //C- | 6,058,214 and patents pending. //C- | //C- | This software is subject to, and may be distributed under, the //C- | GNU General Public License, either Version 2 of the license, //C- | or (at your option) any later version. The license should have //C- | accompanied the software or you may obtain a copy of the license //C- | from the Free Software Foundation at http://www.fsf.org . //C- | //C- | The computer code originally released by LizardTech under this //C- | license and unmodified by other parties is deemed "the LIZARDTECH //C- | ORIGINAL CODE." Subject to any third party intellectual property //C- | claims, LizardTech grants recipient a worldwide, royalty-free, //C- | non-exclusive license to make, use, sell, or otherwise dispose of //C- | the LIZARDTECH ORIGINAL CODE or of programs derived from the //C- | LIZARDTECH ORIGINAL CODE in compliance with the terms of the GNU //C- | General Public License. This grant only confers the right to //C- | infringe patent claims underlying the LIZARDTECH ORIGINAL CODE to //C- | the extent such infringement is reasonably necessary to enable //C- | recipient to make, have made, practice, sell, or otherwise dispose //C- | of the LIZARDTECH ORIGINAL CODE (or portions thereof) and not to //C- | any greater extent that may be necessary to utilize further //C- | modifications or combinations. //C- | //C- | The LIZARDTECH ORIGINAL CODE is provided "AS IS" WITHOUT WARRANTY //C- | OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED //C- | TO ANY WARRANTY OF NON-INFRINGEMENT, OR ANY IMPLIED WARRANTY OF //C- | MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. //C- +------------------------------------------------------------------ // // $Id: DjVuMessage.cpp,v 1.24 2008/01/27 17:32:56 leonb Exp $ // $Name: $ #ifdef HAVE_CONFIG_H # include "config.h" #endif #if NEED_GNUG_PRAGMAS # pragma implementation #endif // From: Leon Bottou, 1/31/2002 // All these XML messages are Lizardtech innovations. #include "./../../libdjvu/DjVuMessage.h" #include "./../../libdjvu/GOS.h" #include "./../../libdjvu/XMLTags.h" #include "./../../libdjvu/ByteStream.h" #include "./../../libdjvu/GURL.h" #include "./../../libdjvu/debug.h" #include #include #include #include #ifndef LC_MESSAGES # define LC_MESSAGES LC_ALL #endif #ifdef HAVE_NAMESPACES namespace DJVU { # ifdef NOT_DEFINED // Just to fool emacs c++ mode } #endif #endif GUTF8String & DjVuMessage::programname(void) { static GUTF8String xprogramname; use_language(); return xprogramname; } static const char namestring[]="name"; static const char srcstring[]="src"; static const char *failed_to_parse_XML=ERR_MSG("DjVuMessage.failed_to_parse_XML"); static const char bodystring[]="BODY"; static const char languagestring[]="LANGUAGE"; static const char headstring[]="HEAD"; static const char includestring[]="INCLUDE"; static const char messagestring[]="MESSAGE"; static const char localestring[]="locale"; // directory names for searching messages #ifdef AUTOCONF static const char DjVuDataDir[] = DIR_DATADIR "/djvu/osi"; #endif /* AUTOCONF */ static const char ModuleDjVuDir[] ="share/djvu/osi"; static const char ProfilesDjVuDir[] ="profiles"; static const char LocalDjVuDir[] =".DjVu"; // relative to ${HOME} #ifdef LT_DEFAULT_PREFIX static const char DjVuPrefixDir[] = LT_DEFAULT_PREFIX "/profiles"; #endif #ifndef NDEBUG static const char DebugModuleDjVuDir[] ="../TOPDIR/SRCDIR/profiles"; #endif static const char DjVuEnv[] = "DJVU_CONFIG_DIR"; // The name of the message file static const char MessageFile[]="messages.xml"; static const char LanguageFile[]="languages.xml"; static void appendPath(const GURL &url, GMap &map, GList &list) { if( !url.is_empty() && !map.contains(url.get_string()) ) { map[url.get_string()]=0; list.append(url); } } GList DjVuMessage::GetProfilePaths(void) { static GList realpaths; return realpaths; } static GUTF8String getbodies( GList &paths, const GUTF8String &MessageFileName, GPList &body, GMap & map ) { GUTF8String errors; bool isdone=false; GPosition firstpathpos=paths; for(GPosition pathpos=firstpathpos;!isdone && pathpos;++pathpos) { const GURL::UTF8 url(MessageFileName,paths[pathpos]); if(url.is_file()) { map[MessageFileName]=0; GP gtags; { GP bs=ByteStream::create(url,"rb"); G_TRY { gtags=lt_XMLTags::create(bs); } G_CATCH(ex) { GUTF8String mesg(failed_to_parse_XML+("\t"+url.get_string())); if(errors.length()) { errors+="\n"+mesg; }else { errors=mesg; } errors+="\n"+GUTF8String(ex.get_cause()); } G_ENDCATCH; } if(gtags) { lt_XMLTags &tags=*gtags; GPList Bodies=tags.get_Tags(bodystring); if(! Bodies.isempty()) { isdone=true; for(GPosition pos=Bodies;pos;++pos) { body.append(Bodies[pos]); } } GPList Head=tags.get_Tags(headstring); if(! Head.isempty()) { isdone=true; GMap > includes; lt_XMLTags::get_Maps(includestring,namestring,Head,includes); for(GPosition pos=includes;pos;++pos) { const GUTF8String file=includes.key(pos); if(! map.contains(file)) { GList xpaths; xpaths.append(url.base()); const GUTF8String err2(getbodies(xpaths,file,body,map)); if(err2.length()) { if(errors.length()) { errors+="\n"+err2; }else { errors=err2; } } } } } } } } return errors; } static GUTF8String parse(GMap > &retval) { GUTF8String errors; GPList body; { GList paths=DjVuMessage::GetProfilePaths(); GMap map; GUTF8String m(MessageFile); errors=getbodies(paths,m,body,map); } if(! body.isempty()) { lt_XMLTags::get_Maps(messagestring,namestring,body,retval); } return errors; } const DjVuMessageLite & DjVuMessage::create_full(void) { GP &static_message=getDjVuMessageLite(); if(!static_message) { DjVuMessage *mesg=new DjVuMessage; static_message=mesg; mesg->init(); } return DjVuMessageLite::create_lite(); } void DjVuMessage::set_programname(const GUTF8String &xprogramname) { programname()=xprogramname; DjVuMessageLite::create=create_full; } void DjVuMessage::use_language(void) { DjVuMessageLite::create=create_full; } // Constructor DjVuMessage::DjVuMessage( void ) {} void DjVuMessage::init(void) { errors=parse(Map); } // Destructor DjVuMessage::~DjVuMessage( ) { } // A C function to perform a message lookup. Arguments are a buffer to receiv // translated message, a buffer size (bytes), and a message_list. The transla // result is returned in msg_buffer encoded in Native MBS encoding. In case // of error, msg_b empty (i.e., msg_buffer[0] == '\0'). void DjVuMessageLookUpNative( char *msg_buffer, const unsigned int buffer_size, const char *message) { const GNativeString converted(DjVuMessage::LookUpNative( message )); if( converted.length() >= buffer_size ) msg_buffer[0] = '\0'; else strcpy( msg_buffer, converted ); } // A C function to perform a message lookup. Arguments are a buffer to receiv // translated message, a buffer size (bytes), and a message_list. The transla // result is returned in msg_buffer encoded in UTF8 encoding. In case // of error, msg_b empty (i.e., msg_buffer[0] == '\0'). void DjVuMessageLookUpUTF8( char *msg_buffer, const unsigned int buffer_size, const char *message) { const GUTF8String converted(DjVuMessage::LookUpUTF8( message )); if( converted.length() >= buffer_size ) msg_buffer[0] = '\0'; else strcpy( msg_buffer, converted ); } #ifdef HAVE_NAMESPACES } # ifndef NOT_USING_DJVU_NAMESPACE using namespace DJVU; # endif #endif void DjVuFormatErrorUTF8( const char *fmt, ... ) { va_list args; va_start(args, fmt); const GUTF8String message(fmt,args); DjVuWriteError( message ); } void DjVuFormatErrorNative( const char *fmt, ... ) { va_list args; va_start(args, fmt); const GNativeString message(fmt,args); DjVuWriteError( message ); } const char * djvu_programname(const char *xprogramname) { if(xprogramname) DjVuMessage::programname()=GNativeString(xprogramname); return DjVuMessage::programname(); }