ODBC C-tests commit: r40 - trunk/testsuites/t_bugs_blob

[grichter]

Added:
   trunk/testsuites/t_bugs_blob/bug_9781.c
Modified:
   trunk/testsuites/t_bugs_blob/t_bugs_blob_suite.c
   trunk/testsuites/t_bugs_blob/t_bugs_blob_suite.h
Log:
Added test for bug #9781


Added: trunk/testsuites/t_bugs_blob/bug_9781.c
===================================================================
--- trunk/testsuites/t_bugs_blob/bug_9781.c	2007-03-08 00:10:39 UTC (rev 39)
+++ trunk/testsuites/t_bugs_blob/bug_9781.c	2007-03-12 08:55:59 UTC (rev 40)
@@ -0,0 +1,41 @@
+#include "t_bugs_blob_suite.h"
+
+
+OT_TEST_METHOD(bug_9781_test) 
+{
+  SQLHANDLE   stmt = get_statement();
+  
+  SQLSMALLINT column_count;
+  SQLSMALLINT column_index;
+  
+  SQLCHAR     column_name[SQL_MAX_COLUMN_NAME_LEN];
+  SQLSMALLINT name_length;
+  SQLSMALLINT data_type;
+  SQLUINTEGER column_size;
+  SQLSMALLINT decimal_digits;
+  SQLSMALLINT nullable;
+
+  CHECK_SQL_S(SQLExecDirect(stmt, "INSERT INTO bug9781 VALUES (GeomFromText('POINT(0
0)'))", 
+        SQL_NTS), stmt);
+  
+
+  reset_statement(stmt);    
+
+  CHECK_SQL_S(SQLExecDirect(stmt, 
+        "SELECT AsBinary(g) FROM bug9781",
+        SQL_NTS), stmt);
+
+  CHECK_SQL_S(SQLDescribeCol(stmt, 1, 
+                                   column_name, 
+                                   SQL_MAX_COLUMN_NAME_LEN, 
+                                   &name_length,
+                                   &data_type,
+                                   &column_size,
+                                   &decimal_digits,
+                                   &nullable), stmt);
+        
+  OT_ASSERT_INT_MSG("Wrong data type for SQL_LONGVARBINARY column", 
+                        SQL_LONGVARBINARY, data_type);
+
+  free_statement(stmt);    
+}

Modified: trunk/testsuites/t_bugs_blob/t_bugs_blob_suite.c
===================================================================
--- trunk/testsuites/t_bugs_blob/t_bugs_blob_suite.c	2007-03-08 00:10:39 UTC (rev 39)
+++ trunk/testsuites/t_bugs_blob/t_bugs_blob_suite.c	2007-03-12 08:55:59 UTC (rev 40)
@@ -14,7 +14,12 @@
       "CREATE TABLE my_blob_tab (ID INT PRIMARY KEY, \
        my_blob MEDIUMBLOB, my_varchar varchar(1024))", SQL_NTS), stmt);
 
-	free_statement(stmt);
+  CHECK_SQL_S(SQLExecDirect(stmt, "DROP TABLE IF EXISTS bug9781", 
+        SQL_NTS), stmt);
+
+  CHECK_SQL_S(SQLExecDirect(stmt, "CREATE TABLE bug9781 (g GEOMETRY)", 
+        SQL_NTS), stmt);
+  free_statement(stmt);
 }	
 
 OT_TEST_TEARDOWN(bugs_blob_teardown)
@@ -22,12 +27,14 @@
   SQLHANDLE stmt = get_statement();
 
   CHECK_SQL_S(SQLExecDirect(stmt, "DROP TABLE IF EXISTS my_blob_tab", SQL_NTS), stmt);
+  CHECK_SQL_S(SQLExecDirect(stmt, "DROP TABLE IF EXISTS bug9781", SQL_NTS), stmt);
   free_statement(stmt);
 
   global_disconnect();
 }
 
 OT_SUITE_REGISTER_START("bugs_blob", NULL, NULL)
+  OT_SUITE_ADD_TEST(bug_9781_test, bugs_blob_setup, bugs_blob_teardown);
   OT_SUITE_ADD_TEST(bug_20208_test1, bugs_blob_setup, bugs_blob_teardown);
   OT_SUITE_ADD_TEST(bug_20208_test2, bugs_blob_setup, bugs_blob_teardown);
 OT_SUITE_REGISTER_END

Modified: trunk/testsuites/t_bugs_blob/t_bugs_blob_suite.h
===================================================================
--- trunk/testsuites/t_bugs_blob/t_bugs_blob_suite.h	2007-03-08 00:10:39 UTC (rev 39)
+++ trunk/testsuites/t_bugs_blob/t_bugs_blob_suite.h	2007-03-12 08:55:59 UTC (rev 40)
@@ -10,3 +10,4 @@
 /* bug_25846.c */
 OT_TEST_METHOD(bug_20208_test1);
 OT_TEST_METHOD(bug_20208_test2);
+OT_TEST_METHOD(bug_9781_test);