1 /* Language code of current locale. 2 Copyright (C) 2009-2021 Free Software Foundation, Inc. 3 Written by Bruno Haible <bruno@clisp.org>, 2009. 4 5 This file is free software. 6 It is dual-licensed under "the GNU LGPLv3+ or the GNU GPLv2+". 7 You can redistribute it and/or modify it under either 8 - the terms of the GNU Lesser General Public License as published 9 by the Free Software Foundation; either version 3, or (at your 10 option) any later version, or 11 - the terms of the GNU General Public License as published by the 12 Free Software Foundation; either version 2, or (at your option) 13 any later version, or 14 - the same dual license "the GNU LGPLv3+ or the GNU GPLv2+". 15 16 This file is distributed in the hope that it will be useful, 17 but WITHOUT ANY WARRANTY; without even the implied warranty of 18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 19 Lesser General Public License and the GNU General Public License 20 for more details. 21 22 You should have received a copy of the GNU Lesser General Public 23 License and of the GNU General Public License along with this 24 program. If not, see <https://www.gnu.org/licenses/>. */ 25 26 #include <config.h> 27 28 /* Specification. */ 29 #include "unicase.h" 30 31 #include <locale.h> 32 #include <string.h> 33 34 #include "localename.h" 35 36 #include "unicase/locale-languages.h" 37 38 const char * 39 uc_locale_language (void) /* */ 40 { 41 const char *locale_name = gl_locale_name (LC_CTYPE, "LC_CTYPE"); 42 const char *p; 43 44 /* Find the end of the language portion. */ 45 p = locale_name; 46 while (*p != '\0' && *p != '_' && *p != '.' && *p != '@') 47 p++; 48 49 /* Return a statically allocated pointer to the language portion, so that the 50 caller of this function does not need to free() the result. 51 We could use a dynamically built unification table. But given that the 52 set of possible languages is small, it is easier (and excludes ENOMEM 53 error conditions) to allocate the unification table statically. */ 54 if (p != locale_name) 55 { 56 const char *language = 57 uc_locale_languages_lookup (locale_name, p - locale_name); 58 if (language != NULL) 59 return language; 60 } 61 62 return ""; 63 }