Blame stdlib/mbtowc.c

Packit 6c4009
/* Copyright (C) 1991-2018 Free Software Foundation, Inc.
Packit 6c4009
   This file is part of the GNU C Library.
Packit 6c4009
Packit 6c4009
   The GNU C Library is free software; you can redistribute it and/or
Packit 6c4009
   modify it under the terms of the GNU Lesser General Public
Packit 6c4009
   License as published by the Free Software Foundation; either
Packit 6c4009
   version 2.1 of the License, or (at your option) any later version.
Packit 6c4009
Packit 6c4009
   The GNU C Library is distributed in the hope that it will be useful,
Packit 6c4009
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit 6c4009
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit 6c4009
   Lesser General Public License for more details.
Packit 6c4009
Packit 6c4009
   You should have received a copy of the GNU Lesser General Public
Packit 6c4009
   License along with the GNU C Library; if not, see
Packit 6c4009
   <http://www.gnu.org/licenses/>.  */
Packit 6c4009
Packit 6c4009
#include <stdlib.h>
Packit 6c4009
#include <string.h>
Packit 6c4009
#include <wchar.h>
Packit 6c4009
#include <gconv.h>
Packit 6c4009
#include <wcsmbs/wcsmbsload.h>
Packit 6c4009
Packit 6c4009
Packit 6c4009
/* Convert the multibyte character at S, which is no longer
Packit 6c4009
   than N characters, to its `wchar_t' representation, placing
Packit 6c4009
   this n *PWC and returning its length.
Packit 6c4009
Packit 6c4009
   Attention: this function should NEVER be intentionally used.
Packit 6c4009
   The interface is completely stupid.  The state is shared between
Packit 6c4009
   all conversion functions.  You should use instead the restartable
Packit 6c4009
   version `mbrtowc'.  */
Packit 6c4009
int
Packit 6c4009
mbtowc (wchar_t *pwc, const char *s, size_t n)
Packit 6c4009
{
Packit 6c4009
  int result;
Packit 6c4009
  static mbstate_t state;
Packit 6c4009
Packit 6c4009
  /* If S is NULL the function has to return null or not null
Packit 6c4009
     depending on the encoding having a state depending encoding or
Packit 6c4009
     not.  */
Packit 6c4009
  if (s == NULL)
Packit 6c4009
    {
Packit 6c4009
      const struct gconv_fcts *fcts;
Packit 6c4009
Packit 6c4009
      /* Get the conversion functions.  */
Packit 6c4009
      fcts = get_gconv_fcts (_NL_CURRENT_DATA (LC_CTYPE));
Packit 6c4009
Packit 6c4009
      /* This is an extension in the Unix standard which does not directly
Packit 6c4009
	 violate ISO C.  */
Packit 6c4009
      memset (&state, '\0', sizeof state);
Packit 6c4009
Packit 6c4009
      result = fcts->towc->__stateful;
Packit 6c4009
    }
Packit 6c4009
  else if (*s == '\0')
Packit 6c4009
    {
Packit 6c4009
      if (pwc != NULL)
Packit 6c4009
	*pwc = L'\0';
Packit 6c4009
      result = 0;
Packit 6c4009
    }
Packit 6c4009
  else
Packit 6c4009
    {
Packit 6c4009
      result = __mbrtowc (pwc, s, n, &state);
Packit 6c4009
Packit 6c4009
      /* The `mbrtowc' functions tell us more than we need.  Fold the -1
Packit 6c4009
	 and -2 result into -1.  */
Packit 6c4009
      if (result < 0)
Packit 6c4009
	result = -1;
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  return result;
Packit 6c4009
}