Back to index

glibc  2.9
Classes | Defines | Functions | Variables
iconvconfig.c File Reference
#include <argp.h>
#include <assert.h>
#include <error.h>
#include <errno.h>
#include <fcntl.h>
#include <libintl.h>
#include <locale.h>
#include <mcheck.h>
#include <search.h>
#include <stdint.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdio_ext.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/cdefs.h>
#include <sys/uio.h>
#include "iconvconfig.h"
#include "../version.h"
#include "../intl/hash-string.h"
#include <gconv_builtin.h>

Go to the source code of this file.

Classes

struct  module
struct  alias
struct  name
struct  name_info
struct  name_info::other_conv_list
struct  name_info::other_conv_list::other_conv

Defines

#define PACKAGE   _libc_intl_domainname
#define OPT_PREFIX   300
#define OPT_NOSTDLIB   301
#define BUILTIN_ALIAS(alias, real)   { .from = alias, .to = real },
#define BUILTIN_TRANSFORMATION(From, To, Cost, Name, Fct, BtowcFct, MinF, MaxF, MinT, MaxT)
#define nbuiltin_alias   (sizeof (builtin_alias) / sizeof (builtin_alias[0]))
#define BUILTIN_ALIAS(alias, real)
#define BUILTIN_TRANSFORMATION(From, To, Cost, Name, Fct, BtowcFct, MinF, MaxF, MinT, MaxT)   { .from = From, .to = To, .module = Name, .cost = Cost },
#define nbuiltin_trans   (sizeof (builtin_trans) / sizeof (builtin_trans[0]))
#define MODULE_EXT   ".so"

Functions

static void print_version (FILE *stream, struct argp_state *state)
static error_t parse_opt (int key, char *arg, struct argp_state *state)
static char * more_help (int key, const char *text, void *input)
static int handle_dir (const char *dir)
static void add_builtins (void)
static void get_aliases (void)
static void get_modules (void)
static void generate_name_list (void)
static void generate_name_info (void)
static int write_output (void)
void * xmalloc (size_t n) __attribute_malloc__
void * xcalloc (size_t n, size_t m) __attribute_malloc__
void * xrealloc (void *p, size_t n)
struct Strtabstrtabinit (void)
void strtabfree (struct Strtab *st)
struct Strentstrtabadd (struct Strtab *st, const char *str, size_t len)
void * strtabfinalize (struct Strtab *st, size_t *size)
size_t strtaboffset (struct Strent *se)
int main (int argc, char *argv[])
static int alias_compare (const void *p1, const void *p2)
static void new_alias (const char *fromname, size_t fromlen, const char *toname, size_t tolen)
static void add_alias (char *rp)
static void append_alias (const void *nodep, VISIT value, int level)
static int module_compare (const void *p1, const void *p2)
static void new_module (const char *fromname, size_t fromlen, const char *toname, size_t tolen, const char *directory, const char *filename, size_t filelen, int cost, size_t need_ext)
static void internal_function add_module (char *rp, const char *directory)
static void append_module (const void *nodep, VISIT value, int level)
static int name_compare (const void *p1, const void *p2)
static struct namenew_name (const char *str, struct Strent *strent)
static int name_to_module_idx (const char *name, int add)
static int is_prime (unsigned long int candidate)
static uint32_t next_prime (uint32_t seed)
static void name_insert (const void *nodep, VISIT value, int level)

Variables

void(* argp_program_version_hook )(FILE *, struct argp_state *) = print_version
static const char doc []
static const char args_doc [] = N_("[DIR...]")
static struct argp_option []
static struct argp
static const char * prefix = ""
static size_t prefix_len
static const char * output_file
static size_t output_file_len
static bool nostdlib
static void * modules
static void * aliases
static void * names
static int nnames
static struct alias ** alias_list
static size_t nalias_list
static size_t nalias_list_max
static struct module ** module_list
static size_t nmodule_list
static size_t nmodule_list_max
static struct name_infoname_info
static size_t nname_info
static size_t nextra_modules
struct {
const char * from
const char * to
builtin_alias []
struct {
const char * from
const char * to
const char * module
int cost
builtin_trans []
static const char gconv_module_ext [] = MODULE_EXT
static struct Strtabstrtab
static struct hash_entryhash_table
static size_t hash_size

Class Documentation

struct module

Definition at line 52 of file iconvconfig.c.

Collaboration diagram for module:
Class Members
int cost
const char * directory
struct Strent * directory_strent
char * filename
struct Strent * filename_strent
char * fromname
struct Strent * fromname_strent
struct module * next
char toname
struct Strent * toname_strent
struct alias

Definition at line 66 of file iconvconfig.c.

Collaboration diagram for alias:
Class Members
struct Strent * froment
char * fromname
struct module * module
struct Strent * toent
char toname
struct name

Definition at line 75 of file iconvconfig.c.

Collaboration diagram for name:
Class Members
uint32_t hashval
int module_idx
const char * name
struct Strent * strent
struct name_info

Definition at line 83 of file iconvconfig.c.

Collaboration diagram for name_info:
Class Members
const char * canonical_name
struct Strent * canonical_strent
struct module * from_internal
struct other_conv_list * other_conv_list
struct module * to_internal
struct name_info::other_conv_list

Definition at line 91 of file iconvconfig.c.

Collaboration diagram for name_info::other_conv_list:
Class Members
int dest_idx
struct other_conv_list * next
struct other_conv other_conv
struct name_info::other_conv_list::other_conv

Definition at line 94 of file iconvconfig.c.

Collaboration diagram for name_info::other_conv_list::other_conv:
Class Members
struct module * module
gidx_t module_idx
struct other_conv * next

Define Documentation

#define BUILTIN_ALIAS (   alias,
  real 
)    { .from = alias, .to = real },
#define BUILTIN_ALIAS (   alias,
  real 
)
#define BUILTIN_TRANSFORMATION (   From,
  To,
  Cost,
  Name,
  Fct,
  BtowcFct,
  MinF,
  MaxF,
  MinT,
  MaxT 
)
#define BUILTIN_TRANSFORMATION (   From,
  To,
  Cost,
  Name,
  Fct,
  BtowcFct,
  MinF,
  MaxF,
  MinT,
  MaxT 
)    { .from = From, .to = To, .module = Name, .cost = Cost },
#define MODULE_EXT   ".so"

Definition at line 246 of file iconvconfig.c.

#define nbuiltin_alias   (sizeof (builtin_alias) / sizeof (builtin_alias[0]))

Definition at line 223 of file iconvconfig.c.

#define nbuiltin_trans   (sizeof (builtin_trans) / sizeof (builtin_trans[0]))

Definition at line 241 of file iconvconfig.c.

#define OPT_NOSTDLIB   301

Definition at line 124 of file iconvconfig.c.

#define OPT_PREFIX   300

Definition at line 123 of file iconvconfig.c.

Definition at line 44 of file iconvconfig.c.


Function Documentation

static void add_alias ( char *  rp) [static]

Definition at line 443 of file iconvconfig.c.

{
  /* We now expect two more string.  The strings are normalized
     (converted to UPPER case) and strored in the alias database.  */
  char *from;
  char *to;
  char *wp;

  while (isspace (*rp))
    ++rp;
  from = wp = rp;
  while (*rp != '\0' && !isspace (*rp))
    *wp++ = toupper (*rp++);
  if (*rp == '\0')
    /* There is no `to' string on the line.  Ignore it.  */
    return;
  *wp++ = '\0';
  to = ++rp;
  while (isspace (*rp))
    ++rp;
  while (*rp != '\0' && !isspace (*rp))
    *wp++ = toupper (*rp++);
  if (to == wp)
    /* No `to' string, ignore the line.  */
    return;
  *wp++ = '\0';

  assert (strlen (from) + 1 == (size_t) (to - from));
  assert (strlen (to) + 1 == (size_t) (wp - to));

  new_alias (from, to - from, to, wp - to);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void add_builtins ( void  ) [static]

Definition at line 770 of file iconvconfig.c.

{
  size_t cnt;

  /* Add all aliases.  */
  for (cnt = 0; cnt < nbuiltin_alias; ++cnt)
    new_alias (builtin_alias[cnt].from,
              strlen (builtin_alias[cnt].from) + 1,
              builtin_alias[cnt].to,
              strlen (builtin_alias[cnt].to) + 1);

  /* add the builtin transformations.  */
  for (cnt = 0; cnt < nbuiltin_trans; ++cnt)
    new_module (builtin_trans[cnt].from,
              strlen (builtin_trans[cnt].from) + 1,
              builtin_trans[cnt].to,
              strlen (builtin_trans[cnt].to) + 1,
              "", builtin_trans[cnt].module,
              strlen (builtin_trans[cnt].module) + 1,
              builtin_trans[cnt].cost, 0);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void internal_function add_module ( char *  rp,
const char *  directory 
) [static]

Definition at line 569 of file iconvconfig.c.

{
  /* We expect now
     1. `from' name
     2. `to' name
     3. filename of the module
     4. an optional cost value
  */
  char *from;
  char *to;
  char *module;
  char *wp;
  int need_ext;
  int cost;

  while (isspace (*rp))
    ++rp;
  from = rp;
  while (*rp != '\0' && !isspace (*rp))
    {
      *rp = toupper (*rp);
      ++rp;
    }
  if (*rp == '\0')
    return;
  *rp++ = '\0';
  to = wp = rp;
  while (isspace (*rp))
    ++rp;
  while (*rp != '\0' && !isspace (*rp))
    *wp++ = toupper (*rp++);
  if (*rp == '\0')
    return;
  *wp++ = '\0';
  do
    ++rp;
  while (isspace (*rp));
  module = wp;
  while (*rp != '\0' && !isspace (*rp))
    *wp++ = *rp++;
  if (*rp == '\0')
    {
      /* There is no cost, use one by default.  */
      *wp++ = '\0';
      cost = 1;
    }
  else
    {
      /* There might be a cost value.  */
      char *endp;

      *wp++ = '\0';
      cost = strtol (rp, &endp, 10);
      if (rp == endp || cost < 1)
       /* No useful information.  */
       cost = 1;
    }

  if (module[0] == '\0')
    /* No module name given.  */
    return;

  /* See whether we must add the ending.  */
  need_ext = 0;
  if ((size_t) (wp - module) < sizeof (gconv_module_ext)
      || memcmp (wp - sizeof (gconv_module_ext), gconv_module_ext,
               sizeof (gconv_module_ext)) != 0)
    /* We must add the module extension.  */
    need_ext = sizeof (gconv_module_ext) - 1;

  assert (strlen (from) + 1 == (size_t) (to - from));
  assert (strlen (to) + 1 == (size_t) (module - to));
  assert (strlen (module) + 1 == (size_t) (wp - module));

  new_module (from, to - from, to, module - to, directory, module, wp - module,
             cost, need_ext);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static int alias_compare ( const void *  p1,
const void *  p2 
) [static]

Definition at line 405 of file iconvconfig.c.

{
  const struct alias *a1 = (const struct alias *) p1;
  const struct alias *a2 = (const struct alias *) p2;

  return strcmp (a1->fromname, a2->fromname);
}

Here is the caller graph for this function:

static void append_alias ( const void *  nodep,
VISIT  value,
int  level 
) [static]

Definition at line 478 of file iconvconfig.c.

{
  if (value != leaf && value != postorder)
    return;

  if (nalias_list_max == nalias_list)
    {
      nalias_list_max += 50;
      alias_list = (struct alias **) xrealloc (alias_list,
                                          (nalias_list_max
                                          * sizeof (struct alias *)));
    }

  alias_list[nalias_list++] = *(struct alias **) nodep;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void append_module ( const void *  nodep,
VISIT  value,
int  level 
) [static]

Definition at line 731 of file iconvconfig.c.

{
  struct module *mo;

  if (value != leaf && value != postorder)
    return;

  mo = *(struct module **) nodep;

  if (nmodule_list > 0
      && strcmp (module_list[nmodule_list - 1]->fromname, mo->fromname) == 0)
    {
      /* Same name.  */
      mo->next = module_list[nmodule_list - 1];
      module_list[nmodule_list - 1] = mo;

      return;
    }

  if (nmodule_list_max == nmodule_list)
    {
      nmodule_list_max += 50;
      module_list = (struct module **) xrealloc (module_list,
                                           (nmodule_list_max
                                            * sizeof (struct module *)));
    }

  module_list[nmodule_list++] = mo;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void generate_name_info ( void  ) [static]

Definition at line 867 of file iconvconfig.c.

{
  size_t i;
  int idx;

  name_info = (struct name_info *) xcalloc (nmodule_list + 1,
                                       sizeof (struct name_info));

  /* First add a special entry for the INTERNAL name.  This must have
     index zero.  */
  idx = name_to_module_idx ("INTERNAL", 1);
  name_info[0].canonical_name = "INTERNAL";
  name_info[0].canonical_strent = strtabadd (strtab, "INTERNAL",
                                        sizeof ("INTERNAL"));
  assert (nname_info == 1);

  for (i = 0; i < nmodule_list; ++i)
    {
      struct module *runp;

      for (runp = module_list[i]; runp != NULL; runp = runp->next)
       if (strcmp (runp->fromname, "INTERNAL") == 0)
         {
           idx = name_to_module_idx (runp->toname, 1);
           name_info[idx].from_internal = runp;
           assert (name_info[idx].canonical_name == NULL
                  || strcmp (name_info[idx].canonical_name,
                            runp->toname) == 0);
           name_info[idx].canonical_name = runp->toname;
           name_info[idx].canonical_strent = runp->toname_strent;
         }
       else if (strcmp (runp->toname, "INTERNAL") == 0)
         {
           idx = name_to_module_idx (runp->fromname, 1);
           name_info[idx].to_internal = runp;
           assert (name_info[idx].canonical_name == NULL
                  || strcmp (name_info[idx].canonical_name,
                            runp->fromname) == 0);
           name_info[idx].canonical_name = runp->fromname;
           name_info[idx].canonical_strent = runp->fromname_strent;
         }
       else
         {
           /* This is a transformation not to or from the INTERNAL
              encoding.  */
           int from_idx = name_to_module_idx (runp->fromname, 1);
           int to_idx = name_to_module_idx (runp->toname, 1);
           struct other_conv_list *newp;

           newp = (struct other_conv_list *)
             xmalloc (sizeof (struct other_conv_list));
           newp->other_conv.module_idx = to_idx;
           newp->other_conv.module = runp;
           newp->other_conv.next = NULL; /* XXX Allow multiple module sequence */
           newp->dest_idx = to_idx;
           newp->next = name_info[from_idx].other_conv_list;
           name_info[from_idx].other_conv_list = newp;
           assert (name_info[from_idx].canonical_name == NULL
                  || strcmp (name_info[from_idx].canonical_name,
                            runp->fromname) == 0);
           name_info[from_idx].canonical_name = runp->fromname;
           name_info[from_idx].canonical_strent = runp->fromname_strent;

           ++nextra_modules;
         }
    }

  /* Now add the module index information for all the aliases.  */
  for (i = 0; i < nalias_list; ++i)
    {
      struct name fake_name = { .name = alias_list[i]->toname };
      struct name **tonamep;

      tonamep = (struct name **) tfind (&fake_name, &names, name_compare);
      if (tonamep != NULL)
       {
         struct name *newp = new_name (alias_list[i]->fromname,
                                   alias_list[i]->froment);
         newp->module_idx = (*tonamep)->module_idx;
         tsearch (newp, &names, name_compare);
       }
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void generate_name_list ( void  ) [static]

Definition at line 820 of file iconvconfig.c.

{
  size_t i;

  /* A name we always need.  */
  tsearch (new_name ("INTERNAL", strtabadd (strtab, "INTERNAL",
                                       sizeof ("INTERNAL"))),
          &names, name_compare);

  for (i = 0; i < nmodule_list; ++i)
    {
      struct module *runp;

      if (strcmp (module_list[i]->fromname, "INTERNAL") != 0)
       tsearch (new_name (module_list[i]->fromname,
                        module_list[i]->fromname_strent),
               &names, name_compare);

      for (runp = module_list[i]; runp != NULL; runp = runp->next)
       if (strcmp (runp->toname, "INTERNAL") != 0)
         tsearch (new_name (runp->toname, runp->toname_strent),
                 &names, name_compare);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void get_aliases ( void  ) [static]

Definition at line 496 of file iconvconfig.c.

Here is the call graph for this function:

Here is the caller graph for this function:

static void get_modules ( void  ) [static]

Definition at line 763 of file iconvconfig.c.

Here is the call graph for this function:

Here is the caller graph for this function:

static int handle_dir ( const char *  dir) [static]

Definition at line 650 of file iconvconfig.c.

{
  char *cp;
  FILE *fp;
  char *line = NULL;
  size_t linelen = 0;
  size_t dirlen = strlen (dir);

  if (dir[dirlen - 1] != '/')
    {
      char *newp = (char *) xmalloc (dirlen + 2);
      dir = memcpy (newp, dir, dirlen);
      newp[dirlen++] = '/';
      newp[dirlen] = '\0';
    }

  char infile[prefix_len + dirlen + sizeof "gconv-modules"];
  cp = infile;
  if (dir[0] == '/')
    cp = mempcpy (cp, prefix, prefix_len);
  strcpy (mempcpy (cp, dir, dirlen), "gconv-modules");

  fp = fopen (infile, "r");
  if (fp == NULL)
    {
      error (0, errno, "cannot open `%s'", infile);
      return 1;
    }

  /* No threads present.  */
  __fsetlocking (fp, FSETLOCKING_BYCALLER);

  while (!feof_unlocked (fp))
    {
      char *rp, *endp, *word;
      ssize_t n = __getdelim (&line, &linelen, '\n', fp);

      if (n < 0)
       /* An error occurred.  */
       break;

      rp = line;
      /* Terminate the line (excluding comments or newline) with a NUL
        byte to simplify the following code.  */
      endp = strchr (rp, '#');
      if (endp != NULL)
       *endp = '\0';
      else
       if (rp[n - 1] == '\n')
         rp[n - 1] = '\0';

      while (isspace (*rp))
       ++rp;

      /* If this is an empty line go on with the next one.  */
      if (rp == endp)
       continue;

      word = rp;
      while (*rp != '\0' && !isspace (*rp))
       ++rp;

      if (rp - word == sizeof ("alias") - 1
         && memcmp (word, "alias", sizeof ("alias") - 1) == 0)
       add_alias (rp);
      else if (rp - word == sizeof ("module") - 1
              && memcmp (word, "module", sizeof ("module") - 1) == 0)
       add_module (rp, dir);
      /* else */
       /* Otherwise ignore the line.  */
    }

  free (line);

  fclose (fp);

  return 0;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static int is_prime ( unsigned long int  candidate) [static]

Definition at line 953 of file iconvconfig.c.

{
  /* No even number and none less than 10 will be passed here.  */
  unsigned long int divn = 3;
  unsigned long int sq = divn * divn;

  while (sq < candidate && candidate % divn != 0)
    {
      ++divn;
      sq += 4 * divn;
      ++divn;
    }

  return candidate % divn != 0;
}

Here is the caller graph for this function:

int main ( int  argc,
char *  argv[] 
)

Definition at line 282 of file iconvconfig.c.

{
  int remaining;
  int status = 0;

  /* Enable memory use testing.  */
  /* mcheck_pedantic (NULL); */
  mtrace ();

  /* Set locale via LC_ALL.  */
  setlocale (LC_ALL, "");

  /* Set the text message domain.  */
  textdomain (_libc_intl_domainname);

  /* Parse and process arguments.  */
  argp_parse (&argp, argc, argv, 0, &remaining, NULL);

  if (nostdlib && remaining == argc)
    error (2, 0, _("Directory arguments required when using --nostdlib"));

  /* Initialize the string table.  */
  strtab = strtabinit ();

  /* Handle all directories mentioned.  */
  while (remaining < argc)
    status |= handle_dir (argv[remaining++]);

  if (! nostdlib)
    {
      /* In any case also handle the standard directory.  */
      char *path = strdupa (GCONV_PATH), *tp = strsep (&path, ":");
      while (tp != NULL)
       {
         status |= handle_dir (tp);

         tp = strsep (&path, ":");
       }
    }

  /* Add the builtin transformations and aliases without overwriting
     anything.  */
  add_builtins ();

  /* Store aliases in an array.  */
  get_aliases ();

  /* Get list of all modules.  */
  get_modules ();

  /* Generate list of all the names we know to handle in some way.  */
  generate_name_list ();

  /* Now we know all the names we will handle, collect information
     about them.  */
  generate_name_info ();

  /* Write the output file, but only if we haven't seen any error.  */
  if (status == 0)
    status = write_output ();
  else
    error (1, 0, _("no output file produced because warnings were issued"));

  return status;
}

Here is the call graph for this function:

static int module_compare ( const void *  p1,
const void *  p2 
) [static]

Definition at line 503 of file iconvconfig.c.

{
  const struct module *m1 = (const struct module *) p1;
  const struct module *m2 = (const struct module *) p2;
  int result;

  result = strcmp (m1->fromname, m2->fromname);
  if (result == 0)
    result = strcmp (m1->toname, m2->toname);

  return result;
}

Here is the caller graph for this function:

static char * more_help ( int  key,
const char *  text,
void *  input 
) [static]

Definition at line 374 of file iconvconfig.c.

{
  switch (key)
    {
    case ARGP_KEY_HELP_EXTRA:
      /* We print some extra information.  */
      return strdup (gettext ("\
For bug reporting instructions, please see:\n\
<http://www.gnu.org/software/libc/bugs.html>.\n"));
    default:
      break;
    }
  return (char *) text;
}

Here is the call graph for this function:

static int name_compare ( const void *  p1,
const void *  p2 
) [static]

Definition at line 794 of file iconvconfig.c.

{
  const struct name *n1 = (const struct name *) p1;
  const struct name *n2 = (const struct name *) p2;

  return strcmp (n1->name, n2->name);
}

Here is the caller graph for this function:

static void name_insert ( const void *  nodep,
VISIT  value,
int  level 
) [static]

Definition at line 1020 of file iconvconfig.c.

{
  struct name *name;
  unsigned int idx;
  unsigned int hval2;

  if (value != leaf && value != postorder)
    return;

  name = *(struct name **) nodep;
  idx = name->hashval % hash_size;
  hval2 = 1 + name->hashval % (hash_size - 2);

  while (hash_table[idx].string_offset != 0)
    if ((idx += hval2) >= hash_size)
      idx -= hash_size;

  hash_table[idx].string_offset = strtaboffset (name->strent);

  assert (name->module_idx != -1);
  hash_table[idx].module_idx = name->module_idx;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static int name_to_module_idx ( const char *  name,
int  add 
) [static]

Definition at line 847 of file iconvconfig.c.

{
  struct name **res;
  struct name fake_name = { .name = name };
  int idx;

  res = (struct name **) tfind (&fake_name, &names, name_compare);
  if (res == NULL)
    abort ();

  idx = (*res)->module_idx;
  if (idx == -1 && add)
    /* No module index assigned yet.  */
    idx = (*res)->module_idx = nname_info++;

  return idx;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void new_alias ( const char *  fromname,
size_t  fromlen,
const char *  toname,
size_t  tolen 
) [static]

Definition at line 415 of file iconvconfig.c.

{
  struct alias *newp;
  void **inserted;

  newp = (struct alias *) xmalloc (sizeof (struct alias) + fromlen + tolen);

  newp->fromname = mempcpy (newp->toname, toname, tolen);
  memcpy (newp->fromname, fromname, fromlen);
  newp->module = NULL;

  inserted = (void **) tsearch (newp, &aliases, alias_compare);
  if (inserted == NULL)
    error (EXIT_FAILURE, errno, gettext ("while inserting in search tree"));
  if (*inserted != newp)
    /* Something went wrong, free this entry.  */
    free (newp);
  else
    {
      newp->froment = strtabadd (strtab, newp->fromname, fromlen);
      newp->toent = strtabadd (strtab, newp->toname, tolen);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void new_module ( const char *  fromname,
size_t  fromlen,
const char *  toname,
size_t  tolen,
const char *  directory,
const char *  filename,
size_t  filelen,
int  cost,
size_t  need_ext 
) [static]

Definition at line 519 of file iconvconfig.c.

{
  struct module *new_module;
  size_t dirlen = strlen (directory) + 1;
  char *tmp;
  void **inserted;

  new_module = (struct module *) xmalloc (sizeof (struct module)
                                     + fromlen + tolen + filelen
                                     + need_ext);

  new_module->fromname = mempcpy (new_module->toname, toname, tolen);

  new_module->filename = mempcpy (new_module->fromname, fromname, fromlen);

  new_module->cost = cost;
  new_module->next = NULL;

  tmp = mempcpy (new_module->filename, filename, filelen);
  if (need_ext)
    {
      memcpy (tmp - 1, gconv_module_ext, need_ext + 1);
      filelen += need_ext;
    }
  new_module->directory = directory;

  /* Now insert the new module data structure in our search tree.  */
  inserted = (void **) tsearch (new_module, &modules, module_compare);
  if (inserted == NULL)
    error (EXIT_FAILURE, errno, "while inserting in search tree");
  if (*inserted != new_module)
    free (new_module);
  else
    {
      new_module->fromname_strent = strtabadd (strtab, new_module->fromname,
                                          fromlen);
      new_module->toname_strent = strtabadd (strtab, new_module->toname,
                                        tolen);
      new_module->filename_strent = strtabadd (strtab, new_module->filename,
                                          filelen);
      new_module->directory_strent = strtabadd (strtab, directory, dirlen);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static struct name* new_name ( const char *  str,
struct Strent strent 
) [static, read]

Definition at line 804 of file iconvconfig.c.

{
  struct name *newp = (struct name *) xmalloc (sizeof (struct name));

  newp->name = str;
  newp->strent = strent;
  newp->module_idx = -1;
  newp->hashval = __hash_string (str);

  ++nnames;

  return newp;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static uint32_t next_prime ( uint32_t  seed) [static]

Definition at line 971 of file iconvconfig.c.

{
  /* Make it definitely odd.  */
  seed |= 1;

  while (!is_prime (seed))
    seed += 2;

  return seed;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static error_t parse_opt ( int  key,
char *  arg,
struct argp_state state 
) [static]

Definition at line 351 of file iconvconfig.c.

{
  switch (key)
    {
    case OPT_PREFIX:
      prefix = arg;
      prefix_len = strlen (prefix);
      break;
    case 'o':
      output_file = arg;
      output_file_len = strlen (output_file);
      break;
    case OPT_NOSTDLIB:
      nostdlib = true;
      break;
    default:
      return ARGP_ERR_UNKNOWN;
    }
  return 0;
}

Here is the call graph for this function:

static void print_version ( FILE stream,
struct argp_state state 
) [static]

Definition at line 392 of file iconvconfig.c.

{
  fprintf (stream, "iconvconfig (GNU %s) %s\n", PACKAGE, VERSION);
  fprintf (stream, gettext ("\
Copyright (C) %s Free Software Foundation, Inc.\n\
This is free software; see the source for copying conditions.  There is NO\n\
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\
"), "2008");
  fprintf (stream, gettext ("Written by %s.\n"), "Ulrich Drepper");
}

Here is the call graph for this function:

struct Strent * strtabadd ( struct Strtab st,
const char *  str,
size_t  len 
) [read]

Definition at line 213 of file strtab.c.

{
  struct Strent *newstr;
  struct Strent **sep;

  /* Compute the string length if the caller doesn't know it.  */
  if (len == 0)
    len = strlen (str) + 1;

  /* Make sure all "" strings get offset 0.  */
  if (len == 1)
    return &st->null;

  /* Allocate memory for the new string and its associated information.  */
  newstr = newstring (st, str, len);

  /* Search in the array for the place to insert the string.  If there
     is no string with matching prefix and no string with matching
     leading substring, create a new entry.  */
  sep = searchstring (&st->root, newstr);
  if (*sep != newstr)
    {
      /* This is not the same entry.  This means we have a prefix match.  */
      if ((*sep)->len > newstr->len)
       {
         struct Strent *subs;

         for (subs = (*sep)->next; subs; subs = subs->next)
           if (subs->len == newstr->len)
             {
              /* We have an exact match with a substring.  Free the memory
                 we allocated.  */
              st->left += st->backp - (char *) newstr;
              st->backp = (char *) newstr;

              return subs;
             }

         /* We have a new substring.  This means we don't need the reverse
            string of this entry anymore.  */
         st->backp -= newstr->len;
         st->left += newstr->len;

         newstr->next = (*sep)->next;
         (*sep)->next = newstr;
       }
      else if ((*sep)->len != newstr->len)
       {
         /* When we get here it means that the string we are about to
            add has a common prefix with a string we already have but
            it is longer.  In this case we have to put it first.  */
         st->total += newstr->len - (*sep)->len;
         newstr->next = *sep;
         newstr->left = (*sep)->left;
         newstr->right = (*sep)->right;
         *sep = newstr;
       }
      else
       {
         /* We have an exact match.  Free the memory we allocated.  */
         st->left += st->backp - (char *) newstr;
         st->backp = (char *) newstr;

         newstr = *sep;
       }
    }
  else
    st->total += newstr->len;

  return newstr;
}

Here is the call graph for this function:

Here is the caller graph for this function:

void * strtabfinalize ( struct Strtab st,
size_t size 
)

Definition at line 311 of file strtab.c.

{
  size_t copylen;
  char *endp;
  char *retval;

  /* Fill in the information.  */
  endp = retval = (char *) xmalloc (st->total + 1);

  /* Always put an empty string at the beginning so that a zero offset
     can mean error.  */
  *endp++ = '\0';

  /* Now run through the tree and add all the string while also updating
     the offset members of the elfstrent records.  */
  copylen = 1;
  copystrings (st->root, &endp, &copylen);
  assert (copylen == st->total + 1);
  assert (endp == retval + st->total + 1);
  *size = copylen;

  return retval;
}

Here is the call graph for this function:

Here is the caller graph for this function:

void strtabfree ( struct Strtab st)

Definition at line 130 of file strtab.c.

{
  struct memoryblock *mb = st->memory;

  while (mb != NULL)
    {
      void *old = mb;
      mb = mb->next;
      free (old);
    }

  free (st);
}
struct Strtab * strtabinit ( void  ) [read]

Definition at line 91 of file strtab.c.

{
  struct Strtab *ret;

  if (ps == 0)
    {
      ps = sysconf (_SC_PAGESIZE) - 2 * sizeof (void *);
      assert (sizeof (struct memoryblock) < ps);
    }

  ret = (struct Strtab *) calloc (1, sizeof (struct Strtab));
  if (ret != NULL)
    {
      ret->null.len = 1;
      ret->null.string = "";
    }
  return ret;
}

Here is the call graph for this function:

Here is the caller graph for this function:

size_t strtaboffset ( struct Strent se)

Definition at line 337 of file strtab.c.

{
  return se->offset;
}

Here is the caller graph for this function:

static int write_output ( void  ) [static]

Definition at line 1044 of file iconvconfig.c.

{
  int fd;
  char *string_table;
  size_t string_table_size;
  struct gconvcache_header header;
  struct module_entry *module_table;
  char *extra_table;
  char *cur_extra_table;
  size_t n;
  int idx;
  struct iovec iov[6];
  static const gidx_t null_word;
  size_t total;
  char finalname[prefix_len + sizeof GCONV_MODULES_CACHE];
  char tmpfname[(output_file == NULL ? sizeof finalname : output_file_len + 1)
              + strlen (".XXXXXX")];

  /* Open the output file.  */
  if (output_file == NULL)
    {
      assert (GCONV_MODULES_CACHE[0] == '/');
      strcpy (stpcpy (mempcpy (tmpfname, prefix, prefix_len),
                    GCONV_MODULES_CACHE),
             ".XXXXXX");
      strcpy (mempcpy (finalname, prefix, prefix_len), GCONV_MODULES_CACHE);
    }
  else
    strcpy (mempcpy (tmpfname, output_file, output_file_len), ".XXXXXX");
  fd = mkstemp (tmpfname);
  if (fd == -1)
    return 1;

  /* Create the string table.  */
  string_table = strtabfinalize (strtab, &string_table_size);

  /* Create the hashing table.  We know how many strings we have.
     Creating a perfect hash table is not reasonable here.  Therefore
     we use open hashing and a table size which is the next prime 40%
     larger than the number of strings.  */
  hash_size = next_prime (nnames * 1.4);
  hash_table = (struct hash_entry *) xcalloc (hash_size,
                                         sizeof (struct hash_entry));
  /* Fill the hash table.  */
  twalk (names, name_insert);

  /* Create the section for the module list.  */
  module_table = (struct module_entry *) xcalloc (sizeof (struct module_entry),
                                            nname_info);

  /* Allocate memory for the non-INTERNAL conversions.  The allocated
     memory can be more than is actually needed.  */
  extra_table = (char *) xcalloc (sizeof (struct extra_entry)
                              + sizeof (gidx_t)
                              + sizeof (struct extra_entry_module),
                              nextra_modules);
  cur_extra_table = extra_table;

  /* Fill in the module information.  */
  for (n = 0; n < nname_info; ++n)
    {
      module_table[n].canonname_offset =
       strtaboffset (name_info[n].canonical_strent);

      if (name_info[n].from_internal == NULL)
       {
         module_table[n].fromdir_offset = 0;
         module_table[n].fromname_offset = 0;
       }
      else
       {
         module_table[n].fromdir_offset =
           strtaboffset (name_info[n].from_internal->directory_strent);
         module_table[n].fromname_offset =
           strtaboffset (name_info[n].from_internal->filename_strent);
       }

      if (name_info[n].to_internal == NULL)
       {
         module_table[n].todir_offset = 0;
         module_table[n].toname_offset = 0;
       }
      else
       {
         module_table[n].todir_offset =
           strtaboffset (name_info[n].to_internal->directory_strent);
         module_table[n].toname_offset =
           strtaboffset (name_info[n].to_internal->filename_strent);
       }

      if (name_info[n].other_conv_list != NULL)
       {
         struct other_conv_list *other = name_info[n].other_conv_list;

         /* Store the reference.  We add 1 to distinguish the entry
            at offset zero from the case where no extra modules are
            available.  The file reader has to account for the
            offset.  */
         module_table[n].extra_offset = 1 + cur_extra_table - extra_table;

         do
           {
             struct other_conv *runp;
             struct extra_entry *extra;

             /* Allocate new entry.  */
             extra = (struct extra_entry *) cur_extra_table;
             cur_extra_table += sizeof (struct extra_entry);
             extra->module_cnt = 0;

             runp = &other->other_conv;
             do
              {
                cur_extra_table += sizeof (struct extra_entry_module);
                extra->module[extra->module_cnt].outname_offset =
                  runp->next == NULL
                  ? other->dest_idx : runp->next->module_idx;
                extra->module[extra->module_cnt].dir_offset =
                  strtaboffset (runp->module->directory_strent);
                extra->module[extra->module_cnt].name_offset =
                  strtaboffset (runp->module->filename_strent);
                ++extra->module_cnt;

                runp = runp->next;
              }
             while (runp != NULL);

             other = other->next;
           }
         while (other != NULL);

         /* Final module_cnt is zero.  */
         *((gidx_t *) cur_extra_table) = 0;
         cur_extra_table += sizeof (gidx_t);
       }
    }

  /* Clear padding.  */
  memset (&header, 0, sizeof (struct gconvcache_header));

  header.magic = GCONVCACHE_MAGIC;

  iov[0].iov_base = &header;
  iov[0].iov_len = sizeof (struct gconvcache_header);
  total = iov[0].iov_len;

  header.string_offset = total;
  iov[1].iov_base = string_table;
  iov[1].iov_len = string_table_size;
  total += iov[1].iov_len;

  idx = 2;
  if ((string_table_size & (sizeof (gidx_t) - 1)) != 0)
    {
      iov[2].iov_base = (void *) &null_word;
      iov[2].iov_len = (sizeof (gidx_t)
                     - (string_table_size & (sizeof (gidx_t) - 1)));
      total += iov[2].iov_len;
      ++idx;
    }

  header.hash_offset = total;
  header.hash_size = hash_size;
  iov[idx].iov_base = hash_table;
  iov[idx].iov_len = hash_size * sizeof (struct hash_entry);
  total += iov[idx].iov_len;
  ++idx;

  header.module_offset = total;
  iov[idx].iov_base = module_table;
  iov[idx].iov_len = nname_info * sizeof (struct module_entry);
  total += iov[idx].iov_len;
  ++idx;

  assert ((size_t) (cur_extra_table - extra_table)
         <= ((sizeof (struct extra_entry) + sizeof (gidx_t)
              + sizeof (struct extra_entry_module))
             * nextra_modules));
  header.otherconv_offset = total;
  iov[idx].iov_base = extra_table;
  iov[idx].iov_len = cur_extra_table - extra_table;
  total += iov[idx].iov_len;
  ++idx;

  if ((size_t) TEMP_FAILURE_RETRY (writev (fd, iov, idx)) != total
      /* The file was created with mode 0600.  Make it world-readable.  */
      || fchmod (fd, 0644) != 0
      /* Rename the file, possibly replacing an old one.  */
      || rename (tmpfname, output_file ?: finalname) != 0)
    {
      int save_errno = errno;
      close (fd);
      unlink (tmpfname);
      error (EXIT_FAILURE, save_errno,
            gettext ("cannot generate output file"));
    }

  close (fd);

  return 0;
}

Here is the call graph for this function:

Here is the caller graph for this function:

void* xcalloc ( size_t  n,
size_t  m 
)

Definition at line 91 of file xmalloc.c.

{
  VOID *p;

  p = calloc (n, s);
  if (p == 0)
    p = fixup_null_alloc (n);
  return p;
}
void* xmalloc ( size_t  n)

Definition at line 77 of file xmalloc.c.

{
  VOID *p;

  p = malloc (n);
  if (p == 0)
    p = fixup_null_alloc (n);
  return p;
}
void* xrealloc ( void *  p,
size_t  n 
)

Variable Documentation

struct alias** alias_list [static]

Definition at line 191 of file iconvconfig.c.

void* aliases [static]

Definition at line 182 of file iconvconfig.c.

struct argp [static]
Initial value:

Definition at line 137 of file iconvconfig.c.

struct argp_option[] [static]
Initial value:
{
  { "prefix", OPT_PREFIX, "PATH", 0, N_("Prefix used for all file accesses") },
  { "output", 'o', "FILE", 0, N_("\
Put output in FILE instead of installed location\
 (--prefix does not apply to FILE)") },
  { "nostdlib", OPT_NOSTDLIB, NULL, 0,
    N_("Do not search standard directories, only those on the command line") },
  { NULL, 0, NULL, 0, NULL }
}

Definition at line 125 of file iconvconfig.c.

Definition at line 107 of file iconvconfig.c.

const char args_doc[] = N_("[DIR...]") [static]

Definition at line 114 of file iconvconfig.c.

struct { ... } builtin_alias[] [static]
struct { ... } builtin_trans[] [static]
const char doc[] [static]
Initial value:
 N_("\
Create fastloading iconv module configuration file.")

Definition at line 110 of file iconvconfig.c.

const char gconv_module_ext[] = MODULE_EXT [static]

Definition at line 248 of file iconvconfig.c.

size_t hash_size [static]

Definition at line 1017 of file iconvconfig.c.

struct hash_entry* hash_table [static]

Definition at line 1016 of file iconvconfig.c.

struct module** module_list [static]

Definition at line 196 of file iconvconfig.c.

void* modules [static]

Definition at line 179 of file iconvconfig.c.

size_t nalias_list [static]

Definition at line 192 of file iconvconfig.c.

Definition at line 193 of file iconvconfig.c.

struct name_info* name_info [static]

Definition at line 201 of file iconvconfig.c.

void* names [static]

Definition at line 185 of file iconvconfig.c.

Definition at line 205 of file iconvconfig.c.

size_t nmodule_list [static]

Definition at line 197 of file iconvconfig.c.

Definition at line 198 of file iconvconfig.c.

size_t nname_info [static]

Definition at line 202 of file iconvconfig.c.

int nnames [static]

Definition at line 188 of file iconvconfig.c.

bool nostdlib [static]

Definition at line 176 of file iconvconfig.c.

const char* output_file [static]

Definition at line 171 of file iconvconfig.c.

Definition at line 173 of file iconvconfig.c.

const char* prefix = "" [static]

Definition at line 166 of file iconvconfig.c.

size_t prefix_len [static]

Definition at line 168 of file iconvconfig.c.

struct Strtab* strtab [static]

Definition at line 277 of file iconvconfig.c.