178 lines
3.3 KiB
PHP
178 lines
3.3 KiB
PHP
<?php
|
|
|
|
/***************************************************************************\
|
|
* SPIP, Systeme de publication pour l'internet *
|
|
* *
|
|
* Copyright (c) 2001-2019 *
|
|
* Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
|
|
* *
|
|
* Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
|
|
* Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
|
|
\***************************************************************************/
|
|
|
|
/**
|
|
* Déclaration pour la translitteration complexe des correspondances entre
|
|
* caractères unicodes spécifiques et caractères simples la plage ASCII
|
|
*
|
|
* Ajoute des caractères supplémentaires à la déclaration de translitteration simple
|
|
*
|
|
* @package SPIP\Core\Charsets
|
|
**/
|
|
|
|
if (!defined('_ECRIRE_INC_VERSION')) {
|
|
return;
|
|
}
|
|
|
|
load_charset('translit');
|
|
$trans = $GLOBALS['CHARSET']['translit'];
|
|
|
|
$translit_c = array(
|
|
// vietnamien
|
|
225 => "a'",
|
|
224 => 'a`',
|
|
7843 => 'a?',
|
|
227 => 'a~',
|
|
7841 => 'a.',
|
|
226 => 'a^',
|
|
7845 => "a^'",
|
|
7847 => 'a^`',
|
|
7849 => 'a^?',
|
|
7851 => 'a^~',
|
|
7853 => 'a^.',
|
|
259 => 'a(',
|
|
7855 => "a('",
|
|
7857 => 'a(`',
|
|
7859 => 'a(?',
|
|
7861 => 'a(~',
|
|
7863 => 'a(.',
|
|
193 => "A'",
|
|
192 => 'A`',
|
|
7842 => 'A?',
|
|
195 => 'A~',
|
|
7840 => 'A.',
|
|
194 => 'A^',
|
|
7844 => "A^'",
|
|
7846 => 'A^`',
|
|
7848 => 'A^?',
|
|
7850 => 'A^~',
|
|
7852 => 'A^.',
|
|
258 => 'A(',
|
|
7854 => "A('",
|
|
7856 => 'A(`',
|
|
7858 => 'A(?',
|
|
7860 => 'A(~',
|
|
7862 => 'A(.',
|
|
233 => "e'",
|
|
232 => 'e`',
|
|
7867 => 'e?',
|
|
7869 => 'e~',
|
|
7865 => 'e.',
|
|
234 => 'e^',
|
|
7871 => "e^'",
|
|
7873 => 'e^`',
|
|
7875 => 'e^?',
|
|
7877 => 'e^~',
|
|
7879 => 'e^.',
|
|
201 => "E'",
|
|
200 => 'E`',
|
|
7866 => 'E?',
|
|
7868 => 'E~',
|
|
7864 => 'E.',
|
|
202 => 'E^',
|
|
7870 => "E^'",
|
|
7872 => 'E^`',
|
|
7874 => 'E^?',
|
|
7876 => 'E^~',
|
|
7878 => 'E^.',
|
|
237 => "i'",
|
|
236 => 'i`',
|
|
7881 => 'i?',
|
|
297 => 'i~',
|
|
7883 => 'i.',
|
|
205 => "I'",
|
|
204 => 'I`',
|
|
7880 => 'I?',
|
|
296 => 'I~',
|
|
7882 => 'I.',
|
|
243 => "o'",
|
|
242 => 'o`',
|
|
7887 => 'o?',
|
|
245 => 'o~',
|
|
7885 => 'o.',
|
|
244 => 'o^',
|
|
7889 => "o^'",
|
|
7891 => 'o^`',
|
|
7893 => 'o^?',
|
|
7895 => 'o^~',
|
|
7897 => 'o^.',
|
|
417 => 'o+',
|
|
7899 => "o+'",
|
|
7901 => 'o+`',
|
|
7903 => 'o+?',
|
|
7905 => 'o+~',
|
|
7907 => 'o+.',
|
|
211 => "O'",
|
|
210 => 'O`',
|
|
7886 => 'O?',
|
|
213 => 'O~',
|
|
7884 => 'O.',
|
|
212 => 'O^',
|
|
7888 => "O^'",
|
|
7890 => 'O^`',
|
|
7892 => 'O^?',
|
|
7894 => 'O^~',
|
|
7896 => 'O^.',
|
|
416 => 'O+',
|
|
7898 => "O+'",
|
|
7900 => 'O+`',
|
|
7902 => 'O+?',
|
|
7904 => 'O+~',
|
|
7906 => 'O+.',
|
|
250 => "u'",
|
|
249 => 'u`',
|
|
7911 => 'u?',
|
|
361 => 'u~',
|
|
7909 => 'u.',
|
|
432 => 'u+',
|
|
7913 => "u+'",
|
|
7915 => 'u+`',
|
|
7917 => 'u+?',
|
|
7919 => 'u+~',
|
|
7921 => 'u+.',
|
|
218 => "U'",
|
|
217 => 'U`',
|
|
7910 => 'U?',
|
|
360 => 'U~',
|
|
7908 => 'U.',
|
|
431 => 'U+',
|
|
7912 => "U+'",
|
|
7914 => 'U+`',
|
|
7916 => 'U+?',
|
|
7918 => 'U+~',
|
|
7920 => 'U+.',
|
|
253 => "y'",
|
|
7923 => 'y`',
|
|
7927 => 'y?',
|
|
7929 => 'y~',
|
|
7925 => 'y.',
|
|
221 => "Y'",
|
|
7922 => 'Y`',
|
|
7926 => 'Y?',
|
|
7928 => 'Y~',
|
|
7924 => 'Y.',
|
|
273 => 'd-',
|
|
208 => 'D-',
|
|
|
|
// allemand
|
|
228 => 'ae',
|
|
246 => 'oe',
|
|
252 => 'ue',
|
|
196 => 'Ae',
|
|
214 => 'Oe',
|
|
220 => 'Ue'
|
|
);
|
|
|
|
foreach ($translit_c as $u => $t) {
|
|
$trans[$u] = $t;
|
|
}
|
|
$GLOBALS['CHARSET']['translitcomplexe'] = $trans;
|