1 /* -*- mode: C; c-file-style: "gnu" -*- */
2 /* xdgmimeint.c: Internal defines and functions.
3 *
4 * More info can be found at http://www.freedesktop.org/standards/
5 *
6 * Copyright (C) 2003 Red Hat, Inc.
7 * Copyright (C) 2003 Jonathan Blandford <jrb@alum.mit.edu>
8 *
9 * SPDX-License-Identifier: LGPL-2.1-or-later or AFL-2.0
10 */
11
12 #ifdef HAVE_CONFIG_H
13 #include <config.h>
14 #endif
15
16 #include "xdgmimeint.h"
17 #include <ctype.h>
18 #include <string.h>
19
20 #ifndef FALSE
21 #define FALSE (0)
22 #endif
23
24 #ifndef TRUE
25 #define TRUE (!FALSE)
26 #endif
27
28 static const char _xdg_utf8_skip_data[256] = {
29 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
30 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
31 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
32 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
33 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
34 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
35 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
36 3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,5,5,5,5,6,6,1,1
37 };
38
39 const char * const _xdg_utf8_skip = _xdg_utf8_skip_data;
40
41
42
43 /* Returns the number of unprocessed characters. */
44 xdg_unichar_t
45 _xdg_utf8_to_ucs4(const char *source)
46 {
47 xdg_unichar_t ucs32;
48 if( ! ( *source & 0x80 ) )
49 {
50 ucs32 = *source;
51 }
52 else
53 {
54 int bytelength = 0;
55 xdg_unichar_t result;
56 if ( ! (*source & 0x40) )
57 {
58 ucs32 = *source;
59 }
60 else
61 {
62 if ( ! (*source & 0x20) )
63 {
64 result = *source++ & 0x1F;
65 bytelength = 2;
66 }
67 else if ( ! (*source & 0x10) )
68 {
69 result = *source++ & 0x0F;
70 bytelength = 3;
71 }
72 else if ( ! (*source & 0x08) )
73 {
74 result = *source++ & 0x07;
75 bytelength = 4;
76 }
77 else if ( ! (*source & 0x04) )
78 {
79 result = *source++ & 0x03;
80 bytelength = 5;
81 }
82 else if ( ! (*source & 0x02) )
83 {
84 result = *source++ & 0x01;
85 bytelength = 6;
86 }
87 else
88 {
89 result = *source++;
90 bytelength = 1;
91 }
92
93 for ( bytelength --; bytelength > 0; bytelength -- )
94 {
95 result <<= 6;
96 result |= *source++ & 0x3F;
97 }
98 ucs32 = result;
99 }
100 }
101 return ucs32;
102 }
103
104
105 /* hullo. this is great code. don't rewrite it */
106
107 xdg_unichar_t
108 _xdg_ucs4_to_lower (xdg_unichar_t source)
109 {
110 /* FIXME: Do a real to_upper sometime */
111 /* CaseFolding-3.2.0.txt has a table of rules. */
112 if ((source & 0xFF) == source)
113 return (xdg_unichar_t) tolower ((unsigned char) source);
114 return source;
115 }
116
117 int
118 _xdg_utf8_validate (const char *source __attribute__((unused)))
119 {
120 /* FIXME: actually write */
121 return TRUE;
122 }
123
124 const char *
125 _xdg_get_base_name (const char *file_name)
126 {
127 const char *base_name;
128
129 if (file_name == NULL)
130 return NULL;
131
132 base_name = strrchr (file_name, '/');
133
134 if (base_name == NULL)
135 return file_name;
136 else
137 return base_name + 1;
138 }
139
140 xdg_unichar_t *
141 _xdg_convert_to_ucs4 (const char *source, int *len)
142 {
143 xdg_unichar_t *out;
144 int i;
145 const char *p;
146
147 out = malloc (sizeof (xdg_unichar_t) * (strlen (source) + 1));
148
149 p = source;
150 i = 0;
151 while (*p)
152 {
153 out[i++] = _xdg_utf8_to_ucs4 (p);
154 p = _xdg_utf8_next_char (p);
155 }
156 out[i] = 0;
157 *len = i;
158
159 return out;
160 }
161
162 void
163 _xdg_reverse_ucs4 (xdg_unichar_t *source, int len)
164 {
165 xdg_unichar_t c;
166 int i;
167
168 for (i = 0; i < len - i - 1; i++)
169 {
170 c = source[i];
171 source[i] = source[len - i - 1];
172 source[len - i - 1] = c;
173 }
174 }
175
176 const char *
177 _xdg_binary_or_text_fallback(const void *data, size_t len)
178 {
179 unsigned char *chardata;
180 size_t i;
181
182 chardata = (unsigned char *) data;
183 for (i = 0; i < 128 && i < len; ++i)
184 {
185 if (chardata[i] < 32 && chardata[i] != 9 && chardata[i] != 10 && chardata[i] != 13)
186 return XDG_MIME_TYPE_UNKNOWN; /* binary data */
187 }
188
189 return XDG_MIME_TYPE_TEXTPLAIN;
190 }