Tristan Matthews | 0461646 | 2013-11-14 16:09:34 -0500 | [diff] [blame] | 1 | /************************************************* |
| 2 | * Perl-Compatible Regular Expressions * |
| 3 | *************************************************/ |
| 4 | |
| 5 | /* PCRE is a library of functions to support regular expressions whose syntax |
| 6 | and semantics are as close as possible to those of the Perl 5 language. |
| 7 | |
| 8 | Written by Philip Hazel |
| 9 | Copyright (c) 1997-2008 University of Cambridge |
| 10 | |
| 11 | ----------------------------------------------------------------------------- |
| 12 | Redistribution and use in source and binary forms, with or without |
| 13 | modification, are permitted provided that the following conditions are met: |
| 14 | |
| 15 | * Redistributions of source code must retain the above copyright notice, |
| 16 | this list of conditions and the following disclaimer. |
| 17 | |
| 18 | * Redistributions in binary form must reproduce the above copyright |
| 19 | notice, this list of conditions and the following disclaimer in the |
| 20 | documentation and/or other materials provided with the distribution. |
| 21 | |
| 22 | * Neither the name of the University of Cambridge nor the names of its |
| 23 | contributors may be used to endorse or promote products derived from |
| 24 | this software without specific prior written permission. |
| 25 | |
| 26 | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |
| 27 | AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| 28 | IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
| 29 | ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE |
| 30 | LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
| 31 | CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
| 32 | SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
| 33 | INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
| 34 | CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
| 35 | ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
| 36 | POSSIBILITY OF SUCH DAMAGE. |
| 37 | ----------------------------------------------------------------------------- |
| 38 | */ |
| 39 | |
| 40 | |
| 41 | /* This file contains a private PCRE function that converts an ordinal |
| 42 | character value into a UTF8 string. */ |
| 43 | |
| 44 | #ifdef HAVE_CONFIG_H |
| 45 | #include "config.h" |
| 46 | #endif |
| 47 | |
| 48 | #include "pcre_internal.h" |
| 49 | |
| 50 | |
| 51 | /************************************************* |
| 52 | * Convert character value to UTF-8 * |
| 53 | *************************************************/ |
| 54 | |
| 55 | /* This function takes an integer value in the range 0 - 0x7fffffff |
| 56 | and encodes it as a UTF-8 character in 0 to 6 bytes. |
| 57 | |
| 58 | Arguments: |
| 59 | cvalue the character value |
| 60 | buffer pointer to buffer for result - at least 6 bytes long |
| 61 | |
| 62 | Returns: number of characters placed in the buffer |
| 63 | */ |
| 64 | |
| 65 | int |
| 66 | _pcre_ord2utf8(int cvalue, uschar *buffer) |
| 67 | { |
| 68 | #ifdef SUPPORT_UTF8 |
| 69 | register int i, j; |
| 70 | for (i = 0; i < _pcre_utf8_table1_size; i++) |
| 71 | if (cvalue <= _pcre_utf8_table1[i]) break; |
| 72 | buffer += i; |
| 73 | for (j = i; j > 0; j--) |
| 74 | { |
| 75 | *buffer-- = 0x80 | (cvalue & 0x3f); |
| 76 | cvalue >>= 6; |
| 77 | } |
| 78 | *buffer = _pcre_utf8_table2[i] | cvalue; |
| 79 | return i + 1; |
| 80 | #else |
| 81 | (void)(cvalue); /* Keep compiler happy; this function won't ever be */ |
| 82 | (void)(buffer); /* called when SUPPORT_UTF8 is not defined. */ |
| 83 | return 0; |
| 84 | #endif |
| 85 | } |
| 86 | |
| 87 | /* End of pcre_ord2utf8.c */ |