1 /*
2 *******************************************************************************
3 * Copyright (C) 2001-2011, International Business Machines
4 * Corporation and others. All Rights Reserved.
5 *******************************************************************************
6 * file name: bocsu.cpp
7 * encoding: US-ASCII
8 * tab size: 8 (not used)
9 * indentation:4
10 *
11 * Author: Markus W. Scherer
12 *
13 * Modification history:
14 * 05/18/2001 weiv Made into separate module
15 */
16
17
18 #include "unicode/utypes.h"
19
20 #if !UCONFIG_NO_COLLATION
21
22 #include "unicode/bytestream.h"
23 #include "unicode/utf16.h"
24 #include "bocsu.h"
25
26 /*
27 * encode one difference value -0x10ffff..+0x10ffff in 1..3 bytes,
28 * preserving lexical order
29 */
30 U_CFUNC uint8_t *
u_writeDiff(int32_t diff,uint8_t * p)31 u_writeDiff(int32_t diff, uint8_t *p) {
32 if(diff>=SLOPE_REACH_NEG_1) {
33 if(diff<=SLOPE_REACH_POS_1) {
34 *p++=(uint8_t)(SLOPE_MIDDLE+diff);
35 } else if(diff<=SLOPE_REACH_POS_2) {
36 *p++=(uint8_t)(SLOPE_START_POS_2+(diff/SLOPE_TAIL_COUNT));
37 *p++=(uint8_t)(SLOPE_MIN+diff%SLOPE_TAIL_COUNT);
38 } else if(diff<=SLOPE_REACH_POS_3) {
39 p[2]=(uint8_t)(SLOPE_MIN+diff%SLOPE_TAIL_COUNT);
40 diff/=SLOPE_TAIL_COUNT;
41 p[1]=(uint8_t)(SLOPE_MIN+diff%SLOPE_TAIL_COUNT);
42 *p=(uint8_t)(SLOPE_START_POS_3+(diff/SLOPE_TAIL_COUNT));
43 p+=3;
44 } else {
45 p[3]=(uint8_t)(SLOPE_MIN+diff%SLOPE_TAIL_COUNT);
46 diff/=SLOPE_TAIL_COUNT;
47 p[2]=(uint8_t)(SLOPE_MIN+diff%SLOPE_TAIL_COUNT);
48 diff/=SLOPE_TAIL_COUNT;
49 p[1]=(uint8_t)(SLOPE_MIN+diff%SLOPE_TAIL_COUNT);
50 *p=SLOPE_MAX;
51 p+=4;
52 }
53 } else {
54 int32_t m;
55
56 if(diff>=SLOPE_REACH_NEG_2) {
57 NEGDIVMOD(diff, SLOPE_TAIL_COUNT, m);
58 *p++=(uint8_t)(SLOPE_START_NEG_2+diff);
59 *p++=(uint8_t)(SLOPE_MIN+m);
60 } else if(diff>=SLOPE_REACH_NEG_3) {
61 NEGDIVMOD(diff, SLOPE_TAIL_COUNT, m);
62 p[2]=(uint8_t)(SLOPE_MIN+m);
63 NEGDIVMOD(diff, SLOPE_TAIL_COUNT, m);
64 p[1]=(uint8_t)(SLOPE_MIN+m);
65 *p=(uint8_t)(SLOPE_START_NEG_3+diff);
66 p+=3;
67 } else {
68 NEGDIVMOD(diff, SLOPE_TAIL_COUNT, m);
69 p[3]=(uint8_t)(SLOPE_MIN+m);
70 NEGDIVMOD(diff, SLOPE_TAIL_COUNT, m);
71 p[2]=(uint8_t)(SLOPE_MIN+m);
72 NEGDIVMOD(diff, SLOPE_TAIL_COUNT, m);
73 p[1]=(uint8_t)(SLOPE_MIN+m);
74 *p=SLOPE_MIN;
75 p+=4;
76 }
77 }
78 return p;
79 }
80
81 /*
82 * Encode the code points of a string as
83 * a sequence of byte-encoded differences (slope detection),
84 * preserving lexical order.
85 *
86 * Optimize the difference-taking for runs of Unicode text within
87 * small scripts:
88 *
89 * Most small scripts are allocated within aligned 128-blocks of Unicode
90 * code points. Lexical order is preserved if "prev" is always moved
91 * into the middle of such a block.
92 *
93 * Additionally, "prev" is moved from anywhere in the Unihan
94 * area into the middle of that area.
95 * Note that the identical-level run in a sort key is generated from
96 * NFD text - there are never Hangul characters included.
97 */
98 U_CFUNC void
u_writeIdenticalLevelRun(const UChar * s,int32_t length,icu::ByteSink & sink)99 u_writeIdenticalLevelRun(const UChar *s, int32_t length, icu::ByteSink &sink) {
100 char scratch[64];
101 int32_t capacity;
102
103 UChar32 prev=0;
104 int32_t i=0;
105 while(i<length) {
106 char *buffer=sink.GetAppendBuffer(1, length*2, scratch, (int32_t)sizeof(scratch), &capacity);
107 uint8_t *p;
108 // We must have capacity>=SLOPE_MAX_BYTES in case u_writeDiff() writes that much,
109 // but we do not want to force the sink.GetAppendBuffer() to allocate
110 // for a large min_capacity because we might actually only write one byte.
111 if(capacity<16) {
112 buffer=scratch;
113 capacity=(int32_t)sizeof(scratch);
114 }
115 p=reinterpret_cast<uint8_t *>(buffer);
116 uint8_t *lastSafe=p+capacity-SLOPE_MAX_BYTES;
117 while(i<length && p<=lastSafe) {
118 if(prev<0x4e00 || prev>=0xa000) {
119 prev=(prev&~0x7f)-SLOPE_REACH_NEG_1;
120 } else {
121 /*
122 * Unihan U+4e00..U+9fa5:
123 * double-bytes down from the upper end
124 */
125 prev=0x9fff-SLOPE_REACH_POS_2;
126 }
127
128 UChar32 c;
129 U16_NEXT(s, i, length, c);
130 p=u_writeDiff(c-prev, p);
131 prev=c;
132 }
133 sink.Append(buffer, (int32_t)(p-reinterpret_cast<uint8_t *>(buffer)));
134 }
135 }
136
137 U_CFUNC int32_t
u_writeIdenticalLevelRunTwoChars(UChar32 first,UChar32 second,uint8_t * p)138 u_writeIdenticalLevelRunTwoChars(UChar32 first, UChar32 second, uint8_t *p) {
139 uint8_t *p0 = p;
140 if(first<0x4e00 || first>=0xa000) {
141 first=(first&~0x7f)-SLOPE_REACH_NEG_1;
142 } else {
143 /*
144 * Unihan U+4e00..U+9fa5:
145 * double-bytes down from the upper end
146 */
147 first=0x9fff-SLOPE_REACH_POS_2;
148 }
149
150 p=u_writeDiff(second-first, p);
151 return (int32_t)(p-p0);
152 }
153
154 #endif /* #if !UCONFIG_NO_COLLATION */
155