Como se menciona en mi comentario anterior , no está muy claro lo que está tratando de hacer en su propio caso.
Bueno, sí. Puede reemplazar entidades de código de caracteres (por ejemplo, {
y ƫ
) con sus caracteres de reemplazo sin tener que buscar el código de carácter en un "mapping". Pero las entidades con nombre (por ejemplo, "
) siempre tendrá que buscarse.
Aquí está mi intento de resolver el caso general:
-
Cree una tabla para almacenar entidades de caracteres con nombre definidas en HTML:
CREATE TABLE ents ( ref VARCHAR(8) NOT NULL COLLATE utf8_bin, rep CHAR(1) NOT NULL, PRIMARY KEY (ref) );
-
Complete esta tabla; sugiero usar un script, por ejemplo, de PHP:
$dbh = new PDO("mysql:dbname=$dbname", $username, $password); $dbh->setAttribute(PDO::ATTR_EMULATE_PREPARES, FALSE); $ins = $dbh->prepare('INSERT INTO ents (ref, rep) VALUES (?, ?)'); $t = get_html_translation_table(HTML_ENTITIES); foreach ($t as $k => $v) $ins->execute([substr($v, 1, -1), $k]);
-
Defina una función SQL para realizar reemplazos de entidades (usando esta tabla cuando corresponda, o bien por código de carácter):
DELIMITER ;; CREATE FUNCTION dhe(s TEXT) RETURNS TEXT BEGIN DECLARE n, p, i, t INT DEFAULT 0; DECLARE r VARCHAR(12); entity_search: LOOP SET n := LOCATE('&', s, n+1); IF (!n) THEN LEAVE entity_search; END IF; IF (SUBSTRING(s, n+1, 1) = '#') THEN CASE WHEN SUBSTRING(s, n+2, 1) RLIKE '[[:digit:]]' THEN SET t := 2, p := n+2, r := '[[:digit:]]'; WHEN SUBSTRING(s, n+2, 1) = 'x' THEN SET t := 3, p := n+3, r := '[[:xdigit:]]'; ELSE ITERATE entity_search; END CASE; ELSE SET t := 1, p := n+1, r := '[[:alnum:]_]'; END IF; SET i := 0; reference: LOOP IF SUBSTRING(s, p+i, 1) NOT RLIKE r THEN IF SUBSTRING(s, p+i, 1) RLIKE '[[:alnum:]_]' THEN ITERATE entity_search; END IF; LEAVE reference; END IF; IF i = 8 THEN ITERATE entity_search; END IF; SET i := i + 1; END LOOP reference; SET s := CONCAT( LEFT(s, n-1), CASE t WHEN 1 THEN COALESCE( (SELECT rep FROM ents WHERE ref = SUBSTRING(s, p, i)) , SUBSTRING(s, n, i + IF(SUBSTRING(s, p+i, 1)=';',1,0)) ) WHEN 2 THEN CHAR(SUBSTRING(s, p, i)) WHEN 3 THEN CHAR(CONV(SUBSTRING(s, p, i), 16, 10)) END, SUBSTRING(s, p + i + IF(SUBSTRING(s, p+i, 1)=';',1,0)) ); END LOOP entity_search; RETURN s; END;; DELIMITER ;
-
Aplicar esta función dos veces para decodificar su (aparentemente) tabla doblemente codificada:
UPDATE my_table SET my_column = dhe(dhe(my_column));