[SPIP][PLUGINS] v3.0-->v3.2
[lhc/web/www.git] / www / ecrire / charsets / translitcomplexe.php
1 <?php
2
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
5 * *
6 * Copyright (c) 2001-2017 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
8 * *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
12
13 /**
14 * Déclaration pour la translitteration complexe des correspondances entre
15 * caractères unicodes spécifiques et caractères simples la plage ASCII
16 *
17 * Ajoute des caractères supplémentaires à la déclaration de translitteration simple
18 *
19 * @package SPIP\Core\Charsets
20 **/
21
22 if (!defined('_ECRIRE_INC_VERSION')) {
23 return;
24 }
25
26 load_charset('translit');
27 $trans = $GLOBALS['CHARSET']['translit'];
28
29 $translit_c = array(
30 // vietnamien
31 225 => "a'",
32 224 => 'a`',
33 7843 => 'a?',
34 227 => 'a~',
35 7841 => 'a.',
36 226 => 'a^',
37 7845 => "a^'",
38 7847 => 'a^`',
39 7849 => 'a^?',
40 7851 => 'a^~',
41 7853 => 'a^.',
42 259 => 'a(',
43 7855 => "a('",
44 7857 => 'a(`',
45 7859 => 'a(?',
46 7861 => 'a(~',
47 7863 => 'a(.',
48 193 => "A'",
49 192 => 'A`',
50 7842 => 'A?',
51 195 => 'A~',
52 7840 => 'A.',
53 194 => 'A^',
54 7844 => "A^'",
55 7846 => 'A^`',
56 7848 => 'A^?',
57 7850 => 'A^~',
58 7852 => 'A^.',
59 258 => 'A(',
60 7854 => "A('",
61 7856 => 'A(`',
62 7858 => 'A(?',
63 7860 => 'A(~',
64 7862 => 'A(.',
65 233 => "e'",
66 232 => 'e`',
67 7867 => 'e?',
68 7869 => 'e~',
69 7865 => 'e.',
70 234 => 'e^',
71 7871 => "e^'",
72 7873 => 'e^`',
73 7875 => 'e^?',
74 7877 => 'e^~',
75 7879 => 'e^.',
76 201 => "E'",
77 200 => 'E`',
78 7866 => 'E?',
79 7868 => 'E~',
80 7864 => 'E.',
81 202 => 'E^',
82 7870 => "E^'",
83 7872 => 'E^`',
84 7874 => 'E^?',
85 7876 => 'E^~',
86 7878 => 'E^.',
87 237 => "i'",
88 236 => 'i`',
89 7881 => 'i?',
90 297 => 'i~',
91 7883 => 'i.',
92 205 => "I'",
93 204 => 'I`',
94 7880 => 'I?',
95 296 => 'I~',
96 7882 => 'I.',
97 243 => "o'",
98 242 => 'o`',
99 7887 => 'o?',
100 245 => 'o~',
101 7885 => 'o.',
102 244 => 'o^',
103 7889 => "o^'",
104 7891 => 'o^`',
105 7893 => 'o^?',
106 7895 => 'o^~',
107 7897 => 'o^.',
108 417 => 'o+',
109 7899 => "o+'",
110 7901 => 'o+`',
111 7903 => 'o+?',
112 7905 => 'o+~',
113 7907 => 'o+.',
114 211 => "O'",
115 210 => 'O`',
116 7886 => 'O?',
117 213 => 'O~',
118 7884 => 'O.',
119 212 => 'O^',
120 7888 => "O^'",
121 7890 => 'O^`',
122 7892 => 'O^?',
123 7894 => 'O^~',
124 7896 => 'O^.',
125 416 => 'O+',
126 7898 => "O+'",
127 7900 => 'O+`',
128 7902 => 'O+?',
129 7904 => 'O+~',
130 7906 => 'O+.',
131 250 => "u'",
132 249 => 'u`',
133 7911 => 'u?',
134 361 => 'u~',
135 7909 => 'u.',
136 432 => 'u+',
137 7913 => "u+'",
138 7915 => 'u+`',
139 7917 => 'u+?',
140 7919 => 'u+~',
141 7921 => 'u+.',
142 218 => "U'",
143 217 => 'U`',
144 7910 => 'U?',
145 360 => 'U~',
146 7908 => 'U.',
147 431 => 'U+',
148 7912 => "U+'",
149 7914 => 'U+`',
150 7916 => 'U+?',
151 7918 => 'U+~',
152 7920 => 'U+.',
153 253 => "y'",
154 7923 => 'y`',
155 7927 => 'y?',
156 7929 => 'y~',
157 7925 => 'y.',
158 221 => "Y'",
159 7922 => 'Y`',
160 7926 => 'Y?',
161 7928 => 'Y~',
162 7924 => 'Y.',
163 273 => 'd-',
164 208 => 'D-',
165
166 // allemand
167 228 => 'ae',
168 246 => 'oe',
169 252 => 'ue',
170 196 => 'Ae',
171 214 => 'Oe',
172 220 => 'Ue'
173 );
174
175 foreach ($translit_c as $u => $t) {
176 $trans[$u] = $t;
177 }
178 $GLOBALS['CHARSET']['translitcomplexe'] = $trans;