1/* Copyright (C) 2000-2016 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Bruno Haible <haible@clisp.cons.org>, 2000.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library 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
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
18
19#include <stdint.h>
20
21/* Lookup in a table of int32_t, with default value 0. */
22int32_t
23internal_function
24__collidx_table_lookup (const char *table, uint32_t wc)
25{
26 uint32_t shift1 = ((const uint32_t *) table)[0];
27 uint32_t index1 = wc >> shift1;
28 uint32_t bound = ((const uint32_t *) table)[1];
29 if (index1 < bound)
30 {
31 uint32_t lookup1 = ((const uint32_t *) table)[5 + index1];
32 if (lookup1 != 0)
33 {
34 uint32_t shift2 = ((const uint32_t *) table)[2];
35 uint32_t mask2 = ((const uint32_t *) table)[3];
36 uint32_t index2 = (wc >> shift2) & mask2;
37 uint32_t lookup2 = ((const uint32_t *)(table + lookup1))[index2];
38 if (lookup2 != 0)
39 {
40 uint32_t mask3 = ((const uint32_t *) table)[4];
41 uint32_t index3 = wc & mask3;
42 int32_t lookup3 = ((const int32_t *)(table + lookup2))[index3];
43
44 return lookup3;
45 }
46 }
47 }
48 return 0;
49}
50
51
52/* Lookup in a table of uint32_t, with default value 0xffffffff. */
53uint32_t
54internal_function
55__collseq_table_lookup (const char *table, uint32_t wc)
56{
57 uint32_t shift1 = ((const uint32_t *) table)[0];
58 uint32_t index1 = wc >> shift1;
59 uint32_t bound = ((const uint32_t *) table)[1];
60 if (index1 < bound)
61 {
62 uint32_t lookup1 = ((const uint32_t *) table)[5 + index1];
63 if (lookup1 != 0)
64 {
65 uint32_t shift2 = ((const uint32_t *) table)[2];
66 uint32_t mask2 = ((const uint32_t *) table)[3];
67 uint32_t index2 = (wc >> shift2) & mask2;
68 uint32_t lookup2 = ((const uint32_t *)(table + lookup1))[index2];
69 if (lookup2 != 0)
70 {
71 uint32_t mask3 = ((const uint32_t *) table)[4];
72 uint32_t index3 = wc & mask3;
73 uint32_t lookup3 = ((const uint32_t *)(table + lookup2))[index3];
74
75 return lookup3;
76 }
77 }
78 }
79 return ~((uint32_t) 0);
80}
81