alecpl
2008-04-29 6ee5ed253b92593ac5784300ac425f34f7fd1728
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
<?php
function mod_b64_decode($data){
    return base64_decode(str_replace(",","/",$data));
}
 
function mod_b64_encode($data){
    return str_replace("/",",",str_replace("=","",base64_encode($data)));
}
 
 
function utf8_to_html($str){
    $len = strlen($str);
    $out = "";
    for($i=0;$i<$len;$i+=2){
        $val = ord($str[$i]);
        $next_val = ord($str[$i+1]);
        if ($val<255){
            $out.="&#".($val*256+$next_val).";";
        }else{
            $out.=$str[$i].$str[$i+1];
        }
    }
    return $out;
}
 
function iil_utf7_decode($str, $raw=false){
    if (strpos($str, '&')===false) return $str;
    
    $len = strlen($str);
    $in_b64 = false;
    $b64_data = "";
    $out = "";
    for ($i=0;$i<$len;$i++){
        $char = $str[$i];
        if ($char=='&') $in_b64 = true;
        else if ($in_b64 && $char=='-'){
            $in_b64 = false;
            if ($b64_data=="") $out.="&";
            else{
                $dec=mod_b64_decode($b64_data);
                $out.=($raw?$dec:utf8_to_html($dec));
                $b64_data = "";
            }
        }else if ($in_b64) $b64_data.=$char;
        else $out.=$char;
    }
    return $out;
}
 
function iil_utf7_encode($str){
    if (!ereg("[\200-\237]",$str) && !ereg("[\241-\377]",$str))
        return $str;
 
    $len = strlen($str);
 
    for ($i=0;$i<$len;$i++){
        $val = ord($str[$i]);
        if ($val>=224 && $val<=239){
            $unicode = ($val-224) * 4096 + (ord($str[$i+1])-128) * 64 + (ord($str[$i+2])-128);
            $i+=2;
            $utf_code.=chr((int)($unicode/256)).chr($unicode%256);
        }else if ($val>=192 && $val<=223){
            $unicode = ($val-192) * 64 + (ord($str[$i+1])-128);
            $i++;
            $utf_code.=chr((int)($unicode/256)).chr($unicode%256);
        }else{
            if ($utf_code){
                $out.='&'.mod_b64_encode($utf_code).'-';
                $utf_code="";
            }
            if ($str[$i]=="-") $out.="&";
            $out.=$str[$i];
        }
    }
    if ($utf_code)
        $out.='&'.mod_b64_encode($utf_code).'-';
    return $out;
}
 
 
?>