src/intl/gettext/libintl.h

   1
   2 #ifndef EL__INTL_GETTEXT_LIBINTL_H
   3 #define EL__INTL_GETTEXT_LIBINTL_H
   4
   5 /* This header file provides an interface between ELinks and GNU libintl. I was
   6  * astonished that there is no libintl.h but libgnuintl.h (and that name seemed
   7  * ugly ;-), and I also decided that it will be better to introduce a clean
   8  * interface instead of digging to libgnuintl.h too much. */
   9
  10 /* Contrary to a standard gettext interface, we pass destination charset and
  11  * language (in form of struct terminal) directly with each call, allowing to
  12  * easily multiplex between several terminals. */
  13
  14 #include "intl/gettext/libgettext.h"
  15
  16 #include "config/options.h"
  17 #include "intl/charsets.h"
  18 #include "terminal/terminal.h"
  19
  20 /* no-op - just for marking */
  21 #define N_(msg) (gettext_noop(msg))
  22
  23 #ifndef CONFIG_SMALL
  24 #define N__(msg) (gettext_noop(msg))
  25 #else
  26 #define N__(msg) (NULL)
  27 #endif
  28
  29
  30 /* The intl/gettext/libgettext.h header nukes gettext functions but not the _()
  31  * function so make sure it is also just a noop when NLS is disabled. */
  32 #ifndef CONFIG_NLS
  33
  34 /* In order to make it able to compile using -Werror this has to be a function
  35  * so that local @term variables will not be reported as unused. */
  36 static inline unsigned char *
  37 _(unsigned char *msg, struct terminal *term)
  38 {
  39         return gettext_noop(msg);
  40 }
  41
  42 static inline unsigned char *
  43 n_(unsigned char *msg1, unsigned char *msg2, unsigned long int n, struct terminal *term)
  44 {
  45         return gettext_noop(msg1);
  46 }
  47
  48
  49 #else
  50
  51 /* The number of the charset to which the "elinks" domain was last
  52  * bound with bind_textdomain_codeset(), or -1 if none yet.  This
  53  * cannot be a static variable in _(), because then it would get
  54  * duplicated in every translation unit, even though the actual
  55  * binding is global.  */
  56 extern int current_charset;
  57
  58 /* Define it to find redundant useless calls */
  59 /* #define DEBUG_IT */
  60
  61 static inline void
  62 intl_set_charset(struct terminal *term)
  63 {
  64         int new_charset = get_terminal_codepage(term);
  65
  66         /* Prevent useless switching. */
  67         if (current_charset != new_charset) {
  68                 bind_textdomain_codeset( /* PACKAGE */ "elinks",
  69                                         get_cp_mime_name(new_charset));
  70                 current_charset = new_charset;
  71         }
  72 }
  73
  74 /* TODO: Ideally, we should internally work only in Unicode - then the need for
  75  * charsets multiplexing would cease. That'll take some work yet, though.
  76  * --pasky */
  77
  78 #ifndef DEBUG_IT
  79
  80 /* Wraps around gettext(), employing charset multiplexing. If you don't care
  81  * about charset (usually during initialization or when you don't use terminals
  82  * at all), use gettext() directly. */
  83 static inline unsigned char *
  84 _(unsigned char *msg, struct terminal *term)
  85 {
  86         /* Prevent useless (and possibly dangerous) calls. */
  87         if (!msg || !*msg)
  88                 return msg;
  89
  90         if (term) intl_set_charset(term);
  91
  92         return (unsigned char *) gettext(msg);
  93 }
  94
  95 #else
  96
  97 #include "util/error.h"
  98
  99 /* This one will emit errors on null/empty msgs and when multiple calls are
 100  * done for the same result in the same function. Some noise is possible,
 101  * when a function is called twice or more, but then we should cache msg,
 102  * in function caller. --Zas */
 103
 104 /* __FUNCTION__ isn't supported by all, but it's debugging code. */
 105 #define _(m, t) __(__FILE__, __LINE__, __FUNCTION__, m, t)
 106
 107 /* Overflows are theorically possible here. Debug purpose only. */
 108 static inline unsigned char *
 109 __(unsigned char *file, unsigned int line, unsigned char *func,
 110    unsigned char *msg, struct terminal *term)
 111 {
 112         static unsigned char last_file[512] = "";
 113         static unsigned int last_line = 0;
 114         static unsigned char last_func[1024] = "";
 115         static unsigned char last_result[16384] = "";
 116         unsigned char *result;
 117
 118         /* Prevent useless (and possibly dangerous) calls. */
 119         if (!msg || !*msg) {
 120                 ERROR("%s:%u %s msg parameter", file, line, msg ? "empty": "NULL");
 121                 return msg;
 122         }
 123
 124         if (term) intl_set_charset(term);
 125
 126         result = (unsigned char *) gettext(msg);
 127
 128         if (!strcmp(result, last_result)
 129             && !strcmp(file, last_file)
 130             && !strcmp(func, last_func)) {
 131                 ERROR("%s:%u Duplicate call to _() in %s() (previous at line %u)",
 132                       file, line, func, last_line);
 133         }
 134
 135         /* Risky ;) */
 136         strcpy(last_file, file);
 137         strcpy(last_func, func);
 138         strcpy(last_result, result);
 139         last_line = line;
 140
 141         return result;
 142 }
 143
 144 #endif
 145
 146 /* For plural handling. */
 147 /* Wraps around ngettext(), employing charset multiplexing. If you don't care
 148  * about charset (usually during initialization or when you don't use terminals
 149  * at all), use ngettext() directly. */
 150 static inline unsigned char *
 151 n_(unsigned char *msg1, unsigned char *msg2, unsigned long int n, struct terminal *term)
 152 {
 153         /* Prevent useless (and possibly dangerous) calls. */
 154         if (!msg1 || !*msg1)
 155                 return msg1;
 156
 157         if (term) intl_set_charset(term);
 158
 159         return (unsigned char *) ngettext(msg1, msg2, n);
 160 }
 161
 162
 163 /* Languages table lookups. */
 164
 165 struct language {
 166         unsigned char *name;
 167         unsigned char *iso639;
 168 };
 169
 170 extern struct language languages[];
 171
 172 /* These two calls return 1 (english) if the code/name wasn't found. */
 173 extern int name_to_language(const unsigned char *name);
 174 extern int iso639_to_language(unsigned char *iso639);
 175
 176 extern unsigned char *language_to_name(int language);
 177 extern unsigned char *language_to_iso639(int language);
 178
 179 extern int get_system_language_index(void);
 180
 181 /* The current state. The state should be initialized by a set_language(0)
 182  * call. */
 183
 184 extern int current_language, system_language;
 185 extern void set_language(int language);
 186
 187 #endif /* CONFIG_NLS */
 188
 189 #endif