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 (at) alum.mit.edu> 8 * 9 * Licensed under the Academic Free License version 2.0 10 * Or under the following terms: 11 * 12 * This library is free software; you can redistribute it and/or 13 * modify it under the terms of the GNU Lesser General Public 14 * License as published by the Free Software Foundation; either 15 * version 2 of the License, or (at your option) any later version. 16 * 17 * This library is distributed in the hope that it will be useful, 18 * but WITHOUT ANY WARRANTY; without even the implied warranty of 19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 20 * Lesser General Public License for more details. 21 * 22 * You should have received a copy of the GNU Lesser General Public 23 * License along with this library; if not, write to the 24 * Free Software Foundation, Inc., 59 Temple Place - Suite 330, 25 * Boston, MA 02111-1307, USA. 26 */ 27 28 #ifdef HAVE_CONFIG_H 29 #include "config.h" 30 #endif 31 32 #include "xdgmimeint.h" 33 #include <ctype.h> 34 #include <string.h> 35 36 #ifndef FALSE 37 #define FALSE (0) 38 #endif 39 40 #ifndef TRUE 41 #define TRUE (!FALSE) 42 #endif 43 44 static const char _xdg_utf8_skip_data[256] = { 45 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, 46 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, 47 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, 48 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, 49 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, 50 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, 51 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, 52 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 53 }; 54 55 const char * const _xdg_utf8_skip = _xdg_utf8_skip_data; 56 57 58 59 /* Returns the number of unprocessed characters. */ 60 xdg_unichar_t 61 _xdg_utf8_to_ucs4(const char *source) 62 { 63 xdg_unichar_t ucs32; 64 if( ! ( *source & 0x80 ) ) 65 { 66 ucs32 = *source; 67 } 68 else 69 { 70 int bytelength = 0; 71 xdg_unichar_t result; 72 if ( ! (*source & 0x40) ) 73 { 74 ucs32 = *source; 75 } 76 else 77 { 78 if ( ! (*source & 0x20) ) 79 { 80 result = *source++ & 0x1F; 81 bytelength = 2; 82 } 83 else if ( ! (*source & 0x10) ) 84 { 85 result = *source++ & 0x0F; 86 bytelength = 3; 87 } 88 else if ( ! (*source & 0x08) ) 89 { 90 result = *source++ & 0x07; 91 bytelength = 4; 92 } 93 else if ( ! (*source & 0x04) ) 94 { 95 result = *source++ & 0x03; 96 bytelength = 5; 97 } 98 else if ( ! (*source & 0x02) ) 99 { 100 result = *source++ & 0x01; 101 bytelength = 6; 102 } 103 else 104 { 105 result = *source++; 106 bytelength = 1; 107 } 108 109 for ( bytelength --; bytelength > 0; bytelength -- ) 110 { 111 result <<= 6; 112 result |= *source++ & 0x3F; 113 } 114 ucs32 = result; 115 } 116 } 117 return ucs32; 118 } 119 120 121 /* hullo. this is great code. don't rewrite it */ 122 123 xdg_unichar_t 124 _xdg_ucs4_to_lower (xdg_unichar_t source) 125 { 126 /* FIXME: Do a real to_upper sometime */ 127 /* CaseFolding-3.2.0.txt has a table of rules. */ 128 if ((source & 0xFF) == source) 129 return (xdg_unichar_t) tolower ((unsigned char) source); 130 return source; 131 } 132 133 int 134 _xdg_utf8_validate (const char *source) 135 { 136 /* FIXME: actually write */ 137 return TRUE; 138 } 139 140 const char * 141 _xdg_get_base_name (const char *file_name) 142 { 143 const char *base_name; 144 145 if (file_name == NULL) 146 return NULL; 147 148 base_name = strrchr (file_name, '/'); 149 150 if (base_name == NULL) 151 return file_name; 152 else 153 return base_name + 1; 154 } 155 156 xdg_unichar_t * 157 _xdg_convert_to_ucs4 (const char *source, int *len) 158 { 159 xdg_unichar_t *out; 160 int i; 161 const char *p; 162 163 out = malloc (sizeof (xdg_unichar_t) * (strlen (source) + 1)); 164 165 p = source; 166 i = 0; 167 while (*p) 168 { 169 out[i++] = _xdg_utf8_to_ucs4 (p); 170 p = _xdg_utf8_next_char (p); 171 } 172 out[i] = 0; 173 *len = i; 174 175 return out; 176 } 177 178 void 179 _xdg_reverse_ucs4 (xdg_unichar_t *source, int len) 180 { 181 xdg_unichar_t c; 182 int i; 183 184 for (i = 0; i < len - i - 1; i++) 185 { 186 c = source[i]; 187 source[i] = source[len - i - 1]; 188 source[len - i - 1] = c; 189 } 190 } 191 192
