Add a few constants

constants.inc

@@ -5,6 +5,34 @@ MODULE = DBD::SQLite    PACKAGE = DBD::SQLite::Constants
 
 PROTOTYPES: ENABLE
 
+#if SQLITE_VERSION_NUMBER >= 3034000
+
+IV
+_const_allowed_return_values_from_sqlite3_txn_state_3034000()
+    ALIAS:
+        SQLITE_TXN_NONE = SQLITE_TXN_NONE
+        SQLITE_TXN_READ = SQLITE_TXN_READ
+        SQLITE_TXN_WRITE = SQLITE_TXN_WRITE
+    CODE:
+        RETVAL = ix;
+    OUTPUT:
+        RETVAL
+
+#else
+
+IV
+_const_allowed_return_values_from_sqlite3_txn_state_3034000_zero()
+    ALIAS:
+        SQLITE_TXN_NONE = 1
+        SQLITE_TXN_READ = 2
+        SQLITE_TXN_WRITE = 3
+    CODE:
+        RETVAL = 0;
+    OUTPUT:
+        RETVAL
+
+#endif
+
 IV
 _const_authorizer_action_codes()
     ALIAS:
@@ -1130,6 +1158,30 @@ _const_extended_result_codes_3032000_zero()
 
 #endif
 
+#if SQLITE_VERSION_NUMBER >= 3034000
+
+IV
+_const_extended_result_codes_3034000()
+    ALIAS:
+        SQLITE_IOERR_CORRUPTFS = SQLITE_IOERR_CORRUPTFS
+    CODE:
+        RETVAL = ix;
+    OUTPUT:
+        RETVAL
+
+#else
+
+IV
+_const_extended_result_codes_3034000_zero()
+    ALIAS:
+        SQLITE_IOERR_CORRUPTFS = 1
+    CODE:
+        RETVAL = 0;
+    OUTPUT:
+        RETVAL
+
+#endif
+
 IV
 _const_flags_for_file_open_operations()
     ALIAS:
@@ -1264,6 +1316,30 @@ _const_flags_for_file_open_operations_3031000_zero()
 
 #endif
 
+#if SQLITE_VERSION_NUMBER >= 3033000
+
+IV
+_const_flags_for_file_open_operations_3033000()
+    ALIAS:
+        SQLITE_OPEN_SUPER_JOURNAL = SQLITE_OPEN_SUPER_JOURNAL
+    CODE:
+        RETVAL = ix;
+    OUTPUT:
+        RETVAL
+
+#else
+
+IV
+_const_flags_for_file_open_operations_3033000_zero()
+    ALIAS:
+        SQLITE_OPEN_SUPER_JOURNAL = 1
+    CODE:
+        RETVAL = 0;
+    OUTPUT:
+        RETVAL
+
+#endif
+
 #if SQLITE_VERSION_NUMBER >= 3008003
 
 IV
@@ -1718,3 +1794,27 @@ _const__flags_for_file_open_operations_3031000_zero()
 
 #endif
 
+#if SQLITE_VERSION_NUMBER >= 3033000
+
+IV
+_const__flags_for_file_open_operations_3033000()
+    ALIAS:
+        OPEN_SUPER_JOURNAL = SQLITE_OPEN_SUPER_JOURNAL
+    CODE:
+        RETVAL = ix;
+    OUTPUT:
+        RETVAL
+
+#else
+
+IV
+_const__flags_for_file_open_operations_3033000_zero()
+    ALIAS:
+        OPEN_SUPER_JOURNAL = 1
+    CODE:
+        RETVAL = 0;
+    OUTPUT:
+        RETVAL
+
+#endif
+

lib/DBD/SQLite/Constants.pm

@@ -8,6 +8,13 @@ use warnings;
 use base 'Exporter';
 use DBD::SQLite;
 our @EXPORT_OK = (
+    # allowed_return_values_from_sqlite3_txn_state
+    qw/
+      SQLITE_TXN_NONE
+      SQLITE_TXN_READ
+      SQLITE_TXN_WRITE
+    /,
+
     # authorizer_action_codes
     qw/
       SQLITE_ALTER_TABLE
@@ -118,6 +125,7 @@ our @EXPORT_OK = (
       SQLITE_IOERR_CLOSE
       SQLITE_IOERR_COMMIT_ATOMIC
       SQLITE_IOERR_CONVPATH
+      SQLITE_IOERR_CORRUPTFS
       SQLITE_IOERR_DATA
       SQLITE_IOERR_DELETE
       SQLITE_IOERR_DELETE_NOENT
@@ -167,6 +175,7 @@ our @EXPORT_OK = (
       SQLITE_OPEN_READONLY
       SQLITE_OPEN_READWRITE
       SQLITE_OPEN_SHAREDCACHE
+      SQLITE_OPEN_SUPER_JOURNAL
       SQLITE_OPEN_URI
     /,
 
@@ -344,6 +353,7 @@ our %EXPORT_TAGS = (
       SQLITE_IOERR_CLOSE
       SQLITE_IOERR_COMMIT_ATOMIC
       SQLITE_IOERR_CONVPATH
+      SQLITE_IOERR_CORRUPTFS
       SQLITE_IOERR_DATA
       SQLITE_IOERR_DELETE
       SQLITE_IOERR_DELETE_NOENT
@@ -404,6 +414,7 @@ our %EXPORT_TAGS = (
       SQLITE_OPEN_READONLY
       SQLITE_OPEN_READWRITE
       SQLITE_OPEN_SHAREDCACHE
+      SQLITE_OPEN_SUPER_JOURNAL
       SQLITE_OPEN_URI
       SQLITE_PERM
       SQLITE_PRAGMA
@@ -426,12 +437,21 @@ our %EXPORT_TAGS = (
       SQLITE_SUBTYPE
       SQLITE_TOOBIG
       SQLITE_TRANSACTION
+      SQLITE_TXN_NONE
+      SQLITE_TXN_READ
+      SQLITE_TXN_WRITE
       SQLITE_UPDATE
       SQLITE_VERSION_NUMBER
       SQLITE_WARNING
       SQLITE_WARNING_AUTOINDEX
     /],
 
+    allowed_return_values_from_sqlite3_txn_state => [qw/
+      SQLITE_TXN_NONE
+      SQLITE_TXN_READ
+      SQLITE_TXN_WRITE
+    /],
+
     authorizer_action_codes => [qw/
       SQLITE_ALTER_TABLE
       SQLITE_ANALYZE
@@ -537,6 +557,7 @@ our %EXPORT_TAGS = (
       SQLITE_IOERR_CLOSE
       SQLITE_IOERR_COMMIT_ATOMIC
       SQLITE_IOERR_CONVPATH
+      SQLITE_IOERR_CORRUPTFS
       SQLITE_IOERR_DATA
       SQLITE_IOERR_DELETE
       SQLITE_IOERR_DELETE_NOENT
@@ -585,6 +606,7 @@ our %EXPORT_TAGS = (
       SQLITE_OPEN_READONLY
       SQLITE_OPEN_READWRITE
       SQLITE_OPEN_SHAREDCACHE
+      SQLITE_OPEN_SUPER_JOURNAL
       SQLITE_OPEN_URI
     /],
 
@@ -672,12 +694,24 @@ DBD::SQLite::Constants - common SQLite constants
 
 =head1 DESCRIPTION
 
-You can import necessary SQLite constants from this module. Available tags are C<all>, C<authorizer_action_codes>, C<authorizer_return_codes>, C<version> (C<compile_time_library_version_numbers>), C<database_connection_configuration_options>, C<extended_result_codes>, C<file_open> (C<flags_for_file_open_operations>), C<function_flags>, C<datatypes> (C<fundamental_datatypes>), C<result_codes>, C<run_time_limit_categories>. See L<http://sqlite.org/c3ref/constlist.html> for the complete list of constants.
+You can import necessary SQLite constants from this module. Available tags are C<all>, C<allowed_return_values_from_sqlite3_txn_state>, C<authorizer_action_codes>, C<authorizer_return_codes>, C<version> (C<compile_time_library_version_numbers>), C<database_connection_configuration_options>, C<extended_result_codes>, C<file_open> (C<flags_for_file_open_operations>), C<function_flags>, C<datatypes> (C<fundamental_datatypes>), C<result_codes>, C<run_time_limit_categories>. See L<http://sqlite.org/c3ref/constlist.html> for the complete list of constants.
 
 This module does not export anything by default.
 
 =head1 CONSTANTS
 
+=head2 allowed_return_values_from_sqlite3_txn_state
+
+=over 4
+
+=item SQLITE_TXN_NONE
+
+=item SQLITE_TXN_READ
+
+=item SQLITE_TXN_WRITE
+
+=back
+
 =head2 authorizer_action_codes
 
 =over 4
@@ -962,6 +996,8 @@ This module does not export anything by default.
 
 =item SQLITE_CORRUPT_INDEX
 
+=item SQLITE_IOERR_CORRUPTFS
+
 =back
 
 =head2 file_open (flags_for_file_open_operations)
@@ -988,6 +1024,8 @@ This module does not export anything by default.
 
 =item SQLITE_OPEN_NOFOLLOW
 
+=item SQLITE_OPEN_SUPER_JOURNAL
+
 =back
 
 =head2 function_flags

util/SQLiteUtil.pm

@@ -179,6 +179,11 @@ my %since = (
   IOERR_DATA => '3032000',
   BUSY_TIMEOUT => '3032000',
   CORRUPT_INDEX => '3032000',
+  OPEN_SUPER_JOURNAL => '3033000',
+  TXN_NONE => '3034000',
+  TXN_READ => '3034000',
+  TXN_WRITE => '3034000',
+  IOERR_CORRUPTFS => '3034000',
 
   status_parameters_for_prepared_statements => '3006004',
   extended_result_codes => '3006005',
@@ -193,6 +198,7 @@ my %since = (
   checkpoint_mode_values => '3008008',
   prepared_statement_scan_status_opcodes => '3008008',
   sql_trace_event_codes => '3014000',
+  allowed_return_values_from_sqlite3_txn_state => '3034000',
 );
 
 my %until = (
@@ -267,6 +273,7 @@ sub extract_constants {
     if (/^\*\* CAPI3REF: (.+)/) {
       $tag = lc $1;
       $tag =~ s/[ \-]+/_/g;
+      $tag =~ s/[\[\]]//g;
       ($tag) = $tag =~ /^(\w+)/;
       $tag =~ s/_$//;
       if ($tag =~ /^($ignore_tag_re)/) {