xslt_i18n.c File Reference

#include "xslt_i18n.h"
#include "gsad_base.h"
#include <assert.h>
#include <dirent.h>
#include <errno.h>
#include <glib.h>
#include <libintl.h>
#include <libxml/xpath.h>
#include <libxml/xpathInternals.h>
#include <libxslt/xsltutils.h>
#include <math.h>
#include <string.h>
#include <locale.h>
#include <stdlib.h>

Include dependency graph for xslt_i18n.c:

Go to the source code of this file.

Macros
#define	G_LOG_DOMAIN   "gsad xslt"
	GLib log domain. More...
#define	GETTEXT_CONTEXT_GLUE   "\004"
#define	GSA_I18N_EXT_URI   "http://openvas.org/i18n"
	Namespace URI for the i18n XSLT extension. More...
#define	GSA_XSL_TEXTDOMAIN   "gsad_xsl"

Functions
void	register_i18n_ext_module ()
	Register the i18n XSLT extension module. More...
int	get_ext_gettext_enabled ()
	Get whether gettext functions for extensions are enabled. More...
void	set_ext_gettext_enabled (int enabled)
	Enable or disable gettext functions for extensions. More...
int	init_language_lists ()
	Initialize the list of available languages. More...
void	buffer_languages_xml (GString *buffer)
	Write the list of installed languages to a buffer as XML. More...
gchar *	accept_language_to_env_fmt (const char *accept_language)
	Convert an Accept-Language string to the LANGUAGE env variable form. More...

Macro Definition Documentation

#define G_LOG_DOMAIN   "gsad xslt"

GLib log domain.

Definition at line 45 of file xslt_i18n.c.

#define GETTEXT_CONTEXT_GLUE   "\004"

Definition at line 48 of file xslt_i18n.c.

#define GSA_I18N_EXT_URI   "http://openvas.org/i18n"

Namespace URI for the i18n XSLT extension.

Definition at line 54 of file xslt_i18n.c.

Referenced by register_i18n_ext_module().

#define GSA_XSL_TEXTDOMAIN   "gsad_xsl"

Definition at line 59 of file xslt_i18n.c.

Referenced by init_language_lists(), and register_i18n_ext_module().

Function Documentation

gchar* accept_language_to_env_fmt

(

const char *

accept_language

)

Convert an Accept-Language string to the LANGUAGE env variable form.

Converts the language preferences as defined in a HTTP Accept-Language header to a colon-separated list of language codes as used by gettext in the LANGUAGE environment variable.

Parameters

[in]

accept_language

HTTP Accept-Language header text.

Returns

Newly allocated string of language codes as used by gettext. If accept_language is NULL or it doesn't contain a language DEFAULT_GSAD_LANGUAGE is returned.

Definition at line 769 of file xslt_i18n.c.

References DEFAULT_GSAD_LANGUAGE.

Referenced by handle_request(), and save_my_settings_omp().

{
  if (accept_language == NULL)
    return g_strdup (DEFAULT_GSAD_LANGUAGE);

  gchar *language;
  // TODO: Convert to a colon-separated list of codes instead of
  //        just extracting the first one
  gchar **prefs, *pref;
  prefs = g_strsplit_set (accept_language, ",;", -1);

  pref = prefs [0];
  if (pref)
    {
      char *pos;
      g_strstrip (pref);
      pos = pref;
      while (pos[0] != '\0')
        {
          if (pos[0] == '-')
            pos[0] = '_';
          pos++;
        };
    }
  language = g_strdup (pref ? pref : DEFAULT_GSAD_LANGUAGE);
  g_strfreev (prefs);

  return language;
}

Here is the caller graph for this function:

void buffer_languages_xml

(

GString *

buffer

)

Write the list of installed languages to a buffer as XML.

Parameters

[in]

buffer

A GString buffer to write to.

Definition at line 718 of file xslt_i18n.c.

Referenced by init_language_lists().

{
  GList *langs_list;
  assert (buffer);

  langs_list = g_list_first (installed_languages);

  g_string_append (buffer, "<gsa_languages>");
  while (langs_list)
    {
      gchar *lang_code, *lang_name, *native_name, *language_escaped;

      lang_code = (gchar*) langs_list->data;

      lang_name = g_hash_table_lookup (language_names, lang_code);
      if (lang_name == NULL)
        lang_name = lang_code;

      native_name = g_hash_table_lookup (native_language_names, lang_code);
      if (native_name == NULL)
        native_name = lang_name;

      language_escaped
        = g_markup_printf_escaped ("<language>"
                                   "<code>%s</code>"
                                   "<name>%s</name>"
                                   "<native_name>%s</native_name>"
                                   "</language>",
                                   lang_code,
                                   lang_name,
                                   native_name);
      g_string_append (buffer, language_escaped);
      g_free (language_escaped);
      langs_list = g_list_nth (langs_list, 1);
    }
  g_string_append (buffer, "</gsa_languages>");
}

Here is the caller graph for this function:

int get_ext_gettext_enabled

(

)

Get whether gettext functions for extensions are enabled.

Returns

0 gettext is disabled, 1 gettext is enabled.

Definition at line 558 of file xslt_i18n.c.

{
  return ext_gettext_enabled;
}

int init_language_lists

(

)

Initialize the list of available languages.

Returns

0: success, -1: error

Definition at line 580 of file xslt_i18n.c.

References buffer_languages_xml(), get_chroot_state(), and GSA_XSL_TEXTDOMAIN.

Referenced by main().

{
  FILE *lang_names_file;
  const char *locale_dir_name;
  DIR *locale_dir;
  struct dirent *entry;

  if (installed_languages != NULL)
    {
      g_warning ("%s: Language lists already initialized.", __FUNCTION__);
      return -1;
    }

  /* Init data structures */
  language_names = g_hash_table_new_full (g_str_hash, g_str_equal,
                                          g_free, g_free);

  native_language_names = g_hash_table_new_full (g_str_hash, g_str_equal,
                                                 g_free, g_free);

  // installed_languages starts initialized as NULL

  /* Add presets "Browser Language" and "English" */
  installed_languages = g_list_append (installed_languages,
                                       g_strdup ("Browser Language"));
  installed_languages = g_list_append (installed_languages,
                                       g_strdup ("en"));
  g_hash_table_insert (language_names,
                       g_strdup ("Browser Language"),
                       g_strdup ("Browser Language"));
  g_hash_table_insert (native_language_names,
                       g_strdup ("Browser Language"),
                       g_strdup ("Browser Language"));
  g_hash_table_insert (language_names,
                       g_strdup ("en"), g_strdup ("English"));
  g_hash_table_insert (native_language_names,
                       g_strdup ("en"), g_strdup ("English"));

  /* Get language names */
  lang_names_file = fopen (GSA_DATA_DIR "/language_names.tsv", "r");
  if (lang_names_file)
    {
      size_t len;
      char *line = NULL;
      while (getline (&line, &len, lang_names_file) != -1)
        {
          g_strstrip (line);
          if (line [0] != '\0' && line [0] != '#')
            {
              gchar **columns;
              gchar *code, *name, *native_name;
              columns = g_strsplit (line, "\t", 3);
              code = columns [0];
              name = code ? columns [1] : NULL;
              native_name = name ? columns [2] : NULL;
              if (code && name)
                g_hash_table_insert (language_names,
                                     g_strdup (code),
                                     g_strdup (name));
              if (code && native_name)
                g_hash_table_insert (native_language_names,
                                     g_strdup (code),
                                     g_strdup (native_name));
              g_strfreev (columns);
            }
          g_free (line);
          line = NULL;
        }
      fclose (lang_names_file);
    }
  else
    {
      g_warning ("%s: Failed to open language names file: %s",
                 __FUNCTION__, strerror (errno));
    }

  /* Get installed translations */
  locale_dir_name = get_chroot_state () ? GSA_CHROOT_LOCALE_DIR 
                                        : GSA_LOCALE_DIR;
  locale_dir = opendir (locale_dir_name);

  if (locale_dir == NULL)
    {
      g_warning ("%s: Failed to open locale directory \"%s\": %s",
                 __FUNCTION__, GSA_LOCALE_DIR, strerror (errno));
      return -1;
    }

  while ((entry = readdir (locale_dir)) != 0)
    {
      if (entry->d_name[0] != '.'
          && strlen (entry->d_name) >= 2
          && entry->d_type == DT_DIR
          && strcmp (entry->d_name, "en")
          && strcmp (entry->d_name, "Browser Language"))
        {
          FILE *mo_file;
          gchar *lang_mo_path;
          lang_mo_path = g_build_filename (locale_dir_name,
                                           entry->d_name,
                                           "LC_MESSAGES",
                                           GSA_XSL_TEXTDOMAIN ".mo",
                                           NULL);

          mo_file = fopen (lang_mo_path, "r");
          if (mo_file)
            {
              fclose (mo_file);
              installed_languages
                = g_list_insert_sorted (installed_languages,
                                        g_strdup (entry->d_name),
                                        (GCompareFunc) strcmp);
            }
          else
            {
              if (errno != ENOENT)
                g_warning ("%s: Failed to open %s: %s",
                           __FUNCTION__, lang_mo_path, strerror (errno));
            }
          g_free (lang_mo_path);
        }
    }
  closedir (locale_dir);

  GString *test = g_string_new ("");
  buffer_languages_xml (test);
  g_debug ("%s: Initialized language lists", __FUNCTION__);
  g_string_free (test, TRUE);

  return 0;
}

Here is the call graph for this function:

Here is the caller graph for this function:

void register_i18n_ext_module

(

)

Register the i18n XSLT extension module.

Definition at line 533 of file xslt_i18n.c.

References get_chroot_state(), GSA_I18N_EXT_URI, and GSA_XSL_TEXTDOMAIN.

Referenced by xsl_transform_with_stylesheet().

{
  g_debug ("Registering i18n XSLT module");

  xsltRegisterExtModule((xmlChar*) GSA_I18N_EXT_URI,
                        init_i18n_module,
                        shutdown_i18n_module);

  if (bindtextdomain (GSA_XSL_TEXTDOMAIN,
                      get_chroot_state () ? GSA_CHROOT_LOCALE_DIR
                                          : GSA_LOCALE_DIR)
      == NULL)
    {
      g_critical ("%s: Failed to bind text domain for gettext", __FUNCTION__);
      abort ();
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

void set_ext_gettext_enabled

(

int

enabled

)

Enable or disable gettext functions for extensions.

Parameters

enabled

0 to disable, any other to enable.

Definition at line 569 of file xslt_i18n.c.

Referenced by main().

{
  ext_gettext_enabled = (enabled != 0);
}

Here is the caller graph for this function: