12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394 |
- /*************************************************
- * Perl-Compatible Regular Expressions *
- *************************************************/
- /* PCRE is a library of functions to support regular expressions whose syntax
- and semantics are as close as possible to those of the Perl 5 language.
- Written by Philip Hazel
- Copyright (c) 1997-2012 University of Cambridge
- -----------------------------------------------------------------------------
- Redistribution and use in source and binary forms, with or without
- modification, are permitted provided that the following conditions are met:
- * Redistributions of source code must retain the above copyright notice,
- this list of conditions and the following disclaimer.
- * Redistributions in binary form must reproduce the above copyright
- notice, this list of conditions and the following disclaimer in the
- documentation and/or other materials provided with the distribution.
- * Neither the name of the University of Cambridge nor the names of its
- contributors may be used to endorse or promote products derived from
- this software without specific prior written permission.
- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- POSSIBILITY OF SUCH DAMAGE.
- -----------------------------------------------------------------------------
- */
- /* This file contains a private PCRE function that converts an ordinal
- character value into a UTF8 string. */
- #ifdef HAVE_CONFIG_H
- #include "pcre_config.h"
- #endif
- #define COMPILE_PCRE8
- #include "pcre_internal.h"
- /*************************************************
- * Convert character value to UTF-8 *
- *************************************************/
- /* This function takes an integer value in the range 0 - 0x10ffff
- and encodes it as a UTF-8 character in 1 to 4 pcre_uchars.
- Arguments:
- cvalue the character value
- buffer pointer to buffer for result - at least 6 pcre_uchars long
- Returns: number of characters placed in the buffer
- */
- unsigned
- int
- PRIV(ord2utf)(pcre_uint32 cvalue, pcre_uchar *buffer)
- {
- #ifdef SUPPORT_UTF
- register int i, j;
- for (i = 0; i < PRIV(utf8_table1_size); i++)
- if ((int)cvalue <= PRIV(utf8_table1)[i]) break;
- buffer += i;
- for (j = i; j > 0; j--)
- {
- *buffer-- = 0x80 | (cvalue & 0x3f);
- cvalue >>= 6;
- }
- *buffer = PRIV(utf8_table2)[i] | cvalue;
- return i + 1;
- #else
- (void)(cvalue); /* Keep compiler happy; this function won't ever be */
- (void)(buffer); /* called when SUPPORT_UTF is not defined. */
- return 0;
- #endif
- }
- /* End of pcre_ord2utf8.c */
|