Hello community,
here is the log from the commit of package perl-DBD-ODBC for openSUSE:Factory
checked in at Tue May 19 02:28:01 CEST 2009.
--------
--- perl-DBD-ODBC/perl-DBD-ODBC.changes 2009-04-28 13:53:09.000000000 +0200
+++ perl-DBD-ODBC/perl-DBD-ODBC.changes 2009-05-18 17:55:10.000000000 +0200
@@ -1,0 +2,6 @@
+Mon May 18 17:13:02 CEST 2009 - anicka(a)suse.cz
+
+- update to 1.21
+ * bugfixes, documentation fixes
+
+-------------------------------------------------------------------
calling whatdependson for head-i586
Old:
----
DBD-ODBC-1.20.tar.bz2
perl-DBD-ODBC-1.20-Makefile.diff
New:
----
DBD-ODBC-1.21.tar.bz2
perl-DBD-ODBC-1.21-Makefile.diff
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-DBD-ODBC.spec ++++++
--- /var/tmp/diff_new_pack.Oj2114/_old 2009-05-19 02:25:10.000000000 +0200
+++ /var/tmp/diff_new_pack.Oj2114/_new 2009-05-19 02:25:10.000000000 +0200
@@ -1,5 +1,5 @@
#
-# spec file for package perl-DBD-ODBC (Version 1.20)
+# spec file for package perl-DBD-ODBC (Version 1.21)
#
# Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
@@ -27,7 +27,7 @@
Requires: perl-DBI unixODBC
Requires: perl = %{perl_version}
Summary: Perl DBD module for interfacing with ODBC databases
-Version: 1.20
+Version: 1.21
Release: 1
Source: DBD-ODBC-%{version}.tar.bz2
Patch: %{name}-%{version}-Makefile.diff
@@ -76,6 +76,9 @@
/var/adm/perl-modules/%{name}
%changelog
+* Mon May 18 2009 anicka(a)suse.cz
+- update to 1.21
+ * bugfixes, documentation fixes
* Tue Apr 28 2009 anicka(a)suse.cz
- update to 1.20
* bugfixes, test fixes
++++++ DBD-ODBC-1.20.tar.bz2 -> DBD-ODBC-1.21.tar.bz2 ++++++
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/Changes new/DBD-ODBC-1.21/Changes
--- old/DBD-ODBC-1.20/Changes 2009-04-20 17:21:34.000000000 +0200
+++ new/DBD-ODBC-1.21/Changes 2009-04-27 18:19:34.000000000 +0200
@@ -43,7 +43,20 @@
=head1 CHANGES
-=head2 Changes in DBD::ODBC 1.20 April 7, 2009
+=head2 Changes in DBD::ODBC 1.21 April 27, 2009
+
+Change 02simple test to output Perl, DBI and DBD::ODBC versions.
+
+Fixed bug where if ODBC driver supports SQLDescribeParam and it
+succeeds for a parameterised query but you override the parameter
+type, DBD::ODBC was still using the size returned by
+SQLDescribeParam. Thanks to Brian Becker for finding, diagnosing and
+fixing this issue.
+
+Added FAQ entry about SQL Server and calling procedures with named
+parameters out of order.
+
+=head2 Changes in DBD::ODBC 1.20 April 20, 2009
Fix bug in handling of SQL_WLONGVARCHAR when not built with unicode
support. The column was not identified as a long column and hence the
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/dbdimp.c new/DBD-ODBC-1.21/dbdimp.c
--- old/DBD-ODBC-1.20/dbdimp.c 2009-04-20 17:21:34.000000000 +0200
+++ new/DBD-ODBC-1.21/dbdimp.c 2009-04-27 17:45:48.000000000 +0200
@@ -2290,7 +2290,7 @@
/* Bind output column variables */
if (DBIc_TRACE(imp_sth, 0, 0, 4))
PerlIO_printf(DBIc_LOGPIO(imp_dbh),
- "Bind %d: type = %s(%d), buf=%p, buflen=%ld\n",
+ " Bind %d: type = %s(%d), buf=%p, buflen=%ld\n",
i+1, S_SqlTypeToString(fbh->ftype), fbh->ftype,
fbh->data, fbh->ColDisplaySize);
rc = SQLBindCol(imp_sth->hstmt,
@@ -3209,7 +3209,8 @@
}
if ((phs->describe_param_called == 1) &&
- (SQL_SUCCEEDED(phs->describe_param_status))) {
+ (SQL_SUCCEEDED(phs->describe_param_status)) &&
+ (phs->requested_type == 0)) { /* type not overriden */
default_column_size = phs->param_size;
} else {
if ((phs->sql_type == SQL_VARCHAR) && !phs->is_inout) {
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/FAQ new/DBD-ODBC-1.21/FAQ
--- old/DBD-ODBC-1.20/FAQ 2008-12-16 10:48:10.000000000 +0100
+++ new/DBD-ODBC-1.21/FAQ 2009-04-27 18:08:33.000000000 +0200
@@ -524,6 +524,36 @@
error e.g., if you attempt to bind a non-datetime string to a datetime
column or a non-numeric string to a numeric column.
+=head2 Why do I get strange results with SQL Server and named parameters?
+
+If you are using a MS SQL Server driver and named parameters to
+procedures be very careful to use then in the sasme order they are
+defined in the procedure. i.e., if you have a procedure like this:
+
+ create procedure test
+ @param1 varchar(50),
+ @param2 smallint
+ as
+ begin
+ ..
+ end
+
+then ensure if you call it using named parameters you specify them in
+the same order they are declared:
+
+ exec test @param1=?,@param2=?
+
+and not
+
+ exec test @param2=?,@param1=?
+
+The reason for this is that all SQL Server drivers we have seen
+describe procedures parameters in the order they are declared and
+ignore the order they are used in the SQL. If you specify them out of
+order DBD::ODBC will get details on p1 which are really for p2
+etc. This can lead to data truncation errors and all sort of other
+problems it is impossible for DBD::ODBC spot or workaround.
+
=head1 AUTHOR
Parts of this document were written by Tim Bunce,
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/MANIFEST new/DBD-ODBC-1.21/MANIFEST
--- old/DBD-ODBC-1.20/MANIFEST 2009-03-31 17:24:04.000000000 +0200
+++ new/DBD-ODBC-1.21/MANIFEST 2009-04-27 18:22:14.000000000 +0200
@@ -10,6 +10,7 @@
Makefile.PL
MANIFEST This list of files
META.yml
+test_results.txt
examples/cancel.pl
examples/coltest.pl
examples/contest.pl
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/META.yml new/DBD-ODBC-1.21/META.yml
--- old/DBD-ODBC-1.20/META.yml 2009-04-07 10:54:21.000000000 +0200
+++ new/DBD-ODBC-1.21/META.yml 2009-04-27 18:20:02.000000000 +0200
@@ -1,7 +1,7 @@
--- #YAML:1.0
name: DBD-ODBC
abstract: ODBC DBD for Perl DBI
-version: 1.20
+version: 1.21
version_from: ODBC.pm
author:
- Tim Bunce
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/ODBC.pm new/DBD-ODBC-1.21/ODBC.pm
--- old/DBD-ODBC-1.20/ODBC.pm 2009-04-07 11:04:11.000000000 +0200
+++ new/DBD-ODBC-1.21/ODBC.pm 2009-04-27 18:19:53.000000000 +0200
@@ -12,7 +12,7 @@
require 5.006;
-$DBD::ODBC::VERSION = '1.20';
+$DBD::ODBC::VERSION = '1.21';
{
package DBD::ODBC;
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/t/02simple.t new/DBD-ODBC-1.21/t/02simple.t
--- old/DBD-ODBC-1.20/t/02simple.t 2009-04-02 12:54:58.000000000 +0200
+++ new/DBD-ODBC-1.21/t/02simple.t 2009-04-27 18:21:07.000000000 +0200
@@ -3,6 +3,7 @@
use Test::More;
use strict;
+use Config;
$| = 1;
@@ -38,6 +39,10 @@
# Output DBMS which is useful when debugging cpan-testers output
{
diag("\n");
+ diag("Perl $Config{PERL_REVISION}.$Config{PERL_SUBVERSION}.$Config{PERL_VERSION}\n");
+ diag("osname=$Config{osname}, osvers=$Config{osvers}, archname=$Config{archname}\n");
+ diag("Using DBI $DBI::VERSION\n");
+ diag("Using DBD::ODBC $DBD::ODBC::VERSION\n");
diag("Using DBMS_NAME " . DBI::neat($dbh->get_info(17)) . "\n");
diag("Using DBMS_VER " . DBI::neat($dbh->get_info(18)) . "\n");
$driver_name = DBI::neat($dbh->get_info(6));
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/t/12blob.t new/DBD-ODBC-1.21/t/12blob.t
--- old/DBD-ODBC-1.20/t/12blob.t 2009-04-20 17:21:34.000000000 +0200
+++ new/DBD-ODBC-1.21/t/12blob.t 2009-04-21 15:22:07.000000000 +0200
@@ -11,7 +11,7 @@
my $has_test_nowarnings = 1;
eval "require Test::NoWarnings";
$has_test_nowarnings = undef if $@;
-my $tests = 21;
+my $tests = 24;
$tests += 1 if $has_test_nowarnings;
plan tests => $tests;
@@ -141,7 +141,12 @@
diag($ev) if $ev;
ok(!$ev, 'select test data back');
- is($row->[0]->[0], $value, 'data read back compares');
+ my $rc = is(length($row->[0]->[0]), length($value),
+ "sizes of insert/select compare");
+ SKIP: {
+ skip "sizes do not match", 1 unless $rc;
+ is($row->[0]->[0], $value, 'data read back compares');
+ };
return;
}
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/test_results.txt new/DBD-ODBC-1.21/test_results.txt
--- old/DBD-ODBC-1.20/test_results.txt 1970-01-01 01:00:00.000000000 +0100
+++ new/DBD-ODBC-1.21/test_results.txt 2009-04-27 18:21:38.000000000 +0200
@@ -0,0 +1,51 @@
+======================================================================
+t/01base................ok
+t/02simple..............ok 1/65#
+# Perl v5.9.5 built for MSWin32-x64-multi-thread
+# Using DBI 1.59
+# Using DBD::ODBC 1.20
+# Using DBMS_NAME 'Microsoft SQL Server'
+# Using DBMS_VER '09.00.3042'
+# Using DRIVER_NAME 'sqlncli10.dll'
+# Using DRIVER_VER '10.00.1049'
+# odbc_has_unicode 1
+t/02simple..............ok
+t/03dbatt...............ok 1/29#
+# N.B. Some drivers (postgres/cache) may return ODBC 2.0 column names for the SQ
+LTables result-set e.g. TABLE_QUALIFIER instead of TABLE_CAT
+t/03dbatt...............ok
+t/05meth................ok
+t/07bind................ok
+t/08bind2...............ok
+t/09multi...............ok
+t/10handler.............ok
+t/12blob................ok
+t/20SqlServer...........ok
+t/30Oracle..............ok
+ 3/5 skipped: various reasons
+t/40UnicodeRoundTrip....ok
+t/41Unicode.............ok
+t/pod-coverage..........ok 1/1# Test::Pod::Coverage 1.04 required for testing PO
+D coverage
+t/pod-coverage..........ok
+t/pod...................ok
+ 3/3 skipped: various reasons
+t/rt_38977..............ok
+t/rt_39841..............ok 1/28# [Microsoft][SQL Server Native Client 10.0]Inval
+id character value for cast specification (SQL-22018)
+# 22018
+#
+# NOTE: Your SQL Server ODBC driver has a bug which can describe parameters
+# in SQL using sub selects incorrectly. In this case a VARCHAR(8) parameter
+# is described as an INTEGER
+#
+# Checking you can work around bug in SQL Server ODBC Driver
+# Yes you can
+t/rt_39841..............ok
+ 5/28 skipped: various reasons
+t/rt_39897..............ok
+t/rt_43384..............ok
+ 7/9 skipped: various reasons
+All tests successful, 18 subtests skipped.
+Files=19, Tests=427, 11 wallclock secs ( 0.00 cusr + 0.00 csys = 0.00 CPU)
+======================================================================
++++++ perl-DBD-ODBC-1.20-Makefile.diff -> perl-DBD-ODBC-1.21-Makefile.diff ++++++
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Remember to have fun...
--
To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org
For additional commands, e-mail: opensuse-commit+help(a)opensuse.org
