1 /* Scripts of Unicode characters.
2    Copyright (C) 2007, 2009-2021 Free Software Foundation, Inc.
3    Written by Bruno Haible <bruno@clisp.org>, 2007.
4 
5    This file is free software: you can redistribute it and/or modify
6    it under the terms of the GNU Lesser General Public License as
7    published by the Free Software Foundation; either version 2.1 of the
8    License, or (at your option) any later version.
9 
10    This file 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
13    GNU Lesser General Public License for more details.
14 
15    You should have received a copy of the GNU Lesser General Public License
16    along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
17 
18 #include <config.h>
19 
20 /* Specification.  */
21 #include "unictype.h"
22 
23 #include <string.h>
24 
25 #include "scripts.h"
26 #include "unictype/scripts_byname.h"
27 
28 const uc_script_t *
uc_script(ucs4_t uc)29 uc_script (ucs4_t uc)
30 {
31   unsigned int index1 = uc >> script_header_0;
32   if (index1 < script_header_1)
33     {
34       int lookup1 = u_script.level1[index1];
35       if (lookup1 >= 0)
36         {
37           unsigned int index2 = (uc >> script_header_2) & script_header_3;
38           int lookup2 = u_script.level2[lookup1 + index2];
39           if (lookup2 >= 0)
40             {
41               unsigned int index3 = (uc & script_header_4);
42               unsigned char lookup3 = u_script.level3[lookup2 + index3];
43 
44               if (lookup3 != 0xff)
45                 return &scripts[lookup3];
46             }
47         }
48     }
49   return NULL;
50 }
51 
52 const uc_script_t *
uc_script_byname(const char * script_name)53 uc_script_byname (const char *script_name)
54 {
55   const struct named_script *found;
56 
57   found = uc_script_lookup (script_name, strlen (script_name));
58   if (found != NULL)
59     return &scripts[found->index];
60   else
61     return NULL;
62 }
63 
64 bool
uc_is_script(ucs4_t uc,const uc_script_t * script)65 uc_is_script (ucs4_t uc, const uc_script_t *script)
66 {
67   return uc_script (uc) == script;
68 }
69 
70 void
uc_all_scripts(const uc_script_t ** scriptsp,size_t * countp)71 uc_all_scripts (const uc_script_t **scriptsp, size_t *countp)
72 {
73   *scriptsp = scripts;
74   *countp = sizeof (scripts) / sizeof (scripts[0]);
75 }
76