lib/c32_get_mapping.c

   1 /* Get descriptor for a 32-bit wide character case conversion.
   2    Copyright (C) 2011-2024 Free Software Foundation, Inc.
   3
   4    This file is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU Lesser General Public License as
   6    published by the Free Software Foundation; either version 2.1 of the
   7    License, or (at your option) any later version.
   8
   9    This file is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public License
  15    along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
  16
  17 /* Written by Bruno Haible <bruno@clisp.org>, 2023.  */
  18
  19 #include <config.h>
  20
  21 #define IN_C32_GET_MAPPING
  22 /* Specification.  */
  23 #include <uchar.h>
  24
  25 #include <string.h>
  26 #include <wctype.h>
  27
  28 #if _GL_WCHAR_T_IS_UCS4
  29 _GL_EXTERN_INLINE
  30 #endif
  31 c32_mapping_t
  32 c32_get_mapping (const char *name)
  33 {
  34 #if _GL_WCHAR_T_IS_UCS4
  35   return wctrans (name);
  36 #else
  37   if (name[0] == 't'
  38       && name[1] == 'o')
  39     switch (name[2])
  40       {
  41       case 'l':
  42         if (strcmp (name + 3, "ower") == 0)
  43           return c32tolower;
  44         break;
  45       case 'u':
  46         if (strcmp (name + 3, "pper") == 0)
  47           return c32toupper;
  48         break;
  49       default:
  50         break;
  51       }
  52   return (c32_mapping_t) 0;
  53 #endif
  54 }