Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
 
3
/**
4
 * Validates the HTML attribute lang, effectively a language code.
5
 * @note Built according to RFC 3066, which obsoleted RFC 1766
6
 */
7
class HTMLPurifier_AttrDef_Lang extends HTMLPurifier_AttrDef
8
{
9
 
10
    /**
11
     * @param string $string
12
     * @param HTMLPurifier_Config $config
13
     * @param HTMLPurifier_Context $context
14
     * @return bool|string
15
     */
16
    public function validate($string, $config, $context)
17
    {
18
        $string = trim($string);
19
        if (!$string) {
20
            return false;
21
        }
22
 
23
        $subtags = explode('-', $string);
24
        $num_subtags = count($subtags);
25
 
26
        if ($num_subtags == 0) { // sanity check
27
            return false;
28
        }
29
 
30
        // process primary subtag : $subtags[0]
31
        $length = strlen($subtags[0]);
32
        switch ($length) {
33
            case 0:
34
                return false;
35
            case 1:
36
                if (!($subtags[0] == 'x' || $subtags[0] == 'i')) {
37
                    return false;
38
                }
39
                break;
40
            case 2:
41
            case 3:
42
                if (!ctype_alpha($subtags[0])) {
43
                    return false;
44
                } elseif (!ctype_lower($subtags[0])) {
45
                    $subtags[0] = strtolower($subtags[0]);
46
                }
47
                break;
48
            default:
49
                return false;
50
        }
51
 
52
        $new_string = $subtags[0];
53
        if ($num_subtags == 1) {
54
            return $new_string;
55
        }
56
 
57
        // process second subtag : $subtags[1]
58
        $length = strlen($subtags[1]);
59
        if ($length == 0 || ($length == 1 && $subtags[1] != 'x') || $length > 8 || !ctype_alnum($subtags[1])) {
60
            return $new_string;
61
        }
62
        if (!ctype_lower($subtags[1])) {
63
            $subtags[1] = strtolower($subtags[1]);
64
        }
65
 
66
        $new_string .= '-' . $subtags[1];
67
        if ($num_subtags == 2) {
68
            return $new_string;
69
        }
70
 
71
        // process all other subtags, index 2 and up
72
        for ($i = 2; $i < $num_subtags; $i++) {
73
            $length = strlen($subtags[$i]);
74
            if ($length == 0 || $length > 8 || !ctype_alnum($subtags[$i])) {
75
                return $new_string;
76
            }
77
            if (!ctype_lower($subtags[$i])) {
78
                $subtags[$i] = strtolower($subtags[$i]);
79
            }
80
            $new_string .= '-' . $subtags[$i];
81
        }
82
        return $new_string;
83
    }
84
}
85
 
86
// vim: et sw=4 sts=4