|
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 */ |