| Index: third_party/sqlite/sqlite-src-3080704/src/os_win.c
|
| diff --git a/third_party/sqlite/sqlite-src-3080704/src/os_win.c b/third_party/sqlite/sqlite-src-3080704/src/os_win.c
|
| deleted file mode 100644
|
| index 8ca2107d90f99ba6d0ac596520b17408977a4bc3..0000000000000000000000000000000000000000
|
| --- a/third_party/sqlite/sqlite-src-3080704/src/os_win.c
|
| +++ /dev/null
|
| @@ -1,5549 +0,0 @@
|
| -/*
|
| -** 2004 May 22
|
| -**
|
| -** 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.
|
| -**
|
| -******************************************************************************
|
| -**
|
| -** This file contains code that is specific to Windows.
|
| -*/
|
| -#include "sqliteInt.h"
|
| -#if SQLITE_OS_WIN /* This file is used for Windows only */
|
| -
|
| -/*
|
| -** Include code that is common to all os_*.c files
|
| -*/
|
| -#include "os_common.h"
|
| -
|
| -/*
|
| -** Include the header file for the Windows VFS.
|
| -*/
|
| -#include "os_win.h"
|
| -
|
| -/*
|
| -** Compiling and using WAL mode requires several APIs that are only
|
| -** available in Windows platforms based on the NT kernel.
|
| -*/
|
| -#if !SQLITE_OS_WINNT && !defined(SQLITE_OMIT_WAL)
|
| -# error "WAL mode requires support from the Windows NT kernel, compile\
|
| - with SQLITE_OMIT_WAL."
|
| -#endif
|
| -
|
| -/*
|
| -** Are most of the Win32 ANSI APIs available (i.e. with certain exceptions
|
| -** based on the sub-platform)?
|
| -*/
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT && !defined(SQLITE_WIN32_NO_ANSI)
|
| -# define SQLITE_WIN32_HAS_ANSI
|
| -#endif
|
| -
|
| -/*
|
| -** Are most of the Win32 Unicode APIs available (i.e. with certain exceptions
|
| -** based on the sub-platform)?
|
| -*/
|
| -#if (SQLITE_OS_WINCE || SQLITE_OS_WINNT || SQLITE_OS_WINRT) && \
|
| - !defined(SQLITE_WIN32_NO_WIDE)
|
| -# define SQLITE_WIN32_HAS_WIDE
|
| -#endif
|
| -
|
| -/*
|
| -** Make sure at least one set of Win32 APIs is available.
|
| -*/
|
| -#if !defined(SQLITE_WIN32_HAS_ANSI) && !defined(SQLITE_WIN32_HAS_WIDE)
|
| -# error "At least one of SQLITE_WIN32_HAS_ANSI and SQLITE_WIN32_HAS_WIDE\
|
| - must be defined."
|
| -#endif
|
| -
|
| -/*
|
| -** Define the required Windows SDK version constants if they are not
|
| -** already available.
|
| -*/
|
| -#ifndef NTDDI_WIN8
|
| -# define NTDDI_WIN8 0x06020000
|
| -#endif
|
| -
|
| -#ifndef NTDDI_WINBLUE
|
| -# define NTDDI_WINBLUE 0x06030000
|
| -#endif
|
| -
|
| -/*
|
| -** Check to see if the GetVersionEx[AW] functions are deprecated on the
|
| -** target system. GetVersionEx was first deprecated in Win8.1.
|
| -*/
|
| -#ifndef SQLITE_WIN32_GETVERSIONEX
|
| -# if defined(NTDDI_VERSION) && NTDDI_VERSION >= NTDDI_WINBLUE
|
| -# define SQLITE_WIN32_GETVERSIONEX 0 /* GetVersionEx() is deprecated */
|
| -# else
|
| -# define SQLITE_WIN32_GETVERSIONEX 1 /* GetVersionEx() is current */
|
| -# endif
|
| -#endif
|
| -
|
| -/*
|
| -** This constant should already be defined (in the "WinDef.h" SDK file).
|
| -*/
|
| -#ifndef MAX_PATH
|
| -# define MAX_PATH (260)
|
| -#endif
|
| -
|
| -/*
|
| -** Maximum pathname length (in chars) for Win32. This should normally be
|
| -** MAX_PATH.
|
| -*/
|
| -#ifndef SQLITE_WIN32_MAX_PATH_CHARS
|
| -# define SQLITE_WIN32_MAX_PATH_CHARS (MAX_PATH)
|
| -#endif
|
| -
|
| -/*
|
| -** This constant should already be defined (in the "WinNT.h" SDK file).
|
| -*/
|
| -#ifndef UNICODE_STRING_MAX_CHARS
|
| -# define UNICODE_STRING_MAX_CHARS (32767)
|
| -#endif
|
| -
|
| -/*
|
| -** Maximum pathname length (in chars) for WinNT. This should normally be
|
| -** UNICODE_STRING_MAX_CHARS.
|
| -*/
|
| -#ifndef SQLITE_WINNT_MAX_PATH_CHARS
|
| -# define SQLITE_WINNT_MAX_PATH_CHARS (UNICODE_STRING_MAX_CHARS)
|
| -#endif
|
| -
|
| -/*
|
| -** Maximum pathname length (in bytes) for Win32. The MAX_PATH macro is in
|
| -** characters, so we allocate 4 bytes per character assuming worst-case of
|
| -** 4-bytes-per-character for UTF8.
|
| -*/
|
| -#ifndef SQLITE_WIN32_MAX_PATH_BYTES
|
| -# define SQLITE_WIN32_MAX_PATH_BYTES (SQLITE_WIN32_MAX_PATH_CHARS*4)
|
| -#endif
|
| -
|
| -/*
|
| -** Maximum pathname length (in bytes) for WinNT. This should normally be
|
| -** UNICODE_STRING_MAX_CHARS * sizeof(WCHAR).
|
| -*/
|
| -#ifndef SQLITE_WINNT_MAX_PATH_BYTES
|
| -# define SQLITE_WINNT_MAX_PATH_BYTES \
|
| - (sizeof(WCHAR) * SQLITE_WINNT_MAX_PATH_CHARS)
|
| -#endif
|
| -
|
| -/*
|
| -** Maximum error message length (in chars) for WinRT.
|
| -*/
|
| -#ifndef SQLITE_WIN32_MAX_ERRMSG_CHARS
|
| -# define SQLITE_WIN32_MAX_ERRMSG_CHARS (1024)
|
| -#endif
|
| -
|
| -/*
|
| -** Returns non-zero if the character should be treated as a directory
|
| -** separator.
|
| -*/
|
| -#ifndef winIsDirSep
|
| -# define winIsDirSep(a) (((a) == '/') || ((a) == '\\'))
|
| -#endif
|
| -
|
| -/*
|
| -** This macro is used when a local variable is set to a value that is
|
| -** [sometimes] not used by the code (e.g. via conditional compilation).
|
| -*/
|
| -#ifndef UNUSED_VARIABLE_VALUE
|
| -# define UNUSED_VARIABLE_VALUE(x) (void)(x)
|
| -#endif
|
| -
|
| -/*
|
| -** Returns the character that should be used as the directory separator.
|
| -*/
|
| -#ifndef winGetDirSep
|
| -# define winGetDirSep() '\\'
|
| -#endif
|
| -
|
| -/*
|
| -** Do we need to manually define the Win32 file mapping APIs for use with WAL
|
| -** mode (e.g. these APIs are available in the Windows CE SDK; however, they
|
| -** are not present in the header file)?
|
| -*/
|
| -#if SQLITE_WIN32_FILEMAPPING_API && !defined(SQLITE_OMIT_WAL)
|
| -/*
|
| -** Two of the file mapping APIs are different under WinRT. Figure out which
|
| -** set we need.
|
| -*/
|
| -#if SQLITE_OS_WINRT
|
| -WINBASEAPI HANDLE WINAPI CreateFileMappingFromApp(HANDLE, \
|
| - LPSECURITY_ATTRIBUTES, ULONG, ULONG64, LPCWSTR);
|
| -
|
| -WINBASEAPI LPVOID WINAPI MapViewOfFileFromApp(HANDLE, ULONG, ULONG64, SIZE_T);
|
| -#else
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| -WINBASEAPI HANDLE WINAPI CreateFileMappingA(HANDLE, LPSECURITY_ATTRIBUTES, \
|
| - DWORD, DWORD, DWORD, LPCSTR);
|
| -#endif /* defined(SQLITE_WIN32_HAS_ANSI) */
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_WIDE)
|
| -WINBASEAPI HANDLE WINAPI CreateFileMappingW(HANDLE, LPSECURITY_ATTRIBUTES, \
|
| - DWORD, DWORD, DWORD, LPCWSTR);
|
| -#endif /* defined(SQLITE_WIN32_HAS_WIDE) */
|
| -
|
| -WINBASEAPI LPVOID WINAPI MapViewOfFile(HANDLE, DWORD, DWORD, DWORD, SIZE_T);
|
| -#endif /* SQLITE_OS_WINRT */
|
| -
|
| -/*
|
| -** This file mapping API is common to both Win32 and WinRT.
|
| -*/
|
| -WINBASEAPI BOOL WINAPI UnmapViewOfFile(LPCVOID);
|
| -#endif /* SQLITE_WIN32_FILEMAPPING_API && !defined(SQLITE_OMIT_WAL) */
|
| -
|
| -/*
|
| -** Some Microsoft compilers lack this definition.
|
| -*/
|
| -#ifndef INVALID_FILE_ATTRIBUTES
|
| -# define INVALID_FILE_ATTRIBUTES ((DWORD)-1)
|
| -#endif
|
| -
|
| -#ifndef FILE_FLAG_MASK
|
| -# define FILE_FLAG_MASK (0xFF3C0000)
|
| -#endif
|
| -
|
| -#ifndef FILE_ATTRIBUTE_MASK
|
| -# define FILE_ATTRIBUTE_MASK (0x0003FFF7)
|
| -#endif
|
| -
|
| -#ifndef SQLITE_OMIT_WAL
|
| -/* Forward references to structures used for WAL */
|
| -typedef struct winShm winShm; /* A connection to shared-memory */
|
| -typedef struct winShmNode winShmNode; /* A region of shared-memory */
|
| -#endif
|
| -
|
| -/*
|
| -** WinCE lacks native support for file locking so we have to fake it
|
| -** with some code of our own.
|
| -*/
|
| -#if SQLITE_OS_WINCE
|
| -typedef struct winceLock {
|
| - int nReaders; /* Number of reader locks obtained */
|
| - BOOL bPending; /* Indicates a pending lock has been obtained */
|
| - BOOL bReserved; /* Indicates a reserved lock has been obtained */
|
| - BOOL bExclusive; /* Indicates an exclusive lock has been obtained */
|
| -} winceLock;
|
| -#endif
|
| -
|
| -/*
|
| -** The winFile structure is a subclass of sqlite3_file* specific to the win32
|
| -** portability layer.
|
| -*/
|
| -typedef struct winFile winFile;
|
| -struct winFile {
|
| - const sqlite3_io_methods *pMethod; /*** Must be first ***/
|
| - sqlite3_vfs *pVfs; /* The VFS used to open this file */
|
| - HANDLE h; /* Handle for accessing the file */
|
| - u8 locktype; /* Type of lock currently held on this file */
|
| - short sharedLockByte; /* Randomly chosen byte used as a shared lock */
|
| - u8 ctrlFlags; /* Flags. See WINFILE_* below */
|
| - DWORD lastErrno; /* The Windows errno from the last I/O error */
|
| -#ifndef SQLITE_OMIT_WAL
|
| - winShm *pShm; /* Instance of shared memory on this file */
|
| -#endif
|
| - const char *zPath; /* Full pathname of this file */
|
| - int szChunk; /* Chunk size configured by FCNTL_CHUNK_SIZE */
|
| -#if SQLITE_OS_WINCE
|
| - LPWSTR zDeleteOnClose; /* Name of file to delete when closing */
|
| - HANDLE hMutex; /* Mutex used to control access to shared lock */
|
| - HANDLE hShared; /* Shared memory segment used for locking */
|
| - winceLock local; /* Locks obtained by this instance of winFile */
|
| - winceLock *shared; /* Global shared lock memory for the file */
|
| -#endif
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - int nFetchOut; /* Number of outstanding xFetch references */
|
| - HANDLE hMap; /* Handle for accessing memory mapping */
|
| - void *pMapRegion; /* Area memory mapped */
|
| - sqlite3_int64 mmapSize; /* Usable size of mapped region */
|
| - sqlite3_int64 mmapSizeActual; /* Actual size of mapped region */
|
| - sqlite3_int64 mmapSizeMax; /* Configured FCNTL_MMAP_SIZE value */
|
| -#endif
|
| -};
|
| -
|
| -/*
|
| -** Allowed values for winFile.ctrlFlags
|
| -*/
|
| -#define WINFILE_RDONLY 0x02 /* Connection is read only */
|
| -#define WINFILE_PERSIST_WAL 0x04 /* Persistent WAL mode */
|
| -#define WINFILE_PSOW 0x10 /* SQLITE_IOCAP_POWERSAFE_OVERWRITE */
|
| -
|
| -/*
|
| - * The size of the buffer used by sqlite3_win32_write_debug().
|
| - */
|
| -#ifndef SQLITE_WIN32_DBG_BUF_SIZE
|
| -# define SQLITE_WIN32_DBG_BUF_SIZE ((int)(4096-sizeof(DWORD)))
|
| -#endif
|
| -
|
| -/*
|
| - * The value used with sqlite3_win32_set_directory() to specify that
|
| - * the data directory should be changed.
|
| - */
|
| -#ifndef SQLITE_WIN32_DATA_DIRECTORY_TYPE
|
| -# define SQLITE_WIN32_DATA_DIRECTORY_TYPE (1)
|
| -#endif
|
| -
|
| -/*
|
| - * The value used with sqlite3_win32_set_directory() to specify that
|
| - * the temporary directory should be changed.
|
| - */
|
| -#ifndef SQLITE_WIN32_TEMP_DIRECTORY_TYPE
|
| -# define SQLITE_WIN32_TEMP_DIRECTORY_TYPE (2)
|
| -#endif
|
| -
|
| -/*
|
| - * If compiled with SQLITE_WIN32_MALLOC on Windows, we will use the
|
| - * various Win32 API heap functions instead of our own.
|
| - */
|
| -#ifdef SQLITE_WIN32_MALLOC
|
| -
|
| -/*
|
| - * If this is non-zero, an isolated heap will be created by the native Win32
|
| - * allocator subsystem; otherwise, the default process heap will be used. This
|
| - * setting has no effect when compiling for WinRT. By default, this is enabled
|
| - * and an isolated heap will be created to store all allocated data.
|
| - *
|
| - ******************************************************************************
|
| - * WARNING: It is important to note that when this setting is non-zero and the
|
| - * winMemShutdown function is called (e.g. by the sqlite3_shutdown
|
| - * function), all data that was allocated using the isolated heap will
|
| - * be freed immediately and any attempt to access any of that freed
|
| - * data will almost certainly result in an immediate access violation.
|
| - ******************************************************************************
|
| - */
|
| -#ifndef SQLITE_WIN32_HEAP_CREATE
|
| -# define SQLITE_WIN32_HEAP_CREATE (TRUE)
|
| -#endif
|
| -
|
| -/*
|
| - * The initial size of the Win32-specific heap. This value may be zero.
|
| - */
|
| -#ifndef SQLITE_WIN32_HEAP_INIT_SIZE
|
| -# define SQLITE_WIN32_HEAP_INIT_SIZE ((SQLITE_DEFAULT_CACHE_SIZE) * \
|
| - (SQLITE_DEFAULT_PAGE_SIZE) + 4194304)
|
| -#endif
|
| -
|
| -/*
|
| - * The maximum size of the Win32-specific heap. This value may be zero.
|
| - */
|
| -#ifndef SQLITE_WIN32_HEAP_MAX_SIZE
|
| -# define SQLITE_WIN32_HEAP_MAX_SIZE (0)
|
| -#endif
|
| -
|
| -/*
|
| - * The extra flags to use in calls to the Win32 heap APIs. This value may be
|
| - * zero for the default behavior.
|
| - */
|
| -#ifndef SQLITE_WIN32_HEAP_FLAGS
|
| -# define SQLITE_WIN32_HEAP_FLAGS (0)
|
| -#endif
|
| -
|
| -
|
| -/*
|
| -** The winMemData structure stores information required by the Win32-specific
|
| -** sqlite3_mem_methods implementation.
|
| -*/
|
| -typedef struct winMemData winMemData;
|
| -struct winMemData {
|
| -#ifndef NDEBUG
|
| - u32 magic1; /* Magic number to detect structure corruption. */
|
| -#endif
|
| - HANDLE hHeap; /* The handle to our heap. */
|
| - BOOL bOwned; /* Do we own the heap (i.e. destroy it on shutdown)? */
|
| -#ifndef NDEBUG
|
| - u32 magic2; /* Magic number to detect structure corruption. */
|
| -#endif
|
| -};
|
| -
|
| -#ifndef NDEBUG
|
| -#define WINMEM_MAGIC1 0x42b2830b
|
| -#define WINMEM_MAGIC2 0xbd4d7cf4
|
| -#endif
|
| -
|
| -static struct winMemData win_mem_data = {
|
| -#ifndef NDEBUG
|
| - WINMEM_MAGIC1,
|
| -#endif
|
| - NULL, FALSE
|
| -#ifndef NDEBUG
|
| - ,WINMEM_MAGIC2
|
| -#endif
|
| -};
|
| -
|
| -#ifndef NDEBUG
|
| -#define winMemAssertMagic1() assert( win_mem_data.magic1==WINMEM_MAGIC1 )
|
| -#define winMemAssertMagic2() assert( win_mem_data.magic2==WINMEM_MAGIC2 )
|
| -#define winMemAssertMagic() winMemAssertMagic1(); winMemAssertMagic2();
|
| -#else
|
| -#define winMemAssertMagic()
|
| -#endif
|
| -
|
| -#define winMemGetDataPtr() &win_mem_data
|
| -#define winMemGetHeap() win_mem_data.hHeap
|
| -#define winMemGetOwned() win_mem_data.bOwned
|
| -
|
| -static void *winMemMalloc(int nBytes);
|
| -static void winMemFree(void *pPrior);
|
| -static void *winMemRealloc(void *pPrior, int nBytes);
|
| -static int winMemSize(void *p);
|
| -static int winMemRoundup(int n);
|
| -static int winMemInit(void *pAppData);
|
| -static void winMemShutdown(void *pAppData);
|
| -
|
| -const sqlite3_mem_methods *sqlite3MemGetWin32(void);
|
| -#endif /* SQLITE_WIN32_MALLOC */
|
| -
|
| -/*
|
| -** The following variable is (normally) set once and never changes
|
| -** thereafter. It records whether the operating system is Win9x
|
| -** or WinNT.
|
| -**
|
| -** 0: Operating system unknown.
|
| -** 1: Operating system is Win9x.
|
| -** 2: Operating system is WinNT.
|
| -**
|
| -** In order to facilitate testing on a WinNT system, the test fixture
|
| -** can manually set this value to 1 to emulate Win98 behavior.
|
| -*/
|
| -#ifdef SQLITE_TEST
|
| -LONG SQLITE_WIN32_VOLATILE sqlite3_os_type = 0;
|
| -#else
|
| -static LONG SQLITE_WIN32_VOLATILE sqlite3_os_type = 0;
|
| -#endif
|
| -
|
| -#ifndef SYSCALL
|
| -# define SYSCALL sqlite3_syscall_ptr
|
| -#endif
|
| -
|
| -/*
|
| -** This function is not available on Windows CE or WinRT.
|
| - */
|
| -
|
| -#if SQLITE_OS_WINCE || SQLITE_OS_WINRT
|
| -# define osAreFileApisANSI() 1
|
| -#endif
|
| -
|
| -/*
|
| -** Many system calls are accessed through pointer-to-functions so that
|
| -** they may be overridden at runtime to facilitate fault injection during
|
| -** testing and sandboxing. The following array holds the names and pointers
|
| -** to all overrideable system calls.
|
| -*/
|
| -static struct win_syscall {
|
| - const char *zName; /* Name of the system call */
|
| - sqlite3_syscall_ptr pCurrent; /* Current value of the system call */
|
| - sqlite3_syscall_ptr pDefault; /* Default value */
|
| -} aSyscall[] = {
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT
|
| - { "AreFileApisANSI", (SYSCALL)AreFileApisANSI, 0 },
|
| -#else
|
| - { "AreFileApisANSI", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#ifndef osAreFileApisANSI
|
| -#define osAreFileApisANSI ((BOOL(WINAPI*)(VOID))aSyscall[0].pCurrent)
|
| -#endif
|
| -
|
| -#if SQLITE_OS_WINCE && defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "CharLowerW", (SYSCALL)CharLowerW, 0 },
|
| -#else
|
| - { "CharLowerW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCharLowerW ((LPWSTR(WINAPI*)(LPWSTR))aSyscall[1].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINCE && defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "CharUpperW", (SYSCALL)CharUpperW, 0 },
|
| -#else
|
| - { "CharUpperW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCharUpperW ((LPWSTR(WINAPI*)(LPWSTR))aSyscall[2].pCurrent)
|
| -
|
| - { "CloseHandle", (SYSCALL)CloseHandle, 0 },
|
| -
|
| -#define osCloseHandle ((BOOL(WINAPI*)(HANDLE))aSyscall[3].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| - { "CreateFileA", (SYSCALL)CreateFileA, 0 },
|
| -#else
|
| - { "CreateFileA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCreateFileA ((HANDLE(WINAPI*)(LPCSTR,DWORD,DWORD, \
|
| - LPSECURITY_ATTRIBUTES,DWORD,DWORD,HANDLE))aSyscall[4].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "CreateFileW", (SYSCALL)CreateFileW, 0 },
|
| -#else
|
| - { "CreateFileW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCreateFileW ((HANDLE(WINAPI*)(LPCWSTR,DWORD,DWORD, \
|
| - LPSECURITY_ATTRIBUTES,DWORD,DWORD,HANDLE))aSyscall[5].pCurrent)
|
| -
|
| -#if (!SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_ANSI) && \
|
| - !defined(SQLITE_OMIT_WAL))
|
| - { "CreateFileMappingA", (SYSCALL)CreateFileMappingA, 0 },
|
| -#else
|
| - { "CreateFileMappingA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCreateFileMappingA ((HANDLE(WINAPI*)(HANDLE,LPSECURITY_ATTRIBUTES, \
|
| - DWORD,DWORD,DWORD,LPCSTR))aSyscall[6].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINCE || (!SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE) && \
|
| - !defined(SQLITE_OMIT_WAL))
|
| - { "CreateFileMappingW", (SYSCALL)CreateFileMappingW, 0 },
|
| -#else
|
| - { "CreateFileMappingW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCreateFileMappingW ((HANDLE(WINAPI*)(HANDLE,LPSECURITY_ATTRIBUTES, \
|
| - DWORD,DWORD,DWORD,LPCWSTR))aSyscall[7].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "CreateMutexW", (SYSCALL)CreateMutexW, 0 },
|
| -#else
|
| - { "CreateMutexW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCreateMutexW ((HANDLE(WINAPI*)(LPSECURITY_ATTRIBUTES,BOOL, \
|
| - LPCWSTR))aSyscall[8].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| - { "DeleteFileA", (SYSCALL)DeleteFileA, 0 },
|
| -#else
|
| - { "DeleteFileA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osDeleteFileA ((BOOL(WINAPI*)(LPCSTR))aSyscall[9].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "DeleteFileW", (SYSCALL)DeleteFileW, 0 },
|
| -#else
|
| - { "DeleteFileW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osDeleteFileW ((BOOL(WINAPI*)(LPCWSTR))aSyscall[10].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINCE
|
| - { "FileTimeToLocalFileTime", (SYSCALL)FileTimeToLocalFileTime, 0 },
|
| -#else
|
| - { "FileTimeToLocalFileTime", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osFileTimeToLocalFileTime ((BOOL(WINAPI*)(CONST FILETIME*, \
|
| - LPFILETIME))aSyscall[11].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINCE
|
| - { "FileTimeToSystemTime", (SYSCALL)FileTimeToSystemTime, 0 },
|
| -#else
|
| - { "FileTimeToSystemTime", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osFileTimeToSystemTime ((BOOL(WINAPI*)(CONST FILETIME*, \
|
| - LPSYSTEMTIME))aSyscall[12].pCurrent)
|
| -
|
| - { "FlushFileBuffers", (SYSCALL)FlushFileBuffers, 0 },
|
| -
|
| -#define osFlushFileBuffers ((BOOL(WINAPI*)(HANDLE))aSyscall[13].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| - { "FormatMessageA", (SYSCALL)FormatMessageA, 0 },
|
| -#else
|
| - { "FormatMessageA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osFormatMessageA ((DWORD(WINAPI*)(DWORD,LPCVOID,DWORD,DWORD,LPSTR, \
|
| - DWORD,va_list*))aSyscall[14].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "FormatMessageW", (SYSCALL)FormatMessageW, 0 },
|
| -#else
|
| - { "FormatMessageW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osFormatMessageW ((DWORD(WINAPI*)(DWORD,LPCVOID,DWORD,DWORD,LPWSTR, \
|
| - DWORD,va_list*))aSyscall[15].pCurrent)
|
| -
|
| -#if !defined(SQLITE_OMIT_LOAD_EXTENSION)
|
| - { "FreeLibrary", (SYSCALL)FreeLibrary, 0 },
|
| -#else
|
| - { "FreeLibrary", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osFreeLibrary ((BOOL(WINAPI*)(HMODULE))aSyscall[16].pCurrent)
|
| -
|
| - { "GetCurrentProcessId", (SYSCALL)GetCurrentProcessId, 0 },
|
| -
|
| -#define osGetCurrentProcessId ((DWORD(WINAPI*)(VOID))aSyscall[17].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE && defined(SQLITE_WIN32_HAS_ANSI)
|
| - { "GetDiskFreeSpaceA", (SYSCALL)GetDiskFreeSpaceA, 0 },
|
| -#else
|
| - { "GetDiskFreeSpaceA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetDiskFreeSpaceA ((BOOL(WINAPI*)(LPCSTR,LPDWORD,LPDWORD,LPDWORD, \
|
| - LPDWORD))aSyscall[18].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "GetDiskFreeSpaceW", (SYSCALL)GetDiskFreeSpaceW, 0 },
|
| -#else
|
| - { "GetDiskFreeSpaceW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetDiskFreeSpaceW ((BOOL(WINAPI*)(LPCWSTR,LPDWORD,LPDWORD,LPDWORD, \
|
| - LPDWORD))aSyscall[19].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| - { "GetFileAttributesA", (SYSCALL)GetFileAttributesA, 0 },
|
| -#else
|
| - { "GetFileAttributesA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetFileAttributesA ((DWORD(WINAPI*)(LPCSTR))aSyscall[20].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "GetFileAttributesW", (SYSCALL)GetFileAttributesW, 0 },
|
| -#else
|
| - { "GetFileAttributesW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetFileAttributesW ((DWORD(WINAPI*)(LPCWSTR))aSyscall[21].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "GetFileAttributesExW", (SYSCALL)GetFileAttributesExW, 0 },
|
| -#else
|
| - { "GetFileAttributesExW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetFileAttributesExW ((BOOL(WINAPI*)(LPCWSTR,GET_FILEEX_INFO_LEVELS, \
|
| - LPVOID))aSyscall[22].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "GetFileSize", (SYSCALL)GetFileSize, 0 },
|
| -#else
|
| - { "GetFileSize", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetFileSize ((DWORD(WINAPI*)(HANDLE,LPDWORD))aSyscall[23].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE && defined(SQLITE_WIN32_HAS_ANSI)
|
| - { "GetFullPathNameA", (SYSCALL)GetFullPathNameA, 0 },
|
| -#else
|
| - { "GetFullPathNameA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetFullPathNameA ((DWORD(WINAPI*)(LPCSTR,DWORD,LPSTR, \
|
| - LPSTR*))aSyscall[24].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "GetFullPathNameW", (SYSCALL)GetFullPathNameW, 0 },
|
| -#else
|
| - { "GetFullPathNameW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetFullPathNameW ((DWORD(WINAPI*)(LPCWSTR,DWORD,LPWSTR, \
|
| - LPWSTR*))aSyscall[25].pCurrent)
|
| -
|
| - { "GetLastError", (SYSCALL)GetLastError, 0 },
|
| -
|
| -#define osGetLastError ((DWORD(WINAPI*)(VOID))aSyscall[26].pCurrent)
|
| -
|
| -#if !defined(SQLITE_OMIT_LOAD_EXTENSION)
|
| -#if SQLITE_OS_WINCE
|
| - /* The GetProcAddressA() routine is only available on Windows CE. */
|
| - { "GetProcAddressA", (SYSCALL)GetProcAddressA, 0 },
|
| -#else
|
| - /* All other Windows platforms expect GetProcAddress() to take
|
| - ** an ANSI string regardless of the _UNICODE setting */
|
| - { "GetProcAddressA", (SYSCALL)GetProcAddress, 0 },
|
| -#endif
|
| -#else
|
| - { "GetProcAddressA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetProcAddressA ((FARPROC(WINAPI*)(HMODULE, \
|
| - LPCSTR))aSyscall[27].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "GetSystemInfo", (SYSCALL)GetSystemInfo, 0 },
|
| -#else
|
| - { "GetSystemInfo", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetSystemInfo ((VOID(WINAPI*)(LPSYSTEM_INFO))aSyscall[28].pCurrent)
|
| -
|
| - { "GetSystemTime", (SYSCALL)GetSystemTime, 0 },
|
| -
|
| -#define osGetSystemTime ((VOID(WINAPI*)(LPSYSTEMTIME))aSyscall[29].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE
|
| - { "GetSystemTimeAsFileTime", (SYSCALL)GetSystemTimeAsFileTime, 0 },
|
| -#else
|
| - { "GetSystemTimeAsFileTime", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetSystemTimeAsFileTime ((VOID(WINAPI*)( \
|
| - LPFILETIME))aSyscall[30].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| - { "GetTempPathA", (SYSCALL)GetTempPathA, 0 },
|
| -#else
|
| - { "GetTempPathA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetTempPathA ((DWORD(WINAPI*)(DWORD,LPSTR))aSyscall[31].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "GetTempPathW", (SYSCALL)GetTempPathW, 0 },
|
| -#else
|
| - { "GetTempPathW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetTempPathW ((DWORD(WINAPI*)(DWORD,LPWSTR))aSyscall[32].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "GetTickCount", (SYSCALL)GetTickCount, 0 },
|
| -#else
|
| - { "GetTickCount", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetTickCount ((DWORD(WINAPI*)(VOID))aSyscall[33].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_ANSI) && defined(SQLITE_WIN32_GETVERSIONEX) && \
|
| - SQLITE_WIN32_GETVERSIONEX
|
| - { "GetVersionExA", (SYSCALL)GetVersionExA, 0 },
|
| -#else
|
| - { "GetVersionExA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetVersionExA ((BOOL(WINAPI*)( \
|
| - LPOSVERSIONINFOA))aSyscall[34].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE) && \
|
| - defined(SQLITE_WIN32_GETVERSIONEX) && SQLITE_WIN32_GETVERSIONEX
|
| - { "GetVersionExW", (SYSCALL)GetVersionExW, 0 },
|
| -#else
|
| - { "GetVersionExW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetVersionExW ((BOOL(WINAPI*)( \
|
| - LPOSVERSIONINFOW))aSyscall[35].pCurrent)
|
| -
|
| - { "HeapAlloc", (SYSCALL)HeapAlloc, 0 },
|
| -
|
| -#define osHeapAlloc ((LPVOID(WINAPI*)(HANDLE,DWORD, \
|
| - SIZE_T))aSyscall[36].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "HeapCreate", (SYSCALL)HeapCreate, 0 },
|
| -#else
|
| - { "HeapCreate", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osHeapCreate ((HANDLE(WINAPI*)(DWORD,SIZE_T, \
|
| - SIZE_T))aSyscall[37].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "HeapDestroy", (SYSCALL)HeapDestroy, 0 },
|
| -#else
|
| - { "HeapDestroy", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osHeapDestroy ((BOOL(WINAPI*)(HANDLE))aSyscall[38].pCurrent)
|
| -
|
| - { "HeapFree", (SYSCALL)HeapFree, 0 },
|
| -
|
| -#define osHeapFree ((BOOL(WINAPI*)(HANDLE,DWORD,LPVOID))aSyscall[39].pCurrent)
|
| -
|
| - { "HeapReAlloc", (SYSCALL)HeapReAlloc, 0 },
|
| -
|
| -#define osHeapReAlloc ((LPVOID(WINAPI*)(HANDLE,DWORD,LPVOID, \
|
| - SIZE_T))aSyscall[40].pCurrent)
|
| -
|
| - { "HeapSize", (SYSCALL)HeapSize, 0 },
|
| -
|
| -#define osHeapSize ((SIZE_T(WINAPI*)(HANDLE,DWORD, \
|
| - LPCVOID))aSyscall[41].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "HeapValidate", (SYSCALL)HeapValidate, 0 },
|
| -#else
|
| - { "HeapValidate", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osHeapValidate ((BOOL(WINAPI*)(HANDLE,DWORD, \
|
| - LPCVOID))aSyscall[42].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT
|
| - { "HeapCompact", (SYSCALL)HeapCompact, 0 },
|
| -#else
|
| - { "HeapCompact", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osHeapCompact ((UINT(WINAPI*)(HANDLE,DWORD))aSyscall[43].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_ANSI) && !defined(SQLITE_OMIT_LOAD_EXTENSION)
|
| - { "LoadLibraryA", (SYSCALL)LoadLibraryA, 0 },
|
| -#else
|
| - { "LoadLibraryA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osLoadLibraryA ((HMODULE(WINAPI*)(LPCSTR))aSyscall[44].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_HAS_WIDE) && \
|
| - !defined(SQLITE_OMIT_LOAD_EXTENSION)
|
| - { "LoadLibraryW", (SYSCALL)LoadLibraryW, 0 },
|
| -#else
|
| - { "LoadLibraryW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osLoadLibraryW ((HMODULE(WINAPI*)(LPCWSTR))aSyscall[45].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "LocalFree", (SYSCALL)LocalFree, 0 },
|
| -#else
|
| - { "LocalFree", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osLocalFree ((HLOCAL(WINAPI*)(HLOCAL))aSyscall[46].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT
|
| - { "LockFile", (SYSCALL)LockFile, 0 },
|
| -#else
|
| - { "LockFile", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#ifndef osLockFile
|
| -#define osLockFile ((BOOL(WINAPI*)(HANDLE,DWORD,DWORD,DWORD, \
|
| - DWORD))aSyscall[47].pCurrent)
|
| -#endif
|
| -
|
| -#if !SQLITE_OS_WINCE
|
| - { "LockFileEx", (SYSCALL)LockFileEx, 0 },
|
| -#else
|
| - { "LockFileEx", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#ifndef osLockFileEx
|
| -#define osLockFileEx ((BOOL(WINAPI*)(HANDLE,DWORD,DWORD,DWORD,DWORD, \
|
| - LPOVERLAPPED))aSyscall[48].pCurrent)
|
| -#endif
|
| -
|
| -#if SQLITE_OS_WINCE || (!SQLITE_OS_WINRT && !defined(SQLITE_OMIT_WAL))
|
| - { "MapViewOfFile", (SYSCALL)MapViewOfFile, 0 },
|
| -#else
|
| - { "MapViewOfFile", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osMapViewOfFile ((LPVOID(WINAPI*)(HANDLE,DWORD,DWORD,DWORD, \
|
| - SIZE_T))aSyscall[49].pCurrent)
|
| -
|
| - { "MultiByteToWideChar", (SYSCALL)MultiByteToWideChar, 0 },
|
| -
|
| -#define osMultiByteToWideChar ((int(WINAPI*)(UINT,DWORD,LPCSTR,int,LPWSTR, \
|
| - int))aSyscall[50].pCurrent)
|
| -
|
| - { "QueryPerformanceCounter", (SYSCALL)QueryPerformanceCounter, 0 },
|
| -
|
| -#define osQueryPerformanceCounter ((BOOL(WINAPI*)( \
|
| - LARGE_INTEGER*))aSyscall[51].pCurrent)
|
| -
|
| - { "ReadFile", (SYSCALL)ReadFile, 0 },
|
| -
|
| -#define osReadFile ((BOOL(WINAPI*)(HANDLE,LPVOID,DWORD,LPDWORD, \
|
| - LPOVERLAPPED))aSyscall[52].pCurrent)
|
| -
|
| - { "SetEndOfFile", (SYSCALL)SetEndOfFile, 0 },
|
| -
|
| -#define osSetEndOfFile ((BOOL(WINAPI*)(HANDLE))aSyscall[53].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "SetFilePointer", (SYSCALL)SetFilePointer, 0 },
|
| -#else
|
| - { "SetFilePointer", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osSetFilePointer ((DWORD(WINAPI*)(HANDLE,LONG,PLONG, \
|
| - DWORD))aSyscall[54].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "Sleep", (SYSCALL)Sleep, 0 },
|
| -#else
|
| - { "Sleep", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osSleep ((VOID(WINAPI*)(DWORD))aSyscall[55].pCurrent)
|
| -
|
| - { "SystemTimeToFileTime", (SYSCALL)SystemTimeToFileTime, 0 },
|
| -
|
| -#define osSystemTimeToFileTime ((BOOL(WINAPI*)(CONST SYSTEMTIME*, \
|
| - LPFILETIME))aSyscall[56].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT
|
| - { "UnlockFile", (SYSCALL)UnlockFile, 0 },
|
| -#else
|
| - { "UnlockFile", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#ifndef osUnlockFile
|
| -#define osUnlockFile ((BOOL(WINAPI*)(HANDLE,DWORD,DWORD,DWORD, \
|
| - DWORD))aSyscall[57].pCurrent)
|
| -#endif
|
| -
|
| -#if !SQLITE_OS_WINCE
|
| - { "UnlockFileEx", (SYSCALL)UnlockFileEx, 0 },
|
| -#else
|
| - { "UnlockFileEx", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osUnlockFileEx ((BOOL(WINAPI*)(HANDLE,DWORD,DWORD,DWORD, \
|
| - LPOVERLAPPED))aSyscall[58].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINCE || !defined(SQLITE_OMIT_WAL)
|
| - { "UnmapViewOfFile", (SYSCALL)UnmapViewOfFile, 0 },
|
| -#else
|
| - { "UnmapViewOfFile", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osUnmapViewOfFile ((BOOL(WINAPI*)(LPCVOID))aSyscall[59].pCurrent)
|
| -
|
| - { "WideCharToMultiByte", (SYSCALL)WideCharToMultiByte, 0 },
|
| -
|
| -#define osWideCharToMultiByte ((int(WINAPI*)(UINT,DWORD,LPCWSTR,int,LPSTR,int, \
|
| - LPCSTR,LPBOOL))aSyscall[60].pCurrent)
|
| -
|
| - { "WriteFile", (SYSCALL)WriteFile, 0 },
|
| -
|
| -#define osWriteFile ((BOOL(WINAPI*)(HANDLE,LPCVOID,DWORD,LPDWORD, \
|
| - LPOVERLAPPED))aSyscall[61].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - { "CreateEventExW", (SYSCALL)CreateEventExW, 0 },
|
| -#else
|
| - { "CreateEventExW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCreateEventExW ((HANDLE(WINAPI*)(LPSECURITY_ATTRIBUTES,LPCWSTR, \
|
| - DWORD,DWORD))aSyscall[62].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINRT
|
| - { "WaitForSingleObject", (SYSCALL)WaitForSingleObject, 0 },
|
| -#else
|
| - { "WaitForSingleObject", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osWaitForSingleObject ((DWORD(WINAPI*)(HANDLE, \
|
| - DWORD))aSyscall[63].pCurrent)
|
| -
|
| -#if !SQLITE_OS_WINCE
|
| - { "WaitForSingleObjectEx", (SYSCALL)WaitForSingleObjectEx, 0 },
|
| -#else
|
| - { "WaitForSingleObjectEx", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osWaitForSingleObjectEx ((DWORD(WINAPI*)(HANDLE,DWORD, \
|
| - BOOL))aSyscall[64].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - { "SetFilePointerEx", (SYSCALL)SetFilePointerEx, 0 },
|
| -#else
|
| - { "SetFilePointerEx", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osSetFilePointerEx ((BOOL(WINAPI*)(HANDLE,LARGE_INTEGER, \
|
| - PLARGE_INTEGER,DWORD))aSyscall[65].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - { "GetFileInformationByHandleEx", (SYSCALL)GetFileInformationByHandleEx, 0 },
|
| -#else
|
| - { "GetFileInformationByHandleEx", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetFileInformationByHandleEx ((BOOL(WINAPI*)(HANDLE, \
|
| - FILE_INFO_BY_HANDLE_CLASS,LPVOID,DWORD))aSyscall[66].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT && !defined(SQLITE_OMIT_WAL)
|
| - { "MapViewOfFileFromApp", (SYSCALL)MapViewOfFileFromApp, 0 },
|
| -#else
|
| - { "MapViewOfFileFromApp", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osMapViewOfFileFromApp ((LPVOID(WINAPI*)(HANDLE,ULONG,ULONG64, \
|
| - SIZE_T))aSyscall[67].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - { "CreateFile2", (SYSCALL)CreateFile2, 0 },
|
| -#else
|
| - { "CreateFile2", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCreateFile2 ((HANDLE(WINAPI*)(LPCWSTR,DWORD,DWORD,DWORD, \
|
| - LPCREATEFILE2_EXTENDED_PARAMETERS))aSyscall[68].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT && !defined(SQLITE_OMIT_LOAD_EXTENSION)
|
| - { "LoadPackagedLibrary", (SYSCALL)LoadPackagedLibrary, 0 },
|
| -#else
|
| - { "LoadPackagedLibrary", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osLoadPackagedLibrary ((HMODULE(WINAPI*)(LPCWSTR, \
|
| - DWORD))aSyscall[69].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - { "GetTickCount64", (SYSCALL)GetTickCount64, 0 },
|
| -#else
|
| - { "GetTickCount64", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetTickCount64 ((ULONGLONG(WINAPI*)(VOID))aSyscall[70].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - { "GetNativeSystemInfo", (SYSCALL)GetNativeSystemInfo, 0 },
|
| -#else
|
| - { "GetNativeSystemInfo", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osGetNativeSystemInfo ((VOID(WINAPI*)( \
|
| - LPSYSTEM_INFO))aSyscall[71].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| - { "OutputDebugStringA", (SYSCALL)OutputDebugStringA, 0 },
|
| -#else
|
| - { "OutputDebugStringA", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osOutputDebugStringA ((VOID(WINAPI*)(LPCSTR))aSyscall[72].pCurrent)
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_WIDE)
|
| - { "OutputDebugStringW", (SYSCALL)OutputDebugStringW, 0 },
|
| -#else
|
| - { "OutputDebugStringW", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osOutputDebugStringW ((VOID(WINAPI*)(LPCWSTR))aSyscall[73].pCurrent)
|
| -
|
| - { "GetProcessHeap", (SYSCALL)GetProcessHeap, 0 },
|
| -
|
| -#define osGetProcessHeap ((HANDLE(WINAPI*)(VOID))aSyscall[74].pCurrent)
|
| -
|
| -#if SQLITE_OS_WINRT && !defined(SQLITE_OMIT_WAL)
|
| - { "CreateFileMappingFromApp", (SYSCALL)CreateFileMappingFromApp, 0 },
|
| -#else
|
| - { "CreateFileMappingFromApp", (SYSCALL)0, 0 },
|
| -#endif
|
| -
|
| -#define osCreateFileMappingFromApp ((HANDLE(WINAPI*)(HANDLE, \
|
| - LPSECURITY_ATTRIBUTES,ULONG,ULONG64,LPCWSTR))aSyscall[75].pCurrent)
|
| -
|
| -/*
|
| -** NOTE: On some sub-platforms, the InterlockedCompareExchange "function"
|
| -** is really just a macro that uses a compiler intrinsic (e.g. x64).
|
| -** So do not try to make this is into a redefinable interface.
|
| -*/
|
| -#if defined(InterlockedCompareExchange)
|
| - { "InterlockedCompareExchange", (SYSCALL)0, 0 },
|
| -
|
| -#define osInterlockedCompareExchange InterlockedCompareExchange
|
| -#else
|
| - { "InterlockedCompareExchange", (SYSCALL)InterlockedCompareExchange, 0 },
|
| -
|
| -#define osInterlockedCompareExchange ((LONG(WINAPI*)(LONG \
|
| - SQLITE_WIN32_VOLATILE*, LONG,LONG))aSyscall[76].pCurrent)
|
| -#endif /* defined(InterlockedCompareExchange) */
|
| -
|
| -}; /* End of the overrideable system calls */
|
| -
|
| -/*
|
| -** This is the xSetSystemCall() method of sqlite3_vfs for all of the
|
| -** "win32" VFSes. Return SQLITE_OK opon successfully updating the
|
| -** system call pointer, or SQLITE_NOTFOUND if there is no configurable
|
| -** system call named zName.
|
| -*/
|
| -static int winSetSystemCall(
|
| - sqlite3_vfs *pNotUsed, /* The VFS pointer. Not used */
|
| - const char *zName, /* Name of system call to override */
|
| - sqlite3_syscall_ptr pNewFunc /* Pointer to new system call value */
|
| -){
|
| - unsigned int i;
|
| - int rc = SQLITE_NOTFOUND;
|
| -
|
| - UNUSED_PARAMETER(pNotUsed);
|
| - if( zName==0 ){
|
| - /* If no zName is given, restore all system calls to their default
|
| - ** settings and return NULL
|
| - */
|
| - rc = SQLITE_OK;
|
| - for(i=0; i<sizeof(aSyscall)/sizeof(aSyscall[0]); i++){
|
| - if( aSyscall[i].pDefault ){
|
| - aSyscall[i].pCurrent = aSyscall[i].pDefault;
|
| - }
|
| - }
|
| - }else{
|
| - /* If zName is specified, operate on only the one system call
|
| - ** specified.
|
| - */
|
| - for(i=0; i<sizeof(aSyscall)/sizeof(aSyscall[0]); i++){
|
| - if( strcmp(zName, aSyscall[i].zName)==0 ){
|
| - if( aSyscall[i].pDefault==0 ){
|
| - aSyscall[i].pDefault = aSyscall[i].pCurrent;
|
| - }
|
| - rc = SQLITE_OK;
|
| - if( pNewFunc==0 ) pNewFunc = aSyscall[i].pDefault;
|
| - aSyscall[i].pCurrent = pNewFunc;
|
| - break;
|
| - }
|
| - }
|
| - }
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** Return the value of a system call. Return NULL if zName is not a
|
| -** recognized system call name. NULL is also returned if the system call
|
| -** is currently undefined.
|
| -*/
|
| -static sqlite3_syscall_ptr winGetSystemCall(
|
| - sqlite3_vfs *pNotUsed,
|
| - const char *zName
|
| -){
|
| - unsigned int i;
|
| -
|
| - UNUSED_PARAMETER(pNotUsed);
|
| - for(i=0; i<sizeof(aSyscall)/sizeof(aSyscall[0]); i++){
|
| - if( strcmp(zName, aSyscall[i].zName)==0 ) return aSyscall[i].pCurrent;
|
| - }
|
| - return 0;
|
| -}
|
| -
|
| -/*
|
| -** Return the name of the first system call after zName. If zName==NULL
|
| -** then return the name of the first system call. Return NULL if zName
|
| -** is the last system call or if zName is not the name of a valid
|
| -** system call.
|
| -*/
|
| -static const char *winNextSystemCall(sqlite3_vfs *p, const char *zName){
|
| - int i = -1;
|
| -
|
| - UNUSED_PARAMETER(p);
|
| - if( zName ){
|
| - for(i=0; i<ArraySize(aSyscall)-1; i++){
|
| - if( strcmp(zName, aSyscall[i].zName)==0 ) break;
|
| - }
|
| - }
|
| - for(i++; i<ArraySize(aSyscall); i++){
|
| - if( aSyscall[i].pCurrent!=0 ) return aSyscall[i].zName;
|
| - }
|
| - return 0;
|
| -}
|
| -
|
| -#ifdef SQLITE_WIN32_MALLOC
|
| -/*
|
| -** If a Win32 native heap has been configured, this function will attempt to
|
| -** compact it. Upon success, SQLITE_OK will be returned. Upon failure, one
|
| -** of SQLITE_NOMEM, SQLITE_ERROR, or SQLITE_NOTFOUND will be returned. The
|
| -** "pnLargest" argument, if non-zero, will be used to return the size of the
|
| -** largest committed free block in the heap, in bytes.
|
| -*/
|
| -int sqlite3_win32_compact_heap(LPUINT pnLargest){
|
| - int rc = SQLITE_OK;
|
| - UINT nLargest = 0;
|
| - HANDLE hHeap;
|
| -
|
| - winMemAssertMagic();
|
| - hHeap = winMemGetHeap();
|
| - assert( hHeap!=0 );
|
| - assert( hHeap!=INVALID_HANDLE_VALUE );
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_MALLOC_VALIDATE)
|
| - assert( osHeapValidate(hHeap, SQLITE_WIN32_HEAP_FLAGS, NULL) );
|
| -#endif
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT
|
| - if( (nLargest=osHeapCompact(hHeap, SQLITE_WIN32_HEAP_FLAGS))==0 ){
|
| - DWORD lastErrno = osGetLastError();
|
| - if( lastErrno==NO_ERROR ){
|
| - sqlite3_log(SQLITE_NOMEM, "failed to HeapCompact (no space), heap=%p",
|
| - (void*)hHeap);
|
| - rc = SQLITE_NOMEM;
|
| - }else{
|
| - sqlite3_log(SQLITE_ERROR, "failed to HeapCompact (%lu), heap=%p",
|
| - osGetLastError(), (void*)hHeap);
|
| - rc = SQLITE_ERROR;
|
| - }
|
| - }
|
| -#else
|
| - sqlite3_log(SQLITE_NOTFOUND, "failed to HeapCompact, heap=%p",
|
| - (void*)hHeap);
|
| - rc = SQLITE_NOTFOUND;
|
| -#endif
|
| - if( pnLargest ) *pnLargest = nLargest;
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** If a Win32 native heap has been configured, this function will attempt to
|
| -** destroy and recreate it. If the Win32 native heap is not isolated and/or
|
| -** the sqlite3_memory_used() function does not return zero, SQLITE_BUSY will
|
| -** be returned and no changes will be made to the Win32 native heap.
|
| -*/
|
| -int sqlite3_win32_reset_heap(){
|
| - int rc;
|
| - MUTEX_LOGIC( sqlite3_mutex *pMaster; ) /* The main static mutex */
|
| - MUTEX_LOGIC( sqlite3_mutex *pMem; ) /* The memsys static mutex */
|
| - MUTEX_LOGIC( pMaster = sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MASTER); )
|
| - MUTEX_LOGIC( pMem = sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MEM); )
|
| - sqlite3_mutex_enter(pMaster);
|
| - sqlite3_mutex_enter(pMem);
|
| - winMemAssertMagic();
|
| - if( winMemGetHeap()!=NULL && winMemGetOwned() && sqlite3_memory_used()==0 ){
|
| - /*
|
| - ** At this point, there should be no outstanding memory allocations on
|
| - ** the heap. Also, since both the master and memsys locks are currently
|
| - ** being held by us, no other function (i.e. from another thread) should
|
| - ** be able to even access the heap. Attempt to destroy and recreate our
|
| - ** isolated Win32 native heap now.
|
| - */
|
| - assert( winMemGetHeap()!=NULL );
|
| - assert( winMemGetOwned() );
|
| - assert( sqlite3_memory_used()==0 );
|
| - winMemShutdown(winMemGetDataPtr());
|
| - assert( winMemGetHeap()==NULL );
|
| - assert( !winMemGetOwned() );
|
| - assert( sqlite3_memory_used()==0 );
|
| - rc = winMemInit(winMemGetDataPtr());
|
| - assert( rc!=SQLITE_OK || winMemGetHeap()!=NULL );
|
| - assert( rc!=SQLITE_OK || winMemGetOwned() );
|
| - assert( rc!=SQLITE_OK || sqlite3_memory_used()==0 );
|
| - }else{
|
| - /*
|
| - ** The Win32 native heap cannot be modified because it may be in use.
|
| - */
|
| - rc = SQLITE_BUSY;
|
| - }
|
| - sqlite3_mutex_leave(pMem);
|
| - sqlite3_mutex_leave(pMaster);
|
| - return rc;
|
| -}
|
| -#endif /* SQLITE_WIN32_MALLOC */
|
| -
|
| -/*
|
| -** This function outputs the specified (ANSI) string to the Win32 debugger
|
| -** (if available).
|
| -*/
|
| -
|
| -void sqlite3_win32_write_debug(const char *zBuf, int nBuf){
|
| - char zDbgBuf[SQLITE_WIN32_DBG_BUF_SIZE];
|
| - int nMin = MIN(nBuf, (SQLITE_WIN32_DBG_BUF_SIZE - 1)); /* may be negative. */
|
| - if( nMin<-1 ) nMin = -1; /* all negative values become -1. */
|
| - assert( nMin==-1 || nMin==0 || nMin<SQLITE_WIN32_DBG_BUF_SIZE );
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| - if( nMin>0 ){
|
| - memset(zDbgBuf, 0, SQLITE_WIN32_DBG_BUF_SIZE);
|
| - memcpy(zDbgBuf, zBuf, nMin);
|
| - osOutputDebugStringA(zDbgBuf);
|
| - }else{
|
| - osOutputDebugStringA(zBuf);
|
| - }
|
| -#elif defined(SQLITE_WIN32_HAS_WIDE)
|
| - memset(zDbgBuf, 0, SQLITE_WIN32_DBG_BUF_SIZE);
|
| - if ( osMultiByteToWideChar(
|
| - osAreFileApisANSI() ? CP_ACP : CP_OEMCP, 0, zBuf,
|
| - nMin, (LPWSTR)zDbgBuf, SQLITE_WIN32_DBG_BUF_SIZE/sizeof(WCHAR))<=0 ){
|
| - return;
|
| - }
|
| - osOutputDebugStringW((LPCWSTR)zDbgBuf);
|
| -#else
|
| - if( nMin>0 ){
|
| - memset(zDbgBuf, 0, SQLITE_WIN32_DBG_BUF_SIZE);
|
| - memcpy(zDbgBuf, zBuf, nMin);
|
| - fprintf(stderr, "%s", zDbgBuf);
|
| - }else{
|
| - fprintf(stderr, "%s", zBuf);
|
| - }
|
| -#endif
|
| -}
|
| -
|
| -/*
|
| -** The following routine suspends the current thread for at least ms
|
| -** milliseconds. This is equivalent to the Win32 Sleep() interface.
|
| -*/
|
| -#if SQLITE_OS_WINRT
|
| -static HANDLE sleepObj = NULL;
|
| -#endif
|
| -
|
| -void sqlite3_win32_sleep(DWORD milliseconds){
|
| -#if SQLITE_OS_WINRT
|
| - if ( sleepObj==NULL ){
|
| - sleepObj = osCreateEventExW(NULL, NULL, CREATE_EVENT_MANUAL_RESET,
|
| - SYNCHRONIZE);
|
| - }
|
| - assert( sleepObj!=NULL );
|
| - osWaitForSingleObjectEx(sleepObj, milliseconds, FALSE);
|
| -#else
|
| - osSleep(milliseconds);
|
| -#endif
|
| -}
|
| -
|
| -#if SQLITE_MAX_WORKER_THREADS>0 && !SQLITE_OS_WINCE && !SQLITE_OS_WINRT && \
|
| - SQLITE_THREADSAFE>0
|
| -DWORD sqlite3Win32Wait(HANDLE hObject){
|
| - DWORD rc;
|
| - while( (rc = osWaitForSingleObjectEx(hObject, INFINITE,
|
| - TRUE))==WAIT_IO_COMPLETION ){}
|
| - return rc;
|
| -}
|
| -#endif
|
| -
|
| -/*
|
| -** Return true (non-zero) if we are running under WinNT, Win2K, WinXP,
|
| -** or WinCE. Return false (zero) for Win95, Win98, or WinME.
|
| -**
|
| -** Here is an interesting observation: Win95, Win98, and WinME lack
|
| -** the LockFileEx() API. But we can still statically link against that
|
| -** API as long as we don't call it when running Win95/98/ME. A call to
|
| -** this routine is used to determine if the host is Win95/98/ME or
|
| -** WinNT/2K/XP so that we will know whether or not we can safely call
|
| -** the LockFileEx() API.
|
| -*/
|
| -
|
| -#if !defined(SQLITE_WIN32_GETVERSIONEX) || !SQLITE_WIN32_GETVERSIONEX
|
| -# define osIsNT() (1)
|
| -#elif SQLITE_OS_WINCE || SQLITE_OS_WINRT || !defined(SQLITE_WIN32_HAS_ANSI)
|
| -# define osIsNT() (1)
|
| -#elif !defined(SQLITE_WIN32_HAS_WIDE)
|
| -# define osIsNT() (0)
|
| -#else
|
| -# define osIsNT() ((sqlite3_os_type==2) || sqlite3_win32_is_nt())
|
| -#endif
|
| -
|
| -/*
|
| -** This function determines if the machine is running a version of Windows
|
| -** based on the NT kernel.
|
| -*/
|
| -int sqlite3_win32_is_nt(void){
|
| -#if SQLITE_OS_WINRT
|
| - /*
|
| - ** NOTE: The WinRT sub-platform is always assumed to be based on the NT
|
| - ** kernel.
|
| - */
|
| - return 1;
|
| -#elif defined(SQLITE_WIN32_GETVERSIONEX) && SQLITE_WIN32_GETVERSIONEX
|
| - if( osInterlockedCompareExchange(&sqlite3_os_type, 0, 0)==0 ){
|
| -#if defined(SQLITE_WIN32_HAS_ANSI)
|
| - OSVERSIONINFOA sInfo;
|
| - sInfo.dwOSVersionInfoSize = sizeof(sInfo);
|
| - osGetVersionExA(&sInfo);
|
| - osInterlockedCompareExchange(&sqlite3_os_type,
|
| - (sInfo.dwPlatformId == VER_PLATFORM_WIN32_NT) ? 2 : 1, 0);
|
| -#elif defined(SQLITE_WIN32_HAS_WIDE)
|
| - OSVERSIONINFOW sInfo;
|
| - sInfo.dwOSVersionInfoSize = sizeof(sInfo);
|
| - osGetVersionExW(&sInfo);
|
| - osInterlockedCompareExchange(&sqlite3_os_type,
|
| - (sInfo.dwPlatformId == VER_PLATFORM_WIN32_NT) ? 2 : 1, 0);
|
| -#endif
|
| - }
|
| - return osInterlockedCompareExchange(&sqlite3_os_type, 2, 2)==2;
|
| -#elif SQLITE_TEST
|
| - return osInterlockedCompareExchange(&sqlite3_os_type, 2, 2)==2;
|
| -#else
|
| - /*
|
| - ** NOTE: All sub-platforms where the GetVersionEx[AW] functions are
|
| - ** deprecated are always assumed to be based on the NT kernel.
|
| - */
|
| - return 1;
|
| -#endif
|
| -}
|
| -
|
| -#ifdef SQLITE_WIN32_MALLOC
|
| -/*
|
| -** Allocate nBytes of memory.
|
| -*/
|
| -static void *winMemMalloc(int nBytes){
|
| - HANDLE hHeap;
|
| - void *p;
|
| -
|
| - winMemAssertMagic();
|
| - hHeap = winMemGetHeap();
|
| - assert( hHeap!=0 );
|
| - assert( hHeap!=INVALID_HANDLE_VALUE );
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_MALLOC_VALIDATE)
|
| - assert( osHeapValidate(hHeap, SQLITE_WIN32_HEAP_FLAGS, NULL) );
|
| -#endif
|
| - assert( nBytes>=0 );
|
| - p = osHeapAlloc(hHeap, SQLITE_WIN32_HEAP_FLAGS, (SIZE_T)nBytes);
|
| - if( !p ){
|
| - sqlite3_log(SQLITE_NOMEM, "failed to HeapAlloc %u bytes (%lu), heap=%p",
|
| - nBytes, osGetLastError(), (void*)hHeap);
|
| - }
|
| - return p;
|
| -}
|
| -
|
| -/*
|
| -** Free memory.
|
| -*/
|
| -static void winMemFree(void *pPrior){
|
| - HANDLE hHeap;
|
| -
|
| - winMemAssertMagic();
|
| - hHeap = winMemGetHeap();
|
| - assert( hHeap!=0 );
|
| - assert( hHeap!=INVALID_HANDLE_VALUE );
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_MALLOC_VALIDATE)
|
| - assert( osHeapValidate(hHeap, SQLITE_WIN32_HEAP_FLAGS, pPrior) );
|
| -#endif
|
| - if( !pPrior ) return; /* Passing NULL to HeapFree is undefined. */
|
| - if( !osHeapFree(hHeap, SQLITE_WIN32_HEAP_FLAGS, pPrior) ){
|
| - sqlite3_log(SQLITE_NOMEM, "failed to HeapFree block %p (%lu), heap=%p",
|
| - pPrior, osGetLastError(), (void*)hHeap);
|
| - }
|
| -}
|
| -
|
| -/*
|
| -** Change the size of an existing memory allocation
|
| -*/
|
| -static void *winMemRealloc(void *pPrior, int nBytes){
|
| - HANDLE hHeap;
|
| - void *p;
|
| -
|
| - winMemAssertMagic();
|
| - hHeap = winMemGetHeap();
|
| - assert( hHeap!=0 );
|
| - assert( hHeap!=INVALID_HANDLE_VALUE );
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_MALLOC_VALIDATE)
|
| - assert( osHeapValidate(hHeap, SQLITE_WIN32_HEAP_FLAGS, pPrior) );
|
| -#endif
|
| - assert( nBytes>=0 );
|
| - if( !pPrior ){
|
| - p = osHeapAlloc(hHeap, SQLITE_WIN32_HEAP_FLAGS, (SIZE_T)nBytes);
|
| - }else{
|
| - p = osHeapReAlloc(hHeap, SQLITE_WIN32_HEAP_FLAGS, pPrior, (SIZE_T)nBytes);
|
| - }
|
| - if( !p ){
|
| - sqlite3_log(SQLITE_NOMEM, "failed to %s %u bytes (%lu), heap=%p",
|
| - pPrior ? "HeapReAlloc" : "HeapAlloc", nBytes, osGetLastError(),
|
| - (void*)hHeap);
|
| - }
|
| - return p;
|
| -}
|
| -
|
| -/*
|
| -** Return the size of an outstanding allocation, in bytes.
|
| -*/
|
| -static int winMemSize(void *p){
|
| - HANDLE hHeap;
|
| - SIZE_T n;
|
| -
|
| - winMemAssertMagic();
|
| - hHeap = winMemGetHeap();
|
| - assert( hHeap!=0 );
|
| - assert( hHeap!=INVALID_HANDLE_VALUE );
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_MALLOC_VALIDATE)
|
| - assert( osHeapValidate(hHeap, SQLITE_WIN32_HEAP_FLAGS, p) );
|
| -#endif
|
| - if( !p ) return 0;
|
| - n = osHeapSize(hHeap, SQLITE_WIN32_HEAP_FLAGS, p);
|
| - if( n==(SIZE_T)-1 ){
|
| - sqlite3_log(SQLITE_NOMEM, "failed to HeapSize block %p (%lu), heap=%p",
|
| - p, osGetLastError(), (void*)hHeap);
|
| - return 0;
|
| - }
|
| - return (int)n;
|
| -}
|
| -
|
| -/*
|
| -** Round up a request size to the next valid allocation size.
|
| -*/
|
| -static int winMemRoundup(int n){
|
| - return n;
|
| -}
|
| -
|
| -/*
|
| -** Initialize this module.
|
| -*/
|
| -static int winMemInit(void *pAppData){
|
| - winMemData *pWinMemData = (winMemData *)pAppData;
|
| -
|
| - if( !pWinMemData ) return SQLITE_ERROR;
|
| - assert( pWinMemData->magic1==WINMEM_MAGIC1 );
|
| - assert( pWinMemData->magic2==WINMEM_MAGIC2 );
|
| -
|
| -#if !SQLITE_OS_WINRT && SQLITE_WIN32_HEAP_CREATE
|
| - if( !pWinMemData->hHeap ){
|
| - DWORD dwInitialSize = SQLITE_WIN32_HEAP_INIT_SIZE;
|
| - DWORD dwMaximumSize = (DWORD)sqlite3GlobalConfig.nHeap;
|
| - if( dwMaximumSize==0 ){
|
| - dwMaximumSize = SQLITE_WIN32_HEAP_MAX_SIZE;
|
| - }else if( dwInitialSize>dwMaximumSize ){
|
| - dwInitialSize = dwMaximumSize;
|
| - }
|
| - pWinMemData->hHeap = osHeapCreate(SQLITE_WIN32_HEAP_FLAGS,
|
| - dwInitialSize, dwMaximumSize);
|
| - if( !pWinMemData->hHeap ){
|
| - sqlite3_log(SQLITE_NOMEM,
|
| - "failed to HeapCreate (%lu), flags=%u, initSize=%lu, maxSize=%lu",
|
| - osGetLastError(), SQLITE_WIN32_HEAP_FLAGS, dwInitialSize,
|
| - dwMaximumSize);
|
| - return SQLITE_NOMEM;
|
| - }
|
| - pWinMemData->bOwned = TRUE;
|
| - assert( pWinMemData->bOwned );
|
| - }
|
| -#else
|
| - pWinMemData->hHeap = osGetProcessHeap();
|
| - if( !pWinMemData->hHeap ){
|
| - sqlite3_log(SQLITE_NOMEM,
|
| - "failed to GetProcessHeap (%lu)", osGetLastError());
|
| - return SQLITE_NOMEM;
|
| - }
|
| - pWinMemData->bOwned = FALSE;
|
| - assert( !pWinMemData->bOwned );
|
| -#endif
|
| - assert( pWinMemData->hHeap!=0 );
|
| - assert( pWinMemData->hHeap!=INVALID_HANDLE_VALUE );
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_MALLOC_VALIDATE)
|
| - assert( osHeapValidate(pWinMemData->hHeap, SQLITE_WIN32_HEAP_FLAGS, NULL) );
|
| -#endif
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Deinitialize this module.
|
| -*/
|
| -static void winMemShutdown(void *pAppData){
|
| - winMemData *pWinMemData = (winMemData *)pAppData;
|
| -
|
| - if( !pWinMemData ) return;
|
| - assert( pWinMemData->magic1==WINMEM_MAGIC1 );
|
| - assert( pWinMemData->magic2==WINMEM_MAGIC2 );
|
| -
|
| - if( pWinMemData->hHeap ){
|
| - assert( pWinMemData->hHeap!=INVALID_HANDLE_VALUE );
|
| -#if !SQLITE_OS_WINRT && defined(SQLITE_WIN32_MALLOC_VALIDATE)
|
| - assert( osHeapValidate(pWinMemData->hHeap, SQLITE_WIN32_HEAP_FLAGS, NULL) );
|
| -#endif
|
| - if( pWinMemData->bOwned ){
|
| - if( !osHeapDestroy(pWinMemData->hHeap) ){
|
| - sqlite3_log(SQLITE_NOMEM, "failed to HeapDestroy (%lu), heap=%p",
|
| - osGetLastError(), (void*)pWinMemData->hHeap);
|
| - }
|
| - pWinMemData->bOwned = FALSE;
|
| - }
|
| - pWinMemData->hHeap = NULL;
|
| - }
|
| -}
|
| -
|
| -/*
|
| -** Populate the low-level memory allocation function pointers in
|
| -** sqlite3GlobalConfig.m with pointers to the routines in this file. The
|
| -** arguments specify the block of memory to manage.
|
| -**
|
| -** This routine is only called by sqlite3_config(), and therefore
|
| -** is not required to be threadsafe (it is not).
|
| -*/
|
| -const sqlite3_mem_methods *sqlite3MemGetWin32(void){
|
| - static const sqlite3_mem_methods winMemMethods = {
|
| - winMemMalloc,
|
| - winMemFree,
|
| - winMemRealloc,
|
| - winMemSize,
|
| - winMemRoundup,
|
| - winMemInit,
|
| - winMemShutdown,
|
| - &win_mem_data
|
| - };
|
| - return &winMemMethods;
|
| -}
|
| -
|
| -void sqlite3MemSetDefault(void){
|
| - sqlite3_config(SQLITE_CONFIG_MALLOC, sqlite3MemGetWin32());
|
| -}
|
| -#endif /* SQLITE_WIN32_MALLOC */
|
| -
|
| -/*
|
| -** Convert a UTF-8 string to Microsoft Unicode (UTF-16?).
|
| -**
|
| -** Space to hold the returned string is obtained from malloc.
|
| -*/
|
| -static LPWSTR winUtf8ToUnicode(const char *zFilename){
|
| - int nChar;
|
| - LPWSTR zWideFilename;
|
| -
|
| - nChar = osMultiByteToWideChar(CP_UTF8, 0, zFilename, -1, NULL, 0);
|
| - if( nChar==0 ){
|
| - return 0;
|
| - }
|
| - zWideFilename = sqlite3MallocZero( nChar*sizeof(zWideFilename[0]) );
|
| - if( zWideFilename==0 ){
|
| - return 0;
|
| - }
|
| - nChar = osMultiByteToWideChar(CP_UTF8, 0, zFilename, -1, zWideFilename,
|
| - nChar);
|
| - if( nChar==0 ){
|
| - sqlite3_free(zWideFilename);
|
| - zWideFilename = 0;
|
| - }
|
| - return zWideFilename;
|
| -}
|
| -
|
| -/*
|
| -** Convert Microsoft Unicode to UTF-8. Space to hold the returned string is
|
| -** obtained from sqlite3_malloc().
|
| -*/
|
| -static char *winUnicodeToUtf8(LPCWSTR zWideFilename){
|
| - int nByte;
|
| - char *zFilename;
|
| -
|
| - nByte = osWideCharToMultiByte(CP_UTF8, 0, zWideFilename, -1, 0, 0, 0, 0);
|
| - if( nByte == 0 ){
|
| - return 0;
|
| - }
|
| - zFilename = sqlite3MallocZero( nByte );
|
| - if( zFilename==0 ){
|
| - return 0;
|
| - }
|
| - nByte = osWideCharToMultiByte(CP_UTF8, 0, zWideFilename, -1, zFilename, nByte,
|
| - 0, 0);
|
| - if( nByte == 0 ){
|
| - sqlite3_free(zFilename);
|
| - zFilename = 0;
|
| - }
|
| - return zFilename;
|
| -}
|
| -
|
| -/*
|
| -** Convert an ANSI string to Microsoft Unicode, based on the
|
| -** current codepage settings for file apis.
|
| -**
|
| -** Space to hold the returned string is obtained
|
| -** from sqlite3_malloc.
|
| -*/
|
| -static LPWSTR winMbcsToUnicode(const char *zFilename){
|
| - int nByte;
|
| - LPWSTR zMbcsFilename;
|
| - int codepage = osAreFileApisANSI() ? CP_ACP : CP_OEMCP;
|
| -
|
| - nByte = osMultiByteToWideChar(codepage, 0, zFilename, -1, NULL,
|
| - 0)*sizeof(WCHAR);
|
| - if( nByte==0 ){
|
| - return 0;
|
| - }
|
| - zMbcsFilename = sqlite3MallocZero( nByte*sizeof(zMbcsFilename[0]) );
|
| - if( zMbcsFilename==0 ){
|
| - return 0;
|
| - }
|
| - nByte = osMultiByteToWideChar(codepage, 0, zFilename, -1, zMbcsFilename,
|
| - nByte);
|
| - if( nByte==0 ){
|
| - sqlite3_free(zMbcsFilename);
|
| - zMbcsFilename = 0;
|
| - }
|
| - return zMbcsFilename;
|
| -}
|
| -
|
| -/*
|
| -** Convert Microsoft Unicode to multi-byte character string, based on the
|
| -** user's ANSI codepage.
|
| -**
|
| -** Space to hold the returned string is obtained from
|
| -** sqlite3_malloc().
|
| -*/
|
| -static char *winUnicodeToMbcs(LPCWSTR zWideFilename){
|
| - int nByte;
|
| - char *zFilename;
|
| - int codepage = osAreFileApisANSI() ? CP_ACP : CP_OEMCP;
|
| -
|
| - nByte = osWideCharToMultiByte(codepage, 0, zWideFilename, -1, 0, 0, 0, 0);
|
| - if( nByte == 0 ){
|
| - return 0;
|
| - }
|
| - zFilename = sqlite3MallocZero( nByte );
|
| - if( zFilename==0 ){
|
| - return 0;
|
| - }
|
| - nByte = osWideCharToMultiByte(codepage, 0, zWideFilename, -1, zFilename,
|
| - nByte, 0, 0);
|
| - if( nByte == 0 ){
|
| - sqlite3_free(zFilename);
|
| - zFilename = 0;
|
| - }
|
| - return zFilename;
|
| -}
|
| -
|
| -/*
|
| -** Convert multibyte character string to UTF-8. Space to hold the
|
| -** returned string is obtained from sqlite3_malloc().
|
| -*/
|
| -char *sqlite3_win32_mbcs_to_utf8(const char *zFilename){
|
| - char *zFilenameUtf8;
|
| - LPWSTR zTmpWide;
|
| -
|
| - zTmpWide = winMbcsToUnicode(zFilename);
|
| - if( zTmpWide==0 ){
|
| - return 0;
|
| - }
|
| - zFilenameUtf8 = winUnicodeToUtf8(zTmpWide);
|
| - sqlite3_free(zTmpWide);
|
| - return zFilenameUtf8;
|
| -}
|
| -
|
| -/*
|
| -** Convert UTF-8 to multibyte character string. Space to hold the
|
| -** returned string is obtained from sqlite3_malloc().
|
| -*/
|
| -char *sqlite3_win32_utf8_to_mbcs(const char *zFilename){
|
| - char *zFilenameMbcs;
|
| - LPWSTR zTmpWide;
|
| -
|
| - zTmpWide = winUtf8ToUnicode(zFilename);
|
| - if( zTmpWide==0 ){
|
| - return 0;
|
| - }
|
| - zFilenameMbcs = winUnicodeToMbcs(zTmpWide);
|
| - sqlite3_free(zTmpWide);
|
| - return zFilenameMbcs;
|
| -}
|
| -
|
| -/*
|
| -** This function sets the data directory or the temporary directory based on
|
| -** the provided arguments. The type argument must be 1 in order to set the
|
| -** data directory or 2 in order to set the temporary directory. The zValue
|
| -** argument is the name of the directory to use. The return value will be
|
| -** SQLITE_OK if successful.
|
| -*/
|
| -int sqlite3_win32_set_directory(DWORD type, LPCWSTR zValue){
|
| - char **ppDirectory = 0;
|
| -#ifndef SQLITE_OMIT_AUTOINIT
|
| - int rc = sqlite3_initialize();
|
| - if( rc ) return rc;
|
| -#endif
|
| - if( type==SQLITE_WIN32_DATA_DIRECTORY_TYPE ){
|
| - ppDirectory = &sqlite3_data_directory;
|
| - }else if( type==SQLITE_WIN32_TEMP_DIRECTORY_TYPE ){
|
| - ppDirectory = &sqlite3_temp_directory;
|
| - }
|
| - assert( !ppDirectory || type==SQLITE_WIN32_DATA_DIRECTORY_TYPE
|
| - || type==SQLITE_WIN32_TEMP_DIRECTORY_TYPE
|
| - );
|
| - assert( !ppDirectory || sqlite3MemdebugHasType(*ppDirectory, MEMTYPE_HEAP) );
|
| - if( ppDirectory ){
|
| - char *zValueUtf8 = 0;
|
| - if( zValue && zValue[0] ){
|
| - zValueUtf8 = winUnicodeToUtf8(zValue);
|
| - if ( zValueUtf8==0 ){
|
| - return SQLITE_NOMEM;
|
| - }
|
| - }
|
| - sqlite3_free(*ppDirectory);
|
| - *ppDirectory = zValueUtf8;
|
| - return SQLITE_OK;
|
| - }
|
| - return SQLITE_ERROR;
|
| -}
|
| -
|
| -/*
|
| -** The return value of winGetLastErrorMsg
|
| -** is zero if the error message fits in the buffer, or non-zero
|
| -** otherwise (if the message was truncated).
|
| -*/
|
| -static int winGetLastErrorMsg(DWORD lastErrno, int nBuf, char *zBuf){
|
| - /* FormatMessage returns 0 on failure. Otherwise it
|
| - ** returns the number of TCHARs written to the output
|
| - ** buffer, excluding the terminating null char.
|
| - */
|
| - DWORD dwLen = 0;
|
| - char *zOut = 0;
|
| -
|
| - if( osIsNT() ){
|
| -#if SQLITE_OS_WINRT
|
| - WCHAR zTempWide[SQLITE_WIN32_MAX_ERRMSG_CHARS+1];
|
| - dwLen = osFormatMessageW(FORMAT_MESSAGE_FROM_SYSTEM |
|
| - FORMAT_MESSAGE_IGNORE_INSERTS,
|
| - NULL,
|
| - lastErrno,
|
| - 0,
|
| - zTempWide,
|
| - SQLITE_WIN32_MAX_ERRMSG_CHARS,
|
| - 0);
|
| -#else
|
| - LPWSTR zTempWide = NULL;
|
| - dwLen = osFormatMessageW(FORMAT_MESSAGE_ALLOCATE_BUFFER |
|
| - FORMAT_MESSAGE_FROM_SYSTEM |
|
| - FORMAT_MESSAGE_IGNORE_INSERTS,
|
| - NULL,
|
| - lastErrno,
|
| - 0,
|
| - (LPWSTR) &zTempWide,
|
| - 0,
|
| - 0);
|
| -#endif
|
| - if( dwLen > 0 ){
|
| - /* allocate a buffer and convert to UTF8 */
|
| - sqlite3BeginBenignMalloc();
|
| - zOut = winUnicodeToUtf8(zTempWide);
|
| - sqlite3EndBenignMalloc();
|
| -#if !SQLITE_OS_WINRT
|
| - /* free the system buffer allocated by FormatMessage */
|
| - osLocalFree(zTempWide);
|
| -#endif
|
| - }
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - char *zTemp = NULL;
|
| - dwLen = osFormatMessageA(FORMAT_MESSAGE_ALLOCATE_BUFFER |
|
| - FORMAT_MESSAGE_FROM_SYSTEM |
|
| - FORMAT_MESSAGE_IGNORE_INSERTS,
|
| - NULL,
|
| - lastErrno,
|
| - 0,
|
| - (LPSTR) &zTemp,
|
| - 0,
|
| - 0);
|
| - if( dwLen > 0 ){
|
| - /* allocate a buffer and convert to UTF8 */
|
| - sqlite3BeginBenignMalloc();
|
| - zOut = sqlite3_win32_mbcs_to_utf8(zTemp);
|
| - sqlite3EndBenignMalloc();
|
| - /* free the system buffer allocated by FormatMessage */
|
| - osLocalFree(zTemp);
|
| - }
|
| - }
|
| -#endif
|
| - if( 0 == dwLen ){
|
| - sqlite3_snprintf(nBuf, zBuf, "OsError 0x%lx (%lu)", lastErrno, lastErrno);
|
| - }else{
|
| - /* copy a maximum of nBuf chars to output buffer */
|
| - sqlite3_snprintf(nBuf, zBuf, "%s", zOut);
|
| - /* free the UTF8 buffer */
|
| - sqlite3_free(zOut);
|
| - }
|
| - return 0;
|
| -}
|
| -
|
| -/*
|
| -**
|
| -** This function - winLogErrorAtLine() - is only ever called via the macro
|
| -** winLogError().
|
| -**
|
| -** This routine is invoked after an error occurs in an OS function.
|
| -** It logs a message using sqlite3_log() containing the current value of
|
| -** error code and, if possible, the human-readable equivalent from
|
| -** FormatMessage.
|
| -**
|
| -** The first argument passed to the macro should be the error code that
|
| -** will be returned to SQLite (e.g. SQLITE_IOERR_DELETE, SQLITE_CANTOPEN).
|
| -** The two subsequent arguments should be the name of the OS function that
|
| -** failed and the associated file-system path, if any.
|
| -*/
|
| -#define winLogError(a,b,c,d) winLogErrorAtLine(a,b,c,d,__LINE__)
|
| -static int winLogErrorAtLine(
|
| - int errcode, /* SQLite error code */
|
| - DWORD lastErrno, /* Win32 last error */
|
| - const char *zFunc, /* Name of OS function that failed */
|
| - const char *zPath, /* File path associated with error */
|
| - int iLine /* Source line number where error occurred */
|
| -){
|
| - char zMsg[500]; /* Human readable error text */
|
| - int i; /* Loop counter */
|
| -
|
| - zMsg[0] = 0;
|
| - winGetLastErrorMsg(lastErrno, sizeof(zMsg), zMsg);
|
| - assert( errcode!=SQLITE_OK );
|
| - if( zPath==0 ) zPath = "";
|
| - for(i=0; zMsg[i] && zMsg[i]!='\r' && zMsg[i]!='\n'; i++){}
|
| - zMsg[i] = 0;
|
| - sqlite3_log(errcode,
|
| - "os_win.c:%d: (%lu) %s(%s) - %s",
|
| - iLine, lastErrno, zFunc, zPath, zMsg
|
| - );
|
| -
|
| - return errcode;
|
| -}
|
| -
|
| -/*
|
| -** The number of times that a ReadFile(), WriteFile(), and DeleteFile()
|
| -** will be retried following a locking error - probably caused by
|
| -** antivirus software. Also the initial delay before the first retry.
|
| -** The delay increases linearly with each retry.
|
| -*/
|
| -#ifndef SQLITE_WIN32_IOERR_RETRY
|
| -# define SQLITE_WIN32_IOERR_RETRY 10
|
| -#endif
|
| -#ifndef SQLITE_WIN32_IOERR_RETRY_DELAY
|
| -# define SQLITE_WIN32_IOERR_RETRY_DELAY 25
|
| -#endif
|
| -static int winIoerrRetry = SQLITE_WIN32_IOERR_RETRY;
|
| -static int winIoerrRetryDelay = SQLITE_WIN32_IOERR_RETRY_DELAY;
|
| -
|
| -/*
|
| -** The "winIoerrCanRetry1" macro is used to determine if a particular I/O
|
| -** error code obtained via GetLastError() is eligible to be retried. It
|
| -** must accept the error code DWORD as its only argument and should return
|
| -** non-zero if the error code is transient in nature and the operation
|
| -** responsible for generating the original error might succeed upon being
|
| -** retried. The argument to this macro should be a variable.
|
| -**
|
| -** Additionally, a macro named "winIoerrCanRetry2" may be defined. If it
|
| -** is defined, it will be consulted only when the macro "winIoerrCanRetry1"
|
| -** returns zero. The "winIoerrCanRetry2" macro is completely optional and
|
| -** may be used to include additional error codes in the set that should
|
| -** result in the failing I/O operation being retried by the caller. If
|
| -** defined, the "winIoerrCanRetry2" macro must exhibit external semantics
|
| -** identical to those of the "winIoerrCanRetry1" macro.
|
| -*/
|
| -#if !defined(winIoerrCanRetry1)
|
| -#define winIoerrCanRetry1(a) (((a)==ERROR_ACCESS_DENIED) || \
|
| - ((a)==ERROR_SHARING_VIOLATION) || \
|
| - ((a)==ERROR_LOCK_VIOLATION) || \
|
| - ((a)==ERROR_DEV_NOT_EXIST) || \
|
| - ((a)==ERROR_NETNAME_DELETED) || \
|
| - ((a)==ERROR_SEM_TIMEOUT) || \
|
| - ((a)==ERROR_NETWORK_UNREACHABLE))
|
| -#endif
|
| -
|
| -/*
|
| -** If a ReadFile() or WriteFile() error occurs, invoke this routine
|
| -** to see if it should be retried. Return TRUE to retry. Return FALSE
|
| -** to give up with an error.
|
| -*/
|
| -static int winRetryIoerr(int *pnRetry, DWORD *pError){
|
| - DWORD e = osGetLastError();
|
| - if( *pnRetry>=winIoerrRetry ){
|
| - if( pError ){
|
| - *pError = e;
|
| - }
|
| - return 0;
|
| - }
|
| - if( winIoerrCanRetry1(e) ){
|
| - sqlite3_win32_sleep(winIoerrRetryDelay*(1+*pnRetry));
|
| - ++*pnRetry;
|
| - return 1;
|
| - }
|
| -#if defined(winIoerrCanRetry2)
|
| - else if( winIoerrCanRetry2(e) ){
|
| - sqlite3_win32_sleep(winIoerrRetryDelay*(1+*pnRetry));
|
| - ++*pnRetry;
|
| - return 1;
|
| - }
|
| -#endif
|
| - if( pError ){
|
| - *pError = e;
|
| - }
|
| - return 0;
|
| -}
|
| -
|
| -/*
|
| -** Log a I/O error retry episode.
|
| -*/
|
| -static void winLogIoerr(int nRetry){
|
| - if( nRetry ){
|
| - sqlite3_log(SQLITE_IOERR,
|
| - "delayed %dms for lock/sharing conflict",
|
| - winIoerrRetryDelay*nRetry*(nRetry+1)/2
|
| - );
|
| - }
|
| -}
|
| -
|
| -#if SQLITE_OS_WINCE
|
| -/*************************************************************************
|
| -** This section contains code for WinCE only.
|
| -*/
|
| -#if !defined(SQLITE_MSVC_LOCALTIME_API) || !SQLITE_MSVC_LOCALTIME_API
|
| -/*
|
| -** The MSVC CRT on Windows CE may not have a localtime() function. So
|
| -** create a substitute.
|
| -*/
|
| -#include <time.h>
|
| -struct tm *__cdecl localtime(const time_t *t)
|
| -{
|
| - static struct tm y;
|
| - FILETIME uTm, lTm;
|
| - SYSTEMTIME pTm;
|
| - sqlite3_int64 t64;
|
| - t64 = *t;
|
| - t64 = (t64 + 11644473600)*10000000;
|
| - uTm.dwLowDateTime = (DWORD)(t64 & 0xFFFFFFFF);
|
| - uTm.dwHighDateTime= (DWORD)(t64 >> 32);
|
| - osFileTimeToLocalFileTime(&uTm,&lTm);
|
| - osFileTimeToSystemTime(&lTm,&pTm);
|
| - y.tm_year = pTm.wYear - 1900;
|
| - y.tm_mon = pTm.wMonth - 1;
|
| - y.tm_wday = pTm.wDayOfWeek;
|
| - y.tm_mday = pTm.wDay;
|
| - y.tm_hour = pTm.wHour;
|
| - y.tm_min = pTm.wMinute;
|
| - y.tm_sec = pTm.wSecond;
|
| - return &y;
|
| -}
|
| -#endif
|
| -
|
| -#define HANDLE_TO_WINFILE(a) (winFile*)&((char*)a)[-(int)offsetof(winFile,h)]
|
| -
|
| -/*
|
| -** Acquire a lock on the handle h
|
| -*/
|
| -static void winceMutexAcquire(HANDLE h){
|
| - DWORD dwErr;
|
| - do {
|
| - dwErr = osWaitForSingleObject(h, INFINITE);
|
| - } while (dwErr != WAIT_OBJECT_0 && dwErr != WAIT_ABANDONED);
|
| -}
|
| -/*
|
| -** Release a lock acquired by winceMutexAcquire()
|
| -*/
|
| -#define winceMutexRelease(h) ReleaseMutex(h)
|
| -
|
| -/*
|
| -** Create the mutex and shared memory used for locking in the file
|
| -** descriptor pFile
|
| -*/
|
| -static int winceCreateLock(const char *zFilename, winFile *pFile){
|
| - LPWSTR zTok;
|
| - LPWSTR zName;
|
| - DWORD lastErrno;
|
| - BOOL bLogged = FALSE;
|
| - BOOL bInit = TRUE;
|
| -
|
| - zName = winUtf8ToUnicode(zFilename);
|
| - if( zName==0 ){
|
| - /* out of memory */
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| -
|
| - /* Initialize the local lockdata */
|
| - memset(&pFile->local, 0, sizeof(pFile->local));
|
| -
|
| - /* Replace the backslashes from the filename and lowercase it
|
| - ** to derive a mutex name. */
|
| - zTok = osCharLowerW(zName);
|
| - for (;*zTok;zTok++){
|
| - if (*zTok == '\\') *zTok = '_';
|
| - }
|
| -
|
| - /* Create/open the named mutex */
|
| - pFile->hMutex = osCreateMutexW(NULL, FALSE, zName);
|
| - if (!pFile->hMutex){
|
| - pFile->lastErrno = osGetLastError();
|
| - sqlite3_free(zName);
|
| - return winLogError(SQLITE_IOERR, pFile->lastErrno,
|
| - "winceCreateLock1", zFilename);
|
| - }
|
| -
|
| - /* Acquire the mutex before continuing */
|
| - winceMutexAcquire(pFile->hMutex);
|
| -
|
| - /* Since the names of named mutexes, semaphores, file mappings etc are
|
| - ** case-sensitive, take advantage of that by uppercasing the mutex name
|
| - ** and using that as the shared filemapping name.
|
| - */
|
| - osCharUpperW(zName);
|
| - pFile->hShared = osCreateFileMappingW(INVALID_HANDLE_VALUE, NULL,
|
| - PAGE_READWRITE, 0, sizeof(winceLock),
|
| - zName);
|
| -
|
| - /* Set a flag that indicates we're the first to create the memory so it
|
| - ** must be zero-initialized */
|
| - lastErrno = osGetLastError();
|
| - if (lastErrno == ERROR_ALREADY_EXISTS){
|
| - bInit = FALSE;
|
| - }
|
| -
|
| - sqlite3_free(zName);
|
| -
|
| - /* If we succeeded in making the shared memory handle, map it. */
|
| - if( pFile->hShared ){
|
| - pFile->shared = (winceLock*)osMapViewOfFile(pFile->hShared,
|
| - FILE_MAP_READ|FILE_MAP_WRITE, 0, 0, sizeof(winceLock));
|
| - /* If mapping failed, close the shared memory handle and erase it */
|
| - if( !pFile->shared ){
|
| - pFile->lastErrno = osGetLastError();
|
| - winLogError(SQLITE_IOERR, pFile->lastErrno,
|
| - "winceCreateLock2", zFilename);
|
| - bLogged = TRUE;
|
| - osCloseHandle(pFile->hShared);
|
| - pFile->hShared = NULL;
|
| - }
|
| - }
|
| -
|
| - /* If shared memory could not be created, then close the mutex and fail */
|
| - if( pFile->hShared==NULL ){
|
| - if( !bLogged ){
|
| - pFile->lastErrno = lastErrno;
|
| - winLogError(SQLITE_IOERR, pFile->lastErrno,
|
| - "winceCreateLock3", zFilename);
|
| - bLogged = TRUE;
|
| - }
|
| - winceMutexRelease(pFile->hMutex);
|
| - osCloseHandle(pFile->hMutex);
|
| - pFile->hMutex = NULL;
|
| - return SQLITE_IOERR;
|
| - }
|
| -
|
| - /* Initialize the shared memory if we're supposed to */
|
| - if( bInit ){
|
| - memset(pFile->shared, 0, sizeof(winceLock));
|
| - }
|
| -
|
| - winceMutexRelease(pFile->hMutex);
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Destroy the part of winFile that deals with wince locks
|
| -*/
|
| -static void winceDestroyLock(winFile *pFile){
|
| - if (pFile->hMutex){
|
| - /* Acquire the mutex */
|
| - winceMutexAcquire(pFile->hMutex);
|
| -
|
| - /* The following blocks should probably assert in debug mode, but they
|
| - are to cleanup in case any locks remained open */
|
| - if (pFile->local.nReaders){
|
| - pFile->shared->nReaders --;
|
| - }
|
| - if (pFile->local.bReserved){
|
| - pFile->shared->bReserved = FALSE;
|
| - }
|
| - if (pFile->local.bPending){
|
| - pFile->shared->bPending = FALSE;
|
| - }
|
| - if (pFile->local.bExclusive){
|
| - pFile->shared->bExclusive = FALSE;
|
| - }
|
| -
|
| - /* De-reference and close our copy of the shared memory handle */
|
| - osUnmapViewOfFile(pFile->shared);
|
| - osCloseHandle(pFile->hShared);
|
| -
|
| - /* Done with the mutex */
|
| - winceMutexRelease(pFile->hMutex);
|
| - osCloseHandle(pFile->hMutex);
|
| - pFile->hMutex = NULL;
|
| - }
|
| -}
|
| -
|
| -/*
|
| -** An implementation of the LockFile() API of Windows for CE
|
| -*/
|
| -static BOOL winceLockFile(
|
| - LPHANDLE phFile,
|
| - DWORD dwFileOffsetLow,
|
| - DWORD dwFileOffsetHigh,
|
| - DWORD nNumberOfBytesToLockLow,
|
| - DWORD nNumberOfBytesToLockHigh
|
| -){
|
| - winFile *pFile = HANDLE_TO_WINFILE(phFile);
|
| - BOOL bReturn = FALSE;
|
| -
|
| - UNUSED_PARAMETER(dwFileOffsetHigh);
|
| - UNUSED_PARAMETER(nNumberOfBytesToLockHigh);
|
| -
|
| - if (!pFile->hMutex) return TRUE;
|
| - winceMutexAcquire(pFile->hMutex);
|
| -
|
| - /* Wanting an exclusive lock? */
|
| - if (dwFileOffsetLow == (DWORD)SHARED_FIRST
|
| - && nNumberOfBytesToLockLow == (DWORD)SHARED_SIZE){
|
| - if (pFile->shared->nReaders == 0 && pFile->shared->bExclusive == 0){
|
| - pFile->shared->bExclusive = TRUE;
|
| - pFile->local.bExclusive = TRUE;
|
| - bReturn = TRUE;
|
| - }
|
| - }
|
| -
|
| - /* Want a read-only lock? */
|
| - else if (dwFileOffsetLow == (DWORD)SHARED_FIRST &&
|
| - nNumberOfBytesToLockLow == 1){
|
| - if (pFile->shared->bExclusive == 0){
|
| - pFile->local.nReaders ++;
|
| - if (pFile->local.nReaders == 1){
|
| - pFile->shared->nReaders ++;
|
| - }
|
| - bReturn = TRUE;
|
| - }
|
| - }
|
| -
|
| - /* Want a pending lock? */
|
| - else if (dwFileOffsetLow == (DWORD)PENDING_BYTE
|
| - && nNumberOfBytesToLockLow == 1){
|
| - /* If no pending lock has been acquired, then acquire it */
|
| - if (pFile->shared->bPending == 0) {
|
| - pFile->shared->bPending = TRUE;
|
| - pFile->local.bPending = TRUE;
|
| - bReturn = TRUE;
|
| - }
|
| - }
|
| -
|
| - /* Want a reserved lock? */
|
| - else if (dwFileOffsetLow == (DWORD)RESERVED_BYTE
|
| - && nNumberOfBytesToLockLow == 1){
|
| - if (pFile->shared->bReserved == 0) {
|
| - pFile->shared->bReserved = TRUE;
|
| - pFile->local.bReserved = TRUE;
|
| - bReturn = TRUE;
|
| - }
|
| - }
|
| -
|
| - winceMutexRelease(pFile->hMutex);
|
| - return bReturn;
|
| -}
|
| -
|
| -/*
|
| -** An implementation of the UnlockFile API of Windows for CE
|
| -*/
|
| -static BOOL winceUnlockFile(
|
| - LPHANDLE phFile,
|
| - DWORD dwFileOffsetLow,
|
| - DWORD dwFileOffsetHigh,
|
| - DWORD nNumberOfBytesToUnlockLow,
|
| - DWORD nNumberOfBytesToUnlockHigh
|
| -){
|
| - winFile *pFile = HANDLE_TO_WINFILE(phFile);
|
| - BOOL bReturn = FALSE;
|
| -
|
| - UNUSED_PARAMETER(dwFileOffsetHigh);
|
| - UNUSED_PARAMETER(nNumberOfBytesToUnlockHigh);
|
| -
|
| - if (!pFile->hMutex) return TRUE;
|
| - winceMutexAcquire(pFile->hMutex);
|
| -
|
| - /* Releasing a reader lock or an exclusive lock */
|
| - if (dwFileOffsetLow == (DWORD)SHARED_FIRST){
|
| - /* Did we have an exclusive lock? */
|
| - if (pFile->local.bExclusive){
|
| - assert(nNumberOfBytesToUnlockLow == (DWORD)SHARED_SIZE);
|
| - pFile->local.bExclusive = FALSE;
|
| - pFile->shared->bExclusive = FALSE;
|
| - bReturn = TRUE;
|
| - }
|
| -
|
| - /* Did we just have a reader lock? */
|
| - else if (pFile->local.nReaders){
|
| - assert(nNumberOfBytesToUnlockLow == (DWORD)SHARED_SIZE
|
| - || nNumberOfBytesToUnlockLow == 1);
|
| - pFile->local.nReaders --;
|
| - if (pFile->local.nReaders == 0)
|
| - {
|
| - pFile->shared->nReaders --;
|
| - }
|
| - bReturn = TRUE;
|
| - }
|
| - }
|
| -
|
| - /* Releasing a pending lock */
|
| - else if (dwFileOffsetLow == (DWORD)PENDING_BYTE
|
| - && nNumberOfBytesToUnlockLow == 1){
|
| - if (pFile->local.bPending){
|
| - pFile->local.bPending = FALSE;
|
| - pFile->shared->bPending = FALSE;
|
| - bReturn = TRUE;
|
| - }
|
| - }
|
| - /* Releasing a reserved lock */
|
| - else if (dwFileOffsetLow == (DWORD)RESERVED_BYTE
|
| - && nNumberOfBytesToUnlockLow == 1){
|
| - if (pFile->local.bReserved) {
|
| - pFile->local.bReserved = FALSE;
|
| - pFile->shared->bReserved = FALSE;
|
| - bReturn = TRUE;
|
| - }
|
| - }
|
| -
|
| - winceMutexRelease(pFile->hMutex);
|
| - return bReturn;
|
| -}
|
| -/*
|
| -** End of the special code for wince
|
| -*****************************************************************************/
|
| -#endif /* SQLITE_OS_WINCE */
|
| -
|
| -/*
|
| -** Lock a file region.
|
| -*/
|
| -static BOOL winLockFile(
|
| - LPHANDLE phFile,
|
| - DWORD flags,
|
| - DWORD offsetLow,
|
| - DWORD offsetHigh,
|
| - DWORD numBytesLow,
|
| - DWORD numBytesHigh
|
| -){
|
| -#if SQLITE_OS_WINCE
|
| - /*
|
| - ** NOTE: Windows CE is handled differently here due its lack of the Win32
|
| - ** API LockFile.
|
| - */
|
| - return winceLockFile(phFile, offsetLow, offsetHigh,
|
| - numBytesLow, numBytesHigh);
|
| -#else
|
| - if( osIsNT() ){
|
| - OVERLAPPED ovlp;
|
| - memset(&ovlp, 0, sizeof(OVERLAPPED));
|
| - ovlp.Offset = offsetLow;
|
| - ovlp.OffsetHigh = offsetHigh;
|
| - return osLockFileEx(*phFile, flags, 0, numBytesLow, numBytesHigh, &ovlp);
|
| - }else{
|
| - return osLockFile(*phFile, offsetLow, offsetHigh, numBytesLow,
|
| - numBytesHigh);
|
| - }
|
| -#endif
|
| -}
|
| -
|
| -/*
|
| -** Unlock a file region.
|
| - */
|
| -static BOOL winUnlockFile(
|
| - LPHANDLE phFile,
|
| - DWORD offsetLow,
|
| - DWORD offsetHigh,
|
| - DWORD numBytesLow,
|
| - DWORD numBytesHigh
|
| -){
|
| -#if SQLITE_OS_WINCE
|
| - /*
|
| - ** NOTE: Windows CE is handled differently here due its lack of the Win32
|
| - ** API UnlockFile.
|
| - */
|
| - return winceUnlockFile(phFile, offsetLow, offsetHigh,
|
| - numBytesLow, numBytesHigh);
|
| -#else
|
| - if( osIsNT() ){
|
| - OVERLAPPED ovlp;
|
| - memset(&ovlp, 0, sizeof(OVERLAPPED));
|
| - ovlp.Offset = offsetLow;
|
| - ovlp.OffsetHigh = offsetHigh;
|
| - return osUnlockFileEx(*phFile, 0, numBytesLow, numBytesHigh, &ovlp);
|
| - }else{
|
| - return osUnlockFile(*phFile, offsetLow, offsetHigh, numBytesLow,
|
| - numBytesHigh);
|
| - }
|
| -#endif
|
| -}
|
| -
|
| -/*****************************************************************************
|
| -** The next group of routines implement the I/O methods specified
|
| -** by the sqlite3_io_methods object.
|
| -******************************************************************************/
|
| -
|
| -/*
|
| -** Some Microsoft compilers lack this definition.
|
| -*/
|
| -#ifndef INVALID_SET_FILE_POINTER
|
| -# define INVALID_SET_FILE_POINTER ((DWORD)-1)
|
| -#endif
|
| -
|
| -/*
|
| -** Move the current position of the file handle passed as the first
|
| -** argument to offset iOffset within the file. If successful, return 0.
|
| -** Otherwise, set pFile->lastErrno and return non-zero.
|
| -*/
|
| -static int winSeekFile(winFile *pFile, sqlite3_int64 iOffset){
|
| -#if !SQLITE_OS_WINRT
|
| - LONG upperBits; /* Most sig. 32 bits of new offset */
|
| - LONG lowerBits; /* Least sig. 32 bits of new offset */
|
| - DWORD dwRet; /* Value returned by SetFilePointer() */
|
| - DWORD lastErrno; /* Value returned by GetLastError() */
|
| -
|
| - OSTRACE(("SEEK file=%p, offset=%lld\n", pFile->h, iOffset));
|
| -
|
| - upperBits = (LONG)((iOffset>>32) & 0x7fffffff);
|
| - lowerBits = (LONG)(iOffset & 0xffffffff);
|
| -
|
| - /* API oddity: If successful, SetFilePointer() returns a dword
|
| - ** containing the lower 32-bits of the new file-offset. Or, if it fails,
|
| - ** it returns INVALID_SET_FILE_POINTER. However according to MSDN,
|
| - ** INVALID_SET_FILE_POINTER may also be a valid new offset. So to determine
|
| - ** whether an error has actually occurred, it is also necessary to call
|
| - ** GetLastError().
|
| - */
|
| - dwRet = osSetFilePointer(pFile->h, lowerBits, &upperBits, FILE_BEGIN);
|
| -
|
| - if( (dwRet==INVALID_SET_FILE_POINTER
|
| - && ((lastErrno = osGetLastError())!=NO_ERROR)) ){
|
| - pFile->lastErrno = lastErrno;
|
| - winLogError(SQLITE_IOERR_SEEK, pFile->lastErrno,
|
| - "winSeekFile", pFile->zPath);
|
| - OSTRACE(("SEEK file=%p, rc=SQLITE_IOERR_SEEK\n", pFile->h));
|
| - return 1;
|
| - }
|
| -
|
| - OSTRACE(("SEEK file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return 0;
|
| -#else
|
| - /*
|
| - ** Same as above, except that this implementation works for WinRT.
|
| - */
|
| -
|
| - LARGE_INTEGER x; /* The new offset */
|
| - BOOL bRet; /* Value returned by SetFilePointerEx() */
|
| -
|
| - x.QuadPart = iOffset;
|
| - bRet = osSetFilePointerEx(pFile->h, x, 0, FILE_BEGIN);
|
| -
|
| - if(!bRet){
|
| - pFile->lastErrno = osGetLastError();
|
| - winLogError(SQLITE_IOERR_SEEK, pFile->lastErrno,
|
| - "winSeekFile", pFile->zPath);
|
| - OSTRACE(("SEEK file=%p, rc=SQLITE_IOERR_SEEK\n", pFile->h));
|
| - return 1;
|
| - }
|
| -
|
| - OSTRACE(("SEEK file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return 0;
|
| -#endif
|
| -}
|
| -
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| -/* Forward references to VFS helper methods used for memory mapped files */
|
| -static int winMapfile(winFile*, sqlite3_int64);
|
| -static int winUnmapfile(winFile*);
|
| -#endif
|
| -
|
| -/*
|
| -** Close a file.
|
| -**
|
| -** It is reported that an attempt to close a handle might sometimes
|
| -** fail. This is a very unreasonable result, but Windows is notorious
|
| -** for being unreasonable so I do not doubt that it might happen. If
|
| -** the close fails, we pause for 100 milliseconds and try again. As
|
| -** many as MX_CLOSE_ATTEMPT attempts to close the handle are made before
|
| -** giving up and returning an error.
|
| -*/
|
| -#define MX_CLOSE_ATTEMPT 3
|
| -static int winClose(sqlite3_file *id){
|
| - int rc, cnt = 0;
|
| - winFile *pFile = (winFile*)id;
|
| -
|
| - assert( id!=0 );
|
| -#ifndef SQLITE_OMIT_WAL
|
| - assert( pFile->pShm==0 );
|
| -#endif
|
| - assert( pFile->h!=NULL && pFile->h!=INVALID_HANDLE_VALUE );
|
| - OSTRACE(("CLOSE file=%p\n", pFile->h));
|
| -
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - winUnmapfile(pFile);
|
| -#endif
|
| -
|
| - do{
|
| - rc = osCloseHandle(pFile->h);
|
| - /* SimulateIOError( rc=0; cnt=MX_CLOSE_ATTEMPT; ); */
|
| - }while( rc==0 && ++cnt < MX_CLOSE_ATTEMPT && (sqlite3_win32_sleep(100), 1) );
|
| -#if SQLITE_OS_WINCE
|
| -#define WINCE_DELETION_ATTEMPTS 3
|
| - winceDestroyLock(pFile);
|
| - if( pFile->zDeleteOnClose ){
|
| - int cnt = 0;
|
| - while(
|
| - osDeleteFileW(pFile->zDeleteOnClose)==0
|
| - && osGetFileAttributesW(pFile->zDeleteOnClose)!=0xffffffff
|
| - && cnt++ < WINCE_DELETION_ATTEMPTS
|
| - ){
|
| - sqlite3_win32_sleep(100); /* Wait a little before trying again */
|
| - }
|
| - sqlite3_free(pFile->zDeleteOnClose);
|
| - }
|
| -#endif
|
| - if( rc ){
|
| - pFile->h = NULL;
|
| - }
|
| - OpenCounter(-1);
|
| - OSTRACE(("CLOSE file=%p, rc=%s\n", pFile->h, rc ? "ok" : "failed"));
|
| - return rc ? SQLITE_OK
|
| - : winLogError(SQLITE_IOERR_CLOSE, osGetLastError(),
|
| - "winClose", pFile->zPath);
|
| -}
|
| -
|
| -/*
|
| -** Read data from a file into a buffer. Return SQLITE_OK if all
|
| -** bytes were read successfully and SQLITE_IOERR if anything goes
|
| -** wrong.
|
| -*/
|
| -static int winRead(
|
| - sqlite3_file *id, /* File to read from */
|
| - void *pBuf, /* Write content into this buffer */
|
| - int amt, /* Number of bytes to read */
|
| - sqlite3_int64 offset /* Begin reading at this offset */
|
| -){
|
| -#if !SQLITE_OS_WINCE
|
| - OVERLAPPED overlapped; /* The offset for ReadFile. */
|
| -#endif
|
| - winFile *pFile = (winFile*)id; /* file handle */
|
| - DWORD nRead; /* Number of bytes actually read from file */
|
| - int nRetry = 0; /* Number of retrys */
|
| -
|
| - assert( id!=0 );
|
| - assert( amt>0 );
|
| - assert( offset>=0 );
|
| - SimulateIOError(return SQLITE_IOERR_READ);
|
| - OSTRACE(("READ file=%p, buffer=%p, amount=%d, offset=%lld, lock=%d\n",
|
| - pFile->h, pBuf, amt, offset, pFile->locktype));
|
| -
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - /* Deal with as much of this read request as possible by transfering
|
| - ** data from the memory mapping using memcpy(). */
|
| - if( offset<pFile->mmapSize ){
|
| - if( offset+amt <= pFile->mmapSize ){
|
| - memcpy(pBuf, &((u8 *)(pFile->pMapRegion))[offset], amt);
|
| - OSTRACE(("READ-MMAP file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }else{
|
| - int nCopy = (int)(pFile->mmapSize - offset);
|
| - memcpy(pBuf, &((u8 *)(pFile->pMapRegion))[offset], nCopy);
|
| - pBuf = &((u8 *)pBuf)[nCopy];
|
| - amt -= nCopy;
|
| - offset += nCopy;
|
| - }
|
| - }
|
| -#endif
|
| -
|
| -#if SQLITE_OS_WINCE
|
| - if( winSeekFile(pFile, offset) ){
|
| - OSTRACE(("READ file=%p, rc=SQLITE_FULL\n", pFile->h));
|
| - return SQLITE_FULL;
|
| - }
|
| - while( !osReadFile(pFile->h, pBuf, amt, &nRead, 0) ){
|
| -#else
|
| - memset(&overlapped, 0, sizeof(OVERLAPPED));
|
| - overlapped.Offset = (LONG)(offset & 0xffffffff);
|
| - overlapped.OffsetHigh = (LONG)((offset>>32) & 0x7fffffff);
|
| - while( !osReadFile(pFile->h, pBuf, amt, &nRead, &overlapped) &&
|
| - osGetLastError()!=ERROR_HANDLE_EOF ){
|
| -#endif
|
| - DWORD lastErrno;
|
| - if( winRetryIoerr(&nRetry, &lastErrno) ) continue;
|
| - pFile->lastErrno = lastErrno;
|
| - OSTRACE(("READ file=%p, rc=SQLITE_IOERR_READ\n", pFile->h));
|
| - return winLogError(SQLITE_IOERR_READ, pFile->lastErrno,
|
| - "winRead", pFile->zPath);
|
| - }
|
| - winLogIoerr(nRetry);
|
| - if( nRead<(DWORD)amt ){
|
| - /* Unread parts of the buffer must be zero-filled */
|
| - memset(&((char*)pBuf)[nRead], 0, amt-nRead);
|
| - OSTRACE(("READ file=%p, rc=SQLITE_IOERR_SHORT_READ\n", pFile->h));
|
| - return SQLITE_IOERR_SHORT_READ;
|
| - }
|
| -
|
| - OSTRACE(("READ file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Write data from a buffer into a file. Return SQLITE_OK on success
|
| -** or some other error code on failure.
|
| -*/
|
| -static int winWrite(
|
| - sqlite3_file *id, /* File to write into */
|
| - const void *pBuf, /* The bytes to be written */
|
| - int amt, /* Number of bytes to write */
|
| - sqlite3_int64 offset /* Offset into the file to begin writing at */
|
| -){
|
| - int rc = 0; /* True if error has occurred, else false */
|
| - winFile *pFile = (winFile*)id; /* File handle */
|
| - int nRetry = 0; /* Number of retries */
|
| -
|
| - assert( amt>0 );
|
| - assert( pFile );
|
| - SimulateIOError(return SQLITE_IOERR_WRITE);
|
| - SimulateDiskfullError(return SQLITE_FULL);
|
| -
|
| - OSTRACE(("WRITE file=%p, buffer=%p, amount=%d, offset=%lld, lock=%d\n",
|
| - pFile->h, pBuf, amt, offset, pFile->locktype));
|
| -
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - /* Deal with as much of this write request as possible by transfering
|
| - ** data from the memory mapping using memcpy(). */
|
| - if( offset<pFile->mmapSize ){
|
| - if( offset+amt <= pFile->mmapSize ){
|
| - memcpy(&((u8 *)(pFile->pMapRegion))[offset], pBuf, amt);
|
| - OSTRACE(("WRITE-MMAP file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }else{
|
| - int nCopy = (int)(pFile->mmapSize - offset);
|
| - memcpy(&((u8 *)(pFile->pMapRegion))[offset], pBuf, nCopy);
|
| - pBuf = &((u8 *)pBuf)[nCopy];
|
| - amt -= nCopy;
|
| - offset += nCopy;
|
| - }
|
| - }
|
| -#endif
|
| -
|
| -#if SQLITE_OS_WINCE
|
| - rc = winSeekFile(pFile, offset);
|
| - if( rc==0 ){
|
| -#else
|
| - {
|
| -#endif
|
| -#if !SQLITE_OS_WINCE
|
| - OVERLAPPED overlapped; /* The offset for WriteFile. */
|
| -#endif
|
| - u8 *aRem = (u8 *)pBuf; /* Data yet to be written */
|
| - int nRem = amt; /* Number of bytes yet to be written */
|
| - DWORD nWrite; /* Bytes written by each WriteFile() call */
|
| - DWORD lastErrno = NO_ERROR; /* Value returned by GetLastError() */
|
| -
|
| -#if !SQLITE_OS_WINCE
|
| - memset(&overlapped, 0, sizeof(OVERLAPPED));
|
| - overlapped.Offset = (LONG)(offset & 0xffffffff);
|
| - overlapped.OffsetHigh = (LONG)((offset>>32) & 0x7fffffff);
|
| -#endif
|
| -
|
| - while( nRem>0 ){
|
| -#if SQLITE_OS_WINCE
|
| - if( !osWriteFile(pFile->h, aRem, nRem, &nWrite, 0) ){
|
| -#else
|
| - if( !osWriteFile(pFile->h, aRem, nRem, &nWrite, &overlapped) ){
|
| -#endif
|
| - if( winRetryIoerr(&nRetry, &lastErrno) ) continue;
|
| - break;
|
| - }
|
| - assert( nWrite==0 || nWrite<=(DWORD)nRem );
|
| - if( nWrite==0 || nWrite>(DWORD)nRem ){
|
| - lastErrno = osGetLastError();
|
| - break;
|
| - }
|
| -#if !SQLITE_OS_WINCE
|
| - offset += nWrite;
|
| - overlapped.Offset = (LONG)(offset & 0xffffffff);
|
| - overlapped.OffsetHigh = (LONG)((offset>>32) & 0x7fffffff);
|
| -#endif
|
| - aRem += nWrite;
|
| - nRem -= nWrite;
|
| - }
|
| - if( nRem>0 ){
|
| - pFile->lastErrno = lastErrno;
|
| - rc = 1;
|
| - }
|
| - }
|
| -
|
| - if( rc ){
|
| - if( ( pFile->lastErrno==ERROR_HANDLE_DISK_FULL )
|
| - || ( pFile->lastErrno==ERROR_DISK_FULL )){
|
| - OSTRACE(("WRITE file=%p, rc=SQLITE_FULL\n", pFile->h));
|
| - return winLogError(SQLITE_FULL, pFile->lastErrno,
|
| - "winWrite1", pFile->zPath);
|
| - }
|
| - OSTRACE(("WRITE file=%p, rc=SQLITE_IOERR_WRITE\n", pFile->h));
|
| - return winLogError(SQLITE_IOERR_WRITE, pFile->lastErrno,
|
| - "winWrite2", pFile->zPath);
|
| - }else{
|
| - winLogIoerr(nRetry);
|
| - }
|
| - OSTRACE(("WRITE file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Truncate an open file to a specified size
|
| -*/
|
| -static int winTruncate(sqlite3_file *id, sqlite3_int64 nByte){
|
| - winFile *pFile = (winFile*)id; /* File handle object */
|
| - int rc = SQLITE_OK; /* Return code for this function */
|
| - DWORD lastErrno;
|
| -
|
| - assert( pFile );
|
| - SimulateIOError(return SQLITE_IOERR_TRUNCATE);
|
| - OSTRACE(("TRUNCATE file=%p, size=%lld, lock=%d\n",
|
| - pFile->h, nByte, pFile->locktype));
|
| -
|
| - /* If the user has configured a chunk-size for this file, truncate the
|
| - ** file so that it consists of an integer number of chunks (i.e. the
|
| - ** actual file size after the operation may be larger than the requested
|
| - ** size).
|
| - */
|
| - if( pFile->szChunk>0 ){
|
| - nByte = ((nByte + pFile->szChunk - 1)/pFile->szChunk) * pFile->szChunk;
|
| - }
|
| -
|
| - /* SetEndOfFile() returns non-zero when successful, or zero when it fails. */
|
| - if( winSeekFile(pFile, nByte) ){
|
| - rc = winLogError(SQLITE_IOERR_TRUNCATE, pFile->lastErrno,
|
| - "winTruncate1", pFile->zPath);
|
| - }else if( 0==osSetEndOfFile(pFile->h) &&
|
| - ((lastErrno = osGetLastError())!=ERROR_USER_MAPPED_FILE) ){
|
| - pFile->lastErrno = lastErrno;
|
| - rc = winLogError(SQLITE_IOERR_TRUNCATE, pFile->lastErrno,
|
| - "winTruncate2", pFile->zPath);
|
| - }
|
| -
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - /* If the file was truncated to a size smaller than the currently
|
| - ** mapped region, reduce the effective mapping size as well. SQLite will
|
| - ** use read() and write() to access data beyond this point from now on.
|
| - */
|
| - if( pFile->pMapRegion && nByte<pFile->mmapSize ){
|
| - pFile->mmapSize = nByte;
|
| - }
|
| -#endif
|
| -
|
| - OSTRACE(("TRUNCATE file=%p, rc=%s\n", pFile->h, sqlite3ErrName(rc)));
|
| - return rc;
|
| -}
|
| -
|
| -#ifdef SQLITE_TEST
|
| -/*
|
| -** Count the number of fullsyncs and normal syncs. This is used to test
|
| -** that syncs and fullsyncs are occuring at the right times.
|
| -*/
|
| -int sqlite3_sync_count = 0;
|
| -int sqlite3_fullsync_count = 0;
|
| -#endif
|
| -
|
| -/*
|
| -** Make sure all writes to a particular file are committed to disk.
|
| -*/
|
| -static int winSync(sqlite3_file *id, int flags){
|
| -#ifndef SQLITE_NO_SYNC
|
| - /*
|
| - ** Used only when SQLITE_NO_SYNC is not defined.
|
| - */
|
| - BOOL rc;
|
| -#endif
|
| -#if !defined(NDEBUG) || !defined(SQLITE_NO_SYNC) || \
|
| - (defined(SQLITE_TEST) && defined(SQLITE_DEBUG))
|
| - /*
|
| - ** Used when SQLITE_NO_SYNC is not defined and by the assert() and/or
|
| - ** OSTRACE() macros.
|
| - */
|
| - winFile *pFile = (winFile*)id;
|
| -#else
|
| - UNUSED_PARAMETER(id);
|
| -#endif
|
| -
|
| - assert( pFile );
|
| - /* Check that one of SQLITE_SYNC_NORMAL or FULL was passed */
|
| - assert((flags&0x0F)==SQLITE_SYNC_NORMAL
|
| - || (flags&0x0F)==SQLITE_SYNC_FULL
|
| - );
|
| -
|
| - /* Unix cannot, but some systems may return SQLITE_FULL from here. This
|
| - ** line is to test that doing so does not cause any problems.
|
| - */
|
| - SimulateDiskfullError( return SQLITE_FULL );
|
| -
|
| - OSTRACE(("SYNC file=%p, flags=%x, lock=%d\n",
|
| - pFile->h, flags, pFile->locktype));
|
| -
|
| -#ifndef SQLITE_TEST
|
| - UNUSED_PARAMETER(flags);
|
| -#else
|
| - if( (flags&0x0F)==SQLITE_SYNC_FULL ){
|
| - sqlite3_fullsync_count++;
|
| - }
|
| - sqlite3_sync_count++;
|
| -#endif
|
| -
|
| - /* If we compiled with the SQLITE_NO_SYNC flag, then syncing is a
|
| - ** no-op
|
| - */
|
| -#ifdef SQLITE_NO_SYNC
|
| - OSTRACE(("SYNC-NOP file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| -#else
|
| - rc = osFlushFileBuffers(pFile->h);
|
| - SimulateIOError( rc=FALSE );
|
| - if( rc ){
|
| - OSTRACE(("SYNC file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }else{
|
| - pFile->lastErrno = osGetLastError();
|
| - OSTRACE(("SYNC file=%p, rc=SQLITE_IOERR_FSYNC\n", pFile->h));
|
| - return winLogError(SQLITE_IOERR_FSYNC, pFile->lastErrno,
|
| - "winSync", pFile->zPath);
|
| - }
|
| -#endif
|
| -}
|
| -
|
| -/*
|
| -** Determine the current size of a file in bytes
|
| -*/
|
| -static int winFileSize(sqlite3_file *id, sqlite3_int64 *pSize){
|
| - winFile *pFile = (winFile*)id;
|
| - int rc = SQLITE_OK;
|
| -
|
| - assert( id!=0 );
|
| - assert( pSize!=0 );
|
| - SimulateIOError(return SQLITE_IOERR_FSTAT);
|
| - OSTRACE(("SIZE file=%p, pSize=%p\n", pFile->h, pSize));
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - {
|
| - FILE_STANDARD_INFO info;
|
| - if( osGetFileInformationByHandleEx(pFile->h, FileStandardInfo,
|
| - &info, sizeof(info)) ){
|
| - *pSize = info.EndOfFile.QuadPart;
|
| - }else{
|
| - pFile->lastErrno = osGetLastError();
|
| - rc = winLogError(SQLITE_IOERR_FSTAT, pFile->lastErrno,
|
| - "winFileSize", pFile->zPath);
|
| - }
|
| - }
|
| -#else
|
| - {
|
| - DWORD upperBits;
|
| - DWORD lowerBits;
|
| - DWORD lastErrno;
|
| -
|
| - lowerBits = osGetFileSize(pFile->h, &upperBits);
|
| - *pSize = (((sqlite3_int64)upperBits)<<32) + lowerBits;
|
| - if( (lowerBits == INVALID_FILE_SIZE)
|
| - && ((lastErrno = osGetLastError())!=NO_ERROR) ){
|
| - pFile->lastErrno = lastErrno;
|
| - rc = winLogError(SQLITE_IOERR_FSTAT, pFile->lastErrno,
|
| - "winFileSize", pFile->zPath);
|
| - }
|
| - }
|
| -#endif
|
| - OSTRACE(("SIZE file=%p, pSize=%p, *pSize=%lld, rc=%s\n",
|
| - pFile->h, pSize, *pSize, sqlite3ErrName(rc)));
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** LOCKFILE_FAIL_IMMEDIATELY is undefined on some Windows systems.
|
| -*/
|
| -#ifndef LOCKFILE_FAIL_IMMEDIATELY
|
| -# define LOCKFILE_FAIL_IMMEDIATELY 1
|
| -#endif
|
| -
|
| -#ifndef LOCKFILE_EXCLUSIVE_LOCK
|
| -# define LOCKFILE_EXCLUSIVE_LOCK 2
|
| -#endif
|
| -
|
| -/*
|
| -** Historically, SQLite has used both the LockFile and LockFileEx functions.
|
| -** When the LockFile function was used, it was always expected to fail
|
| -** immediately if the lock could not be obtained. Also, it always expected to
|
| -** obtain an exclusive lock. These flags are used with the LockFileEx function
|
| -** and reflect those expectations; therefore, they should not be changed.
|
| -*/
|
| -#ifndef SQLITE_LOCKFILE_FLAGS
|
| -# define SQLITE_LOCKFILE_FLAGS (LOCKFILE_FAIL_IMMEDIATELY | \
|
| - LOCKFILE_EXCLUSIVE_LOCK)
|
| -#endif
|
| -
|
| -/*
|
| -** Currently, SQLite never calls the LockFileEx function without wanting the
|
| -** call to fail immediately if the lock cannot be obtained.
|
| -*/
|
| -#ifndef SQLITE_LOCKFILEEX_FLAGS
|
| -# define SQLITE_LOCKFILEEX_FLAGS (LOCKFILE_FAIL_IMMEDIATELY)
|
| -#endif
|
| -
|
| -/*
|
| -** Acquire a reader lock.
|
| -** Different API routines are called depending on whether or not this
|
| -** is Win9x or WinNT.
|
| -*/
|
| -static int winGetReadLock(winFile *pFile){
|
| - int res;
|
| - OSTRACE(("READ-LOCK file=%p, lock=%d\n", pFile->h, pFile->locktype));
|
| - if( osIsNT() ){
|
| -#if SQLITE_OS_WINCE
|
| - /*
|
| - ** NOTE: Windows CE is handled differently here due its lack of the Win32
|
| - ** API LockFileEx.
|
| - */
|
| - res = winceLockFile(&pFile->h, SHARED_FIRST, 0, 1, 0);
|
| -#else
|
| - res = winLockFile(&pFile->h, SQLITE_LOCKFILEEX_FLAGS, SHARED_FIRST, 0,
|
| - SHARED_SIZE, 0);
|
| -#endif
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - int lk;
|
| - sqlite3_randomness(sizeof(lk), &lk);
|
| - pFile->sharedLockByte = (short)((lk & 0x7fffffff)%(SHARED_SIZE - 1));
|
| - res = winLockFile(&pFile->h, SQLITE_LOCKFILE_FLAGS,
|
| - SHARED_FIRST+pFile->sharedLockByte, 0, 1, 0);
|
| - }
|
| -#endif
|
| - if( res == 0 ){
|
| - pFile->lastErrno = osGetLastError();
|
| - /* No need to log a failure to lock */
|
| - }
|
| - OSTRACE(("READ-LOCK file=%p, result=%d\n", pFile->h, res));
|
| - return res;
|
| -}
|
| -
|
| -/*
|
| -** Undo a readlock
|
| -*/
|
| -static int winUnlockReadLock(winFile *pFile){
|
| - int res;
|
| - DWORD lastErrno;
|
| - OSTRACE(("READ-UNLOCK file=%p, lock=%d\n", pFile->h, pFile->locktype));
|
| - if( osIsNT() ){
|
| - res = winUnlockFile(&pFile->h, SHARED_FIRST, 0, SHARED_SIZE, 0);
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - res = winUnlockFile(&pFile->h, SHARED_FIRST+pFile->sharedLockByte, 0, 1, 0);
|
| - }
|
| -#endif
|
| - if( res==0 && ((lastErrno = osGetLastError())!=ERROR_NOT_LOCKED) ){
|
| - pFile->lastErrno = lastErrno;
|
| - winLogError(SQLITE_IOERR_UNLOCK, pFile->lastErrno,
|
| - "winUnlockReadLock", pFile->zPath);
|
| - }
|
| - OSTRACE(("READ-UNLOCK file=%p, result=%d\n", pFile->h, res));
|
| - return res;
|
| -}
|
| -
|
| -/*
|
| -** Lock the file with the lock specified by parameter locktype - one
|
| -** of the following:
|
| -**
|
| -** (1) SHARED_LOCK
|
| -** (2) RESERVED_LOCK
|
| -** (3) PENDING_LOCK
|
| -** (4) EXCLUSIVE_LOCK
|
| -**
|
| -** Sometimes when requesting one lock state, additional lock states
|
| -** are inserted in between. The locking might fail on one of the later
|
| -** transitions leaving the lock state different from what it started but
|
| -** still short of its goal. The following chart shows the allowed
|
| -** transitions and the inserted intermediate states:
|
| -**
|
| -** UNLOCKED -> SHARED
|
| -** SHARED -> RESERVED
|
| -** SHARED -> (PENDING) -> EXCLUSIVE
|
| -** RESERVED -> (PENDING) -> EXCLUSIVE
|
| -** PENDING -> EXCLUSIVE
|
| -**
|
| -** This routine will only increase a lock. The winUnlock() routine
|
| -** erases all locks at once and returns us immediately to locking level 0.
|
| -** It is not possible to lower the locking level one step at a time. You
|
| -** must go straight to locking level 0.
|
| -*/
|
| -static int winLock(sqlite3_file *id, int locktype){
|
| - int rc = SQLITE_OK; /* Return code from subroutines */
|
| - int res = 1; /* Result of a Windows lock call */
|
| - int newLocktype; /* Set pFile->locktype to this value before exiting */
|
| - int gotPendingLock = 0;/* True if we acquired a PENDING lock this time */
|
| - winFile *pFile = (winFile*)id;
|
| - DWORD lastErrno = NO_ERROR;
|
| -
|
| - assert( id!=0 );
|
| - OSTRACE(("LOCK file=%p, oldLock=%d(%d), newLock=%d\n",
|
| - pFile->h, pFile->locktype, pFile->sharedLockByte, locktype));
|
| -
|
| - /* If there is already a lock of this type or more restrictive on the
|
| - ** OsFile, do nothing. Don't use the end_lock: exit path, as
|
| - ** sqlite3OsEnterMutex() hasn't been called yet.
|
| - */
|
| - if( pFile->locktype>=locktype ){
|
| - OSTRACE(("LOCK-HELD file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| -
|
| - /* Make sure the locking sequence is correct
|
| - */
|
| - assert( pFile->locktype!=NO_LOCK || locktype==SHARED_LOCK );
|
| - assert( locktype!=PENDING_LOCK );
|
| - assert( locktype!=RESERVED_LOCK || pFile->locktype==SHARED_LOCK );
|
| -
|
| - /* Lock the PENDING_LOCK byte if we need to acquire a PENDING lock or
|
| - ** a SHARED lock. If we are acquiring a SHARED lock, the acquisition of
|
| - ** the PENDING_LOCK byte is temporary.
|
| - */
|
| - newLocktype = pFile->locktype;
|
| - if( (pFile->locktype==NO_LOCK)
|
| - || ( (locktype==EXCLUSIVE_LOCK)
|
| - && (pFile->locktype==RESERVED_LOCK))
|
| - ){
|
| - int cnt = 3;
|
| - while( cnt-->0 && (res = winLockFile(&pFile->h, SQLITE_LOCKFILE_FLAGS,
|
| - PENDING_BYTE, 0, 1, 0))==0 ){
|
| - /* Try 3 times to get the pending lock. This is needed to work
|
| - ** around problems caused by indexing and/or anti-virus software on
|
| - ** Windows systems.
|
| - ** If you are using this code as a model for alternative VFSes, do not
|
| - ** copy this retry logic. It is a hack intended for Windows only.
|
| - */
|
| - lastErrno = osGetLastError();
|
| - OSTRACE(("LOCK-PENDING-FAIL file=%p, count=%d, result=%d\n",
|
| - pFile->h, cnt, res));
|
| - if( lastErrno==ERROR_INVALID_HANDLE ){
|
| - pFile->lastErrno = lastErrno;
|
| - rc = SQLITE_IOERR_LOCK;
|
| - OSTRACE(("LOCK-FAIL file=%p, count=%d, rc=%s\n",
|
| - pFile->h, cnt, sqlite3ErrName(rc)));
|
| - return rc;
|
| - }
|
| - if( cnt ) sqlite3_win32_sleep(1);
|
| - }
|
| - gotPendingLock = res;
|
| - if( !res ){
|
| - lastErrno = osGetLastError();
|
| - }
|
| - }
|
| -
|
| - /* Acquire a shared lock
|
| - */
|
| - if( locktype==SHARED_LOCK && res ){
|
| - assert( pFile->locktype==NO_LOCK );
|
| - res = winGetReadLock(pFile);
|
| - if( res ){
|
| - newLocktype = SHARED_LOCK;
|
| - }else{
|
| - lastErrno = osGetLastError();
|
| - }
|
| - }
|
| -
|
| - /* Acquire a RESERVED lock
|
| - */
|
| - if( locktype==RESERVED_LOCK && res ){
|
| - assert( pFile->locktype==SHARED_LOCK );
|
| - res = winLockFile(&pFile->h, SQLITE_LOCKFILE_FLAGS, RESERVED_BYTE, 0, 1, 0);
|
| - if( res ){
|
| - newLocktype = RESERVED_LOCK;
|
| - }else{
|
| - lastErrno = osGetLastError();
|
| - }
|
| - }
|
| -
|
| - /* Acquire a PENDING lock
|
| - */
|
| - if( locktype==EXCLUSIVE_LOCK && res ){
|
| - newLocktype = PENDING_LOCK;
|
| - gotPendingLock = 0;
|
| - }
|
| -
|
| - /* Acquire an EXCLUSIVE lock
|
| - */
|
| - if( locktype==EXCLUSIVE_LOCK && res ){
|
| - assert( pFile->locktype>=SHARED_LOCK );
|
| - res = winUnlockReadLock(pFile);
|
| - res = winLockFile(&pFile->h, SQLITE_LOCKFILE_FLAGS, SHARED_FIRST, 0,
|
| - SHARED_SIZE, 0);
|
| - if( res ){
|
| - newLocktype = EXCLUSIVE_LOCK;
|
| - }else{
|
| - lastErrno = osGetLastError();
|
| - winGetReadLock(pFile);
|
| - }
|
| - }
|
| -
|
| - /* If we are holding a PENDING lock that ought to be released, then
|
| - ** release it now.
|
| - */
|
| - if( gotPendingLock && locktype==SHARED_LOCK ){
|
| - winUnlockFile(&pFile->h, PENDING_BYTE, 0, 1, 0);
|
| - }
|
| -
|
| - /* Update the state of the lock has held in the file descriptor then
|
| - ** return the appropriate result code.
|
| - */
|
| - if( res ){
|
| - rc = SQLITE_OK;
|
| - }else{
|
| - pFile->lastErrno = lastErrno;
|
| - rc = SQLITE_BUSY;
|
| - OSTRACE(("LOCK-FAIL file=%p, wanted=%d, got=%d\n",
|
| - pFile->h, locktype, newLocktype));
|
| - }
|
| - pFile->locktype = (u8)newLocktype;
|
| - OSTRACE(("LOCK file=%p, lock=%d, rc=%s\n",
|
| - pFile->h, pFile->locktype, sqlite3ErrName(rc)));
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** This routine checks if there is a RESERVED lock held on the specified
|
| -** file by this or any other process. If such a lock is held, return
|
| -** non-zero, otherwise zero.
|
| -*/
|
| -static int winCheckReservedLock(sqlite3_file *id, int *pResOut){
|
| - int res;
|
| - winFile *pFile = (winFile*)id;
|
| -
|
| - SimulateIOError( return SQLITE_IOERR_CHECKRESERVEDLOCK; );
|
| - OSTRACE(("TEST-WR-LOCK file=%p, pResOut=%p\n", pFile->h, pResOut));
|
| -
|
| - assert( id!=0 );
|
| - if( pFile->locktype>=RESERVED_LOCK ){
|
| - res = 1;
|
| - OSTRACE(("TEST-WR-LOCK file=%p, result=%d (local)\n", pFile->h, res));
|
| - }else{
|
| - res = winLockFile(&pFile->h, SQLITE_LOCKFILEEX_FLAGS,RESERVED_BYTE, 0, 1, 0);
|
| - if( res ){
|
| - winUnlockFile(&pFile->h, RESERVED_BYTE, 0, 1, 0);
|
| - }
|
| - res = !res;
|
| - OSTRACE(("TEST-WR-LOCK file=%p, result=%d (remote)\n", pFile->h, res));
|
| - }
|
| - *pResOut = res;
|
| - OSTRACE(("TEST-WR-LOCK file=%p, pResOut=%p, *pResOut=%d, rc=SQLITE_OK\n",
|
| - pFile->h, pResOut, *pResOut));
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Lower the locking level on file descriptor id to locktype. locktype
|
| -** must be either NO_LOCK or SHARED_LOCK.
|
| -**
|
| -** If the locking level of the file descriptor is already at or below
|
| -** the requested locking level, this routine is a no-op.
|
| -**
|
| -** It is not possible for this routine to fail if the second argument
|
| -** is NO_LOCK. If the second argument is SHARED_LOCK then this routine
|
| -** might return SQLITE_IOERR;
|
| -*/
|
| -static int winUnlock(sqlite3_file *id, int locktype){
|
| - int type;
|
| - winFile *pFile = (winFile*)id;
|
| - int rc = SQLITE_OK;
|
| - assert( pFile!=0 );
|
| - assert( locktype<=SHARED_LOCK );
|
| - OSTRACE(("UNLOCK file=%p, oldLock=%d(%d), newLock=%d\n",
|
| - pFile->h, pFile->locktype, pFile->sharedLockByte, locktype));
|
| - type = pFile->locktype;
|
| - if( type>=EXCLUSIVE_LOCK ){
|
| - winUnlockFile(&pFile->h, SHARED_FIRST, 0, SHARED_SIZE, 0);
|
| - if( locktype==SHARED_LOCK && !winGetReadLock(pFile) ){
|
| - /* This should never happen. We should always be able to
|
| - ** reacquire the read lock */
|
| - rc = winLogError(SQLITE_IOERR_UNLOCK, osGetLastError(),
|
| - "winUnlock", pFile->zPath);
|
| - }
|
| - }
|
| - if( type>=RESERVED_LOCK ){
|
| - winUnlockFile(&pFile->h, RESERVED_BYTE, 0, 1, 0);
|
| - }
|
| - if( locktype==NO_LOCK && type>=SHARED_LOCK ){
|
| - winUnlockReadLock(pFile);
|
| - }
|
| - if( type>=PENDING_LOCK ){
|
| - winUnlockFile(&pFile->h, PENDING_BYTE, 0, 1, 0);
|
| - }
|
| - pFile->locktype = (u8)locktype;
|
| - OSTRACE(("UNLOCK file=%p, lock=%d, rc=%s\n",
|
| - pFile->h, pFile->locktype, sqlite3ErrName(rc)));
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** If *pArg is initially negative then this is a query. Set *pArg to
|
| -** 1 or 0 depending on whether or not bit mask of pFile->ctrlFlags is set.
|
| -**
|
| -** If *pArg is 0 or 1, then clear or set the mask bit of pFile->ctrlFlags.
|
| -*/
|
| -static void winModeBit(winFile *pFile, unsigned char mask, int *pArg){
|
| - if( *pArg<0 ){
|
| - *pArg = (pFile->ctrlFlags & mask)!=0;
|
| - }else if( (*pArg)==0 ){
|
| - pFile->ctrlFlags &= ~mask;
|
| - }else{
|
| - pFile->ctrlFlags |= mask;
|
| - }
|
| -}
|
| -
|
| -/* Forward references to VFS helper methods used for temporary files */
|
| -static int winGetTempname(sqlite3_vfs *, char **);
|
| -static int winIsDir(const void *);
|
| -static BOOL winIsDriveLetterAndColon(const char *);
|
| -
|
| -/*
|
| -** Control and query of the open file handle.
|
| -*/
|
| -static int winFileControl(sqlite3_file *id, int op, void *pArg){
|
| - winFile *pFile = (winFile*)id;
|
| - OSTRACE(("FCNTL file=%p, op=%d, pArg=%p\n", pFile->h, op, pArg));
|
| - switch( op ){
|
| - case SQLITE_FCNTL_LOCKSTATE: {
|
| - *(int*)pArg = pFile->locktype;
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| - case SQLITE_LAST_ERRNO: {
|
| - *(int*)pArg = (int)pFile->lastErrno;
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| - case SQLITE_FCNTL_CHUNK_SIZE: {
|
| - pFile->szChunk = *(int *)pArg;
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| - case SQLITE_FCNTL_SIZE_HINT: {
|
| - if( pFile->szChunk>0 ){
|
| - sqlite3_int64 oldSz;
|
| - int rc = winFileSize(id, &oldSz);
|
| - if( rc==SQLITE_OK ){
|
| - sqlite3_int64 newSz = *(sqlite3_int64*)pArg;
|
| - if( newSz>oldSz ){
|
| - SimulateIOErrorBenign(1);
|
| - rc = winTruncate(id, newSz);
|
| - SimulateIOErrorBenign(0);
|
| - }
|
| - }
|
| - OSTRACE(("FCNTL file=%p, rc=%s\n", pFile->h, sqlite3ErrName(rc)));
|
| - return rc;
|
| - }
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| - case SQLITE_FCNTL_PERSIST_WAL: {
|
| - winModeBit(pFile, WINFILE_PERSIST_WAL, (int*)pArg);
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| - case SQLITE_FCNTL_POWERSAFE_OVERWRITE: {
|
| - winModeBit(pFile, WINFILE_PSOW, (int*)pArg);
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| - case SQLITE_FCNTL_VFSNAME: {
|
| - *(char**)pArg = sqlite3_mprintf("%s", pFile->pVfs->zName);
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| - case SQLITE_FCNTL_WIN32_AV_RETRY: {
|
| - int *a = (int*)pArg;
|
| - if( a[0]>0 ){
|
| - winIoerrRetry = a[0];
|
| - }else{
|
| - a[0] = winIoerrRetry;
|
| - }
|
| - if( a[1]>0 ){
|
| - winIoerrRetryDelay = a[1];
|
| - }else{
|
| - a[1] = winIoerrRetryDelay;
|
| - }
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_OK\n", pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| -#ifdef SQLITE_TEST
|
| - case SQLITE_FCNTL_WIN32_SET_HANDLE: {
|
| - LPHANDLE phFile = (LPHANDLE)pArg;
|
| - HANDLE hOldFile = pFile->h;
|
| - pFile->h = *phFile;
|
| - *phFile = hOldFile;
|
| - OSTRACE(("FCNTL oldFile=%p, newFile=%p, rc=SQLITE_OK\n",
|
| - hOldFile, pFile->h));
|
| - return SQLITE_OK;
|
| - }
|
| -#endif
|
| - case SQLITE_FCNTL_TEMPFILENAME: {
|
| - char *zTFile = 0;
|
| - int rc = winGetTempname(pFile->pVfs, &zTFile);
|
| - if( rc==SQLITE_OK ){
|
| - *(char**)pArg = zTFile;
|
| - }
|
| - OSTRACE(("FCNTL file=%p, rc=%s\n", pFile->h, sqlite3ErrName(rc)));
|
| - return rc;
|
| - }
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - case SQLITE_FCNTL_MMAP_SIZE: {
|
| - i64 newLimit = *(i64*)pArg;
|
| - int rc = SQLITE_OK;
|
| - if( newLimit>sqlite3GlobalConfig.mxMmap ){
|
| - newLimit = sqlite3GlobalConfig.mxMmap;
|
| - }
|
| - *(i64*)pArg = pFile->mmapSizeMax;
|
| - if( newLimit>=0 && newLimit!=pFile->mmapSizeMax && pFile->nFetchOut==0 ){
|
| - pFile->mmapSizeMax = newLimit;
|
| - if( pFile->mmapSize>0 ){
|
| - winUnmapfile(pFile);
|
| - rc = winMapfile(pFile, -1);
|
| - }
|
| - }
|
| - OSTRACE(("FCNTL file=%p, rc=%s\n", pFile->h, sqlite3ErrName(rc)));
|
| - return rc;
|
| - }
|
| -#endif
|
| - }
|
| - OSTRACE(("FCNTL file=%p, rc=SQLITE_NOTFOUND\n", pFile->h));
|
| - return SQLITE_NOTFOUND;
|
| -}
|
| -
|
| -/*
|
| -** Return the sector size in bytes of the underlying block device for
|
| -** the specified file. This is almost always 512 bytes, but may be
|
| -** larger for some devices.
|
| -**
|
| -** SQLite code assumes this function cannot fail. It also assumes that
|
| -** if two files are created in the same file-system directory (i.e.
|
| -** a database and its journal file) that the sector size will be the
|
| -** same for both.
|
| -*/
|
| -static int winSectorSize(sqlite3_file *id){
|
| - (void)id;
|
| - return SQLITE_DEFAULT_SECTOR_SIZE;
|
| -}
|
| -
|
| -/*
|
| -** Return a vector of device characteristics.
|
| -*/
|
| -static int winDeviceCharacteristics(sqlite3_file *id){
|
| - winFile *p = (winFile*)id;
|
| - return SQLITE_IOCAP_UNDELETABLE_WHEN_OPEN |
|
| - ((p->ctrlFlags & WINFILE_PSOW)?SQLITE_IOCAP_POWERSAFE_OVERWRITE:0);
|
| -}
|
| -
|
| -/*
|
| -** Windows will only let you create file view mappings
|
| -** on allocation size granularity boundaries.
|
| -** During sqlite3_os_init() we do a GetSystemInfo()
|
| -** to get the granularity size.
|
| -*/
|
| -static SYSTEM_INFO winSysInfo;
|
| -
|
| -#ifndef SQLITE_OMIT_WAL
|
| -
|
| -/*
|
| -** Helper functions to obtain and relinquish the global mutex. The
|
| -** global mutex is used to protect the winLockInfo objects used by
|
| -** this file, all of which may be shared by multiple threads.
|
| -**
|
| -** Function winShmMutexHeld() is used to assert() that the global mutex
|
| -** is held when required. This function is only used as part of assert()
|
| -** statements. e.g.
|
| -**
|
| -** winShmEnterMutex()
|
| -** assert( winShmMutexHeld() );
|
| -** winShmLeaveMutex()
|
| -*/
|
| -static void winShmEnterMutex(void){
|
| - sqlite3_mutex_enter(sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MASTER));
|
| -}
|
| -static void winShmLeaveMutex(void){
|
| - sqlite3_mutex_leave(sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MASTER));
|
| -}
|
| -#ifndef NDEBUG
|
| -static int winShmMutexHeld(void) {
|
| - return sqlite3_mutex_held(sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MASTER));
|
| -}
|
| -#endif
|
| -
|
| -/*
|
| -** Object used to represent a single file opened and mmapped to provide
|
| -** shared memory. When multiple threads all reference the same
|
| -** log-summary, each thread has its own winFile object, but they all
|
| -** point to a single instance of this object. In other words, each
|
| -** log-summary is opened only once per process.
|
| -**
|
| -** winShmMutexHeld() must be true when creating or destroying
|
| -** this object or while reading or writing the following fields:
|
| -**
|
| -** nRef
|
| -** pNext
|
| -**
|
| -** The following fields are read-only after the object is created:
|
| -**
|
| -** fid
|
| -** zFilename
|
| -**
|
| -** Either winShmNode.mutex must be held or winShmNode.nRef==0 and
|
| -** winShmMutexHeld() is true when reading or writing any other field
|
| -** in this structure.
|
| -**
|
| -*/
|
| -struct winShmNode {
|
| - sqlite3_mutex *mutex; /* Mutex to access this object */
|
| - char *zFilename; /* Name of the file */
|
| - winFile hFile; /* File handle from winOpen */
|
| -
|
| - int szRegion; /* Size of shared-memory regions */
|
| - int nRegion; /* Size of array apRegion */
|
| - struct ShmRegion {
|
| - HANDLE hMap; /* File handle from CreateFileMapping */
|
| - void *pMap;
|
| - } *aRegion;
|
| - DWORD lastErrno; /* The Windows errno from the last I/O error */
|
| -
|
| - int nRef; /* Number of winShm objects pointing to this */
|
| - winShm *pFirst; /* All winShm objects pointing to this */
|
| - winShmNode *pNext; /* Next in list of all winShmNode objects */
|
| -#ifdef SQLITE_DEBUG
|
| - u8 nextShmId; /* Next available winShm.id value */
|
| -#endif
|
| -};
|
| -
|
| -/*
|
| -** A global array of all winShmNode objects.
|
| -**
|
| -** The winShmMutexHeld() must be true while reading or writing this list.
|
| -*/
|
| -static winShmNode *winShmNodeList = 0;
|
| -
|
| -/*
|
| -** Structure used internally by this VFS to record the state of an
|
| -** open shared memory connection.
|
| -**
|
| -** The following fields are initialized when this object is created and
|
| -** are read-only thereafter:
|
| -**
|
| -** winShm.pShmNode
|
| -** winShm.id
|
| -**
|
| -** All other fields are read/write. The winShm.pShmNode->mutex must be held
|
| -** while accessing any read/write fields.
|
| -*/
|
| -struct winShm {
|
| - winShmNode *pShmNode; /* The underlying winShmNode object */
|
| - winShm *pNext; /* Next winShm with the same winShmNode */
|
| - u8 hasMutex; /* True if holding the winShmNode mutex */
|
| - u16 sharedMask; /* Mask of shared locks held */
|
| - u16 exclMask; /* Mask of exclusive locks held */
|
| -#ifdef SQLITE_DEBUG
|
| - u8 id; /* Id of this connection with its winShmNode */
|
| -#endif
|
| -};
|
| -
|
| -/*
|
| -** Constants used for locking
|
| -*/
|
| -#define WIN_SHM_BASE ((22+SQLITE_SHM_NLOCK)*4) /* first lock byte */
|
| -#define WIN_SHM_DMS (WIN_SHM_BASE+SQLITE_SHM_NLOCK) /* deadman switch */
|
| -
|
| -/*
|
| -** Apply advisory locks for all n bytes beginning at ofst.
|
| -*/
|
| -#define _SHM_UNLCK 1
|
| -#define _SHM_RDLCK 2
|
| -#define _SHM_WRLCK 3
|
| -static int winShmSystemLock(
|
| - winShmNode *pFile, /* Apply locks to this open shared-memory segment */
|
| - int lockType, /* _SHM_UNLCK, _SHM_RDLCK, or _SHM_WRLCK */
|
| - int ofst, /* Offset to first byte to be locked/unlocked */
|
| - int nByte /* Number of bytes to lock or unlock */
|
| -){
|
| - int rc = 0; /* Result code form Lock/UnlockFileEx() */
|
| -
|
| - /* Access to the winShmNode object is serialized by the caller */
|
| - assert( sqlite3_mutex_held(pFile->mutex) || pFile->nRef==0 );
|
| -
|
| - OSTRACE(("SHM-LOCK file=%p, lock=%d, offset=%d, size=%d\n",
|
| - pFile->hFile.h, lockType, ofst, nByte));
|
| -
|
| - /* Release/Acquire the system-level lock */
|
| - if( lockType==_SHM_UNLCK ){
|
| - rc = winUnlockFile(&pFile->hFile.h, ofst, 0, nByte, 0);
|
| - }else{
|
| - /* Initialize the locking parameters */
|
| - DWORD dwFlags = LOCKFILE_FAIL_IMMEDIATELY;
|
| - if( lockType == _SHM_WRLCK ) dwFlags |= LOCKFILE_EXCLUSIVE_LOCK;
|
| - rc = winLockFile(&pFile->hFile.h, dwFlags, ofst, 0, nByte, 0);
|
| - }
|
| -
|
| - if( rc!= 0 ){
|
| - rc = SQLITE_OK;
|
| - }else{
|
| - pFile->lastErrno = osGetLastError();
|
| - rc = SQLITE_BUSY;
|
| - }
|
| -
|
| - OSTRACE(("SHM-LOCK file=%p, func=%s, errno=%lu, rc=%s\n",
|
| - pFile->hFile.h, (lockType == _SHM_UNLCK) ? "winUnlockFile" :
|
| - "winLockFile", pFile->lastErrno, sqlite3ErrName(rc)));
|
| -
|
| - return rc;
|
| -}
|
| -
|
| -/* Forward references to VFS methods */
|
| -static int winOpen(sqlite3_vfs*,const char*,sqlite3_file*,int,int*);
|
| -static int winDelete(sqlite3_vfs *,const char*,int);
|
| -
|
| -/*
|
| -** Purge the winShmNodeList list of all entries with winShmNode.nRef==0.
|
| -**
|
| -** This is not a VFS shared-memory method; it is a utility function called
|
| -** by VFS shared-memory methods.
|
| -*/
|
| -static void winShmPurge(sqlite3_vfs *pVfs, int deleteFlag){
|
| - winShmNode **pp;
|
| - winShmNode *p;
|
| - assert( winShmMutexHeld() );
|
| - OSTRACE(("SHM-PURGE pid=%lu, deleteFlag=%d\n",
|
| - osGetCurrentProcessId(), deleteFlag));
|
| - pp = &winShmNodeList;
|
| - while( (p = *pp)!=0 ){
|
| - if( p->nRef==0 ){
|
| - int i;
|
| - if( p->mutex ){ sqlite3_mutex_free(p->mutex); }
|
| - for(i=0; i<p->nRegion; i++){
|
| - BOOL bRc = osUnmapViewOfFile(p->aRegion[i].pMap);
|
| - OSTRACE(("SHM-PURGE-UNMAP pid=%lu, region=%d, rc=%s\n",
|
| - osGetCurrentProcessId(), i, bRc ? "ok" : "failed"));
|
| - UNUSED_VARIABLE_VALUE(bRc);
|
| - bRc = osCloseHandle(p->aRegion[i].hMap);
|
| - OSTRACE(("SHM-PURGE-CLOSE pid=%lu, region=%d, rc=%s\n",
|
| - osGetCurrentProcessId(), i, bRc ? "ok" : "failed"));
|
| - UNUSED_VARIABLE_VALUE(bRc);
|
| - }
|
| - if( p->hFile.h!=NULL && p->hFile.h!=INVALID_HANDLE_VALUE ){
|
| - SimulateIOErrorBenign(1);
|
| - winClose((sqlite3_file *)&p->hFile);
|
| - SimulateIOErrorBenign(0);
|
| - }
|
| - if( deleteFlag ){
|
| - SimulateIOErrorBenign(1);
|
| - sqlite3BeginBenignMalloc();
|
| - winDelete(pVfs, p->zFilename, 0);
|
| - sqlite3EndBenignMalloc();
|
| - SimulateIOErrorBenign(0);
|
| - }
|
| - *pp = p->pNext;
|
| - sqlite3_free(p->aRegion);
|
| - sqlite3_free(p);
|
| - }else{
|
| - pp = &p->pNext;
|
| - }
|
| - }
|
| -}
|
| -
|
| -/*
|
| -** Open the shared-memory area associated with database file pDbFd.
|
| -**
|
| -** When opening a new shared-memory file, if no other instances of that
|
| -** file are currently open, in this process or in other processes, then
|
| -** the file must be truncated to zero length or have its header cleared.
|
| -*/
|
| -static int winOpenSharedMemory(winFile *pDbFd){
|
| - struct winShm *p; /* The connection to be opened */
|
| - struct winShmNode *pShmNode = 0; /* The underlying mmapped file */
|
| - int rc; /* Result code */
|
| - struct winShmNode *pNew; /* Newly allocated winShmNode */
|
| - int nName; /* Size of zName in bytes */
|
| -
|
| - assert( pDbFd->pShm==0 ); /* Not previously opened */
|
| -
|
| - /* Allocate space for the new sqlite3_shm object. Also speculatively
|
| - ** allocate space for a new winShmNode and filename.
|
| - */
|
| - p = sqlite3MallocZero( sizeof(*p) );
|
| - if( p==0 ) return SQLITE_IOERR_NOMEM;
|
| - nName = sqlite3Strlen30(pDbFd->zPath);
|
| - pNew = sqlite3MallocZero( sizeof(*pShmNode) + nName + 17 );
|
| - if( pNew==0 ){
|
| - sqlite3_free(p);
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - pNew->zFilename = (char*)&pNew[1];
|
| - sqlite3_snprintf(nName+15, pNew->zFilename, "%s-shm", pDbFd->zPath);
|
| - sqlite3FileSuffix3(pDbFd->zPath, pNew->zFilename);
|
| -
|
| - /* Look to see if there is an existing winShmNode that can be used.
|
| - ** If no matching winShmNode currently exists, create a new one.
|
| - */
|
| - winShmEnterMutex();
|
| - for(pShmNode = winShmNodeList; pShmNode; pShmNode=pShmNode->pNext){
|
| - /* TBD need to come up with better match here. Perhaps
|
| - ** use FILE_ID_BOTH_DIR_INFO Structure.
|
| - */
|
| - if( sqlite3StrICmp(pShmNode->zFilename, pNew->zFilename)==0 ) break;
|
| - }
|
| - if( pShmNode ){
|
| - sqlite3_free(pNew);
|
| - }else{
|
| - pShmNode = pNew;
|
| - pNew = 0;
|
| - ((winFile*)(&pShmNode->hFile))->h = INVALID_HANDLE_VALUE;
|
| - pShmNode->pNext = winShmNodeList;
|
| - winShmNodeList = pShmNode;
|
| -
|
| - pShmNode->mutex = sqlite3_mutex_alloc(SQLITE_MUTEX_FAST);
|
| - if( pShmNode->mutex==0 ){
|
| - rc = SQLITE_IOERR_NOMEM;
|
| - goto shm_open_err;
|
| - }
|
| -
|
| - rc = winOpen(pDbFd->pVfs,
|
| - pShmNode->zFilename, /* Name of the file (UTF-8) */
|
| - (sqlite3_file*)&pShmNode->hFile, /* File handle here */
|
| - SQLITE_OPEN_WAL | SQLITE_OPEN_READWRITE | SQLITE_OPEN_CREATE,
|
| - 0);
|
| - if( SQLITE_OK!=rc ){
|
| - goto shm_open_err;
|
| - }
|
| -
|
| - /* Check to see if another process is holding the dead-man switch.
|
| - ** If not, truncate the file to zero length.
|
| - */
|
| - if( winShmSystemLock(pShmNode, _SHM_WRLCK, WIN_SHM_DMS, 1)==SQLITE_OK ){
|
| - rc = winTruncate((sqlite3_file *)&pShmNode->hFile, 0);
|
| - if( rc!=SQLITE_OK ){
|
| - rc = winLogError(SQLITE_IOERR_SHMOPEN, osGetLastError(),
|
| - "winOpenShm", pDbFd->zPath);
|
| - }
|
| - }
|
| - if( rc==SQLITE_OK ){
|
| - winShmSystemLock(pShmNode, _SHM_UNLCK, WIN_SHM_DMS, 1);
|
| - rc = winShmSystemLock(pShmNode, _SHM_RDLCK, WIN_SHM_DMS, 1);
|
| - }
|
| - if( rc ) goto shm_open_err;
|
| - }
|
| -
|
| - /* Make the new connection a child of the winShmNode */
|
| - p->pShmNode = pShmNode;
|
| -#ifdef SQLITE_DEBUG
|
| - p->id = pShmNode->nextShmId++;
|
| -#endif
|
| - pShmNode->nRef++;
|
| - pDbFd->pShm = p;
|
| - winShmLeaveMutex();
|
| -
|
| - /* The reference count on pShmNode has already been incremented under
|
| - ** the cover of the winShmEnterMutex() mutex and the pointer from the
|
| - ** new (struct winShm) object to the pShmNode has been set. All that is
|
| - ** left to do is to link the new object into the linked list starting
|
| - ** at pShmNode->pFirst. This must be done while holding the pShmNode->mutex
|
| - ** mutex.
|
| - */
|
| - sqlite3_mutex_enter(pShmNode->mutex);
|
| - p->pNext = pShmNode->pFirst;
|
| - pShmNode->pFirst = p;
|
| - sqlite3_mutex_leave(pShmNode->mutex);
|
| - return SQLITE_OK;
|
| -
|
| - /* Jump here on any error */
|
| -shm_open_err:
|
| - winShmSystemLock(pShmNode, _SHM_UNLCK, WIN_SHM_DMS, 1);
|
| - winShmPurge(pDbFd->pVfs, 0); /* This call frees pShmNode if required */
|
| - sqlite3_free(p);
|
| - sqlite3_free(pNew);
|
| - winShmLeaveMutex();
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** Close a connection to shared-memory. Delete the underlying
|
| -** storage if deleteFlag is true.
|
| -*/
|
| -static int winShmUnmap(
|
| - sqlite3_file *fd, /* Database holding shared memory */
|
| - int deleteFlag /* Delete after closing if true */
|
| -){
|
| - winFile *pDbFd; /* Database holding shared-memory */
|
| - winShm *p; /* The connection to be closed */
|
| - winShmNode *pShmNode; /* The underlying shared-memory file */
|
| - winShm **pp; /* For looping over sibling connections */
|
| -
|
| - pDbFd = (winFile*)fd;
|
| - p = pDbFd->pShm;
|
| - if( p==0 ) return SQLITE_OK;
|
| - pShmNode = p->pShmNode;
|
| -
|
| - /* Remove connection p from the set of connections associated
|
| - ** with pShmNode */
|
| - sqlite3_mutex_enter(pShmNode->mutex);
|
| - for(pp=&pShmNode->pFirst; (*pp)!=p; pp = &(*pp)->pNext){}
|
| - *pp = p->pNext;
|
| -
|
| - /* Free the connection p */
|
| - sqlite3_free(p);
|
| - pDbFd->pShm = 0;
|
| - sqlite3_mutex_leave(pShmNode->mutex);
|
| -
|
| - /* If pShmNode->nRef has reached 0, then close the underlying
|
| - ** shared-memory file, too */
|
| - winShmEnterMutex();
|
| - assert( pShmNode->nRef>0 );
|
| - pShmNode->nRef--;
|
| - if( pShmNode->nRef==0 ){
|
| - winShmPurge(pDbFd->pVfs, deleteFlag);
|
| - }
|
| - winShmLeaveMutex();
|
| -
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Change the lock state for a shared-memory segment.
|
| -*/
|
| -static int winShmLock(
|
| - sqlite3_file *fd, /* Database file holding the shared memory */
|
| - int ofst, /* First lock to acquire or release */
|
| - int n, /* Number of locks to acquire or release */
|
| - int flags /* What to do with the lock */
|
| -){
|
| - winFile *pDbFd = (winFile*)fd; /* Connection holding shared memory */
|
| - winShm *p = pDbFd->pShm; /* The shared memory being locked */
|
| - winShm *pX; /* For looping over all siblings */
|
| - winShmNode *pShmNode = p->pShmNode;
|
| - int rc = SQLITE_OK; /* Result code */
|
| - u16 mask; /* Mask of locks to take or release */
|
| -
|
| - assert( ofst>=0 && ofst+n<=SQLITE_SHM_NLOCK );
|
| - assert( n>=1 );
|
| - assert( flags==(SQLITE_SHM_LOCK | SQLITE_SHM_SHARED)
|
| - || flags==(SQLITE_SHM_LOCK | SQLITE_SHM_EXCLUSIVE)
|
| - || flags==(SQLITE_SHM_UNLOCK | SQLITE_SHM_SHARED)
|
| - || flags==(SQLITE_SHM_UNLOCK | SQLITE_SHM_EXCLUSIVE) );
|
| - assert( n==1 || (flags & SQLITE_SHM_EXCLUSIVE)!=0 );
|
| -
|
| - mask = (u16)((1U<<(ofst+n)) - (1U<<ofst));
|
| - assert( n>1 || mask==(1<<ofst) );
|
| - sqlite3_mutex_enter(pShmNode->mutex);
|
| - if( flags & SQLITE_SHM_UNLOCK ){
|
| - u16 allMask = 0; /* Mask of locks held by siblings */
|
| -
|
| - /* See if any siblings hold this same lock */
|
| - for(pX=pShmNode->pFirst; pX; pX=pX->pNext){
|
| - if( pX==p ) continue;
|
| - assert( (pX->exclMask & (p->exclMask|p->sharedMask))==0 );
|
| - allMask |= pX->sharedMask;
|
| - }
|
| -
|
| - /* Unlock the system-level locks */
|
| - if( (mask & allMask)==0 ){
|
| - rc = winShmSystemLock(pShmNode, _SHM_UNLCK, ofst+WIN_SHM_BASE, n);
|
| - }else{
|
| - rc = SQLITE_OK;
|
| - }
|
| -
|
| - /* Undo the local locks */
|
| - if( rc==SQLITE_OK ){
|
| - p->exclMask &= ~mask;
|
| - p->sharedMask &= ~mask;
|
| - }
|
| - }else if( flags & SQLITE_SHM_SHARED ){
|
| - u16 allShared = 0; /* Union of locks held by connections other than "p" */
|
| -
|
| - /* Find out which shared locks are already held by sibling connections.
|
| - ** If any sibling already holds an exclusive lock, go ahead and return
|
| - ** SQLITE_BUSY.
|
| - */
|
| - for(pX=pShmNode->pFirst; pX; pX=pX->pNext){
|
| - if( (pX->exclMask & mask)!=0 ){
|
| - rc = SQLITE_BUSY;
|
| - break;
|
| - }
|
| - allShared |= pX->sharedMask;
|
| - }
|
| -
|
| - /* Get shared locks at the system level, if necessary */
|
| - if( rc==SQLITE_OK ){
|
| - if( (allShared & mask)==0 ){
|
| - rc = winShmSystemLock(pShmNode, _SHM_RDLCK, ofst+WIN_SHM_BASE, n);
|
| - }else{
|
| - rc = SQLITE_OK;
|
| - }
|
| - }
|
| -
|
| - /* Get the local shared locks */
|
| - if( rc==SQLITE_OK ){
|
| - p->sharedMask |= mask;
|
| - }
|
| - }else{
|
| - /* Make sure no sibling connections hold locks that will block this
|
| - ** lock. If any do, return SQLITE_BUSY right away.
|
| - */
|
| - for(pX=pShmNode->pFirst; pX; pX=pX->pNext){
|
| - if( (pX->exclMask & mask)!=0 || (pX->sharedMask & mask)!=0 ){
|
| - rc = SQLITE_BUSY;
|
| - break;
|
| - }
|
| - }
|
| -
|
| - /* Get the exclusive locks at the system level. Then if successful
|
| - ** also mark the local connection as being locked.
|
| - */
|
| - if( rc==SQLITE_OK ){
|
| - rc = winShmSystemLock(pShmNode, _SHM_WRLCK, ofst+WIN_SHM_BASE, n);
|
| - if( rc==SQLITE_OK ){
|
| - assert( (p->sharedMask & mask)==0 );
|
| - p->exclMask |= mask;
|
| - }
|
| - }
|
| - }
|
| - sqlite3_mutex_leave(pShmNode->mutex);
|
| - OSTRACE(("SHM-LOCK pid=%lu, id=%d, sharedMask=%03x, exclMask=%03x, rc=%s\n",
|
| - osGetCurrentProcessId(), p->id, p->sharedMask, p->exclMask,
|
| - sqlite3ErrName(rc)));
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** Implement a memory barrier or memory fence on shared memory.
|
| -**
|
| -** All loads and stores begun before the barrier must complete before
|
| -** any load or store begun after the barrier.
|
| -*/
|
| -static void winShmBarrier(
|
| - sqlite3_file *fd /* Database holding the shared memory */
|
| -){
|
| - UNUSED_PARAMETER(fd);
|
| - /* MemoryBarrier(); // does not work -- do not know why not */
|
| - winShmEnterMutex();
|
| - winShmLeaveMutex();
|
| -}
|
| -
|
| -/*
|
| -** This function is called to obtain a pointer to region iRegion of the
|
| -** shared-memory associated with the database file fd. Shared-memory regions
|
| -** are numbered starting from zero. Each shared-memory region is szRegion
|
| -** bytes in size.
|
| -**
|
| -** If an error occurs, an error code is returned and *pp is set to NULL.
|
| -**
|
| -** Otherwise, if the isWrite parameter is 0 and the requested shared-memory
|
| -** region has not been allocated (by any client, including one running in a
|
| -** separate process), then *pp is set to NULL and SQLITE_OK returned. If
|
| -** isWrite is non-zero and the requested shared-memory region has not yet
|
| -** been allocated, it is allocated by this function.
|
| -**
|
| -** If the shared-memory region has already been allocated or is allocated by
|
| -** this call as described above, then it is mapped into this processes
|
| -** address space (if it is not already), *pp is set to point to the mapped
|
| -** memory and SQLITE_OK returned.
|
| -*/
|
| -static int winShmMap(
|
| - sqlite3_file *fd, /* Handle open on database file */
|
| - int iRegion, /* Region to retrieve */
|
| - int szRegion, /* Size of regions */
|
| - int isWrite, /* True to extend file if necessary */
|
| - void volatile **pp /* OUT: Mapped memory */
|
| -){
|
| - winFile *pDbFd = (winFile*)fd;
|
| - winShm *p = pDbFd->pShm;
|
| - winShmNode *pShmNode;
|
| - int rc = SQLITE_OK;
|
| -
|
| - if( !p ){
|
| - rc = winOpenSharedMemory(pDbFd);
|
| - if( rc!=SQLITE_OK ) return rc;
|
| - p = pDbFd->pShm;
|
| - }
|
| - pShmNode = p->pShmNode;
|
| -
|
| - sqlite3_mutex_enter(pShmNode->mutex);
|
| - assert( szRegion==pShmNode->szRegion || pShmNode->nRegion==0 );
|
| -
|
| - if( pShmNode->nRegion<=iRegion ){
|
| - struct ShmRegion *apNew; /* New aRegion[] array */
|
| - int nByte = (iRegion+1)*szRegion; /* Minimum required file size */
|
| - sqlite3_int64 sz; /* Current size of wal-index file */
|
| -
|
| - pShmNode->szRegion = szRegion;
|
| -
|
| - /* The requested region is not mapped into this processes address space.
|
| - ** Check to see if it has been allocated (i.e. if the wal-index file is
|
| - ** large enough to contain the requested region).
|
| - */
|
| - rc = winFileSize((sqlite3_file *)&pShmNode->hFile, &sz);
|
| - if( rc!=SQLITE_OK ){
|
| - rc = winLogError(SQLITE_IOERR_SHMSIZE, osGetLastError(),
|
| - "winShmMap1", pDbFd->zPath);
|
| - goto shmpage_out;
|
| - }
|
| -
|
| - if( sz<nByte ){
|
| - /* The requested memory region does not exist. If isWrite is set to
|
| - ** zero, exit early. *pp will be set to NULL and SQLITE_OK returned.
|
| - **
|
| - ** Alternatively, if isWrite is non-zero, use ftruncate() to allocate
|
| - ** the requested memory region.
|
| - */
|
| - if( !isWrite ) goto shmpage_out;
|
| - rc = winTruncate((sqlite3_file *)&pShmNode->hFile, nByte);
|
| - if( rc!=SQLITE_OK ){
|
| - rc = winLogError(SQLITE_IOERR_SHMSIZE, osGetLastError(),
|
| - "winShmMap2", pDbFd->zPath);
|
| - goto shmpage_out;
|
| - }
|
| - }
|
| -
|
| - /* Map the requested memory region into this processes address space. */
|
| - apNew = (struct ShmRegion *)sqlite3_realloc(
|
| - pShmNode->aRegion, (iRegion+1)*sizeof(apNew[0])
|
| - );
|
| - if( !apNew ){
|
| - rc = SQLITE_IOERR_NOMEM;
|
| - goto shmpage_out;
|
| - }
|
| - pShmNode->aRegion = apNew;
|
| -
|
| - while( pShmNode->nRegion<=iRegion ){
|
| - HANDLE hMap = NULL; /* file-mapping handle */
|
| - void *pMap = 0; /* Mapped memory region */
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - hMap = osCreateFileMappingFromApp(pShmNode->hFile.h,
|
| - NULL, PAGE_READWRITE, nByte, NULL
|
| - );
|
| -#elif defined(SQLITE_WIN32_HAS_WIDE)
|
| - hMap = osCreateFileMappingW(pShmNode->hFile.h,
|
| - NULL, PAGE_READWRITE, 0, nByte, NULL
|
| - );
|
| -#elif defined(SQLITE_WIN32_HAS_ANSI)
|
| - hMap = osCreateFileMappingA(pShmNode->hFile.h,
|
| - NULL, PAGE_READWRITE, 0, nByte, NULL
|
| - );
|
| -#endif
|
| - OSTRACE(("SHM-MAP-CREATE pid=%lu, region=%d, size=%d, rc=%s\n",
|
| - osGetCurrentProcessId(), pShmNode->nRegion, nByte,
|
| - hMap ? "ok" : "failed"));
|
| - if( hMap ){
|
| - int iOffset = pShmNode->nRegion*szRegion;
|
| - int iOffsetShift = iOffset % winSysInfo.dwAllocationGranularity;
|
| -#if SQLITE_OS_WINRT
|
| - pMap = osMapViewOfFileFromApp(hMap, FILE_MAP_WRITE | FILE_MAP_READ,
|
| - iOffset - iOffsetShift, szRegion + iOffsetShift
|
| - );
|
| -#else
|
| - pMap = osMapViewOfFile(hMap, FILE_MAP_WRITE | FILE_MAP_READ,
|
| - 0, iOffset - iOffsetShift, szRegion + iOffsetShift
|
| - );
|
| -#endif
|
| - OSTRACE(("SHM-MAP-MAP pid=%lu, region=%d, offset=%d, size=%d, rc=%s\n",
|
| - osGetCurrentProcessId(), pShmNode->nRegion, iOffset,
|
| - szRegion, pMap ? "ok" : "failed"));
|
| - }
|
| - if( !pMap ){
|
| - pShmNode->lastErrno = osGetLastError();
|
| - rc = winLogError(SQLITE_IOERR_SHMMAP, pShmNode->lastErrno,
|
| - "winShmMap3", pDbFd->zPath);
|
| - if( hMap ) osCloseHandle(hMap);
|
| - goto shmpage_out;
|
| - }
|
| -
|
| - pShmNode->aRegion[pShmNode->nRegion].pMap = pMap;
|
| - pShmNode->aRegion[pShmNode->nRegion].hMap = hMap;
|
| - pShmNode->nRegion++;
|
| - }
|
| - }
|
| -
|
| -shmpage_out:
|
| - if( pShmNode->nRegion>iRegion ){
|
| - int iOffset = iRegion*szRegion;
|
| - int iOffsetShift = iOffset % winSysInfo.dwAllocationGranularity;
|
| - char *p = (char *)pShmNode->aRegion[iRegion].pMap;
|
| - *pp = (void *)&p[iOffsetShift];
|
| - }else{
|
| - *pp = 0;
|
| - }
|
| - sqlite3_mutex_leave(pShmNode->mutex);
|
| - return rc;
|
| -}
|
| -
|
| -#else
|
| -# define winShmMap 0
|
| -# define winShmLock 0
|
| -# define winShmBarrier 0
|
| -# define winShmUnmap 0
|
| -#endif /* #ifndef SQLITE_OMIT_WAL */
|
| -
|
| -/*
|
| -** Cleans up the mapped region of the specified file, if any.
|
| -*/
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| -static int winUnmapfile(winFile *pFile){
|
| - assert( pFile!=0 );
|
| - OSTRACE(("UNMAP-FILE pid=%lu, pFile=%p, hMap=%p, pMapRegion=%p, "
|
| - "mmapSize=%lld, mmapSizeActual=%lld, mmapSizeMax=%lld\n",
|
| - osGetCurrentProcessId(), pFile, pFile->hMap, pFile->pMapRegion,
|
| - pFile->mmapSize, pFile->mmapSizeActual, pFile->mmapSizeMax));
|
| - if( pFile->pMapRegion ){
|
| - if( !osUnmapViewOfFile(pFile->pMapRegion) ){
|
| - pFile->lastErrno = osGetLastError();
|
| - OSTRACE(("UNMAP-FILE pid=%lu, pFile=%p, pMapRegion=%p, "
|
| - "rc=SQLITE_IOERR_MMAP\n", osGetCurrentProcessId(), pFile,
|
| - pFile->pMapRegion));
|
| - return winLogError(SQLITE_IOERR_MMAP, pFile->lastErrno,
|
| - "winUnmapfile1", pFile->zPath);
|
| - }
|
| - pFile->pMapRegion = 0;
|
| - pFile->mmapSize = 0;
|
| - pFile->mmapSizeActual = 0;
|
| - }
|
| - if( pFile->hMap!=NULL ){
|
| - if( !osCloseHandle(pFile->hMap) ){
|
| - pFile->lastErrno = osGetLastError();
|
| - OSTRACE(("UNMAP-FILE pid=%lu, pFile=%p, hMap=%p, rc=SQLITE_IOERR_MMAP\n",
|
| - osGetCurrentProcessId(), pFile, pFile->hMap));
|
| - return winLogError(SQLITE_IOERR_MMAP, pFile->lastErrno,
|
| - "winUnmapfile2", pFile->zPath);
|
| - }
|
| - pFile->hMap = NULL;
|
| - }
|
| - OSTRACE(("UNMAP-FILE pid=%lu, pFile=%p, rc=SQLITE_OK\n",
|
| - osGetCurrentProcessId(), pFile));
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Memory map or remap the file opened by file-descriptor pFd (if the file
|
| -** is already mapped, the existing mapping is replaced by the new). Or, if
|
| -** there already exists a mapping for this file, and there are still
|
| -** outstanding xFetch() references to it, this function is a no-op.
|
| -**
|
| -** If parameter nByte is non-negative, then it is the requested size of
|
| -** the mapping to create. Otherwise, if nByte is less than zero, then the
|
| -** requested size is the size of the file on disk. The actual size of the
|
| -** created mapping is either the requested size or the value configured
|
| -** using SQLITE_FCNTL_MMAP_SIZE, whichever is smaller.
|
| -**
|
| -** SQLITE_OK is returned if no error occurs (even if the mapping is not
|
| -** recreated as a result of outstanding references) or an SQLite error
|
| -** code otherwise.
|
| -*/
|
| -static int winMapfile(winFile *pFd, sqlite3_int64 nByte){
|
| - sqlite3_int64 nMap = nByte;
|
| - int rc;
|
| -
|
| - assert( nMap>=0 || pFd->nFetchOut==0 );
|
| - OSTRACE(("MAP-FILE pid=%lu, pFile=%p, size=%lld\n",
|
| - osGetCurrentProcessId(), pFd, nByte));
|
| -
|
| - if( pFd->nFetchOut>0 ) return SQLITE_OK;
|
| -
|
| - if( nMap<0 ){
|
| - rc = winFileSize((sqlite3_file*)pFd, &nMap);
|
| - if( rc ){
|
| - OSTRACE(("MAP-FILE pid=%lu, pFile=%p, rc=SQLITE_IOERR_FSTAT\n",
|
| - osGetCurrentProcessId(), pFd));
|
| - return SQLITE_IOERR_FSTAT;
|
| - }
|
| - }
|
| - if( nMap>pFd->mmapSizeMax ){
|
| - nMap = pFd->mmapSizeMax;
|
| - }
|
| - nMap &= ~(sqlite3_int64)(winSysInfo.dwPageSize - 1);
|
| -
|
| - if( nMap==0 && pFd->mmapSize>0 ){
|
| - winUnmapfile(pFd);
|
| - }
|
| - if( nMap!=pFd->mmapSize ){
|
| - void *pNew = 0;
|
| - DWORD protect = PAGE_READONLY;
|
| - DWORD flags = FILE_MAP_READ;
|
| -
|
| - winUnmapfile(pFd);
|
| - if( (pFd->ctrlFlags & WINFILE_RDONLY)==0 ){
|
| - protect = PAGE_READWRITE;
|
| - flags |= FILE_MAP_WRITE;
|
| - }
|
| -#if SQLITE_OS_WINRT
|
| - pFd->hMap = osCreateFileMappingFromApp(pFd->h, NULL, protect, nMap, NULL);
|
| -#elif defined(SQLITE_WIN32_HAS_WIDE)
|
| - pFd->hMap = osCreateFileMappingW(pFd->h, NULL, protect,
|
| - (DWORD)((nMap>>32) & 0xffffffff),
|
| - (DWORD)(nMap & 0xffffffff), NULL);
|
| -#elif defined(SQLITE_WIN32_HAS_ANSI)
|
| - pFd->hMap = osCreateFileMappingA(pFd->h, NULL, protect,
|
| - (DWORD)((nMap>>32) & 0xffffffff),
|
| - (DWORD)(nMap & 0xffffffff), NULL);
|
| -#endif
|
| - if( pFd->hMap==NULL ){
|
| - pFd->lastErrno = osGetLastError();
|
| - rc = winLogError(SQLITE_IOERR_MMAP, pFd->lastErrno,
|
| - "winMapfile1", pFd->zPath);
|
| - /* Log the error, but continue normal operation using xRead/xWrite */
|
| - OSTRACE(("MAP-FILE-CREATE pid=%lu, pFile=%p, rc=%s\n",
|
| - osGetCurrentProcessId(), pFd, sqlite3ErrName(rc)));
|
| - return SQLITE_OK;
|
| - }
|
| - assert( (nMap % winSysInfo.dwPageSize)==0 );
|
| - assert( sizeof(SIZE_T)==sizeof(sqlite3_int64) || nMap<=0xffffffff );
|
| -#if SQLITE_OS_WINRT
|
| - pNew = osMapViewOfFileFromApp(pFd->hMap, flags, 0, (SIZE_T)nMap);
|
| -#else
|
| - pNew = osMapViewOfFile(pFd->hMap, flags, 0, 0, (SIZE_T)nMap);
|
| -#endif
|
| - if( pNew==NULL ){
|
| - osCloseHandle(pFd->hMap);
|
| - pFd->hMap = NULL;
|
| - pFd->lastErrno = osGetLastError();
|
| - rc = winLogError(SQLITE_IOERR_MMAP, pFd->lastErrno,
|
| - "winMapfile2", pFd->zPath);
|
| - /* Log the error, but continue normal operation using xRead/xWrite */
|
| - OSTRACE(("MAP-FILE-MAP pid=%lu, pFile=%p, rc=%s\n",
|
| - osGetCurrentProcessId(), pFd, sqlite3ErrName(rc)));
|
| - return SQLITE_OK;
|
| - }
|
| - pFd->pMapRegion = pNew;
|
| - pFd->mmapSize = nMap;
|
| - pFd->mmapSizeActual = nMap;
|
| - }
|
| -
|
| - OSTRACE(("MAP-FILE pid=%lu, pFile=%p, rc=SQLITE_OK\n",
|
| - osGetCurrentProcessId(), pFd));
|
| - return SQLITE_OK;
|
| -}
|
| -#endif /* SQLITE_MAX_MMAP_SIZE>0 */
|
| -
|
| -/*
|
| -** If possible, return a pointer to a mapping of file fd starting at offset
|
| -** iOff. The mapping must be valid for at least nAmt bytes.
|
| -**
|
| -** If such a pointer can be obtained, store it in *pp and return SQLITE_OK.
|
| -** Or, if one cannot but no error occurs, set *pp to 0 and return SQLITE_OK.
|
| -** Finally, if an error does occur, return an SQLite error code. The final
|
| -** value of *pp is undefined in this case.
|
| -**
|
| -** If this function does return a pointer, the caller must eventually
|
| -** release the reference by calling winUnfetch().
|
| -*/
|
| -static int winFetch(sqlite3_file *fd, i64 iOff, int nAmt, void **pp){
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - winFile *pFd = (winFile*)fd; /* The underlying database file */
|
| -#endif
|
| - *pp = 0;
|
| -
|
| - OSTRACE(("FETCH pid=%lu, pFile=%p, offset=%lld, amount=%d, pp=%p\n",
|
| - osGetCurrentProcessId(), fd, iOff, nAmt, pp));
|
| -
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - if( pFd->mmapSizeMax>0 ){
|
| - if( pFd->pMapRegion==0 ){
|
| - int rc = winMapfile(pFd, -1);
|
| - if( rc!=SQLITE_OK ){
|
| - OSTRACE(("FETCH pid=%lu, pFile=%p, rc=%s\n",
|
| - osGetCurrentProcessId(), pFd, sqlite3ErrName(rc)));
|
| - return rc;
|
| - }
|
| - }
|
| - if( pFd->mmapSize >= iOff+nAmt ){
|
| - *pp = &((u8 *)pFd->pMapRegion)[iOff];
|
| - pFd->nFetchOut++;
|
| - }
|
| - }
|
| -#endif
|
| -
|
| - OSTRACE(("FETCH pid=%lu, pFile=%p, pp=%p, *pp=%p, rc=SQLITE_OK\n",
|
| - osGetCurrentProcessId(), fd, pp, *pp));
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** If the third argument is non-NULL, then this function releases a
|
| -** reference obtained by an earlier call to winFetch(). The second
|
| -** argument passed to this function must be the same as the corresponding
|
| -** argument that was passed to the winFetch() invocation.
|
| -**
|
| -** Or, if the third argument is NULL, then this function is being called
|
| -** to inform the VFS layer that, according to POSIX, any existing mapping
|
| -** may now be invalid and should be unmapped.
|
| -*/
|
| -static int winUnfetch(sqlite3_file *fd, i64 iOff, void *p){
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - winFile *pFd = (winFile*)fd; /* The underlying database file */
|
| -
|
| - /* If p==0 (unmap the entire file) then there must be no outstanding
|
| - ** xFetch references. Or, if p!=0 (meaning it is an xFetch reference),
|
| - ** then there must be at least one outstanding. */
|
| - assert( (p==0)==(pFd->nFetchOut==0) );
|
| -
|
| - /* If p!=0, it must match the iOff value. */
|
| - assert( p==0 || p==&((u8 *)pFd->pMapRegion)[iOff] );
|
| -
|
| - OSTRACE(("UNFETCH pid=%lu, pFile=%p, offset=%lld, p=%p\n",
|
| - osGetCurrentProcessId(), pFd, iOff, p));
|
| -
|
| - if( p ){
|
| - pFd->nFetchOut--;
|
| - }else{
|
| - /* FIXME: If Windows truly always prevents truncating or deleting a
|
| - ** file while a mapping is held, then the following winUnmapfile() call
|
| - ** is unnecessary can be omitted - potentially improving
|
| - ** performance. */
|
| - winUnmapfile(pFd);
|
| - }
|
| -
|
| - assert( pFd->nFetchOut>=0 );
|
| -#endif
|
| -
|
| - OSTRACE(("UNFETCH pid=%lu, pFile=%p, rc=SQLITE_OK\n",
|
| - osGetCurrentProcessId(), fd));
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Here ends the implementation of all sqlite3_file methods.
|
| -**
|
| -********************** End sqlite3_file Methods *******************************
|
| -******************************************************************************/
|
| -
|
| -/*
|
| -** This vector defines all the methods that can operate on an
|
| -** sqlite3_file for win32.
|
| -*/
|
| -static const sqlite3_io_methods winIoMethod = {
|
| - 3, /* iVersion */
|
| - winClose, /* xClose */
|
| - winRead, /* xRead */
|
| - winWrite, /* xWrite */
|
| - winTruncate, /* xTruncate */
|
| - winSync, /* xSync */
|
| - winFileSize, /* xFileSize */
|
| - winLock, /* xLock */
|
| - winUnlock, /* xUnlock */
|
| - winCheckReservedLock, /* xCheckReservedLock */
|
| - winFileControl, /* xFileControl */
|
| - winSectorSize, /* xSectorSize */
|
| - winDeviceCharacteristics, /* xDeviceCharacteristics */
|
| - winShmMap, /* xShmMap */
|
| - winShmLock, /* xShmLock */
|
| - winShmBarrier, /* xShmBarrier */
|
| - winShmUnmap, /* xShmUnmap */
|
| - winFetch, /* xFetch */
|
| - winUnfetch /* xUnfetch */
|
| -};
|
| -
|
| -/****************************************************************************
|
| -**************************** sqlite3_vfs methods ****************************
|
| -**
|
| -** This division contains the implementation of methods on the
|
| -** sqlite3_vfs object.
|
| -*/
|
| -
|
| -#if defined(__CYGWIN__)
|
| -/*
|
| -** Convert a filename from whatever the underlying operating system
|
| -** supports for filenames into UTF-8. Space to hold the result is
|
| -** obtained from malloc and must be freed by the calling function.
|
| -*/
|
| -static char *winConvertToUtf8Filename(const void *zFilename){
|
| - char *zConverted = 0;
|
| - if( osIsNT() ){
|
| - zConverted = winUnicodeToUtf8(zFilename);
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - zConverted = sqlite3_win32_mbcs_to_utf8(zFilename);
|
| - }
|
| -#endif
|
| - /* caller will handle out of memory */
|
| - return zConverted;
|
| -}
|
| -#endif
|
| -
|
| -/*
|
| -** Convert a UTF-8 filename into whatever form the underlying
|
| -** operating system wants filenames in. Space to hold the result
|
| -** is obtained from malloc and must be freed by the calling
|
| -** function.
|
| -*/
|
| -static void *winConvertFromUtf8Filename(const char *zFilename){
|
| - void *zConverted = 0;
|
| - if( osIsNT() ){
|
| - zConverted = winUtf8ToUnicode(zFilename);
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - zConverted = sqlite3_win32_utf8_to_mbcs(zFilename);
|
| - }
|
| -#endif
|
| - /* caller will handle out of memory */
|
| - return zConverted;
|
| -}
|
| -
|
| -/*
|
| -** This function returns non-zero if the specified UTF-8 string buffer
|
| -** ends with a directory separator character or one was successfully
|
| -** added to it.
|
| -*/
|
| -static int winMakeEndInDirSep(int nBuf, char *zBuf){
|
| - if( zBuf ){
|
| - int nLen = sqlite3Strlen30(zBuf);
|
| - if( nLen>0 ){
|
| - if( winIsDirSep(zBuf[nLen-1]) ){
|
| - return 1;
|
| - }else if( nLen+1<nBuf ){
|
| - zBuf[nLen] = winGetDirSep();
|
| - zBuf[nLen+1] = '\0';
|
| - return 1;
|
| - }
|
| - }
|
| - }
|
| - return 0;
|
| -}
|
| -
|
| -/*
|
| -** Create a temporary file name and store the resulting pointer into pzBuf.
|
| -** The pointer returned in pzBuf must be freed via sqlite3_free().
|
| -*/
|
| -static int winGetTempname(sqlite3_vfs *pVfs, char **pzBuf){
|
| - static char zChars[] =
|
| - "abcdefghijklmnopqrstuvwxyz"
|
| - "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
|
| - "0123456789";
|
| - size_t i, j;
|
| - int nPre = sqlite3Strlen30(SQLITE_TEMP_FILE_PREFIX);
|
| - int nMax, nBuf, nDir, nLen;
|
| - char *zBuf;
|
| -
|
| - /* It's odd to simulate an io-error here, but really this is just
|
| - ** using the io-error infrastructure to test that SQLite handles this
|
| - ** function failing.
|
| - */
|
| - SimulateIOError( return SQLITE_IOERR );
|
| -
|
| - /* Allocate a temporary buffer to store the fully qualified file
|
| - ** name for the temporary file. If this fails, we cannot continue.
|
| - */
|
| - nMax = pVfs->mxPathname; nBuf = nMax + 2;
|
| - zBuf = sqlite3MallocZero( nBuf );
|
| - if( !zBuf ){
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_NOMEM\n"));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| -
|
| - /* Figure out the effective temporary directory. First, check if one
|
| - ** has been explicitly set by the application; otherwise, use the one
|
| - ** configured by the operating system.
|
| - */
|
| - nDir = nMax - (nPre + 15);
|
| - assert( nDir>0 );
|
| - if( sqlite3_temp_directory ){
|
| - int nDirLen = sqlite3Strlen30(sqlite3_temp_directory);
|
| - if( nDirLen>0 ){
|
| - if( !winIsDirSep(sqlite3_temp_directory[nDirLen-1]) ){
|
| - nDirLen++;
|
| - }
|
| - if( nDirLen>nDir ){
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_ERROR\n"));
|
| - return winLogError(SQLITE_ERROR, 0, "winGetTempname1", 0);
|
| - }
|
| - sqlite3_snprintf(nMax, zBuf, "%s", sqlite3_temp_directory);
|
| - }
|
| - }
|
| -#if defined(__CYGWIN__)
|
| - else{
|
| - static const char *azDirs[] = {
|
| - 0, /* getenv("SQLITE_TMPDIR") */
|
| - 0, /* getenv("TMPDIR") */
|
| - 0, /* getenv("TMP") */
|
| - 0, /* getenv("TEMP") */
|
| - 0, /* getenv("USERPROFILE") */
|
| - "/var/tmp",
|
| - "/usr/tmp",
|
| - "/tmp",
|
| - ".",
|
| - 0 /* List terminator */
|
| - };
|
| - unsigned int i;
|
| - const char *zDir = 0;
|
| -
|
| - if( !azDirs[0] ) azDirs[0] = getenv("SQLITE_TMPDIR");
|
| - if( !azDirs[1] ) azDirs[1] = getenv("TMPDIR");
|
| - if( !azDirs[2] ) azDirs[2] = getenv("TMP");
|
| - if( !azDirs[3] ) azDirs[3] = getenv("TEMP");
|
| - if( !azDirs[4] ) azDirs[4] = getenv("USERPROFILE");
|
| - for(i=0; i<sizeof(azDirs)/sizeof(azDirs[0]); zDir=azDirs[i++]){
|
| - void *zConverted;
|
| - if( zDir==0 ) continue;
|
| - /* If the path starts with a drive letter followed by the colon
|
| - ** character, assume it is already a native Win32 path; otherwise,
|
| - ** it must be converted to a native Win32 path via the Cygwin API
|
| - ** prior to using it.
|
| - */
|
| - if( winIsDriveLetterAndColon(zDir) ){
|
| - zConverted = winConvertFromUtf8Filename(zDir);
|
| - if( !zConverted ){
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_NOMEM\n"));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( winIsDir(zConverted) ){
|
| - sqlite3_snprintf(nMax, zBuf, "%s", zDir);
|
| - sqlite3_free(zConverted);
|
| - break;
|
| - }
|
| - sqlite3_free(zConverted);
|
| - }else{
|
| - zConverted = sqlite3MallocZero( nMax+1 );
|
| - if( !zConverted ){
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_NOMEM\n"));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( cygwin_conv_path(
|
| - osIsNT() ? CCP_POSIX_TO_WIN_W : CCP_POSIX_TO_WIN_A, zDir,
|
| - zConverted, nMax+1)<0 ){
|
| - sqlite3_free(zConverted);
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_CONVPATH\n"));
|
| - return winLogError(SQLITE_IOERR_CONVPATH, (DWORD)errno,
|
| - "winGetTempname2", zDir);
|
| - }
|
| - if( winIsDir(zConverted) ){
|
| - /* At this point, we know the candidate directory exists and should
|
| - ** be used. However, we may need to convert the string containing
|
| - ** its name into UTF-8 (i.e. if it is UTF-16 right now).
|
| - */
|
| - char *zUtf8 = winConvertToUtf8Filename(zConverted);
|
| - if( !zUtf8 ){
|
| - sqlite3_free(zConverted);
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_NOMEM\n"));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - sqlite3_snprintf(nMax, zBuf, "%s", zUtf8);
|
| - sqlite3_free(zUtf8);
|
| - sqlite3_free(zConverted);
|
| - break;
|
| - }
|
| - sqlite3_free(zConverted);
|
| - }
|
| - }
|
| - }
|
| -#elif !SQLITE_OS_WINRT && !defined(__CYGWIN__)
|
| - else if( osIsNT() ){
|
| - char *zMulti;
|
| - LPWSTR zWidePath = sqlite3MallocZero( nMax*sizeof(WCHAR) );
|
| - if( !zWidePath ){
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_NOMEM\n"));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( osGetTempPathW(nMax, zWidePath)==0 ){
|
| - sqlite3_free(zWidePath);
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_GETTEMPPATH\n"));
|
| - return winLogError(SQLITE_IOERR_GETTEMPPATH, osGetLastError(),
|
| - "winGetTempname2", 0);
|
| - }
|
| - zMulti = winUnicodeToUtf8(zWidePath);
|
| - if( zMulti ){
|
| - sqlite3_snprintf(nMax, zBuf, "%s", zMulti);
|
| - sqlite3_free(zMulti);
|
| - sqlite3_free(zWidePath);
|
| - }else{
|
| - sqlite3_free(zWidePath);
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_NOMEM\n"));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - char *zUtf8;
|
| - char *zMbcsPath = sqlite3MallocZero( nMax );
|
| - if( !zMbcsPath ){
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_NOMEM\n"));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( osGetTempPathA(nMax, zMbcsPath)==0 ){
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_GETTEMPPATH\n"));
|
| - return winLogError(SQLITE_IOERR_GETTEMPPATH, osGetLastError(),
|
| - "winGetTempname3", 0);
|
| - }
|
| - zUtf8 = sqlite3_win32_mbcs_to_utf8(zMbcsPath);
|
| - if( zUtf8 ){
|
| - sqlite3_snprintf(nMax, zBuf, "%s", zUtf8);
|
| - sqlite3_free(zUtf8);
|
| - }else{
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_IOERR_NOMEM\n"));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - }
|
| -#endif /* SQLITE_WIN32_HAS_ANSI */
|
| -#endif /* !SQLITE_OS_WINRT */
|
| -
|
| - /*
|
| - ** Check to make sure the temporary directory ends with an appropriate
|
| - ** separator. If it does not and there is not enough space left to add
|
| - ** one, fail.
|
| - */
|
| - if( !winMakeEndInDirSep(nDir+1, zBuf) ){
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_ERROR\n"));
|
| - return winLogError(SQLITE_ERROR, 0, "winGetTempname4", 0);
|
| - }
|
| -
|
| - /*
|
| - ** Check that the output buffer is large enough for the temporary file
|
| - ** name in the following format:
|
| - **
|
| - ** "<temporary_directory>/etilqs_XXXXXXXXXXXXXXX\0\0"
|
| - **
|
| - ** If not, return SQLITE_ERROR. The number 17 is used here in order to
|
| - ** account for the space used by the 15 character random suffix and the
|
| - ** two trailing NUL characters. The final directory separator character
|
| - ** has already added if it was not already present.
|
| - */
|
| - nLen = sqlite3Strlen30(zBuf);
|
| - if( (nLen + nPre + 17) > nBuf ){
|
| - sqlite3_free(zBuf);
|
| - OSTRACE(("TEMP-FILENAME rc=SQLITE_ERROR\n"));
|
| - return winLogError(SQLITE_ERROR, 0, "winGetTempname5", 0);
|
| - }
|
| -
|
| - sqlite3_snprintf(nBuf-16-nLen, zBuf+nLen, SQLITE_TEMP_FILE_PREFIX);
|
| -
|
| - j = sqlite3Strlen30(zBuf);
|
| - sqlite3_randomness(15, &zBuf[j]);
|
| - for(i=0; i<15; i++, j++){
|
| - zBuf[j] = (char)zChars[ ((unsigned char)zBuf[j])%(sizeof(zChars)-1) ];
|
| - }
|
| - zBuf[j] = 0;
|
| - zBuf[j+1] = 0;
|
| - *pzBuf = zBuf;
|
| -
|
| - OSTRACE(("TEMP-FILENAME name=%s, rc=SQLITE_OK\n", zBuf));
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Return TRUE if the named file is really a directory. Return false if
|
| -** it is something other than a directory, or if there is any kind of memory
|
| -** allocation failure.
|
| -*/
|
| -static int winIsDir(const void *zConverted){
|
| - DWORD attr;
|
| - int rc = 0;
|
| - DWORD lastErrno;
|
| -
|
| - if( osIsNT() ){
|
| - int cnt = 0;
|
| - WIN32_FILE_ATTRIBUTE_DATA sAttrData;
|
| - memset(&sAttrData, 0, sizeof(sAttrData));
|
| - while( !(rc = osGetFileAttributesExW((LPCWSTR)zConverted,
|
| - GetFileExInfoStandard,
|
| - &sAttrData)) && winRetryIoerr(&cnt, &lastErrno) ){}
|
| - if( !rc ){
|
| - return 0; /* Invalid name? */
|
| - }
|
| - attr = sAttrData.dwFileAttributes;
|
| -#if SQLITE_OS_WINCE==0
|
| - }else{
|
| - attr = osGetFileAttributesA((char*)zConverted);
|
| -#endif
|
| - }
|
| - return (attr!=INVALID_FILE_ATTRIBUTES) && (attr&FILE_ATTRIBUTE_DIRECTORY);
|
| -}
|
| -
|
| -/*
|
| -** Open a file.
|
| -*/
|
| -static int winOpen(
|
| - sqlite3_vfs *pVfs, /* Used to get maximum path name length */
|
| - const char *zName, /* Name of the file (UTF-8) */
|
| - sqlite3_file *id, /* Write the SQLite file handle here */
|
| - int flags, /* Open mode flags */
|
| - int *pOutFlags /* Status return flags */
|
| -){
|
| - HANDLE h;
|
| - DWORD lastErrno = 0;
|
| - DWORD dwDesiredAccess;
|
| - DWORD dwShareMode;
|
| - DWORD dwCreationDisposition;
|
| - DWORD dwFlagsAndAttributes = 0;
|
| -#if SQLITE_OS_WINCE
|
| - int isTemp = 0;
|
| -#endif
|
| - winFile *pFile = (winFile*)id;
|
| - void *zConverted; /* Filename in OS encoding */
|
| - const char *zUtf8Name = zName; /* Filename in UTF-8 encoding */
|
| - int cnt = 0;
|
| -
|
| - /* If argument zPath is a NULL pointer, this function is required to open
|
| - ** a temporary file. Use this buffer to store the file name in.
|
| - */
|
| - char *zTmpname = 0; /* For temporary filename, if necessary. */
|
| -
|
| - int rc = SQLITE_OK; /* Function Return Code */
|
| -#if !defined(NDEBUG) || SQLITE_OS_WINCE
|
| - int eType = flags&0xFFFFFF00; /* Type of file to open */
|
| -#endif
|
| -
|
| - int isExclusive = (flags & SQLITE_OPEN_EXCLUSIVE);
|
| - int isDelete = (flags & SQLITE_OPEN_DELETEONCLOSE);
|
| - int isCreate = (flags & SQLITE_OPEN_CREATE);
|
| - int isReadonly = (flags & SQLITE_OPEN_READONLY);
|
| - int isReadWrite = (flags & SQLITE_OPEN_READWRITE);
|
| -
|
| -#ifndef NDEBUG
|
| - int isOpenJournal = (isCreate && (
|
| - eType==SQLITE_OPEN_MASTER_JOURNAL
|
| - || eType==SQLITE_OPEN_MAIN_JOURNAL
|
| - || eType==SQLITE_OPEN_WAL
|
| - ));
|
| -#endif
|
| -
|
| - OSTRACE(("OPEN name=%s, pFile=%p, flags=%x, pOutFlags=%p\n",
|
| - zUtf8Name, id, flags, pOutFlags));
|
| -
|
| - /* Check the following statements are true:
|
| - **
|
| - ** (a) Exactly one of the READWRITE and READONLY flags must be set, and
|
| - ** (b) if CREATE is set, then READWRITE must also be set, and
|
| - ** (c) if EXCLUSIVE is set, then CREATE must also be set.
|
| - ** (d) if DELETEONCLOSE is set, then CREATE must also be set.
|
| - */
|
| - assert((isReadonly==0 || isReadWrite==0) && (isReadWrite || isReadonly));
|
| - assert(isCreate==0 || isReadWrite);
|
| - assert(isExclusive==0 || isCreate);
|
| - assert(isDelete==0 || isCreate);
|
| -
|
| - /* The main DB, main journal, WAL file and master journal are never
|
| - ** automatically deleted. Nor are they ever temporary files. */
|
| - assert( (!isDelete && zName) || eType!=SQLITE_OPEN_MAIN_DB );
|
| - assert( (!isDelete && zName) || eType!=SQLITE_OPEN_MAIN_JOURNAL );
|
| - assert( (!isDelete && zName) || eType!=SQLITE_OPEN_MASTER_JOURNAL );
|
| - assert( (!isDelete && zName) || eType!=SQLITE_OPEN_WAL );
|
| -
|
| - /* Assert that the upper layer has set one of the "file-type" flags. */
|
| - assert( eType==SQLITE_OPEN_MAIN_DB || eType==SQLITE_OPEN_TEMP_DB
|
| - || eType==SQLITE_OPEN_MAIN_JOURNAL || eType==SQLITE_OPEN_TEMP_JOURNAL
|
| - || eType==SQLITE_OPEN_SUBJOURNAL || eType==SQLITE_OPEN_MASTER_JOURNAL
|
| - || eType==SQLITE_OPEN_TRANSIENT_DB || eType==SQLITE_OPEN_WAL
|
| - );
|
| -
|
| - assert( pFile!=0 );
|
| - memset(pFile, 0, sizeof(winFile));
|
| - pFile->h = INVALID_HANDLE_VALUE;
|
| -
|
| -#if SQLITE_OS_WINRT
|
| - if( !zUtf8Name && !sqlite3_temp_directory ){
|
| - sqlite3_log(SQLITE_ERROR,
|
| - "sqlite3_temp_directory variable should be set for WinRT");
|
| - }
|
| -#endif
|
| -
|
| - /* If the second argument to this function is NULL, generate a
|
| - ** temporary file name to use
|
| - */
|
| - if( !zUtf8Name ){
|
| - assert( isDelete && !isOpenJournal );
|
| - rc = winGetTempname(pVfs, &zTmpname);
|
| - if( rc!=SQLITE_OK ){
|
| - OSTRACE(("OPEN name=%s, rc=%s", zUtf8Name, sqlite3ErrName(rc)));
|
| - return rc;
|
| - }
|
| - zUtf8Name = zTmpname;
|
| - }
|
| -
|
| - /* Database filenames are double-zero terminated if they are not
|
| - ** URIs with parameters. Hence, they can always be passed into
|
| - ** sqlite3_uri_parameter().
|
| - */
|
| - assert( (eType!=SQLITE_OPEN_MAIN_DB) || (flags & SQLITE_OPEN_URI) ||
|
| - zUtf8Name[sqlite3Strlen30(zUtf8Name)+1]==0 );
|
| -
|
| - /* Convert the filename to the system encoding. */
|
| - zConverted = winConvertFromUtf8Filename(zUtf8Name);
|
| - if( zConverted==0 ){
|
| - sqlite3_free(zTmpname);
|
| - OSTRACE(("OPEN name=%s, rc=SQLITE_IOERR_NOMEM", zUtf8Name));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| -
|
| - if( winIsDir(zConverted) ){
|
| - sqlite3_free(zConverted);
|
| - sqlite3_free(zTmpname);
|
| - OSTRACE(("OPEN name=%s, rc=SQLITE_CANTOPEN_ISDIR", zUtf8Name));
|
| - return SQLITE_CANTOPEN_ISDIR;
|
| - }
|
| -
|
| - if( isReadWrite ){
|
| - dwDesiredAccess = GENERIC_READ | GENERIC_WRITE;
|
| - }else{
|
| - dwDesiredAccess = GENERIC_READ;
|
| - }
|
| -
|
| - /* SQLITE_OPEN_EXCLUSIVE is used to make sure that a new file is
|
| - ** created. SQLite doesn't use it to indicate "exclusive access"
|
| - ** as it is usually understood.
|
| - */
|
| - if( isExclusive ){
|
| - /* Creates a new file, only if it does not already exist. */
|
| - /* If the file exists, it fails. */
|
| - dwCreationDisposition = CREATE_NEW;
|
| - }else if( isCreate ){
|
| - /* Open existing file, or create if it doesn't exist */
|
| - dwCreationDisposition = OPEN_ALWAYS;
|
| - }else{
|
| - /* Opens a file, only if it exists. */
|
| - dwCreationDisposition = OPEN_EXISTING;
|
| - }
|
| -
|
| - dwShareMode = FILE_SHARE_READ | FILE_SHARE_WRITE;
|
| -
|
| - if( isDelete ){
|
| -#if SQLITE_OS_WINCE
|
| - dwFlagsAndAttributes = FILE_ATTRIBUTE_HIDDEN;
|
| - isTemp = 1;
|
| -#else
|
| - dwFlagsAndAttributes = FILE_ATTRIBUTE_TEMPORARY
|
| - | FILE_ATTRIBUTE_HIDDEN
|
| - | FILE_FLAG_DELETE_ON_CLOSE;
|
| -#endif
|
| - }else{
|
| - dwFlagsAndAttributes = FILE_ATTRIBUTE_NORMAL;
|
| - }
|
| - /* Reports from the internet are that performance is always
|
| - ** better if FILE_FLAG_RANDOM_ACCESS is used. Ticket #2699. */
|
| -#if SQLITE_OS_WINCE
|
| - dwFlagsAndAttributes |= FILE_FLAG_RANDOM_ACCESS;
|
| -#endif
|
| -
|
| - if( osIsNT() ){
|
| -#if SQLITE_OS_WINRT
|
| - CREATEFILE2_EXTENDED_PARAMETERS extendedParameters;
|
| - extendedParameters.dwSize = sizeof(CREATEFILE2_EXTENDED_PARAMETERS);
|
| - extendedParameters.dwFileAttributes =
|
| - dwFlagsAndAttributes & FILE_ATTRIBUTE_MASK;
|
| - extendedParameters.dwFileFlags = dwFlagsAndAttributes & FILE_FLAG_MASK;
|
| - extendedParameters.dwSecurityQosFlags = SECURITY_ANONYMOUS;
|
| - extendedParameters.lpSecurityAttributes = NULL;
|
| - extendedParameters.hTemplateFile = NULL;
|
| - while( (h = osCreateFile2((LPCWSTR)zConverted,
|
| - dwDesiredAccess,
|
| - dwShareMode,
|
| - dwCreationDisposition,
|
| - &extendedParameters))==INVALID_HANDLE_VALUE &&
|
| - winRetryIoerr(&cnt, &lastErrno) ){
|
| - /* Noop */
|
| - }
|
| -#else
|
| - while( (h = osCreateFileW((LPCWSTR)zConverted,
|
| - dwDesiredAccess,
|
| - dwShareMode, NULL,
|
| - dwCreationDisposition,
|
| - dwFlagsAndAttributes,
|
| - NULL))==INVALID_HANDLE_VALUE &&
|
| - winRetryIoerr(&cnt, &lastErrno) ){
|
| - /* Noop */
|
| - }
|
| -#endif
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - while( (h = osCreateFileA((LPCSTR)zConverted,
|
| - dwDesiredAccess,
|
| - dwShareMode, NULL,
|
| - dwCreationDisposition,
|
| - dwFlagsAndAttributes,
|
| - NULL))==INVALID_HANDLE_VALUE &&
|
| - winRetryIoerr(&cnt, &lastErrno) ){
|
| - /* Noop */
|
| - }
|
| - }
|
| -#endif
|
| - winLogIoerr(cnt);
|
| -
|
| - OSTRACE(("OPEN file=%p, name=%s, access=%lx, rc=%s\n", h, zUtf8Name,
|
| - dwDesiredAccess, (h==INVALID_HANDLE_VALUE) ? "failed" : "ok"));
|
| -
|
| - if( h==INVALID_HANDLE_VALUE ){
|
| - pFile->lastErrno = lastErrno;
|
| - winLogError(SQLITE_CANTOPEN, pFile->lastErrno, "winOpen", zUtf8Name);
|
| - sqlite3_free(zConverted);
|
| - sqlite3_free(zTmpname);
|
| - if( isReadWrite && !isExclusive ){
|
| - return winOpen(pVfs, zName, id,
|
| - ((flags|SQLITE_OPEN_READONLY) &
|
| - ~(SQLITE_OPEN_CREATE|SQLITE_OPEN_READWRITE)),
|
| - pOutFlags);
|
| - }else{
|
| - return SQLITE_CANTOPEN_BKPT;
|
| - }
|
| - }
|
| -
|
| - if( pOutFlags ){
|
| - if( isReadWrite ){
|
| - *pOutFlags = SQLITE_OPEN_READWRITE;
|
| - }else{
|
| - *pOutFlags = SQLITE_OPEN_READONLY;
|
| - }
|
| - }
|
| -
|
| - OSTRACE(("OPEN file=%p, name=%s, access=%lx, pOutFlags=%p, *pOutFlags=%d, "
|
| - "rc=%s\n", h, zUtf8Name, dwDesiredAccess, pOutFlags, pOutFlags ?
|
| - *pOutFlags : 0, (h==INVALID_HANDLE_VALUE) ? "failed" : "ok"));
|
| -
|
| -#if SQLITE_OS_WINCE
|
| - if( isReadWrite && eType==SQLITE_OPEN_MAIN_DB
|
| - && (rc = winceCreateLock(zName, pFile))!=SQLITE_OK
|
| - ){
|
| - osCloseHandle(h);
|
| - sqlite3_free(zConverted);
|
| - sqlite3_free(zTmpname);
|
| - OSTRACE(("OPEN-CE-LOCK name=%s, rc=%s\n", zName, sqlite3ErrName(rc)));
|
| - return rc;
|
| - }
|
| - if( isTemp ){
|
| - pFile->zDeleteOnClose = zConverted;
|
| - }else
|
| -#endif
|
| - {
|
| - sqlite3_free(zConverted);
|
| - }
|
| -
|
| - sqlite3_free(zTmpname);
|
| - pFile->pMethod = &winIoMethod;
|
| - pFile->pVfs = pVfs;
|
| - pFile->h = h;
|
| - if( isReadonly ){
|
| - pFile->ctrlFlags |= WINFILE_RDONLY;
|
| - }
|
| - if( sqlite3_uri_boolean(zName, "psow", SQLITE_POWERSAFE_OVERWRITE) ){
|
| - pFile->ctrlFlags |= WINFILE_PSOW;
|
| - }
|
| - pFile->lastErrno = NO_ERROR;
|
| - pFile->zPath = zName;
|
| -#if SQLITE_MAX_MMAP_SIZE>0
|
| - pFile->hMap = NULL;
|
| - pFile->pMapRegion = 0;
|
| - pFile->mmapSize = 0;
|
| - pFile->mmapSizeActual = 0;
|
| - pFile->mmapSizeMax = sqlite3GlobalConfig.szMmap;
|
| -#endif
|
| -
|
| - OpenCounter(+1);
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** Delete the named file.
|
| -**
|
| -** Note that Windows does not allow a file to be deleted if some other
|
| -** process has it open. Sometimes a virus scanner or indexing program
|
| -** will open a journal file shortly after it is created in order to do
|
| -** whatever it does. While this other process is holding the
|
| -** file open, we will be unable to delete it. To work around this
|
| -** problem, we delay 100 milliseconds and try to delete again. Up
|
| -** to MX_DELETION_ATTEMPTs deletion attempts are run before giving
|
| -** up and returning an error.
|
| -*/
|
| -static int winDelete(
|
| - sqlite3_vfs *pVfs, /* Not used on win32 */
|
| - const char *zFilename, /* Name of file to delete */
|
| - int syncDir /* Not used on win32 */
|
| -){
|
| - int cnt = 0;
|
| - int rc;
|
| - DWORD attr;
|
| - DWORD lastErrno = 0;
|
| - void *zConverted;
|
| - UNUSED_PARAMETER(pVfs);
|
| - UNUSED_PARAMETER(syncDir);
|
| -
|
| - SimulateIOError(return SQLITE_IOERR_DELETE);
|
| - OSTRACE(("DELETE name=%s, syncDir=%d\n", zFilename, syncDir));
|
| -
|
| - zConverted = winConvertFromUtf8Filename(zFilename);
|
| - if( zConverted==0 ){
|
| - OSTRACE(("DELETE name=%s, rc=SQLITE_IOERR_NOMEM\n", zFilename));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( osIsNT() ){
|
| - do {
|
| -#if SQLITE_OS_WINRT
|
| - WIN32_FILE_ATTRIBUTE_DATA sAttrData;
|
| - memset(&sAttrData, 0, sizeof(sAttrData));
|
| - if ( osGetFileAttributesExW(zConverted, GetFileExInfoStandard,
|
| - &sAttrData) ){
|
| - attr = sAttrData.dwFileAttributes;
|
| - }else{
|
| - lastErrno = osGetLastError();
|
| - if( lastErrno==ERROR_FILE_NOT_FOUND
|
| - || lastErrno==ERROR_PATH_NOT_FOUND ){
|
| - rc = SQLITE_IOERR_DELETE_NOENT; /* Already gone? */
|
| - }else{
|
| - rc = SQLITE_ERROR;
|
| - }
|
| - break;
|
| - }
|
| -#else
|
| - attr = osGetFileAttributesW(zConverted);
|
| -#endif
|
| - if ( attr==INVALID_FILE_ATTRIBUTES ){
|
| - lastErrno = osGetLastError();
|
| - if( lastErrno==ERROR_FILE_NOT_FOUND
|
| - || lastErrno==ERROR_PATH_NOT_FOUND ){
|
| - rc = SQLITE_IOERR_DELETE_NOENT; /* Already gone? */
|
| - }else{
|
| - rc = SQLITE_ERROR;
|
| - }
|
| - break;
|
| - }
|
| - if ( attr&FILE_ATTRIBUTE_DIRECTORY ){
|
| - rc = SQLITE_ERROR; /* Files only. */
|
| - break;
|
| - }
|
| - if ( osDeleteFileW(zConverted) ){
|
| - rc = SQLITE_OK; /* Deleted OK. */
|
| - break;
|
| - }
|
| - if ( !winRetryIoerr(&cnt, &lastErrno) ){
|
| - rc = SQLITE_ERROR; /* No more retries. */
|
| - break;
|
| - }
|
| - } while(1);
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - do {
|
| - attr = osGetFileAttributesA(zConverted);
|
| - if ( attr==INVALID_FILE_ATTRIBUTES ){
|
| - lastErrno = osGetLastError();
|
| - if( lastErrno==ERROR_FILE_NOT_FOUND
|
| - || lastErrno==ERROR_PATH_NOT_FOUND ){
|
| - rc = SQLITE_IOERR_DELETE_NOENT; /* Already gone? */
|
| - }else{
|
| - rc = SQLITE_ERROR;
|
| - }
|
| - break;
|
| - }
|
| - if ( attr&FILE_ATTRIBUTE_DIRECTORY ){
|
| - rc = SQLITE_ERROR; /* Files only. */
|
| - break;
|
| - }
|
| - if ( osDeleteFileA(zConverted) ){
|
| - rc = SQLITE_OK; /* Deleted OK. */
|
| - break;
|
| - }
|
| - if ( !winRetryIoerr(&cnt, &lastErrno) ){
|
| - rc = SQLITE_ERROR; /* No more retries. */
|
| - break;
|
| - }
|
| - } while(1);
|
| - }
|
| -#endif
|
| - if( rc && rc!=SQLITE_IOERR_DELETE_NOENT ){
|
| - rc = winLogError(SQLITE_IOERR_DELETE, lastErrno, "winDelete", zFilename);
|
| - }else{
|
| - winLogIoerr(cnt);
|
| - }
|
| - sqlite3_free(zConverted);
|
| - OSTRACE(("DELETE name=%s, rc=%s\n", zFilename, sqlite3ErrName(rc)));
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** Check the existence and status of a file.
|
| -*/
|
| -static int winAccess(
|
| - sqlite3_vfs *pVfs, /* Not used on win32 */
|
| - const char *zFilename, /* Name of file to check */
|
| - int flags, /* Type of test to make on this file */
|
| - int *pResOut /* OUT: Result */
|
| -){
|
| - DWORD attr;
|
| - int rc = 0;
|
| - DWORD lastErrno = 0;
|
| - void *zConverted;
|
| - UNUSED_PARAMETER(pVfs);
|
| -
|
| - SimulateIOError( return SQLITE_IOERR_ACCESS; );
|
| - OSTRACE(("ACCESS name=%s, flags=%x, pResOut=%p\n",
|
| - zFilename, flags, pResOut));
|
| -
|
| - zConverted = winConvertFromUtf8Filename(zFilename);
|
| - if( zConverted==0 ){
|
| - OSTRACE(("ACCESS name=%s, rc=SQLITE_IOERR_NOMEM\n", zFilename));
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( osIsNT() ){
|
| - int cnt = 0;
|
| - WIN32_FILE_ATTRIBUTE_DATA sAttrData;
|
| - memset(&sAttrData, 0, sizeof(sAttrData));
|
| - while( !(rc = osGetFileAttributesExW((LPCWSTR)zConverted,
|
| - GetFileExInfoStandard,
|
| - &sAttrData)) && winRetryIoerr(&cnt, &lastErrno) ){}
|
| - if( rc ){
|
| - /* For an SQLITE_ACCESS_EXISTS query, treat a zero-length file
|
| - ** as if it does not exist.
|
| - */
|
| - if( flags==SQLITE_ACCESS_EXISTS
|
| - && sAttrData.nFileSizeHigh==0
|
| - && sAttrData.nFileSizeLow==0 ){
|
| - attr = INVALID_FILE_ATTRIBUTES;
|
| - }else{
|
| - attr = sAttrData.dwFileAttributes;
|
| - }
|
| - }else{
|
| - winLogIoerr(cnt);
|
| - if( lastErrno!=ERROR_FILE_NOT_FOUND && lastErrno!=ERROR_PATH_NOT_FOUND ){
|
| - sqlite3_free(zConverted);
|
| - return winLogError(SQLITE_IOERR_ACCESS, lastErrno, "winAccess",
|
| - zFilename);
|
| - }else{
|
| - attr = INVALID_FILE_ATTRIBUTES;
|
| - }
|
| - }
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - attr = osGetFileAttributesA((char*)zConverted);
|
| - }
|
| -#endif
|
| - sqlite3_free(zConverted);
|
| - switch( flags ){
|
| - case SQLITE_ACCESS_READ:
|
| - case SQLITE_ACCESS_EXISTS:
|
| - rc = attr!=INVALID_FILE_ATTRIBUTES;
|
| - break;
|
| - case SQLITE_ACCESS_READWRITE:
|
| - rc = attr!=INVALID_FILE_ATTRIBUTES &&
|
| - (attr & FILE_ATTRIBUTE_READONLY)==0;
|
| - break;
|
| - default:
|
| - assert(!"Invalid flags argument");
|
| - }
|
| - *pResOut = rc;
|
| - OSTRACE(("ACCESS name=%s, pResOut=%p, *pResOut=%d, rc=SQLITE_OK\n",
|
| - zFilename, pResOut, *pResOut));
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Returns non-zero if the specified path name starts with a drive letter
|
| -** followed by a colon character.
|
| -*/
|
| -static BOOL winIsDriveLetterAndColon(
|
| - const char *zPathname
|
| -){
|
| - return ( sqlite3Isalpha(zPathname[0]) && zPathname[1]==':' );
|
| -}
|
| -
|
| -/*
|
| -** Returns non-zero if the specified path name should be used verbatim. If
|
| -** non-zero is returned from this function, the calling function must simply
|
| -** use the provided path name verbatim -OR- resolve it into a full path name
|
| -** using the GetFullPathName Win32 API function (if available).
|
| -*/
|
| -static BOOL winIsVerbatimPathname(
|
| - const char *zPathname
|
| -){
|
| - /*
|
| - ** If the path name starts with a forward slash or a backslash, it is either
|
| - ** a legal UNC name, a volume relative path, or an absolute path name in the
|
| - ** "Unix" format on Windows. There is no easy way to differentiate between
|
| - ** the final two cases; therefore, we return the safer return value of TRUE
|
| - ** so that callers of this function will simply use it verbatim.
|
| - */
|
| - if ( winIsDirSep(zPathname[0]) ){
|
| - return TRUE;
|
| - }
|
| -
|
| - /*
|
| - ** If the path name starts with a letter and a colon it is either a volume
|
| - ** relative path or an absolute path. Callers of this function must not
|
| - ** attempt to treat it as a relative path name (i.e. they should simply use
|
| - ** it verbatim).
|
| - */
|
| - if ( winIsDriveLetterAndColon(zPathname) ){
|
| - return TRUE;
|
| - }
|
| -
|
| - /*
|
| - ** If we get to this point, the path name should almost certainly be a purely
|
| - ** relative one (i.e. not a UNC name, not absolute, and not volume relative).
|
| - */
|
| - return FALSE;
|
| -}
|
| -
|
| -/*
|
| -** Turn a relative pathname into a full pathname. Write the full
|
| -** pathname into zOut[]. zOut[] will be at least pVfs->mxPathname
|
| -** bytes in size.
|
| -*/
|
| -static int winFullPathname(
|
| - sqlite3_vfs *pVfs, /* Pointer to vfs object */
|
| - const char *zRelative, /* Possibly relative input path */
|
| - int nFull, /* Size of output buffer in bytes */
|
| - char *zFull /* Output buffer */
|
| -){
|
| -
|
| -#if defined(__CYGWIN__)
|
| - SimulateIOError( return SQLITE_ERROR );
|
| - UNUSED_PARAMETER(nFull);
|
| - assert( nFull>=pVfs->mxPathname );
|
| - if ( sqlite3_data_directory && !winIsVerbatimPathname(zRelative) ){
|
| - /*
|
| - ** NOTE: We are dealing with a relative path name and the data
|
| - ** directory has been set. Therefore, use it as the basis
|
| - ** for converting the relative path name to an absolute
|
| - ** one by prepending the data directory and a slash.
|
| - */
|
| - char *zOut = sqlite3MallocZero( pVfs->mxPathname+1 );
|
| - if( !zOut ){
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( cygwin_conv_path(
|
| - (osIsNT() ? CCP_POSIX_TO_WIN_W : CCP_POSIX_TO_WIN_A) |
|
| - CCP_RELATIVE, zRelative, zOut, pVfs->mxPathname+1)<0 ){
|
| - sqlite3_free(zOut);
|
| - return winLogError(SQLITE_CANTOPEN_CONVPATH, (DWORD)errno,
|
| - "winFullPathname1", zRelative);
|
| - }else{
|
| - char *zUtf8 = winConvertToUtf8Filename(zOut);
|
| - if( !zUtf8 ){
|
| - sqlite3_free(zOut);
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - sqlite3_snprintf(MIN(nFull, pVfs->mxPathname), zFull, "%s%c%s",
|
| - sqlite3_data_directory, winGetDirSep(), zUtf8);
|
| - sqlite3_free(zUtf8);
|
| - sqlite3_free(zOut);
|
| - }
|
| - }else{
|
| - char *zOut = sqlite3MallocZero( pVfs->mxPathname+1 );
|
| - if( !zOut ){
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( cygwin_conv_path(
|
| - (osIsNT() ? CCP_POSIX_TO_WIN_W : CCP_POSIX_TO_WIN_A),
|
| - zRelative, zOut, pVfs->mxPathname+1)<0 ){
|
| - sqlite3_free(zOut);
|
| - return winLogError(SQLITE_CANTOPEN_CONVPATH, (DWORD)errno,
|
| - "winFullPathname2", zRelative);
|
| - }else{
|
| - char *zUtf8 = winConvertToUtf8Filename(zOut);
|
| - if( !zUtf8 ){
|
| - sqlite3_free(zOut);
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - sqlite3_snprintf(MIN(nFull, pVfs->mxPathname), zFull, "%s", zUtf8);
|
| - sqlite3_free(zUtf8);
|
| - sqlite3_free(zOut);
|
| - }
|
| - }
|
| - return SQLITE_OK;
|
| -#endif
|
| -
|
| -#if (SQLITE_OS_WINCE || SQLITE_OS_WINRT) && !defined(__CYGWIN__)
|
| - SimulateIOError( return SQLITE_ERROR );
|
| - /* WinCE has no concept of a relative pathname, or so I am told. */
|
| - /* WinRT has no way to convert a relative path to an absolute one. */
|
| - if ( sqlite3_data_directory && !winIsVerbatimPathname(zRelative) ){
|
| - /*
|
| - ** NOTE: We are dealing with a relative path name and the data
|
| - ** directory has been set. Therefore, use it as the basis
|
| - ** for converting the relative path name to an absolute
|
| - ** one by prepending the data directory and a backslash.
|
| - */
|
| - sqlite3_snprintf(MIN(nFull, pVfs->mxPathname), zFull, "%s%c%s",
|
| - sqlite3_data_directory, winGetDirSep(), zRelative);
|
| - }else{
|
| - sqlite3_snprintf(MIN(nFull, pVfs->mxPathname), zFull, "%s", zRelative);
|
| - }
|
| - return SQLITE_OK;
|
| -#endif
|
| -
|
| -#if !SQLITE_OS_WINCE && !SQLITE_OS_WINRT && !defined(__CYGWIN__)
|
| - DWORD nByte;
|
| - void *zConverted;
|
| - char *zOut;
|
| -
|
| - /* If this path name begins with "/X:", where "X" is any alphabetic
|
| - ** character, discard the initial "/" from the pathname.
|
| - */
|
| - if( zRelative[0]=='/' && winIsDriveLetterAndColon(zRelative+1) ){
|
| - zRelative++;
|
| - }
|
| -
|
| - /* It's odd to simulate an io-error here, but really this is just
|
| - ** using the io-error infrastructure to test that SQLite handles this
|
| - ** function failing. This function could fail if, for example, the
|
| - ** current working directory has been unlinked.
|
| - */
|
| - SimulateIOError( return SQLITE_ERROR );
|
| - if ( sqlite3_data_directory && !winIsVerbatimPathname(zRelative) ){
|
| - /*
|
| - ** NOTE: We are dealing with a relative path name and the data
|
| - ** directory has been set. Therefore, use it as the basis
|
| - ** for converting the relative path name to an absolute
|
| - ** one by prepending the data directory and a backslash.
|
| - */
|
| - sqlite3_snprintf(MIN(nFull, pVfs->mxPathname), zFull, "%s%c%s",
|
| - sqlite3_data_directory, winGetDirSep(), zRelative);
|
| - return SQLITE_OK;
|
| - }
|
| - zConverted = winConvertFromUtf8Filename(zRelative);
|
| - if( zConverted==0 ){
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - if( osIsNT() ){
|
| - LPWSTR zTemp;
|
| - nByte = osGetFullPathNameW((LPCWSTR)zConverted, 0, 0, 0);
|
| - if( nByte==0 ){
|
| - sqlite3_free(zConverted);
|
| - return winLogError(SQLITE_CANTOPEN_FULLPATH, osGetLastError(),
|
| - "winFullPathname1", zRelative);
|
| - }
|
| - nByte += 3;
|
| - zTemp = sqlite3MallocZero( nByte*sizeof(zTemp[0]) );
|
| - if( zTemp==0 ){
|
| - sqlite3_free(zConverted);
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - nByte = osGetFullPathNameW((LPCWSTR)zConverted, nByte, zTemp, 0);
|
| - if( nByte==0 ){
|
| - sqlite3_free(zConverted);
|
| - sqlite3_free(zTemp);
|
| - return winLogError(SQLITE_CANTOPEN_FULLPATH, osGetLastError(),
|
| - "winFullPathname2", zRelative);
|
| - }
|
| - sqlite3_free(zConverted);
|
| - zOut = winUnicodeToUtf8(zTemp);
|
| - sqlite3_free(zTemp);
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - char *zTemp;
|
| - nByte = osGetFullPathNameA((char*)zConverted, 0, 0, 0);
|
| - if( nByte==0 ){
|
| - sqlite3_free(zConverted);
|
| - return winLogError(SQLITE_CANTOPEN_FULLPATH, osGetLastError(),
|
| - "winFullPathname3", zRelative);
|
| - }
|
| - nByte += 3;
|
| - zTemp = sqlite3MallocZero( nByte*sizeof(zTemp[0]) );
|
| - if( zTemp==0 ){
|
| - sqlite3_free(zConverted);
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| - nByte = osGetFullPathNameA((char*)zConverted, nByte, zTemp, 0);
|
| - if( nByte==0 ){
|
| - sqlite3_free(zConverted);
|
| - sqlite3_free(zTemp);
|
| - return winLogError(SQLITE_CANTOPEN_FULLPATH, osGetLastError(),
|
| - "winFullPathname4", zRelative);
|
| - }
|
| - sqlite3_free(zConverted);
|
| - zOut = sqlite3_win32_mbcs_to_utf8(zTemp);
|
| - sqlite3_free(zTemp);
|
| - }
|
| -#endif
|
| - if( zOut ){
|
| - sqlite3_snprintf(MIN(nFull, pVfs->mxPathname), zFull, "%s", zOut);
|
| - sqlite3_free(zOut);
|
| - return SQLITE_OK;
|
| - }else{
|
| - return SQLITE_IOERR_NOMEM;
|
| - }
|
| -#endif
|
| -}
|
| -
|
| -#ifndef SQLITE_OMIT_LOAD_EXTENSION
|
| -/*
|
| -** Interfaces for opening a shared library, finding entry points
|
| -** within the shared library, and closing the shared library.
|
| -*/
|
| -static void *winDlOpen(sqlite3_vfs *pVfs, const char *zFilename){
|
| - HANDLE h;
|
| -#if defined(__CYGWIN__)
|
| - int nFull = pVfs->mxPathname+1;
|
| - char *zFull = sqlite3MallocZero( nFull );
|
| - void *zConverted = 0;
|
| - if( zFull==0 ){
|
| - OSTRACE(("DLOPEN name=%s, handle=%p\n", zFilename, (void*)0));
|
| - return 0;
|
| - }
|
| - if( winFullPathname(pVfs, zFilename, nFull, zFull)!=SQLITE_OK ){
|
| - sqlite3_free(zFull);
|
| - OSTRACE(("DLOPEN name=%s, handle=%p\n", zFilename, (void*)0));
|
| - return 0;
|
| - }
|
| - zConverted = winConvertFromUtf8Filename(zFull);
|
| - sqlite3_free(zFull);
|
| -#else
|
| - void *zConverted = winConvertFromUtf8Filename(zFilename);
|
| - UNUSED_PARAMETER(pVfs);
|
| -#endif
|
| - if( zConverted==0 ){
|
| - OSTRACE(("DLOPEN name=%s, handle=%p\n", zFilename, (void*)0));
|
| - return 0;
|
| - }
|
| - if( osIsNT() ){
|
| -#if SQLITE_OS_WINRT
|
| - h = osLoadPackagedLibrary((LPCWSTR)zConverted, 0);
|
| -#else
|
| - h = osLoadLibraryW((LPCWSTR)zConverted);
|
| -#endif
|
| - }
|
| -#ifdef SQLITE_WIN32_HAS_ANSI
|
| - else{
|
| - h = osLoadLibraryA((char*)zConverted);
|
| - }
|
| -#endif
|
| - OSTRACE(("DLOPEN name=%s, handle=%p\n", zFilename, (void*)h));
|
| - sqlite3_free(zConverted);
|
| - return (void*)h;
|
| -}
|
| -static void winDlError(sqlite3_vfs *pVfs, int nBuf, char *zBufOut){
|
| - UNUSED_PARAMETER(pVfs);
|
| - winGetLastErrorMsg(osGetLastError(), nBuf, zBufOut);
|
| -}
|
| -static void (*winDlSym(sqlite3_vfs *pVfs,void *pH,const char *zSym))(void){
|
| - FARPROC proc;
|
| - UNUSED_PARAMETER(pVfs);
|
| - proc = osGetProcAddressA((HANDLE)pH, zSym);
|
| - OSTRACE(("DLSYM handle=%p, symbol=%s, address=%p\n",
|
| - (void*)pH, zSym, (void*)proc));
|
| - return (void(*)(void))proc;
|
| -}
|
| -static void winDlClose(sqlite3_vfs *pVfs, void *pHandle){
|
| - UNUSED_PARAMETER(pVfs);
|
| - osFreeLibrary((HANDLE)pHandle);
|
| - OSTRACE(("DLCLOSE handle=%p\n", (void*)pHandle));
|
| -}
|
| -#else /* if SQLITE_OMIT_LOAD_EXTENSION is defined: */
|
| - #define winDlOpen 0
|
| - #define winDlError 0
|
| - #define winDlSym 0
|
| - #define winDlClose 0
|
| -#endif
|
| -
|
| -
|
| -/*
|
| -** Write up to nBuf bytes of randomness into zBuf.
|
| -*/
|
| -static int winRandomness(sqlite3_vfs *pVfs, int nBuf, char *zBuf){
|
| - int n = 0;
|
| - UNUSED_PARAMETER(pVfs);
|
| -#if defined(SQLITE_TEST)
|
| - n = nBuf;
|
| - memset(zBuf, 0, nBuf);
|
| -#else
|
| - if( sizeof(SYSTEMTIME)<=nBuf-n ){
|
| - SYSTEMTIME x;
|
| - osGetSystemTime(&x);
|
| - memcpy(&zBuf[n], &x, sizeof(x));
|
| - n += sizeof(x);
|
| - }
|
| - if( sizeof(DWORD)<=nBuf-n ){
|
| - DWORD pid = osGetCurrentProcessId();
|
| - memcpy(&zBuf[n], &pid, sizeof(pid));
|
| - n += sizeof(pid);
|
| - }
|
| -#if SQLITE_OS_WINRT
|
| - if( sizeof(ULONGLONG)<=nBuf-n ){
|
| - ULONGLONG cnt = osGetTickCount64();
|
| - memcpy(&zBuf[n], &cnt, sizeof(cnt));
|
| - n += sizeof(cnt);
|
| - }
|
| -#else
|
| - if( sizeof(DWORD)<=nBuf-n ){
|
| - DWORD cnt = osGetTickCount();
|
| - memcpy(&zBuf[n], &cnt, sizeof(cnt));
|
| - n += sizeof(cnt);
|
| - }
|
| -#endif
|
| - if( sizeof(LARGE_INTEGER)<=nBuf-n ){
|
| - LARGE_INTEGER i;
|
| - osQueryPerformanceCounter(&i);
|
| - memcpy(&zBuf[n], &i, sizeof(i));
|
| - n += sizeof(i);
|
| - }
|
| -#endif
|
| - return n;
|
| -}
|
| -
|
| -
|
| -/*
|
| -** Sleep for a little while. Return the amount of time slept.
|
| -*/
|
| -static int winSleep(sqlite3_vfs *pVfs, int microsec){
|
| - sqlite3_win32_sleep((microsec+999)/1000);
|
| - UNUSED_PARAMETER(pVfs);
|
| - return ((microsec+999)/1000)*1000;
|
| -}
|
| -
|
| -/*
|
| -** The following variable, if set to a non-zero value, is interpreted as
|
| -** the number of seconds since 1970 and is used to set the result of
|
| -** sqlite3OsCurrentTime() during testing.
|
| -*/
|
| -#ifdef SQLITE_TEST
|
| -int sqlite3_current_time = 0; /* Fake system time in seconds since 1970. */
|
| -#endif
|
| -
|
| -/*
|
| -** Find the current time (in Universal Coordinated Time). Write into *piNow
|
| -** the current time and date as a Julian Day number times 86_400_000. In
|
| -** other words, write into *piNow the number of milliseconds since the Julian
|
| -** epoch of noon in Greenwich on November 24, 4714 B.C according to the
|
| -** proleptic Gregorian calendar.
|
| -**
|
| -** On success, return SQLITE_OK. Return SQLITE_ERROR if the time and date
|
| -** cannot be found.
|
| -*/
|
| -static int winCurrentTimeInt64(sqlite3_vfs *pVfs, sqlite3_int64 *piNow){
|
| - /* FILETIME structure is a 64-bit value representing the number of
|
| - 100-nanosecond intervals since January 1, 1601 (= JD 2305813.5).
|
| - */
|
| - FILETIME ft;
|
| - static const sqlite3_int64 winFiletimeEpoch = 23058135*(sqlite3_int64)8640000;
|
| -#ifdef SQLITE_TEST
|
| - static const sqlite3_int64 unixEpoch = 24405875*(sqlite3_int64)8640000;
|
| -#endif
|
| - /* 2^32 - to avoid use of LL and warnings in gcc */
|
| - static const sqlite3_int64 max32BitValue =
|
| - (sqlite3_int64)2000000000 + (sqlite3_int64)2000000000 +
|
| - (sqlite3_int64)294967296;
|
| -
|
| -#if SQLITE_OS_WINCE
|
| - SYSTEMTIME time;
|
| - osGetSystemTime(&time);
|
| - /* if SystemTimeToFileTime() fails, it returns zero. */
|
| - if (!osSystemTimeToFileTime(&time,&ft)){
|
| - return SQLITE_ERROR;
|
| - }
|
| -#else
|
| - osGetSystemTimeAsFileTime( &ft );
|
| -#endif
|
| -
|
| - *piNow = winFiletimeEpoch +
|
| - ((((sqlite3_int64)ft.dwHighDateTime)*max32BitValue) +
|
| - (sqlite3_int64)ft.dwLowDateTime)/(sqlite3_int64)10000;
|
| -
|
| -#ifdef SQLITE_TEST
|
| - if( sqlite3_current_time ){
|
| - *piNow = 1000*(sqlite3_int64)sqlite3_current_time + unixEpoch;
|
| - }
|
| -#endif
|
| - UNUSED_PARAMETER(pVfs);
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -/*
|
| -** Find the current time (in Universal Coordinated Time). Write the
|
| -** current time and date as a Julian Day number into *prNow and
|
| -** return 0. Return 1 if the time and date cannot be found.
|
| -*/
|
| -static int winCurrentTime(sqlite3_vfs *pVfs, double *prNow){
|
| - int rc;
|
| - sqlite3_int64 i;
|
| - rc = winCurrentTimeInt64(pVfs, &i);
|
| - if( !rc ){
|
| - *prNow = i/86400000.0;
|
| - }
|
| - return rc;
|
| -}
|
| -
|
| -/*
|
| -** The idea is that this function works like a combination of
|
| -** GetLastError() and FormatMessage() on Windows (or errno and
|
| -** strerror_r() on Unix). After an error is returned by an OS
|
| -** function, SQLite calls this function with zBuf pointing to
|
| -** a buffer of nBuf bytes. The OS layer should populate the
|
| -** buffer with a nul-terminated UTF-8 encoded error message
|
| -** describing the last IO error to have occurred within the calling
|
| -** thread.
|
| -**
|
| -** If the error message is too large for the supplied buffer,
|
| -** it should be truncated. The return value of xGetLastError
|
| -** is zero if the error message fits in the buffer, or non-zero
|
| -** otherwise (if the message was truncated). If non-zero is returned,
|
| -** then it is not necessary to include the nul-terminator character
|
| -** in the output buffer.
|
| -**
|
| -** Not supplying an error message will have no adverse effect
|
| -** on SQLite. It is fine to have an implementation that never
|
| -** returns an error message:
|
| -**
|
| -** int xGetLastError(sqlite3_vfs *pVfs, int nBuf, char *zBuf){
|
| -** assert(zBuf[0]=='\0');
|
| -** return 0;
|
| -** }
|
| -**
|
| -** However if an error message is supplied, it will be incorporated
|
| -** by sqlite into the error message available to the user using
|
| -** sqlite3_errmsg(), possibly making IO errors easier to debug.
|
| -*/
|
| -static int winGetLastError(sqlite3_vfs *pVfs, int nBuf, char *zBuf){
|
| - UNUSED_PARAMETER(pVfs);
|
| - return winGetLastErrorMsg(osGetLastError(), nBuf, zBuf);
|
| -}
|
| -
|
| -/*
|
| -** Initialize and deinitialize the operating system interface.
|
| -*/
|
| -int sqlite3_os_init(void){
|
| - static sqlite3_vfs winVfs = {
|
| - 3, /* iVersion */
|
| - sizeof(winFile), /* szOsFile */
|
| - SQLITE_WIN32_MAX_PATH_BYTES, /* mxPathname */
|
| - 0, /* pNext */
|
| - "win32", /* zName */
|
| - 0, /* pAppData */
|
| - winOpen, /* xOpen */
|
| - winDelete, /* xDelete */
|
| - winAccess, /* xAccess */
|
| - winFullPathname, /* xFullPathname */
|
| - winDlOpen, /* xDlOpen */
|
| - winDlError, /* xDlError */
|
| - winDlSym, /* xDlSym */
|
| - winDlClose, /* xDlClose */
|
| - winRandomness, /* xRandomness */
|
| - winSleep, /* xSleep */
|
| - winCurrentTime, /* xCurrentTime */
|
| - winGetLastError, /* xGetLastError */
|
| - winCurrentTimeInt64, /* xCurrentTimeInt64 */
|
| - winSetSystemCall, /* xSetSystemCall */
|
| - winGetSystemCall, /* xGetSystemCall */
|
| - winNextSystemCall, /* xNextSystemCall */
|
| - };
|
| -#if defined(SQLITE_WIN32_HAS_WIDE)
|
| - static sqlite3_vfs winLongPathVfs = {
|
| - 3, /* iVersion */
|
| - sizeof(winFile), /* szOsFile */
|
| - SQLITE_WINNT_MAX_PATH_BYTES, /* mxPathname */
|
| - 0, /* pNext */
|
| - "win32-longpath", /* zName */
|
| - 0, /* pAppData */
|
| - winOpen, /* xOpen */
|
| - winDelete, /* xDelete */
|
| - winAccess, /* xAccess */
|
| - winFullPathname, /* xFullPathname */
|
| - winDlOpen, /* xDlOpen */
|
| - winDlError, /* xDlError */
|
| - winDlSym, /* xDlSym */
|
| - winDlClose, /* xDlClose */
|
| - winRandomness, /* xRandomness */
|
| - winSleep, /* xSleep */
|
| - winCurrentTime, /* xCurrentTime */
|
| - winGetLastError, /* xGetLastError */
|
| - winCurrentTimeInt64, /* xCurrentTimeInt64 */
|
| - winSetSystemCall, /* xSetSystemCall */
|
| - winGetSystemCall, /* xGetSystemCall */
|
| - winNextSystemCall, /* xNextSystemCall */
|
| - };
|
| -#endif
|
| -
|
| - /* Double-check that the aSyscall[] array has been constructed
|
| - ** correctly. See ticket [bb3a86e890c8e96ab] */
|
| - assert( ArraySize(aSyscall)==77 );
|
| -
|
| - /* get memory map allocation granularity */
|
| - memset(&winSysInfo, 0, sizeof(SYSTEM_INFO));
|
| -#if SQLITE_OS_WINRT
|
| - osGetNativeSystemInfo(&winSysInfo);
|
| -#else
|
| - osGetSystemInfo(&winSysInfo);
|
| -#endif
|
| - assert( winSysInfo.dwAllocationGranularity>0 );
|
| - assert( winSysInfo.dwPageSize>0 );
|
| -
|
| - sqlite3_vfs_register(&winVfs, 1);
|
| -
|
| -#if defined(SQLITE_WIN32_HAS_WIDE)
|
| - sqlite3_vfs_register(&winLongPathVfs, 0);
|
| -#endif
|
| -
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -int sqlite3_os_end(void){
|
| -#if SQLITE_OS_WINRT
|
| - if( sleepObj!=NULL ){
|
| - osCloseHandle(sleepObj);
|
| - sleepObj = NULL;
|
| - }
|
| -#endif
|
| - return SQLITE_OK;
|
| -}
|
| -
|
| -#endif /* SQLITE_OS_WIN */
|
|
|
Chromium Code Reviews
Issue 2363173002:
[sqlite] Remove obsolete reference version 3.8.7.4. (Closed)
