1/* Look at first character in UTF-32 string. 2 Copyright (C) 2002, 2006-2007, 2009-2010 Free Software Foundation, Inc. 3 Written by Bruno Haible <bruno@clisp.org>, 2002. 4 5 This program is free software: you can redistribute it and/or modify it 6 under the terms of the GNU Lesser General Public License as published 7 by the Free Software Foundation; either version 3 of the License, or 8 (at your option) any later version. 9 10 This program 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 License 16 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 17 18#include <config.h> 19 20/* Specification. */ 21#include "unistr.h" 22 23int 24u32_strmbtouc (ucs4_t *puc, const uint32_t *s) 25{ 26 uint32_t c = *s; 27 28#if CONFIG_UNICODE_SAFETY 29 if (c < 0xd800 || (c >= 0xe000 && c < 0x110000)) 30#endif 31 { 32 *puc = c; 33 return (c != 0 ? 1 : 0); 34 } 35#if CONFIG_UNICODE_SAFETY 36 /* invalid multibyte character */ 37 return -1; 38#endif 39} 40