Import SQLite 3.8.7.4.

third_party/sqlite/src/test/capi2.test

 # 2003 January 29
 #
 # The author disclaims copyright to this source code.  In place of
 # a legal notice, here is a blessing:
 #
 #    May you do good and not evil.
 #    May you find forgiveness for yourself and forgive others.
 #    May you share freely, never taking more than you give.
 #
 #***********************************************************************
@@ skipping 217 matching lines @@
        [get_row_values $VM] \
        [get_column_names $VM]
 } {SQLITE_ERROR 0 {} {}}
 
 # Update for v3: Preparing a statement does not affect the change counter.
 # (Test result changes from 0 to 1).  (Later:) change counter updates occur
 # when sqlite3_step returns, not at finalize time.
 do_test capi2-3.13b {db changes} {0}
 
 do_test capi2-3.14 {
-  list [sqlite3_finalize $VM] [sqlite3_errmsg $DB]
-} {SQLITE_CONSTRAINT {column a is not unique}}
+  list [sqlite3_finalize $VM] [sqlite3_errmsg $DB] \
+       [sqlite3_extended_errcode $DB]
+} {SQLITE_CONSTRAINT {UNIQUE constraint failed: t1.a} SQLITE_CONSTRAINT_UNIQUE}
 do_test capi2-3.15 {
   set VM [sqlite3_prepare $DB {CREATE TABLE t2(a NOT NULL, b)} -1 TAIL]
   set TAIL
 } {}
 do_test capi2-3.16 {
   list [sqlite3_step $VM] \
        [sqlite3_column_count $VM] \
        [get_row_values $VM] \
        [get_column_names $VM]
 } {SQLITE_DONE 0 {} {}}
 do_test capi2-3.17 {
   list [sqlite3_finalize $VM] [sqlite3_errmsg $DB]
 } {SQLITE_OK {not an error}}
 do_test capi2-3.18 {
   set VM [sqlite3_prepare $DB {INSERT INTO t2 VALUES(NULL,2)} -1 TAIL]
   list [sqlite3_step $VM] \
        [sqlite3_column_count $VM] \
        [get_row_values $VM] \
        [get_column_names $VM]
 } {SQLITE_ERROR 0 {} {}}
 do_test capi2-3.19 {
-  list [sqlite3_finalize $VM] [sqlite3_errmsg $DB]
-} {SQLITE_CONSTRAINT {t2.a may not be NULL}}
+  list [sqlite3_finalize $VM] [sqlite3_errmsg $DB] \
+       [sqlite3_extended_errcode $DB]
+} {SQLITE_CONSTRAINT {NOT NULL constraint failed: t2.a} SQLITE_CONSTRAINT_NOTNULL}
 
 do_test capi2-3.20 {
   execsql {
     CREATE TABLE a1(message_id, name , UNIQUE(message_id, name) );
     INSERT INTO a1 VALUES(1, 1);
   }
 } {}
 do_test capi2-3.21 {
   set VM [sqlite3_prepare $DB {INSERT INTO a1 VALUES(1, 1)} -1 TAIL]
   sqlite3_step $VM
 } {SQLITE_ERROR}
 do_test capi2-3.22 {
   sqlite3_errcode $DB
 } {SQLITE_ERROR}
 do_test capi2-3.23 {
   sqlite3_finalize $VM
 } {SQLITE_CONSTRAINT}
 do_test capi2-3.24 {
-  sqlite3_errcode $DB
-} {SQLITE_CONSTRAINT}
+  list [sqlite3_errcode $DB] [sqlite3_extended_errcode $DB]
+} {SQLITE_CONSTRAINT SQLITE_CONSTRAINT_UNIQUE}
 
 # Two or more virtual machines exists at the same time.
 #
 do_test capi2-4.1 {
   set VM1 [sqlite3_prepare $DB {INSERT INTO t2 VALUES(1,2)} -1 TAIL]
   set TAIL
 } {}
 do_test capi2-4.2 {
   set VM2 [sqlite3_prepare $DB {INSERT INTO t2 VALUES(2,3)} -1 TAIL]
   set TAIL
@@ skipping 253 matching lines @@
   list [sqlite3_step $VM1] \
        [sqlite3_column_count $VM1] \
        [get_row_values $VM1] \
        [get_column_names $VM1]
 } {SQLITE_ROW 1 12 {x counter}}
 do_test capi2-6.27 {
   catchsql {
     INSERT INTO t1 VALUES(2,4,5);
     SELECT * FROM t1;
   }
-} {1 {column a is not unique}}
+} {1 {UNIQUE constraint failed: t1.a}}
 do_test capi2-6.28 {
   list [sqlite3_step $VM1] \
        [sqlite3_column_count $VM1] \
        [get_row_values $VM1] \
        [get_column_names $VM1]
 } {SQLITE_ROW 1 13 {x counter}}
 do_test capi2-6.99 {
   sqlite3_finalize $VM1
 } {SQLITE_OK}
 catchsql {ROLLBACK}
@@ skipping 225 matching lines @@
   do_test capi2-13.11 {
     check_origins {select * from (select * from tab1 limit 10 offset 10)}
   } [list {main tab1 col1} {main tab1 col2}]
 }
 
 
 } ;# ifcapable columnmetadata
 
 db2 close
 finish_test