Index: third_party/sqlite/sqlite-src-3080704/tool/mkpragmatab.tcl |
diff --git a/third_party/sqlite/sqlite-src-3080704/tool/mkpragmatab.tcl b/third_party/sqlite/sqlite-src-3080704/tool/mkpragmatab.tcl |
deleted file mode 100644 |
index aa7c8078c556446a10dea6e8a5a39d4781329681..0000000000000000000000000000000000000000 |
--- a/third_party/sqlite/sqlite-src-3080704/tool/mkpragmatab.tcl |
+++ /dev/null |
@@ -1,436 +0,0 @@ |
-#!/usr/bin/tclsh |
-# |
-# Run this script to generate the pragma name lookup table C code. |
-# |
-# To add new pragmas, first add the name and other relevant attributes |
-# of the pragma to the "pragma_def" object below. Then run this script |
-# to generate the C-code for the lookup table and copy/paste the output |
-# of this script into the appropriate spot in the pragma.c source file. |
-# Then add the extra "case PragTyp_XXXXX:" and subsequent code for the |
-# new pragma. |
-# |
- |
-set pragma_def { |
- NAME: full_column_names |
- TYPE: FLAG |
- ARG: SQLITE_FullColNames |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: short_column_names |
- TYPE: FLAG |
- ARG: SQLITE_ShortColNames |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: count_changes |
- TYPE: FLAG |
- ARG: SQLITE_CountRows |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: empty_result_callbacks |
- TYPE: FLAG |
- ARG: SQLITE_NullCallback |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: legacy_file_format |
- TYPE: FLAG |
- ARG: SQLITE_LegacyFileFmt |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: fullfsync |
- TYPE: FLAG |
- ARG: SQLITE_FullFSync |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: checkpoint_fullfsync |
- TYPE: FLAG |
- ARG: SQLITE_CkptFullFSync |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: cache_spill |
- TYPE: FLAG |
- ARG: SQLITE_CacheSpill |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: reverse_unordered_selects |
- TYPE: FLAG |
- ARG: SQLITE_ReverseOrder |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: query_only |
- TYPE: FLAG |
- ARG: SQLITE_QueryOnly |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: automatic_index |
- TYPE: FLAG |
- ARG: SQLITE_AutoIndex |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: !defined(SQLITE_OMIT_AUTOMATIC_INDEX) |
- |
- NAME: sql_trace |
- TYPE: FLAG |
- ARG: SQLITE_SqlTrace |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: defined(SQLITE_DEBUG) |
- |
- NAME: vdbe_listing |
- TYPE: FLAG |
- ARG: SQLITE_VdbeListing |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: defined(SQLITE_DEBUG) |
- |
- NAME: vdbe_trace |
- TYPE: FLAG |
- ARG: SQLITE_VdbeTrace |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: defined(SQLITE_DEBUG) |
- |
- NAME: vdbe_addoptrace |
- TYPE: FLAG |
- ARG: SQLITE_VdbeAddopTrace |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: defined(SQLITE_DEBUG) |
- |
- NAME: vdbe_debug |
- TYPE: FLAG |
- ARG: SQLITE_SqlTrace|SQLITE_VdbeListing|SQLITE_VdbeTrace |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: defined(SQLITE_DEBUG) |
- |
- NAME: vdbe_eqp |
- TYPE: FLAG |
- ARG: SQLITE_VdbeEQP |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: defined(SQLITE_DEBUG) |
- |
- NAME: ignore_check_constraints |
- TYPE: FLAG |
- ARG: SQLITE_IgnoreChecks |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: !defined(SQLITE_OMIT_CHECK) |
- |
- NAME: writable_schema |
- TYPE: FLAG |
- ARG: SQLITE_WriteSchema|SQLITE_RecoveryMode |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: read_uncommitted |
- TYPE: FLAG |
- ARG: SQLITE_ReadUncommitted |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: recursive_triggers |
- TYPE: FLAG |
- ARG: SQLITE_RecTriggers |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- |
- NAME: foreign_keys |
- TYPE: FLAG |
- ARG: SQLITE_ForeignKeys |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: !defined(SQLITE_OMIT_FOREIGN_KEY) && !defined(SQLITE_OMIT_TRIGGER) |
- |
- NAME: defer_foreign_keys |
- TYPE: FLAG |
- ARG: SQLITE_DeferFKs |
- IF: !defined(SQLITE_OMIT_FLAG_PRAGMAS) |
- IF: !defined(SQLITE_OMIT_FOREIGN_KEY) && !defined(SQLITE_OMIT_TRIGGER) |
- |
- NAME: default_cache_size |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) && !defined(SQLITE_OMIT_DEPRECATED) |
- |
- NAME: page_size |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: secure_delete |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: page_count |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: max_page_count |
- TYPE: PAGE_COUNT |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: locking_mode |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: journal_mode |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: journal_size_limit |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: cache_size |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: mmap_size |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: auto_vacuum |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_AUTOVACUUM) |
- |
- NAME: incremental_vacuum |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_AUTOVACUUM) |
- |
- NAME: temp_store |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: temp_store_directory |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: data_store_directory |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) && SQLITE_OS_WIN |
- |
- NAME: lock_proxy_file |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) && SQLITE_ENABLE_LOCKING_STYLE |
- |
- NAME: synchronous |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_PAGER_PRAGMAS) |
- |
- NAME: table_info |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_SCHEMA_PRAGMAS) |
- |
- NAME: stats |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_SCHEMA_PRAGMAS) |
- |
- NAME: index_info |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_SCHEMA_PRAGMAS) |
- |
- NAME: index_list |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_SCHEMA_PRAGMAS) |
- |
- NAME: database_list |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_SCHEMA_PRAGMAS) |
- |
- NAME: collation_list |
- IF: !defined(SQLITE_OMIT_SCHEMA_PRAGMAS) |
- |
- NAME: foreign_key_list |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_FOREIGN_KEY) |
- |
- NAME: foreign_key_check |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_FOREIGN_KEY) && !defined(SQLITE_OMIT_TRIGGER) |
- |
- NAME: parser_trace |
- IF: defined(SQLITE_DEBUG) |
- |
- NAME: case_sensitive_like |
- |
- NAME: integrity_check |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_INTEGRITY_CHECK) |
- |
- NAME: quick_check |
- TYPE: INTEGRITY_CHECK |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_INTEGRITY_CHECK) |
- |
- NAME: encoding |
- IF: !defined(SQLITE_OMIT_UTF16) |
- |
- NAME: schema_version |
- TYPE: HEADER_VALUE |
- IF: !defined(SQLITE_OMIT_SCHEMA_VERSION_PRAGMAS) |
- |
- NAME: user_version |
- TYPE: HEADER_VALUE |
- IF: !defined(SQLITE_OMIT_SCHEMA_VERSION_PRAGMAS) |
- |
- NAME: freelist_count |
- TYPE: HEADER_VALUE |
- IF: !defined(SQLITE_OMIT_SCHEMA_VERSION_PRAGMAS) |
- |
- NAME: application_id |
- TYPE: HEADER_VALUE |
- IF: !defined(SQLITE_OMIT_SCHEMA_VERSION_PRAGMAS) |
- |
- NAME: compile_options |
- IF: !defined(SQLITE_OMIT_COMPILEOPTION_DIAGS) |
- |
- NAME: wal_checkpoint |
- FLAG: NeedSchema |
- IF: !defined(SQLITE_OMIT_WAL) |
- |
- NAME: wal_autocheckpoint |
- IF: !defined(SQLITE_OMIT_WAL) |
- |
- NAME: shrink_memory |
- |
- NAME: busy_timeout |
- |
- NAME: lock_status |
- IF: defined(SQLITE_DEBUG) || defined(SQLITE_TEST) |
- |
- NAME: key |
- IF: defined(SQLITE_HAS_CODEC) |
- |
- NAME: rekey |
- IF: defined(SQLITE_HAS_CODEC) |
- |
- NAME: hexkey |
- IF: defined(SQLITE_HAS_CODEC) |
- |
- NAME: hexrekey |
- TYPE: HEXKEY |
- IF: defined(SQLITE_HAS_CODEC) |
- |
- NAME: activate_extensions |
- IF: defined(SQLITE_HAS_CODEC) || defined(SQLITE_ENABLE_CEROD) |
- |
- NAME: soft_heap_limit |
- |
- NAME: threads |
-} |
-fconfigure stdout -translation lf |
-set name {} |
-set type {} |
-set if {} |
-set flags {} |
-set arg 0 |
-proc record_one {} { |
- global name type if arg allbyname typebyif flags |
- if {$name==""} return |
- set allbyname($name) [list $type $arg $if $flags] |
- set name {} |
- set type {} |
- set if {} |
- set flags {} |
- set arg 0 |
-} |
-foreach line [split $pragma_def \n] { |
- set line [string trim $line] |
- if {$line==""} continue |
- foreach {id val} [split $line :] break |
- set val [string trim $val] |
- if {$id=="NAME"} { |
- record_one |
- set name $val |
- set type [string toupper $val] |
- } elseif {$id=="TYPE"} { |
- set type $val |
- } elseif {$id=="ARG"} { |
- set arg $val |
- } elseif {$id=="IF"} { |
- lappend if $val |
- } elseif {$id=="FLAG"} { |
- foreach term [split $val] { |
- lappend flags $term |
- set allflags($term) 1 |
- } |
- } else { |
- error "bad pragma_def line: $line" |
- } |
-} |
-record_one |
-set allnames [lsort [array names allbyname]] |
- |
-# Generate #defines for all pragma type names. Group the pragmas that are |
-# omit in default builds (defined(SQLITE_DEBUG) and defined(SQLITE_HAS_CODEC)) |
-# at the end. |
-# |
-set pnum 0 |
-foreach name $allnames { |
- set type [lindex $allbyname($name) 0] |
- if {[info exists seentype($type)]} continue |
- set if [lindex $allbyname($name) 2] |
- if {[regexp SQLITE_DEBUG $if] || [regexp SQLITE_HAS_CODEC $if]} continue |
- set seentype($type) 1 |
- puts [format {#define %-35s %4d} PragTyp_$type $pnum] |
- incr pnum |
-} |
-foreach name $allnames { |
- set type [lindex $allbyname($name) 0] |
- if {[info exists seentype($type)]} continue |
- set if [lindex $allbyname($name) 2] |
- if {[regexp SQLITE_DEBUG $if]} continue |
- set seentype($type) 1 |
- puts [format {#define %-35s %4d} PragTyp_$type $pnum] |
- incr pnum |
-} |
-foreach name $allnames { |
- set type [lindex $allbyname($name) 0] |
- if {[info exists seentype($type)]} continue |
- set seentype($type) 1 |
- puts [format {#define %-35s %4d} PragTyp_$type $pnum] |
- incr pnum |
-} |
- |
-# Generate #defines for flags |
-# |
-set fv 1 |
-foreach f [lsort [array names allflags]] { |
- puts [format {#define PragFlag_%-20s 0x%02x} $f $fv] |
- set fv [expr {$fv*2}] |
-} |
- |
-# Generate the lookup table |
-# |
-puts "static const struct sPragmaNames \173" |
-puts " const char *const zName; /* Name of pragma */" |
-puts " u8 ePragTyp; /* PragTyp_XXX value */" |
-puts " u8 mPragFlag; /* Zero or more PragFlag_XXX values */" |
-puts " u32 iArg; /* Extra argument */" |
-puts "\175 aPragmaNames\[\] = \173" |
- |
-set current_if {} |
-set spacer [format { %26s } {}] |
-foreach name $allnames { |
- foreach {type arg if flag} $allbyname($name) break |
- if {$if!=$current_if} { |
- if {$current_if!=""} { |
- foreach this_if $current_if { |
- puts "#endif" |
- } |
- } |
- set current_if $if |
- if {$current_if!=""} { |
- foreach this_if $current_if { |
- puts "#if $this_if" |
- } |
- } |
- } |
- set typex [format PragTyp_%-23s $type,] |
- if {$flag==""} { |
- set flagx "0" |
- } else { |
- set flagx PragFlag_[join $flag {|PragFlag_}] |
- } |
- puts " \173 /* zName: */ \"$name\"," |
- puts " /* ePragTyp: */ PragTyp_$type," |
- puts " /* ePragFlag: */ $flagx," |
- puts " /* iArg: */ $arg \175," |
-} |
-if {$current_if!=""} { |
- foreach this_if $current_if { |
- puts "#endif" |
- } |
-} |
-puts "\175;" |
- |
-# count the number of pragmas, for information purposes |
-# |
-set allcnt 0 |
-set dfltcnt 0 |
-foreach name $allnames { |
- incr allcnt |
- set if [lindex $allbyname($name) 2] |
- if {[regexp {^defined} $if] || [regexp {[^!]defined} $if]} continue |
- incr dfltcnt |
-} |
-puts "/* Number of pragmas: $dfltcnt on by default, $allcnt total. */" |