kc3-lang/harfbuzz/src/hb-number.cc

• Show log

  Commit

• Hash : 9b1d5c4a
  Author :
  Date : 2019-12-09T12:29:28
  

  [number] fix where strtod_l not available

Download

• src/hb-number.cc

• /*
   * Copyright © 2019  Ebrahim Byagowi
   *
   *  This is part of HarfBuzz, a text shaping library.
   *
   * Permission is hereby granted, without written agreement and without
   * license or royalty fees, to use, copy, modify, and distribute this
   * software and its documentation for any purpose, provided that the
   * above copyright notice and the following two paragraphs appear in
   * all copies of this software.
   *
   * IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE TO ANY PARTY FOR
   * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
   * ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN
   * IF THE COPYRIGHT HOLDER HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
   * DAMAGE.
   *
   * THE COPYRIGHT HOLDER SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING,
   * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
   * FITNESS FOR A PARTICULAR PURPOSE.  THE SOFTWARE PROVIDED HEREUNDER IS
   * ON AN "AS IS" BASIS, AND THE COPYRIGHT HOLDER HAS NO OBLIGATION TO
   * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
   *
   */
  
  #include "hb.hh"
  #include "hb-machinery.hh"
  #include "hb-number.hh"
  #include "hb-number-parser.hh"
  
  #include <locale.h>
  #ifdef HAVE_XLOCALE_H
  #include <xlocale.h>
  #endif
  
  template<typename T, typename Func>
  static bool
  _parse_number (const char **pp, const char *end, T *pv,
  	       bool whole_buffer, Func f)
  {
    char buf[32];
    unsigned int len = hb_min (ARRAY_LENGTH (buf) - 1,
  			     (unsigned int) (end - *pp));
    strncpy (buf, *pp, len);
    buf[len] = '\0';
  
    char *p = buf;
    char *pend = p;
  
    errno = 0;
    *pv = f (p, &pend);
    if (unlikely (errno || p == pend ||
  		/* Check if consumed whole buffer if is requested */
  		(whole_buffer && pend - p != end - *pp))) return false;
  
    *pp += pend - p;
    return true;
  }
  
  bool
  hb_parse_int (const char **pp, const char *end, int *pv, bool whole_buffer)
  {
    return _parse_number<int> (pp, end, pv, whole_buffer,
  			     [] (const char *p, char **end)
  			     { return strtol (p, end, 10); });
  }
  
  bool
  hb_parse_uint (const char **pp, const char *end, unsigned int *pv,
  	       bool whole_buffer, int base)
  {
    return _parse_number<unsigned int> (pp, end, pv, whole_buffer,
  				      [base] (const char *p, char **end)
  				      { return strtoul (p, end, base); });
  }
  
  
  #if defined (HAVE_NEWLOCALE) && defined (HAVE_STRTOD_L)
  #define USE_XLOCALE 1
  #define HB_LOCALE_T locale_t
  #define HB_CREATE_LOCALE(locName) newlocale (LC_ALL_MASK, locName, nullptr)
  #define HB_FREE_LOCALE(loc) freelocale (loc)
  #elif defined(_MSC_VER)
  #define USE_XLOCALE 1
  #define HB_LOCALE_T _locale_t
  #define HB_CREATE_LOCALE(locName) _create_locale (LC_ALL, locName)
  #define HB_FREE_LOCALE(loc) _free_locale (loc)
  #define strtod_l(a, b, c) _strtod_l ((a), (b), (c))
  #endif
  
  #ifdef USE_XLOCALE
  
  #if HB_USE_ATEXIT
  static void free_static_C_locale ();
  #endif
  
  static struct hb_C_locale_lazy_loader_t : hb_lazy_loader_t<hb_remove_pointer<HB_LOCALE_T>,
  							  hb_C_locale_lazy_loader_t>
  {
    static HB_LOCALE_T create ()
    {
      HB_LOCALE_T C_locale = HB_CREATE_LOCALE ("C");
  
  #if HB_USE_ATEXIT
      atexit (free_static_C_locale);
  #endif
  
      return C_locale;
    }
    static void destroy (HB_LOCALE_T p)
    {
      HB_FREE_LOCALE (p);
    }
    static HB_LOCALE_T get_null ()
    {
      return nullptr;
    }
  } static_C_locale;
  
  #if HB_USE_ATEXIT
  static
  void free_static_C_locale ()
  {
    static_C_locale.free_instance ();
  }
  #endif
  
  static HB_LOCALE_T
  get_C_locale ()
  {
    return static_C_locale.get_unconst ();
  }
  #endif /* USE_XLOCALE */
  
  bool
  hb_parse_double (const char **pp, const char *end, double *pv,
  		 bool whole_buffer)
  {
    return _parse_number<double> (pp, end, pv, whole_buffer,
  				[] (const char *p, char **end)
  				{
  #ifdef USE_XLOCALE
  				  return strtod_l (p, end, get_C_locale ());
  #else
  				  return strtod_rl (p, end);
  #endif
  				});
  }
  

Download