简短的回答:
只需删除或注释掉下面的行,无论真正使用哪种数据库编码( , 等),它都将始终utf8
有效latin1
:
$pdo->exec('SET CHARACTER SET utf8');
长答案:
这不是 PDO 错误,这是 MySQL 错误。
当实际数据库编码为latin1
时,但您使用:
SET CHARACTER SET utf8
(反之亦然:实际是utf8
,但你使用latin1
- 重要的部分是它是不同的),然后,据我所知,MySQL 将尝试对客户端和服务器之间的所有流量执行字符集转换(即使是BLOB
!)。
如果您不使用SET CHARACTER SET
语句,从我看到的脚本(PHP/PDO 或 Perl/DBI)连接字符集默认设置为数据库字符集,在这种情况下不会发生隐式转换。
显然,这种自动转换会杀死不希望发生任何转换的 BLOB。
我已经在 PHP/PDO 和 Perl/DBI 上对此进行了测试,并且问题很容易重现:如果使用带latin1
编码和使用的数据库SET CHARACTER SET utf8
(反之亦然),两者都会失败。
如果您想完全UTF8
兼容,您应该使用以下方法更改数据库的编码:
ALTER DATABASE mydb CHARSET utf8;
有了这个,一切都将使用UTF8
,并且 BLOB 也将正常工作。
导致此损坏问题的最小文件是blob.bin
单字节0xFF
。在 Linux 上,您可以使用以下printf
命令创建此测试文件:
printf "0xFF" > blob.bin
现在,测试重现问题的脚本:
PHP测试代码:
<?php
$dbh = new PDO("mysql:host=127.0.0.1;dbname=test");
# If database encoding is NOT utf8, uncomment to break it:
# $dbh->exec("SET CHARACTER SET utf8");
$blob1 = file_get_contents("blob.bin");
$sth = $dbh->prepare(
"INSERT INTO pdo_blob (the_blob) VALUES(:the_blob)"
);
$sth->bindParam(":the_blob", $blob1, PDO::PARAM_LOB);
$sth->execute();
$sth = $dbh->prepare(
"SELECT the_blob FROM pdo_blob ORDER BY id DESC LIMIT 1"
);
$sth->execute();
$blob2 = null;
$sth->bindColumn(1, $blob2, PDO::PARAM_LOB);
$sth->fetch();
if ($blob1 == $blob2) {
echo "Equal\n";
} else {
echo "Not equal\n";
$arr1 = str_split($blob1);
$arr2 = str_split($blob2);
$i=0;
for ($i=0; $i<count($arr1); $i++) {
if ($arr1[$i] != $arr2[$i]) {
echo "First diff: " . dechex(ord($arr1[$i])) . " != "
. dechex(ord($arr2[$i])) . "\n";
break;
}
}
}
?>
Perl 测试代码:
#!/usr/bin/perl -w
use strict;
use DBI qw(:sql_types);
my $dbh = DBI->connect("dbi:mysql:host=127.0.0.1;dbname=test");
# If database encoding is NOT utf8, uncomment to break it:
# $dbh->do("SET CHARACTER SET utf8");
open FILE, "blob.bin";
binmode FILE;
read(FILE, my $blob1, 100000000);
close FILE;
my $sth = $dbh->prepare(
"INSERT INTO pdo_blob (the_blob) VALUES(?)"
);
$sth->bind_param(1, $blob1, SQL_BLOB);
$sth->execute();
my ($blob2) = $dbh->selectrow_array(
"SELECT the_blob FROM pdo_blob ORDER BY id DESC LIMIT 1"
);
print ($blob1 eq $blob2 ? "Equal" : "Not equal") , "\n";