ROX-Filer/src/rox_gettext.c

   1 /*
   2  * $Id$
   3  *
   4  * ROX-Filer, filer for the ROX desktop project
   5  * Copyright (C) 2000, Thomas Leonard, <tal197@ecs.soton.ac.uk>.
   6  *
   7  * This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License as published by the Free
   9  * Software Foundation; either version 2 of the License, or (at your option)
  10  * any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful, but WITHOUT
  13  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  15  * more details.
  16  *
  17  * You should have received a copy of the GNU General Public License along with
  18  * this program; if not, write to the Free Software Foundation, Inc., 59 Temple
  19  * Place, Suite 330, Boston, MA  02111-1307  USA
  20  */
  21
  22 /* This is a reimplementation of the GNU gettext function, because not everyone
  23  * has GNU gettext.
  24  */
  25
  26 #include "config.h"
  27
  28 #include <glib.h>
  29
  30 #include "gui_support.h"
  31
  32 static GHashTable *translate = NULL;
  33
  34 /* Returns the 32 bit number at 'addr'.
  35  * Reverse the byte order of 'number' iff 'swap' is TRUE.
  36  */
  37 #define WORD(addr) word(addr, swap)
  38
  39 /* Static prototypes */
  40 static guint32 word(char *addr, gboolean swap);
  41
  42
  43 /****************************************************************
  44  *                      EXTERNAL INTERFACE                      *
  45  ****************************************************************/
  46
  47 /* Returns a pointer to a static, nul-terminated, string which
  48  * is the translation of 'from' (or 'from' itself if there is
  49  * no translation).
  50  */
  51 char *rox_gettext(char *from)
  52 {
  53         char    *retval;
  54
  55         if (!translate)
  56                 return from;
  57
  58         retval = g_hash_table_lookup(translate, from);
  59
  60         return retval ? retval : from;
  61 }
  62
  63 /* Read in this .gmo format file; all translations found override
  64  * any existing translations for future calls to rox_gettext().
  65  */
  66 void rox_add_translations(char *path)
  67 {
  68         guint32         magic;
  69         char            *data, *from_base, *to_base;
  70         long            size;
  71         gboolean        swap;           /* TRUE => reverse byte-order of ints */
  72         int             n, n_total;
  73
  74         if (load_file(path, &data, &size) == FALSE)
  75                 return;
  76
  77         if (size < 20)
  78         {
  79                 delayed_error(PROJECT, _("Invalid .gmo translation file "
  80                                         "(too short)"));
  81                 return;
  82         }
  83
  84         magic = *((guint *) data);
  85
  86         if (magic == 0x950412de)
  87                 swap = FALSE;
  88         else if (magic == 0xde120495)
  89                 swap = TRUE;
  90         else
  91         {
  92                 delayed_error(PROJECT, _("Invalid .gmo translation file "
  93                                         "(GNU magic number not found)\n"));
  94                 return;
  95         }
  96
  97         if (WORD(data + 4) != 0)
  98                 g_warning("rox_add_translations: expected format revision 0");
  99
 100         if (!translate)
 101                 translate = g_hash_table_new(g_str_hash, g_str_equal);
 102
 103         n_total = WORD(data + 8);
 104         from_base = data + WORD(data + 12);
 105         to_base = data + WORD(data + 16);
 106
 107         for (n = 0; n < n_total; n++)
 108         {
 109                 char    *from = data + WORD(from_base + (n << 3) + 4);
 110                 char    *to   = data + WORD(to_base + (n << 3) + 4);
 111
 112                 g_hash_table_insert(translate, from, to);
 113         }
 114
 115         /* Note: Do not free the file data! */
 116 }
 117
 118 /****************************************************************
 119  *                      INTERNAL FUNCTIONS                      *
 120  ****************************************************************/
 121
 122 static guint32 word(char *addr, gboolean swap)
 123 {
 124         guint32 val = *((guint32 *) addr);
 125
 126         if (swap)
 127                 return GUINT32_SWAP_LE_BE(val);
 128         else
 129                 return val;
 130 }