iconv/gconv_open.c

   1 /* Find matching transformation algorithms and initialize steps.
   2    Copyright (C) 1997, 1998 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
   5
   6    The GNU C Library is free software; you can redistribute it and/or
   7    modify it under the terms of the GNU Library General Public License as
   8    published by the Free Software Foundation; either version 2 of the
   9    License, or (at your option) any later version.
  10
  11    The GNU C Library is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14    Library General Public License for more details.
  15
  16    You should have received a copy of the GNU Library General Public
  17    License along with the GNU C Library; see the file COPYING.LIB.  If not,
  18    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  19    Boston, MA 02111-1307, USA.  */
  20
  21 #include <errno.h>
  22 #include <stdlib.h>
  23
  24 #include <gconv_int.h>
  25
  26
  27 int
  28 internal_function
  29 __gconv_open (const char *toset, const char *fromset, gconv_t *handle)
  30 {
  31   struct gconv_step *steps;
  32   size_t nsteps;
  33   gconv_t result = NULL;
  34   size_t cnt = 0;
  35   int res;
  36
  37   res = __gconv_find_transform (toset, fromset, &steps, &nsteps);
  38   if (res == GCONV_OK)
  39     {
  40       /* Allocate room for handle.  */
  41       result = (gconv_t) malloc (sizeof (struct gconv_info));
  42       if (result == NULL)
  43         res = GCONV_NOMEM;
  44       else
  45         {
  46           /* Remember the list of steps.  */
  47           result->steps = steps;
  48           result->nsteps = nsteps;
  49
  50           /* Allocate array for the step data.  */
  51           result->data = (struct gconv_step_data *)
  52             calloc (nsteps, sizeof (struct gconv_step_data));
  53
  54           if (result->data == NULL)
  55             res = GCONV_NOMEM;
  56           else
  57             {
  58               /* Call all initialization functions for the transformation
  59                  step implemenations.  */
  60               struct gconv_step_data *data = result->data;
  61
  62               for (cnt = 0; cnt < nsteps; ++cnt)
  63                 {
  64                   /* If this is the last step we must not allocate an output
  65                      buffer.  Signal this to the initializer.  */
  66                   data[cnt].is_last = cnt == nsteps - 1;
  67
  68                   if (steps[cnt].init_fct != NULL)
  69                     {
  70                       res = (steps[cnt].init_fct) (&steps[cnt], &data[cnt]);
  71                       if (res != GCONV_OK)
  72                         break;
  73                     }
  74
  75                   if (!data[cnt].is_last && data[cnt].outbuf == NULL)
  76                     {
  77                       data[cnt].outbufsize = GCONV_DEFAULT_BUFSIZE;
  78                       data[cnt].outbuf =
  79                         (char *) malloc (data[cnt].outbufsize);
  80                       if (data[cnt].outbuf == NULL)
  81                         {
  82                           res = GCONV_NOMEM;
  83                           break;
  84                         }
  85                       data[cnt].outbufavail = 0;
  86                     }
  87                 }
  88             }
  89         }
  90     }
  91
  92   if (res != GCONV_OK)
  93     {
  94       /* Something went wrong.  Free all the resources.  */
  95       int serrno = errno;
  96
  97       if (result != NULL)
  98         {
  99           if (result->data != NULL)
 100             {
 101               while (cnt-- > 0)
 102                 if (steps[cnt].end_fct != NULL)
 103                   (*steps[cnt].end_fct) (&result->data[cnt]);
 104                 else
 105                   {
 106                     free (result->data[cnt].outbuf);
 107                     if (result->data[cnt].data != NULL)
 108                       free (result->data[cnt].data);
 109                   }
 110
 111               free (result->data);
 112             }
 113
 114           free (result);
 115           result = NULL;
 116         }
 117
 118       __gconv_close_transform (steps, nsteps);
 119
 120       __set_errno (serrno);
 121     }
 122
 123   *handle = result;
 124   return res;
 125 }