diff --git a/bindings-sqlite3.cabal b/bindings-sqlite3.cabal --- a/bindings-sqlite3.cabal +++ b/bindings-sqlite3.cabal @@ -2,7 +2,7 @@ name: bindings-sqlite3 synopsis: Low level bindings to sqlite3. -version: 1.0.1 +version: 1.0.2 license: BSD3 license-file: LICENSE maintainer: Maurício C. Antunes @@ -16,9 +16,9 @@ ForeignFunctionInterface build-depends: base >=3 && < 5, - bindings-DSL >= 1.0.6 && < 1.1 + bindings-DSL >= 1.0.16 && < 1.1 exposed-modules: Bindings.Sqlite3 pkgconfig-depends: - sqlite3 >= 3.6.22 - c-sources: src/inlines.c + sqlite3 >= 3.7.17 + c-sources: src/Bindings/Sqlite3.c diff --git a/src/Bindings/Sqlite3.c b/src/Bindings/Sqlite3.c new file mode 100644 --- /dev/null +++ b/src/Bindings/Sqlite3.c @@ -0,0 +1,6 @@ +#include +#include + +BC_GLOBALARRAY(SQLITE_VERSION,char) +BC_GLOBALARRAY(SQLITE_SOURCE_ID,char) +BC_GLOBALARRAY(sqlite3_version,char) diff --git a/src/Bindings/Sqlite3.hsc b/src/Bindings/Sqlite3.hsc --- a/src/Bindings/Sqlite3.hsc +++ b/src/Bindings/Sqlite3.hsc @@ -1,29 +1,63 @@ -#include #include +#include --- | +-- | module Bindings.Sqlite3 where #strict_import +#num SQLITE_SHM_NLOCK + +#num SQLITE_VTAB_CONSTRAINT_SUPPORT + +#opaque_t sqlite3_backup + #opaque_t sqlite3_context +#globalvar sqlite3_data_directory , Ptr CChar + #starttype sqlite3_file #field pMethods , Ptr #stoptype +#starttype sqlite3_index_info +#field nConstraint , CInt +#field aConstraint , Ptr +#field nOrderBy , CInt +#field aOrderBy , Ptr +#field aConstraintUsage , Ptr +#field idxNum , CInt +#field idxStr , CString +#field needToFreeIdxStr , CInt +#field orderByConsumed , CInt +#field estimatedCost , CDouble +#stoptype +#starttype struct sqlite3_index_constraint +#field iColumn , CInt +#field op , CUChar +#field usable , CUChar +#stoptype +#starttype struct sqlite3_index_orderby +#field iColumn , CInt +#field desc , CUChar +#stoptype +#starttype struct sqlite3_index_constraint_usage +#field argvIndex , CInt +#field omit , CUChar +#stoptype + #starttype sqlite3_io_methods #field iVersion , CInt #field xClose , FunPtr (Ptr -> IO CInt) #field xRead , FunPtr (Ptr -> Ptr () -> \ - CInt -> Int64 -> IO CInt) + CInt -> -> IO CInt) #field xWrite , FunPtr (Ptr -> Ptr () -> \ - CInt -> Int64 -> IO ()) + CInt -> -> IO ()) #field xTruncate , FunPtr (Ptr -> \ - Int64 -> IO CInt) + -> IO CInt) #field xSync , FunPtr (Ptr -> CInt -> IO CInt) #field xFileSize , FunPtr (Ptr -> \ - Ptr Int64 -> IO CInt) + Ptr -> IO CInt) #field xLock , FunPtr (Ptr -> CInt -> IO CInt) #field xUnlock , FunPtr (Ptr -> CInt -> IO CInt) #field xCheckReservedLock , FunPtr (Ptr -> \ @@ -33,12 +67,53 @@ #field xSectorSize , FunPtr (Ptr -> IO CInt) #field xDeviceCharacteristics , FunPtr (Ptr -> \ IO CInt) +#field xShmMap , FunPtr (Ptr -> CInt -> CInt -> \ + CInt -> Ptr (Ptr ()) -> IO CInt) +#field xShmLock , FunPtr (Ptr -> CInt -> CInt -> \ + CInt -> IO CInt) +#field xShmBarrier , FunPtr (Ptr -> IO ()) +#field xShmUnmap , FunPtr (Ptr -> CInt -> IO CInt) +#field xFetch, FunPtr (Ptr -> -> \ + CInt -> Ptr (Ptr ()) -> IO CInt) +#field xUnfetch, FunPtr (Ptr -> -> \ + Ptr () -> IO CInt) #stoptype +#starttype sqlite3_mem_methods +#field xMalloc , FunPtr (CInt -> IO (Ptr ())) +#field xFree , FunPtr (Ptr () -> IO ()) +#field xRealloc , FunPtr (Ptr () -> CInt -> IO (Ptr ())) +#field xSize , FunPtr (Ptr () -> IO CInt) +#field xRoundup , FunPtr (CInt -> IO CInt) +#field xInit , FunPtr (Ptr () -> IO CInt) +#field xShutdown , FunPtr (Ptr () -> IO ()) +#field pAppData , Ptr () +#stoptype + #opaque_t sqlite3_mutex +#starttype sqlite3_mutex_methods +#field xMutexInit , FunPtr (IO CInt) +#field xMutexEnd , FunPtr (IO CInt) +#field xMutexAlloc , FunPtr (CInt -> IO (Ptr )) +#field xMutexFree , FunPtr (Ptr -> IO ()) +#field xMutexEnter , FunPtr (Ptr -> IO ()) +#field xMutexTry , FunPtr (Ptr -> IO CInt) +#field xMutexLeave , FunPtr (Ptr -> IO ()) +#field xMutexHeld , FunPtr (Ptr -> IO CInt) +#field xMutexNotheld , FunPtr (Ptr -> IO CInt) +#stoptype + +#opaque_t sqlite3_pcache + +#starttype sqlite3_pcache_page +#field pBuf , Ptr () +#field pExtra , Ptr () +#stoptype + #globalvar sqlite3_temp_directory , CString +#callback sqlite3_syscall_ptr , IO () #starttype sqlite3_vfs #field iVersion , CInt #field szOsFile , CInt @@ -67,76 +142,172 @@ Ptr CDouble -> IO CInt) #field xGetLastError , FunPtr (Ptr -> \ CInt -> CString -> IO CInt) +#field xCurrentTimeInt64 , FunPtr (Ptr -> \ + Ptr -> IO CInt) +#field xSetSystemCall , FunPtr (Ptr -> CString -> \ + -> IO CInt) +#field xGetSystemCall , FunPtr (Ptr -> CString -> \ + IO ) +#field xNextSystemCall , FunPtr (Ptr -> CString -> \ + IO CString) #stoptype +#starttype sqlite3_vtab +#field pModule , Ptr +#field zErrMsg , CString +#stoptype + #ccall sqlite3_aggregate_context , Ptr -> \ - CInt -> IO (Ptr ()) + CInt -> IO (Ptr ()) + #ccall sqlite3_auto_extension , FunPtr (IO ()) -> IO CInt + #ccall sqlite3_bind_parameter_count , Ptr -> IO CInt + #ccall sqlite3_bind_parameter_index , Ptr -> \ - CString -> IO CInt + CString -> IO CInt + #ccall sqlite3_bind_parameter_name , Ptr -> \ - CInt -> IO CString + CInt -> IO CString + #ccall sqlite3_blob_bytes , Ptr -> IO CInt + #ccall sqlite3_blob_close , Ptr -> IO CInt + #ccall sqlite3_blob_open , Ptr -> CString -> CString -> \ - CString -> Int64 -> CInt -> Ptr (Ptr ) -> \ - IO CInt + CString -> -> CInt -> Ptr (Ptr ) -> \ + IO CInt #ccall sqlite3_blob_read , Ptr -> Ptr () -> \ CInt -> CInt -> IO CInt + +#ccall sqlite3_blob_reopen , Ptr -> -> IO CInt + #ccall sqlite3_blob_write , Ptr -> Ptr () -> \ CInt -> CInt -> IO CInt + #ccall sqlite3_busy_handler , Ptr -> FunPtr (Ptr () -> \ CInt -> IO CInt) -> Ptr () -> IO CInt + #ccall sqlite3_busy_timeout , Ptr -> CInt -> IO CInt + #ccall sqlite3_changes , Ptr -> IO CInt + #ccall sqlite3_clear_bindings , Ptr -> IO CInt -#ccall sqlite3_close , Ptr -> IO CInt + #ccall sqlite3_column_count , Ptr -> IO CInt + #ccall sqlite3_context_db_handle , Ptr -> \ IO (Ptr ) + #ccall sqlite3_data_count , Ptr -> IO CInt + +#ccall sqlite3_db_filename , Ptr -> CString -> IO CString + #ccall sqlite3_db_handle , Ptr -> IO (Ptr ) + #ccall sqlite3_db_mutex , Ptr -> IO (Ptr ) + +#ccall sqlite3_db_readonly , Ptr -> CString -> IO CInt + +#ccall sqlite3_db_release_memory , Ptr -> IO CInt + +#ccall sqlite3_db_status , Ptr -> CInt -> Ptr CInt -> \ + Ptr CInt -> CInt -> IO CInt + +#ccall sqlite3_declare_vtab , Ptr -> CString -> IO CInt + #ccall sqlite3_enable_load_extension , Ptr -> CInt -> IO CInt + +#ccall sqlite3_enable_shared_cache , CInt -> IO CInt + #ccall sqlite3_exec , Ptr -> CString -> FunPtr (Ptr () -> \ CInt -> Ptr CString -> Ptr CString -> IO CInt) -> Ptr () -> \ Ptr CString -> IO CInt + #ccall sqlite3_extended_result_codes , Ptr -> CInt -> IO CInt + #ccall sqlite3_file_control , Ptr -> CString -> CInt -> \ Ptr () -> IO CInt + #ccall sqlite3_finalize , Ptr -> IO CInt + #ccall sqlite3_interrupt , Ptr -> IO () -#ccall sqlite3_last_insert_rowid , Ptr -> IO Int64 + +#ccall sqlite3_last_insert_rowid , Ptr -> IO + #ccall sqlite3_limit , Ptr -> CInt -> CInt -> IO CInt + #ccall sqlite3_load_extension , Ptr -> CString -> \ CString -> Ptr CString -> IO CInt + #ccall sqlite3_next_stmt , Ptr -> Ptr -> \ IO (Ptr ) + +#ccall sqlite3_overload_function , Ptr -> CString -> CInt -> IO CInt + #ccall sqlite3_progress_handler , Ptr -> CInt -> \ FunPtr (Ptr () -> IO CInt) -> Ptr () -> IO () + #ccall sqlite3_randomness , CInt -> Ptr () -> IO () + #ccall sqlite3_release_memory , CInt -> IO CInt + #ccall sqlite3_reset , Ptr -> IO CInt + #ccall sqlite3_reset_auto_extension , IO () + #ccall sqlite3_set_authorizer , Ptr -> FunPtr (Ptr () -> \ CInt -> CString -> CString -> CString -> CString -> IO CInt) -> \ Ptr () -> IO CInt + #ccall sqlite3_sleep , CInt -> IO CInt -#ccall sqlite3_soft_heap_limit , CInt -> IO () + +#ccall sqlite3_soft_heap_limit64 , -> IO + #ccall sqlite3_sql , Ptr -> IO CString + +#ccall sqlite3_status , CInt -> Ptr CInt -> Ptr CInt -> CInt -> IO CInt + #ccall sqlite3_step , Ptr -> IO CInt + +#ccall sqlite3_stmt_busy , Ptr -> IO CInt + +#ccall sqlite3_stmt_readonly , Ptr -> IO CInt + +#ccall sqlite3_stmt_status , Ptr -> CInt -> CInt -> IO CInt + +#ccall sqlite3_strglob , CString -> CString -> IO CInt + #ccall sqlite3_table_column_metadata , Ptr -> CString -> \ CString -> CString -> Ptr CString -> Ptr CString -> Ptr CInt -> \ Ptr CInt -> Ptr CInt -> IO CInt + #ccall sqlite3_threadsafe , IO CInt + #ccall sqlite3_total_changes , Ptr -> IO CInt + +#ccall sqlite3_unlock_notify , Ptr -> FunPtr (Ptr (Ptr ()) -> \ + CInt -> IO ()) -> Ptr () -> IO CInt + #ccall sqlite3_update_hook , Ptr -> FunPtr (Ptr () -> \ - CInt -> CString -> CString -> Int64 -> IO ()) -> \ + CInt -> CString -> CString -> -> IO ()) -> \ Ptr () -> IO (Ptr ()) + #ccall sqlite3_user_data , Ptr -> IO (Ptr ()) +#ccall sqlite3_vtab_on_conflict , Ptr -> IO CInt + +#ccall sqlite3_wal_autocheckpoint , Ptr -> CInt -> IO CInt + +#ccall sqlite3_wal_checkpoint , Ptr -> CString -> IO CInt + +#ccall sqlite3_wal_checkpoint_v2 , Ptr -> CString -> CInt -> \ + Ptr CInt -> Ptr CInt -> IO CInt + +#ccall sqlite3_wal_hook , Ptr -> FunPtr (Ptr () -> Ptr -> \ + CString -> CInt -> IO CInt) -> Ptr () -> IO (Ptr ()) + #num SQLITE_OK #num SQLITE_ERROR #num SQLITE_INTERNAL @@ -164,11 +335,61 @@ #num SQLITE_FORMAT #num SQLITE_RANGE #num SQLITE_NOTADB +#num SQLITE_NOTICE +#num SQLITE_WARNING #num SQLITE_ROW #num SQLITE_DONE + +#num SQLITE_IOERR_READ +#num SQLITE_IOERR_SHORT_READ +#num SQLITE_IOERR_WRITE +#num SQLITE_IOERR_FSYNC +#num SQLITE_IOERR_DIR_FSYNC +#num SQLITE_IOERR_TRUNCATE +#num SQLITE_IOERR_FSTAT +#num SQLITE_IOERR_UNLOCK +#num SQLITE_IOERR_RDLOCK +#num SQLITE_IOERR_DELETE +#num SQLITE_IOERR_BLOCKED +#num SQLITE_IOERR_NOMEM +#num SQLITE_IOERR_ACCESS +#num SQLITE_IOERR_CHECKRESERVEDLOCK +#num SQLITE_IOERR_LOCK +#num SQLITE_IOERR_CLOSE +#num SQLITE_IOERR_DIR_CLOSE +#num SQLITE_IOERR_SHMOPEN +#num SQLITE_IOERR_SHMSIZE +#num SQLITE_IOERR_SHMLOCK +#num SQLITE_IOERR_SHMMAP +#num SQLITE_IOERR_SEEK +#num SQLITE_IOERR_DELETE_NOENT +#num SQLITE_IOERR_MMAP +#num SQLITE_LOCKED_SHAREDCACHE +#num SQLITE_BUSY_RECOVERY +#num SQLITE_CANTOPEN_NOTEMPDIR +#num SQLITE_CANTOPEN_ISDIR +#num SQLITE_CANTOPEN_FULLPATH +#num SQLITE_CORRUPT_VTAB +#num SQLITE_READONLY_RECOVERY +#num SQLITE_READONLY_CANTLOCK +#num SQLITE_READONLY_ROLLBACK +#num SQLITE_ABORT_ROLLBACK +#num SQLITE_CONSTRAINT_CHECK +#num SQLITE_CONSTRAINT_COMMITHOOK +#num SQLITE_CONSTRAINT_FOREIGNKEY +#num SQLITE_CONSTRAINT_FUNCTION +#num SQLITE_CONSTRAINT_NOTNULL +#num SQLITE_CONSTRAINT_PRIMARYKEY +#num SQLITE_CONSTRAINT_TRIGGER +#num SQLITE_CONSTRAINT_UNIQUE +#num SQLITE_CONSTRAINT_VTAB +#num SQLITE_NOTICE_RECOVER_WAL +#num SQLITE_NOTICE_RECOVER_ROLLBACK + #num SQLITE_ACCESS_EXISTS #num SQLITE_ACCESS_READWRITE #num SQLITE_ACCESS_READ + #num SQLITE_CREATE_INDEX #num SQLITE_CREATE_TABLE #num SQLITE_CREATE_TEMP_INDEX @@ -202,24 +423,83 @@ #num SQLITE_FUNCTION #num SQLITE_SAVEPOINT #num SQLITE_COPY + #num SQLITE_UTF8 #num SQLITE_UTF16LE #num SQLITE_UTF16BE #num SQLITE_UTF16 #num SQLITE_ANY #num SQLITE_UTF16_ALIGNED + #num SQLITE_INTEGER #num SQLITE_FLOAT #num SQLITE_BLOB #num SQLITE_NULL #num SQLITE_TEXT #num SQLITE3_TEXT + +#num SQLITE_CHECKPOINT_PASSIVE +#num SQLITE_CHECKPOINT_FULL +#num SQLITE_CHECKPOINT_RESTART + +#num SQLITE_CONFIG_SINGLETHREAD +#num SQLITE_CONFIG_MULTITHREAD +#num SQLITE_CONFIG_SERIALIZED +#num SQLITE_CONFIG_MALLOC +#num SQLITE_CONFIG_GETMALLOC +#num SQLITE_CONFIG_SCRATCH +#num SQLITE_CONFIG_PAGECACHE +#num SQLITE_CONFIG_HEAP +#num SQLITE_CONFIG_MEMSTATUS +#num SQLITE_CONFIG_MUTEX +#num SQLITE_CONFIG_GETMUTEX +#num SQLITE_CONFIG_LOOKASIDE +#num SQLITE_CONFIG_PCACHE +#num SQLITE_CONFIG_GETPCACHE +#num SQLITE_CONFIG_LOG +#num SQLITE_CONFIG_URI +#num SQLITE_CONFIG_PCACHE2 +#num SQLITE_CONFIG_GETPCACHE2 +#num SQLITE_CONFIG_COVERING_INDEX_SCAN +#num SQLITE_CONFIG_SQLLOG +#num SQLITE_CONFIG_MMAP_SIZE + +#num SQLITE_DBCONFIG_LOOKASIDE +#num SQLITE_DBCONFIG_ENABLE_FKEY +#num SQLITE_DBCONFIG_ENABLE_TRIGGER + #num SQLITE_DENY #num SQLITE_IGNORE + +#num SQLITE_ROLLBACK +#num SQLITE_FAIL +#num SQLITE_REPLACE + #num SQLITE_FCNTL_LOCKSTATE #num SQLITE_GET_LOCKPROXYFILE #num SQLITE_SET_LOCKPROXYFILE #num SQLITE_LAST_ERRNO +#num SQLITE_FCNTL_SIZE_HINT +#num SQLITE_FCNTL_CHUNK_SIZE +#num SQLITE_FCNTL_FILE_POINTER +#num SQLITE_FCNTL_SYNC_OMITTED +#num SQLITE_FCNTL_WIN32_AV_RETRY +#num SQLITE_FCNTL_PERSIST_WAL +#num SQLITE_FCNTL_OVERWRITE +#num SQLITE_FCNTL_VFSNAME +#num SQLITE_FCNTL_POWERSAFE_OVERWRITE +#num SQLITE_FCNTL_PRAGMA +#num SQLITE_FCNTL_BUSYHANDLER +#num SQLITE_FCNTL_TEMPFILENAME +#num SQLITE_FCNTL_MMAP_SIZE + +#num SQLITE_INDEX_CONSTRAINT_EQ +#num SQLITE_INDEX_CONSTRAINT_GT +#num SQLITE_INDEX_CONSTRAINT_LE +#num SQLITE_INDEX_CONSTRAINT_LT +#num SQLITE_INDEX_CONSTRAINT_GE +#num SQLITE_INDEX_CONSTRAINT_MATCH + #num SQLITE_IOCAP_ATOMIC #num SQLITE_IOCAP_ATOMIC512 #num SQLITE_IOCAP_ATOMIC1K @@ -231,54 +511,34 @@ #num SQLITE_IOCAP_ATOMIC64K #num SQLITE_IOCAP_SAFE_APPEND #num SQLITE_IOCAP_SEQUENTIAL -#num SQLITE_IOERR_READ -#num SQLITE_IOERR_SHORT_READ -#num SQLITE_IOERR_WRITE -#num SQLITE_IOERR_FSYNC -#num SQLITE_IOERR_DIR_FSYNC -#num SQLITE_IOERR_TRUNCATE -#num SQLITE_IOERR_FSTAT -#num SQLITE_IOERR_UNLOCK -#num SQLITE_IOERR_RDLOCK -#num SQLITE_IOERR_DELETE -#num SQLITE_IOERR_BLOCKED -#num SQLITE_IOERR_NOMEM -#num SQLITE_IOERR_ACCESS -#num SQLITE_IOERR_CHECKRESERVEDLOCK -#num SQLITE_IOERR_LOCK -#num SQLITE_IOERR_CLOSE -#num SQLITE_IOERR_DIR_CLOSE --- num SQLITE_LOCKED_SHAREDCACHE -#num SQLITE_LIMIT_LENGTH -#num SQLITE_LIMIT_SQL_LENGTH -#num SQLITE_LIMIT_COLUMN -#num SQLITE_LIMIT_EXPR_DEPTH -#num SQLITE_LIMIT_COMPOUND_SELECT -#num SQLITE_LIMIT_VDBE_OP -#num SQLITE_LIMIT_FUNCTION_ARG -#num SQLITE_LIMIT_ATTACHED -#num SQLITE_LIMIT_LIKE_PATTERN_LENGTH -#num SQLITE_LIMIT_VARIABLE_NUMBER --- num SQLITE_LIMIT_TRIGGER_DEPTH +#num SQLITE_IOCAP_UNDELETABLE_WHEN_OPEN +#num SQLITE_IOCAP_POWERSAFE_OVERWRITE + #num SQLITE_LOCK_NONE #num SQLITE_LOCK_SHARED #num SQLITE_LOCK_RESERVED #num SQLITE_LOCK_PENDING #num SQLITE_LOCK_EXCLUSIVE + #num SQLITE_MUTEX_FAST #num SQLITE_MUTEX_RECURSIVE #num SQLITE_MUTEX_STATIC_MASTER #num SQLITE_MUTEX_STATIC_MEM #num SQLITE_MUTEX_STATIC_MEM2 --- num SQLITE_MUTEX_STATIC_OPEN +#num SQLITE_MUTEX_STATIC_OPEN #num SQLITE_MUTEX_STATIC_PRNG #num SQLITE_MUTEX_STATIC_LRU #num SQLITE_MUTEX_STATIC_LRU2 +#num SQLITE_MUTEX_STATIC_PMEM + #num SQLITE_OPEN_READONLY #num SQLITE_OPEN_READWRITE #num SQLITE_OPEN_CREATE #num SQLITE_OPEN_DELETEONCLOSE #num SQLITE_OPEN_EXCLUSIVE +#num SQLITE_OPEN_AUTOPROXY +#num SQLITE_OPEN_URI +#num SQLITE_OPEN_MEMORY #num SQLITE_OPEN_MAIN_DB #num SQLITE_OPEN_TEMP_DB #num SQLITE_OPEN_TRANSIENT_DB @@ -290,37 +550,157 @@ #num SQLITE_OPEN_FULLMUTEX #num SQLITE_OPEN_SHAREDCACHE #num SQLITE_OPEN_PRIVATECACHE +#num SQLITE_OPEN_WAL -#pointer SQLITE_VERSION -#num SQLITE_VERSION_NUMBER -#pointer SQLITE_SOURCE_ID +#num SQLITE_SHM_UNLOCK +#num SQLITE_SHM_LOCK +#num SQLITE_SHM_SHARED +#num SQLITE_SHM_EXCLUSIVE --- pointer SQLITE_SOURCE_ID +#globalarray SQLITE_VERSION , CChar +#num SQLITE_VERSION_NUMBER +#globalarray SQLITE_SOURCE_ID , CChar #callback sqlite3_destructor_type , FunPtr (Ptr () -> IO ()) - #function_pointer SQLITE_STATIC #function_pointer SQLITE_TRANSIENT +#num SQLITE_STATUS_MEMORY_USED +#num SQLITE_STATUS_PAGECACHE_USED +#num SQLITE_STATUS_PAGECACHE_OVERFLOW +#num SQLITE_STATUS_SCRATCH_USED +#num SQLITE_STATUS_SCRATCH_OVERFLOW +#num SQLITE_STATUS_MALLOC_SIZE +#num SQLITE_STATUS_PARSER_STACK +#num SQLITE_STATUS_PAGECACHE_SIZE +#num SQLITE_STATUS_SCRATCH_SIZE +#num SQLITE_STATUS_MALLOC_COUNT + #num SQLITE_SYNC_NORMAL #num SQLITE_SYNC_FULL #num SQLITE_SYNC_DATAONLY + +#num SQLITE_TESTCTRL_FIRST #num SQLITE_TESTCTRL_PRNG_SAVE #num SQLITE_TESTCTRL_PRNG_RESTORE #num SQLITE_TESTCTRL_PRNG_RESET #num SQLITE_TESTCTRL_BITVEC_TEST #num SQLITE_TESTCTRL_FAULT_INSTALL #num SQLITE_TESTCTRL_BENIGN_MALLOC_HOOKS --- num SQLITE_TESTCTRL_PENDING_BYTE --- num SQLITE_TESTCTRL_ASSERT --- num SQLITE_TESTCTRL_ALWAYS --- num SQLITE_TESTCTRL_RESERVE +#num SQLITE_TESTCTRL_PENDING_BYTE +#num SQLITE_TESTCTRL_ASSERT +#num SQLITE_TESTCTRL_ALWAYS +#num SQLITE_TESTCTRL_RESERVE +#num SQLITE_TESTCTRL_OPTIMIZATIONS +#num SQLITE_TESTCTRL_ISKEYWORD +#num SQLITE_TESTCTRL_SCRATCHMALLOC +#num SQLITE_TESTCTRL_LOCALTIME_FAULT +#num SQLITE_TESTCTRL_EXPLAIN_STMT +#num SQLITE_TESTCTRL_LAST +#num SQLITE_LIMIT_LENGTH +#num SQLITE_LIMIT_SQL_LENGTH +#num SQLITE_LIMIT_COLUMN +#num SQLITE_LIMIT_EXPR_DEPTH +#num SQLITE_LIMIT_COMPOUND_SELECT +#num SQLITE_LIMIT_VDBE_OP +#num SQLITE_LIMIT_FUNCTION_ARG +#num SQLITE_LIMIT_ATTACHED +#num SQLITE_LIMIT_LIKE_PATTERN_LENGTH +#num SQLITE_LIMIT_VARIABLE_NUMBER +#num SQLITE_LIMIT_TRIGGER_DEPTH + +#num SQLITE_DBSTATUS_LOOKASIDE_USED +#num SQLITE_DBSTATUS_CACHE_USED +#num SQLITE_DBSTATUS_SCHEMA_USED +#num SQLITE_DBSTATUS_STMT_USED +#num SQLITE_DBSTATUS_LOOKASIDE_HIT +#num SQLITE_DBSTATUS_LOOKASIDE_MISS_SIZE +#num SQLITE_DBSTATUS_LOOKASIDE_MISS_FULL +#num SQLITE_DBSTATUS_CACHE_HIT +#num SQLITE_DBSTATUS_CACHE_MISS +#num SQLITE_DBSTATUS_CACHE_WRITE +#num SQLITE_DBSTATUS_MAX + +#num SQLITE_STMTSTATUS_FULLSCAN_STEP +#num SQLITE_STMTSTATUS_SORT +#num SQLITE_STMTSTATUS_AUTOINDEX + +#integral_t sqlite3_int64 +#integral_t sqlite3_uint64 + +#starttype sqlite3_module +#field iVersion , CInt +#field xCreate , FunPtr (Ptr -> Ptr () -> CInt -> \ + Ptr CString -> Ptr (Ptr ) -> Ptr CString -> IO CInt) +#field xConnect , FunPtr (Ptr -> Ptr () -> CInt -> \ + Ptr CString -> Ptr (Ptr ) -> Ptr CString -> IO CInt) +#field xBestIndex , FunPtr (Ptr -> \ + Ptr -> IO CInt) +#field xDisconnect , FunPtr (Ptr -> IO CInt) +#field xDestroy , FunPtr (Ptr -> IO CInt) +#field xOpen , FunPtr (Ptr -> \ + Ptr (Ptr ) -> IO CInt) +#field xClose , FunPtr (Ptr -> IO CInt) +#field xFilter , FunPtr (Ptr -> CInt -> \ + CString -> CInt -> Ptr (Ptr ) -> IO CInt) +#field xNext , FunPtr (Ptr -> IO CInt) +#field xEof , FunPtr (Ptr -> IO CInt) +#field xColumn , FunPtr (Ptr -> \ + Ptr -> CInt -> IO CInt) +#field xRowid , FunPtr (Ptr -> \ + Ptr -> IO CInt) +#field xUpdate , FunPtr (Ptr -> CInt -> \ + Ptr (Ptr ) -> Ptr -> IO CInt) +#field xBegin , FunPtr (Ptr -> IO CInt) +#field xSync , FunPtr (Ptr -> IO CInt) +#field xCommit , FunPtr (Ptr -> IO CInt) +#field xRollback , FunPtr (Ptr -> IO CInt) +#field xFindFunction , FunPtr (Ptr -> CInt -> CString -> \ + Ptr (FunPtr (Ptr -> CInt -> Ptr (Ptr ) -> \ + Ptr (Ptr ()) -> IO ())) -> Ptr (Ptr ()) -> IO CInt) +#field xRename , FunPtr (Ptr -> CString -> IO CInt) +#field xSavepoint , FunPtr (Ptr -> CInt -> IO CInt) +#field xRelease , FunPtr (Ptr -> CInt -> IO CInt) +#field xRollbackTo , FunPtr (Ptr -> CInt -> IO CInt) +#stoptype + +#starttype sqlite3_vtab_cursor +#field pVtab , Ptr +#stoptype + #opaque_t sqlite3_blob #opaque_t sqlite3 + +#starttype sqlite3_pcache_methods2 +#field iVersion , CInt +#field pArg , Ptr () +#field xInit , FunPtr (Ptr () -> IO CInt) +#field xShutdown , FunPtr (Ptr () -> IO ()) +#field xCreate , FunPtr (CInt -> CInt -> CInt -> IO (Ptr )) +#field xCachesize , FunPtr (Ptr -> CInt -> IO ()) +#field xPagecount , FunPtr (Ptr -> IO CInt) +#field xFetch , FunPtr (Ptr -> CUInt -> CInt -> IO (Ptr )) +#field xUnpin , FunPtr (Ptr -> Ptr -> CInt -> IO ()) +#field xRekey , FunPtr (Ptr -> Ptr -> CUInt -> CUInt -> IO ()) +#field xTruncate , FunPtr (Ptr -> CUInt -> IO ()) +#field xDestroy , FunPtr (Ptr -> IO ()) +#field xShrink , FunPtr (Ptr -> IO ()) +#stoptype + #opaque_t sqlite3_stmt #opaque_t sqlite3_value +#ccall sqlite3_backup_init , Ptr -> CString -> \ + Ptr -> CString -> IO (Ptr ) +#ccall sqlite3_backup_step , Ptr -> CInt -> IO CInt +#ccall sqlite3_backup_finish , Ptr -> IO CInt +#ccall sqlite3_backup_remaining , Ptr -> IO CInt +#ccall sqlite3_backup_pagecount , Ptr -> IO CInt + +#ccall sqlite3_close , Ptr -> IO CInt +#ccall sqlite3_close_v2 , Ptr -> IO CInt + #ccall sqlite3_collation_needed , Ptr -> \ Ptr () -> FunPtr (Ptr () -> Ptr -> CInt -> \ CString -> IO ()) -> IO CInt @@ -340,10 +720,12 @@ CInt -> IO CString #ccall sqlite3_column_origin_name16 , Ptr -> \ CInt -> IO (Ptr ()) + #ccall sqlite3_column_decltype , Ptr -> \ CInt -> IO CString #ccall sqlite3_column_decltype16 , Ptr -> \ CInt -> IO (Ptr ()) + #ccall sqlite3_column_name , Ptr -> CInt -> \ IO CString #ccall sqlite3_column_name16 , Ptr -> CInt -> \ @@ -367,10 +749,16 @@ CInt -> Ptr () -> FunPtr (Ptr () -> CInt -> Ptr () -> \ CInt -> Ptr () -> IO CInt) -> IO CInt +#ccall sqlite3_create_module , Ptr -> CString -> \ + Ptr -> Ptr () -> IO CInt +#ccall sqlite3_create_module_v2 , Ptr -> CString -> \ + Ptr -> Ptr () -> FunPtr (Ptr () -> IO ()) -> IO CInt + #ccall sqlite3_errcode , Ptr -> IO CInt #ccall sqlite3_extended_errcode , Ptr -> IO CInt #ccall sqlite3_errmsg , Ptr -> IO CString #ccall sqlite3_errmsg16 , Ptr -> IO (Ptr ()) +#ccall sqlite3_errstr , CInt -> IO CString #ccall sqlite3_malloc , CInt -> IO (Ptr ()) #ccall sqlite3_realloc , Ptr () -> CInt -> IO (Ptr ()) @@ -396,8 +784,8 @@ #ccall sqlite3_sourceid , IO CString #ccall sqlite3_libversion_number , IO CInt -#ccall sqlite3_memory_used , IO Int64 -#ccall sqlite3_memory_highwater , CInt -> IO Int64 +#ccall sqlite3_memory_used , IO +#ccall sqlite3_memory_highwater , CInt -> IO #ccall sqlite3_mutex_alloc , CInt -> IO (Ptr ) #ccall sqlite3_mutex_free , Ptr -> IO () @@ -405,14 +793,16 @@ #ccall sqlite3_mutex_try , Ptr -> IO CInt #ccall sqlite3_mutex_leave , Ptr -> IO () --- ccall sqlite3_mutex_held , Ptr -> IO CInt --- ccall sqlite3_mutex_notheld , Ptr -> IO CInt - #ccall sqlite3_open , CString -> Ptr (Ptr ) -> IO CInt #ccall sqlite3_open16 , Ptr () -> Ptr (Ptr ) -> IO CInt #ccall sqlite3_open_v2 , CString -> Ptr (Ptr ) -> \ CInt -> CString -> IO CInt +#ccall sqlite3_trace , Ptr -> FunPtr (Ptr () -> CString -> \ + IO ()) -> Ptr () -> IO (Ptr ()) +#ccall sqlite3_profile , Ptr -> FunPtr (Ptr () -> CString -> \ + -> IO ()) -> Ptr () -> IO (Ptr ()) + #ccall sqlite3_result_blob , Ptr -> Ptr () -> \ CInt -> FunPtr (Ptr () -> IO ()) -> IO () #ccall sqlite3_result_double , Ptr -> \ @@ -426,7 +816,7 @@ #ccall sqlite3_result_error_code , Ptr -> \ CInt -> IO () #ccall sqlite3_result_int , Ptr -> CInt -> IO () -#ccall sqlite3_result_int64 , Ptr -> Int64 -> IO () +#ccall sqlite3_result_int64 , Ptr -> -> IO () #ccall sqlite3_result_null , Ptr -> IO () #ccall sqlite3_result_text , Ptr -> CString -> \ CInt -> FunPtr (Ptr () -> IO ()) -> IO () @@ -441,12 +831,20 @@ #ccall sqlite3_result_zeroblob , Ptr -> \ CInt -> IO () +#ccall sqlite3_stricmp , CString -> CString -> IO CInt +#ccall sqlite3_strnicmp , CString -> CString -> CInt -> IO CInt + +#ccall sqlite3_uri_parameter , CString -> CString -> IO CString +#ccall sqlite3_uri_boolean , CString -> CString -> CInt -> IO CInt +#ccall sqlite3_uri_int64 , CString -> CString -> -> \ + IO + #ccall sqlite3_value_blob , Ptr -> IO (Ptr ()) #ccall sqlite3_value_bytes , Ptr -> IO CInt #ccall sqlite3_value_bytes16 , Ptr -> IO CInt #ccall sqlite3_value_double , Ptr -> IO CDouble #ccall sqlite3_value_int , Ptr -> IO CInt -#ccall sqlite3_value_int64 , Ptr -> IO Int64 +#ccall sqlite3_value_int64 , Ptr -> IO #ccall sqlite3_value_text , Ptr -> IO (Ptr CUChar) #ccall sqlite3_value_text16 , Ptr -> IO (Ptr ()) #ccall sqlite3_value_text16le , Ptr -> IO (Ptr ()) @@ -465,7 +863,7 @@ #ccall sqlite3_bind_int , Ptr -> CInt -> \ CInt -> IO CInt #ccall sqlite3_bind_int64 , Ptr -> CInt -> \ - Int64 -> IO CInt + -> IO CInt #ccall sqlite3_bind_null , Ptr -> CInt -> IO CInt #ccall sqlite3_bind_text , Ptr -> CInt -> \ CString -> CInt -> FunPtr (Ptr () -> IO ()) -> IO CInt @@ -485,18 +883,31 @@ #ccall sqlite3_prepare16_v2 , Ptr -> Ptr () -> CInt -> \ Ptr (Ptr ) -> Ptr (Ptr ()) -> IO CInt -#ccall sqlite3_create_function , Ptr -> CString -> \ - CInt -> CInt -> Ptr () -> FunPtr (Ptr -> \ - CInt -> Ptr (Ptr ) -> IO ()) -> \ +#ccall sqlite3_create_function , \ + Ptr -> CString -> CInt -> CInt -> Ptr () -> \ FunPtr (Ptr -> CInt -> \ - Ptr (Ptr ) -> IO ()) -> \ - FunPtr (Ptr -> IO ()) -> IO CInt -#ccall sqlite3_create_function16 , Ptr -> Ptr () -> CInt -> \ - CInt -> Ptr () -> FunPtr (Ptr -> CInt -> \ - Ptr (Ptr ) -> IO ()) -> \ + Ptr (Ptr ) -> IO ()) -> \ FunPtr (Ptr -> CInt -> \ - Ptr (Ptr ) -> IO ()) -> \ - FunPtr (Ptr -> IO ()) -> IO CInt + Ptr (Ptr ) -> IO ()) -> \ + FunPtr (Ptr -> IO ()) -> \ + IO CInt +#ccall sqlite3_create_function16 , \ + Ptr -> Ptr () -> CInt -> CInt -> Ptr () -> \ + FunPtr (Ptr -> CInt -> \ + Ptr (Ptr ) -> IO ()) -> \ + FunPtr (Ptr -> CInt -> \ + Ptr (Ptr ) -> IO ()) -> \ + FunPtr (Ptr -> IO ()) -> \ + IO CInt +#ccall sqlite3_create_function_v2 , \ + Ptr -> CString -> CInt -> CInt -> Ptr () -> \ + FunPtr (Ptr -> CInt -> \ + Ptr (Ptr ) -> IO ()) -> \ + FunPtr (Ptr -> CInt -> \ + Ptr (Ptr ) -> IO ()) -> \ + FunPtr (Ptr -> IO ()) -> \ + FunPtr (Ptr () -> IO ()) -> \ + IO CInt #ccall sqlite3_get_autocommit , Ptr -> IO CInt @@ -506,13 +917,10 @@ #ccall sqlite3_column_double , Ptr -> CInt -> IO CDouble #ccall sqlite3_column_int , Ptr -> CInt -> IO CInt #ccall sqlite3_column_int64 , Ptr -> \ - CInt -> IO Int64 + CInt -> IO #ccall sqlite3_column_text , Ptr -> \ CInt -> IO (Ptr CUChar) #ccall sqlite3_column_text16 , Ptr -> CInt -> IO (Ptr ()) #ccall sqlite3_column_type , Ptr -> CInt -> IO CInt #ccall sqlite3_column_value , Ptr -> \ CInt -> IO (Ptr ) - -#ccall sqlite3_enable_shared_cache , CInt -> IO CInt - diff --git a/src/inlines.c b/src/inlines.c deleted file mode 100644 --- a/src/inlines.c +++ /dev/null @@ -1,7 +0,0 @@ -#include - -const char *array_sqlite3_version(void) -{ - return sqlite3_version; -} -