bindtextdomain.c

   1 /*
   2  * Nasty preload hack to allow message catalogs to be read from the build tree.
   3  *
   4  * export LD_PRELOAD=/usr/lib/help2man/bindtextdomain.so
   5  * export TEXTDOMAIN=program
   6  * export LOCALEDIR=${DESTDIR}/usr/share/locale
   7  */
   8
   9 #define _GNU_SOURCE
  10
  11 #include <stdio.h>
  12 #include <stdlib.h>
  13 #include <string.h>
  14 #include <dlfcn.h>
  15
  16 #define PRELOAD "bindtextdomain.so"
  17
  18 static void die(char const *msg)
  19 {
  20     fprintf(stderr, PRELOAD ": %s\n", msg);
  21     exit(1);
  22 }
  23
  24 static char *e_textdomain = 0;
  25 static char *e_localedir = 0;
  26 static char *(*r_textdomain)(char const *) = 0;
  27 static char *(*r_bindtextdomain)(char const *, char const *) = 0;
  28 static char *(*r_bind_textdomain_codeset)(char const *, char const *) = 0;
  29
  30 void setup()
  31 {
  32     static int done = 0;
  33     if (done++)
  34         return;
  35
  36     if (!(e_textdomain = getenv("TEXTDOMAIN")))
  37         die("TEXTDOMAIN not set");
  38
  39     if (!(e_localedir = getenv("LOCALEDIR")))
  40         die("LOCALEDIR not set");
  41
  42     if (!(r_textdomain = dlsym(RTLD_NEXT, "textdomain")))
  43         die("can't find symbol \"textdomain\"");
  44
  45     if (!(r_bindtextdomain = dlsym(RTLD_NEXT, "bindtextdomain")))
  46         die("can't find symbol \"bindtextdomain\"");
  47
  48     if (!(r_bind_textdomain_codeset = dlsym(RTLD_NEXT,
  49                                             "bind_textdomain_codeset")))
  50         die("can't find symbol \"bind_textdomain_codeset\"");
  51 }
  52
  53 char *textdomain(char const *domainname)
  54 {
  55     char *r;
  56     setup();
  57     r = r_textdomain(domainname);
  58     if (domainname && !strcmp(domainname, e_textdomain))
  59         r_bindtextdomain(domainname, e_localedir);
  60
  61     return r;
  62 }
  63
  64 char *bindtextdomain(char const *domainname, char const *dirname)
  65 {
  66     char const *dir = dirname;
  67     setup();
  68     if (domainname && !strcmp(domainname, e_textdomain))
  69         dir = e_localedir;
  70
  71     return r_bindtextdomain(domainname, dir);
  72 }
  73
  74 char *bind_textdomain_codeset(char const *domainname, char const *codeset)
  75 {
  76     char *r;
  77     setup();
  78     r = r_bind_textdomain_codeset(domainname, codeset);
  79     if (domainname && !strcmp(domainname, e_textdomain))
  80         r_bindtextdomain(domainname, e_localedir);
  81
  82     return r;
  83 }