1: /* Copyright (C) 2000 Free Software Foundation, Inc.
    2:    This file is part of the GNU C Library.
    3:    Contributed by Ulrich Drepper <drepper@gnu.org>, 2000.
    4: 
    5:    The GNU C Library is free software; you can redistribute it and/or
    6:    modify it under the terms of the GNU Lesser General Public
    7:    License as published by the Free Software Foundation; either
    8:    version 2.1 of the License, or (at your option) any later version.
    9: 
   10:    The GNU C Library is distributed in the hope that it will be useful,
   11:    but WITHOUT ANY WARRANTY; without even the implied warranty of
   12:    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   13:    Lesser General Public License for more details.
   14: 
   15:    You should have received a copy of the GNU Lesser General Public
   16:    License along with the GNU C Library; if not, write to the Free
   17:    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
   18:    02111-1307 USA.  */
   19: 
   20: #include <assert.h>
   21: #include <langinfo.h>
   22: 
   23: /* Look up the value of the next multibyte character and return its numerical
   24:    value if it is one of the digits known in the locale.  If *DECIDED is
   25:    -1 this means it is not yet decided which form it is and we have to
   26:    search through all available digits.  Otherwise we know which script
   27:    the digits are from.  */
   28: static inline int
   29: indigitwc_value (wchar_t wc, int *decided)
   30: {
   31:   int from_level;
   32:   int to_level;
   33:   const wchar_t *wcdigits[10];
   34:   int n;
   35: 
   36:   if (*decided != -1)
   37:     from_level = to_level = *decided;
   38:   else
   39:     {
   40:       from_level = 0;
   41:       to_level = _NL_CURRENT_WORD (LC_CTYPE, _NL_CTYPE_INDIGITS_WC_LEN) - 1;
   42:       assert (from_level <= to_level);
   43:     }
   44: 
   45:   /* In this round we get the pointer to the digit strings and also perform
   46:      the first round of comparisons.  */
   47:   for (n = 0; n < 10; ++n)
   48:     {
   49:       /* Get the string for the digits with value N.  */
   50:       wcdigits[n] = _NL_CURRENT (LC_CTYPE, _NL_CTYPE_INDIGITS0_WC + n);
   51:       wcdigits[n] += from_level;
   52: 
   53:       if (wc == *wcdigits[n])
   54:         {
   55:           /* Found it.  */
   56:           if (*decided == -1)
   57:             *decided = 0;
   58:           return n;
   59:         }
   60: 
   61:       /* Advance the pointer to the next string.  */
   62:       ++wcdigits[n];
   63:     }
   64: 
   65:   /* Now perform the remaining tests.  */
   66:   while (++from_level <= to_level)
   67:     {
   68:       /* Search all ten digits of this level.  */
   69:       for (n = 0; n < 10; ++n)
   70:         {
   71:           if (wc == *wcdigits[n])
   72:             {
   73:               /* Found it.  */
   74:               if (*decided == -1)
   75:                 *decided = from_level;
   76:               return n;
   77:             }
   78: 
   79:           /* Advance the pointer to the next string.  */
   80:           ++wcdigits[n];
   81:         }
   82:     }
   83: 
   84:   /* If we reach this point no matching digit was found.  */
   85:   return -1;
   86: }